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.17 by root, Mon Dec 18 02:35:00 2006 UTC vs.
Revision 1.69 by root, Sat Nov 17 23:40:00 2018 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 3 *
4 * Copyright (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
5 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 6 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 7 * Copyright (©) 1992 Frank Tore Johansen
6 8 *
7 This program is free software; you can redistribute it and/or modify 9 * Deliantra is free software: you can redistribute it and/or modify it under
8 it under the terms of the GNU General Public License as published by 10 * the terms of the Affero GNU General Public License as published by the
9 the Free Software Foundation; either version 2 of the License, or 11 * Free Software Foundation, either version 3 of the License, or (at your
10 (at your option) any later version. 12 * option) any later version.
11 13 *
12 This program is distributed in the hope that it will be useful, 14 * This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details. 17 * GNU General Public License for more details.
16 18 *
17 You should have received a copy of the GNU General Public License 19 * You should have received a copy of the Affero GNU General Public License
18 along with this program; if not, write to the Free Software 20 * and the GNU General Public License along with this program. If not, see
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 21 * <http://www.gnu.org/licenses/>.
20 22 *
21 The authors can be reached via e-mail at <crossfire@schmorp.de> 23 * The authors can be reached via e-mail to <support@deliantra.net>
22*/ 24 */
23 25
24#define EXTERN // horrible hack 26#define EXTERN // horrible hack
25 27
26#include <global.h> 28#include <global.h>
27#include <object.h> 29#include <object.h>
28 30
31dynbuf_text msg_dynbuf (65536, 65536);
32
33extern const char *const attacktype_name[NROFATTACKS] = {
34# define def(uc, lc, desc, plus, change) # lc,
35# include "attackinc.h"
36# undef def
37};
38
29extern const char *const attacktype_desc[NROFATTACKS] = { 39extern const char *const attacktype_desc[NROFATTACKS] = {
30# define def(uc, lc, name, plus, change) # name, 40# define def(uc, lc, desc, plus, change) # desc,
31# include "attackinc.h" 41# include "attackinc.h"
32# undef def 42# undef def
33}; 43};
34 44
35extern const char *const resist_plus[NROFATTACKS] = { 45extern const char *const resist_plus[NROFATTACKS] = {
36# define def(uc, lc, name, plus, change) # plus, 46# define def(uc, lc, desc, plus, change) # plus,
37# include "attackinc.h" 47# include "attackinc.h"
38# undef def 48# undef def
39}; 49};
40 50
41extern const char *const change_resist_msg[NROFATTACKS] = { 51extern const char *const change_resist_msg[NROFATTACKS] = {
42# define def(uc, lc, name, plus, change) # change, 52# define def(uc, lc, desc, plus, change) # change,
43# include "attackinc.h" 53# include "attackinc.h"
44# undef def 54# undef def
45}; 55};
46 56
47int resist_table[NROFATTACKS] = { 57int resist_table[NROFATTACKS] = {
48# define def(uc, lc, name, plus, change) ATNR_ ## uc, 58# define def(uc, lc, desc, plus, change) ATNR_ ## uc,
49# include "attackinc.h" 59# include "attackinc.h"
50# undef def 60# undef def
51}; 61};
52 62
53/* You unforunately need to looking in include/global.h to see what these 63/* You unforunately need to looking in include/global.h to see what these
54 * correspond to. 64 * correspond to.
55 */ 65 */
56struct Settings settings = { 66struct Settings settings = {
57 LOGFILE, /* Logfile */ 67 LOGFILE, /* Logfile */
58 CSPORT, /* Client/server port */ 68 llevTrace, /* Log level */
59
60/* Debug level */
61#ifdef DEBUG
62 llevDebug,
63#else
64 llevInfo,
65#endif
66
67 0, NULL, 0, /* dumpvalues, dumparg, daemonmode */
68 0, /* argc */ 69 0, /* argc */
69 NULL, /* argv */ 70 NULL, /* argv */
70 CONFDIR, 71 CONFDIR,
71 DATADIR, 72 DATADIR,
72 LOCALDIR, 73 LOCALDIR,
73 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 74 PLAYERDIR,
74 UNIQUE_DIR, TEMPLATE_DIR, 75 MAPDIR,
76 UNIQUE_DIR,
75 TMPDIR, 77 TMPDIR,
78 PK_LUCK_PENALTY,
76 STAT_LOSS_ON_DEATH, 79 STAT_LOSS_ON_DEATH,
77 PK_LUCK_PENALTY,
78 PERMANENT_EXPERIENCE_RATIO, 80 PERMANENT_EXPERIENCE_RATIO,
79 DEATH_PENALTY_RATIO, 81 DEATH_PENALTY_RATIO,
80 DEATH_PENALTY_LEVEL, 82 DEATH_PENALTY_LEVEL,
81 BALANCED_STAT_LOSS, 83 BALANCED_STAT_LOSS,
82 NOT_PERMADETH, 84 NOT_PERMADETH,
83 SIMPLE_EXP, 85 SIMPLE_EXP,
84 RESET_LOCATION_TIME,
85 SET_TITLE, 86 SET_TITLE,
86 RESURRECTION, 87 RESURRECTION,
87 SEARCH_ITEMS, 88 SEARCH_ITEMS,
88 SPELL_ENCUMBRANCE, 89 SPELL_ENCUMBRANCE,
89 SPELL_FAILURE_EFFECTS, 90 SPELL_FAILURE_EFFECTS,
90 CASTING_TIME, 91 SET_FRIENDLY_FIRE,
91 REAL_WIZ,
92 EXPLORE_MODE,
93 SPELLPOINT_LEVEL_DEPEND, 92 SPELLPOINT_LEVEL_DEPEND,
94 SET_FRIENDLY_FIRE,
95 MOTD,
96 "rules",
97 "news",
98 "", /* DM_MAIL */
99 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
100 EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y,
101 0, 93 0,
102 1.0, 94 1.25,
103 95
104/* Armor enchantment stuff */ 96/* Armor enchantment stuff */
105 ARMOR_MAX_ENCHANT, 97 ARMOR_MAX_ENCHANT,
106 ARMOR_WEIGHT_REDUCTION, 98 ARMOR_WEIGHT_REDUCTION,
107 ARMOR_WEIGHT_LINEAR, 99 ARMOR_WEIGHT_LINEAR,
108 ARMOR_SPEED_IMPROVEMENT, 100 ARMOR_SPEED_IMPROVEMENT,
109 ARMOR_SPEED_LINEAR, 101 ARMOR_SPEED_LINEAR,
110 1, /* no_player_stealing */
111 1, /* create_home_portals */
112}; 102};
113 103
114/* perhaps not the best place for this, but needs to be 104/* perhaps not the best place for this, but needs to be
115 * in some file in the common area so that standalone 105 * in some file in the common area so that standalone
116 * programs, like the random map generator, can be built. 106 * programs, like the random map generator, can be built.
136 "Wounding", 126 "Wounding",
137 "Death", 127 "Death",
138 "Light" 128 "Light"
139}; 129};
140 130
141
142/* This loads the emergency map information from a
143 * .emergency file in the map directory. Doing this makes
144 * it easier to switch between map distributions (don't need
145 * to recompile. Note that there is no reason I see that
146 * this could not be re-loaded during play, but it seems
147 * like there should be little reason to do that.
148 */
149static void
150init_emergency_mappath (void)
151{
152 char filename[MAX_BUF], tmpbuf[MAX_BUF];
153 FILE *fp;
154 int online = 0;
155
156 /* If this file doesn't exist, not a big deal */
157 sprintf (filename, "%s/%s/.emergency", settings.datadir, settings.mapdir);
158 if ((fp = fopen (filename, "r")) != NULL)
159 {
160 while (fgets (tmpbuf, MAX_BUF - 1, fp))
161 {
162 if (tmpbuf[0] == '#')
163 continue; /* ignore comments */
164
165 if (online == 0)
166 {
167 tmpbuf[strlen (tmpbuf) - 1] = 0; /* kill newline */
168 settings.emergency_mapname = strdup (tmpbuf);
169 }
170 else if (online == 1)
171 {
172 settings.emergency_x = atoi (tmpbuf);
173 }
174
175 else if (online == 2)
176 {
177 settings.emergency_y = atoi (tmpbuf);
178 }
179 online++;
180 if (online > 2)
181 break;
182 }
183 fclose (fp);
184 if (online <= 2)
185 LOG (llevError, "Online read partial data from %s\n", filename);
186 LOG (llevDebug, "Emergency mappath reset to %s (%d, %d)\n", settings.emergency_mapname, settings.emergency_x, settings.emergency_y);
187 }
188}
189
190
191/*
192 * It is vital that init_library() is called by any functions
193 * using this library.
194 * If you want to lessen the size of the program using the library,
195 * you can replace the call to init_library() with init_globals() and
196 * init_function_pointers(). Good idea to also call init_vars and
197 * init_hash_table if you are doing any object loading.
198 */
199
200void
201init_library (void)
202{
203 init_environ ();
204 init_globals ();
205 init_vars ();
206 init_block ();
207 ReadBmapNames ();
208 ReadSmooth ();
209 init_anim (); /* Must be after we read in the bitmaps */
210 init_archetypes (); /* Reads all archetypes from file */
211 init_dynamic ();
212 init_attackmess ();
213 init_clocks ();
214 init_emergency_mappath ();
215 init_experience ();
216}
217
218
219/* init_environ initializes values from the environmental variables. 131/* init_environ initialises values from the environmental variables.
220 * it needs to be called very early, since command line options should 132 * it needs to be called very early, since command line options should
221 * overwrite these if specified. 133 * overwrite these if specified.
222 */ 134 */
223void 135void
224init_environ (void) 136init_environ ()
225{ 137{
226 char *cp; 138 const char *cp;
227 139
228 cp = getenv ("CROSSFIRE_LIBDIR"); 140 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
229 if (cp)
230 settings.datadir = cp;
231 cp = getenv ("CROSSFIRE_LOCALDIR");
232 if (cp)
233 settings.localdir = cp;
234 cp = getenv ("CROSSFIRE_PLAYERDIR");
235 if (cp)
236 settings.playerdir = cp;
237 cp = getenv ("CROSSFIRE_MAPDIR");
238 if (cp)
239 settings.mapdir = cp;
240 cp = getenv ("CROSSFIRE_ARCHETYPES");
241 if (cp)
242 settings.archetypes = cp;
243 cp = getenv ("CROSSFIRE_TREASURES");
244 if (cp)
245 settings.treasures = cp;
246 cp = getenv ("CROSSFIRE_UNIQUEDIR");
247 if (cp)
248 settings.uniquedir = cp;
249 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
250 if (cp)
251 settings.templatedir = cp;
252 cp = getenv ("CROSSFIRE_TMPDIR");
253 if (cp)
254 settings.tmpdir = cp;
255}
256 141
142 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp; /* deprecated */
143 if (cp = getenv ("DELIANTRA_DATADIR" )) settings.datadir = cp;
144 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
145
146 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
147 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
148 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
149 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
150 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
151}
257 152
258/* 153/*
259 * Initialises all global variables. 154 * Initialises all global variables.
260 * Might use environment-variables as default for some of them. 155 * Might use environment-variables as default for some of them.
261 */ 156 */
262
263void 157void
264init_globals (void) 158init_globals ()
265{ 159{
266 if (settings.logfilename[0] == 0) 160 if (settings.logfilename[0] == 0)
267 logfile = stderr; 161 log_setfd (-1);
268 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 162 else
269 { 163 {
164 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
165
166 if (logfd >= 0)
167 log_setfd (logfd);
168 else
169 {
170 log_setfd (-1);
270 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 171 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
271 logfile = stderr; 172 }
272 } 173 }
273 else
274 setvbuf (logfile, NULL, _IOLBF, 0);
275} 174}
276 175
277void 176void
278init_dynamic (void) 177init_dynamic ()
279{ 178{
280 archetype *at = first_archetype; 179 first_map_ext_path = "/start/HallsOfSelection";
180 first_map_path = "/HallOfSelection";
181}
281 182
282 while (at) 183/*
184 * initialises the attack messages.
185 * Called by init_library().
186 */
187
188//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
189
190void
191init_attackmess ()
192{
193 object_thawer thawer (settings.datadir, "attackmess");
194
195 if (!thawer)
283 { 196 {
284 if (at->clone.type == MAP)
285 {
286 if (at->clone.race)
287 strcpy (first_map_ext_path, at->clone.race);
288
289 if (EXIT_PATH (&at->clone))
290 {
291 strcpy (first_map_path, EXIT_PATH (&at->clone));
292 return;
293 }
294 }
295
296 at = at->next;
297 }
298
299 LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n");
300 exit (-1);
301}
302
303unsigned long todtick;
304
305/*
306 * Write out the current time to the file so time does not
307 * reset every time the server reboots.
308 */
309
310void
311write_todclock (void)
312{
313 char filename[MAX_BUF];
314 FILE *fp;
315
316 sprintf (filename, "%s/clockdata", settings.localdir);
317 if ((fp = fopen (filename, "w")) == NULL)
318 {
319 LOG (llevError, "Cannot open %s for writing\n", filename); 197 LOG (llevError, "Can't open %s.\n", thawer.name);
320 return; 198 return;
321 } 199 }
322 fprintf (fp, "%lu", todtick);
323 fclose (fp);
324}
325 200
326/* 201 int msgnum = -1;
327 * Initializes the gametime and TOD counters 202 int total = 0;
328 * Called by init_library().
329 */
330 203
331void 204 while (thawer.kw)
332init_clocks (void)
333{
334 char filename[MAX_BUF];
335 FILE *fp;
336 static int has_been_done = 0;
337
338 if (has_been_done)
339 return;
340 else
341 has_been_done = 1;
342
343 sprintf (filename, "%s/clockdata", settings.localdir);
344 LOG (llevDebug, "Reading clockdata from %s...", filename);
345 if ((fp = fopen (filename, "r")) == NULL)
346 { 205 {
347 LOG (llevError, "Can't open %s.\n", filename); 206 if (thawer.kw != KW_type)
348 todtick = 0; 207 if (!thawer.parse_error ("attackmess file"))
349 write_todclock (); 208 break;
350 return; 209
210 thawer.get (msgnum);
211 thawer.next ();
212
213 int level = 0;
214
215 while (thawer.kw == KW_hp)
216 {
217 // our old friend, dog-slow sscanf
218 int hp;
219 char buf1[1024];
220 char buf2[1024];
221 char buf3[1024];
222
223 if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]",
224 &hp, buf1, buf2, buf3))
225 thawer.parse_error ("attackmess file");
226 else
227 {
228 if (*buf2 == '-')
229 *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker
230
231 attack_mess[msgnum][level].level = hp;
232 attack_mess[msgnum][level].buf1 = strdup (buf1);
233 attack_mess[msgnum][level].buf2 = strdup (buf2);
234 attack_mess[msgnum][level].buf3 = strdup (buf3);
235
236 ++level;
237 ++total;
238 }
239
240 thawer.next ();
241 }
242
243 attack_mess[msgnum][level].level = -1;
244 attack_mess[msgnum][level].buf1 = 0;
245 attack_mess[msgnum][level].buf2 = 0;
246 attack_mess[msgnum][level].buf3 = 0;
351 } 247 }
352 fscanf (fp, "%lu", &todtick);
353 LOG (llevDebug, "todtick=%lu\n", todtick);
354 fclose (fp);
355}
356 248
357/*
358 * Initializes the attack messages.
359 * Called by init_library().
360 */
361
362//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
363
364void
365init_attackmess (void)
366{
367 char buf[MAX_BUF];
368 char filename[MAX_BUF];
369 char *cp, *p;
370 FILE *fp;
371 static int has_been_done = 0;
372 int mess, level, comp;
373 int mode = 0, total = 0;
374
375 if (has_been_done)
376 return;
377 else
378 has_been_done = 1;
379
380 sprintf (filename, "%s/attackmess", settings.datadir);
381 LOG (llevDebug, "Reading attack messages from %s...", filename);
382 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
383 {
384 LOG (llevError, "Can't open %s.\n", filename);
385 return;
386 }
387
388 level = 0;
389 while (fgets (buf, MAX_BUF, fp) != NULL)
390 {
391 if (*buf == '#')
392 continue;
393 if ((cp = strchr (buf, '\n')) != NULL)
394 *cp = '\0';
395 cp = buf;
396 while (*cp == ' ') /* Skip blanks */
397 cp++;
398
399 if (strncmp (cp, "TYPE:", 5) == 0)
400 {
401 p = strtok (buf, ":");
402 p = strtok (NULL, ":");
403 if (mode == 1)
404 {
405 attack_mess[mess][level].level = -1;
406 attack_mess[mess][level].buf1 = NULL;
407 attack_mess[mess][level].buf2 = NULL;
408 attack_mess[mess][level].buf3 = NULL;
409 }
410 level = 0;
411 mess = atoi (p);
412 mode = 1;
413 continue;
414 }
415 if (mode == 1)
416 {
417 p = strtok (buf, "=");
418 attack_mess[mess][level].level = atoi (buf);
419 p = strtok (NULL, "=");
420 if (p != NULL)
421 attack_mess[mess][level].buf1 = strdup (p);
422 else
423 attack_mess[mess][level].buf1 = strdup ("");
424 mode = 2;
425 continue;
426 }
427 else if (mode == 2)
428 {
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].buf2 = strdup (p);
434 else
435 attack_mess[mess][level].buf2 = strdup ("");
436 mode = 3;
437 continue;
438 }
439 else if (mode == 3)
440 {
441 p = strtok (buf, "=");
442 attack_mess[mess][level].level = atoi (buf);
443 p = strtok (NULL, "=");
444 if (p != NULL)
445 attack_mess[mess][level].buf3 = strdup (p);
446 else
447 attack_mess[mess][level].buf3 = strdup ("");
448 mode = 1;
449 level++;
450 total++;
451 continue;
452 }
453 }
454 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); 249 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
455 close_and_delete (fp, comp);
456} 250}
251

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines