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.35 by root, Thu May 17 14:14: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
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,
71CASTING_TIME, 90 SET_FRIENDLY_FIRE,
72REAL_WIZ, 91 0,
73RECYCLE_TMP_MAPS, 92 0,
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 */
991, /* create_home_portals */
100}; 109};
101 110
102/* perhaps not the best place for this, but needs to be 111/* perhaps not the best place for this, but needs to be
103 * in some file in the common area so that standalone 112 * in some file in the common area so that standalone
104 * programs, like the random map generator, can be built. 113 * programs, like the random map generator, can be built.
105 */ 114 */
106const char* const spellpathnames[NRSPELLPATHS] = { 115const char *const spellpathnames[NRSPELLPATHS] = {
107 "Protection", 116 "Protection",
108 "Fire", 117 "Fire",
109 "Frost", 118 "Frost",
110 "Electricity", 119 "Electricity",
111 "Missiles", 120 "Missiles",
112 "Self", 121 "Self",
113 "Summoning", 122 "Summoning",
114 "Abjuration", 123 "Abjuration",
115 "Restoration", 124 "Restoration",
116 "Detonation", 125 "Detonation",
117 "Mind", 126 "Mind",
118 "Creation", 127 "Creation",
119 "Teleportation", 128 "Teleportation",
120 "Information", 129 "Information",
121 "Transmutation", 130 "Transmutation",
122 "Transferrence", 131 "Transferrence",
123 "Turning", 132 "Turning",
124 "Wounding", 133 "Wounding",
125 "Death", 134 "Death",
126 "Light" 135 "Light"
127}; 136};
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 137
172/* 138/*
173 * It is vital that init_library() is called by any functions 139 * It is vital that init_library() is called by any functions
174 * using this library. 140 * using this library.
175 * If you want to lessen the size of the program using the library, 141 * 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 142 * you can replace the call to init_library() with init_globals() and
177 * init_function_pointers(). Good idea to also call init_vars and 143 * init_function_pointers(). Good idea to also call init_vars and
178 * init_hash_table if you are doing any object loading. 144 * init_hash_table if you are doing any object loading.
179 */ 145 */
180 146void
181void init_library(void) { 147init_library (void)
182 init_environ(); 148{
183 init_globals(); 149 init_globals ();
184 init_objects();
185 init_vars();
186 init_block(); 150 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 (); 151 init_dynamic ();
192 init_attackmess(); 152 init_attackmess ();
193 init_clocks();
194 init_emergency_mappath();
195 init_experience(); 153 init_experience ();
196} 154}
197 155
198
199/* init_environ initializes values from the environmental variables. 156/* init_environ initialises values from the environmental variables.
200 * it needs to be called very early, since command line options should 157 * it needs to be called very early, since command line options should
201 * overwrite these if specified. 158 * overwrite these if specified.
202 */ 159 */
160void
203void init_environ(void) { 161init_environ (void)
162{
204 char *cp; 163 char *cp;
205 164
206 cp=getenv("CROSSFIRE_LIBDIR"); 165 cp = getenv ("CROSSFIRE_LIBDIR");
166 if (cp)
207 if (cp) settings.datadir=cp; 167 settings.datadir = cp;
168
208 cp=getenv("CROSSFIRE_LOCALDIR"); 169 cp = getenv ("CROSSFIRE_LOCALDIR");
170 if (cp)
209 if (cp) settings.localdir=cp; 171 settings.localdir = cp;
172
210 cp=getenv("CROSSFIRE_PLAYERDIR"); 173 cp = getenv ("CROSSFIRE_PLAYERDIR");
174 if (cp)
211 if (cp) settings.playerdir=cp; 175 settings.playerdir = cp;
176
212 cp=getenv("CROSSFIRE_MAPDIR"); 177 cp = getenv ("CROSSFIRE_MAPDIR");
178 if (cp)
213 if (cp) settings.mapdir=cp; 179 settings.mapdir = cp;
180
214 cp=getenv("CROSSFIRE_ARCHETYPES"); 181 cp = getenv ("CROSSFIRE_ARCHETYPES");
182 if (cp)
215 if (cp) settings.archetypes=cp; 183 settings.archetypes = cp;
184
216 cp=getenv("CROSSFIRE_TREASURES"); 185 cp = getenv ("CROSSFIRE_TREASURES");
186 if (cp)
217 if (cp) settings.treasures=cp; 187 settings.treasures = cp;
188
218 cp=getenv("CROSSFIRE_UNIQUEDIR"); 189 cp = getenv ("CROSSFIRE_UNIQUEDIR");
190 if (cp)
219 if (cp) settings.uniquedir=cp; 191 settings.uniquedir = cp;
192
220 cp=getenv("CROSSFIRE_TEMPLATEDIR"); 193 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
194 if (cp)
221 if (cp) settings.templatedir=cp; 195 settings.templatedir = cp;
196
222 cp=getenv("CROSSFIRE_TMPDIR"); 197 cp = getenv ("CROSSFIRE_TMPDIR");
198 if (cp)
223 if (cp) settings.tmpdir=cp; 199 settings.tmpdir = cp;
224} 200}
225
226 201
227/* 202/*
228 * Initialises all global variables. 203 * Initialises all global variables.
229 * Might use environment-variables as default for some of them. 204 * Might use environment-variables as default for some of them.
230 */ 205 */
231 206void
232void init_globals(void) { 207init_globals (void)
208{
233 if (settings.logfilename[0] == 0) { 209 if (settings.logfilename[0] == 0)
210 logfile = stderr;
211 else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
212 {
213 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
234 logfile = stderr; 214 logfile = stderr;
235 } 215 }
236 else if ((logfile=fopen(settings.logfilename, "a"))==NULL) { 216 else
237 fprintf(stderr,"Unable to open %s as the logfile - will use stderr instead\n", 217 setvbuf (logfile, NULL, _IOLBF, 0);
238 settings.logfilename); 218}
239 logfile = stderr; 219
220void
221init_dynamic (void)
222{
223 archetype *at = first_archetype;
224
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 } 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}
245
246/*
247 * initialises the attack messages.
248 * Called by init_library().
249 */
250
251//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
252
253void
254init_attackmess (void)
255{
256 char buf[MAX_BUF];
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
264 if (has_been_done)
265 return;
241 else { 266 else
242 setvbuf(logfile, NULL, _IOLBF, 0); 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 {
273 LOG (llevError, "Can't open %s.\n", filename);
274 return;
243 } 275 }
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 276
265/* 277 level = 0;
266 * Sets up and initialises the linked list of free and used objects. 278 while (fgets (buf, MAX_BUF, fp) != NULL)
267 * Allocates a certain chunk of objects and puts them on the free list. 279 {
268 * Called by init_library(); 280 if (*buf == '#')
269 */ 281 continue;
282 if ((cp = strchr (buf, '\n')) != NULL)
283 *cp = '\0';
284 cp = buf;
285 while (*cp == ' ') /* Skip blanks */
286 cp++;
270 287
271void 288 if (strncmp (cp, "TYPE:", 5) == 0)
272init_objects(void) 289 {
273{ 290 p = strtok (buf, ":");
274 /* Initialize all objects: */ 291 p = strtok (NULL, ":");
275 objects = NULL; 292 if (mode == 1)
276 active_objects = NULL; 293 {
277} 294 attack_mess[mess][level].level = -1;
278 295 attack_mess[mess][level].buf1 = NULL;
279/* 296 attack_mess[mess][level].buf2 = NULL;
280 * Initialises global variables which can be changed by options. 297 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 } 298 }
297 if (EXIT_PATH (&at->clone)) { 299 level = 0;
298 strcpy (first_map_path, EXIT_PATH (&at->clone)); 300 mess = atoi (p);
299 return; 301 mode = 1;
302 continue;
300 } 303 }
304 if (mode == 1)
301 } 305 {
302 at = at->next; 306 p = strtok (buf, "=");
307 attack_mess[mess][level].level = atoi (buf);
308 p = strtok (NULL, "=");
309 if (p != NULL)
310 attack_mess[mess][level].buf1 = strdup (p);
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);
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);
335 else
336 attack_mess[mess][level].buf3 = strdup ("");
337 mode = 1;
338 level++;
339 total++;
340 continue;
341 }
303 } 342 }
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); 343 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
444 close_and_delete(fp, comp); 344 close_and_delete (fp, comp);
445} 345}

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines