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.38 by root, Sun Jul 1 05:00:17 2007 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
3 3 *
4 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (©) 1992,2007 Frank Tore Johansen
6 7 *
7 This program is free software; you can redistribute it and/or modify 8 * Crossfire TRT is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by 9 * it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or 10 * the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version. 11 * (at your 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 GNU General Public License
18 along with this program; if not, write to the Free Software 19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 *
20 21 * The authors can be reached via e-mail to <crossfire@schmorp.de>
21 The authors can be reached via e-mail at crossfire-devel@real-time.com
22*/ 22 */
23 23
24#define EXTERN // horrible hack 24#define EXTERN // horrible hack
25 25
26#include <global.h> 26#include <global.h>
27#include <object.h> 27#include <object.h>
28 28
29extern const char *const attacktype_desc[NROFATTACKS] = { 29extern const char *const attacktype_desc[NROFATTACKS] = {
30# define def(uc, lc, name, plus, change) # name, 30# 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" 31# include "attackinc.h"
38# undef def 32# undef def
39}; 33};
40 34
41extern const char *const resist_plus[NROFATTACKS] = { 35extern const char *const resist_plus[NROFATTACKS] = {
77 DATADIR, 71 DATADIR,
78 LOCALDIR, 72 LOCALDIR,
79 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 73 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
80 UNIQUE_DIR, TEMPLATE_DIR, 74 UNIQUE_DIR, TEMPLATE_DIR,
81 TMPDIR, 75 TMPDIR,
76 PK_LUCK_PENALTY,
82 STAT_LOSS_ON_DEATH, 77 STAT_LOSS_ON_DEATH,
83 PK_LUCK_PENALTY,
84 PERMANENT_EXPERIENCE_RATIO, 78 PERMANENT_EXPERIENCE_RATIO,
85 DEATH_PENALTY_RATIO, 79 DEATH_PENALTY_RATIO,
86 DEATH_PENALTY_LEVEL, 80 DEATH_PENALTY_LEVEL,
87 BALANCED_STAT_LOSS, 81 BALANCED_STAT_LOSS,
88 NOT_PERMADETH, 82 NOT_PERMADETH,
89 SIMPLE_EXP, 83 SIMPLE_EXP,
90 RESET_LOCATION_TIME,
91 SET_TITLE, 84 SET_TITLE,
92 RESURRECTION, 85 RESURRECTION,
93 SEARCH_ITEMS, 86 SEARCH_ITEMS,
94 SPELL_ENCUMBRANCE, 87 SPELL_ENCUMBRANCE,
95 SPELL_FAILURE_EFFECTS, 88 SPELL_FAILURE_EFFECTS,
96 CASTING_TIME, 89 SET_FRIENDLY_FIRE,
97 REAL_WIZ, 90 0,
98 RECYCLE_TMP_MAPS, 91 0,
99 EXPLORE_MODE, 92 EXPLORE_MODE,
100 SPELLPOINT_LEVEL_DEPEND, 93 SPELLPOINT_LEVEL_DEPEND,
101 SET_FRIENDLY_FIRE,
102 "", /* Who format specifier */
103 "", /* who wiz format specifier */
104 MOTD, 94 MOTD,
105 "rules", 95 "rules",
106 "news", 96 "news",
107 "", /* DM_MAIL */ 97 "", /* 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 */ 98 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
114 EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y,
115 0, 99 0,
116 1.0, 100 1.0,
117 101
118/* Armor enchantment stuff */ 102/* Armor enchantment stuff */
119 ARMOR_MAX_ENCHANT, 103 ARMOR_MAX_ENCHANT,
120 ARMOR_WEIGHT_REDUCTION, 104 ARMOR_WEIGHT_REDUCTION,
121 ARMOR_WEIGHT_LINEAR, 105 ARMOR_WEIGHT_LINEAR,
122 ARMOR_SPEED_IMPROVEMENT, 106 ARMOR_SPEED_IMPROVEMENT,
123 ARMOR_SPEED_LINEAR, 107 ARMOR_SPEED_LINEAR,
124 1, /* no_player_stealing */
125 1, /* create_home_portals */
126}; 108};
127 109
128/* perhaps not the best place for this, but needs to be 110/* perhaps not the best place for this, but needs to be
129 * in some file in the common area so that standalone 111 * in some file in the common area so that standalone
130 * programs, like the random map generator, can be built. 112 * programs, like the random map generator, can be built.
150 "Wounding", 132 "Wounding",
151 "Death", 133 "Death",
152 "Light" 134 "Light"
153}; 135};
154 136
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/* 137/*
206 * It is vital that init_library() is called by any functions 138 * It is vital that init_library() is called by any functions
207 * using this library. 139 * using this library.
208 * If you want to lessen the size of the program using the library, 140 * 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 141 * you can replace the call to init_library() with init_globals() and
210 * init_function_pointers(). Good idea to also call init_vars and 142 * init_function_pointers(). Good idea to also call init_vars and
211 * init_hash_table if you are doing any object loading. 143 * init_hash_table if you are doing any object loading.
212 */ 144 */
213
214void 145void
215init_library (void) 146init_library (void)
216{ 147{
217 init_environ ();
218 init_globals (); 148 init_globals ();
219 init_objects ();
220 init_vars ();
221 init_block (); 149 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 (); 150 init_dynamic ();
227 init_attackmess (); 151 init_attackmess ();
228 init_clocks ();
229 init_emergency_mappath ();
230 init_experience (); 152 init_experience ();
231} 153}
232 154
233
234/* init_environ initializes values from the environmental variables. 155/* init_environ initialises values from the environmental variables.
235 * it needs to be called very early, since command line options should 156 * it needs to be called very early, since command line options should
236 * overwrite these if specified. 157 * overwrite these if specified.
237 */ 158 */
238void 159void
239init_environ (void) 160init_environ (void)
241 char *cp; 162 char *cp;
242 163
243 cp = getenv ("CROSSFIRE_LIBDIR"); 164 cp = getenv ("CROSSFIRE_LIBDIR");
244 if (cp) 165 if (cp)
245 settings.datadir = cp; 166 settings.datadir = cp;
167
246 cp = getenv ("CROSSFIRE_LOCALDIR"); 168 cp = getenv ("CROSSFIRE_LOCALDIR");
247 if (cp) 169 if (cp)
248 settings.localdir = cp; 170 settings.localdir = cp;
171
249 cp = getenv ("CROSSFIRE_PLAYERDIR"); 172 cp = getenv ("CROSSFIRE_PLAYERDIR");
250 if (cp) 173 if (cp)
251 settings.playerdir = cp; 174 settings.playerdir = cp;
175
252 cp = getenv ("CROSSFIRE_MAPDIR"); 176 cp = getenv ("CROSSFIRE_MAPDIR");
253 if (cp) 177 if (cp)
254 settings.mapdir = cp; 178 settings.mapdir = cp;
179
255 cp = getenv ("CROSSFIRE_ARCHETYPES"); 180 cp = getenv ("CROSSFIRE_ARCHETYPES");
256 if (cp) 181 if (cp)
257 settings.archetypes = cp; 182 settings.archetypes = cp;
183
258 cp = getenv ("CROSSFIRE_TREASURES"); 184 cp = getenv ("CROSSFIRE_TREASURES");
259 if (cp) 185 if (cp)
260 settings.treasures = cp; 186 settings.treasures = cp;
187
261 cp = getenv ("CROSSFIRE_UNIQUEDIR"); 188 cp = getenv ("CROSSFIRE_UNIQUEDIR");
262 if (cp) 189 if (cp)
263 settings.uniquedir = cp; 190 settings.uniquedir = cp;
191
264 cp = getenv ("CROSSFIRE_TEMPLATEDIR"); 192 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
265 if (cp) 193 if (cp)
266 settings.templatedir = cp; 194 settings.templatedir = cp;
195
267 cp = getenv ("CROSSFIRE_TMPDIR"); 196 cp = getenv ("CROSSFIRE_TMPDIR");
268 if (cp) 197 if (cp)
269 settings.tmpdir = cp; 198 settings.tmpdir = cp;
270} 199}
271
272 200
273/* 201/*
274 * Initialises all global variables. 202 * Initialises all global variables.
275 * Might use environment-variables as default for some of them. 203 * Might use environment-variables as default for some of them.
276 */ 204 */
277
278void 205void
279init_globals (void) 206init_globals (void)
280{ 207{
281 if (settings.logfilename[0] == 0) 208 if (settings.logfilename[0] == 0)
282 {
283 logfile = stderr; 209 logfile = stderr;
284 }
285 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 210 else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
286 { 211 {
287 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 212 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
288 logfile = stderr; 213 logfile = stderr;
289 } 214 }
290 else 215 else
216 setvbuf (logfile, NULL, _IOLBF, 0);
217}
218
219void
220init_dynamic (void)
221{
222 for_all_archetypes (at)
291 { 223 {
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}
314
315/*
316 * Sets up and initialises the linked list of free and used objects.
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().
332 */
333
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) 224 if (at->type == MAP)
350 { 225 {
351 if (at->clone.race) 226 if (at->race)
227 first_map_ext_path = at->race;
228
229 if (EXIT_PATH (at))
352 { 230 {
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)); 231 first_map_path = EXIT_PATH (at);
358 return; 232 return;
359 } 233 }
360 } 234 }
361 at = at->next;
362 } 235 }
236
363 LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n"); 237 LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n");
364 exit (-1); 238 exit (-1);
365} 239}
366 240
367unsigned long todtick;
368
369/* 241/*
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. 242 * initialises the attack messages.
423 * Called by init_library(). 243 * Called by init_library().
424 */ 244 */
425 245
426//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; 246//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
427 247
440 return; 260 return;
441 else 261 else
442 has_been_done = 1; 262 has_been_done = 1;
443 263
444 sprintf (filename, "%s/attackmess", settings.datadir); 264 sprintf (filename, "%s/attackmess", settings.datadir);
445 LOG (llevDebug, "Reading attack messages from %s...", filename); 265 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
446 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) 266 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
447 { 267 {
448 LOG (llevError, "Can't open %s.\n", filename); 268 LOG (llevError, "Can't open %s.\n", filename);
449 return; 269 return;
450 } 270 }
480 { 300 {
481 p = strtok (buf, "="); 301 p = strtok (buf, "=");
482 attack_mess[mess][level].level = atoi (buf); 302 attack_mess[mess][level].level = atoi (buf);
483 p = strtok (NULL, "="); 303 p = strtok (NULL, "=");
484 if (p != NULL) 304 if (p != NULL)
485 attack_mess[mess][level].buf1 = strdup_local (p); 305 attack_mess[mess][level].buf1 = strdup (p);
486 else 306 else
487 attack_mess[mess][level].buf1 = strdup_local (""); 307 attack_mess[mess][level].buf1 = strdup ("");
488 mode = 2; 308 mode = 2;
489 continue; 309 continue;
490 } 310 }
491 else if (mode == 2) 311 else if (mode == 2)
492 { 312 {
493 p = strtok (buf, "="); 313 p = strtok (buf, "=");
494 attack_mess[mess][level].level = atoi (buf); 314 attack_mess[mess][level].level = atoi (buf);
495 p = strtok (NULL, "="); 315 p = strtok (NULL, "=");
496 if (p != NULL) 316 if (p != NULL)
497 attack_mess[mess][level].buf2 = strdup_local (p); 317 attack_mess[mess][level].buf2 = strdup (p);
498 else 318 else
499 attack_mess[mess][level].buf2 = strdup_local (""); 319 attack_mess[mess][level].buf2 = strdup ("");
500 mode = 3; 320 mode = 3;
501 continue; 321 continue;
502 } 322 }
503 else if (mode == 3) 323 else if (mode == 3)
504 { 324 {
505 p = strtok (buf, "="); 325 p = strtok (buf, "=");
506 attack_mess[mess][level].level = atoi (buf); 326 attack_mess[mess][level].level = atoi (buf);
507 p = strtok (NULL, "="); 327 p = strtok (NULL, "=");
508 if (p != NULL) 328 if (p != NULL)
509 attack_mess[mess][level].buf3 = strdup_local (p); 329 attack_mess[mess][level].buf3 = strdup (p);
510 else 330 else
511 attack_mess[mess][level].buf3 = strdup_local (""); 331 attack_mess[mess][level].buf3 = strdup ("");
512 mode = 1; 332 mode = 1;
513 level++; 333 level++;
514 total++; 334 total++;
515 continue; 335 continue;
516 } 336 }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines