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, |
… | |
… | |
85 | SET_TITLE, |
80 | SET_TITLE, |
86 | RESURRECTION, |
81 | RESURRECTION, |
87 | SEARCH_ITEMS, |
82 | SEARCH_ITEMS, |
88 | SPELL_ENCUMBRANCE, |
83 | SPELL_ENCUMBRANCE, |
89 | SPELL_FAILURE_EFFECTS, |
84 | SPELL_FAILURE_EFFECTS, |
90 | CASTING_TIME, |
85 | SET_FRIENDLY_FIRE, |
91 | REAL_WIZ, |
86 | 0, |
|
|
87 | 0, |
92 | EXPLORE_MODE, |
88 | EXPLORE_MODE, |
93 | SPELLPOINT_LEVEL_DEPEND, |
89 | 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, |
90 | 0, |
101 | 1.0, |
91 | 1.0, |
102 | |
92 | |
103 | /* Armor enchantment stuff */ |
93 | /* Armor enchantment stuff */ |
104 | ARMOR_MAX_ENCHANT, |
94 | ARMOR_MAX_ENCHANT, |
105 | ARMOR_WEIGHT_REDUCTION, |
95 | ARMOR_WEIGHT_REDUCTION, |
106 | ARMOR_WEIGHT_LINEAR, |
96 | ARMOR_WEIGHT_LINEAR, |
107 | ARMOR_SPEED_IMPROVEMENT, |
97 | ARMOR_SPEED_IMPROVEMENT, |
108 | ARMOR_SPEED_LINEAR, |
98 | ARMOR_SPEED_LINEAR, |
109 | 1, /* no_player_stealing */ |
|
|
110 | 1, /* create_home_portals */ |
|
|
111 | }; |
99 | }; |
112 | |
100 | |
113 | /* perhaps not the best place for this, but needs to be |
101 | /* perhaps not the best place for this, but needs to be |
114 | * in some file in the common area so that standalone |
102 | * in some file in the common area so that standalone |
115 | * programs, like the random map generator, can be built. |
103 | * programs, like the random map generator, can be built. |
… | |
… | |
135 | "Wounding", |
123 | "Wounding", |
136 | "Death", |
124 | "Death", |
137 | "Light" |
125 | "Light" |
138 | }; |
126 | }; |
139 | |
127 | |
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_archetypes (); /* Reads all archetypes from file */ |
|
|
154 | init_dynamic (); |
|
|
155 | init_attackmess (); |
|
|
156 | init_experience (); |
|
|
157 | } |
|
|
158 | |
|
|
159 | |
|
|
160 | /* init_environ initialises values from the environmental variables. |
128 | /* init_environ initialises values from the environmental variables. |
161 | * 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 |
162 | * overwrite these if specified. |
130 | * overwrite these if specified. |
163 | */ |
131 | */ |
164 | void |
132 | void |
165 | init_environ (void) |
133 | init_environ () |
166 | { |
134 | { |
167 | char *cp; |
135 | const char *cp; |
168 | |
136 | |
169 | cp = getenv ("CROSSFIRE_LIBDIR"); |
137 | if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp; |
170 | if (cp) |
138 | if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; |
171 | settings.datadir = cp; |
139 | if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp; |
172 | cp = getenv ("CROSSFIRE_LOCALDIR"); |
140 | if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp; |
173 | if (cp) |
141 | if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp; |
174 | settings.localdir = cp; |
142 | if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp; |
175 | cp = getenv ("CROSSFIRE_PLAYERDIR"); |
143 | if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp; |
176 | if (cp) |
144 | if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp; |
177 | settings.playerdir = cp; |
145 | if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp; |
178 | cp = getenv ("CROSSFIRE_MAPDIR"); |
146 | if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp; |
179 | if (cp) |
147 | |
180 | settings.mapdir = cp; |
148 | if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp; |
181 | cp = getenv ("CROSSFIRE_ARCHETYPES"); |
|
|
182 | if (cp) |
|
|
183 | settings.archetypes = cp; |
|
|
184 | cp = getenv ("CROSSFIRE_TREASURES"); |
|
|
185 | if (cp) |
|
|
186 | settings.treasures = cp; |
|
|
187 | cp = getenv ("CROSSFIRE_UNIQUEDIR"); |
|
|
188 | if (cp) |
|
|
189 | settings.uniquedir = cp; |
|
|
190 | cp = getenv ("CROSSFIRE_TEMPLATEDIR"); |
|
|
191 | if (cp) |
|
|
192 | settings.templatedir = cp; |
|
|
193 | cp = getenv ("CROSSFIRE_TMPDIR"); |
|
|
194 | if (cp) |
|
|
195 | settings.tmpdir = cp; |
|
|
196 | } |
149 | } |
197 | |
150 | |
198 | /* |
151 | /* |
199 | * Initialises all global variables. |
152 | * Initialises all global variables. |
200 | * Might use environment-variables as default for some of them. |
153 | * Might use environment-variables as default for some of them. |
201 | */ |
154 | */ |
202 | void |
155 | void |
203 | init_globals (void) |
156 | init_globals () |
204 | { |
157 | { |
205 | if (settings.logfilename[0] == 0) |
158 | if (settings.logfilename[0] == 0) |
206 | logfile = stderr; |
159 | log_setfd (-1); |
207 | else if ((logfile = fopen (settings.logfilename, "a")) == NULL) |
160 | else |
208 | { |
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); |
209 | 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); |
210 | logfile = stderr; |
170 | } |
211 | } |
171 | } |
212 | else |
|
|
213 | setvbuf (logfile, NULL, _IOLBF, 0); |
|
|
214 | } |
172 | } |
215 | |
173 | |
216 | void |
174 | void |
217 | init_dynamic (void) |
175 | init_dynamic () |
218 | { |
176 | { |
219 | archetype *at = first_archetype; |
177 | first_map_ext_path = "/start/HallsOfSelection"; |
220 | |
178 | first_map_path = "/HallOfSelection"; |
221 | while (at) |
|
|
222 | { |
|
|
223 | if (at->clone.type == MAP) |
|
|
224 | { |
|
|
225 | if (at->clone.race) |
|
|
226 | first_map_ext_path = at->clone.race; |
|
|
227 | |
|
|
228 | if (EXIT_PATH (&at->clone)) |
|
|
229 | { |
|
|
230 | first_map_path = EXIT_PATH (&at->clone); |
|
|
231 | return; |
|
|
232 | } |
|
|
233 | } |
|
|
234 | |
|
|
235 | at = at->next; |
|
|
236 | } |
|
|
237 | |
|
|
238 | LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n"); |
|
|
239 | exit (-1); |
|
|
240 | } |
179 | } |
241 | |
180 | |
242 | /* |
181 | /* |
243 | * initialises the attack messages. |
182 | * initialises the attack messages. |
244 | * Called by init_library(). |
183 | * Called by init_library(). |
245 | */ |
184 | */ |
246 | |
185 | |
247 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
186 | //attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; |
248 | |
187 | |
249 | void |
188 | void |
250 | init_attackmess (void) |
189 | init_attackmess () |
251 | { |
190 | { |
252 | char buf[MAX_BUF]; |
191 | object_thawer thawer (settings.datadir, "attackmess"); |
253 | char filename[MAX_BUF]; |
|
|
254 | char *cp, *p; |
|
|
255 | FILE *fp; |
|
|
256 | static int has_been_done = 0; |
|
|
257 | int mess, level, comp; |
|
|
258 | int mode = 0, total = 0; |
|
|
259 | |
192 | |
260 | if (has_been_done) |
193 | if (!thawer) |
261 | return; |
|
|
262 | else |
|
|
263 | has_been_done = 1; |
|
|
264 | |
|
|
265 | sprintf (filename, "%s/attackmess", settings.datadir); |
|
|
266 | LOG (llevDebug, "Reading attack messages from %s...\n", filename); |
|
|
267 | if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) |
|
|
268 | { |
194 | { |
269 | LOG (llevError, "Can't open %s.\n", filename); |
195 | LOG (llevError, "Can't open %s.\n", thawer.name); |
270 | return; |
196 | return; |
271 | } |
197 | } |
272 | |
198 | |
273 | level = 0; |
199 | int msgnum = -1; |
274 | while (fgets (buf, MAX_BUF, fp) != NULL) |
200 | int total = 0; |
|
|
201 | |
|
|
202 | while (thawer.kw) |
275 | { |
203 | { |
276 | if (*buf == '#') |
204 | if (thawer.kw != KW_type) |
277 | continue; |
205 | if (!thawer.parse_error ("attackmess file")) |
278 | if ((cp = strchr (buf, '\n')) != NULL) |
206 | break; |
279 | *cp = '\0'; |
|
|
280 | cp = buf; |
|
|
281 | while (*cp == ' ') /* Skip blanks */ |
|
|
282 | cp++; |
|
|
283 | |
207 | |
284 | 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) |
285 | { |
214 | { |
286 | p = strtok (buf, ":"); |
215 | // our old friend, dog-slow sscanf |
287 | p = strtok (NULL, ":"); |
216 | int hp; |
288 | 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 |
289 | { |
225 | { |
|
|
226 | if (*buf2 == '-') |
|
|
227 | *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker |
|
|
228 | |
290 | attack_mess[mess][level].level = -1; |
229 | attack_mess[msgnum][level].level = hp; |
291 | attack_mess[mess][level].buf1 = NULL; |
230 | attack_mess[msgnum][level].buf1 = strdup (buf1); |
292 | attack_mess[mess][level].buf2 = NULL; |
231 | attack_mess[msgnum][level].buf2 = strdup (buf2); |
293 | attack_mess[mess][level].buf3 = NULL; |
232 | attack_mess[msgnum][level].buf3 = strdup (buf3); |
|
|
233 | |
|
|
234 | ++level; |
|
|
235 | ++total; |
294 | } |
236 | } |
295 | level = 0; |
237 | |
296 | mess = atoi (p); |
238 | thawer.next (); |
297 | mode = 1; |
|
|
298 | continue; |
|
|
299 | } |
239 | } |
300 | if (mode == 1) |
240 | |
301 | { |
|
|
302 | p = strtok (buf, "="); |
|
|
303 | attack_mess[mess][level].level = atoi (buf); |
241 | attack_mess[msgnum][level].level = -1; |
304 | p = strtok (NULL, "="); |
|
|
305 | if (p != NULL) |
|
|
306 | attack_mess[mess][level].buf1 = strdup (p); |
242 | attack_mess[msgnum][level].buf1 = 0; |
307 | else |
|
|
308 | attack_mess[mess][level].buf1 = strdup (""); |
|
|
309 | mode = 2; |
|
|
310 | continue; |
|
|
311 | } |
|
|
312 | else if (mode == 2) |
|
|
313 | { |
|
|
314 | p = strtok (buf, "="); |
|
|
315 | attack_mess[mess][level].level = atoi (buf); |
|
|
316 | p = strtok (NULL, "="); |
|
|
317 | if (p != NULL) |
|
|
318 | attack_mess[mess][level].buf2 = strdup (p); |
243 | attack_mess[msgnum][level].buf2 = 0; |
319 | else |
|
|
320 | attack_mess[mess][level].buf2 = strdup (""); |
|
|
321 | mode = 3; |
|
|
322 | continue; |
|
|
323 | } |
|
|
324 | else if (mode == 3) |
|
|
325 | { |
|
|
326 | p = strtok (buf, "="); |
|
|
327 | attack_mess[mess][level].level = atoi (buf); |
|
|
328 | p = strtok (NULL, "="); |
|
|
329 | if (p != NULL) |
|
|
330 | attack_mess[mess][level].buf3 = strdup (p); |
244 | attack_mess[msgnum][level].buf3 = 0; |
331 | else |
|
|
332 | attack_mess[mess][level].buf3 = strdup (""); |
|
|
333 | mode = 1; |
|
|
334 | level++; |
|
|
335 | total++; |
|
|
336 | continue; |
|
|
337 | } |
|
|
338 | } |
245 | } |
|
|
246 | |
339 | 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); |
340 | close_and_delete (fp, comp); |
|
|
341 | } |
248 | } |
|
|
249 | |