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.4 by root, Sun Sep 3 07:57:54 2006 UTC vs.
Revision 1.44 by root, Tue Apr 15 03:16:02 2008 UTC

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

Diff Legend

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