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 |
… | |
… | |
55 | * correspond to. |
57 | * correspond to. |
56 | */ |
58 | */ |
57 | struct Settings settings = { |
59 | struct Settings settings = { |
58 | LOGFILE, /* Logfile */ |
60 | LOGFILE, /* Logfile */ |
59 | CSPORT, /* Client/server port */ |
61 | CSPORT, /* Client/server port */ |
60 | |
62 | llevTrace, /* Log level */ |
61 | /* Debug level */ |
|
|
62 | #ifdef DEBUG |
|
|
63 | llevDebug, |
|
|
64 | #else |
|
|
65 | llevInfo, |
|
|
66 | #endif |
|
|
67 | |
|
|
68 | 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */ |
63 | 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */ |
69 | 0, /* argc */ |
64 | 0, /* argc */ |
70 | NULL, /* argv */ |
65 | NULL, /* argv */ |
71 | CONFDIR, |
66 | CONFDIR, |
72 | DATADIR, |
67 | DATADIR, |
73 | LOCALDIR, |
68 | LOCALDIR, |
74 | PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, |
69 | PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, |
75 | UNIQUE_DIR, TEMPLATE_DIR, |
70 | UNIQUE_DIR, "", |
76 | TMPDIR, |
71 | TMPDIR, |
|
|
72 | PK_LUCK_PENALTY, |
77 | STAT_LOSS_ON_DEATH, |
73 | STAT_LOSS_ON_DEATH, |
78 | PK_LUCK_PENALTY, |
|
|
79 | PERMANENT_EXPERIENCE_RATIO, |
74 | PERMANENT_EXPERIENCE_RATIO, |
80 | DEATH_PENALTY_RATIO, |
75 | DEATH_PENALTY_RATIO, |
81 | DEATH_PENALTY_LEVEL, |
76 | DEATH_PENALTY_LEVEL, |
82 | BALANCED_STAT_LOSS, |
77 | BALANCED_STAT_LOSS, |
83 | NOT_PERMADETH, |
78 | NOT_PERMADETH, |
84 | SIMPLE_EXP, |
79 | SIMPLE_EXP, |
85 | RESET_LOCATION_TIME, |
|
|
86 | SET_TITLE, |
80 | SET_TITLE, |
87 | RESURRECTION, |
81 | RESURRECTION, |
88 | SEARCH_ITEMS, |
82 | SEARCH_ITEMS, |
89 | SPELL_ENCUMBRANCE, |
83 | SPELL_ENCUMBRANCE, |
90 | SPELL_FAILURE_EFFECTS, |
84 | SPELL_FAILURE_EFFECTS, |
91 | CASTING_TIME, |
85 | SET_FRIENDLY_FIRE, |
92 | REAL_WIZ, |
86 | 0, |
|
|
87 | 0, |
93 | EXPLORE_MODE, |
88 | EXPLORE_MODE, |
94 | SPELLPOINT_LEVEL_DEPEND, |
89 | 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, |
90 | 0, |
102 | 1.0, |
91 | 1.0, |
103 | |
92 | |
104 | /* Armor enchantment stuff */ |
93 | /* Armor enchantment stuff */ |
105 | ARMOR_MAX_ENCHANT, |
94 | ARMOR_MAX_ENCHANT, |
106 | ARMOR_WEIGHT_REDUCTION, |
95 | ARMOR_WEIGHT_REDUCTION, |
107 | ARMOR_WEIGHT_LINEAR, |
96 | ARMOR_WEIGHT_LINEAR, |
108 | ARMOR_SPEED_IMPROVEMENT, |
97 | ARMOR_SPEED_IMPROVEMENT, |
109 | ARMOR_SPEED_LINEAR, |
98 | ARMOR_SPEED_LINEAR, |
110 | 1, /* no_player_stealing */ |
|
|
111 | 1, /* create_home_portals */ |
|
|
112 | }; |
99 | }; |
113 | |
100 | |
114 | /* perhaps not the best place for this, but needs to be |
101 | /* perhaps not the best place for this, but needs to be |
115 | * in some file in the common area so that standalone |
102 | * in some file in the common area so that standalone |
116 | * programs, like the random map generator, can be built. |
103 | * programs, like the random map generator, can be built. |
… | |
… | |
136 | "Wounding", |
123 | "Wounding", |
137 | "Death", |
124 | "Death", |
138 | "Light" |
125 | "Light" |
139 | }; |
126 | }; |
140 | |
127 | |
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. |
128 | /* init_environ initialises values from the environmental variables. |
166 | * it needs to be called very early, since command line options should |
129 | * it needs to be called very early, since command line options should |
167 | * overwrite these if specified. |
130 | * overwrite these if specified. |
168 | */ |
131 | */ |
169 | void |
132 | void |
170 | init_environ (void) |
133 | init_environ () |
171 | { |
134 | { |
172 | char *cp; |
135 | const char *cp; |
173 | |
136 | |
174 | cp = getenv ("CROSSFIRE_LIBDIR"); |
137 | if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp; |
175 | if (cp) |
138 | if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; |
176 | settings.datadir = cp; |
139 | if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp; |
177 | cp = getenv ("CROSSFIRE_LOCALDIR"); |
140 | if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp; |
178 | if (cp) |
141 | if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp; |
179 | settings.localdir = cp; |
142 | if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp; |
180 | cp = getenv ("CROSSFIRE_PLAYERDIR"); |
143 | if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp; |
181 | if (cp) |
144 | if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp; |
182 | settings.playerdir = cp; |
145 | if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp; |
183 | cp = getenv ("CROSSFIRE_MAPDIR"); |
146 | if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp; |
184 | if (cp) |
|
|
185 | settings.mapdir = 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 | } |
|
|
202 | |
147 | |
|
|
148 | if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp; |
|
|
149 | } |
203 | |
150 | |
204 | /* |
151 | /* |
205 | * Initialises all global variables. |
152 | * Initialises all global variables. |
206 | * Might use environment-variables as default for some of them. |
153 | * Might use environment-variables as default for some of them. |
207 | */ |
154 | */ |
208 | |
|
|
209 | void |
155 | void |
210 | init_globals (void) |
156 | init_globals () |
211 | { |
157 | { |
212 | if (settings.logfilename[0] == 0) |
158 | if (settings.logfilename[0] == 0) |
213 | logfile = stderr; |
159 | log_setfd (-1); |
214 | else if ((logfile = fopen (settings.logfilename, "a")) == NULL) |
160 | else |
215 | { |
161 | { |
|
|
162 | int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666); |
|
|
163 | |
|
|
164 | if (logfd >= 0) |
|
|
165 | log_setfd (logfd); |
|
|
166 | else |
|
|
167 | { |
|
|
168 | log_setfd (-1); |
216 | fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); |
169 | LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename); |
217 | logfile = stderr; |
170 | } |
218 | } |
171 | } |
219 | else |
|
|
220 | setvbuf (logfile, NULL, _IOLBF, 0); |
|
|
221 | } |
172 | } |
222 | |
173 | |
223 | void |
174 | void |
224 | init_dynamic (void) |
175 | init_dynamic () |
225 | { |
176 | { |
226 | archetype *at = first_archetype; |
177 | first_map_ext_path = "/start/HallsOfSelection"; |
227 | |
178 | first_map_path = "/HallOfSelection"; |
228 | while (at) |
|
|
229 | { |
|
|
230 | if (at->clone.type == MAP) |
|
|
231 | { |
|
|
232 | if (at->clone.race) |
|
|
233 | first_map_ext_path = at->clone.race; |
|
|
234 | |
|
|
235 | if (EXIT_PATH (&at->clone)) |
|
|
236 | { |
|
|
237 | first_map_path = EXIT_PATH (&at->clone); |
|
|
238 | return; |
|
|
239 | } |
|
|
240 | } |
|
|
241 | |
|
|
242 | at = at->next; |
|
|
243 | } |
|
|
244 | |
|
|
245 | LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n"); |
|
|
246 | exit (-1); |
|
|
247 | } |
|
|
248 | |
|
|
249 | unsigned long todtick; |
|
|
250 | |
|
|
251 | /* |
|
|
252 | * Write out the current time to the file so time does not |
|
|
253 | * reset every time the server reboots. |
|
|
254 | */ |
|
|
255 | |
|
|
256 | void |
|
|
257 | write_todclock (void) |
|
|
258 | { |
|
|
259 | char filename[MAX_BUF]; |
|
|
260 | FILE *fp; |
|
|
261 | |
|
|
262 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
263 | if ((fp = fopen (filename, "w")) == NULL) |
|
|
264 | { |
|
|
265 | LOG (llevError, "Cannot open %s for writing\n", filename); |
|
|
266 | return; |
|
|
267 | } |
|
|
268 | fprintf (fp, "%lu", todtick); |
|
|
269 | fclose (fp); |
|
|
270 | } |
|
|
271 | |
|
|
272 | /* |
|
|
273 | * initialises the gametime and TOD counters |
|
|
274 | * Called by init_library(). |
|
|
275 | */ |
|
|
276 | |
|
|
277 | void |
|
|
278 | init_clocks (void) |
|
|
279 | { |
|
|
280 | char filename[MAX_BUF]; |
|
|
281 | FILE *fp; |
|
|
282 | static int has_been_done = 0; |
|
|
283 | |
|
|
284 | if (has_been_done) |
|
|
285 | return; |
|
|
286 | else |
|
|
287 | has_been_done = 1; |
|
|
288 | |
|
|
289 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
290 | LOG (llevDebug, "Reading clockdata from %s...\n", filename); |
|
|
291 | if ((fp = fopen (filename, "r")) == NULL) |
|
|
292 | { |
|
|
293 | LOG (llevError, "Can't open %s.\n", filename); |
|
|
294 | todtick = 0; |
|
|
295 | write_todclock (); |
|
|
296 | return; |
|
|
297 | } |
|
|
298 | fscanf (fp, "%lu", &todtick); |
|
|
299 | LOG (llevDebug, "todtick=%lu\n", todtick); |
|
|
300 | fclose (fp); |
|
|
301 | } |
179 | } |
302 | |
180 | |
303 | /* |
181 | /* |
304 | * initialises the attack messages. |
182 | * initialises the attack messages. |
305 | * Called by init_library(). |
183 | * Called by init_library(). |
306 | */ |
184 | */ |
307 | |
185 | |
308 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
186 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
309 | |
187 | |
310 | void |
188 | void |
311 | init_attackmess (void) |
189 | init_attackmess () |
312 | { |
190 | { |
313 | char buf[MAX_BUF]; |
191 | object_thawer thawer (settings.datadir, "attackmess"); |
314 | char filename[MAX_BUF]; |
|
|
315 | char *cp, *p; |
|
|
316 | FILE *fp; |
|
|
317 | static int has_been_done = 0; |
|
|
318 | int mess, level, comp; |
|
|
319 | int mode = 0, total = 0; |
|
|
320 | |
192 | |
321 | if (has_been_done) |
193 | if (!thawer) |
322 | return; |
|
|
323 | else |
|
|
324 | has_been_done = 1; |
|
|
325 | |
|
|
326 | sprintf (filename, "%s/attackmess", settings.datadir); |
|
|
327 | LOG (llevDebug, "Reading attack messages from %s...\n", filename); |
|
|
328 | if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) |
|
|
329 | { |
194 | { |
330 | LOG (llevError, "Can't open %s.\n", filename); |
195 | LOG (llevError, "Can't open %s.\n", thawer.name); |
331 | return; |
196 | return; |
332 | } |
197 | } |
333 | |
198 | |
334 | level = 0; |
199 | int msgnum = -1; |
335 | while (fgets (buf, MAX_BUF, fp) != NULL) |
200 | int total = 0; |
|
|
201 | |
|
|
202 | while (thawer.kw) |
336 | { |
203 | { |
337 | if (*buf == '#') |
204 | if (thawer.kw != KW_type) |
338 | continue; |
205 | if (!thawer.parse_error ("attackmess file")) |
339 | if ((cp = strchr (buf, '\n')) != NULL) |
206 | break; |
340 | *cp = '\0'; |
|
|
341 | cp = buf; |
|
|
342 | while (*cp == ' ') /* Skip blanks */ |
|
|
343 | cp++; |
|
|
344 | |
207 | |
345 | if (strncmp (cp, "TYPE:", 5) == 0) |
208 | thawer.get (msgnum); |
|
|
209 | thawer.next (); |
|
|
210 | |
|
|
211 | int level = 0; |
|
|
212 | |
|
|
213 | while (thawer.kw == KW_hp) |
346 | { |
214 | { |
347 | p = strtok (buf, ":"); |
215 | // our old friend, dog-slow sscanf |
348 | p = strtok (NULL, ":"); |
216 | int hp; |
349 | if (mode == 1) |
217 | char buf1[1024]; |
|
|
218 | char buf2[1024]; |
|
|
219 | char buf3[1024]; |
|
|
220 | |
|
|
221 | if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]", |
|
|
222 | &hp, buf1, buf2, buf3)) |
|
|
223 | thawer.parse_error ("attackmess file"); |
|
|
224 | else |
350 | { |
225 | { |
|
|
226 | if (*buf2 == '-') |
|
|
227 | *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker |
|
|
228 | |
351 | attack_mess[mess][level].level = -1; |
229 | attack_mess[msgnum][level].level = hp; |
352 | attack_mess[mess][level].buf1 = NULL; |
230 | attack_mess[msgnum][level].buf1 = strdup (buf1); |
353 | attack_mess[mess][level].buf2 = NULL; |
231 | attack_mess[msgnum][level].buf2 = strdup (buf2); |
354 | attack_mess[mess][level].buf3 = NULL; |
232 | attack_mess[msgnum][level].buf3 = strdup (buf3); |
|
|
233 | |
|
|
234 | ++level; |
|
|
235 | ++total; |
355 | } |
236 | } |
356 | level = 0; |
237 | |
357 | mess = atoi (p); |
238 | thawer.next (); |
358 | mode = 1; |
|
|
359 | continue; |
|
|
360 | } |
239 | } |
361 | if (mode == 1) |
240 | |
362 | { |
|
|
363 | p = strtok (buf, "="); |
|
|
364 | attack_mess[mess][level].level = atoi (buf); |
241 | attack_mess[msgnum][level].level = -1; |
365 | p = strtok (NULL, "="); |
|
|
366 | if (p != NULL) |
|
|
367 | attack_mess[mess][level].buf1 = strdup (p); |
242 | attack_mess[msgnum][level].buf1 = 0; |
368 | else |
|
|
369 | attack_mess[mess][level].buf1 = strdup (""); |
|
|
370 | mode = 2; |
|
|
371 | continue; |
|
|
372 | } |
|
|
373 | else if (mode == 2) |
|
|
374 | { |
|
|
375 | p = strtok (buf, "="); |
|
|
376 | attack_mess[mess][level].level = atoi (buf); |
|
|
377 | p = strtok (NULL, "="); |
|
|
378 | if (p != NULL) |
|
|
379 | attack_mess[mess][level].buf2 = strdup (p); |
243 | attack_mess[msgnum][level].buf2 = 0; |
380 | else |
|
|
381 | attack_mess[mess][level].buf2 = strdup (""); |
|
|
382 | mode = 3; |
|
|
383 | continue; |
|
|
384 | } |
|
|
385 | else if (mode == 3) |
|
|
386 | { |
|
|
387 | p = strtok (buf, "="); |
|
|
388 | attack_mess[mess][level].level = atoi (buf); |
|
|
389 | p = strtok (NULL, "="); |
|
|
390 | if (p != NULL) |
|
|
391 | attack_mess[mess][level].buf3 = strdup (p); |
244 | attack_mess[msgnum][level].buf3 = 0; |
392 | else |
|
|
393 | attack_mess[mess][level].buf3 = strdup (""); |
|
|
394 | mode = 1; |
|
|
395 | level++; |
|
|
396 | total++; |
|
|
397 | continue; |
|
|
398 | } |
|
|
399 | } |
245 | } |
|
|
246 | |
400 | LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); |
247 | LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1); |
401 | close_and_delete (fp, comp); |
|
|
402 | } |
248 | } |
|
|
249 | |