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.2 by root, Tue Aug 29 08:01:35 2006 UTC vs.
Revision 1.67 by root, Wed Nov 16 23:41:59 2016 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.2 2006/08/29 08:01:35 root Exp $";
4 */ 3 *
5 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
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_name[NROFATTACKS] = {
33# define def(uc, lc, desc, plus, change) # lc,
34# include "attackinc.h"
35# undef def
36};
37
38extern const char *const attacktype_desc[NROFATTACKS] = {
39# define def(uc, lc, desc, plus, change) # desc,
40# include "attackinc.h"
41# undef def
42};
43
44extern const char *const resist_plus[NROFATTACKS] = {
45# define def(uc, lc, desc, plus, change) # plus,
46# include "attackinc.h"
47# undef def
48};
49
50extern const char *const change_resist_msg[NROFATTACKS] = {
51# define def(uc, lc, desc, plus, change) # change,
52# include "attackinc.h"
53# undef def
54};
55
56int resist_table[NROFATTACKS] = {
57# define def(uc, lc, desc, plus, change) ATNR_ ## uc,
58# include "attackinc.h"
59# undef def
60};
61
34/* You unforunately need to looking in include/global.h to see what these 62/* You unforunately need to looking in include/global.h to see what these
35 * correspond to. 63 * correspond to.
36 */ 64 */
37struct Settings settings = { 65struct Settings settings = {
38LOGFILE, /* Logfile */ 66 LOGFILE, /* Logfile */
39CSPORT, /* Client/server port */ 67 llevTrace, /* Log level */
40 68 0, /* argc */
41/* Debug level */ 69 NULL, /* argv */
42#ifdef DEBUG
43 llevDebug,
44#else
45 llevInfo,
46#endif
47
480, NULL, 0, /* dumpvalues, dumparg, daemonmode */
490, /* argc */
50NULL, /* argv */
51CONFDIR, 70 CONFDIR,
52DATADIR, 71 DATADIR,
53LOCALDIR, 72 LOCALDIR,
54PLAYERDIR, MAPDIR, ARCHETYPES,REGIONS,TREASURES, 73 PLAYERDIR,
55UNIQUE_DIR, TEMPLATE_DIR, 74 MAPDIR,
75 UNIQUE_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,
73RECYCLE_TMP_MAPS,
74EXPLORE_MODE,
75SPELLPOINT_LEVEL_DEPEND, 91 SPELLPOINT_LEVEL_DEPEND,
76SET_FRIENDLY_FIRE, 92 0,
77"", /* Who format specifier */ 93 1.25,
78"", /* who wiz format specifier */ 94
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 */ 95/* Armor enchantment stuff */
93ARMOR_MAX_ENCHANT, 96 ARMOR_MAX_ENCHANT,
94ARMOR_WEIGHT_REDUCTION, 97 ARMOR_WEIGHT_REDUCTION,
95ARMOR_WEIGHT_LINEAR, 98 ARMOR_WEIGHT_LINEAR,
96ARMOR_SPEED_IMPROVEMENT, 99 ARMOR_SPEED_IMPROVEMENT,
97ARMOR_SPEED_LINEAR, 100 ARMOR_SPEED_LINEAR,
981, /* no_player_stealing */
991, /* create_home_portals */
100}; 101};
101 102
102/* perhaps not the best place for this, but needs to be 103/* perhaps not the best place for this, but needs to be
103 * in some file in the common area so that standalone 104 * in some file in the common area so that standalone
104 * programs, like the random map generator, can be built. 105 * programs, like the random map generator, can be built.
105 */ 106 */
106const char* const spellpathnames[NRSPELLPATHS] = { 107const char *const spellpathnames[NRSPELLPATHS] = {
107 "Protection", 108 "Protection",
108 "Fire", 109 "Fire",
109 "Frost", 110 "Frost",
110 "Electricity", 111 "Electricity",
111 "Missiles", 112 "Missiles",
112 "Self", 113 "Self",
113 "Summoning", 114 "Summoning",
114 "Abjuration", 115 "Abjuration",
115 "Restoration", 116 "Restoration",
116 "Detonation", 117 "Detonation",
117 "Mind", 118 "Mind",
118 "Creation", 119 "Creation",
119 "Teleportation", 120 "Teleportation",
120 "Information", 121 "Information",
121 "Transmutation", 122 "Transmutation",
122 "Transferrence", 123 "Transferrence",
123 "Turning", 124 "Turning",
124 "Wounding", 125 "Wounding",
125 "Death", 126 "Death",
126 "Light" 127 "Light"
127}; 128};
128 129
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. 130/* init_environ initialises values from the environmental variables.
201 * it needs to be called very early, since command line options should 131 * it needs to be called very early, since command line options should
202 * overwrite these if specified. 132 * overwrite these if specified.
203 */ 133 */
204void init_environ(void) { 134void
135init_environ ()
136{
205 char *cp; 137 const char *cp;
206 138
207 cp=getenv("CROSSFIRE_LIBDIR"); 139 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
208 if (cp) settings.datadir=cp; 140
209 cp=getenv("CROSSFIRE_LOCALDIR"); 141 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; /* deprecated */
210 if (cp) settings.localdir=cp; 142 if (cp = getenv ("DELIANTRA_DATADIR" )) settings.datadir = cp;
211 cp=getenv("CROSSFIRE_PLAYERDIR"); 143 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
212 if (cp) settings.playerdir=cp; 144
213 cp=getenv("CROSSFIRE_MAPDIR"); 145 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
214 if (cp) settings.mapdir=cp; 146 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
215 cp=getenv("CROSSFIRE_ARCHETYPES"); 147 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
216 if (cp) settings.archetypes=cp; 148 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
217 cp=getenv("CROSSFIRE_TREASURES"); 149 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
218 if (cp) settings.treasures=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} 150}
226
227 151
228/* 152/*
229 * Initialises all global variables. 153 * Initialises all global variables.
230 * Might use environment-variables as default for some of them. 154 * Might use environment-variables as default for some of them.
231 */ 155 */
232 156void
233void init_globals(void) { 157init_globals ()
158{
234 if (settings.logfilename[0] == 0) { 159 if (settings.logfilename[0] == 0)
235 logfile = stderr; 160 log_setfd (-1);
236 }
237 else if ((logfile=fopen(settings.logfilename, "a"))==NULL) {
238 fprintf(stderr,"Unable to open %s as the logfile - will use stderr instead\n",
239 settings.logfilename);
240 logfile = stderr;
241 }
242 else { 161 else
243 setvbuf(logfile, NULL, _IOLBF, 0);
244 } 162 {
245 exiting = 0; 163 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
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 164
268/* 165 if (logfd >= 0)
269 * Sets up and initialises the linked list of free and used objects. 166 log_setfd (logfd);
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 167 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 } 168 {
431 if (mode==1) { 169 log_setfd (-1);
432 p = strtok(buf, "="); 170 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
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 } 171 }
464 } 172 }
173}
174
175void
176init_dynamic ()
177{
178 first_map_ext_path = "/start/HallsOfSelection";
179 first_map_path = "/HallOfSelection";
180}
181
182/*
183 * initialises the attack messages.
184 * Called by init_library().
185 */
186
187//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
188
189void
190init_attackmess ()
191{
192 object_thawer thawer (settings.datadir, "attackmess");
193
194 if (!thawer)
195 {
196 LOG (llevError, "Can't open %s.\n", thawer.name);
197 return;
198 }
199
200 int msgnum = -1;
201 int total = 0;
202
203 while (thawer.kw)
204 {
205 if (thawer.kw != KW_type)
206 if (!thawer.parse_error ("attackmess file"))
207 break;
208
209 thawer.get (msgnum);
210 thawer.next ();
211
212 int level = 0;
213
214 while (thawer.kw == KW_hp)
215 {
216 // our old friend, dog-slow sscanf
217 int hp;
218 char buf1[1024];
219 char buf2[1024];
220 char buf3[1024];
221
222 if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]",
223 &hp, buf1, buf2, buf3))
224 thawer.parse_error ("attackmess file");
225 else
226 {
227 if (*buf2 == '-')
228 *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker
229
230 attack_mess[msgnum][level].level = hp;
231 attack_mess[msgnum][level].buf1 = strdup (buf1);
232 attack_mess[msgnum][level].buf2 = strdup (buf2);
233 attack_mess[msgnum][level].buf3 = strdup (buf3);
234
235 ++level;
236 ++total;
237 }
238
239 thawer.next ();
240 }
241
242 attack_mess[msgnum][level].level = -1;
243 attack_mess[msgnum][level].buf1 = 0;
244 attack_mess[msgnum][level].buf2 = 0;
245 attack_mess[msgnum][level].buf3 = 0;
246 }
247
465 LOG(llevDebug, "got %d messages in %d categories.\n", total, mess+1); 248 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
466 close_and_delete(fp, comp);
467} 249}
250

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines