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, |
… | |
… | |
85 | SET_TITLE, |
87 | SET_TITLE, |
86 | RESURRECTION, |
88 | RESURRECTION, |
87 | SEARCH_ITEMS, |
89 | SEARCH_ITEMS, |
88 | SPELL_ENCUMBRANCE, |
90 | SPELL_ENCUMBRANCE, |
89 | SPELL_FAILURE_EFFECTS, |
91 | SPELL_FAILURE_EFFECTS, |
90 | CASTING_TIME, |
92 | SET_FRIENDLY_FIRE, |
91 | REAL_WIZ, |
93 | 0, |
|
|
94 | 0, |
92 | EXPLORE_MODE, |
95 | EXPLORE_MODE, |
93 | SPELLPOINT_LEVEL_DEPEND, |
96 | SPELLPOINT_LEVEL_DEPEND, |
94 | SET_FRIENDLY_FIRE, |
|
|
95 | MOTD, |
|
|
96 | "rules", |
|
|
97 | "news", |
|
|
98 | "", /* DM_MAIL */ |
|
|
99 | 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */ |
|
|
100 | 0, |
97 | 0, |
101 | 1.0, |
98 | 1.0, |
102 | |
99 | |
103 | /* Armor enchantment stuff */ |
100 | /* Armor enchantment stuff */ |
104 | ARMOR_MAX_ENCHANT, |
101 | ARMOR_MAX_ENCHANT, |
105 | ARMOR_WEIGHT_REDUCTION, |
102 | ARMOR_WEIGHT_REDUCTION, |
106 | ARMOR_WEIGHT_LINEAR, |
103 | ARMOR_WEIGHT_LINEAR, |
107 | ARMOR_SPEED_IMPROVEMENT, |
104 | ARMOR_SPEED_IMPROVEMENT, |
108 | ARMOR_SPEED_LINEAR, |
105 | ARMOR_SPEED_LINEAR, |
109 | 1, /* no_player_stealing */ |
|
|
110 | 1, /* create_home_portals */ |
|
|
111 | }; |
106 | }; |
112 | |
107 | |
113 | /* perhaps not the best place for this, but needs to be |
108 | /* perhaps not the best place for this, but needs to be |
114 | * in some file in the common area so that standalone |
109 | * in some file in the common area so that standalone |
115 | * programs, like the random map generator, can be built. |
110 | * programs, like the random map generator, can be built. |
… | |
… | |
135 | "Wounding", |
130 | "Wounding", |
136 | "Death", |
131 | "Death", |
137 | "Light" |
132 | "Light" |
138 | }; |
133 | }; |
139 | |
134 | |
140 | /* |
|
|
141 | * It is vital that init_library() is called by any functions |
|
|
142 | * using this library. |
|
|
143 | * If you want to lessen the size of the program using the library, |
|
|
144 | * you can replace the call to init_library() with init_globals() and |
|
|
145 | * init_function_pointers(). Good idea to also call init_vars and |
|
|
146 | * init_hash_table if you are doing any object loading. |
|
|
147 | */ |
|
|
148 | void |
|
|
149 | init_library (void) |
|
|
150 | { |
|
|
151 | init_globals (); |
|
|
152 | init_block (); |
|
|
153 | init_anim (); /* Must be after we read in the bitmaps */ |
|
|
154 | init_archetypes (); /* Reads all archetypes from file */ |
|
|
155 | init_dynamic (); |
|
|
156 | init_attackmess (); |
|
|
157 | init_clocks (); |
|
|
158 | init_experience (); |
|
|
159 | } |
|
|
160 | |
|
|
161 | |
|
|
162 | /* init_environ initialises values from the environmental variables. |
135 | /* init_environ initialises values from the environmental variables. |
163 | * 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 |
164 | * overwrite these if specified. |
137 | * overwrite these if specified. |
165 | */ |
138 | */ |
166 | void |
139 | void |
167 | init_environ (void) |
140 | init_environ () |
168 | { |
141 | { |
169 | char *cp; |
142 | const char *cp; |
170 | |
143 | |
171 | cp = getenv ("CROSSFIRE_LIBDIR"); |
144 | if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp; |
172 | if (cp) |
145 | if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; |
173 | settings.datadir = cp; |
146 | if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp; |
174 | cp = getenv ("CROSSFIRE_LOCALDIR"); |
147 | if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp; |
175 | if (cp) |
148 | if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp; |
176 | settings.localdir = cp; |
149 | if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp; |
177 | cp = getenv ("CROSSFIRE_PLAYERDIR"); |
150 | if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp; |
178 | if (cp) |
151 | if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp; |
179 | settings.playerdir = cp; |
152 | if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp; |
180 | cp = getenv ("CROSSFIRE_MAPDIR"); |
153 | if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp; |
181 | if (cp) |
154 | |
182 | settings.mapdir = cp; |
155 | if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp; |
183 | cp = getenv ("CROSSFIRE_ARCHETYPES"); |
|
|
184 | if (cp) |
|
|
185 | settings.archetypes = cp; |
|
|
186 | cp = getenv ("CROSSFIRE_TREASURES"); |
|
|
187 | if (cp) |
|
|
188 | settings.treasures = cp; |
|
|
189 | cp = getenv ("CROSSFIRE_UNIQUEDIR"); |
|
|
190 | if (cp) |
|
|
191 | settings.uniquedir = cp; |
|
|
192 | cp = getenv ("CROSSFIRE_TEMPLATEDIR"); |
|
|
193 | if (cp) |
|
|
194 | settings.templatedir = cp; |
|
|
195 | cp = getenv ("CROSSFIRE_TMPDIR"); |
|
|
196 | if (cp) |
|
|
197 | settings.tmpdir = cp; |
|
|
198 | } |
156 | } |
199 | |
157 | |
200 | /* |
158 | /* |
201 | * Initialises all global variables. |
159 | * Initialises all global variables. |
202 | * Might use environment-variables as default for some of them. |
160 | * Might use environment-variables as default for some of them. |
203 | */ |
161 | */ |
204 | void |
162 | void |
205 | init_globals (void) |
163 | init_globals () |
206 | { |
164 | { |
207 | if (settings.logfilename[0] == 0) |
165 | if (settings.logfilename[0] == 0) |
208 | logfile = stderr; |
166 | log_setfd (-1); |
209 | else if ((logfile = fopen (settings.logfilename, "a")) == NULL) |
167 | else |
210 | { |
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); |
211 | 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); |
212 | logfile = stderr; |
177 | } |
213 | } |
178 | } |
214 | else |
|
|
215 | setvbuf (logfile, NULL, _IOLBF, 0); |
|
|
216 | } |
179 | } |
217 | |
180 | |
218 | void |
181 | void |
219 | init_dynamic (void) |
182 | init_dynamic () |
220 | { |
183 | { |
221 | archetype *at = first_archetype; |
184 | first_map_ext_path = "/start/HallsOfSelection"; |
222 | |
185 | first_map_path = "/HallOfSelection"; |
223 | while (at) |
|
|
224 | { |
|
|
225 | if (at->clone.type == MAP) |
|
|
226 | { |
|
|
227 | if (at->clone.race) |
|
|
228 | first_map_ext_path = at->clone.race; |
|
|
229 | |
|
|
230 | if (EXIT_PATH (&at->clone)) |
|
|
231 | { |
|
|
232 | first_map_path = EXIT_PATH (&at->clone); |
|
|
233 | return; |
|
|
234 | } |
|
|
235 | } |
|
|
236 | |
|
|
237 | at = at->next; |
|
|
238 | } |
|
|
239 | |
|
|
240 | LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n"); |
|
|
241 | exit (-1); |
|
|
242 | } |
|
|
243 | |
|
|
244 | unsigned long todtick; |
|
|
245 | |
|
|
246 | /* |
|
|
247 | * Write out the current time to the file so time does not |
|
|
248 | * reset every time the server reboots. |
|
|
249 | */ |
|
|
250 | void |
|
|
251 | write_todclock (void) |
|
|
252 | { |
|
|
253 | char filename[MAX_BUF]; |
|
|
254 | FILE *fp; |
|
|
255 | |
|
|
256 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
257 | if ((fp = fopen (filename, "w")) == NULL) |
|
|
258 | { |
|
|
259 | LOG (llevError, "Cannot open %s for writing\n", filename); |
|
|
260 | return; |
|
|
261 | } |
|
|
262 | fprintf (fp, "%lu", todtick); |
|
|
263 | fclose (fp); |
|
|
264 | } |
|
|
265 | |
|
|
266 | /* |
|
|
267 | * initialises the gametime and TOD counters |
|
|
268 | * Called by init_library(). |
|
|
269 | */ |
|
|
270 | void |
|
|
271 | init_clocks (void) |
|
|
272 | { |
|
|
273 | char filename[MAX_BUF]; |
|
|
274 | FILE *fp; |
|
|
275 | static int has_been_done = 0; |
|
|
276 | |
|
|
277 | if (has_been_done) |
|
|
278 | return; |
|
|
279 | else |
|
|
280 | has_been_done = 1; |
|
|
281 | |
|
|
282 | sprintf (filename, "%s/clockdata", settings.localdir); |
|
|
283 | LOG (llevDebug, "Reading clockdata from %s...\n", filename); |
|
|
284 | if ((fp = fopen (filename, "r")) == NULL) |
|
|
285 | { |
|
|
286 | LOG (llevError, "Can't open %s.\n", filename); |
|
|
287 | todtick = 0; |
|
|
288 | write_todclock (); |
|
|
289 | return; |
|
|
290 | } |
|
|
291 | |
|
|
292 | fscanf (fp, "%lu", &todtick); |
|
|
293 | LOG (llevDebug, "todtick=%lu\n", todtick); |
|
|
294 | fclose (fp); |
|
|
295 | } |
186 | } |
296 | |
187 | |
297 | /* |
188 | /* |
298 | * initialises the attack messages. |
189 | * initialises the attack messages. |
299 | * Called by init_library(). |
190 | * Called by init_library(). |
300 | */ |
191 | */ |
301 | |
192 | |
302 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
193 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
303 | |
194 | |
304 | void |
195 | void |
305 | init_attackmess (void) |
196 | init_attackmess () |
306 | { |
197 | { |
307 | char buf[MAX_BUF]; |
198 | char buf[MAX_BUF]; |
308 | char filename[MAX_BUF]; |
199 | char filename[MAX_BUF]; |
309 | char *cp, *p; |
200 | char *cp, *p; |
310 | FILE *fp; |
201 | FILE *fp; |
311 | static int has_been_done = 0; |
202 | static int has_been_done = 0; |
312 | int mess, level, comp; |
203 | int msgnum, level, comp; |
313 | int mode = 0, total = 0; |
204 | int mode = 0, total = 0; |
314 | |
205 | |
315 | if (has_been_done) |
206 | if (has_been_done) |
316 | return; |
207 | return; |
317 | else |
208 | else |
… | |
… | |
328 | level = 0; |
219 | level = 0; |
329 | while (fgets (buf, MAX_BUF, fp) != NULL) |
220 | while (fgets (buf, MAX_BUF, fp) != NULL) |
330 | { |
221 | { |
331 | if (*buf == '#') |
222 | if (*buf == '#') |
332 | continue; |
223 | continue; |
|
|
224 | |
333 | if ((cp = strchr (buf, '\n')) != NULL) |
225 | if ((cp = strchr (buf, '\n')) != NULL) |
334 | *cp = '\0'; |
226 | *cp = '\0'; |
|
|
227 | |
335 | cp = buf; |
228 | cp = buf; |
336 | while (*cp == ' ') /* Skip blanks */ |
229 | while (*cp == ' ') /* Skip blanks */ |
337 | cp++; |
230 | cp++; |
338 | |
231 | |
339 | if (strncmp (cp, "TYPE:", 5) == 0) |
232 | if (strncmp (cp, "TYPE:", 5) == 0) |
340 | { |
233 | { |
341 | p = strtok (buf, ":"); |
234 | p = strtok (buf, ":"); |
342 | p = strtok (NULL, ":"); |
235 | p = strtok (NULL, ":"); |
|
|
236 | |
343 | if (mode == 1) |
237 | if (mode == 1) |
344 | { |
238 | { |
345 | attack_mess[mess][level].level = -1; |
239 | attack_mess[msgnum][level].level = -1; |
346 | attack_mess[mess][level].buf1 = NULL; |
240 | attack_mess[msgnum][level].buf1 = NULL; |
347 | attack_mess[mess][level].buf2 = NULL; |
241 | attack_mess[msgnum][level].buf2 = NULL; |
348 | attack_mess[mess][level].buf3 = NULL; |
242 | attack_mess[msgnum][level].buf3 = NULL; |
349 | } |
243 | } |
|
|
244 | |
350 | level = 0; |
245 | level = 0; |
351 | mess = atoi (p); |
246 | msgnum = atoi (p); |
352 | mode = 1; |
247 | mode = 1; |
353 | continue; |
|
|
354 | } |
248 | } |
355 | if (mode == 1) |
249 | else if (mode == 1) |
356 | { |
250 | { |
357 | p = strtok (buf, "="); |
251 | p = strtok (buf, "="); |
358 | attack_mess[mess][level].level = atoi (buf); |
252 | attack_mess[msgnum][level].level = atoi (buf); |
359 | p = strtok (NULL, "="); |
253 | p = strtok (NULL, "="); |
|
|
254 | |
360 | if (p != NULL) |
255 | if (p != NULL) |
361 | attack_mess[mess][level].buf1 = strdup (p); |
256 | attack_mess[msgnum][level].buf1 = strdup (p); |
362 | else |
257 | else |
363 | attack_mess[mess][level].buf1 = strdup (""); |
258 | attack_mess[msgnum][level].buf1 = strdup (""); |
|
|
259 | |
364 | mode = 2; |
260 | mode = 2; |
365 | continue; |
|
|
366 | } |
261 | } |
367 | else if (mode == 2) |
262 | else if (mode == 2) |
368 | { |
263 | { |
369 | p = strtok (buf, "="); |
264 | p = strtok (buf, "="); |
370 | attack_mess[mess][level].level = atoi (buf); |
265 | attack_mess[msgnum][level].level = atoi (buf); |
371 | p = strtok (NULL, "="); |
266 | p = strtok (NULL, "="); |
|
|
267 | |
372 | if (p != NULL) |
268 | if (p != NULL) |
373 | attack_mess[mess][level].buf2 = strdup (p); |
269 | attack_mess[msgnum][level].buf2 = strdup (p); |
374 | else |
270 | else |
375 | attack_mess[mess][level].buf2 = strdup (""); |
271 | attack_mess[msgnum][level].buf2 = strdup (""); |
|
|
272 | |
376 | mode = 3; |
273 | mode = 3; |
377 | continue; |
|
|
378 | } |
274 | } |
379 | else if (mode == 3) |
275 | else if (mode == 3) |
380 | { |
276 | { |
381 | p = strtok (buf, "="); |
277 | p = strtok (buf, "="); |
382 | attack_mess[mess][level].level = atoi (buf); |
278 | attack_mess[msgnum][level].level = atoi (buf); |
383 | p = strtok (NULL, "="); |
279 | p = strtok (NULL, "="); |
|
|
280 | |
384 | if (p != NULL) |
281 | if (p != NULL) |
385 | attack_mess[mess][level].buf3 = strdup (p); |
282 | attack_mess[msgnum][level].buf3 = strdup (p); |
386 | else |
283 | else |
387 | attack_mess[mess][level].buf3 = strdup (""); |
284 | attack_mess[msgnum][level].buf3 = strdup (""); |
|
|
285 | |
388 | mode = 1; |
286 | mode = 1; |
389 | level++; |
287 | level++; |
390 | total++; |
288 | total++; |
391 | continue; |
|
|
392 | } |
289 | } |
393 | } |
290 | } |
|
|
291 | |
394 | LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); |
292 | LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1); |
395 | close_and_delete (fp, comp); |
293 | close_and_delete (fp, comp); |
396 | } |
294 | } |
|
|
295 | |