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.35 by root, Thu May 17 14:14:54 2007 UTC vs.
Revision 1.58 by root, Wed Apr 28 19:49:50 2010 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game 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
70 NULL, /* argv */ 72 NULL, /* argv */
71 CONFDIR, 73 CONFDIR,
72 DATADIR, 74 DATADIR,
73 LOCALDIR, 75 LOCALDIR,
74 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES, 76 PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
75 UNIQUE_DIR, TEMPLATE_DIR, 77 UNIQUE_DIR, "",
76 TMPDIR, 78 TMPDIR,
77 PK_LUCK_PENALTY, 79 PK_LUCK_PENALTY,
78 STAT_LOSS_ON_DEATH, 80 STAT_LOSS_ON_DEATH,
79 PERMANENT_EXPERIENCE_RATIO, 81 PERMANENT_EXPERIENCE_RATIO,
80 DEATH_PENALTY_RATIO, 82 DEATH_PENALTY_RATIO,
90 SET_FRIENDLY_FIRE, 92 SET_FRIENDLY_FIRE,
91 0, 93 0,
92 0, 94 0,
93 EXPLORE_MODE, 95 EXPLORE_MODE,
94 SPELLPOINT_LEVEL_DEPEND, 96 SPELLPOINT_LEVEL_DEPEND,
95 MOTD,
96 "rules",
97 "news",
98 "", /* DM_MAIL */
99 0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
100 0, 97 0,
101 1.0, 98 1.0,
102 99
103/* Armor enchantment stuff */ 100/* Armor enchantment stuff */
104 ARMOR_MAX_ENCHANT, 101 ARMOR_MAX_ENCHANT,
133 "Wounding", 130 "Wounding",
134 "Death", 131 "Death",
135 "Light" 132 "Light"
136}; 133};
137 134
138/*
139 * It is vital that init_library() is called by any functions
140 * using this library.
141 * If you want to lessen the size of the program using the library,
142 * you can replace the call to init_library() with init_globals() and
143 * init_function_pointers(). Good idea to also call init_vars and
144 * init_hash_table if you are doing any object loading.
145 */
146void
147init_library (void)
148{
149 init_globals ();
150 init_block ();
151 init_dynamic ();
152 init_attackmess ();
153 init_experience ();
154}
155
156/* init_environ initialises values from the environmental variables. 135/* init_environ initialises values from the environmental variables.
157 * 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
158 * overwrite these if specified. 137 * overwrite these if specified.
159 */ 138 */
160void 139void
161init_environ (void) 140init_environ ()
162{ 141{
163 char *cp; 142 const char *cp;
164 143
165 cp = getenv ("CROSSFIRE_LIBDIR"); 144 if (cp = getenv ("DELIANTRA_CONFDIR" )) settings.confdir = cp;
166 if (cp) 145 if (cp = getenv ("DELIANTRA_LIBDIR" )) settings.datadir = cp;
167 settings.datadir = cp; 146 if (cp = getenv ("DELIANTRA_LOCALDIR" )) settings.localdir = cp;
147 if (cp = getenv ("DELIANTRA_PLAYERDIR" )) settings.playerdir = cp;
148 if (cp = getenv ("DELIANTRA_MAPDIR" )) settings.mapdir = cp;
149 if (cp = getenv ("DELIANTRA_ARCHETYPES" )) settings.archetypes = cp;
150 if (cp = getenv ("DELIANTRA_TREASURES" )) settings.treasures = cp;
151 if (cp = getenv ("DELIANTRA_UNIQUEDIR" )) settings.uniquedir = cp;
152 if (cp = getenv ("DELIANTRA_TEMPLATEDIR")) settings.templatedir = cp;
153 if (cp = getenv ("DELIANTRA_TMPDIR" )) settings.tmpdir = cp;
168 154
169 cp = getenv ("CROSSFIRE_LOCALDIR"); 155 if (cp = getenv ("DELIANTRA_LOGFILE" )) settings.logfilename = cp;
170 if (cp)
171 settings.localdir = cp;
172
173 cp = getenv ("CROSSFIRE_PLAYERDIR");
174 if (cp)
175 settings.playerdir = cp;
176
177 cp = getenv ("CROSSFIRE_MAPDIR");
178 if (cp)
179 settings.mapdir = cp;
180
181 cp = getenv ("CROSSFIRE_ARCHETYPES");
182 if (cp)
183 settings.archetypes = cp;
184
185 cp = getenv ("CROSSFIRE_TREASURES");
186 if (cp)
187 settings.treasures = cp;
188
189 cp = getenv ("CROSSFIRE_UNIQUEDIR");
190 if (cp)
191 settings.uniquedir = cp;
192
193 cp = getenv ("CROSSFIRE_TEMPLATEDIR");
194 if (cp)
195 settings.templatedir = cp;
196
197 cp = getenv ("CROSSFIRE_TMPDIR");
198 if (cp)
199 settings.tmpdir = cp;
200} 156}
201 157
202/* 158/*
203 * Initialises all global variables. 159 * Initialises all global variables.
204 * Might use environment-variables as default for some of them. 160 * Might use environment-variables as default for some of them.
205 */ 161 */
206void 162void
207init_globals (void) 163init_globals ()
208{ 164{
209 if (settings.logfilename[0] == 0) 165 if (settings.logfilename[0] == 0)
210 logfile = stderr; 166 log_setfd (-1);
211 else if ((logfile = fopen (settings.logfilename, "a")) == NULL) 167 else
212 { 168 {
169 int logfd = open (settings.logfilename, O_CREAT|O_WRONLY|O_APPEND, 0666);
170
171 if (logfd >= 0)
172 log_setfd (logfd);
173 else
174 {
175 log_setfd (-1);
213 fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename); 176 LOG (llevError, "Unable to open %s as the logfile - will use stderr instead", settings.logfilename);
214 logfile = stderr; 177 }
215 } 178 }
216 else
217 setvbuf (logfile, NULL, _IOLBF, 0);
218} 179}
219 180
220void 181void
221init_dynamic (void) 182init_dynamic ()
222{ 183{
223 archetype *at = first_archetype; 184 first_map_ext_path = "/start/HallsOfSelection";
224 185 first_map_path = "/HallOfSelection";
225 while (at)
226 {
227 if (at->clone.type == MAP)
228 {
229 if (at->clone.race)
230 first_map_ext_path = at->clone.race;
231
232 if (EXIT_PATH (&at->clone))
233 {
234 first_map_path = EXIT_PATH (&at->clone);
235 return;
236 }
237 }
238
239 at = at->next;
240 }
241
242 LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n");
243 exit (-1);
244} 186}
245 187
246/* 188/*
247 * initialises the attack messages. 189 * initialises the attack messages.
248 * Called by init_library(). 190 * Called by init_library().
249 */ 191 */
250 192
251//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS]; 193//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
252 194
253void 195void
254init_attackmess (void) 196init_attackmess ()
255{ 197{
256 char buf[MAX_BUF]; 198 object_thawer thawer (settings.datadir, "attackmess");
257 char filename[MAX_BUF];
258 char *cp, *p;
259 FILE *fp;
260 static int has_been_done = 0;
261 int mess, level, comp;
262 int mode = 0, total = 0;
263 199
264 if (has_been_done) 200 if (!thawer)
265 return;
266 else
267 has_been_done = 1;
268
269 sprintf (filename, "%s/attackmess", settings.datadir);
270 LOG (llevDebug, "Reading attack messages from %s...\n", filename);
271 if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
272 { 201 {
273 LOG (llevError, "Can't open %s.\n", filename); 202 LOG (llevError, "Can't open %s.\n", thawer.name);
274 return; 203 return;
275 } 204 }
276 205
277 level = 0; 206 int msgnum = -1;
278 while (fgets (buf, MAX_BUF, fp) != NULL) 207 int total = 0;
208
209 while (thawer.kw)
279 { 210 {
280 if (*buf == '#') 211 if (thawer.kw != KW_type)
281 continue; 212 if (!thawer.parse_error ("attackmess file"))
282 if ((cp = strchr (buf, '\n')) != NULL) 213 break;
283 *cp = '\0';
284 cp = buf;
285 while (*cp == ' ') /* Skip blanks */
286 cp++;
287 214
288 if (strncmp (cp, "TYPE:", 5) == 0) 215 thawer.get (msgnum);
216 thawer.next ();
217
218 int level = 0;
219
220 while (thawer.kw == KW_hp)
289 { 221 {
290 p = strtok (buf, ":"); 222 // our old friend, dog-slow sscanf
291 p = strtok (NULL, ":"); 223 int hp;
292 if (mode == 1) 224 char buf1[1024];
225 char buf2[1024];
226 char buf3[1024];
227
228 if (4 != sscanf (thawer.value_nn, "%d %1023[^|]|%1023[^|]|%1023[^|]",
229 &hp, buf1, buf2, buf3))
230 thawer.parse_error ("attackmess file");
231 else
293 { 232 {
233 if (*buf2 == '-')
234 *buf2 = 0; // sscanf can't parse empty fields, so use "-" as marker
235
294 attack_mess[mess][level].level = -1; 236 attack_mess[msgnum][level].level = hp;
295 attack_mess[mess][level].buf1 = NULL; 237 attack_mess[msgnum][level].buf1 = strdup (buf1);
296 attack_mess[mess][level].buf2 = NULL; 238 attack_mess[msgnum][level].buf2 = strdup (buf2);
297 attack_mess[mess][level].buf3 = NULL; 239 attack_mess[msgnum][level].buf3 = strdup (buf3);
240
241 ++level;
242 ++total;
298 } 243 }
299 level = 0; 244
300 mess = atoi (p); 245 thawer.next ();
301 mode = 1;
302 continue;
303 } 246 }
304 if (mode == 1) 247
305 {
306 p = strtok (buf, "=");
307 attack_mess[mess][level].level = atoi (buf); 248 attack_mess[msgnum][level].level = -1;
308 p = strtok (NULL, "=");
309 if (p != NULL)
310 attack_mess[mess][level].buf1 = strdup (p); 249 attack_mess[msgnum][level].buf1 = 0;
311 else
312 attack_mess[mess][level].buf1 = strdup ("");
313 mode = 2;
314 continue;
315 }
316 else if (mode == 2)
317 {
318 p = strtok (buf, "=");
319 attack_mess[mess][level].level = atoi (buf);
320 p = strtok (NULL, "=");
321 if (p != NULL)
322 attack_mess[mess][level].buf2 = strdup (p); 250 attack_mess[msgnum][level].buf2 = 0;
323 else
324 attack_mess[mess][level].buf2 = strdup ("");
325 mode = 3;
326 continue;
327 }
328 else if (mode == 3)
329 {
330 p = strtok (buf, "=");
331 attack_mess[mess][level].level = atoi (buf);
332 p = strtok (NULL, "=");
333 if (p != NULL)
334 attack_mess[mess][level].buf3 = strdup (p); 251 attack_mess[msgnum][level].buf3 = 0;
335 else
336 attack_mess[mess][level].buf3 = strdup ("");
337 mode = 1;
338 level++;
339 total++;
340 continue;
341 }
342 } 252 }
253
343 LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1); 254 LOG (llevDebug, "got %d messages in %d categories.\n", total, msgnum + 1);
344 close_and_delete (fp, comp);
345} 255}
256

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines