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.6 by pippijn, Thu Sep 7 09:37:11 2006 UTC vs.
Revision 1.34 by root, Thu May 17 13:24:54 2007 UTC

1/* 1/*
2 * static char *rcsid_init_c =
3 * "$Id: init.C,v 1.6 2006/09/07 09:37:11 pippijn Exp $";
4 */
5
6/*
7 CrossFire, A Multiplayer game for X-windows 2 * CrossFire, A Multiplayer game for X-windows
8 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
9 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 * Copyright (C) 2002 Mark Wedel & Crossfire Development Team
10 Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (C) 1992 Frank Tore Johansen
11 7 *
12 This program is free software; you can redistribute it and/or modify 8 * This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by 9 * it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2 of the License, or 10 * the Free Software Foundation; either version 2 of the License, or
15 (at your option) any later version. 11 * (at your option) any later version.
16 12 *
17 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,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details. 16 * GNU General Public License for more details.
21 17 *
22 You should have received a copy of the GNU General Public License 18 * You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software 19 * along with this program; if not, write to the Free Software
24 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 21 *
26 The authors can be reached via e-mail at crossfire-devel@real-time.com 22 * The authors can be reached via e-mail at <crossfire@schmorp.de>
27*/ 23 */
28 24
29#define EXTERN 25#define EXTERN // horrible hack
30#define INIT_C 26
31#include <global.h> 27#include <global.h>
32#include <object.h> 28#include <object.h>
33 29
30extern const char *const attacktype_desc[NROFATTACKS] = {
31# define def(uc, lc, name, plus, change) # name,
32# include "attackinc.h"
33# undef def
34};
35
36extern const char *const resist_plus[NROFATTACKS] = {
37# define def(uc, lc, name, plus, change) # plus,
38# include "attackinc.h"
39# undef def
40};
41
42extern const char *const change_resist_msg[NROFATTACKS] = {
43# define def(uc, lc, name, plus, change) # change,
44# include "attackinc.h"
45# undef def
46};
47
48int resist_table[NROFATTACKS] = {
49# define def(uc, lc, name, plus, change) ATNR_ ## uc,
50# include "attackinc.h"
51# undef def
52};
53
34/* You unforunately need to looking in include/global.h to see what these 54/* You unforunately need to looking in include/global.h to see what these
35 * correspond to. 55 * correspond to.
36 */ 56 */
37struct Settings settings = { 57struct Settings settings = {
38LOGFILE, /* Logfile */ 58 LOGFILE, /* Logfile */
39CSPORT, /* Client/server port */ 59 CSPORT, /* Client/server port */
40 60
41/* Debug level */ 61/* Debug level */
42#ifdef DEBUG 62#ifdef DEBUG
43 llevDebug, 63 llevDebug,
44#else 64#else
45 llevInfo, 65 llevInfo,
46#endif 66#endif
47 67
480, NULL, 0, /* dumpvalues, dumparg, daemonmode */ 68 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */
490, /* argc */ 69 0, /* argc */
50NULL, /* argv */ 70 NULL, /* argv */
51CONFDIR, 71 CONFDIR,
52DATADIR, 72 DATADIR,
53LOCALDIR, 73 LOCALDIR,
54PLAYERDIR, MAPDIR, ARCHETYPES,REGIONS,TREASURES, 74 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
55UNIQUE_DIR, TEMPLATE_DIR, 75 UNIQUE_DIR, TEMPLATE_DIR,
56TMPDIR, 76 TMPDIR,
77 PK_LUCK_PENALTY,
57STAT_LOSS_ON_DEATH, 78 STAT_LOSS_ON_DEATH,
58PK_LUCK_PENALTY,
59PERMANENT_EXPERIENCE_RATIO, 79 PERMANENT_EXPERIENCE_RATIO,
60DEATH_PENALTY_RATIO, 80 DEATH_PENALTY_RATIO,
61DEATH_PENALTY_LEVEL, 81 DEATH_PENALTY_LEVEL,
62BALANCED_STAT_LOSS, 82 BALANCED_STAT_LOSS,
63NOT_PERMADETH, 83 NOT_PERMADETH,
64SIMPLE_EXP, 84 SIMPLE_EXP,
65RESET_LOCATION_TIME,
66SET_TITLE, 85 SET_TITLE,
67RESURRECTION, 86 RESURRECTION,
68SEARCH_ITEMS, 87 SEARCH_ITEMS,
69SPELL_ENCUMBRANCE, 88 SPELL_ENCUMBRANCE,
70SPELL_FAILURE_EFFECTS, 89 SPELL_FAILURE_EFFECTS,
90 SET_FRIENDLY_FIRE,
71CASTING_TIME, 91 CASTING_TIME,
72REAL_WIZ, 92 REAL_WIZ,
73RECYCLE_TMP_MAPS,
74EXPLORE_MODE, 93 EXPLORE_MODE,
75SPELLPOINT_LEVEL_DEPEND, 94 SPELLPOINT_LEVEL_DEPEND,
76SET_FRIENDLY_FIRE,
77"", /* Who format specifier */
78"", /* who wiz format specifier */
79MOTD, 95 MOTD,
80"rules", 96 "rules",
81"news", 97 "news",
82"", /* DM_MAIL */ 98 "", /* DM_MAIL */
830, /* This and the next 3 values are metaserver values */
84"",
85"",
860,
87"",
880,0,0,0,0,0,0,0, /* worldmap settings*/ 99 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
89EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y, 100 0,
900,
911.0, 101 1.0,
102
92/* Armor enchantment stuff */ 103/* Armor enchantment stuff */
93ARMOR_MAX_ENCHANT, 104 ARMOR_MAX_ENCHANT,
94ARMOR_WEIGHT_REDUCTION, 105 ARMOR_WEIGHT_REDUCTION,
95ARMOR_WEIGHT_LINEAR, 106 ARMOR_WEIGHT_LINEAR,
96ARMOR_SPEED_IMPROVEMENT, 107 ARMOR_SPEED_IMPROVEMENT,
97ARMOR_SPEED_LINEAR, 108 ARMOR_SPEED_LINEAR,
981, /* no_player_stealing */ 109 1, /* no_player_stealing */
991, /* create_home_portals */ 110 1, /* create_home_portals */
100}; 111};
101 112
102/* perhaps not the best place for this, but needs to be 113/* perhaps not the best place for this, but needs to be
103 * in some file in the common area so that standalone 114 * in some file in the common area so that standalone
104 * programs, like the random map generator, can be built. 115 * programs, like the random map generator, can be built.
105 */ 116 */
106const char* const spellpathnames[NRSPELLPATHS] = { 117const char *const spellpathnames[NRSPELLPATHS] = {
107 "Protection", 118 "Protection",
108 "Fire", 119 "Fire",
109 "Frost", 120 "Frost",
110 "Electricity", 121 "Electricity",
111 "Missiles", 122 "Missiles",
112 "Self", 123 "Self",
113 "Summoning", 124 "Summoning",
114 "Abjuration", 125 "Abjuration",
115 "Restoration", 126 "Restoration",
116 "Detonation", 127 "Detonation",
117 "Mind", 128 "Mind",
118 "Creation", 129 "Creation",
119 "Teleportation", 130 "Teleportation",
120 "Information", 131 "Information",
121 "Transmutation", 132 "Transmutation",
122 "Transferrence", 133 "Transferrence",
123 "Turning", 134 "Turning",
124 "Wounding", 135 "Wounding",
125 "Death", 136 "Death",
126 "Light" 137 "Light"
127}; 138};
128
129
130/* This loads the emergency map information from a
131 * .emergency file in the map directory. Doing this makes
132 * it easier to switch between map distributions (don't need
133 * to recompile. Note that there is no reason I see that
134 * this could not be re-loaded during play, but it seems
135 * like there should be little reason to do that.
136 */
137static void init_emergency_mappath(void)
138{
139 char filename[MAX_BUF], tmpbuf[MAX_BUF];
140 FILE *fp;
141 int online=0;
142
143 /* If this file doesn't exist, not a big deal */
144 sprintf(filename,"%s/%s/.emergency",settings.datadir, settings.mapdir);
145 if ((fp = fopen(filename, "r"))!=NULL) {
146 while (fgets(tmpbuf, MAX_BUF-1, fp)) {
147 if (tmpbuf[0] == '#') continue; /* ignore comments */
148
149 if (online == 0) {
150 tmpbuf[strlen(tmpbuf)-1] = 0; /* kill newline */
151 settings.emergency_mapname = strdup_local(tmpbuf);
152 }
153 else if (online == 1) {
154 settings.emergency_x = atoi(tmpbuf);
155 }
156
157 else if (online == 2) {
158 settings.emergency_y = atoi(tmpbuf);
159 }
160 online++;
161 if (online>2) break;
162 }
163 fclose(fp);
164 if (online<=2)
165 LOG(llevError,"Online read partial data from %s\n", filename);
166 LOG(llevDebug,"Emergency mappath reset to %s (%d, %d)\n", settings.emergency_mapname,
167 settings.emergency_x, settings.emergency_y);
168 }
169}
170
171 139
172/* 140/*
173 * It is vital that init_library() is called by any functions 141 * It is vital that init_library() is called by any functions
174 * using this library. 142 * using this library.
175 * If you want to lessen the size of the program using the library, 143 * If you want to lessen the size of the program using the library,
176 * you can replace the call to init_library() with init_globals() and 144 * you can replace the call to init_library() with init_globals() and
177 * init_function_pointers(). Good idea to also call init_vars and 145 * init_function_pointers(). Good idea to also call init_vars and
178 * init_hash_table if you are doing any object loading. 146 * init_hash_table if you are doing any object loading.
179 */ 147 */
180 148void
181void init_library(void) { 149init_library (void)
182 init_environ(); 150{
183 init_globals(); 151 init_globals ();
184 init_objects();
185 init_vars();
186 init_block(); 152 init_block ();
187 ReadBmapNames ();
188 ReadSmooth();
189 init_anim(); /* Must be after we read in the bitmaps */
190 init_archetypes(); /* Reads all archetypes from file */
191 init_dynamic (); 153 init_dynamic ();
192 init_attackmess(); 154 init_attackmess ();
193 init_clocks();
194 init_emergency_mappath();
195 init_experience(); 155 init_experience ();
196} 156}
197 157
198
199/* init_environ initializes values from the environmental variables. 158/* init_environ initialises values from the environmental variables.
200 * it needs to be called very early, since command line options should 159 * it needs to be called very early, since command line options should
201 * overwrite these if specified. 160 * overwrite these if specified.
202 */ 161 */
162void
203void init_environ(void) { 163init_environ (void)
164{
204 char *cp; 165 char *cp;
205 166
206 cp=getenv("CROSSFIRE_LIBDIR"); 167 cp = getenv ("CROSSFIRE_LIBDIR");
168 if (cp)
207 if (cp) settings.datadir=cp; 169 settings.datadir = cp;
170
208 cp=getenv("CROSSFIRE_LOCALDIR"); 171 cp = getenv ("CROSSFIRE_LOCALDIR");
172 if (cp)
209 if (cp) settings.localdir=cp; 173 settings.localdir = cp;
174
210 cp=getenv("CROSSFIRE_PLAYERDIR"); 175 cp = getenv ("CROSSFIRE_PLAYERDIR");
176 if (cp)
211 if (cp) settings.playerdir=cp; 177 settings.playerdir = cp;
178
212 cp=getenv("CROSSFIRE_MAPDIR"); 179 cp = getenv ("CROSSFIRE_MAPDIR");
180 if (cp)
213 if (cp) settings.mapdir=cp; 181 settings.mapdir = cp;
182
214 cp=getenv("CROSSFIRE_ARCHETYPES"); 183 cp = getenv ("CROSSFIRE_ARCHETYPES");
184 if (cp)
215 if (cp) settings.archetypes=cp; 185 settings.archetypes = cp;
186
216 cp=getenv("CROSSFIRE_TREASURES"); 187 cp = getenv ("CROSSFIRE_TREASURES");
188 if (cp)
217 if (cp) settings.treasures=cp; 189 settings.treasures = cp;
190
218 cp=getenv("CROSSFIRE_UNIQUEDIR"); 191 cp = getenv ("CROSSFIRE_UNIQUEDIR");
192 if (cp)
219 if (cp) settings.uniquedir=cp; 193 settings.uniquedir = cp;
194
220 cp=getenv("CROSSFIRE_TEMPLATEDIR"); 195 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
196 if (cp)
221 if (cp) settings.templatedir=cp; 197 settings.templatedir = cp;
198
222 cp=getenv("CROSSFIRE_TMPDIR"); 199 cp = getenv ("CROSSFIRE_TMPDIR");
200 if (cp)
223 if (cp) settings.tmpdir=cp; 201 settings.tmpdir = cp;
224} 202}
225
226 203
227/* 204/*
228 * Initialises all global variables. 205 * Initialises all global variables.
229 * Might use environment-variables as default for some of them. 206 * Might use environment-variables as default for some of them.
230 */ 207 */
231 208void
232void init_globals(void) { 209init_globals (void)
210{
233 if (settings.logfilename[0] == 0) { 211 if (settings.logfilename[0] == 0)
212 logfile = stderr;
213 else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
214 {
215 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
234 logfile = stderr; 216 logfile = stderr;
235 } 217 }
236 else if ((logfile=fopen(settings.logfilename, "a"))==NULL) { 218 else
237 fprintf(stderr,"Unable to open %s as the logfile - will use stderr instead\n", 219 setvbuf (logfile, NULL, _IOLBF, 0);
238 settings.logfilename); 220}
239 logfile = stderr; 221
222void
223init_dynamic (void)
224{
225 archetype *at = first_archetype;
226
227 while (at)
228 {
229 if (at->clone.type == MAP)
230 {
231 if (at->clone.race)
232 first_map_ext_path = at->clone.race;
233
234 if (EXIT_PATH (&at->clone))
235 {
236 first_map_path = EXIT_PATH (&at->clone);
237 return;
238 }
239 }
240
241 at = at->next;
240 } 242 }
243
244 LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n");
245 exit (-1);
246}
247
248/*
249 * initialises the attack messages.
250 * Called by init_library().
251 */
252
253//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
254
255void
256init_attackmess (void)
257{
258 char buf[MAX_BUF];
259 char filename[MAX_BUF];
260 char *cp, *p;
261 FILE *fp;
262 static int has_been_done = 0;
263 int mess, level, comp;
264 int mode = 0, total = 0;
265
266 if (has_been_done)
267 return;
241 else { 268 else
242 setvbuf(logfile, NULL, _IOLBF, 0); 269 has_been_done = 1;
270
271 sprintf (filename, "%s/attackmess", settings.datadir);
272 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
273 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
274 {
275 LOG (llevError, "Can't open %s.\n", filename);
276 return;
243 } 277 }
244 exiting = 0;
245 first_player=NULL;
246 first_friendly_object=NULL;
247 first_map=NULL;
248 first_treasurelist=NULL;
249 first_artifactlist=NULL;
250 first_archetype=NULL;
251 *first_map_ext_path=0;
252 warn_archetypes=0;
253 nroftreasures = 0;
254 nrofartifacts = 0;
255 nrofallowedstr=0;
256 ring_arch = NULL;
257 amulet_arch = NULL;
258 staff_arch = NULL;
259 trying_emergency_save = 0;
260 num_animations=0;
261 animations_allocated=0;
262 init_defaults();
263}
264 278
265/* 279 level = 0;
266 * Sets up and initialises the linked list of free and used objects. 280 while (fgets (buf, MAX_BUF, fp) != NULL)
267 * Allocates a certain chunk of objects and puts them on the free list. 281 {
268 * Called by init_library(); 282 if (*buf == '#')
269 */ 283 continue;
284 if ((cp = strchr (buf, '\n')) != NULL)
285 *cp = '\0';
286 cp = buf;
287 while (*cp == ' ') /* Skip blanks */
288 cp++;
270 289
271void 290 if (strncmp (cp, "TYPE:", 5) == 0)
272init_objects(void) 291 {
273{ 292 p = strtok (buf, ":");
274 /* Initialize all objects: */ 293 p = strtok (NULL, ":");
275 objects = NULL; 294 if (mode == 1)
276 active_objects = NULL; 295 {
277} 296 attack_mess[mess][level].level = -1;
278 297 attack_mess[mess][level].buf1 = NULL;
279/* 298 attack_mess[mess][level].buf2 = NULL;
280 * Initialises global variables which can be changed by options. 299 attack_mess[mess][level].buf3 = NULL;
281 * Called by init_library().
282 */
283
284void init_defaults(void) {
285 editor=0;
286 nroferrors=0;
287}
288
289
290void init_dynamic (void) {
291 archetype *at = first_archetype;
292 while (at) {
293 if (at->clone.type == MAP) {
294 if (at->clone.race) {
295 strcpy (first_map_ext_path, at->clone.race);
296 } 300 }
297 if (EXIT_PATH (&at->clone)) { 301 level = 0;
298 strcpy (first_map_path, EXIT_PATH (&at->clone)); 302 mess = atoi (p);
299 return; 303 mode = 1;
304 continue;
300 } 305 }
306 if (mode == 1)
301 } 307 {
302 at = at->next; 308 p = strtok (buf, "=");
309 attack_mess[mess][level].level = atoi (buf);
310 p = strtok (NULL, "=");
311 if (p != NULL)
312 attack_mess[mess][level].buf1 = strdup (p);
313 else
314 attack_mess[mess][level].buf1 = strdup ("");
315 mode = 2;
316 continue;
317 }
318 else if (mode == 2)
319 {
320 p = strtok (buf, "=");
321 attack_mess[mess][level].level = atoi (buf);
322 p = strtok (NULL, "=");
323 if (p != NULL)
324 attack_mess[mess][level].buf2 = strdup (p);
325 else
326 attack_mess[mess][level].buf2 = strdup ("");
327 mode = 3;
328 continue;
329 }
330 else if (mode == 3)
331 {
332 p = strtok (buf, "=");
333 attack_mess[mess][level].level = atoi (buf);
334 p = strtok (NULL, "=");
335 if (p != NULL)
336 attack_mess[mess][level].buf3 = strdup (p);
337 else
338 attack_mess[mess][level].buf3 = strdup ("");
339 mode = 1;
340 level++;
341 total++;
342 continue;
343 }
303 } 344 }
304 LOG(llevDebug,"You Need a archetype called 'map' and it have to contain start map\n");
305 exit (-1);
306}
307
308unsigned long todtick;
309
310/*
311 * Write out the current time to the file so time does not
312 * reset every time the server reboots.
313 */
314
315void write_todclock(void)
316{
317 char filename[MAX_BUF];
318 FILE *fp;
319
320 sprintf(filename, "%s/clockdata", settings.localdir);
321 if ((fp = fopen(filename, "w")) == NULL) {
322 LOG(llevError, "Cannot open %s for writing\n", filename);
323 return;
324 }
325 fprintf(fp, "%lu", todtick);
326 fclose(fp);
327}
328
329/*
330 * Initializes the gametime and TOD counters
331 * Called by init_library().
332 */
333
334void init_clocks(void)
335{
336 char filename[MAX_BUF];
337 FILE *fp;
338 static int has_been_done=0;
339
340 if (has_been_done)
341 return;
342 else
343 has_been_done = 1;
344
345 sprintf(filename, "%s/clockdata", settings.localdir);
346 LOG(llevDebug, "Reading clockdata from %s...", filename);
347 if ((fp = fopen(filename, "r")) == NULL) {
348 LOG(llevError, "Can't open %s.\n", filename);
349 todtick = 0;
350 write_todclock();
351 return;
352 }
353 fscanf(fp, "%lu", &todtick);
354 LOG(llevDebug, "todtick=%lu\n", todtick);
355 fclose(fp);
356}
357
358/*
359 * Initializes the attack messages.
360 * Called by init_library().
361 */
362
363//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
364
365void init_attackmess(void){
366 char buf[MAX_BUF];
367 char filename[MAX_BUF];
368 char *cp, *p;
369 FILE *fp;
370 static int has_been_done=0;
371 int mess, level, comp;
372 int mode=0, total=0;
373
374 if (has_been_done)
375 return;
376 else
377 has_been_done = 1;
378
379 sprintf(filename, "%s/attackmess", settings.datadir);
380 LOG(llevDebug, "Reading attack messages from %s...", filename);
381 if ((fp = open_and_uncompress(filename, 0, &comp)) == NULL) {
382 LOG(llevError, "Can't open %s.\n", filename);
383 return;
384 }
385
386 level = 0;
387 while (fgets(buf, MAX_BUF, fp)!=NULL) {
388 if (*buf=='#') continue;
389 if((cp=strchr(buf,'\n'))!=NULL)
390 *cp='\0';
391 cp=buf;
392 while(*cp==' ') /* Skip blanks */
393 cp++;
394
395 if (strncmp(cp, "TYPE:", 5)==0) {
396 p = strtok(buf, ":");
397 p = strtok(NULL, ":");
398 if (mode == 1) {
399 attack_mess[mess][level].level = -1;
400 attack_mess[mess][level].buf1 = NULL;
401 attack_mess[mess][level].buf2 = NULL;
402 attack_mess[mess][level].buf3 = NULL;
403 }
404 level = 0;
405 mess = atoi(p);
406 mode = 1;
407 continue;
408 }
409 if (mode==1) {
410 p = strtok(buf, "=");
411 attack_mess[mess][level].level = atoi(buf);
412 p = strtok(NULL, "=");
413 if (p != NULL)
414 attack_mess[mess][level].buf1 = strdup_local(p);
415 else
416 attack_mess[mess][level].buf1 = strdup_local("");
417 mode = 2;
418 continue;
419 } else if (mode==2) {
420 p = strtok(buf, "=");
421 attack_mess[mess][level].level = atoi(buf);
422 p = strtok(NULL, "=");
423 if (p != NULL)
424 attack_mess[mess][level].buf2 = strdup_local(p);
425 else
426 attack_mess[mess][level].buf2 = strdup_local("");
427 mode = 3;
428 continue;
429 } else if (mode==3) {
430 p = strtok(buf, "=");
431 attack_mess[mess][level].level = atoi(buf);
432 p = strtok(NULL, "=");
433 if (p != NULL)
434 attack_mess[mess][level].buf3 = strdup_local(p);
435 else
436 attack_mess[mess][level].buf3 = strdup_local("");
437 mode = 1;
438 level++;
439 total++;
440 continue;
441 }
442 }
443 LOG(llevDebug, "got %d messages in %d categories.\n", total, mess+1); 345 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
444 close_and_delete(fp, comp); 346 close_and_delete (fp, comp);
445} 347}

Diff Legend

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