1 | /* |
1 | /* |
2 | * CrossFire, A Multiplayer game |
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, |
77 | PK_LUCK_PENALTY, |
79 | PK_LUCK_PENALTY, |
78 | STAT_LOSS_ON_DEATH, |
80 | STAT_LOSS_ON_DEATH, |
79 | PERMANENT_EXPERIENCE_RATIO, |
81 | PERMANENT_EXPERIENCE_RATIO, |
80 | DEATH_PENALTY_RATIO, |
82 | DEATH_PENALTY_RATIO, |
… | |
… | |
90 | SET_FRIENDLY_FIRE, |
92 | SET_FRIENDLY_FIRE, |
91 | 0, |
93 | 0, |
92 | 0, |
94 | 0, |
93 | EXPLORE_MODE, |
95 | EXPLORE_MODE, |
94 | SPELLPOINT_LEVEL_DEPEND, |
96 | SPELLPOINT_LEVEL_DEPEND, |
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, |
… | |
… | |
133 | "Wounding", |
130 | "Wounding", |
134 | "Death", |
131 | "Death", |
135 | "Light" |
132 | "Light" |
136 | }; |
133 | }; |
137 | |
134 | |
138 | /* |
|
|
139 | * It is vital that init_library() is called by any functions |
|
|
140 | * using this library. |
|
|
141 | * If you want to lessen the size of the program using the library, |
|
|
142 | * you can replace the call to init_library() with init_globals() and |
|
|
143 | * init_function_pointers(). Good idea to also call init_vars and |
|
|
144 | * init_hash_table if you are doing any object loading. |
|
|
145 | */ |
|
|
146 | void |
|
|
147 | init_library (void) |
|
|
148 | { |
|
|
149 | init_globals (); |
|
|
150 | init_block (); |
|
|
151 | init_dynamic (); |
|
|
152 | init_attackmess (); |
|
|
153 | init_experience (); |
|
|
154 | } |
|
|
155 | |
|
|
156 | /* init_environ initialises values from the environmental variables. |
135 | /* init_environ initialises values from the environmental variables. |
157 | * 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 |
158 | * overwrite these if specified. |
137 | * overwrite these if specified. |
159 | */ |
138 | */ |
160 | void |
139 | void |
161 | init_environ (void) |
140 | init_environ () |
162 | { |
141 | { |
163 | char *cp; |
142 | const char *cp; |
164 | |
143 | |
165 | cp = getenv ("CROSSFIRE_LIBDIR"); |
144 | if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp; |
166 | if (cp) |
145 | if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; |
167 | settings.datadir = cp; |
146 | if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp; |
|
|
147 | if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp; |
|
|
148 | if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp; |
|
|
149 | if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp; |
|
|
150 | if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp; |
|
|
151 | if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp; |
|
|
152 | if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp; |
|
|
153 | if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp; |
168 | |
154 | |
169 | cp = getenv ("CROSSFIRE_LOCALDIR"); |
155 | if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp; |
170 | if (cp) |
|
|
171 | settings.localdir = cp; |
|
|
172 | |
|
|
173 | cp = getenv ("CROSSFIRE_PLAYERDIR"); |
|
|
174 | if (cp) |
|
|
175 | settings.playerdir = cp; |
|
|
176 | |
|
|
177 | cp = getenv ("CROSSFIRE_MAPDIR"); |
|
|
178 | if (cp) |
|
|
179 | settings.mapdir = cp; |
|
|
180 | |
|
|
181 | cp = getenv ("CROSSFIRE_ARCHETYPES"); |
|
|
182 | if (cp) |
|
|
183 | settings.archetypes = cp; |
|
|
184 | |
|
|
185 | cp = getenv ("CROSSFIRE_TREASURES"); |
|
|
186 | if (cp) |
|
|
187 | settings.treasures = cp; |
|
|
188 | |
|
|
189 | cp = getenv ("CROSSFIRE_UNIQUEDIR"); |
|
|
190 | if (cp) |
|
|
191 | settings.uniquedir = cp; |
|
|
192 | |
|
|
193 | cp = getenv ("CROSSFIRE_TEMPLATEDIR"); |
|
|
194 | if (cp) |
|
|
195 | settings.templatedir = cp; |
|
|
196 | |
|
|
197 | cp = getenv ("CROSSFIRE_TMPDIR"); |
|
|
198 | if (cp) |
|
|
199 | settings.tmpdir = cp; |
|
|
200 | } |
156 | } |
201 | |
157 | |
202 | /* |
158 | /* |
203 | * Initialises all global variables. |
159 | * Initialises all global variables. |
204 | * Might use environment-variables as default for some of them. |
160 | * Might use environment-variables as default for some of them. |
205 | */ |
161 | */ |
206 | void |
162 | void |
207 | init_globals (void) |
163 | init_globals () |
208 | { |
164 | { |
209 | if (settings.logfilename[0] == 0) |
165 | if (settings.logfilename[0] == 0) |
210 | logfile = stderr; |
166 | log_setfd (-1); |
211 | else if ((logfile = fopen (settings.logfilename, "a")) == NULL) |
167 | else |
212 | { |
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); |
213 | 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); |
214 | logfile = stderr; |
177 | } |
215 | } |
178 | } |
216 | else |
|
|
217 | setvbuf (logfile, NULL, _IOLBF, 0); |
|
|
218 | } |
179 | } |
219 | |
180 | |
220 | void |
181 | void |
221 | init_dynamic (void) |
182 | init_dynamic () |
222 | { |
183 | { |
223 | archetype *at = first_archetype; |
184 | first_map_ext_path = "/start/HallsOfSelection"; |
224 | |
185 | first_map_path = "/HallOfSelection"; |
225 | while (at) |
|
|
226 | { |
|
|
227 | if (at->clone.type == MAP) |
|
|
228 | { |
|
|
229 | if (at->clone.race) |
|
|
230 | first_map_ext_path = at->clone.race; |
|
|
231 | |
|
|
232 | if (EXIT_PATH (&at->clone)) |
|
|
233 | { |
|
|
234 | first_map_path = EXIT_PATH (&at->clone); |
|
|
235 | return; |
|
|
236 | } |
|
|
237 | } |
|
|
238 | |
|
|
239 | at = at->next; |
|
|
240 | } |
|
|
241 | |
|
|
242 | LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n"); |
|
|
243 | exit (-1); |
|
|
244 | } |
186 | } |
245 | |
187 | |
246 | /* |
188 | /* |
247 | * initialises the attack messages. |
189 | * initialises the attack messages. |
248 | * Called by init_library(). |
190 | * Called by init_library(). |
249 | */ |
191 | */ |
250 | |
192 | |
251 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
193 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
252 | |
194 | |
253 | void |
195 | void |
254 | init_attackmess (void) |
196 | init_attackmess () |
255 | { |
197 | { |
256 | char buf[MAX_BUF]; |
198 | object_thawer thawer (settings.datadir, "attackmess"); |
257 | char filename[MAX_BUF]; |
|
|
258 | char *cp, *p; |
|
|
259 | FILE *fp; |
|
|
260 | static int has_been_done = 0; |
|
|
261 | int mess, level, comp; |
|
|
262 | int mode = 0, total = 0; |
|
|
263 | |
199 | |
264 | if (has_been_done) |
200 | if (!thawer) |
265 | return; |
|
|
266 | else |
|
|
267 | has_been_done = 1; |
|
|
268 | |
|
|
269 | sprintf (filename, "%s/attackmess", settings.datadir); |
|
|
270 | LOG (llevDebug, "Reading attack messages from %s...\n", filename); |
|
|
271 | if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) |
|
|
272 | { |
201 | { |
273 | LOG (llevError, "Can't open %s.\n", filename); |
202 | LOG (llevError, "Can't open %s.\n", thawer.name); |
274 | return; |
203 | return; |
275 | } |
204 | } |
276 | |
205 | |
277 | level = 0; |
206 | int msgnum = -1; |
278 | while (fgets (buf, MAX_BUF, fp) != NULL) |
207 | int total = 0; |
|
|
208 | |
|
|
209 | while (thawer.kw) |
279 | { |
210 | { |
280 | if (*buf == '#') |
211 | if (thawer.kw != KW_type) |
281 | continue; |
212 | if (!thawer.parse_error ("attackmess file")) |
282 | if ((cp = strchr (buf, '\n')) != NULL) |
213 | break; |
283 | *cp = '\0'; |
|
|
284 | cp = buf; |
|
|
285 | while (*cp == ' ') /* Skip blanks */ |
|
|
286 | cp++; |
|
|
287 | |
214 | |
288 | 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) |
289 | { |
221 | { |
290 | p = strtok (buf, ":"); |
222 | // our old friend, dog-slow sscanf |
291 | p = strtok (NULL, ":"); |
223 | int hp; |
292 | 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 |
293 | { |
232 | { |
|
|
233 | if (*buf2 == '-') |
|
|
234 | *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker |
|
|
235 | |
294 | attack_mess[mess][level].level = -1; |
236 | attack_mess[msgnum][level].level = hp; |
295 | attack_mess[mess][level].buf1 = NULL; |
237 | attack_mess[msgnum][level].buf1 = strdup (buf1); |
296 | attack_mess[mess][level].buf2 = NULL; |
238 | attack_mess[msgnum][level].buf2 = strdup (buf2); |
297 | attack_mess[mess][level].buf3 = NULL; |
239 | attack_mess[msgnum][level].buf3 = strdup (buf3); |
|
|
240 | |
|
|
241 | ++level; |
|
|
242 | ++total; |
298 | } |
243 | } |
299 | level = 0; |
244 | |
300 | mess = atoi (p); |
245 | thawer.next (); |
301 | mode = 1; |
|
|
302 | continue; |
|
|
303 | } |
246 | } |
304 | if (mode == 1) |
247 | |
305 | { |
|
|
306 | p = strtok (buf, "="); |
|
|
307 | attack_mess[mess][level].level = atoi (buf); |
248 | attack_mess[msgnum][level].level = -1; |
308 | p = strtok (NULL, "="); |
|
|
309 | if (p != NULL) |
|
|
310 | attack_mess[mess][level].buf1 = strdup (p); |
249 | attack_mess[msgnum][level].buf1 = 0; |
311 | else |
|
|
312 | attack_mess[mess][level].buf1 = strdup (""); |
|
|
313 | mode = 2; |
|
|
314 | continue; |
|
|
315 | } |
|
|
316 | else if (mode == 2) |
|
|
317 | { |
|
|
318 | p = strtok (buf, "="); |
|
|
319 | attack_mess[mess][level].level = atoi (buf); |
|
|
320 | p = strtok (NULL, "="); |
|
|
321 | if (p != NULL) |
|
|
322 | attack_mess[mess][level].buf2 = strdup (p); |
250 | attack_mess[msgnum][level].buf2 = 0; |
323 | else |
|
|
324 | attack_mess[mess][level].buf2 = strdup (""); |
|
|
325 | mode = 3; |
|
|
326 | continue; |
|
|
327 | } |
|
|
328 | else if (mode == 3) |
|
|
329 | { |
|
|
330 | p = strtok (buf, "="); |
|
|
331 | attack_mess[mess][level].level = atoi (buf); |
|
|
332 | p = strtok (NULL, "="); |
|
|
333 | if (p != NULL) |
|
|
334 | attack_mess[mess][level].buf3 = strdup (p); |
251 | attack_mess[msgnum][level].buf3 = 0; |
335 | else |
|
|
336 | attack_mess[mess][level].buf3 = strdup (""); |
|
|
337 | mode = 1; |
|
|
338 | level++; |
|
|
339 | total++; |
|
|
340 | continue; |
|
|
341 | } |
|
|
342 | } |
252 | } |
|
|
253 | |
343 | 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); |
344 | close_and_delete (fp, comp); |
|
|
345 | } |
255 | } |
|
|
256 | |