ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/init.C
(Generate patch)

Comparing deliantra/server/common/init.C (file contents):
Revision 1.29 by root, Wed Mar 14 00:04:58 2007 UTC vs.
Revision 1.63 by root, Sat Feb 26 12:50:26 2011 UTC

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 29
30dynbuf_text msg_dynbuf (65536, 65536);
31
32extern const char *const attacktype_name[NROFATTACKS] = {
33# define def(uc, lc, desc, plus, change) # lc,
34# include "attackinc.h"
35# undef def
36};
37
30extern const char *const attacktype_desc[NROFATTACKS] = { 38extern const char *const attacktype_desc[NROFATTACKS] = {
31# define def(uc, lc, name, plus, change) # name, 39# define def(uc, lc, desc, plus, change) # desc,
32# include "attackinc.h" 40# include "attackinc.h"
33# undef def 41# undef def
34}; 42};
35 43
36extern const char *const resist_plus[NROFATTACKS] = { 44extern const char *const resist_plus[NROFATTACKS] = {
37# define def(uc, lc, name, plus, change) # plus, 45# define def(uc, lc, desc, plus, change) # plus,
38# include "attackinc.h" 46# include "attackinc.h"
39# undef def 47# undef def
40}; 48};
41 49
42extern const char *const change_resist_msg[NROFATTACKS] = { 50extern const char *const change_resist_msg[NROFATTACKS] = {
43# define def(uc, lc, name, plus, change) # change, 51# define def(uc, lc, desc, plus, change) # change,
44# include "attackinc.h" 52# include "attackinc.h"
45# undef def 53# undef def
46}; 54};
47 55
48int resist_table[NROFATTACKS] = { 56int resist_table[NROFATTACKS] = {
49# define def(uc, lc, name, plus, change) ATNR_ ## uc, 57# define def(uc, lc, desc, plus, change) ATNR_ ## uc,
50# include "attackinc.h" 58# include "attackinc.h"
51# undef def 59# undef def
52}; 60};
53 61
54/* You unforunately need to looking in include/global.h to see what these 62/* You unforunately need to looking in include/global.h to see what these
55 * correspond to. 63 * correspond to.
56 */ 64 */
57struct Settings settings = { 65struct Settings settings = {
58 LOGFILE, /* Logfile */ 66 LOGFILE, /* Logfile */
59 CSPORT, /* Client/server port */ 67 llevTrace, /* Log level */
60
61/* Debug level */
62#ifdef DEBUG
63 llevDebug,
64#else
65 llevInfo,
66#endif
67
68 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */
69 0, /* argc */ 68 0, /* argc */
70 NULL, /* argv */ 69 NULL, /* argv */
71 CONFDIR, 70 CONFDIR,
72 DATADIR, 71 DATADIR,
73 LOCALDIR, 72 LOCALDIR,
74 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 73 PLAYERDIR,
75 UNIQUE_DIR, TEMPLATE_DIR, 74 MAPDIR,
75 UNIQUE_DIR,
76 TMPDIR, 76 TMPDIR,
77 PK_LUCK_PENALTY,
77 STAT_LOSS_ON_DEATH, 78 STAT_LOSS_ON_DEATH,
78 PK_LUCK_PENALTY,
79 PERMANENT_EXPERIENCE_RATIO, 79 PERMANENT_EXPERIENCE_RATIO,
80 DEATH_PENALTY_RATIO, 80 DEATH_PENALTY_RATIO,
81 DEATH_PENALTY_LEVEL, 81 DEATH_PENALTY_LEVEL,
82 BALANCED_STAT_LOSS, 82 BALANCED_STAT_LOSS,
83 NOT_PERMADETH, 83 NOT_PERMADETH,
… …
85 SET_TITLE, 85 SET_TITLE,
86 RESURRECTION, 86 RESURRECTION,
87 SEARCH_ITEMS, 87 SEARCH_ITEMS,
88 SPELL_ENCUMBRANCE, 88 SPELL_ENCUMBRANCE,
89 SPELL_FAILURE_EFFECTS, 89 SPELL_FAILURE_EFFECTS,
90 CASTING_TIME, 90 SET_FRIENDLY_FIRE,
91 REAL_WIZ,
92 EXPLORE_MODE,
93 SPELLPOINT_LEVEL_DEPEND, 91 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, 92 0,
101 1.0, 93 1.25,
102 94
103/* Armor enchantment stuff */ 95/* Armor enchantment stuff */
104 ARMOR_MAX_ENCHANT, 96 ARMOR_MAX_ENCHANT,
105 ARMOR_WEIGHT_REDUCTION, 97 ARMOR_WEIGHT_REDUCTION,
106 ARMOR_WEIGHT_LINEAR, 98 ARMOR_WEIGHT_LINEAR,
107 ARMOR_SPEED_IMPROVEMENT, 99 ARMOR_SPEED_IMPROVEMENT,
108 ARMOR_SPEED_LINEAR, 100 ARMOR_SPEED_LINEAR,
109 1, /* no_player_stealing */
110 1, /* create_home_portals */
111}; 101};
112 102
113/* perhaps not the best place for this, but needs to be 103/* perhaps not the best place for this, but needs to be
114 * in some file in the common area so that standalone 104 * in some file in the common area so that standalone
115 * programs, like the random map generator, can be built. 105 * programs, like the random map generator, can be built.
… …
135 "Wounding", 125 "Wounding",
136 "Death", 126 "Death",
137 "Light" 127 "Light"
138}; 128};
139 129
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 */
148void
149init_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. 130/* init_environ initialises values from the environmental variables.
163 * it needs to be called very early, since command line options should 131 * it needs to be called very early, since command line options should
164 * overwrite these if specified. 132 * overwrite these if specified.
165 */ 133 */
166void 134void
167init_environ (void) 135init_environ ()
168{ 136{
169 char *cp; 137 const char *cp;
170 138
171 cp = getenv ("CROSSFIRE_LIBDIR"); 139 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
172 if (cp) 140
173 settings.datadir = cp; 141 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; /* deprecated */
174 cp = getenv ("CROSSFIRE_LOCALDIR"); 142 if (cp = getenv ("DELIANTRA_DATADIR" )) settings.datadir = cp;
175 if (cp) 143 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
176 settings.localdir = cp; 144
177 cp = getenv ("CROSSFIRE_PLAYERDIR"); 145 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
178 if (cp) 146 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
179 settings.playerdir = cp; 147 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
180 cp = getenv ("CROSSFIRE_MAPDIR"); 148 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
181 if (cp) 149 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
182 settings.mapdir = 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} 150}
199 151
200/* 152/*
201 * Initialises all global variables. 153 * Initialises all global variables.
202 * Might use environment-variables as default for some of them. 154 * Might use environment-variables as default for some of them.
203 */ 155 */
204void 156void
205init_globals (void) 157init_globals ()
206{ 158{
207 if (settings.logfilename[0] == 0) 159 if (settings.logfilename[0] == 0)
208 logfile = stderr; 160 log_setfd (-1);
209 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 161 else
210 { 162 {
163 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
164
165 if (logfd >= 0)
166 log_setfd (logfd);
167 else
168 {
169 log_setfd (-1);
211 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 170 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
212 logfile = stderr; 171 }
213 } 172 }
214 else
215 setvbuf (logfile, NULL, _IOLBF, 0);
216} 173}
217 174
218void 175void
219init_dynamic (void) 176init_dynamic ()
220{ 177{
221 archetype *at = first_archetype; 178 first_map_ext_path = "/start/HallsOfSelection";
222 179 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
244unsigned 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 */
250void
251write_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 */
270void
271init_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} 180}
296 181
297/* 182/*
298 * initialises the attack messages. 183 * initialises the attack messages.
299 * Called by init_library(). 184 * Called by init_library().
300 */ 185 */
301 186
302//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; 187//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
303 188
304void 189void
305init_attackmess (void) 190init_attackmess ()
306{ 191{
307 char buf[MAX_BUF]; 192 object_thawer thawer (settings.datadir, "attackmess");
308 char filename[MAX_BUF];
309 char *cp, *p;
310 FILE *fp;
311 static int has_been_done = 0;
312 int mess, level, comp;
313 int mode = 0, total = 0;
314 193
315 if (has_been_done) 194 if (!thawer)
316 return;
317 else
318 has_been_done = 1;
319
320 sprintf (filename, "%s/attackmess", settings.datadir);
321 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
322 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
323 { 195 {
324 LOG (llevError, "Can't open %s.\n", filename); 196 LOG (llevError, "Can't open %s.\n", thawer.name);
325 return; 197 return;
326 } 198 }
327 199
328 level = 0; 200 int msgnum = -1;
329 while (fgets (buf, MAX_BUF, fp) != NULL) 201 int total = 0;
202
203 while (thawer.kw)
330 { 204 {
331 if (*buf == '#') 205 if (thawer.kw != KW_type)
332 continue; 206 if (!thawer.parse_error ("attackmess file"))
333 if ((cp = strchr (buf, '\n')) != NULL) 207 break;
334 *cp = '\0';
335 cp = buf;
336 while (*cp == ' ') /* Skip blanks */
337 cp++;
338 208
339 if (strncmp (cp, "TYPE:", 5) == 0) 209 thawer.get (msgnum);
210 thawer.next ();
211
212 int level = 0;
213
214 while (thawer.kw == KW_hp)
340 { 215 {
341 p = strtok (buf, ":"); 216 // our old friend, dog-slow sscanf
342 p = strtok (NULL, ":"); 217 int hp;
343 if (mode == 1) 218 char buf1[1024];
219 char buf2[1024];
220 char buf3[1024];
221
222 if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]",
223 &hp, buf1, buf2, buf3))
224 thawer.parse_error ("attackmess file");
225 else
344 { 226 {
227 if (*buf2 == '-')
228 *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker
229
345 attack_mess[mess][level].level = -1; 230 attack_mess[msgnum][level].level = hp;
346 attack_mess[mess][level].buf1 = NULL; 231 attack_mess[msgnum][level].buf1 = strdup (buf1);
347 attack_mess[mess][level].buf2 = NULL; 232 attack_mess[msgnum][level].buf2 = strdup (buf2);
348 attack_mess[mess][level].buf3 = NULL; 233 attack_mess[msgnum][level].buf3 = strdup (buf3);
234
235 ++level;
236 ++total;
349 } 237 }
350 level = 0; 238
351 mess = atoi (p); 239 thawer.next ();
352 mode = 1;
353 continue;
354 } 240 }
355 if (mode == 1) 241
356 {
357 p = strtok (buf, "=");
358 attack_mess[mess][level].level = atoi (buf); 242 attack_mess[msgnum][level].level = -1;
359 p = strtok (NULL, "=");
360 if (p != NULL)
361 attack_mess[mess][level].buf1 = strdup (p); 243 attack_mess[msgnum][level].buf1 = 0;
362 else
363 attack_mess[mess][level].buf1 = strdup ("");
364 mode = 2;
365 continue;
366 }
367 else if (mode == 2)
368 {
369 p = strtok (buf, "=");
370 attack_mess[mess][level].level = atoi (buf);
371 p = strtok (NULL, "=");
372 if (p != NULL)
373 attack_mess[mess][level].buf2 = strdup (p); 244 attack_mess[msgnum][level].buf2 = 0;
374 else
375 attack_mess[mess][level].buf2 = strdup ("");
376 mode = 3;
377 continue;
378 }
379 else if (mode == 3)
380 {
381 p = strtok (buf, "=");
382 attack_mess[mess][level].level = atoi (buf);
383 p = strtok (NULL, "=");
384 if (p != NULL)
385 attack_mess[mess][level].buf3 = strdup (p); 245 attack_mess[msgnum][level].buf3 = 0;
386 else
387 attack_mess[mess][level].buf3 = strdup ("");
388 mode = 1;
389 level++;
390 total++;
391 continue;
392 }
393 } 246 }
247
394 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); 248 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
395 close_and_delete (fp, comp);
396} 249}
250

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines