ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/utils.C
(Generate patch)

Comparing deliantra/server/common/utils.C (file contents):
Revision 1.13 by root, Tue Sep 12 21:10:31 2006 UTC vs.
Revision 1.38 by root, Mon Jan 15 02:42:15 2007 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
3 3
4 Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 Copyright (C) 1992 Frank Tore Johansen
6 7
7 This program is free software; you can redistribute it and/or modify 8 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by 9 it under the terms of the GNU General Public License as published by
… …
16 17
17 You should have received a copy of the GNU General Public License 18 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software 19 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 21
21 The authors can be reached via e-mail at crossfire-devel@real-time.com 22 The authors can be reached via e-mail at <crossfire@schmorp.de>
22*/ 23*/
23 24
24/* 25/*
25 * General convenience functions for crossfire. 26 * General convenience functions for crossfire.
26 */ 27 */
28
29#include <cstdlib>
30#include <sys/types.h>
31#include <unistd.h>
32#include <sys/time.h>
33#include <time.h>
34#include <signal.h>
27 35
28#include <global.h> 36#include <global.h>
29#include <funcpoint.h> 37#include <funcpoint.h>
30#include <material.h> 38#include <material.h>
31 39
… …
97 diff = max - min + 1; 105 diff = max - min + 1;
98 ((diff > 2) ? (base = 20) : (base = 50)); /* d2 and d3 are corner cases */ 106 ((diff > 2) ? (base = 20) : (base = 50)); /* d2 and d3 are corner cases */
99 107
100 if (max < 1 || diff < 1) 108 if (max < 1 || diff < 1)
101 { 109 {
102#ifndef WIN32
103 LOG (llevError, "Calling random_roll with min=%lld max=%lld\n", min, max);
104#else
105 LOG (llevError, "Calling random_roll with min=%I64d max=%I64d\n", min, max); 110 LOG (llevError, "Calling random_roll with min=%" PRId64 " max=%" PRId64 "\n", min, max);
106#endif
107 return (min); /* avoids a float exception */ 111 return (min); /* avoids a float exception */
108 } 112 }
109 113
110 /* Don't know of a portable call to get 64 bit random values. 114 /* Don't know of a portable call to get 64 bit random values.
111 * So make a call to get two 32 bit random numbers, and just to 115 * So make a call to get two 32 bit random numbers, and just to
… …
197 return (min); 201 return (min);
198 202
199 return (RANDOM () % diff + min); 203 return (RANDOM () % diff + min);
200} 204}
201 205
202/* decay and destroy persihable items in a map */ 206/* decay and destroy perishable items in a map */
203
204void 207void
205decay_objects (mapstruct *m) 208maptile::decay_objects ()
206{ 209{
207 int x, y, destroy; 210 if (!spaces)
208 object *op, *otmp;
209
210 if (m->unique)
211 return; 211 return;
212 212
213 for (x = 0; x < MAP_WIDTH (m); x++) 213 for (mapspace *ms = spaces + size (); ms-- > spaces; )
214 for (y = 0; y < MAP_HEIGHT (m); y++) 214 for (object *above, *op = ms->bot; op; op = above)
215 for (op = get_map_ob (m, x, y); op; op = otmp)
216 { 215 {
216 above = op->above;
217
217 destroy = 0; 218 bool destroy = 0;
218 otmp = op->above; 219
220 // do not decay anything above unique floor tiles (yet :)
219 if (QUERY_FLAG (op, FLAG_IS_FLOOR) && QUERY_FLAG (op, FLAG_UNIQUE)) 221 if (QUERY_FLAG (op, FLAG_IS_FLOOR) && QUERY_FLAG (op, FLAG_UNIQUE))
220 break; 222 break;
223
221 if (QUERY_FLAG (op, FLAG_IS_FLOOR) || 224 if (QUERY_FLAG (op, FLAG_IS_FLOOR)
222 QUERY_FLAG (op, FLAG_OBJ_ORIGINAL) || 225 || QUERY_FLAG (op, FLAG_OBJ_ORIGINAL)
223 QUERY_FLAG (op, FLAG_OBJ_SAVE_ON_OVL) || 226 || QUERY_FLAG (op, FLAG_OBJ_SAVE_ON_OVL)
224 QUERY_FLAG (op, FLAG_UNIQUE) || QUERY_FLAG (op, FLAG_OVERLAY_FLOOR) || QUERY_FLAG (op, FLAG_UNPAID) || IS_LIVE (op)) 227 || QUERY_FLAG (op, FLAG_UNIQUE)
225 continue; 228 || QUERY_FLAG (op, FLAG_OVERLAY_FLOOR)
226 /* otherwise, we decay and destroy */ 229 || QUERY_FLAG (op, FLAG_UNPAID)
227 if (IS_WEAPON (op)) 230 || op->is_alive ())
231 ; // do not decay
232 else if (op->is_weapon ())
228 { 233 {
229 op->stats.dam--; 234 op->stats.dam--;
230 if (op->stats.dam < 0) 235 if (op->stats.dam < 0)
231 destroy = 1; 236 destroy = 1;
232 } 237 }
233 else if (IS_ARMOR (op)) 238 else if (op->is_armor ())
234 { 239 {
235 op->stats.ac--; 240 op->stats.ac--;
236 if (op->stats.ac < 0) 241 if (op->stats.ac < 0)
237 destroy = 1; 242 destroy = 1;
238 } 243 }
239 else if (op->type == FOOD) 244 else if (op->type == FOOD)
240 { 245 {
241 op->stats.food -= rndm (5, 20); 246 op->stats.food -= rndm (5, 20);
242 if (op->stats.food < 0) 247 if (op->stats.food < 0)
243 destroy = 1; 248 destroy = 1;
244 } 249 }
245 else 250 else
246 { 251 {
247 if (op->material & M_PAPER || op->material & M_LEATHER || 252 int mat = op->material;
248 op->material & M_WOOD || op->material & M_ORGANIC || op->material & M_CLOTH || op->material & M_LIQUID) 253
254 if (mat & M_PAPER
255 || mat & M_LEATHER
256 || mat & M_WOOD
257 || mat & M_ORGANIC
258 || mat & M_CLOTH
259 || mat & M_LIQUID
260 || (mat & M_IRON && rndm (1, 5) == 1)
261 || (mat & M_GLASS && rndm (1, 2) == 1)
262 || ((mat & M_STONE || mat & M_ADAMANT) && rndm (1, 10) == 1)
263 || ((mat & M_SOFT_METAL || mat & M_BONE) && rndm (1, 3) == 1)
264 || (mat & M_ICE && temp > 32))
249 destroy = 1; 265 destroy = 1;
250 if (op->material & M_IRON && rndm (1, 5) == 1)
251 destroy = 1;
252 if (op->material & M_GLASS && rndm (1, 2) == 1)
253 destroy = 1;
254 if ((op->material & M_STONE || op->material & M_ADAMANT) && rndm (1, 10) == 1)
255 destroy = 1;
256 if ((op->material & M_SOFT_METAL || op->material & M_BONE) && rndm (1, 3) == 1)
257 destroy = 1;
258 if (op->material & M_ICE && MAP_TEMP (m) > 32)
259 destroy = 1;
260 } 266 }
267
261 /* adjust overall chance below */ 268 /* adjust overall chance below */
262 if (destroy && rndm (0, 1)) 269 if (destroy && rndm (0, 1))
263 { 270 op->destroy ();
264 remove_ob (op);
265 free_object (op);
266 }
267 } 271 }
268} 272}
269 273
270/* convert materialname to materialtype_t */ 274/* convert materialname to materialtype_t */
271 275
272materialtype_t * 276materialtype_t *
… …
300 return; 304 return;
301 305
302 if (change->materialname != NULL && strcmp (op->materialname, change->materialname)) 306 if (change->materialname != NULL && strcmp (op->materialname, change->materialname))
303 return; 307 return;
304 308
305 if (!IS_ARMOR (op)) 309 if (!op->is_armor ())
306 return; 310 return;
307 311
308 mt = name_to_material (op->materialname); 312 mt = name_to_material (op->materialname);
309 if (!mt) 313 if (!mt)
310 { 314 {
… …
356 { 360 {
357 if (op->material & mt->material && rndm (1, 100) <= mt->chance && 361 if (op->material & mt->material && rndm (1, 100) <= mt->chance &&
358 difficulty >= mt->difficulty && (op->magic >= mt->magic || mt->magic == 0)) 362 difficulty >= mt->difficulty && (op->magic >= mt->magic || mt->magic == 0))
359 { 363 {
360 lmt = mt; 364 lmt = mt;
361 if (!(IS_WEAPON (op) || IS_ARMOR (op))) 365 if (!(op->is_weapon () || op->is_armor ()))
362 break; 366 break;
363 } 367 }
364 } 368 }
365#endif 369#endif
366 } 370 }
… …
374#ifndef NEW_MATERIAL_CODE 378#ifndef NEW_MATERIAL_CODE
375 op->materialname = lmt->name; 379 op->materialname = lmt->name;
376 return; 380 return;
377#else 381#else
378 382
379 if (op->stats.dam && IS_WEAPON (op)) 383 if (op->stats.dam && op->is_weapon ())
380 { 384 {
381 op->stats.dam += lmt->damage; 385 op->stats.dam += lmt->damage;
382 if (op->stats.dam < 1) 386 if (op->stats.dam < 1)
383 op->stats.dam = 1; 387 op->stats.dam = 1;
384 } 388 }
385 if (op->stats.sp && op->type == BOW) 389 if (op->stats.sp && op->type == BOW)
386 op->stats.sp += lmt->sp; 390 op->stats.sp += lmt->sp;
387 if (op->stats.wc && IS_WEAPON (op)) 391 if (op->stats.wc && op->is_weapon ())
388 op->stats.wc += lmt->wc; 392 op->stats.wc += lmt->wc;
389 if (IS_ARMOR (op)) 393 if (op->is_armor ())
390 { 394 {
391 if (op->stats.ac) 395 if (op->stats.ac)
392 op->stats.ac += lmt->ac; 396 op->stats.ac += lmt->ac;
393 for (j = 0; j < NROFATTACKS; j++) 397 for (j = 0; j < NROFATTACKS; j++)
394 if (op->resist[j] != 0) 398 if (op->resist[j] != 0)
… …
400 op->resist[j] = -100; 404 op->resist[j] = -100;
401 } 405 }
402 } 406 }
403 op->materialname = add_string (lmt->name); 407 op->materialname = add_string (lmt->name);
404 /* dont make it unstackable if it doesn't need to be */ 408 /* dont make it unstackable if it doesn't need to be */
405 if (IS_WEAPON (op) || IS_ARMOR (op)) 409 if (op->is_weapon () || op->is_armor ())
406 { 410 {
407 op->weight = (op->weight * lmt->weight) / 100; 411 op->weight = (op->weight * lmt->weight) / 100;
408 op->value = (op->value * lmt->value) / 100; 412 op->value = (op->value * lmt->value) / 100;
409 } 413 }
410#endif 414#endif
… …
543 strcpy (input, tmp); 547 strcpy (input, tmp);
544 548
545 return; 549 return;
546} 550}
547 551
552/////////////////////////////////////////////////////////////////////////////
553
554void
555fork_abort (const char *msg)
556{
557 if (!fork ())
558 {
559 signal (SIGABRT, SIG_DFL);
560 abort ();
561 }
562
563 LOG (llevError, "fork abort: %s\n", msg);
564}
565
548void *alloc (int s) throw (std::bad_alloc) 566void *salloc_ (int n) throw (std::bad_alloc)
549{ 567{
550 void *p = g_slice_alloc (s); 568 void *ptr = g_slice_alloc (n);
551 569
552 if (!p) 570 if (!ptr)
553 throw std::bad_alloc (); 571 throw std::bad_alloc ();
554 572
555 return p; 573 return ptr;
574}
575
576void *salloc_ (int n, void *src) throw (std::bad_alloc)
577{
578 void *ptr = salloc_ (n);
579
580 if (src)
581 memcpy (ptr, src, n);
582 else
583 memset (ptr, 0, n);
584
585 return ptr;
556} 586}
557 587
558void assign (char *dst, const char *src, int maxlen) 588void assign (char *dst, const char *src, int maxlen)
559{ 589{
560 if (!src) 590 if (!src)
… …
577 } 607 }
578 else 608 else
579 memcpy (dst, src, len + 1); 609 memcpy (dst, src, len + 1);
580} 610}
581 611
612tstamp now ()
613{
614 struct timeval tv;
615
616 gettimeofday (&tv, 0);
617 return tstamp (tv.tv_sec) + tstamp (tv.tv_usec) * tstamp (1e-6);
618}
619
620int
621similar_direction (int a, int b)
622{
623 if (!a || !b)
624 return 0;
625
626 int diff = (b - a) & 7;
627 return diff <= 1 || diff >= 7;
628}
629

Diff Legend

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