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

Diff Legend

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