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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines