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.56 by root, Sun Sep 9 06:25:46 2007 UTC vs.
Revision 1.68 by root, Tue Apr 15 03:16:02 2008 UTC

1/* 1/*
2 * This file is part of Crossfire TRT, the Roguelike Realtime MORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team 4 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * 5 *
6 * Crossfire TRT is free software: you can redistribute it and/or modify 6 * Deliantra is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by 7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or 8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version. 9 * (at your option) any later version.
10 * 10 *
11 * This program is distributed in the hope that it will be useful, 11 * This program is distributed in the hope that it will be useful,
14 * GNU General Public License for more details. 14 * GNU General Public License for more details.
15 * 15 *
16 * You should have received a copy of the GNU General Public License 16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>. 17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
18 * 18 *
19 * The authors can be reached via e-mail to <crossfire@schmorp.de> 19 * The authors can be reached via e-mail to <support@deliantra.net>
20 */ 20 */
21 21
22#ifndef UTIL_H__ 22#ifndef UTIL_H__
23#define UTIL_H__ 23#define UTIL_H__
24 24
25#define DEBUG_SALLOC 0
25//#define PREFER_MALLOC 26#define PREFER_MALLOC 1
26 27
27#if __GNUC__ >= 3 28#if __GNUC__ >= 3
28# define is_constant(c) __builtin_constant_p (c) 29# define is_constant(c) __builtin_constant_p (c)
29# define expect(expr,value) __builtin_expect ((expr),(value)) 30# define expect(expr,value) __builtin_expect ((expr),(value))
30# define prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality) 31# define prefetch(addr,rw,locality) __builtin_prefetch (addr, rw, locality)
42// is mostly true or mosty false. note that these return 43// is mostly true or mosty false. note that these return
43// booleans, not the expression. 44// booleans, not the expression.
44#define expect_false(expr) expect ((expr) != 0, 0) 45#define expect_false(expr) expect ((expr) != 0, 0)
45#define expect_true(expr) expect ((expr) != 0, 1) 46#define expect_true(expr) expect ((expr) != 0, 1)
46 47
48#include <pthread.h>
49
47#include <cstddef> 50#include <cstddef>
48#include <cmath> 51#include <cmath>
49#include <new> 52#include <new>
50#include <vector> 53#include <vector>
51 54
52#include <glib.h> 55#include <glib.h>
53 56
54#include <shstr.h> 57#include <shstr.h>
55#include <traits.h> 58#include <traits.h>
59
60#if DEBUG_SALLOC
61# define g_slice_alloc0(s) debug_slice_alloc0(s)
62# define g_slice_alloc(s) debug_slice_alloc(s)
63# define g_slice_free1(s,p) debug_slice_free1(s,p)
64void *g_slice_alloc (unsigned long size);
65void *g_slice_alloc0 (unsigned long size);
66void g_slice_free1 (unsigned long size, void *ptr);
67#elif PREFER_MALLOC
68# define g_slice_alloc0(s) calloc (1, (s))
69# define g_slice_alloc(s) malloc ((s))
70# define g_slice_free1(s,p) free ((p))
71#endif
56 72
57// use C0X decltype for auto declarations until ISO C++ sanctifies them (if ever) 73// use C0X decltype for auto declarations until ISO C++ sanctifies them (if ever)
58#define auto(var,expr) decltype(expr) var = (expr) 74#define auto(var,expr) decltype(expr) var = (expr)
59 75
60// very ugly macro that basicaly declares and initialises a variable 76// very ugly macro that basicaly declares and initialises a variable
70 86
71// in range excluding end 87// in range excluding end
72#define IN_RANGE_EXC(val,beg,end) \ 88#define IN_RANGE_EXC(val,beg,end) \
73 ((unsigned int)(val) - (unsigned int)(beg) < (unsigned int)(end) - (unsigned int)(beg)) 89 ((unsigned int)(val) - (unsigned int)(beg) < (unsigned int)(end) - (unsigned int)(beg))
74 90
91void cleanup (const char *cause, bool make_core = false);
75void fork_abort (const char *msg); 92void fork_abort (const char *msg);
76 93
77// rationale for using (U) not (T) is to reduce signed/unsigned issues, 94// rationale for using (U) not (T) is to reduce signed/unsigned issues,
78// as a is often a constant while b is the variable. it is still a bug, though. 95// as a is often a constant while b is the variable. it is still a bug, though.
79template<typename T, typename U> static inline T min (T a, U b) { return (U)a < b ? (U)a : b; } 96template<typename T, typename U> static inline T min (T a, U b) { return (U)a < b ? (U)a : b; }
80template<typename T, typename U> static inline T max (T a, U b) { return (U)a > b ? (U)a : b; } 97template<typename T, typename U> static inline T max (T a, U b) { return (U)a > b ? (U)a : b; }
81template<typename T, typename U, typename V> static inline T clamp (T v, U a, V b) { return v < (T)a ? (T)a : v >(T)b ? (T)b : v; } 98template<typename T, typename U, typename V> static inline T clamp (T v, U a, V b) { return v < (T)a ? (T)a : v >(T)b ? (T)b : v; }
82 99
83template<typename T, typename U> static inline void swap (T& a, U& b) { T t=a; a=(T)b; b=(U)t; } 100template<typename T, typename U> static inline void swap (T& a, U& b) { T t=a; a=(T)b; b=(U)t; }
101
102template<typename T, typename U, typename V> static inline T min (T a, U b, V c) { return min (a, min (b, c)); }
103template<typename T, typename U, typename V> static inline T max (T a, U b, V c) { return max (a, max (b, c)); }
84 104
85template<typename T> 105template<typename T>
86static inline T 106static inline T
87lerp (T val, T min_in, T max_in, T min_out, T max_out) 107lerp (T val, T min_in, T max_in, T min_out, T max_out)
88{ 108{
172absdir (int d) 192absdir (int d)
173{ 193{
174 return ((d - 1) & 7) + 1; 194 return ((d - 1) & 7) + 1;
175} 195}
176 196
177// makes dynamically allocated objects zero-initialised 197extern ssize_t slice_alloc; // statistics
178struct zero_initialised
179{
180 void *operator new (size_t s, void *p)
181 {
182 memset (p, 0, s);
183 return p;
184 }
185
186 void *operator new (size_t s)
187 {
188 return g_slice_alloc0 (s);
189 }
190
191 void *operator new[] (size_t s)
192 {
193 return g_slice_alloc0 (s);
194 }
195
196 void operator delete (void *p, size_t s)
197 {
198 g_slice_free1 (s, p);
199 }
200
201 void operator delete[] (void *p, size_t s)
202 {
203 g_slice_free1 (s, p);
204 }
205};
206 198
207void *salloc_ (int n) throw (std::bad_alloc); 199void *salloc_ (int n) throw (std::bad_alloc);
208void *salloc_ (int n, void *src) throw (std::bad_alloc); 200void *salloc_ (int n, void *src) throw (std::bad_alloc);
209 201
210// strictly the same as g_slice_alloc, but never returns 0 202// strictly the same as g_slice_alloc, but never returns 0
222 214
223// for symmetry 215// for symmetry
224template<typename T> 216template<typename T>
225inline void sfree (T *ptr, int n = 1) throw () 217inline void sfree (T *ptr, int n = 1) throw ()
226{ 218{
227#ifdef PREFER_MALLOC 219 if (expect_true (ptr))
228 free (ptr); 220 {
229#else 221 slice_alloc -= n * sizeof (T);
230 g_slice_free1 (n * sizeof (T), (void *)ptr); 222 g_slice_free1 (n * sizeof (T), (void *)ptr);
231#endif 223 assert (slice_alloc >= 0);//D
224 }
232} 225}
226
227// makes dynamically allocated objects zero-initialised
228struct zero_initialised
229{
230 void *operator new (size_t s, void *p)
231 {
232 memset (p, 0, s);
233 return p;
234 }
235
236 void *operator new (size_t s)
237 {
238 return salloc0<char> (s);
239 }
240
241 void *operator new[] (size_t s)
242 {
243 return salloc0<char> (s);
244 }
245
246 void operator delete (void *p, size_t s)
247 {
248 sfree ((char *)p, s);
249 }
250
251 void operator delete[] (void *p, size_t s)
252 {
253 sfree ((char *)p, s);
254 }
255};
233 256
234// a STL-compatible allocator that uses g_slice 257// a STL-compatible allocator that uses g_slice
235// boy, this is verbose 258// boy, this is verbose
236template<typename Tp> 259template<typename Tp>
237struct slice_allocator 260struct slice_allocator
249 { 272 {
250 typedef slice_allocator<U> other; 273 typedef slice_allocator<U> other;
251 }; 274 };
252 275
253 slice_allocator () throw () { } 276 slice_allocator () throw () { }
254 slice_allocator (const slice_allocator &o) throw () { } 277 slice_allocator (const slice_allocator &) throw () { }
255 template<typename Tp2> 278 template<typename Tp2>
256 slice_allocator (const slice_allocator<Tp2> &) throw () { } 279 slice_allocator (const slice_allocator<Tp2> &) throw () { }
257 280
258 ~slice_allocator () { } 281 ~slice_allocator () { }
259 282
268 void deallocate (pointer p, size_type n) 291 void deallocate (pointer p, size_type n)
269 { 292 {
270 sfree<Tp> (p, n); 293 sfree<Tp> (p, n);
271 } 294 }
272 295
273 size_type max_size ()const throw () 296 size_type max_size () const throw ()
274 { 297 {
275 return size_t (-1) / sizeof (Tp); 298 return size_t (-1) / sizeof (Tp);
276 } 299 }
277 300
278 void construct (pointer p, const Tp &val) 301 void construct (pointer p, const Tp &val)
540 assign ((char *)&dst, src, N); 563 assign ((char *)&dst, src, N);
541} 564}
542 565
543typedef double tstamp; 566typedef double tstamp;
544 567
545// return current time as timestampe 568// return current time as timestamp
546tstamp now (); 569tstamp now ();
547 570
548int similar_direction (int a, int b); 571int similar_direction (int a, int b);
549 572
550// like sprintf, but returns a "static" buffer 573// like sprintf, but returns a "static" buffer
551const char *format (const char *format, ...); 574const char *format (const char *format, ...);
552 575
576/////////////////////////////////////////////////////////////////////////////
577// threads, very very thin wrappers around pthreads
578
579struct thread
580{
581 pthread_t id;
582
583 void start (void *(*start_routine)(void *), void *arg = 0);
584
585 void cancel ()
586 {
587 pthread_cancel (id);
588 }
589
590 void *join ()
591 {
592 void *ret;
593
594 if (pthread_join (id, &ret))
595 cleanup ("pthread_join failed", 1);
596
597 return ret;
598 }
599};
600
601// note that mutexes are not classes
602typedef pthread_mutex_t smutex;
603
604#if __linux && defined (PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP)
605 #define SMUTEX_INITIALISER PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP
606#else
607 #define SMUTEX_INITIALISER PTHREAD_MUTEX_INITIALIZER
553#endif 608#endif
554 609
610#define SMUTEX(name) smutex name = SMUTEX_INITIALISER
611#define SMUTEX_LOCK(name) pthread_mutex_lock (&(name))
612#define SMUTEX_UNLOCK(name) pthread_mutex_unlock (&(name))
613
614typedef pthread_cond_t scond;
615
616#define SCOND(name) scond name = PTHREAD_COND_INITIALIZER
617#define SCOND_SIGNAL(name) pthread_cond_signal (&(name))
618#define SCOND_BROADCAST(name) pthread_cond_broadcast (&(name))
619#define SCOND_WAIT(name,mutex) pthread_cond_wait (&(name), &(mutex))
620
621#endif
622

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines