import HEAD into svn+ssh://svn.samba.org/home/svn/samba/trunk
[metze/old/v3-2-winbind-ndr.git] / source / lib / util_uuid.c
1 /* 
2  *  Unix SMB/CIFS implementation.
3  *  UUID server routines
4  *  Copyright (C) Theodore Ts'o               1996, 1997,
5  *  Copyright (C) Jim McDonough <jmcd@us.ibm.com> 2002, 2003
6  *
7  *  This program is free software; you can redistribute it and/or modify
8  *  it under the terms of the GNU General Public License as published by
9  *  the Free Software Foundation; either version 2 of the License, or
10  *  (at your option) any later version.
11  *  
12  *  This program is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *  GNU General Public License for more details.
16  *  
17  *  You should have received a copy of the GNU General Public License
18  *  along with this program; if not, write to the Free Software
19  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20  */
21
22 #include "includes.h"
23
24 /*
25  * Offset between 15-Oct-1582 and 1-Jan-70
26  */
27 #define TIME_OFFSET_HIGH 0x01B21DD2
28 #define TIME_OFFSET_LOW  0x13814000
29
30 void smb_uuid_pack(const struct uuid uu, UUID_FLAT *ptr)
31 {
32         SIVAL(ptr, 0, uu.time_low);
33         SSVAL(ptr, 4, uu.time_mid);
34         SSVAL(ptr, 6, uu.time_hi_and_version);
35         memcpy(ptr+8, uu.clock_seq, 2);
36         memcpy(ptr+10, uu.node, 6);
37 }
38
39 void smb_uuid_unpack(const UUID_FLAT in, struct uuid *uu)
40 {
41         uu->time_low = IVAL(in.info, 0);
42         uu->time_mid = SVAL(in.info, 4);
43         uu->time_hi_and_version = SVAL(in.info, 6);
44         memcpy(uu->clock_seq, in.info+8, 2);
45         memcpy(uu->node, in.info+10, 6);
46 }
47
48 const struct uuid smb_uuid_unpack_static(const UUID_FLAT in)
49 {
50         static struct uuid uu;
51
52         smb_uuid_unpack(in, &uu);
53         return uu;
54 }
55
56 void smb_uuid_generate_random(struct uuid *uu)
57 {
58         UUID_FLAT tmp;
59
60         generate_random_buffer(tmp.info, sizeof(tmp.info), True);
61         smb_uuid_unpack(tmp, uu);
62
63         uu->clock_seq[0] = (uu->clock_seq[0] & 0x3F) | 0x80;
64         uu->time_hi_and_version = (uu->time_hi_and_version & 0x0FFF) | 0x4000;
65 }
66
67 char *smb_uuid_to_string(const struct uuid uu)
68 {
69         char *out;
70
71         asprintf(&out, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
72                  uu.time_low, uu.time_mid, uu.time_hi_and_version,
73                  uu.clock_seq[0], uu.clock_seq[1],
74                  uu.node[0], uu.node[1], uu.node[2], 
75                  uu.node[3], uu.node[4], uu.node[5]);
76
77         return out;
78 }
79
80 const char *smb_uuid_string_static(const struct uuid uu)
81 {
82         static char out[37];
83
84         slprintf(out, sizeof(out), 
85                  "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
86                  uu.time_low, uu.time_mid, uu.time_hi_and_version,
87                  uu.clock_seq[0], uu.clock_seq[1],
88                  uu.node[0], uu.node[1], uu.node[2], 
89                  uu.node[3], uu.node[4], uu.node[5]);
90         return out;
91 }
92
93 BOOL smb_string_to_uuid(const char *in, struct uuid* uu)
94 {
95         BOOL ret = False;
96         const char *ptr = in;
97         char *end = (char *)in;
98         int i;
99
100         if (!in || !uu) goto out;
101
102         uu->time_low = strtoul(ptr, &end, 16);
103         if ((end - ptr) != 8 || *end != '-') goto out;
104         ptr = (end + 1);
105
106         uu->time_mid = strtoul(ptr, &end, 16);
107         if ((end - ptr) != 4 || *end != '-') goto out;
108         ptr = (end + 1);
109
110         uu->time_hi_and_version = strtoul(ptr, &end, 16);
111         if ((end - ptr) != 4 || *end != '-') goto out;
112         ptr = (end + 1);
113
114         for (i = 0; i < 2; i++) {
115                 int adj = 0;
116                 if (*ptr >= '0' && *ptr <= '9') {
117                         adj = '0';
118                 } else if (*ptr >= 'a' && *ptr <= 'f') {
119                         adj = 'a';
120                 } else if (*ptr >= 'A' && *ptr <= 'F') {
121                         adj = 'A';
122                 } else {
123                         goto out;
124                 }
125                 uu->clock_seq[i] = (*ptr - adj) << 4;
126                 ptr++;
127
128                 if (*ptr >= '0' && *ptr <= '9') {
129                         adj = '0';
130                 } else if (*ptr >= 'a' && *ptr <= 'f') {
131                         adj = 'a';
132                 } else if (*ptr >= 'A' && *ptr <= 'F') {
133                         adj = 'A';
134                 } else {
135                         goto out;
136                 }
137                 uu->clock_seq[i] |= (*ptr - adj);
138                 ptr++;
139         }
140
141         if (*ptr != '-') goto out;
142         ptr++;
143
144         for (i = 0; i < 6; i++) {
145                 int adj = 0;
146                 if (*ptr >= '0' && *ptr <= '9') {
147                         adj = '0';
148                 } else if (*ptr >= 'a' && *ptr <= 'f') {
149                         adj = 'a';
150                 } else if (*ptr >= 'A' && *ptr <= 'F') {
151                         adj = 'A';
152                 } else {
153                         goto out;
154                 }
155                 uu->node[i] = (*ptr - adj) << 4;
156                 ptr++;
157
158                 if (*ptr >= '0' && *ptr <= '9') {
159                         adj = '0';
160                 } else if (*ptr >= 'a' && *ptr <= 'f') {
161                         adj = 'a';
162                 } else if (*ptr >= 'A' && *ptr <= 'F') {
163                         adj = 'A';
164                 } else {
165                         goto out;
166                 }
167                 uu->node[i] |= (*ptr - adj);
168                 ptr++;
169         }
170
171         ret = True;
172 out:
173         return ret;
174 }