ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/include/util.h
(Generate patch)

Comparing deliantra/server/include/util.h (file contents):
Revision 1.9 by root, Tue Sep 12 18:15:34 2006 UTC vs.
Revision 1.33 by root, Thu Jan 18 22:20:00 2007 UTC

… …
5# define is_constant(c) __builtin_constant_p (c) 5# define is_constant(c) __builtin_constant_p (c)
6#else 6#else
7# define is_constant(c) 0 7# define is_constant(c) 0
8#endif 8#endif
9 9
10#include <cstddef>
11#include <cmath>
12#include <new>
13#include <vector>
14
15#include <glib.h>
16
17#include <shstr.h>
18#include <traits.h>
19
20// use a gcc extension for auto declarations until ISO C++ sanctifies them
21#define AUTODECL(var,expr) typeof(expr) var = (expr)
22
23// very ugly macro that basicaly declares and initialises a variable
24// that is in scope for the next statement only
25// works only for stuff that can be assigned 0 and converts to false
26// (note: works great for pointers)
27// most ugly macro I ever wrote
28#define declvar(type, name, value) if (type name = 0) { } else if (((name) = (value)), 1)
29
30// in range including end
31#define IN_RANGE_INC(val,beg,end) \
32 ((unsigned int)(val) - (unsigned int)(beg) <= (unsigned int)(end) - (unsigned int)(beg))
33
34// in range excluding end
35#define IN_RANGE_EXC(val,beg,end) \
36 ((unsigned int)(val) - (unsigned int)(beg) < (unsigned int)(end) - (unsigned int)(beg))
37
38void fork_abort (const char *msg);
39
40template<typename T, typename U> static inline T min (T a, U b) { return a < (T)b ? a : (T)b; }
41template<typename T, typename U> static inline T max (T a, U b) { return a > (T)b ? a : (T)b; }
42template<typename T, typename U, typename V> static inline T clamp (T v, U a, V b) { return v < (T)a ? a : v >(T)b ? b : v; }
43
44template<typename T, typename U> static inline void swap (T& a, U& b) { T t=a; a=(T)b; b=(U)t; }
45
46// this is much faster than crossfires original algorithm
47// on modern cpus
48inline int
49isqrt (int n)
50{
51 return (int)sqrtf ((float)n);
52}
53
54// this is only twice as fast as naive sqrtf (dx*dy+dy*dy)
55#if 0
56// and has a max. error of 6 in the range -100..+100.
57#else
58// and has a max. error of 9 in the range -100..+100.
59#endif
60inline int
61idistance (int dx, int dy)
62{
63 unsigned int dx_ = abs (dx);
64 unsigned int dy_ = abs (dy);
65
66#if 0
67 return dx_ > dy_
68 ? (dx_ * 61685 + dy_ * 26870) >> 16
69 : (dy_ * 61685 + dx_ * 26870) >> 16;
70#else
71 return dx_ + dy_ - min (dx_, dy_) * 5 / 8;
72#endif
73}
74
75/*
76 * absdir(int): Returns a number between 1 and 8, which represent
77 * the "absolute" direction of a number (it actually takes care of
78 * "overflow" in previous calculations of a direction).
79 */
80inline int
81absdir (int d)
82{
83 return ((d - 1) & 7) + 1;
84}
85
10// makes dynamically allocated objects zero-initialised 86// makes dynamically allocated objects zero-initialised
11struct zero_initialised 87struct zero_initialised
12{ 88{
13 void *operator new (size_t s, void *); 89 void *operator new (size_t s, void *p)
90 {
91 memset (p, 0, s);
92 return p;
93 }
94
14 void *operator new (size_t s); 95 void *operator new (size_t s)
96 {
97 return g_slice_alloc0 (s);
98 }
99
15 void *operator new [] (size_t s); 100 void *operator new[] (size_t s)
101 {
102 return g_slice_alloc0 (s);
103 }
104
16 void operator delete (void *p, size_t s); 105 void operator delete (void *p, size_t s)
106 {
107 g_slice_free1 (s, p);
108 }
109
17 void operator delete [] (void *p, size_t s); 110 void operator delete[] (void *p, size_t s)
111 {
112 g_slice_free1 (s, p);
113 }
18}; 114};
19 115
20struct refcounted 116void *salloc_ (int n) throw (std::bad_alloc);
117void *salloc_ (int n, void *src) throw (std::bad_alloc);
118
119// strictly the same as g_slice_alloc, but never returns 0
120template<typename T>
121inline T *salloc (int n = 1) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T)); }
122
123// also copies src into the new area, like "memdup"
124// if src is 0, clears the memory
125template<typename T>
126inline T *salloc (int n, T *src) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T), (void *)src); }
127
128// clears the memory
129template<typename T>
130inline T *salloc0(int n = 1) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T), 0); }
131
132// for symmetry
133template<typename T>
134inline void sfree (T *ptr, int n = 1) throw ()
21{ 135{
22 mutable int refcnt; 136 g_slice_free1 (n * sizeof (T), (void *)ptr);
23 refcounted () : refcnt (0) { } 137}
24 void refcnt_inc () { ++refcnt; } 138
25 void refcnt_dec () { --refcnt; 139// a STL-compatible allocator that uses g_slice
26 if (refcnt < 0)abort();}//D 140// boy, this is verbose
141template<typename Tp>
142struct slice_allocator
143{
144 typedef size_t size_type;
145 typedef ptrdiff_t difference_type;
146 typedef Tp *pointer;
147 typedef const Tp *const_pointer;
148 typedef Tp &reference;
149 typedef const Tp &const_reference;
150 typedef Tp value_type;
151
152 template <class U>
153 struct rebind
154 {
155 typedef slice_allocator<U> other;
156 };
157
158 slice_allocator () throw () { }
159 slice_allocator (const slice_allocator &o) throw () { }
160 template<typename Tp2>
161 slice_allocator (const slice_allocator<Tp2> &) throw () { }
162
163 ~slice_allocator () { }
164
165 pointer address (reference x) const { return &x; }
166 const_pointer address (const_reference x) const { return &x; }
167
168 pointer allocate (size_type n, const_pointer = 0)
169 {
170 return salloc<Tp> (n);
171 }
172
173 void deallocate (pointer p, size_type n)
174 {
175 sfree<Tp> (p, n);
176 }
177
178 size_type max_size ()const throw ()
179 {
180 return size_t (-1) / sizeof (Tp);
181 }
182
183 void construct (pointer p, const Tp &val)
184 {
185 ::new (p) Tp (val);
186 }
187
188 void destroy (pointer p)
189 {
190 p->~Tp ();
191 }
27}; 192};
193
194// P. L'Ecuyer, “Maximally Equidistributed Combined Tausworthe Generators”, Mathematics of Computation, 65, 213 (1996), 203–213.
195// http://www.iro.umontreal.ca/~lecuyer/myftp/papers/tausme.ps
196// http://www.iro.umontreal.ca/~lecuyer/myftp/papers/tausme2.ps
197struct tausworthe_random_generator
198{
199 uint32_t state [4];
200
201 tausworthe_random_generator (uint32_t seed);
202 uint32_t next ();
203
204 uint32_t operator ()(uint32_t r_max)
205 {
206 return next () % r_max;
207 }
208
209 // return a number within (min .. max)
210 int operator () (int r_min, int r_max)
211 {
212 return r_min + (*this) (max (r_max - r_min + 1, 1));
213 }
214
215 double operator ()()
216 {
217 return next () / (double)0xFFFFFFFFU;
218 }
219};
220
221typedef tausworthe_random_generator rand_gen;
222
223extern rand_gen rndm;
28 224
29template<class T> 225template<class T>
30struct refptr 226struct refptr
31{ 227{
32 T *p; 228 T *p;
… …
54 T &operator * () const { return *p; } 250 T &operator * () const { return *p; }
55 T *operator ->() const { return p; } 251 T *operator ->() const { return p; }
56 252
57 operator T *() const { return p; } 253 operator T *() const { return p; }
58}; 254};
255
256typedef refptr<maptile> maptile_ptr;
257typedef refptr<object> object_ptr;
258typedef refptr<archetype> arch_ptr;
259typedef refptr<client> client_ptr;
260typedef refptr<player> player_ptr;
59 261
60struct str_hash 262struct str_hash
61{ 263{
62 std::size_t operator ()(const char *s) const 264 std::size_t operator ()(const char *s) const
63 { 265 {
… …
89 { 291 {
90 return !strcmp (a, b); 292 return !strcmp (a, b);
91 } 293 }
92}; 294};
93 295
94#include <vector>
95
96template<class obj> 296template<class T>
97struct unordered_vector : std::vector<obj> 297struct unordered_vector : std::vector<T, slice_allocator<T> >
98{ 298{
99 typedef typename std::vector<obj>::iterator iterator; 299 typedef typename unordered_vector::iterator iterator;
100 300
101 void erase (unsigned int pos) 301 void erase (unsigned int pos)
102 { 302 {
103 if (pos < this->size () - 1) 303 if (pos < this->size () - 1)
104 (*this)[pos] = (*this)[this->size () - 1]; 304 (*this)[pos] = (*this)[this->size () - 1];
… …
110 { 310 {
111 erase ((unsigned int )(i - this->begin ())); 311 erase ((unsigned int )(i - this->begin ()));
112 } 312 }
113}; 313};
114 314
115template<typename T, typename U> static inline T min (T a, U b) { return a < (T)b ? a : (T)b; } 315template<class T, int T::* index>
116template<typename T, typename U> static inline T max (T a, U b) { return a > (T)b ? a : (T)b; } 316struct object_vector : std::vector<T *, slice_allocator<T *> >
117template<typename T, typename U, typename V> static inline T clamp (T v, U a, V b) { return v < (T)a ? a : v >(T)b ? b : v; } 317{
318 void insert (T *obj)
319 {
320 assert (!(obj->*index));
321 push_back (obj);
322 obj->*index = this->size ();
323 }
118 324
119template<typename T, typename U> static inline void swap (T& a, U& b) { T t=a; a=(T)b; b=(U)t; } 325 void insert (T &obj)
326 {
327 insert (&obj);
328 }
120 329
121// basically does what strncpy should do 330 void erase (T *obj)
331 {
332 assert (obj->*index);
333 int pos = obj->*index;
334 obj->*index = 0;
335
336 if (pos < this->size ())
337 {
338 (*this)[pos - 1] = (*this)[this->size () - 1];
339 (*this)[pos - 1]->*index = pos;
340 }
341
342 this->pop_back ();
343 }
344
345 void erase (T &obj)
346 {
347 errase (&obj);
348 }
349};
350
351// basically does what strncpy should do, but appends "..." to strings exceeding length
352void assign (char *dst, const char *src, int maxlen);
353
354// type-safe version of assign
122template<int N> 355template<int N>
123inline void assign (char (&dst)[N], const char *src) 356inline void assign (char (&dst)[N], const char *src)
124{ 357{
125 // should be optimised at some point, maybe should also add "..." 358 assign ((char *)&dst, src, N);
126 // when buffer is too small.
127 snprintf (dst, N, "%s", src);
128} 359}
360
361typedef double tstamp;
362
363// return current time as timestampe
364tstamp now ();
365
366int similar_direction (int a, int b);
129 367
130#endif 368#endif
131 369

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines