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.14 by root, Thu Sep 21 00:05:24 2006 UTC vs.
Revision 1.47 by root, Tue Sep 23 04:51:11 2008 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 Marc Alexander Lehmann / Robin Redeker / the Deliantra 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 * Deliantra 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 <support@deliantra.net>
21 The authors can be reached via e-mail at <crossfire@schmorp.de>
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>
71 DATADIR, 71 DATADIR,
72 LOCALDIR, 72 LOCALDIR,
73 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 73 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
74 UNIQUE_DIR, TEMPLATE_DIR, 74 UNIQUE_DIR, TEMPLATE_DIR,
75 TMPDIR, 75 TMPDIR,
76 PK_LUCK_PENALTY,
76 STAT_LOSS_ON_DEATH, 77 STAT_LOSS_ON_DEATH,
77 PK_LUCK_PENALTY,
78 PERMANENT_EXPERIENCE_RATIO, 78 PERMANENT_EXPERIENCE_RATIO,
79 DEATH_PENALTY_RATIO, 79 DEATH_PENALTY_RATIO,
80 DEATH_PENALTY_LEVEL, 80 DEATH_PENALTY_LEVEL,
81 BALANCED_STAT_LOSS, 81 BALANCED_STAT_LOSS,
82 NOT_PERMADETH, 82 NOT_PERMADETH,
83 SIMPLE_EXP, 83 SIMPLE_EXP,
84 RESET_LOCATION_TIME,
85 SET_TITLE, 84 SET_TITLE,
86 RESURRECTION, 85 RESURRECTION,
87 SEARCH_ITEMS, 86 SEARCH_ITEMS,
88 SPELL_ENCUMBRANCE, 87 SPELL_ENCUMBRANCE,
89 SPELL_FAILURE_EFFECTS, 88 SPELL_FAILURE_EFFECTS,
90 CASTING_TIME, 89 SET_FRIENDLY_FIRE,
91 REAL_WIZ, 90 0,
92 RECYCLE_TMP_MAPS, 91 0,
93 EXPLORE_MODE, 92 EXPLORE_MODE,
94 SPELLPOINT_LEVEL_DEPEND, 93 SPELLPOINT_LEVEL_DEPEND,
95 SET_FRIENDLY_FIRE,
96 "", /* Who format specifier */
97 "", /* who wiz format specifier */
98 MOTD, 94 MOTD,
99 "rules", 95 "rules",
100 "news", 96 "news",
101 "", /* DM_MAIL */ 97 "", /* DM_MAIL */
102 0, /* This and the next 3 values are metaserver values */
103 "",
104 "",
105 0,
106 "",
107 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */ 98 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
108 EMERGENCY_MAPPATH, EMERGENCY_X, EMERGENCY_Y,
109 0, 99 0,
110 1.0, 100 1.0,
111 101
112/* Armor enchantment stuff */ 102/* Armor enchantment stuff */
113 ARMOR_MAX_ENCHANT, 103 ARMOR_MAX_ENCHANT,
114 ARMOR_WEIGHT_REDUCTION, 104 ARMOR_WEIGHT_REDUCTION,
115 ARMOR_WEIGHT_LINEAR, 105 ARMOR_WEIGHT_LINEAR,
116 ARMOR_SPEED_IMPROVEMENT, 106 ARMOR_SPEED_IMPROVEMENT,
117 ARMOR_SPEED_LINEAR, 107 ARMOR_SPEED_LINEAR,
118 1, /* no_player_stealing */
119 1, /* create_home_portals */
120}; 108};
121 109
122/* perhaps not the best place for this, but needs to be 110/* perhaps not the best place for this, but needs to be
123 * in some file in the common area so that standalone 111 * in some file in the common area so that standalone
124 * programs, like the random map generator, can be built. 112 * programs, like the random map generator, can be built.
144 "Wounding", 132 "Wounding",
145 "Death", 133 "Death",
146 "Light" 134 "Light"
147}; 135};
148 136
149
150/* This loads the emergency map information from a
151 * .emergency file in the map directory. Doing this makes
152 * it easier to switch between map distributions (don't need
153 * to recompile. Note that there is no reason I see that
154 * this could not be re-loaded during play, but it seems
155 * like there should be little reason to do that.
156 */
157static void
158init_emergency_mappath (void)
159{
160 char filename[MAX_BUF], tmpbuf[MAX_BUF];
161 FILE *fp;
162 int online = 0;
163
164 /* If this file doesn't exist, not a big deal */
165 sprintf (filename, "%s/%s/.emergency", settings.datadir, settings.mapdir);
166 if ((fp = fopen (filename, "r")) != NULL)
167 {
168 while (fgets (tmpbuf, MAX_BUF - 1, fp))
169 {
170 if (tmpbuf[0] == '#')
171 continue; /* ignore comments */
172
173 if (online == 0)
174 {
175 tmpbuf[strlen (tmpbuf) - 1] = 0; /* kill newline */
176 settings.emergency_mapname = strdup_local (tmpbuf);
177 }
178 else if (online == 1)
179 {
180 settings.emergency_x = atoi (tmpbuf);
181 }
182
183 else if (online == 2)
184 {
185 settings.emergency_y = atoi (tmpbuf);
186 }
187 online++;
188 if (online > 2)
189 break;
190 }
191 fclose (fp);
192 if (online <= 2)
193 LOG (llevError, "Online read partial data from %s\n", filename);
194 LOG (llevDebug, "Emergency mappath reset to %s (%d, %d)\n", settings.emergency_mapname, settings.emergency_x, settings.emergency_y);
195 }
196}
197
198
199/*
200 * It is vital that init_library() is called by any functions
201 * using this library.
202 * If you want to lessen the size of the program using the library,
203 * you can replace the call to init_library() with init_globals() and
204 * init_function_pointers(). Good idea to also call init_vars and
205 * init_hash_table if you are doing any object loading.
206 */
207
208void
209init_library (void)
210{
211 init_environ ();
212 init_globals ();
213 init_vars ();
214 init_block ();
215 ReadBmapNames ();
216 ReadSmooth ();
217 init_anim (); /* Must be after we read in the bitmaps */
218 init_archetypes (); /* Reads all archetypes from file */
219 init_dynamic ();
220 init_attackmess ();
221 init_clocks ();
222 init_emergency_mappath ();
223 init_experience ();
224}
225
226
227/* init_environ initializes values from the environmental variables. 137/* init_environ initialises values from the environmental variables.
228 * it needs to be called very early, since command line options should 138 * it needs to be called very early, since command line options should
229 * overwrite these if specified. 139 * overwrite these if specified.
230 */ 140 */
231void 141void
232init_environ (void) 142init_environ (void)
233{ 143{
234 char *cp; 144 const char *cp;
235 145
236 cp = getenv ("CROSSFIRE_LIBDIR"); 146 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
237 if (cp) 147 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp;
238 settings.datadir = cp; 148 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
239 cp = getenv ("CROSSFIRE_LOCALDIR"); 149 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
240 if (cp) 150 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
241 settings.localdir = cp; 151 if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp;
242 cp = getenv ("CROSSFIRE_PLAYERDIR"); 152 if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp;
243 if (cp) 153 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
244 settings.playerdir = cp; 154 if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp;
245 cp = getenv ("CROSSFIRE_MAPDIR"); 155 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
246 if (cp)
247 settings.mapdir = cp;
248 cp = getenv ("CROSSFIRE_ARCHETYPES");
249 if (cp)
250 settings.archetypes = cp;
251 cp = getenv ("CROSSFIRE_TREASURES");
252 if (cp)
253 settings.treasures = cp;
254 cp = getenv ("CROSSFIRE_UNIQUEDIR");
255 if (cp)
256 settings.uniquedir = cp;
257 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
258 if (cp)
259 settings.templatedir = cp;
260 cp = getenv ("CROSSFIRE_TMPDIR");
261 if (cp)
262 settings.tmpdir = cp;
263}
264 156
157 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
158}
265 159
266/* 160/*
267 * Initialises all global variables. 161 * Initialises all global variables.
268 * Might use environment-variables as default for some of them. 162 * Might use environment-variables as default for some of them.
269 */ 163 */
270
271void 164void
272init_globals (void) 165init_globals (void)
273{ 166{
274 if (settings.logfilename[0] == 0) 167 if (settings.logfilename[0] == 0)
275 logfile = stderr; 168 set_logfd (-1);
276 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 169 else
277 { 170 {
171 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
172
173 if (logfd >= 0)
174 set_logfd (logfd);
175 else
176 {
177 set_logfd (-1);
278 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 178 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
279 logfile = stderr; 179 }
280 } 180 }
281 else
282 setvbuf (logfile, NULL, _IOLBF, 0);
283} 181}
284 182
285void 183void
286init_dynamic (void) 184init_dynamic (void)
287{ 185{
288 archetype *at = first_archetype; 186 first_map_ext_path = "/start/HallsOfSelection";
289 187 first_map_path = "/HallOfSelection";
290 while (at)
291 {
292 if (at->clone.type == MAP)
293 {
294 if (at->clone.race)
295 strcpy (first_map_ext_path, at->clone.race);
296
297 if (EXIT_PATH (&at->clone))
298 {
299 strcpy (first_map_path, EXIT_PATH (&at->clone));
300 return;
301 }
302 }
303
304 at = at->next;
305 }
306
307 LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n");
308 exit (-1);
309} 188}
310
311unsigned long todtick;
312 189
313/* 190/*
314 * Write out the current time to the file so time does not
315 * reset every time the server reboots.
316 */
317
318void
319write_todclock (void)
320{
321 char filename[MAX_BUF];
322 FILE *fp;
323
324 sprintf (filename, "%s/clockdata", settings.localdir);
325 if ((fp = fopen (filename, "w")) == NULL)
326 {
327 LOG (llevError, "Cannot open %s for writing\n", filename);
328 return;
329 }
330 fprintf (fp, "%lu", todtick);
331 fclose (fp);
332}
333
334/*
335 * Initializes the gametime and TOD counters
336 * Called by init_library().
337 */
338
339void
340init_clocks (void)
341{
342 char filename[MAX_BUF];
343 FILE *fp;
344 static int has_been_done = 0;
345
346 if (has_been_done)
347 return;
348 else
349 has_been_done = 1;
350
351 sprintf (filename, "%s/clockdata", settings.localdir);
352 LOG (llevDebug, "Reading clockdata from %s...", filename);
353 if ((fp = fopen (filename, "r")) == NULL)
354 {
355 LOG (llevError, "Can't open %s.\n", filename);
356 todtick = 0;
357 write_todclock ();
358 return;
359 }
360 fscanf (fp, "%lu", &todtick);
361 LOG (llevDebug, "todtick=%lu\n", todtick);
362 fclose (fp);
363}
364
365/*
366 * Initializes the attack messages. 191 * initialises the attack messages.
367 * Called by init_library(). 192 * Called by init_library().
368 */ 193 */
369 194
370//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; 195//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
371 196
384 return; 209 return;
385 else 210 else
386 has_been_done = 1; 211 has_been_done = 1;
387 212
388 sprintf (filename, "%s/attackmess", settings.datadir); 213 sprintf (filename, "%s/attackmess", settings.datadir);
389 LOG (llevDebug, "Reading attack messages from %s...", filename); 214 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
390 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL) 215 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
391 { 216 {
392 LOG (llevError, "Can't open %s.\n", filename); 217 LOG (llevError, "Can't open %s.\n", filename);
393 return; 218 return;
394 } 219 }
396 level = 0; 221 level = 0;
397 while (fgets (buf, MAX_BUF, fp) != NULL) 222 while (fgets (buf, MAX_BUF, fp) != NULL)
398 { 223 {
399 if (*buf == '#') 224 if (*buf == '#')
400 continue; 225 continue;
226
401 if ((cp = strchr (buf, '\n')) != NULL) 227 if ((cp = strchr (buf, '\n')) != NULL)
402 *cp = '\0'; 228 *cp = '\0';
229
403 cp = buf; 230 cp = buf;
404 while (*cp == ' ') /* Skip blanks */ 231 while (*cp == ' ') /* Skip blanks */
405 cp++; 232 cp++;
406 233
407 if (strncmp (cp, "TYPE:", 5) == 0) 234 if (strncmp (cp, "TYPE:", 5) == 0)
413 attack_mess[mess][level].level = -1; 240 attack_mess[mess][level].level = -1;
414 attack_mess[mess][level].buf1 = NULL; 241 attack_mess[mess][level].buf1 = NULL;
415 attack_mess[mess][level].buf2 = NULL; 242 attack_mess[mess][level].buf2 = NULL;
416 attack_mess[mess][level].buf3 = NULL; 243 attack_mess[mess][level].buf3 = NULL;
417 } 244 }
245
418 level = 0; 246 level = 0;
419 mess = atoi (p); 247 mess = atoi (p);
420 mode = 1; 248 mode = 1;
421 continue; 249 continue;
422 } 250 }
251
423 if (mode == 1) 252 if (mode == 1)
424 { 253 {
425 p = strtok (buf, "="); 254 p = strtok (buf, "=");
426 attack_mess[mess][level].level = atoi (buf); 255 attack_mess[mess][level].level = atoi (buf);
427 p = strtok (NULL, "="); 256 p = strtok (NULL, "=");
428 if (p != NULL) 257 if (p != NULL)
429 attack_mess[mess][level].buf1 = strdup_local (p); 258 attack_mess[mess][level].buf1 = strdup (p);
430 else 259 else
431 attack_mess[mess][level].buf1 = strdup_local (""); 260 attack_mess[mess][level].buf1 = strdup ("");
432 mode = 2; 261 mode = 2;
433 continue; 262 continue;
434 } 263 }
435 else if (mode == 2) 264 else if (mode == 2)
436 { 265 {
437 p = strtok (buf, "="); 266 p = strtok (buf, "=");
438 attack_mess[mess][level].level = atoi (buf); 267 attack_mess[mess][level].level = atoi (buf);
439 p = strtok (NULL, "="); 268 p = strtok (NULL, "=");
440 if (p != NULL) 269 if (p != NULL)
441 attack_mess[mess][level].buf2 = strdup_local (p); 270 attack_mess[mess][level].buf2 = strdup (p);
442 else 271 else
443 attack_mess[mess][level].buf2 = strdup_local (""); 272 attack_mess[mess][level].buf2 = strdup ("");
444 mode = 3; 273 mode = 3;
445 continue; 274 continue;
446 } 275 }
447 else if (mode == 3) 276 else if (mode == 3)
448 { 277 {
449 p = strtok (buf, "="); 278 p = strtok (buf, "=");
450 attack_mess[mess][level].level = atoi (buf); 279 attack_mess[mess][level].level = atoi (buf);
451 p = strtok (NULL, "="); 280 p = strtok (NULL, "=");
452 if (p != NULL) 281 if (p != NULL)
453 attack_mess[mess][level].buf3 = strdup_local (p); 282 attack_mess[mess][level].buf3 = strdup (p);
454 else 283 else
455 attack_mess[mess][level].buf3 = strdup_local (""); 284 attack_mess[mess][level].buf3 = strdup ("");
456 mode = 1; 285 mode = 1;
457 level++; 286 level++;
458 total++; 287 total++;
459 continue; 288 continue;
460 } 289 }
461 } 290 }
291
462 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); 292 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
463 close_and_delete (fp, comp); 293 close_and_delete (fp, comp);
464} 294}
295

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines