mirror/openldap
2
0
Fork 0
mirror of https://git.openldap.org/openldap/openldap.git synced 2024-12-21 03:10:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Handle !HAVE_LONG_LONG

Browse Source
This commit is contained in:
Hallvard Furuseth 2003-06-28 19:55:30 +00:00
parent 55093034c6
commit ca2a43b7b2
1 changed files with 92 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

106
libraries/liblutil/uuid.c
View File

@ -17,6 +17,7 @@
*/
#include "portable.h"
#include <limits.h>
#include <stdio.h>
#include <sys/types.h>
@ -30,10 +31,6 @@
#else
# include <ac/socket.h>
# include <ac/time.h>
/* 100 usec intervals from 10/10/1582 to 1/1/1970 */
# define UUID_TPLUS 0x01B21DD2138140LL
# ifdef HAVE_SYS_SYSCTL_H
# include <net/if.h>
# include <sys/sysctl.h>
@ -163,8 +160,84 @@ lutil_eaddr( void )
return eaddr;
#endif
}
#if (ULONG_MAX >> 31 >> 31) > 1 || defined HAVE_LONG_LONG
#if (ULONG_MAX >> 31 >> 31) > 1
typedef unsigned long UI64;
/* 100 usec intervals from 10/10/1582 to 1/1/1970 */
# define UUID_TPLUS 0x01B21DD2138140ul
#else
typedef unsigned long long UI64;
# define UUID_TPLUS 0x01B21DD2138140ull
#endif
#define high32(i) ((unsigned long) ((i) >> 32))
#define low32(i) ((unsigned long) (i) & 0xFFFFFFFFul)
#define set_add64(res, i) ((res) += (i))
#define set_add64l(res, i) ((res) += (i))
#define mul64ll(i1, i2) ((UI64) (i1) * (i2))
#else /* ! (ULONG_MAX >= 64 bits || HAVE_LONG_LONG) */
typedef struct {
unsigned long high, low;
} UI64;
static const UI64 UUID_TPLUS = { 0x01B21Dul, 0xD2138140ul };
#define high32(i) ((i).high)
#define low32(i) ((i).low)
/* res += ui64 */
#define set_add64(res, ui64) \
{ \
res.high += ui64.high; \
res.low = (res.low + ui64.low) & 0xFFFFFFFFul; \
if (res.low < ui64.low) res.high++; \
}
/* res += ul32 */
#define set_add64l(res, ul32) \
{ \
res.low = (res.low + ul32) & 0xFFFFFFFFul; \
if (res.low < ul32) res.high++; \
}
/* compute i1 * i2 */
static UI64
mul64ll(unsigned long i1, unsigned long i2)
{
const unsigned int high1 = (i1 >> 16), low1 = (i1 & 0xffff);
const unsigned int high2 = (i2 >> 16), low2 = (i2 & 0xffff);
UI64 res;
unsigned long tmp;
res.high = (unsigned long) high1 * high2;
res.low = (unsigned long) low1 * low2;
tmp = (unsigned long) low1 * high2;
res.high += (tmp >> 16);
tmp = (tmp << 16) & 0xFFFFFFFFul;
res.low = (res.low + tmp) & 0xFFFFFFFFul;
if (res.low < tmp)
res.high++;
tmp = (unsigned long) low2 * high1;
res.high += (tmp >> 16);
tmp = (tmp << 16) & 0xFFFFFFFFul;
res.low = (res.low + tmp) & 0xFFFFFFFFul;
if (res.low < tmp)
res.high++;
return res;
}
#endif /* ULONG_MAX >= 64 bits || HAVE_LONG_LONG */
#endif /* !HAVE_UUID_TO_STR && !_WIN32 */
/*
** All we really care about is an ISO UUID string. The format of a UUID is:
** field octet note
@ -235,10 +308,11 @@ lutil_uuidstr( char *buf, size_t len )
#else
struct timeval tv;
unsigned long long tl;
UI64 tl;
unsigned char *nl;
unsigned short t2, t3, s1;
unsigned int t1;
unsigned long t1, tl_high;
unsigned int rc;
/*
* Theoretically we should delay if seq wraps within 100usec but for now
@ -259,22 +333,26 @@ lutil_uuidstr( char *buf, size_t len )
tv.tv_usec = 0;
#endif
tl = ( tv.tv_sec * 10000000LL ) + ( tv.tv_usec * 10LL ) + UUID_TPLUS;
tl = mul64ll(tv.tv_sec, 10000000UL);
set_add64l(tl, tv.tv_usec * 10UL);
set_add64(tl, UUID_TPLUS);
nl = lutil_eaddr();
t1 = tl & 0xffffffff; /* time_low */
t2 = ( tl >> 32 ) & 0xffff; /* time_mid */
t3 = ( ( tl >> 48 ) & 0x0fff ) | 0x1000; /* time_hi_and_version */
t1 = low32(tl); /* time_low */
tl_high = high32(tl);
t2 = tl_high & 0xffff; /* time_mid */
t3 = ((tl_high >> 16) & 0x0fff) | 0x1000; /* time_hi_and_version */
s1 = ( ++seq & 0x1fff ) | 0x8000; /* clock_seq_and_reserved */
t1 = snprintf( buf, len,
"%08x-%04x-%04x-%04x-%02x%02x%02x%02x%02x%02x",
t1, (unsigned) t2, (unsigned) t3, (unsigned) s1,
rc = snprintf( buf, len,
"%08lx-%04x-%04x-%04x-%02x%02x%02x%02x%02x%02x",
t1, (unsigned) t2, (unsigned) t3, (unsigned) s1,
(unsigned) nl[0], (unsigned) nl[1],
(unsigned) nl[2], (unsigned) nl[3],
(unsigned) nl[4], (unsigned) nl[5] );
return (0 < t1 && t1 < len) ? t1 : 0;
return rc < len ? rc : 0;
#endif
}