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

Diff Legend

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