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.1 by elmex, Sun Aug 13 17:16:00 2006 UTC vs.
Revision 1.43 by root, Fri Apr 11 21:09:52 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.1 2006/08/13 17:16:00 elmex 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_hash_table();
185 init_objects();
186 init_vars();
187 init_block();
188 ReadBmapNames ();
189 ReadSmooth();
190 init_anim(); /* Must be after we read in the bitmaps */
191 init_archetypes(); /* Reads all archetypes from file */
192 init_dynamic ();
193 init_attackmess();
194 init_clocks();
195 init_emergency_mappath();
196 init_experience();
197}
198
199
200/* init_environ initializes values from the environmental variables. 137/* init_environ initialises values from the environmental variables.
201 * 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
202 * overwrite these if specified. 139 * overwrite these if specified.
203 */ 140 */
141void
204void init_environ(void) { 142init_environ (void)
143{
205 char *cp; 144 char *cp;
206 145
207 cp=getenv("CROSSFIRE_LIBDIR"); 146 cp = getenv ("DELIANTRA_LIBDIR");
147 if (cp)
208 if (cp) settings.datadir=cp; 148 settings.datadir = cp;
209 cp=getenv("CROSSFIRE_LOCALDIR"); 149
150 cp = getenv ("DELIANTRA_LOCALDIR");
151 if (cp)
210 if (cp) settings.localdir=cp; 152 settings.localdir = cp;
211 cp=getenv("CROSSFIRE_PLAYERDIR"); 153
154 cp = getenv ("DELIANTRA_PLAYERDIR");
155 if (cp)
212 if (cp) settings.playerdir=cp; 156 settings.playerdir = cp;
213 cp=getenv("CROSSFIRE_MAPDIR"); 157
158 cp = getenv ("DELIANTRA_MAPDIR");
159 if (cp)
214 if (cp) settings.mapdir=cp; 160 settings.mapdir = cp;
215 cp=getenv("CROSSFIRE_ARCHETYPES"); 161
162 cp = getenv ("DELIANTRA_ARCHETYPES");
163 if (cp)
216 if (cp) settings.archetypes=cp; 164 settings.archetypes = cp;
217 cp=getenv("CROSSFIRE_TREASURES"); 165
166 cp = getenv ("DELIANTRA_TREASURES");
167 if (cp)
218 if (cp) settings.treasures=cp; 168 settings.treasures = cp;
219 cp=getenv("CROSSFIRE_UNIQUEDIR"); 169
170 cp = getenv ("DELIANTRA_UNIQUEDIR");
171 if (cp)
220 if (cp) settings.uniquedir=cp; 172 settings.uniquedir = cp;
221 cp=getenv("CROSSFIRE_TEMPLATEDIR"); 173
174 cp = getenv ("DELIANTRA_TEMPLATEDIR");
175 if (cp)
222 if (cp) settings.templatedir=cp; 176 settings.templatedir = cp;
223 cp=getenv("CROSSFIRE_TMPDIR"); 177
178 cp = getenv ("DELIANTRA_TMPDIR");
179 if (cp)
224 if (cp) settings.tmpdir=cp; 180 settings.tmpdir = cp;
225} 181}
226
227 182
228/* 183/*
229 * Initialises all global variables. 184 * Initialises all global variables.
230 * Might use environment-variables as default for some of them. 185 * Might use environment-variables as default for some of them.
231 */ 186 */
232 187void
233void init_globals(void) { 188init_globals (void)
189{
234 if (settings.logfilename[0] == 0) { 190 if (settings.logfilename[0] == 0)
235 logfile = stderr; 191 logfile = stderr;
192 else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
193 {
194 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
195 logfile = stderr;
236 } 196 }
237 else if ((logfile=fopen(settings.logfilename, "a"))==NULL) { 197 else
238 fprintf(stderr,"Unable to open %s as the logfile - will use stderr instead\n", 198 setvbuf (logfile, NULL, _IOLBF, 0);
239 settings.logfilename); 199}
240 logfile = stderr; 200
201void
202init_dynamic (void)
203{
204 first_map_ext_path = "/start/HallsOfSelection";
205 first_map_path = "/HallOfSelection";
206}
207
208/*
209 * initialises the attack messages.
210 * Called by init_library().
211 */
212
213//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
214
215void
216init_attackmess (void)
217{
218 char buf[MAX_BUF];
219 char filename[MAX_BUF];
220 char *cp, *p;
221 FILE *fp;
222 static int has_been_done = 0;
223 int mess, level, comp;
224 int mode = 0, total = 0;
225
226 if (has_been_done)
227 return;
228 else
229 has_been_done = 1;
230
231 sprintf (filename, "%s/attackmess", settings.datadir);
232 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
233 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
234 {
235 LOG (llevError, "Can't open %s.\n", filename);
236 return;
241 } 237 }
242 else { 238
243 setvbuf(logfile, NULL, _IOLBF, 0); 239 level = 0;
240 while (fgets (buf, MAX_BUF, fp) != NULL)
241 {
242 if (*buf == '#')
243 continue;
244 if ((cp = strchr (buf, '\n')) != NULL)
245 *cp = '\0';
246 cp = buf;
247 while (*cp == ' ') /* Skip blanks */
248 cp++;
249
250 if (strncmp (cp, "TYPE:", 5) == 0)
251 {
252 p = strtok (buf, ":");
253 p = strtok (NULL, ":");
254 if (mode == 1)
255 {
256 attack_mess[mess][level].level = -1;
257 attack_mess[mess][level].buf1 = NULL;
258 attack_mess[mess][level].buf2 = NULL;
259 attack_mess[mess][level].buf3 = NULL;
260 }
261 level = 0;
262 mess = atoi (p);
263 mode = 1;
264 continue;
265 }
266 if (mode == 1)
267 {
268 p = strtok (buf, "=");
269 attack_mess[mess][level].level = atoi (buf);
270 p = strtok (NULL, "=");
271 if (p != NULL)
272 attack_mess[mess][level].buf1 = strdup (p);
273 else
274 attack_mess[mess][level].buf1 = strdup ("");
275 mode = 2;
276 continue;
277 }
278 else if (mode == 2)
279 {
280 p = strtok (buf, "=");
281 attack_mess[mess][level].level = atoi (buf);
282 p = strtok (NULL, "=");
283 if (p != NULL)
284 attack_mess[mess][level].buf2 = strdup (p);
285 else
286 attack_mess[mess][level].buf2 = strdup ("");
287 mode = 3;
288 continue;
289 }
290 else if (mode == 3)
291 {
292 p = strtok (buf, "=");
293 attack_mess[mess][level].level = atoi (buf);
294 p = strtok (NULL, "=");
295 if (p != NULL)
296 attack_mess[mess][level].buf3 = strdup (p);
297 else
298 attack_mess[mess][level].buf3 = strdup ("");
299 mode = 1;
300 level++;
301 total++;
302 continue;
303 }
244 } 304 }
245 exiting = 0; 305 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
246 first_player=NULL; 306 close_and_delete (fp, comp);
247 first_friendly_object=NULL;
248 first_map=NULL;
249 first_treasurelist=NULL;
250 first_artifactlist=NULL;
251 first_archetype=NULL;
252 *first_map_ext_path=0;
253 warn_archetypes=0;
254 nroftreasures = 0;
255 nrofartifacts = 0;
256 nrofallowedstr=0;
257 ring_arch = NULL;
258 amulet_arch = NULL;
259 staff_arch = NULL;
260 undead_name = add_string("undead");
261 trying_emergency_save = 0;
262 num_animations=0;
263 animations=NULL;
264 animations_allocated=0;
265 init_defaults();
266} 307}
267
268/*
269 * Sets up and initialises the linked list of free and used objects.
270 * Allocates a certain chunk of objects and puts them on the free list.
271 * Called by init_library();
272 */
273
274void init_objects(void) {
275 int i;
276/* Initialize all objects: */
277 objects=NULL;
278 active_objects = NULL;
279
280#ifdef MEMORY_DEBUG
281 free_objects=NULL;
282#else
283 free_objects=objarray;
284 objarray[0].prev=NULL,
285 objarray[0].next= &objarray[1],
286 SET_FLAG(&objarray[0], FLAG_REMOVED);
287 SET_FLAG(&objarray[0], FLAG_FREED);
288 for(i=1;i<STARTMAX-1;i++) {
289 objarray[i].next= &objarray[i+1];
290 objarray[i].prev= &objarray[i-1];
291 SET_FLAG(&objarray[i], FLAG_REMOVED);
292 SET_FLAG(&objarray[i], FLAG_FREED);
293 }
294 objarray[STARTMAX-1].next=NULL;
295 objarray[STARTMAX-1].prev= &objarray[STARTMAX-2];
296 SET_FLAG(&objarray[STARTMAX-1], FLAG_REMOVED);
297 SET_FLAG(&objarray[STARTMAX-1], FLAG_FREED);
298#endif
299}
300
301/*
302 * Initialises global variables which can be changed by options.
303 * Called by init_library().
304 */
305
306void init_defaults(void) {
307 editor=0;
308 nroferrors=0;
309}
310
311
312void init_dynamic (void) {
313 archetype *at = first_archetype;
314 while (at) {
315 if (at->clone.type == MAP) {
316 if (at->clone.race) {
317 strcpy (first_map_ext_path, at->clone.race);
318 }
319 if (EXIT_PATH (&at->clone)) {
320 strcpy (first_map_path, EXIT_PATH (&at->clone));
321 return;
322 }
323 }
324 at = at->next;
325 }
326 LOG(llevDebug,"You Need a archetype called 'map' and it have to contain start map\n");
327 exit (-1);
328}
329
330unsigned long todtick;
331
332/*
333 * Write out the current time to the file so time does not
334 * reset every time the server reboots.
335 */
336
337void write_todclock(void)
338{
339 char filename[MAX_BUF];
340 FILE *fp;
341
342 sprintf(filename, "%s/clockdata", settings.localdir);
343 if ((fp = fopen(filename, "w")) == NULL) {
344 LOG(llevError, "Cannot open %s for writing\n", filename);
345 return;
346 }
347 fprintf(fp, "%lu", todtick);
348 fclose(fp);
349}
350
351/*
352 * Initializes the gametime and TOD counters
353 * Called by init_library().
354 */
355
356void init_clocks(void)
357{
358 char filename[MAX_BUF];
359 FILE *fp;
360 static int has_been_done=0;
361
362 if (has_been_done)
363 return;
364 else
365 has_been_done = 1;
366
367 sprintf(filename, "%s/clockdata", settings.localdir);
368 LOG(llevDebug, "Reading clockdata from %s...", filename);
369 if ((fp = fopen(filename, "r")) == NULL) {
370 LOG(llevError, "Can't open %s.\n", filename);
371 todtick = 0;
372 write_todclock();
373 return;
374 }
375 fscanf(fp, "%lu", &todtick);
376 LOG(llevDebug, "todtick=%lu\n", todtick);
377 fclose(fp);
378}
379
380/*
381 * Initializes the attack messages.
382 * Called by init_library().
383 */
384
385//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
386
387void init_attackmess(void){
388 char buf[MAX_BUF];
389 char filename[MAX_BUF];
390 char *cp, *p;
391 FILE *fp;
392 static int has_been_done=0;
393 int mess, level, comp;
394 int mode=0, total=0;
395
396 if (has_been_done)
397 return;
398 else
399 has_been_done = 1;
400
401 sprintf(filename, "%s/attackmess", settings.datadir);
402 LOG(llevDebug, "Reading attack messages from %s...", filename);
403 if ((fp = open_and_uncompress(filename, 0, &comp)) == NULL) {
404 LOG(llevError, "Can't open %s.\n", filename);
405 return;
406 }
407
408 level = 0;
409 while (fgets(buf, MAX_BUF, fp)!=NULL) {
410 if (*buf=='#') continue;
411 if((cp=strchr(buf,'\n'))!=NULL)
412 *cp='\0';
413 cp=buf;
414 while(*cp==' ') /* Skip blanks */
415 cp++;
416
417 if (strncmp(cp, "TYPE:", 5)==0) {
418 p = strtok(buf, ":");
419 p = strtok(NULL, ":");
420 if (mode == 1) {
421 attack_mess[mess][level].level = -1;
422 attack_mess[mess][level].buf1 = NULL;
423 attack_mess[mess][level].buf2 = NULL;
424 attack_mess[mess][level].buf3 = NULL;
425 }
426 level = 0;
427 mess = atoi(p);
428 mode = 1;
429 continue;
430 }
431 if (mode==1) {
432 p = strtok(buf, "=");
433 attack_mess[mess][level].level = atoi(buf);
434 p = strtok(NULL, "=");
435 if (p != NULL)
436 attack_mess[mess][level].buf1 = strdup_local(p);
437 else
438 attack_mess[mess][level].buf1 = strdup_local("");
439 mode = 2;
440 continue;
441 } else if (mode==2) {
442 p = strtok(buf, "=");
443 attack_mess[mess][level].level = atoi(buf);
444 p = strtok(NULL, "=");
445 if (p != NULL)
446 attack_mess[mess][level].buf2 = strdup_local(p);
447 else
448 attack_mess[mess][level].buf2 = strdup_local("");
449 mode = 3;
450 continue;
451 } else if (mode==3) {
452 p = strtok(buf, "=");
453 attack_mess[mess][level].level = atoi(buf);
454 p = strtok(NULL, "=");
455 if (p != NULL)
456 attack_mess[mess][level].buf3 = strdup_local(p);
457 else
458 attack_mess[mess][level].buf3 = strdup_local("");
459 mode = 1;
460 level++;
461 total++;
462 continue;
463 }
464 }
465 LOG(llevDebug, "got %d messages in %d categories.\n", total, mess+1);
466 close_and_delete(fp, comp);
467}

Diff Legend

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