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.16 by root, Thu Dec 14 22:45:40 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 RECYCLE_TMP_MAPS,
93 EXPLORE_MODE,
94 SPELLPOINT_LEVEL_DEPEND, 92 SPELLPOINT_LEVEL_DEPEND,
95 SET_FRIENDLY_FIRE,
96 MOTD,
97 "rules",
98 "news",
99 "", /* DM_MAIL */
100 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
101 EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y,
102 0, 93 0,
103 1.0, 94 1.25,
104 95
105/* Armor enchantment stuff */ 96/* Armor enchantment stuff */
106 ARMOR_MAX_ENCHANT, 97 ARMOR_MAX_ENCHANT,
107 ARMOR_WEIGHT_REDUCTION, 98 ARMOR_WEIGHT_REDUCTION,
108 ARMOR_WEIGHT_LINEAR, 99 ARMOR_WEIGHT_LINEAR,
109 ARMOR_SPEED_IMPROVEMENT, 100 ARMOR_SPEED_IMPROVEMENT,
110 ARMOR_SPEED_LINEAR, 101 ARMOR_SPEED_LINEAR,
111 1, /* no_player_stealing */
112 1, /* create_home_portals */
113}; 102};
114 103
115/* perhaps not the best place for this, but needs to be 104/* perhaps not the best place for this, but needs to be
116 * in some file in the common area so that standalone 105 * in some file in the common area so that standalone
117 * programs, like the random map generator, can be built. 106 * programs, like the random map generator, can be built.
137 "Wounding", 126 "Wounding",
138 "Death", 127 "Death",
139 "Light" 128 "Light"
140}; 129};
141 130
142
143/* This loads the emergency map information from a
144 * .emergency file in the map directory. Doing this makes
145 * it easier to switch between map distributions (don't need
146 * to recompile. Note that there is no reason I see that
147 * this could not be re-loaded during play, but it seems
148 * like there should be little reason to do that.
149 */
150static void
151init_emergency_mappath (void)
152{
153 char filename[MAX_BUF], tmpbuf[MAX_BUF];
154 FILE *fp;
155 int online = 0;
156
157 /* If this file doesn't exist, not a big deal */
158 sprintf (filename, "%s/%s/.emergency", settings.datadir, settings.mapdir);
159 if ((fp = fopen (filename, "r")) != NULL)
160 {
161 while (fgets (tmpbuf, MAX_BUF - 1, fp))
162 {
163 if (tmpbuf[0] == '#')
164 continue; /* ignore comments */
165
166 if (online == 0)
167 {
168 tmpbuf[strlen (tmpbuf) - 1] = 0; /* kill newline */
169 settings.emergency_mapname = strdup (tmpbuf);
170 }
171 else if (online == 1)
172 {
173 settings.emergency_x = atoi (tmpbuf);
174 }
175
176 else if (online == 2)
177 {
178 settings.emergency_y = atoi (tmpbuf);
179 }
180 online++;
181 if (online > 2)
182 break;
183 }
184 fclose (fp);
185 if (online <= 2)
186 LOG (llevError, "Online read partial data from %s\n", filename);
187 LOG (llevDebug, "Emergency mappath reset to %s (%d, %d)\n", settings.emergency_mapname, settings.emergency_x, settings.emergency_y);
188 }
189}
190
191
192/*
193 * It is vital that init_library() is called by any functions
194 * using this library.
195 * If you want to lessen the size of the program using the library,
196 * you can replace the call to init_library() with init_globals() and
197 * init_function_pointers(). Good idea to also call init_vars and
198 * init_hash_table if you are doing any object loading.
199 */
200
201void
202init_library (void)
203{
204 init_environ ();
205 init_globals ();
206 init_vars ();
207 init_block ();
208 ReadBmapNames ();
209 ReadSmooth ();
210 init_anim (); /* Must be after we read in the bitmaps */
211 init_archetypes (); /* Reads all archetypes from file */
212 init_dynamic ();
213 init_attackmess ();
214 init_clocks ();
215 init_emergency_mappath ();
216 init_experience ();
217}
218
219
220/* init_environ initializes values from the environmental variables. 131/* init_environ initialises values from the environmental variables.
221 * 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
222 * overwrite these if specified. 133 * overwrite these if specified.
223 */ 134 */
224void 135void
225init_environ (void) 136init_environ ()
226{ 137{
227 char *cp; 138 const char *cp;
228 139
229 cp = getenv ("CROSSFIRE_LIBDIR"); 140 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
230 if (cp)
231 settings.datadir = cp;
232 cp = getenv ("CROSSFIRE_LOCALDIR");
233 if (cp)
234 settings.localdir = cp;
235 cp = getenv ("CROSSFIRE_PLAYERDIR");
236 if (cp)
237 settings.playerdir = cp;
238 cp = getenv ("CROSSFIRE_MAPDIR");
239 if (cp)
240 settings.mapdir = cp;
241 cp = getenv ("CROSSFIRE_ARCHETYPES");
242 if (cp)
243 settings.archetypes = cp;
244 cp = getenv ("CROSSFIRE_TREASURES");
245 if (cp)
246 settings.treasures = cp;
247 cp = getenv ("CROSSFIRE_UNIQUEDIR");
248 if (cp)
249 settings.uniquedir = cp;
250 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
251 if (cp)
252 settings.templatedir = cp;
253 cp = getenv ("CROSSFIRE_TMPDIR");
254 if (cp)
255 settings.tmpdir = cp;
256}
257 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}
258 152
259/* 153/*
260 * Initialises all global variables. 154 * Initialises all global variables.
261 * Might use environment-variables as default for some of them. 155 * Might use environment-variables as default for some of them.
262 */ 156 */
263
264void 157void
265init_globals (void) 158init_globals ()
266{ 159{
267 if (settings.logfilename[0] == 0) 160 if (settings.logfilename[0] == 0)
268 logfile = stderr; 161 log_setfd (-1);
269 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 162 else
270 { 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);
271 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);
272 logfile = stderr; 172 }
273 } 173 }
274 else
275 setvbuf (logfile, NULL, _IOLBF, 0);
276} 174}
277 175
278void 176void
279init_dynamic (void) 177init_dynamic ()
280{ 178{
281 archetype *at = first_archetype; 179 first_map_ext_path = "/start/HallsOfSelection";
180 first_map_path = "/HallOfSelection";
181}
282 182
283 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)
284 { 196 {
285 if (at->clone.type == MAP)
286 {
287 if (at->clone.race)
288 strcpy (first_map_ext_path, at->clone.race);
289
290 if (EXIT_PATH (&at->clone))
291 {
292 strcpy (first_map_path, EXIT_PATH (&at->clone));
293 return;
294 }
295 }
296
297 at = at->next;
298 }
299
300 LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n");
301 exit (-1);
302}
303
304unsigned long todtick;
305
306/*
307 * Write out the current time to the file so time does not
308 * reset every time the server reboots.
309 */
310
311void
312write_todclock (void)
313{
314 char filename[MAX_BUF];
315 FILE *fp;
316
317 sprintf (filename, "%s/clockdata", settings.localdir);
318 if ((fp = fopen (filename, "w")) == NULL)
319 {
320 LOG (llevError, "Cannot open %s for writing\n", filename); 197 LOG (llevError, "Can't open %s.\n", thawer.name);
321 return; 198 return;
322 } 199 }
323 fprintf (fp, "%lu", todtick);
324 fclose (fp);
325}
326 200
327/* 201 int msgnum = -1;
328 * Initializes the gametime and TOD counters 202 int total = 0;
329 * Called by init_library().
330 */
331 203
332void 204 while (thawer.kw)
333init_clocks (void)
334{
335 char filename[MAX_BUF];
336 FILE *fp;
337 static int has_been_done = 0;
338
339 if (has_been_done)
340 return;
341 else
342 has_been_done = 1;
343
344 sprintf (filename, "%s/clockdata", settings.localdir);
345 LOG (llevDebug, "Reading clockdata from %s...", filename);
346 if ((fp = fopen (filename, "r")) == NULL)
347 { 205 {
348 LOG (llevError, "Can't open %s.\n", filename); 206 if (thawer.kw != KW_type)
349 todtick = 0; 207 if (!thawer.parse_error ("attackmess file"))
350 write_todclock (); 208 break;
351 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;
352 } 247 }
353 fscanf (fp, "%lu", &todtick);
354 LOG (llevDebug, "todtick=%lu\n", todtick);
355 fclose (fp);
356}
357 248
358/*
359 * Initializes the attack messages.
360 * Called by init_library().
361 */
362
363//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
364
365void
366init_attackmess (void)
367{
368 char buf[MAX_BUF];
369 char filename[MAX_BUF];
370 char *cp, *p;
371 FILE *fp;
372 static int has_been_done = 0;
373 int mess, level, comp;
374 int mode = 0, total = 0;
375
376 if (has_been_done)
377 return;
378 else
379 has_been_done = 1;
380
381 sprintf (filename, "%s/attackmess", settings.datadir);
382 LOG (llevDebug, "Reading attack messages from %s...", filename);
383 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
384 {
385 LOG (llevError, "Can't open %s.\n", filename);
386 return;
387 }
388
389 level = 0;
390 while (fgets (buf, MAX_BUF, fp) != NULL)
391 {
392 if (*buf == '#')
393 continue;
394 if ((cp = strchr (buf, '\n')) != NULL)
395 *cp = '\0';
396 cp = buf;
397 while (*cp == ' ') /* Skip blanks */
398 cp++;
399
400 if (strncmp (cp, "TYPE:", 5) == 0)
401 {
402 p = strtok (buf, ":");
403 p = strtok (NULL, ":");
404 if (mode == 1)
405 {
406 attack_mess[mess][level].level = -1;
407 attack_mess[mess][level].buf1 = NULL;
408 attack_mess[mess][level].buf2 = NULL;
409 attack_mess[mess][level].buf3 = NULL;
410 }
411 level = 0;
412 mess = atoi (p);
413 mode = 1;
414 continue;
415 }
416 if (mode == 1)
417 {
418 p = strtok (buf, "=");
419 attack_mess[mess][level].level = atoi (buf);
420 p = strtok (NULL, "=");
421 if (p != NULL)
422 attack_mess[mess][level].buf1 = strdup (p);
423 else
424 attack_mess[mess][level].buf1 = strdup ("");
425 mode = 2;
426 continue;
427 }
428 else if (mode == 2)
429 {
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].buf2 = strdup (p);
435 else
436 attack_mess[mess][level].buf2 = strdup ("");
437 mode = 3;
438 continue;
439 }
440 else if (mode == 3)
441 {
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].buf3 = strdup (p);
447 else
448 attack_mess[mess][level].buf3 = strdup ("");
449 mode = 1;
450 level++;
451 total++;
452 continue;
453 }
454 }
455 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);
456 close_and_delete (fp, comp);
457} 250}
251

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines