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.11 by root, Wed Sep 13 02:05:18 2006 UTC vs.
Revision 1.55 by root, Fri Mar 26 01:04:44 2010 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 (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (©) 1992 Frank Tore Johansen
6 7 *
7 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
8 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
9 the Free Software Foundation; either version 2 of the License, or 10 * Free Software Foundation, either version 3 of the License, or (at your
10 (at your option) any later version. 11 * option) any later version.
11 12 *
12 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,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details. 16 * GNU General Public License for more details.
16 17 *
17 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
18 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
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 * <http://www.gnu.org/licenses/>.
20 21 *
21 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>
22*/ 23 */
23 24
24#define EXTERN // horrible hack 25#define EXTERN // horrible hack
25 26
26#include <global.h> 27#include <global.h>
27#include <object.h> 28#include <object.h>
28 29
30dynbuf_text msg_dynbuf (65536, 65536);
31
29extern const char *const attacktype_desc[NROFATTACKS] = { 32extern const char *const attacktype_desc[NROFATTACKS] = {
30# define def(uc, lc, name, plus, change) # name, 33# define def(uc, lc, name, plus, change) # name,
31# include "attackinc.h"
32# undef def
33};
34
35extern const keyword resist_save[NROFATTACKS] = {
36# define def(uc, lc, name, plus, change) KW_resist_ ## lc,
37# include "attackinc.h" 34# include "attackinc.h"
38# undef def 35# undef def
39}; 36};
40 37
41extern const char *const resist_plus[NROFATTACKS] = { 38extern const char *const resist_plus[NROFATTACKS] = {
75 NULL, /* argv */ 72 NULL, /* argv */
76 CONFDIR, 73 CONFDIR,
77 DATADIR, 74 DATADIR,
78 LOCALDIR, 75 LOCALDIR,
79 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 76 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
80 UNIQUE_DIR, TEMPLATE_DIR, 77 UNIQUE_DIR, "",
81 TMPDIR, 78 TMPDIR,
79 PK_LUCK_PENALTY,
82 STAT_LOSS_ON_DEATH, 80 STAT_LOSS_ON_DEATH,
83 PK_LUCK_PENALTY,
84 PERMANENT_EXPERIENCE_RATIO, 81 PERMANENT_EXPERIENCE_RATIO,
85 DEATH_PENALTY_RATIO, 82 DEATH_PENALTY_RATIO,
86 DEATH_PENALTY_LEVEL, 83 DEATH_PENALTY_LEVEL,
87 BALANCED_STAT_LOSS, 84 BALANCED_STAT_LOSS,
88 NOT_PERMADETH, 85 NOT_PERMADETH,
89 SIMPLE_EXP, 86 SIMPLE_EXP,
90 RESET_LOCATION_TIME,
91 SET_TITLE, 87 SET_TITLE,
92 RESURRECTION, 88 RESURRECTION,
93 SEARCH_ITEMS, 89 SEARCH_ITEMS,
94 SPELL_ENCUMBRANCE, 90 SPELL_ENCUMBRANCE,
95 SPELL_FAILURE_EFFECTS, 91 SPELL_FAILURE_EFFECTS,
96 CASTING_TIME, 92 SET_FRIENDLY_FIRE,
97 REAL_WIZ, 93 0,
98 RECYCLE_TMP_MAPS, 94 0,
99 EXPLORE_MODE, 95 EXPLORE_MODE,
100 SPELLPOINT_LEVEL_DEPEND, 96 SPELLPOINT_LEVEL_DEPEND,
101 SET_FRIENDLY_FIRE,
102 "", /* Who format specifier */
103 "", /* who wiz format specifier */
104 MOTD,
105 "rules",
106 "news",
107 "", /* DM_MAIL */
108 0, /* This and the next 3 values are metaserver values */
109 "",
110 "",
111 0,
112 "",
113 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
114 EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y,
115 0, 97 0,
116 1.0, 98 1.0,
117 99
118/* Armor enchantment stuff */ 100/* Armor enchantment stuff */
119 ARMOR_MAX_ENCHANT, 101 ARMOR_MAX_ENCHANT,
120 ARMOR_WEIGHT_REDUCTION, 102 ARMOR_WEIGHT_REDUCTION,
121 ARMOR_WEIGHT_LINEAR, 103 ARMOR_WEIGHT_LINEAR,
122 ARMOR_SPEED_IMPROVEMENT, 104 ARMOR_SPEED_IMPROVEMENT,
123 ARMOR_SPEED_LINEAR, 105 ARMOR_SPEED_LINEAR,
124 1, /* no_player_stealing */
125 1, /* create_home_portals */
126}; 106};
127 107
128/* perhaps not the best place for this, but needs to be 108/* perhaps not the best place for this, but needs to be
129 * in some file in the common area so that standalone 109 * in some file in the common area so that standalone
130 * programs, like the random map generator, can be built. 110 * programs, like the random map generator, can be built.
150 "Wounding", 130 "Wounding",
151 "Death", 131 "Death",
152 "Light" 132 "Light"
153}; 133};
154 134
155
156/* This loads the emergency map information from a
157 * .emergency file in the map directory. Doing this makes
158 * it easier to switch between map distributions (don't need
159 * to recompile. Note that there is no reason I see that
160 * this could not be re-loaded during play, but it seems
161 * like there should be little reason to do that.
162 */
163static void
164init_emergency_mappath (void)
165{
166 char filename[MAX_BUF], tmpbuf[MAX_BUF];
167 FILE *fp;
168 int online = 0;
169
170 /* If this file doesn't exist, not a big deal */
171 sprintf (filename, "%s/%s/.emergency", settings.datadir, settings.mapdir);
172 if ((fp = fopen (filename, "r")) != NULL)
173 {
174 while (fgets (tmpbuf, MAX_BUF - 1, fp))
175 {
176 if (tmpbuf[0] == '#')
177 continue; /* ignore comments */
178
179 if (online == 0)
180 {
181 tmpbuf[strlen (tmpbuf) - 1] = 0; /* kill newline */
182 settings.emergency_mapname = strdup_local (tmpbuf);
183 }
184 else if (online == 1)
185 {
186 settings.emergency_x = atoi (tmpbuf);
187 }
188
189 else if (online == 2)
190 {
191 settings.emergency_y = atoi (tmpbuf);
192 }
193 online++;
194 if (online > 2)
195 break;
196 }
197 fclose (fp);
198 if (online <= 2)
199 LOG (llevError, "Online read partial data from %s\n", filename);
200 LOG (llevDebug, "Emergency mappath reset to %s (%d, %d)\n", settings.emergency_mapname, settings.emergency_x, settings.emergency_y);
201 }
202}
203
204
205/*
206 * It is vital that init_library() is called by any functions
207 * using this library.
208 * If you want to lessen the size of the program using the library,
209 * you can replace the call to init_library() with init_globals() and
210 * init_function_pointers(). Good idea to also call init_vars and
211 * init_hash_table if you are doing any object loading.
212 */
213
214void
215init_library (void)
216{
217 init_environ ();
218 init_globals ();
219 init_objects ();
220 init_vars ();
221 init_block ();
222 ReadBmapNames ();
223 ReadSmooth ();
224 init_anim (); /* Must be after we read in the bitmaps */
225 init_archetypes (); /* Reads all archetypes from file */
226 init_dynamic ();
227 init_attackmess ();
228 init_clocks ();
229 init_emergency_mappath ();
230 init_experience ();
231}
232
233
234/* init_environ initializes values from the environmental variables. 135/* init_environ initialises values from the environmental variables.
235 * 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
236 * overwrite these if specified. 137 * overwrite these if specified.
237 */ 138 */
238void 139void
239init_environ (void) 140init_environ ()
240{ 141{
241 char *cp; 142 const char *cp;
242 143
243 cp = getenv ("CROSSFIRE_LIBDIR"); 144 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
244 if (cp) 145 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp;
245 settings.datadir = cp; 146 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
246 cp = getenv ("CROSSFIRE_LOCALDIR"); 147 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
247 if (cp) 148 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
248 settings.localdir = cp; 149 if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp;
249 cp = getenv ("CROSSFIRE_PLAYERDIR"); 150 if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp;
250 if (cp) 151 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
251 settings.playerdir = cp; 152 if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp;
252 cp = getenv ("CROSSFIRE_MAPDIR"); 153 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
253 if (cp)
254 settings.mapdir = cp;
255 cp = getenv ("CROSSFIRE_ARCHETYPES");
256 if (cp)
257 settings.archetypes = cp;
258 cp = getenv ("CROSSFIRE_TREASURES");
259 if (cp)
260 settings.treasures = cp;
261 cp = getenv ("CROSSFIRE_UNIQUEDIR");
262 if (cp)
263 settings.uniquedir = cp;
264 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
265 if (cp)
266 settings.templatedir = cp;
267 cp = getenv ("CROSSFIRE_TMPDIR");
268 if (cp)
269 settings.tmpdir = cp;
270}
271 154
155 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
156}
272 157
273/* 158/*
274 * Initialises all global variables. 159 * Initialises all global variables.
275 * Might use environment-variables as default for some of them. 160 * Might use environment-variables as default for some of them.
276 */ 161 */
277
278void 162void
279init_globals (void) 163init_globals ()
280{ 164{
281 if (settings.logfilename[0] == 0) 165 if (settings.logfilename[0] == 0)
166 set_logfd (-1);
167 else
282 { 168 {
283 logfile = stderr; 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 }
284 } 178 }
285 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 179}
286 { 180
287 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 181void
288 logfile = stderr; 182init_dynamic ()
289 } 183{
290 else 184 first_map_ext_path = "/start/HallsOfSelection";
291 { 185 first_map_path = "/HallOfSelection";
292 setvbuf (logfile, NULL, _IOLBF, 0);
293 }
294 exiting = 0;
295 first_player = NULL;
296 first_friendly_object = NULL;
297 first_map = NULL;
298 first_treasurelist = NULL;
299 first_artifactlist = NULL;
300 first_archetype = NULL;
301 *first_map_ext_path = 0;
302 warn_archetypes = 0;
303 nroftreasures = 0;
304 nrofartifacts = 0;
305 nrofallowedstr = 0;
306 ring_arch = NULL;
307 amulet_arch = NULL;
308 staff_arch = NULL;
309 trying_emergency_save = 0;
310 num_animations = 0;
311 animations_allocated = 0;
312 init_defaults ();
313} 186}
314 187
315/* 188/*
316 * Sets up and initialises the linked list of free and used objects. 189 * initialises the attack messages.
317 * Allocates a certain chunk of objects and puts them on the free list.
318 * Called by init_library();
319 */
320
321void
322init_objects (void)
323{
324 /* Initialize all objects: */
325 objects = NULL;
326 active_objects = NULL;
327}
328
329/*
330 * Initialises global variables which can be changed by options.
331 * Called by init_library(). 190 * Called by init_library().
332 */ 191 */
333 192
334void
335init_defaults (void)
336{
337 editor = 0;
338 nroferrors = 0;
339}
340
341
342void
343init_dynamic (void)
344{
345 archetype *at = first_archetype;
346
347 while (at)
348 {
349 if (at->clone.type == MAP)
350 {
351 if (at->clone.race)
352 {
353 strcpy (first_map_ext_path, at->clone.race);
354 }
355 if (EXIT_PATH (&at->clone))
356 {
357 strcpy (first_map_path, EXIT_PATH (&at->clone));
358 return;
359 }
360 }
361 at = at->next;
362 }
363 LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n");
364 exit (-1);
365}
366
367unsigned long todtick;
368
369/*
370 * Write out the current time to the file so time does not
371 * reset every time the server reboots.
372 */
373
374void
375write_todclock (void)
376{
377 char filename[MAX_BUF];
378 FILE *fp;
379
380 sprintf (filename, "%s/clockdata", settings.localdir);
381 if ((fp = fopen (filename, "w")) == NULL)
382 {
383 LOG (llevError, "Cannot open %s for writing\n", filename);
384 return;
385 }
386 fprintf (fp, "%lu", todtick);
387 fclose (fp);
388}
389
390/*
391 * Initializes the gametime and TOD counters
392 * Called by init_library().
393 */
394
395void
396init_clocks (void)
397{
398 char filename[MAX_BUF];
399 FILE *fp;
400 static int has_been_done = 0;
401
402 if (has_been_done)
403 return;
404 else
405 has_been_done = 1;
406
407 sprintf (filename, "%s/clockdata", settings.localdir);
408 LOG (llevDebug, "Reading clockdata from %s...", filename);
409 if ((fp = fopen (filename, "r")) == NULL)
410 {
411 LOG (llevError, "Can't open %s.\n", filename);
412 todtick = 0;
413 write_todclock ();
414 return;
415 }
416 fscanf (fp, "%lu", &todtick);
417 LOG (llevDebug, "todtick=%lu\n", todtick);
418 fclose (fp);
419}
420
421/*
422 * Initializes the attack messages.
423 * Called by init_library().
424 */
425
426//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; 193//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
427 194
428void 195void
429init_attackmess (void) 196init_attackmess ()
430{ 197{
431 char buf[MAX_BUF]; 198 char buf[MAX_BUF];
432 char filename[MAX_BUF]; 199 char filename[MAX_BUF];
433 char *cp, *p; 200 char *cp, *p;
434 FILE *fp; 201 FILE *fp;
435 static int has_been_done = 0; 202 static int has_been_done = 0;
436 int mess, level, comp; 203 int msgnum, level, comp;
437 int mode = 0, total = 0; 204 int mode = 0, total = 0;
438 205
439 if (has_been_done) 206 if (has_been_done)
440 return; 207 return;
441 else 208 else
442 has_been_done = 1; 209 has_been_done = 1;
443 210
444 sprintf (filename, "%s/attackmess", settings.datadir); 211 sprintf (filename, "%s/attackmess", settings.datadir);
445 LOG (llevDebug, "Reading attack messages from %s...", filename); 212 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
446 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) 213 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
447 { 214 {
448 LOG (llevError, "Can't open %s.\n", filename); 215 LOG (llevError, "Can't open %s.\n", filename);
449 return; 216 return;
450 } 217 }
452 level = 0; 219 level = 0;
453 while (fgets (buf, MAX_BUF, fp) != NULL) 220 while (fgets (buf, MAX_BUF, fp) != NULL)
454 { 221 {
455 if (*buf == '#') 222 if (*buf == '#')
456 continue; 223 continue;
224
457 if ((cp = strchr (buf, '\n')) != NULL) 225 if ((cp = strchr (buf, '\n')) != NULL)
458 *cp = '\0'; 226 *cp = '\0';
227
459 cp = buf; 228 cp = buf;
460 while (*cp == ' ') /* Skip blanks */ 229 while (*cp == ' ') /* Skip blanks */
461 cp++; 230 cp++;
462 231
463 if (strncmp (cp, "TYPE:", 5) == 0) 232 if (strncmp (cp, "TYPE:", 5) == 0)
464 { 233 {
465 p = strtok (buf, ":"); 234 p = strtok (buf, ":");
466 p = strtok (NULL, ":"); 235 p = strtok (NULL, ":");
236
467 if (mode == 1) 237 if (mode == 1)
468 { 238 {
469 attack_mess[mess][level].level = -1; 239 attack_mess[msgnum][level].level = -1;
470 attack_mess[mess][level].buf1 = NULL; 240 attack_mess[msgnum][level].buf1 = NULL;
471 attack_mess[mess][level].buf2 = NULL; 241 attack_mess[msgnum][level].buf2 = NULL;
472 attack_mess[mess][level].buf3 = NULL; 242 attack_mess[msgnum][level].buf3 = NULL;
473 } 243 }
244
474 level = 0; 245 level = 0;
475 mess = atoi (p); 246 msgnum = atoi (p);
476 mode = 1; 247 mode = 1;
477 continue;
478 } 248 }
479 if (mode == 1) 249 else if (mode == 1)
480 { 250 {
481 p = strtok (buf, "="); 251 p = strtok (buf, "=");
482 attack_mess[mess][level].level = atoi (buf); 252 attack_mess[msgnum][level].level = atoi (buf);
483 p = strtok (NULL, "="); 253 p = strtok (NULL, "=");
254
484 if (p != NULL) 255 if (p != NULL)
485 attack_mess[mess][level].buf1 = strdup_local (p); 256 attack_mess[msgnum][level].buf1 = strdup (p);
486 else 257 else
487 attack_mess[mess][level].buf1 = strdup_local (""); 258 attack_mess[msgnum][level].buf1 = strdup ("");
259
488 mode = 2; 260 mode = 2;
489 continue;
490 } 261 }
491 else if (mode == 2) 262 else if (mode == 2)
492 { 263 {
493 p = strtok (buf, "="); 264 p = strtok (buf, "=");
494 attack_mess[mess][level].level = atoi (buf); 265 attack_mess[msgnum][level].level = atoi (buf);
495 p = strtok (NULL, "="); 266 p = strtok (NULL, "=");
267
496 if (p != NULL) 268 if (p != NULL)
497 attack_mess[mess][level].buf2 = strdup_local (p); 269 attack_mess[msgnum][level].buf2 = strdup (p);
498 else 270 else
499 attack_mess[mess][level].buf2 = strdup_local (""); 271 attack_mess[msgnum][level].buf2 = strdup ("");
272
500 mode = 3; 273 mode = 3;
501 continue;
502 } 274 }
503 else if (mode == 3) 275 else if (mode == 3)
504 { 276 {
505 p = strtok (buf, "="); 277 p = strtok (buf, "=");
506 attack_mess[mess][level].level = atoi (buf); 278 attack_mess[msgnum][level].level = atoi (buf);
507 p = strtok (NULL, "="); 279 p = strtok (NULL, "=");
280
508 if (p != NULL) 281 if (p != NULL)
509 attack_mess[mess][level].buf3 = strdup_local (p); 282 attack_mess[msgnum][level].buf3 = strdup (p);
510 else 283 else
511 attack_mess[mess][level].buf3 = strdup_local (""); 284 attack_mess[msgnum][level].buf3 = strdup ("");
285
512 mode = 1; 286 mode = 1;
513 level++; 287 level++;
514 total++; 288 total++;
515 continue;
516 } 289 }
517 } 290 }
291
518 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); 292 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
519 close_and_delete (fp, comp); 293 close_and_delete (fp, comp);
520} 294}
295

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines