2 * Copyright (c) 2002 Marcel Moolenaar
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 * $FreeBSD: src/sys/kern/kern_uuid.c,v 1.13 2007/04/23 12:53:00 pjd Exp $
27 * $DragonFly: src/sys/kern/kern_uuid.c,v 1.3 2007/06/17 03:51:10 dillon Exp $
30 #include <sys/param.h>
31 #include <sys/endian.h>
32 #include <sys/systm.h>
33 #include <sys/kernel.h>
35 #include <sys/kern_syscall.h>
36 #include <sys/random.h>
38 #include <sys/socket.h>
39 #include <sys/sysproto.h>
41 #include <net/if_var.h>
45 * http://www.opengroup.org/dce/info/draft-leach-uuids-guids-01.txt
46 * http://www.opengroup.org/onlinepubs/009629399/apdxa.htm
48 * Note that the generator state is itself an UUID, but the time and clock
49 * sequence fields are written in the native byte order.
52 /* We use an alternative, more convenient representation in the generator. */
55 uint64_t ll
; /* internal. */
62 uint16_t seq
; /* Big-endian. */
63 uint16_t node
[UUID_NODE_LEN
>>1];
66 static struct uuid_private uuid_last
;
68 static struct lock uuid_lock
;
72 uuid_lock_init(void *arg __unused
)
74 lockinit(&uuid_lock
, "uuid", 0, 0);
76 SYSINIT(uuid_lock
, SI_BOOT1_POST
, SI_ORDER_ANY
, uuid_lock_init
, NULL
);
79 * Ask the network subsystem for a real MAC address from any of the
80 * system interfaces. If we can't find one, generate a random multicast
84 uuid_node(uint16_t *node
)
86 if (if_getanyethermac(node
, UUID_NODE_LEN
) != 0)
87 read_random(node
, UUID_NODE_LEN
);
88 *((uint8_t*)node
) |= 0x01;
92 * Get the current time as a 60 bit count of 100-nanosecond intervals
93 * since 00:00:00.00, October 15,1582. We apply a magic offset to convert
94 * the Unix time since 00:00:00.00, January 1, 1970 to the date of the
95 * Gregorian reform to the Christian calendar.
101 uint64_t time
= 0x01B21DD213814000LL
;
104 time
+= ts
.tv_sec
* 10000000LL; /* 100 ns increments */
105 time
+= ts
.tv_nsec
/ 100; /* 100 ns increments */
106 return (time
& ((1LL << 60) - 1LL)); /* limit to 60 bits */
110 kern_uuidgen(struct uuid
*store
, size_t count
)
112 struct uuid_private uuid
;
116 lockmgr(&uuid_lock
, LK_EXCLUSIVE
| LK_RETRY
);
118 uuid_node(uuid
.node
);
121 if (uuid_last
.time
.ll
== 0LL || uuid_last
.node
[0] != uuid
.node
[0] ||
122 uuid_last
.node
[1] != uuid
.node
[1] ||
123 uuid_last
.node
[2] != uuid
.node
[2]) {
124 read_random(&uuid
.seq
, sizeof(uuid
.seq
));
126 } else if (uuid_last
.time
.ll
>= time
) {
127 uuid
.seq
= (uuid_last
.seq
+ 1) & 0x3fff;
129 uuid
.seq
= uuid_last
.seq
;
133 uuid_last
.time
.ll
= (time
+ count
- 1) & ((1LL << 60) - 1LL);
135 lockmgr(&uuid_lock
, LK_RELEASE
);
137 /* Set sequence and variant and deal with byte order. */
138 uuid
.seq
= htobe16(uuid
.seq
| 0x8000);
140 for (n
= 0; n
< count
; n
++) {
141 /* Set time and version (=1). */
142 uuid
.time
.x
.low
= (uint32_t)time
;
143 uuid
.time
.x
.mid
= (uint16_t)(time
>> 32);
144 uuid
.time
.x
.hi
= ((uint16_t)(time
>> 48) & 0xfff) | (1 << 12);
145 store
[n
] = *(struct uuid
*)&uuid
;
153 * uuidgen(struct uuid *store, int count)
155 * Generate an array of new UUIDs
158 sys_uuidgen(struct uuidgen_args
*uap
)
165 * Limit the number of UUIDs that can be created at the same time
166 * to some arbitrary number. This isn't really necessary, but I
167 * like to have some sort of upper-bound that's less than 2G :-)
168 * XXX probably needs to be tunable.
170 if (uap
->count
< 1 || uap
->count
> 2048)
174 store
= kmalloc(count
* sizeof(struct uuid
), M_TEMP
, M_WAITOK
);
175 kern_uuidgen(store
, count
);
176 error
= copyout(store
, uap
->store
, count
* sizeof(struct uuid
));
177 kfree(store
, M_TEMP
);
182 snprintf_uuid(char *buf
, size_t sz
, struct uuid
*uuid
)
184 struct uuid_private
*id
;
187 id
= (struct uuid_private
*)uuid
;
188 cnt
= ksnprintf(buf
, sz
, "%08x-%04x-%04x-%04x-%04x%04x%04x",
189 id
->time
.x
.low
, id
->time
.x
.mid
, id
->time
.x
.hi
, be16toh(id
->seq
),
190 be16toh(id
->node
[0]), be16toh(id
->node
[1]), be16toh(id
->node
[2]));
195 printf_uuid(struct uuid
*uuid
)
199 snprintf_uuid(buf
, sizeof(buf
), uuid
);
200 return (kprintf("%s", buf
));
204 sbuf_printf_uuid(struct sbuf
*sb
, struct uuid
*uuid
)
208 snprintf_uuid(buf
, sizeof(buf
), uuid
);
209 return (sbuf_printf(sb
, "%s", buf
));
216 kuuid_is_nil(struct uuid
*uuid
)
220 for (i
= 0; i
< sizeof(*uuid
); i
+= sizeof(int)) {
221 if (*(int *)((char *)uuid
+ i
) != 0)
228 * Encode/Decode UUID into byte-stream.
229 * http://www.opengroup.org/dce/info/draft-leach-uuids-guids-01.txt
232 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
233 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
235 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
236 * | time_mid | time_hi_and_version |
237 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
238 * |clk_seq_hi_res | clk_seq_low | node (0-1) |
239 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
241 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
245 le_uuid_enc(void *buf
, struct uuid
const *uuid
)
251 le32enc(p
, uuid
->time_low
);
252 le16enc(p
+ 4, uuid
->time_mid
);
253 le16enc(p
+ 6, uuid
->time_hi_and_version
);
254 p
[8] = uuid
->clock_seq_hi_and_reserved
;
255 p
[9] = uuid
->clock_seq_low
;
256 for (i
= 0; i
< _UUID_NODE_LEN
; i
++)
257 p
[10 + i
] = uuid
->node
[i
];
261 le_uuid_dec(void const *buf
, struct uuid
*uuid
)
267 uuid
->time_low
= le32dec(p
);
268 uuid
->time_mid
= le16dec(p
+ 4);
269 uuid
->time_hi_and_version
= le16dec(p
+ 6);
270 uuid
->clock_seq_hi_and_reserved
= p
[8];
271 uuid
->clock_seq_low
= p
[9];
272 for (i
= 0; i
< _UUID_NODE_LEN
; i
++)
273 uuid
->node
[i
] = p
[10 + i
];
277 be_uuid_enc(void *buf
, struct uuid
const *uuid
)
283 be32enc(p
, uuid
->time_low
);
284 be16enc(p
+ 4, uuid
->time_mid
);
285 be16enc(p
+ 6, uuid
->time_hi_and_version
);
286 p
[8] = uuid
->clock_seq_hi_and_reserved
;
287 p
[9] = uuid
->clock_seq_low
;
288 for (i
= 0; i
< _UUID_NODE_LEN
; i
++)
289 p
[10 + i
] = uuid
->node
[i
];
293 be_uuid_dec(void const *buf
, struct uuid
*uuid
)
299 uuid
->time_low
= be32dec(p
);
300 uuid
->time_mid
= le16dec(p
+ 4);
301 uuid
->time_hi_and_version
= be16dec(p
+ 6);
302 uuid
->clock_seq_hi_and_reserved
= p
[8];
303 uuid
->clock_seq_low
= p
[9];
304 for (i
= 0; i
< _UUID_NODE_LEN
; i
++)
305 uuid
->node
[i
] = p
[10 + i
];
309 parse_uuid(const char *str
, struct uuid
*uuid
)
314 /* An empty string represents a nil UUID. */
316 bzero(uuid
, sizeof(*uuid
));
320 /* The UUID string representation has a fixed length. */
321 if (strlen(str
) != 36)
325 * We only work with "new" UUIDs. New UUIDs have the form:
326 * 01234567-89ab-cdef-0123-456789abcdef
327 * The so called "old" UUIDs, which we don't support, have the form:
328 * 0123456789ab.cd.ef.01.23.45.67.89.ab
333 n
= ksscanf(str
, "%8x-%4x-%4x-%2x%2x-%2x%2x%2x%2x%2x%2x", c
+ 0, c
+ 1,
334 c
+ 2, c
+ 3, c
+ 4, c
+ 5, c
+ 6, c
+ 7, c
+ 8, c
+ 9, c
+ 10);
335 /* Make sure we have all conversions. */
339 /* Successful scan. Build the UUID. */
340 uuid
->time_low
= c
[0];
341 uuid
->time_mid
= c
[1];
342 uuid
->time_hi_and_version
= c
[2];
343 uuid
->clock_seq_hi_and_reserved
= c
[3];
344 uuid
->clock_seq_low
= c
[4];
345 for (n
= 0; n
< 6; n
++)
346 uuid
->node
[n
] = c
[n
+ 5];
348 /* Check semantics... */
349 return (((c
[3] & 0x80) != 0x00 && /* variant 0? */
350 (c
[3] & 0xc0) != 0x80 && /* variant 1? */
351 (c
[3] & 0xe0) != 0xc0) ? EINVAL
: 0); /* variant 2? */