Using mutexes around accesses to refcounts seems to make the Windows build much less...
[synfig.git] / synfig-core / trunk / src / synfig / guid.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file guid.cpp
3 **      \brief Template File
4 **
5 **      $Id$
6 **
7 **      \legal
8 **      Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
9 **      Copyright (c) 2007, 2008 Chris Moore
10 **
11 **      This package is free software; you can redistribute it and/or
12 **      modify it under the terms of the GNU General Public License as
13 **      published by the Free Software Foundation; either version 2 of
14 **      the License, or (at your option) any later version.
15 **
16 **      This package is distributed in the hope that it will be useful,
17 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
18 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 **      General Public License for more details.
20 **      \endlegal
21 */
22 /* ========================================================================= */
23
24 /* === H E A D E R S ======================================================= */
25
26 #ifdef USING_PCH
27 #       include "pch.h"
28 #else
29 #ifdef HAVE_CONFIG_H
30 #       include <config.h>
31 #endif
32
33 #include "guid.h"
34 #include "quick_rng.h"
35 #include <sys/types.h>
36 #include <sys/stat.h>
37 #include <fcntl.h>
38 #include <unistd.h>
39 #include <ETL/stringf>
40 #include <functional>
41
42 #ifdef _DEBUG
43 #include "general.h"
44 #endif
45
46 #ifdef HASH_MAP_H
47 #include HASH_MAP_H
48 #include FUNCTIONAL_H
49 #endif
50
51 #ifdef _WIN32
52 #include <windows.h>
53 #endif
54
55 #endif
56
57 /* === U S I N G =========================================================== */
58
59 using namespace std;
60 using namespace etl;
61 using namespace synfig;
62
63 /* === M A C R O S ========================================================= */
64
65 #define MANUAL_GUID_CALC
66
67 /* === G L O B A L S ======================================================= */
68
69 /* === P R O C E D U R E S ================================================= */
70
71 /* === M E T H O D S ======================================================= */
72
73 #define GUID_RNG quick_rng
74 //#define GUID_RNG subtractive_rng
75
76
77
78 #ifdef MANUAL_GUID_CALC
79 #include <time.h>
80 static GUID_RNG _a, _b;
81 static void _set_up_rand_long_long(uint64_t &x);
82 static void _get_rand_long_long(uint64_t &x);
83 static void (*get_rand_long_long)(uint64_t&)=_set_up_rand_long_long;
84 static void _set_up_rand_long_long(uint64_t &x)
85 {
86 #ifdef _DEBUG
87         // synfig::info("Starting up GUID system...");
88 #endif
89         _a=GUID_RNG(time(0)+clock());
90         _b=GUID_RNG(clock());
91         get_rand_long_long=_get_rand_long_long;
92         _get_rand_long_long(x);
93 }
94
95 static void _get_rand_long_long(uint64_t &x)
96 {
97         //subtractive_rng _c(clock());
98         unsigned short* data(reinterpret_cast<unsigned short *>(&x));
99         data[0]=_a(65536);
100         data[1]=_a(65536);
101         data[2]=_a(65536);
102         data[3]=_a(65536);
103 }
104
105 #else
106 // Use OS-Dependent method
107
108 #ifdef _WIN32
109 // Win32
110 static void get_rand_long_long(uint64_t &x)
111 {
112         _GUID* guid(reinterpret_cast<_GUID*>(&x));
113         CoCreateGuid(guid);
114 }
115
116 #else
117 // Unix
118 static int rand_fd;
119 static void _set_up_rand_long_long(uint64_t &x);
120 static void _get_rand_long_long(uint64_t &x);
121 static void (*get_rand_long_long)(uint64_t&)=_set_up_rand_long_long;
122 static void _set_up_rand_long_long(uint64_t &x)
123 {
124 #ifdef _DEBUG
125         // synfig::info("Starting up GUID system...");
126 #endif
127         rand_fd=open("/dev/urandom",O_RDONLY);
128         get_rand_long_long=_get_rand_long_long;
129         _get_rand_long_long(x);
130 }
131
132 static void _get_rand_long_long(uint64_t &x){   read(rand_fd,&x,sizeof(x));}
133
134 #endif
135 #endif
136
137
138
139 void
140 synfig::GUID::make_unique()
141 {
142         get_rand_long_long(data.u_64.a);
143         get_rand_long_long(data.u_64.b);
144 }
145
146 synfig::GUID
147 synfig::GUID::hasher(const String& str)
148 {
149 #ifdef HASH_MAP_H
150         /* http://www.open-std.org/jtc1/sc22/wg21/docs/papers/2003/n1456.html says:
151          *
152          *   "Some earlier hash table implementations gave char* special
153          *    treatment: it specialized the default hash function to look
154          *    at character array being pointed to, rather than the pointer
155          *    itself. This proposal removes that special treatment."
156          *
157          * Unfortunately, the older implementation doesn't seem to want to
158          * accept Strings, so we're left with this conditional compilation.
159          */
160 # ifdef FUNCTIONAL_HASH_ON_STRING
161         HASH_MAP_NAMESPACE::hash<String> string_hash_;
162         const unsigned int seed(string_hash_(str));
163 # else  // FUNCTIONAL_HASH_ON_STRING
164         HASH_MAP_NAMESPACE::hash<const char*> string_hash_;
165         const unsigned int seed(string_hash_(str.c_str()));
166 # endif  // FUNCTIONAL_HASH_ON_STRING
167 #else  // HASH_MAP_H
168         unsigned int seed(0x3B642879);
169         for(unsigned int i=0;i<str.size();i++)
170         {
171                 seed^=(seed*str[i])*i;
172                 seed=(seed>>(32-(i%24)))^(seed<<(i%24));
173         }
174 #endif  // HASH_MAP_H
175
176         GUID_RNG random(seed);
177         GUID ret(0);
178         ret.data.u_32.a=random(~(unsigned int)0);
179         ret.data.u_32.b=random(~(unsigned int)0);
180         ret.data.u_32.c=random(~(unsigned int)0);
181         ret.data.u_32.d=random(~(unsigned int)0);
182         return ret;
183 }
184
185 synfig::GUID
186 synfig::GUID::hasher(int i)
187 {
188         GUID ret(0);
189         GUID_RNG random(i);
190         ret.data.u_32.a=random(~(unsigned int)0);
191         ret.data.u_32.b=random(~(unsigned int)0);
192         ret.data.u_32.c=random(~(unsigned int)0);
193         ret.data.u_32.d=random(~(unsigned int)0);
194         return ret;
195 }
196
197 String
198 synfig::GUID::get_string()const
199 {
200         return strprintf("%08X%08X%08X%08X",data.u_32.a,data.u_32.b,data.u_32.c,data.u_32.d);
201 }
202
203 synfig::GUID::GUID(const String &str)
204 {
205         strscanf(str,"%08X%08X%08X%08X",&data.u_32.a,&data.u_32.b,&data.u_32.c,&data.u_32.d);
206 }