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.60 by root, Fri Jun 18 17:31:01 2010 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,2009,2010 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 Mark Wedel & Crossfire Development Team
10 Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (©) 1992 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 llevTrace, /* Log level */
41/* Debug level */
42#ifdef DEBUG
43 llevDebug,
44#else
45 llevInfo,
46#endif
47
480, NULL, 0, /* dumpvalues, dumparg, daemonmode */ 63 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */
490, /* argc */ 64 0, /* argc */
50NULL, /* argv */ 65 NULL, /* argv */
51CONFDIR, 66 CONFDIR,
52DATADIR, 67 DATADIR,
53LOCALDIR, 68 LOCALDIR,
54PLAYERDIR, MAPDIR, ARCHETYPES,REGIONS,TREASURES, 69 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
55UNIQUE_DIR, TEMPLATE_DIR, 70 UNIQUE_DIR, "",
56TMPDIR, 71 TMPDIR,
72 PK_LUCK_PENALTY,
57STAT_LOSS_ON_DEATH, 73 STAT_LOSS_ON_DEATH,
58PK_LUCK_PENALTY,
59PERMANENT_EXPERIENCE_RATIO, 74 PERMANENT_EXPERIENCE_RATIO,
60DEATH_PENALTY_RATIO, 75 DEATH_PENALTY_RATIO,
61DEATH_PENALTY_LEVEL, 76 DEATH_PENALTY_LEVEL,
62BALANCED_STAT_LOSS, 77 BALANCED_STAT_LOSS,
63NOT_PERMADETH, 78 NOT_PERMADETH,
64SIMPLE_EXP, 79 SIMPLE_EXP,
65RESET_LOCATION_TIME,
66SET_TITLE, 80 SET_TITLE,
67RESURRECTION, 81 RESURRECTION,
68SEARCH_ITEMS, 82 SEARCH_ITEMS,
69SPELL_ENCUMBRANCE, 83 SPELL_ENCUMBRANCE,
70SPELL_FAILURE_EFFECTS, 84 SPELL_FAILURE_EFFECTS,
71CASTING_TIME, 85 SET_FRIENDLY_FIRE,
72REAL_WIZ, 86 0,
73RECYCLE_TMP_MAPS, 87 0,
74EXPLORE_MODE, 88 EXPLORE_MODE,
75SPELLPOINT_LEVEL_DEPEND, 89 SPELLPOINT_LEVEL_DEPEND,
76SET_FRIENDLY_FIRE, 90 0,
77"", /* Who format specifier */ 91 1.25,
78"", /* who wiz format specifier */ 92
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,
92/* Armor enchantment stuff */ 93/* Armor enchantment stuff */
93ARMOR_MAX_ENCHANT, 94 ARMOR_MAX_ENCHANT,
94ARMOR_WEIGHT_REDUCTION, 95 ARMOR_WEIGHT_REDUCTION,
95ARMOR_WEIGHT_LINEAR, 96 ARMOR_WEIGHT_LINEAR,
96ARMOR_SPEED_IMPROVEMENT, 97 ARMOR_SPEED_IMPROVEMENT,
97ARMOR_SPEED_LINEAR, 98 ARMOR_SPEED_LINEAR,
981, /* no_player_stealing */
991, /* create_home_portals */
100}; 99};
101 100
102/* perhaps not the best place for this, but needs to be 101/* perhaps not the best place for this, but needs to be
103 * in some file in the common area so that standalone 102 * in some file in the common area so that standalone
104 * programs, like the random map generator, can be built. 103 * programs, like the random map generator, can be built.
105 */ 104 */
106const char* const spellpathnames[NRSPELLPATHS] = { 105const char *const spellpathnames[NRSPELLPATHS] = {
107 "Protection", 106 "Protection",
108 "Fire", 107 "Fire",
109 "Frost", 108 "Frost",
110 "Electricity", 109 "Electricity",
111 "Missiles", 110 "Missiles",
112 "Self", 111 "Self",
113 "Summoning", 112 "Summoning",
114 "Abjuration", 113 "Abjuration",
115 "Restoration", 114 "Restoration",
116 "Detonation", 115 "Detonation",
117 "Mind", 116 "Mind",
118 "Creation", 117 "Creation",
119 "Teleportation", 118 "Teleportation",
120 "Information", 119 "Information",
121 "Transmutation", 120 "Transmutation",
122 "Transferrence", 121 "Transferrence",
123 "Turning", 122 "Turning",
124 "Wounding", 123 "Wounding",
125 "Death", 124 "Death",
126 "Light" 125 "Light"
127}; 126};
128 127
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. 128/* init_environ initialises values from the environmental variables.
201 * it needs to be called very early, since command line options should 129 * it needs to be called very early, since command line options should
202 * overwrite these if specified. 130 * overwrite these if specified.
203 */ 131 */
204void init_environ(void) { 132void
133init_environ ()
134{
205 char *cp; 135 const char *cp;
206 136
207 cp=getenv("CROSSFIRE_LIBDIR"); 137 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
208 if (cp) settings.datadir=cp; 138 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp;
209 cp=getenv("CROSSFIRE_LOCALDIR"); 139 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
210 if (cp) settings.localdir=cp; 140 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
211 cp=getenv("CROSSFIRE_PLAYERDIR"); 141 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
212 if (cp) settings.playerdir=cp; 142 if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp;
213 cp=getenv("CROSSFIRE_MAPDIR"); 143 if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp;
214 if (cp) settings.mapdir=cp; 144 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
215 cp=getenv("CROSSFIRE_ARCHETYPES"); 145 if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp;
216 if (cp) settings.archetypes=cp; 146 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
217 cp=getenv("CROSSFIRE_TREASURES"); 147
218 if (cp) settings.treasures=cp; 148 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
219 cp=getenv("CROSSFIRE_UNIQUEDIR");
220 if (cp) settings.uniquedir=cp;
221 cp=getenv("CROSSFIRE_TEMPLATEDIR");
222 if (cp) settings.templatedir=cp;
223 cp=getenv("CROSSFIRE_TMPDIR");
224 if (cp) settings.tmpdir=cp;
225} 149}
226
227 150
228/* 151/*
229 * Initialises all global variables. 152 * Initialises all global variables.
230 * Might use environment-variables as default for some of them. 153 * Might use environment-variables as default for some of them.
231 */ 154 */
232 155void
233void init_globals(void) { 156init_globals ()
157{
234 if (settings.logfilename[0] == 0) { 158 if (settings.logfilename[0] == 0)
235 logfile = stderr; 159 log_setfd (-1);
160 else
161 {
162 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
163
164 if (logfd >= 0)
165 log_setfd (logfd);
166 else
167 {
168 log_setfd (-1);
169 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
170 }
236 } 171 }
237 else if ((logfile=fopen(settings.logfilename, "a"))==NULL) { 172}
238 fprintf(stderr,"Unable to open %s as the logfile - will use stderr instead\n", 173
239 settings.logfilename); 174void
240 logfile = stderr; 175init_dynamic ()
176{
177 first_map_ext_path = "/start/HallsOfSelection";
178 first_map_path = "/HallOfSelection";
179}
180
181/*
182 * initialises the attack messages.
183 * Called by init_library().
184 */
185
186//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
187
188void
189init_attackmess ()
190{
191 object_thawer thawer (settings.datadir, "attackmess");
192
193 if (!thawer)
194 {
195 LOG (llevError, "Can't open %s.\n", thawer.name);
196 return;
241 } 197 }
242 else { 198
243 setvbuf(logfile, NULL, _IOLBF, 0); 199 int msgnum = -1;
200 int total = 0;
201
202 while (thawer.kw)
203 {
204 if (thawer.kw != KW_type)
205 if (!thawer.parse_error ("attackmess file"))
206 break;
207
208 thawer.get (msgnum);
209 thawer.next ();
210
211 int level = 0;
212
213 while (thawer.kw == KW_hp)
214 {
215 // our old friend, dog-slow sscanf
216 int hp;
217 char buf1[1024];
218 char buf2[1024];
219 char buf3[1024];
220
221 if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]",
222 &hp, buf1, buf2, buf3))
223 thawer.parse_error ("attackmess file");
224 else
225 {
226 if (*buf2 == '-')
227 *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker
228
229 attack_mess[msgnum][level].level = hp;
230 attack_mess[msgnum][level].buf1 = strdup (buf1);
231 attack_mess[msgnum][level].buf2 = strdup (buf2);
232 attack_mess[msgnum][level].buf3 = strdup (buf3);
233
234 ++level;
235 ++total;
236 }
237
238 thawer.next ();
239 }
240
241 attack_mess[msgnum][level].level = -1;
242 attack_mess[msgnum][level].buf1 = 0;
243 attack_mess[msgnum][level].buf2 = 0;
244 attack_mess[msgnum][level].buf3 = 0;
244 } 245 }
245 exiting = 0;
246 first_player=NULL;
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}
267 246
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); 247 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
466 close_and_delete(fp, comp);
467} 248}
249

Diff Legend

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