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

Comparing deliantra/server/common/compat.C (file contents):
Revision 1.8 by root, Sun Apr 4 04:59:20 2010 UTC vs.
Revision 1.19 by root, Sat Nov 17 23:40:00 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 (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
4 * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 5 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team 6 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992 Frank Tore Johansen 7 * Copyright (©) 1992 Frank Tore Johansen
7 * 8 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 9 * Deliantra is free software: you can redistribute it and/or modify it under
9 * the terms of the Affero GNU General Public License as published by the 10 * the terms of the Affero GNU General Public License as published by the
10 * Free Software Foundation, either version 3 of the License, or (at your 11 * Free Software Foundation, either version 3 of the License, or (at your
11 * option) any later version. 12 * option) any later version.
12 * 13 *
13 * This program is distributed in the hope that it will be useful, 14 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 17 * GNU General Public License for more details.
17 * 18 *
18 * You should have received a copy of the Affero GNU General Public License 19 * You should have received a copy of the Affero GNU General Public License
19 * and the GNU General Public License along with this program. If not, see 20 * and the GNU General Public License along with this program. If not, see
20 * <http://www.gnu.org/licenses/>. 21 * <http://www.gnu.org/licenses/>.
21 * 22 *
22 * The authors can be reached via e-mail to <support@deliantra.net> 23 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 24 */
24 25
25/* 26/*
26 * compatibility functions for older (GPL) source code parts 27 * compatibility functions for older (GPL) source code parts
34 35
35#include <global.h> 36#include <global.h>
36#include "define.h" 37#include "define.h"
37#include "path.h" 38#include "path.h"
38 39
39
40/* buf_overflow() - we don't want to exceed the buffer size of 40/* buf_overflow() - we don't want to exceed the buffer size of
41 * buf1 by adding on buf2! Returns true if overflow will occur. 41 * buf1 by adding on buf2! Returns true if overflow will occur.
42 */ 42 */
43int 43int
44buf_overflow (const char *buf1, const char *buf2, int bufsize) 44buf_overflow (const char *buf1, const char *buf2, int bufsize)
45{ 45{
53 53
54 if ((len1 + len2) >= bufsize) 54 if ((len1 + len2) >= bufsize)
55 return 1; 55 return 1;
56 56
57 return 0; 57 return 0;
58}
59
60/////////////////////////////////////////////////////////////////////////////
61
62/*
63 * fatal() is meant to be called whenever a fatal signal is intercepted.
64 * It will call the emergency_save and the clean_tmp_files functions.
65 */
66//TODO: only one caller left
67void
68fatal (const char *msg)
69{
70 LOG (llevError, "FATAL: %s\n", msg);
71 cleanup (msg, 1);
72} 58}
73 59
74///////////////////////////////////////////////////////////////////////////// 60/////////////////////////////////////////////////////////////////////////////
75 61
76/* 62/*
87 * and if goodbad is non-zero, luck increases the roll, if zero, it decreases. 73 * and if goodbad is non-zero, luck increases the roll, if zero, it decreases.
88 * Generally, op should be the player/caster/hitter requesting the roll, 74 * Generally, op should be the player/caster/hitter requesting the roll,
89 * not the recipient (ie, the poor slob getting hit). [garbled 20010916] 75 * not the recipient (ie, the poor slob getting hit). [garbled 20010916]
90 */ 76 */
91int 77int
92random_roll (int r_min, int r_max, const object *op, int goodbad) 78random_roll (int r_min, int r_max, const object *op, bool prefer_high)
93{ 79{
94 r_max = max (r_min, r_max); 80 if (r_min > r_max)
81 swap (r_min, r_max);
95 82
83 int range = r_max - r_min + 1;
84 int num = rndm (r_min, r_max);
85
86 if (op->stats.luck)
87 {
96 int base = r_max - r_min > 1 ? 20 : 50; /* d2 and d3 are corner cases */ 88 int base = range > 2 ? 20 : 50; /* d2 and d3 are corner cases */
97 89
98 if (op->type == PLAYER)
99 {
100 int luck = op->stats.luck;
101
102 if (rndm (base) < min (10, abs (luck))) 90 if (rndm (base) < min (10, abs (op->stats.luck)))
103 {
104 //TODO: take luck into account
105 } 91 {
106 } 92 // we have a winner, increase/decrease number by one accordingly
93 int adjust = sign (op->stats.luck);
107 94
108 return rndm (r_min, r_max); 95 if (!prefer_high)
96 adjust = -adjust;
97
98 num = clamp (num + adjust, r_min, r_max);
99 }
100 }
101
102 return num;
109} 103}
110 104
111/* 105/*
112 * This is a 64 bit version of random_roll above. This is needed 106 * This is a 64 bit version of random_roll above. This is needed
113 * for exp loss calculations for players changing religions. 107 * for exp loss calculations for players changing religions.
114 */ 108 */
115sint64 109sint64
116random_roll64 (sint64 r_min, sint64 r_max, const object *op, int goodbad) 110random_roll64 (sint64 r_min, sint64 r_max, const object *op, bool prefer_high)
117{ 111{
118 sint64 omin = r_min; 112 if (r_min > r_max)
113 swap (r_min, r_max);
114
119 sint64 range = max (0, r_max - r_min + 1); 115 sint64 range = r_max - r_min + 1;
120 int base = range > 2 ? 20 : 50; /* d2 and d3 are corner cases */
121
122 /* 116 /*
123 * Make a call to get two 32 bit unsigned random numbers, and just to 117 * Make a call to get two 32 bit unsigned random numbers, and just do
124 * a little bitshifting. 118 * a little bitshifting.
125 */ 119 */
126 sint64 ran = (sint64) rndm.next () ^ ((sint64) rndm.next () << 31); 120 sint64 num = rndm.next () ^ (sint64 (rndm.next ()) << 31);
127 121
128 if (op->type != PLAYER) 122 num = num % range + r_min;
129 return ((ran % range) + r_min);
130 123
131 int luck = op->stats.luck; 124 if (op->stats.luck)
125 {
126 int base = range > 2 ? 20 : 50; /* d2 and d3 are corner cases */
132 127
133 if (rndm (base) < min (10, abs (luck))) 128 if (rndm (base) < min (10, abs (op->stats.luck)))
129 {
130 // we have a winner, increase/decrease number by one accordingly
131 int adjust = sign (op->stats.luck);
132
133 if (!prefer_high)
134 adjust = -adjust;
135
136 num = clamp (num + adjust, r_min, r_max);
137 }
134 { 138 }
135 /* we have a winner */
136 ((luck > 0) ? (luck = 1) : (luck = -1));
137 range -= luck;
138 if (range < 1)
139 return (omin); /*check again */
140 139
141 ((goodbad) ? (r_min += luck) : (range)); 140 return num;
142
143 return (max (omin, min (r_max, (ran % range) + r_min)));
144 }
145
146 return ran % range + r_min;
147} 141}
148 142
149/* 143/*
150 * Roll a number of dice (2d3, 4d6). Uses op to determine luck, 144 * Roll a number of dice (2d3, 4d6). Uses op to determine luck,
151 * If goodbad is non-zero, luck increases the roll, if zero, it decreases. 145 * If goodbad is non-zero, luck increases the roll, if zero, it decreases.
152 * Generally, op should be the player/caster/hitter requesting the roll, 146 * Generally, op should be the player/caster/hitter requesting the roll,
153 * not the recipient (ie, the poor slob getting hit). 147 * not the recipient (ie, the poor slob getting hit).
154 * The args are num D size (ie 4d6) [garbled 20010916] 148 * The args are num D size (ie 4d6) [garbled 20010916]
155 */ 149 */
156int 150int
157die_roll (int num, int size, const object *op, int goodbad) 151die_roll (int num, int size, const object *op, bool prefer_high)
158{ 152{
159 int min_roll, luck, total, i, gotlucky; 153 int min_roll, luck, total, i, gotlucky;
160 154
161 int diff = size; 155 int diff = size;
162 min_roll = 1; 156 min_roll = 1;
163 luck = total = gotlucky = 0; 157 luck = total = gotlucky = 0;
164 int base = diff > 2 ? 20 : 50; /* d2 and d3 are corner cases */ 158 int base = diff > 2 ? 20 : 50; /* d2 and d3 are corner cases */
165 159
166 if (size < 2 || diff < 1) 160 if (size < 2 || diff < 1)
167 { 161 {
168 LOG (llevError, "Calling die_roll with num=%d size=%d\n", num, size); 162 LOG (llevError | logBacktrace, "Calling die_roll with num=%d size=%d\n", num, size);
169 return num; /* avoids a float exception */ 163 return num; /* avoids a float exception */
170 } 164 }
171 165
172 if (op->type == PLAYER) 166 if (op->type == PLAYER)
173 luck = op->stats.luck; 167 luck = op->stats.luck;
180 gotlucky++; 174 gotlucky++;
181 ((luck > 0) ? (luck = 1) : (luck = -1)); 175 ((luck > 0) ? (luck = 1) : (luck = -1));
182 diff -= luck; 176 diff -= luck;
183 if (diff < 1) 177 if (diff < 1)
184 return (num); /*check again */ 178 return (num); /*check again */
185 ((goodbad) ? (min_roll += luck) : (diff)); 179 ((prefer_high) ? (min_roll += luck) : (diff));
186 total += max (1, min (size, rndm (diff) + min_roll)); 180 total += max (1, min (size, rndm (diff) + min_roll));
187 } 181 }
188 else 182 else
189 total += rndm (size) + 1; 183 total += rndm (size) + 1;
190 } 184 }
308 path = path_combine (src, dst); 302 path = path_combine (src, dst);
309 path_normalize (path); 303 path_normalize (path);
310 return (path); 304 return (path);
311} 305}
312 306
313/**
314 * open_and_uncompress() first searches for the original filename. If it exist,
315 * then it opens it and returns the file-pointer.
316 */
317FILE *
318open_and_uncompress (const char *name, int flag, int *compressed)
319{
320 *compressed = 0;
321 return fopen (name, "r");
322}
323
324/*
325 * See open_and_uncompress().
326 */
327
328void
329close_and_delete (FILE * fp, int compressed)
330{
331 fclose (fp);
332}
333
334/*
335 * Strip out the media tags from a String.
336 * Warning the input string will contain the result string
337 */
338void
339strip_media_tag (char *message)
340{
341 int in_tag = 0;
342 char *dest;
343 char *src;
344
345 src = dest = message;
346 while (*src != '\0')
347 {
348 if (*src == '[')
349 {
350 in_tag = 1;
351 }
352 else if (in_tag && (*src == ']'))
353 in_tag = 0;
354 else if (!in_tag)
355 {
356 *dest = *src;
357 dest++;
358 }
359 src++;
360 }
361 *dest = '\0';
362}
363
364#define EOL_SIZE (sizeof("\n")-1) 307#define EOL_SIZE (sizeof("\n")-1)
365void 308void
366strip_endline (char *buf) 309strip_endline (char *buf)
367{ 310{
368 if (strlen (buf) < sizeof ("\n")) 311 if (*buf && buf [strlen (buf) - 1] == '\n')
369 {
370 return;
371 }
372 if (!strcmp (buf + strlen (buf) - EOL_SIZE, "\n"))
373 buf[strlen (buf) - EOL_SIZE] = '\0'; 312 buf [strlen (buf) - 1] = '\0';
374} 313}
375 314
376/** 315/**
377 * Replace in string src all occurrences of key by replacement. The resulting 316 * Replace in string src all occurrences of key by replacement. The resulting
378 * string is put into result; at most resultsize characters (including the 317 * string is put into result; at most resultsize characters (including the

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines