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.113 by root, Fri Apr 22 02:03:11 2011 UTC vs.
Revision 1.126 by root, Sat Nov 17 23:33:18 2018 UTC

1/* 1/*
2 * This file is part of Deliantra, the Roguelike Realtime MMORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * 5 *
6 * Deliantra is free software: you can redistribute it and/or modify it under 6 * Deliantra is free software: you can redistribute it and/or modify it under
7 * the terms of the Affero GNU General Public License as published by the 7 * the terms of the Affero GNU General Public License as published by the
8 * Free Software Foundation, either version 3 of the License, or (at your 8 * Free Software Foundation, either version 3 of the License, or (at your
9 * option) any later version. 9 * 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,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
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 Affero GNU General Public License 16 * You should have received a copy of the Affero GNU General Public License
17 * and the GNU General Public License along with this program. If not, see 17 * and the GNU General Public License along with this program. If not, see
18 * <http://www.gnu.org/licenses/>. 18 * <http://www.gnu.org/licenses/>.
19 * 19 *
20 * The authors can be reached via e-mail to <support@deliantra.net> 20 * The authors can be reached via e-mail to <support@deliantra.net>
21 */ 21 */
22 22
23#ifndef UTIL_H__ 23#ifndef UTIL_H__
24#define UTIL_H__ 24#define UTIL_H__
55#endif 55#endif
56 56
57// use C0X decltype for auto declarations until ISO C++ sanctifies them (if ever) 57// use C0X decltype for auto declarations until ISO C++ sanctifies them (if ever)
58#define auto(var,expr) decltype(expr) var = (expr) 58#define auto(var,expr) decltype(expr) var = (expr)
59 59
60#if cplusplus_does_not_suck 60#if cplusplus_does_not_suck /* still sucks in codesize with gcc 6, although local types work now */
61// does not work for local types (http://www.open-std.org/jtc1/sc22/wg21/docs/papers/2008/n2657.htm) 61// does not work for local types (http://www.open-std.org/jtc1/sc22/wg21/docs/papers/2008/n2657.htm)
62template<typename T, int N> 62template<typename T, int N>
63static inline int array_length (const T (&arr)[N]) 63static inline int array_length (const T (&arr)[N])
64{ 64{
65 return N; 65 return N;
81 81
82// in range excluding end 82// in range excluding end
83#define IN_RANGE_EXC(val,beg,end) \ 83#define IN_RANGE_EXC(val,beg,end) \
84 ((unsigned int)(val) - (unsigned int)(beg) < (unsigned int)(end) - (unsigned int)(beg)) 84 ((unsigned int)(val) - (unsigned int)(beg) < (unsigned int)(end) - (unsigned int)(beg))
85 85
86void cleanup (const char *cause, bool make_core = false); 86ecb_cold void cleanup (const char *cause, bool make_core = false);
87void fork_abort (const char *msg); 87ecb_cold void fork_abort (const char *msg);
88 88
89// rationale for using (U) not (T) is to reduce signed/unsigned issues, 89// rationale for using (U) not (T) is to reduce signed/unsigned issues,
90// as a is often a constant while b is the variable. it is still a bug, though. 90// as a is often a constant while b is the variable. it is still a bug, though.
91template<typename T, typename U> static inline T min (T a, U b) { return (U)a < b ? (U)a : b; } 91template<typename T, typename U> static inline T min (T a, U b) { return a < (T)b ? a : (T)b; }
92template<typename T, typename U> static inline T max (T a, U b) { return (U)a > b ? (U)a : b; } 92template<typename T, typename U> static inline T max (T a, U b) { return a > (T)b ? a : (T)b; }
93template<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; } 93template<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; }
94 94
95template<typename T, typename U> static inline void min_it (T &v, U m) { v = min (v, (T)m); } 95template<typename T, typename U> static inline void min_it (T &v, U m) { v = min (v, (T)m); }
96template<typename T, typename U> static inline void max_it (T &v, U m) { v = max (v, (T)m); } 96template<typename T, typename U> static inline void max_it (T &v, U m) { v = max (v, (T)m); }
97template<typename T, typename U, typename V> static inline void clamp_it (T &v, U a, V b) { v = clamp (v, (T)a, (T)b); } 97template<typename T, typename U, typename V> static inline void clamp_it (T &v, U a, V b) { v = clamp (v, (T)a, (T)b); }
237#if 0 237#if 0
238// and has a max. error of 6 in the range -100..+100. 238// and has a max. error of 6 in the range -100..+100.
239#else 239#else
240// and has a max. error of 9 in the range -100..+100. 240// and has a max. error of 9 in the range -100..+100.
241#endif 241#endif
242inline int 242inline int
243idistance (int dx, int dy) 243idistance (int dx, int dy)
244{ 244{
245 unsigned int dx_ = abs (dx); 245 unsigned int dx_ = abs (dx);
246 unsigned int dy_ = abs (dy); 246 unsigned int dy_ = abs (dy);
247 247
248#if 0 248#if 0
249 return dx_ > dy_ 249 return dx_ > dy_
252#else 252#else
253 return dx_ + dy_ - min (dx_, dy_) * 5 / 8; 253 return dx_ + dy_ - min (dx_, dy_) * 5 / 8;
254#endif 254#endif
255} 255}
256 256
257// can be substantially faster than floor, if your value range allows for it
258template<typename T>
259inline T
260fastfloor (T x)
261{
262 return std::floor (x);
263}
264
265inline float
266fastfloor (float x)
267{
268 return sint32(x) - (x < 0);
269}
270
271inline double
272fastfloor (double x)
273{
274 return sint64(x) - (x < 0);
275}
276
257/* 277/*
258 * absdir(int): Returns a number between 1 and 8, which represent 278 * absdir(int): Returns a number between 1 and 8, which represent
259 * the "absolute" direction of a number (it actually takes care of 279 * the "absolute" direction of a number (it actually takes care of
260 * "overflow" in previous calculations of a direction). 280 * "overflow" in previous calculations of a direction).
261 */ 281 */
263absdir (int d) 283absdir (int d)
264{ 284{
265 return ((d - 1) & 7) + 1; 285 return ((d - 1) & 7) + 1;
266} 286}
267 287
268// avoid ctz name because netbsd or freebsd spams it's namespace with it
269#if GCC_VERSION(3,4)
270static inline int least_significant_bit (uint32_t x)
271{
272 return __builtin_ctz (x);
273}
274#else
275int least_significant_bit (uint32_t x);
276#endif
277
278#define for_all_bits_sparse_32(mask, idxvar) \ 288#define for_all_bits_sparse_32(mask, idxvar) \
279 for (uint32_t idxvar, mask_ = mask; \ 289 for (uint32_t idxvar, mask_ = mask; \
280 mask_ && ((idxvar = least_significant_bit (mask_)), mask_ &= ~(1 << idxvar), 1);) 290 mask_ && ((idxvar = ecb_ctz32 (mask_)), mask_ &= ~(1 << idxvar), 1);)
281 291
282extern ssize_t slice_alloc; // statistics 292extern ssize_t slice_alloc; // statistics
283 293
284void *salloc_ (int n) throw (std::bad_alloc); 294void *salloc_ (int n);
285void *salloc_ (int n, void *src) throw (std::bad_alloc); 295void *salloc_ (int n, void *src);
286 296
287// strictly the same as g_slice_alloc, but never returns 0 297// strictly the same as g_slice_alloc, but never returns 0
288template<typename T> 298template<typename T>
289inline T *salloc (int n = 1) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T)); } 299inline T *salloc (int n = 1) { return (T *)salloc_ (n * sizeof (T)); }
290 300
291// also copies src into the new area, like "memdup" 301// also copies src into the new area, like "memdup"
292// if src is 0, clears the memory 302// if src is 0, clears the memory
293template<typename T> 303template<typename T>
294inline T *salloc (int n, T *src) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T), (void *)src); } 304inline T *salloc (int n, T *src) { return (T *)salloc_ (n * sizeof (T), (void *)src); }
295 305
296// clears the memory 306// clears the memory
297template<typename T> 307template<typename T>
298inline T *salloc0(int n = 1) throw (std::bad_alloc) { return (T *)salloc_ (n * sizeof (T), 0); } 308inline T *salloc0(int n = 1) { return (T *)salloc_ (n * sizeof (T), 0); }
299 309
300// for symmetry 310// for symmetry
301template<typename T> 311template<typename T>
302inline void sfree (T *ptr, int n = 1) throw () 312inline void sfree (T *ptr, int n = 1) noexcept
303{ 313{
304 if (expect_true (ptr)) 314 if (expect_true (ptr))
305 { 315 {
306 slice_alloc -= n * sizeof (T); 316 slice_alloc -= n * sizeof (T);
307 if (DEBUG_POISON) memset (ptr, DEBUG_POISON, n * sizeof (T)); 317 if (DEBUG_POISON) memset (ptr, DEBUG_POISON, n * sizeof (T));
308 g_slice_free1 (n * sizeof (T), (void *)ptr); 318 g_slice_free1 (n * sizeof (T), (void *)ptr);
309 assert (slice_alloc >= 0);//D
310 } 319 }
311} 320}
312 321
313// nulls the pointer 322// nulls the pointer
314template<typename T> 323template<typename T>
315inline void sfree0 (T *&ptr, int n = 1) throw () 324inline void sfree0 (T *&ptr, int n = 1) noexcept
316{ 325{
317 sfree<T> (ptr, n); 326 sfree<T> (ptr, n);
318 ptr = 0; 327 ptr = 0;
319} 328}
320 329
388 typedef const Tp *const_pointer; 397 typedef const Tp *const_pointer;
389 typedef Tp &reference; 398 typedef Tp &reference;
390 typedef const Tp &const_reference; 399 typedef const Tp &const_reference;
391 typedef Tp value_type; 400 typedef Tp value_type;
392 401
393 template <class U> 402 template <class U>
394 struct rebind 403 struct rebind
395 { 404 {
396 typedef slice_allocator<U> other; 405 typedef slice_allocator<U> other;
397 }; 406 };
398 407
399 slice_allocator () throw () { } 408 slice_allocator () noexcept { }
400 slice_allocator (const slice_allocator &) throw () { } 409 slice_allocator (const slice_allocator &) noexcept { }
401 template<typename Tp2> 410 template<typename Tp2>
402 slice_allocator (const slice_allocator<Tp2> &) throw () { } 411 slice_allocator (const slice_allocator<Tp2> &) noexcept { }
403 412
404 ~slice_allocator () { } 413 ~slice_allocator () { }
405 414
406 pointer address (reference x) const { return &x; } 415 pointer address (reference x) const { return &x; }
407 const_pointer address (const_reference x) const { return &x; } 416 const_pointer address (const_reference x) const { return &x; }
414 void deallocate (pointer p, size_type n) 423 void deallocate (pointer p, size_type n)
415 { 424 {
416 sfree<Tp> (p, n); 425 sfree<Tp> (p, n);
417 } 426 }
418 427
419 size_type max_size () const throw () 428 size_type max_size () const noexcept
420 { 429 {
421 return size_t (-1) / sizeof (Tp); 430 return size_t (-1) / sizeof (Tp);
422 } 431 }
423 432
424 void construct (pointer p, const Tp &val) 433 void construct (pointer p, const Tp &val)
427 } 436 }
428 437
429 void destroy (pointer p) 438 void destroy (pointer p)
430 { 439 {
431 p->~Tp (); 440 p->~Tp ();
441 }
442};
443
444// basically a memory area, but refcounted
445struct refcnt_buf
446{
447 char *data;
448
449 refcnt_buf (size_t size = 0);
450 refcnt_buf (void *data, size_t size);
451
452 refcnt_buf (const refcnt_buf &src)
453 {
454 data = src.data;
455 inc ();
456 }
457
458 ~refcnt_buf ();
459
460 refcnt_buf &operator =(const refcnt_buf &src);
461
462 operator char *()
463 {
464 return data;
465 }
466
467 size_t size () const
468 {
469 return _size ();
470 }
471
472protected:
473 enum {
474 overhead = sizeof (uint32_t) * 2
475 };
476
477 uint32_t &_size () const
478 {
479 return ((unsigned int *)data)[-2];
480 }
481
482 uint32_t &_refcnt () const
483 {
484 return ((unsigned int *)data)[-1];
485 }
486
487 void _alloc (uint32_t size)
488 {
489 data = ((char *)salloc<char> (size + overhead)) + overhead;
490 _size () = size;
491 _refcnt () = 1;
492 }
493
494 void _dealloc ();
495
496 void inc ()
497 {
498 ++_refcnt ();
499 }
500
501 void dec ()
502 {
503 if (!--_refcnt ())
504 _dealloc ();
432 } 505 }
433}; 506};
434 507
435INTERFACE_CLASS (attachable) 508INTERFACE_CLASS (attachable)
436struct refcnt_base 509struct refcnt_base
453 // p if not null 526 // p if not null
454 refcnt_base::refcnt_t *refcnt_ref () { return p ? &p->refcnt : &refcnt_dummy; } 527 refcnt_base::refcnt_t *refcnt_ref () { return p ? &p->refcnt : &refcnt_dummy; }
455 528
456 void refcnt_dec () 529 void refcnt_dec ()
457 { 530 {
458 if (!is_constant (p)) 531 if (!ecb_is_constant (p))
459 --*refcnt_ref (); 532 --*refcnt_ref ();
460 else if (p) 533 else if (p)
461 --p->refcnt; 534 --p->refcnt;
462 } 535 }
463 536
464 void refcnt_inc () 537 void refcnt_inc ()
465 { 538 {
466 if (!is_constant (p)) 539 if (!ecb_is_constant (p))
467 ++*refcnt_ref (); 540 ++*refcnt_ref ();
468 else if (p) 541 else if (p)
469 ++p->refcnt; 542 ++p->refcnt;
470 } 543 }
471 544
514 // with good distribution. 587 // with good distribution.
515 // FNV-1a is faster on many cpus because the multiplication 588 // FNV-1a is faster on many cpus because the multiplication
516 // runs concurrently with the looping logic. 589 // runs concurrently with the looping logic.
517 // we modify the hash a bit to improve its distribution 590 // we modify the hash a bit to improve its distribution
518 uint32_t hash = STRHSH_NULL; 591 uint32_t hash = STRHSH_NULL;
519 592
520 while (*s) 593 while (*s)
521 hash = (hash ^ *s++) * 16777619U; 594 hash = (hash ^ *s++) * 16777619U;
522 595
523 return hash ^ (hash >> 16); 596 return hash ^ (hash >> 16);
524} 597}
525 598
526static inline uint32_t 599static inline uint32_t
527memhsh (const char *s, size_t len) 600memhsh (const char *s, size_t len)
528{ 601{
529 uint32_t hash = STRHSH_NULL; 602 uint32_t hash = STRHSH_NULL;
530 603
531 while (len--) 604 while (len--)
532 hash = (hash ^ *s++) * 16777619U; 605 hash = (hash ^ *s++) * 16777619U;
533 606
534 return hash; 607 return hash;
535} 608}
578 } 651 }
579}; 652};
580 653
581// This container blends advantages of linked lists 654// This container blends advantages of linked lists
582// (efficiency) with vectors (random access) by 655// (efficiency) with vectors (random access) by
583// by using an unordered vector and storing the vector 656// using an unordered vector and storing the vector
584// index inside the object. 657// index inside the object.
585// 658//
586// + memory-efficient on most 64 bit archs 659// + memory-efficient on most 64 bit archs
587// + O(1) insert/remove 660// + O(1) insert/remove
588// + free unique (but varying) id for inserted objects 661// + free unique (but varying) id for inserted objects
625 insert (&obj); 698 insert (&obj);
626 } 699 }
627 700
628 void erase (T *obj) 701 void erase (T *obj)
629 { 702 {
630 unsigned int pos = obj->*indexmember; 703 object_vector_index pos = obj->*indexmember;
631 obj->*indexmember = 0; 704 obj->*indexmember = 0;
632 705
633 if (pos < this->size ()) 706 if (pos < this->size ())
634 { 707 {
635 (*this)[pos - 1] = (*this)[this->size () - 1]; 708 (*this)[pos - 1] = (*this)[this->size () - 1];
731 804
732int similar_direction (int a, int b); 805int similar_direction (int a, int b);
733 806
734// like v?sprintf, but returns a "static" buffer 807// like v?sprintf, but returns a "static" buffer
735char *vformat (const char *format, va_list ap); 808char *vformat (const char *format, va_list ap);
736char *format (const char *format, ...) attribute ((format (printf, 1, 2))); 809char *format (const char *format, ...) ecb_attribute ((format (printf, 1, 2)));
737 810
738// safety-check player input which will become object->msg 811// safety-check player input which will become object->msg
739bool msg_is_safe (const char *msg); 812bool msg_is_safe (const char *msg);
740 813
741///////////////////////////////////////////////////////////////////////////// 814/////////////////////////////////////////////////////////////////////////////

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines