#include <CoreFoundation/CFUUID.h>
#include "CFInternal.h"
extern uint32_t _CFGenerateUUID(uint8_t *uuid_bytes);
static CFMutableDictionaryRef _uniquedUUIDs = NULL;
static CFSpinLock_t CFUUIDGlobalDataLock = 0;
struct __CFUUID {
CFRuntimeBase _base;
CFUUIDBytes _bytes;
};
static Boolean __CFisEqualUUIDBytes(const void *ptr1, const void *ptr2) {
CFUUIDBytes *p1 = (CFUUIDBytes *)ptr1;
CFUUIDBytes *p2 = (CFUUIDBytes *)ptr2;
return (((p1->byte0 == p2->byte0) && (p1->byte1 == p2->byte1) && (p1->byte2 == p2->byte2) && (p1->byte3 == p2->byte3) && (p1->byte4 == p2->byte4) && (p1->byte5 == p2->byte5) && (p1->byte6 == p2->byte6) && (p1->byte7 == p2->byte7) && (p1->byte8 == p2->byte8) && (p1->byte9 == p2->byte9) && (p1->byte10 == p2->byte10) && (p1->byte11 == p2->byte11) && (p1->byte12 == p2->byte12) && (p1->byte13 == p2->byte13) && (p1->byte14 == p2->byte14) && (p1->byte15 == p2->byte15)) ? true : false);
}
static CFHashCode __CFhashUUIDBytes(const void *ptr) {
return CFHashBytes((uint8_t *)ptr, 16);
}
static CFDictionaryKeyCallBacks __CFUUIDBytesDictionaryKeyCallBacks = {0, NULL, NULL, NULL, __CFisEqualUUIDBytes, __CFhashUUIDBytes};
static CFDictionaryValueCallBacks __CFnonRetainedUUIDDictionaryValueCallBacks = {0, NULL, NULL, CFCopyDescription, CFEqual};
static void __CFUUIDAddUniqueUUID(CFUUIDRef uuid) {
__CFSpinLock(&CFUUIDGlobalDataLock);
if (_uniquedUUIDs == NULL) {
_uniquedUUIDs = CFDictionaryCreateMutable(kCFAllocatorMallocZone, 0, &__CFUUIDBytesDictionaryKeyCallBacks, &__CFnonRetainedUUIDDictionaryValueCallBacks);
}
CFDictionarySetValue(_uniquedUUIDs, &(uuid->_bytes), uuid);
__CFSpinUnlock(&CFUUIDGlobalDataLock);
}
static void __CFUUIDRemoveUniqueUUID(CFUUIDRef uuid) {
__CFSpinLock(&CFUUIDGlobalDataLock);
if (_uniquedUUIDs != NULL) {
CFDictionaryRemoveValue(_uniquedUUIDs, &(uuid->_bytes));
}
__CFSpinUnlock(&CFUUIDGlobalDataLock);
}
static CFUUIDRef __CFUUIDGetUniquedUUID(CFUUIDBytes *bytes) {
CFUUIDRef uuid = NULL;
__CFSpinLock(&CFUUIDGlobalDataLock);
if (_uniquedUUIDs != NULL) {
uuid = CFDictionaryGetValue(_uniquedUUIDs, bytes);
}
__CFSpinUnlock(&CFUUIDGlobalDataLock);
return uuid;
}
static void __CFUUIDDeallocate(CFTypeRef cf) {
struct __CFUUID *uuid = (struct __CFUUID *)cf;
__CFUUIDRemoveUniqueUUID(uuid);
}
static CFStringRef __CFUUIDCopyDescription(CFTypeRef cf) {
CFStringRef uuidStr = CFUUIDCreateString(CFGetAllocator(cf), (CFUUIDRef)cf);
CFStringRef desc = CFStringCreateWithFormat(NULL, NULL, CFSTR("<CFUUID 0x%x> %@"), cf, uuidStr);
CFRelease(uuidStr);
return desc;
}
static CFStringRef __CFUUIDCopyFormattingDescription(CFTypeRef cf, CFDictionaryRef formatOptions) {
return CFUUIDCreateString(CFGetAllocator(cf), (CFUUIDRef)cf);
}
static CFTypeID __kCFUUIDTypeID = _kCFRuntimeNotATypeID;
static const CFRuntimeClass __CFUUIDClass = {
0,
"CFUUID",
NULL, NULL, __CFUUIDDeallocate,
NULL, NULL, __CFUUIDCopyFormattingDescription,
__CFUUIDCopyDescription
};
__private_extern__ void __CFUUIDInitialize(void) {
__kCFUUIDTypeID = _CFRuntimeRegisterClass(&__CFUUIDClass);
}
CFTypeID CFUUIDGetTypeID(void) {
return __kCFUUIDTypeID;
}
static CFUUIDRef __CFUUIDCreateWithBytesPrimitive(CFAllocatorRef allocator, CFUUIDBytes bytes, Boolean isConst) {
struct __CFUUID *uuid = (struct __CFUUID *)__CFUUIDGetUniquedUUID(&bytes);
if (uuid == NULL) {
UInt32 size;
size = sizeof(struct __CFUUID) - sizeof(CFRuntimeBase);
uuid = (struct __CFUUID *)_CFRuntimeCreateInstance(allocator, __kCFUUIDTypeID, size, NULL);
if (NULL == uuid) return NULL;
uuid->_bytes = bytes;
__CFUUIDAddUniqueUUID(uuid);
} else if (!isConst) {
CFRetain(uuid);
}
return (CFUUIDRef)uuid;
}
CFUUIDRef CFUUIDCreate(CFAllocatorRef alloc) {
CFUUIDBytes bytes;
uint32_t retval = 0;
__CFSpinLock(&CFUUIDGlobalDataLock);
retval = _CFGenerateUUID((uint8_t *)&bytes);
__CFSpinUnlock(&CFUUIDGlobalDataLock);
return (retval == 0) ? __CFUUIDCreateWithBytesPrimitive(alloc, bytes, false) : NULL;
}
CFUUIDRef CFUUIDCreateWithBytes(CFAllocatorRef alloc, uint8_t byte0, uint8_t byte1, uint8_t byte2, uint8_t byte3, uint8_t byte4, uint8_t byte5, uint8_t byte6, uint8_t byte7, uint8_t byte8, uint8_t byte9, uint8_t byte10, uint8_t byte11, uint8_t byte12, uint8_t byte13, uint8_t byte14, uint8_t byte15) {
CFUUIDBytes bytes;
bytes.byte0 = byte0;
bytes.byte1 = byte1;
bytes.byte2 = byte2;
bytes.byte3 = byte3;
bytes.byte4 = byte4;
bytes.byte5 = byte5;
bytes.byte6 = byte6;
bytes.byte7 = byte7;
bytes.byte8 = byte8;
bytes.byte9 = byte9;
bytes.byte10 = byte10;
bytes.byte11 = byte11;
bytes.byte12 = byte12;
bytes.byte13 = byte13;
bytes.byte14 = byte14;
bytes.byte15 = byte15;
return __CFUUIDCreateWithBytesPrimitive(alloc, bytes, false);
}
static void _intToHexChars(UInt32 in, UniChar *out, int digits) {
int shift;
UInt32 d;
while (--digits >= 0) {
shift = digits << 2;
d = 0x0FL & (in >> shift);
if (d <= 9) {
*out++ = (UniChar)'0' + d;
} else {
*out++ = (UniChar)'A' + (d - 10);
}
}
}
static uint8_t _byteFromHexChars(UniChar *in) {
uint8_t result = 0;
UniChar c;
uint8_t d;
CFIndex i;
for (i=0; i<2; i++) {
c = in[i];
if ((c >= (UniChar)'0') && (c <= (UniChar)'9')) {
d = c - (UniChar)'0';
} else if ((c >= (UniChar)'a') && (c <= (UniChar)'f')) {
d = c - ((UniChar)'a' - 10);
} else if ((c >= (UniChar)'A') && (c <= (UniChar)'F')) {
d = c - ((UniChar)'A' - 10);
} else {
return 0;
}
result = (result << 4) | d;
}
return result;
}
CF_INLINE Boolean _isHexChar(UniChar c) {
return ((((c >= (UniChar)'0') && (c <= (UniChar)'9')) || ((c >= (UniChar)'a') && (c <= (UniChar)'f')) || ((c >= (UniChar)'A') && (c <= (UniChar)'F'))) ? true : false);
}
#define READ_A_BYTE(into) if (i+1 < len) { \
(into) = _byteFromHexChars(&(chars[i])); \
i+=2; \
}
CFUUIDRef CFUUIDCreateFromString(CFAllocatorRef alloc, CFStringRef uuidStr) {
CFUUIDBytes bytes;
UniChar chars[100];
CFIndex len;
CFIndex i = 0;
if (uuidStr == NULL) return NULL;
len = CFStringGetLength(uuidStr);
if (len > 100) {
len = 100;
} else if (len == 0) {
return NULL;
}
CFStringGetCharacters(uuidStr, CFRangeMake(0, len), chars);
memset((void *)&bytes, 0, sizeof(bytes));
while (!_isHexChar(chars[i]) && (i < len)) {
i++;
}
READ_A_BYTE(bytes.byte0);
READ_A_BYTE(bytes.byte1);
READ_A_BYTE(bytes.byte2);
READ_A_BYTE(bytes.byte3);
i++;
READ_A_BYTE(bytes.byte4);
READ_A_BYTE(bytes.byte5);
i++;
READ_A_BYTE(bytes.byte6);
READ_A_BYTE(bytes.byte7);
i++;
READ_A_BYTE(bytes.byte8);
READ_A_BYTE(bytes.byte9);
i++;
READ_A_BYTE(bytes.byte10);
READ_A_BYTE(bytes.byte11);
READ_A_BYTE(bytes.byte12);
READ_A_BYTE(bytes.byte13);
READ_A_BYTE(bytes.byte14);
READ_A_BYTE(bytes.byte15);
return __CFUUIDCreateWithBytesPrimitive(alloc, bytes, false);
}
CFStringRef CFUUIDCreateString(CFAllocatorRef alloc, CFUUIDRef uuid) {
CFMutableStringRef str = CFStringCreateMutable(alloc, 0);
UniChar buff[12];
_intToHexChars(uuid->_bytes.byte0, buff, 2);
_intToHexChars(uuid->_bytes.byte1, &(buff[2]), 2);
_intToHexChars(uuid->_bytes.byte2, &(buff[4]), 2);
_intToHexChars(uuid->_bytes.byte3, &(buff[6]), 2);
buff[8] = (UniChar)'-';
CFStringAppendCharacters(str, buff, 9);
_intToHexChars(uuid->_bytes.byte4, buff, 2);
_intToHexChars(uuid->_bytes.byte5, &(buff[2]), 2);
buff[4] = (UniChar)'-';
CFStringAppendCharacters(str, buff, 5);
_intToHexChars(uuid->_bytes.byte6, buff, 2);
_intToHexChars(uuid->_bytes.byte7, &(buff[2]), 2);
buff[4] = (UniChar)'-';
CFStringAppendCharacters(str, buff, 5);
_intToHexChars(uuid->_bytes.byte8, buff, 2);
_intToHexChars(uuid->_bytes.byte9, &(buff[2]), 2);
buff[4] = (UniChar)'-';
CFStringAppendCharacters(str, buff, 5);
_intToHexChars(uuid->_bytes.byte10, buff, 2);
_intToHexChars(uuid->_bytes.byte11, &(buff[2]), 2);
_intToHexChars(uuid->_bytes.byte12, &(buff[4]), 2);
_intToHexChars(uuid->_bytes.byte13, &(buff[6]), 2);
_intToHexChars(uuid->_bytes.byte14, &(buff[8]), 2);
_intToHexChars(uuid->_bytes.byte15, &(buff[10]), 2);
CFStringAppendCharacters(str, buff, 12);
return str;
}
CFUUIDRef CFUUIDGetConstantUUIDWithBytes(CFAllocatorRef alloc, uint8_t byte0, uint8_t byte1, uint8_t byte2, uint8_t byte3, uint8_t byte4, uint8_t byte5, uint8_t byte6, uint8_t byte7, uint8_t byte8, uint8_t byte9, uint8_t byte10, uint8_t byte11, uint8_t byte12, uint8_t byte13, uint8_t byte14, uint8_t byte15) {
CFUUIDBytes bytes;
bytes.byte0 = byte0;
bytes.byte1 = byte1;
bytes.byte2 = byte2;
bytes.byte3 = byte3;
bytes.byte4 = byte4;
bytes.byte5 = byte5;
bytes.byte6 = byte6;
bytes.byte7 = byte7;
bytes.byte8 = byte8;
bytes.byte9 = byte9;
bytes.byte10 = byte10;
bytes.byte11 = byte11;
bytes.byte12 = byte12;
bytes.byte13 = byte13;
bytes.byte14 = byte14;
bytes.byte15 = byte15;
return __CFUUIDCreateWithBytesPrimitive(alloc, bytes, true);
}
CFUUIDBytes CFUUIDGetUUIDBytes(CFUUIDRef uuid) {
return uuid->_bytes;
}
CF_EXPORT CFUUIDRef CFUUIDCreateFromUUIDBytes(CFAllocatorRef alloc, CFUUIDBytes bytes) {
return __CFUUIDCreateWithBytesPrimitive(alloc, bytes, false);
}
#undef READ_A_BYTE