1 | /* |
1 | /* |
2 | * CrossFire, A Multiplayer game for X-windows |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (C) 2002 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2002 Mark Wedel & Crossfire Development Team |
6 | * Copyright (C) 1992 Frank Tore Johansen |
6 | * Copyright (©) 1992 Frank Tore Johansen |
7 | * |
7 | * |
8 | * This program is free software; you can redistribute it and/or modify |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
9 | * it under the terms of the GNU General Public License as published by |
9 | * the terms of the Affero GNU General Public License as published by the |
10 | * the Free Software Foundation; either version 2 of the License, or |
10 | * Free Software Foundation, either version 3 of the License, or (at your |
11 | * (at your option) any later version. |
11 | * option) any later version. |
12 | * |
12 | * |
13 | * This program is distributed in the hope that it will be useful, |
13 | * This program is distributed in the hope that it will be useful, |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
16 | * GNU General Public License for more details. |
16 | * GNU General Public License for more details. |
17 | * |
17 | * |
18 | * You should have received a copy of the GNU General Public License |
18 | * You should have received a copy of the Affero GNU General Public License |
19 | * along with this program; if not, write to the Free Software |
19 | * and the GNU General Public License along with this program. If not, see |
20 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
20 | * <http://www.gnu.org/licenses/>. |
21 | * |
21 | * |
22 | * The authors can be reached via e-mail at <crossfire@schmorp.de> |
22 | * The authors can be reached via e-mail to <support@deliantra.net> |
23 | */ |
23 | */ |
24 | |
24 | |
25 | #define EXTERN // horrible hack |
25 | #define EXTERN // horrible hack |
26 | |
26 | |
27 | #include <global.h> |
27 | #include <global.h> |
28 | #include <object.h> |
28 | #include <object.h> |
|
|
29 | |
|
|
30 | dynbuf_text msg_dynbuf (65536, 65536); |
29 | |
31 | |
30 | extern const char *const attacktype_desc[NROFATTACKS] = { |
32 | extern const char *const attacktype_desc[NROFATTACKS] = { |
31 | # define def(uc, lc, name, plus, change) # name, |
33 | # define def(uc, lc, name, plus, change) # name, |
32 | # include "attackinc.h" |
34 | # include "attackinc.h" |
33 | # undef def |
35 | # undef def |
… | |
… | |
70 | NULL, /* argv */ |
72 | NULL, /* argv */ |
71 | CONFDIR, |
73 | CONFDIR, |
72 | DATADIR, |
74 | DATADIR, |
73 | LOCALDIR, |
75 | LOCALDIR, |
74 | PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, |
76 | PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, |
75 | UNIQUE_DIR, TEMPLATE_DIR, |
77 | UNIQUE_DIR, "", |
76 | TMPDIR, |
78 | TMPDIR, |
|
|
79 | PK_LUCK_PENALTY, |
77 | STAT_LOSS_ON_DEATH, |
80 | STAT_LOSS_ON_DEATH, |
78 | PK_LUCK_PENALTY, |
|
|
79 | PERMANENT_EXPERIENCE_RATIO, |
81 | PERMANENT_EXPERIENCE_RATIO, |
80 | DEATH_PENALTY_RATIO, |
82 | DEATH_PENALTY_RATIO, |
81 | DEATH_PENALTY_LEVEL, |
83 | DEATH_PENALTY_LEVEL, |
82 | BALANCED_STAT_LOSS, |
84 | BALANCED_STAT_LOSS, |
83 | NOT_PERMADETH, |
85 | NOT_PERMADETH, |
84 | SIMPLE_EXP, |
86 | SIMPLE_EXP, |
85 | RESET_LOCATION_TIME, |
|
|
86 | SET_TITLE, |
87 | SET_TITLE, |
87 | RESURRECTION, |
88 | RESURRECTION, |
88 | SEARCH_ITEMS, |
89 | SEARCH_ITEMS, |
89 | SPELL_ENCUMBRANCE, |
90 | SPELL_ENCUMBRANCE, |
90 | SPELL_FAILURE_EFFECTS, |
91 | SPELL_FAILURE_EFFECTS, |
91 | CASTING_TIME, |
92 | SET_FRIENDLY_FIRE, |
92 | REAL_WIZ, |
93 | 0, |
|
|
94 | 0, |
93 | EXPLORE_MODE, |
95 | EXPLORE_MODE, |
94 | SPELLPOINT_LEVEL_DEPEND, |
96 | SPELLPOINT_LEVEL_DEPEND, |
95 | SET_FRIENDLY_FIRE, |
|
|
96 | MOTD, |
|
|
97 | "rules", |
|
|
98 | "news", |
|
|
99 | "", /* DM_MAIL */ |
|
|
100 | 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */ |
|
|
101 | 0, |
97 | 0, |
102 | 1.0, |
98 | 1.0, |
103 | |
99 | |
104 | /* Armor enchantment stuff */ |
100 | /* Armor enchantment stuff */ |
105 | ARMOR_MAX_ENCHANT, |
101 | ARMOR_MAX_ENCHANT, |
106 | ARMOR_WEIGHT_REDUCTION, |
102 | ARMOR_WEIGHT_REDUCTION, |
107 | ARMOR_WEIGHT_LINEAR, |
103 | ARMOR_WEIGHT_LINEAR, |
108 | ARMOR_SPEED_IMPROVEMENT, |
104 | ARMOR_SPEED_IMPROVEMENT, |
109 | ARMOR_SPEED_LINEAR, |
105 | ARMOR_SPEED_LINEAR, |
110 | 1, /* no_player_stealing */ |
|
|
111 | 1, /* create_home_portals */ |
|
|
112 | }; |
106 | }; |
113 | |
107 | |
114 | /* perhaps not the best place for this, but needs to be |
108 | /* perhaps not the best place for this, but needs to be |
115 | * in some file in the common area so that standalone |
109 | * in some file in the common area so that standalone |
116 | * programs, like the random map generator, can be built. |
110 | * programs, like the random map generator, can be built. |
… | |
… | |
136 | "Wounding", |
130 | "Wounding", |
137 | "Death", |
131 | "Death", |
138 | "Light" |
132 | "Light" |
139 | }; |
133 | }; |
140 | |
134 | |
141 | /* |
|
|
142 | * It is vital that init_library() is called by any functions |
|
|
143 | * using this library. |
|
|
144 | * If you want to lessen the size of the program using the library, |
|
|
145 | * you can replace the call to init_library() with init_globals() and |
|
|
146 | * init_function_pointers(). Good idea to also call init_vars and |
|
|
147 | * init_hash_table if you are doing any object loading. |
|
|
148 | */ |
|
|
149 | void |
|
|
150 | init_library (void) |
|
|
151 | { |
|
|
152 | init_globals (); |
|
|
153 | init_block (); |
|
|
154 | ReadBmapNames (); |
|
|
155 | ReadSmooth (); |
|
|
156 | init_anim (); /* Must be after we read in the bitmaps */ |
|
|
157 | init_archetypes (); /* Reads all archetypes from file */ |
|
|
158 | init_dynamic (); |
|
|
159 | init_attackmess (); |
|
|
160 | init_clocks (); |
|
|
161 | init_experience (); |
|
|
162 | } |
|
|
163 | |
|
|
164 | |
|
|
165 | /* init_environ initialises values from the environmental variables. |
135 | /* init_environ initialises values from the environmental variables. |
166 | * it needs to be called very early, since command line options should |
136 | * it needs to be called very early, since command line options should |
167 | * overwrite these if specified. |
137 | * overwrite these if specified. |
168 | */ |
138 | */ |
169 | void |
139 | void |
170 | init_environ (void) |
140 | init_environ () |
171 | { |
141 | { |
172 | char *cp; |
142 | const char *cp; |
173 | |
143 | |
174 | cp = getenv ("CROSSFIRE_LIBDIR"); |
144 | if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp; |
175 | if (cp) |
145 | if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; |
176 | settings.datadir = cp; |
146 | if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp; |
177 | cp = getenv ("CROSSFIRE_LOCALDIR"); |
147 | if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp; |
178 | if (cp) |
148 | if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp; |
179 | settings.localdir = cp; |
149 | if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp; |
180 | cp = getenv ("CROSSFIRE_PLAYERDIR"); |
150 | if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp; |
181 | if (cp) |
151 | if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp; |
182 | settings.playerdir = cp; |
152 | if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp; |
183 | cp = getenv ("CROSSFIRE_MAPDIR"); |
153 | if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp; |
184 | if (cp) |
154 | |
185 | settings.mapdir = cp; |
155 | if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp; |
186 | cp = getenv ("CROSSFIRE_ARCHETYPES"); |
|
|
187 | if (cp) |
|
|
188 | settings.archetypes = cp; |
|
|
189 | cp = getenv ("CROSSFIRE_TREASURES"); |
|
|
190 | if (cp) |
|
|
191 | settings.treasures = cp; |
|
|
192 | cp = getenv ("CROSSFIRE_UNIQUEDIR"); |
|
|
193 | if (cp) |
|
|
194 | settings.uniquedir = cp; |
|
|
195 | cp = getenv ("CROSSFIRE_TEMPLATEDIR"); |
|
|
196 | if (cp) |
|
|
197 | settings.templatedir = cp; |
|
|
198 | cp = getenv ("CROSSFIRE_TMPDIR"); |
|
|
199 | if (cp) |
|
|
200 | settings.tmpdir = cp; |
|
|
201 | } |
156 | } |
202 | |
157 | |
203 | /* |
158 | /* |
204 | * Initialises all global variables. |
159 | * Initialises all global variables. |
205 | * Might use environment-variables as default for some of them. |
160 | * Might use environment-variables as default for some of them. |
206 | */ |
161 | */ |
207 | void |
162 | void |
208 | init_globals (void) |
163 | init_globals () |
209 | { |
164 | { |
210 | if (settings.logfilename[0] == 0) |
165 | if (settings.logfilename[0] == 0) |
211 | logfile = stderr; |
166 | log_setfd (-1); |
212 | else if ((logfile = fopen (settings.logfilename, "a")) == NULL) |
167 | else |
213 | { |
168 | { |
|
|
169 | int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666); |
|
|
170 | |
|
|
171 | if (logfd >= 0) |
|
|
172 | log_setfd (logfd); |
|
|
173 | else |
|
|
174 | { |
|
|
175 | log_setfd (-1); |
214 | fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); |
176 | LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename); |
215 | logfile = stderr; |
177 | } |
216 | } |
178 | } |
217 | else |
|
|
218 | setvbuf (logfile, NULL, _IOLBF, 0); |
|
|
219 | } |
179 | } |
220 | |
180 | |
221 | void |
181 | void |
222 | init_dynamic (void) |
182 | init_dynamic () |
223 | { |
183 | { |
224 | archetype *at = first_archetype; |
184 | first_map_ext_path = "/start/HallsOfSelection"; |
225 | |
185 | first_map_path = "/HallOfSelection"; |
226 | while (at) |
|
|
227 | { |
|
|
228 | if (at->clone.type == MAP) |
|
|
229 | { |
|
|
230 | if (at->clone.race) |
|
|
231 | first_map_ext_path = at->clone.race; |
|
|
232 | |
|
|
233 | if (EXIT_PATH (&at->clone)) |
|
|
234 | { |
|
|
235 | first_map_path = EXIT_PATH (&at->clone); |
|
|
236 | return; |
|
|
237 | } |
|
|
238 | } |
|
|
239 | |
|
|
240 | at = at->next; |
|
|
241 | } |
|
|
242 | |
|
|
243 | LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n"); |
|
|
244 | exit (-1); |
|
|
245 | } |
|
|
246 | |
|
|
247 | unsigned long todtick; |
|
|
248 | |
|
|
249 | /* |
|
|
250 | * Write out the current time to the file so time does not |
|
|
251 | * reset every time the server reboots. |
|
|
252 | */ |
|
|
253 | void |
|
|
254 | write_todclock (void) |
|
|
255 | { |
|
|
256 | char filename[MAX_BUF]; |
|
|
257 | FILE *fp; |
|
|
258 | |
|
|
259 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
260 | if ((fp = fopen (filename, "w")) == NULL) |
|
|
261 | { |
|
|
262 | LOG (llevError, "Cannot open %s for writing\n", filename); |
|
|
263 | return; |
|
|
264 | } |
|
|
265 | fprintf (fp, "%lu", todtick); |
|
|
266 | fclose (fp); |
|
|
267 | } |
|
|
268 | |
|
|
269 | /* |
|
|
270 | * initialises the gametime and TOD counters |
|
|
271 | * Called by init_library(). |
|
|
272 | */ |
|
|
273 | void |
|
|
274 | init_clocks (void) |
|
|
275 | { |
|
|
276 | char filename[MAX_BUF]; |
|
|
277 | FILE *fp; |
|
|
278 | static int has_been_done = 0; |
|
|
279 | |
|
|
280 | if (has_been_done) |
|
|
281 | return; |
|
|
282 | else |
|
|
283 | has_been_done = 1; |
|
|
284 | |
|
|
285 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
286 | LOG (llevDebug, "Reading clockdata from %s...\n", filename); |
|
|
287 | if ((fp = fopen (filename, "r")) == NULL) |
|
|
288 | { |
|
|
289 | LOG (llevError, "Can't open %s.\n", filename); |
|
|
290 | todtick = 0; |
|
|
291 | write_todclock (); |
|
|
292 | return; |
|
|
293 | } |
|
|
294 | |
|
|
295 | fscanf (fp, "%lu", &todtick); |
|
|
296 | LOG (llevDebug, "todtick=%lu\n", todtick); |
|
|
297 | fclose (fp); |
|
|
298 | } |
186 | } |
299 | |
187 | |
300 | /* |
188 | /* |
301 | * initialises the attack messages. |
189 | * initialises the attack messages. |
302 | * Called by init_library(). |
190 | * Called by init_library(). |
303 | */ |
191 | */ |
304 | |
192 | |
305 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
193 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
306 | |
194 | |
307 | void |
195 | void |
308 | init_attackmess (void) |
196 | init_attackmess () |
309 | { |
197 | { |
310 | char buf[MAX_BUF]; |
198 | object_thawer thawer (settings.datadir, "attackmess"); |
311 | char filename[MAX_BUF]; |
|
|
312 | char *cp, *p; |
|
|
313 | FILE *fp; |
|
|
314 | static int has_been_done = 0; |
|
|
315 | int mess, level, comp; |
|
|
316 | int mode = 0, total = 0; |
|
|
317 | |
199 | |
318 | if (has_been_done) |
200 | if (!thawer) |
319 | return; |
|
|
320 | else |
|
|
321 | has_been_done = 1; |
|
|
322 | |
|
|
323 | sprintf (filename, "%s/attackmess", settings.datadir); |
|
|
324 | LOG (llevDebug, "Reading attack messages from %s...\n", filename); |
|
|
325 | if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) |
|
|
326 | { |
201 | { |
327 | LOG (llevError, "Can't open %s.\n", filename); |
202 | LOG (llevError, "Can't open %s.\n", thawer.name); |
328 | return; |
203 | return; |
329 | } |
204 | } |
330 | |
205 | |
331 | level = 0; |
206 | int msgnum = -1; |
332 | while (fgets (buf, MAX_BUF, fp) != NULL) |
207 | int total = 0; |
|
|
208 | |
|
|
209 | while (thawer.kw) |
333 | { |
210 | { |
334 | if (*buf == '#') |
211 | if (thawer.kw != KW_type) |
335 | continue; |
212 | if (!thawer.parse_error ("attackmess file")) |
336 | if ((cp = strchr (buf, '\n')) != NULL) |
213 | break; |
337 | *cp = '\0'; |
|
|
338 | cp = buf; |
|
|
339 | while (*cp == ' ') /* Skip blanks */ |
|
|
340 | cp++; |
|
|
341 | |
214 | |
342 | if (strncmp (cp, "TYPE:", 5) == 0) |
215 | thawer.get (msgnum); |
|
|
216 | thawer.next (); |
|
|
217 | |
|
|
218 | int level = 0; |
|
|
219 | |
|
|
220 | while (thawer.kw == KW_hp) |
343 | { |
221 | { |
344 | p = strtok (buf, ":"); |
222 | // our old friend, dog-slow sscanf |
345 | p = strtok (NULL, ":"); |
223 | int hp; |
346 | if (mode == 1) |
224 | char buf1[1024]; |
|
|
225 | char buf2[1024]; |
|
|
226 | char buf3[1024]; |
|
|
227 | |
|
|
228 | if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]", |
|
|
229 | &hp, buf1, buf2, buf3)) |
|
|
230 | thawer.parse_error ("attackmess file"); |
|
|
231 | else |
347 | { |
232 | { |
|
|
233 | if (*buf2 == '-') |
|
|
234 | *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker |
|
|
235 | |
348 | attack_mess[mess][level].level = -1; |
236 | attack_mess[msgnum][level].level = hp; |
349 | attack_mess[mess][level].buf1 = NULL; |
237 | attack_mess[msgnum][level].buf1 = strdup (buf1); |
350 | attack_mess[mess][level].buf2 = NULL; |
238 | attack_mess[msgnum][level].buf2 = strdup (buf2); |
351 | attack_mess[mess][level].buf3 = NULL; |
239 | attack_mess[msgnum][level].buf3 = strdup (buf3); |
|
|
240 | |
|
|
241 | ++level; |
|
|
242 | ++total; |
352 | } |
243 | } |
353 | level = 0; |
244 | |
354 | mess = atoi (p); |
245 | thawer.next (); |
355 | mode = 1; |
|
|
356 | continue; |
|
|
357 | } |
246 | } |
358 | if (mode == 1) |
247 | |
359 | { |
|
|
360 | p = strtok (buf, "="); |
|
|
361 | attack_mess[mess][level].level = atoi (buf); |
248 | attack_mess[msgnum][level].level = -1; |
362 | p = strtok (NULL, "="); |
|
|
363 | if (p != NULL) |
|
|
364 | attack_mess[mess][level].buf1 = strdup (p); |
249 | attack_mess[msgnum][level].buf1 = 0; |
365 | else |
|
|
366 | attack_mess[mess][level].buf1 = strdup (""); |
|
|
367 | mode = 2; |
|
|
368 | continue; |
|
|
369 | } |
|
|
370 | else if (mode == 2) |
|
|
371 | { |
|
|
372 | p = strtok (buf, "="); |
|
|
373 | attack_mess[mess][level].level = atoi (buf); |
|
|
374 | p = strtok (NULL, "="); |
|
|
375 | if (p != NULL) |
|
|
376 | attack_mess[mess][level].buf2 = strdup (p); |
250 | attack_mess[msgnum][level].buf2 = 0; |
377 | else |
|
|
378 | attack_mess[mess][level].buf2 = strdup (""); |
|
|
379 | mode = 3; |
|
|
380 | continue; |
|
|
381 | } |
|
|
382 | else if (mode == 3) |
|
|
383 | { |
|
|
384 | p = strtok (buf, "="); |
|
|
385 | attack_mess[mess][level].level = atoi (buf); |
|
|
386 | p = strtok (NULL, "="); |
|
|
387 | if (p != NULL) |
|
|
388 | attack_mess[mess][level].buf3 = strdup (p); |
251 | attack_mess[msgnum][level].buf3 = 0; |
389 | else |
|
|
390 | attack_mess[mess][level].buf3 = strdup (""); |
|
|
391 | mode = 1; |
|
|
392 | level++; |
|
|
393 | total++; |
|
|
394 | continue; |
|
|
395 | } |
|
|
396 | } |
252 | } |
|
|
253 | |
397 | LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); |
254 | LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1); |
398 | close_and_delete (fp, comp); |
|
|
399 | } |
255 | } |
|
|
256 | |