[ViewVC] Diff of: cvs/deliantra/server/server/init.C

Comparing deliantra/server/server/init.C (file contents):
Revision 1.41 by root, Thu Feb 15 21:07:49 2007 UTC vs.
Revision 1.68 by root, Sun Dec 28 06:59:27 2008 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 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5	* Copyright (C) 2002 Mark Wedel & Crossfire Development Team	5	* Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
6	* Copyright (C) 1992 Frank Tore Johansen	6	* Copyright (©) 1992,2007 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
9	* 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
10	* the Free Software Foundation; either version 2 of the License, or	10	* the Free Software Foundation, either version 3 of the License, or
11	* (at your option) any later version.	11	* (at your 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 GNU General Public License
19	* along with this program; if not, write to the Free Software	19	* along with this program. If not, see <http://www.gnu.org/licenses/>.
20	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21	*	20	*
22	* The authors can be reached via e-mail at <crossfire@schmorp.de>	21	* The authors can be reached via e-mail to <support@deliantra.net>
23	*/	22	*/
24		23
25	#include <global.h>	24	#include <global.h>
26	#include <material.h>	25	#include <material.h>
27	#include <loader.h>	26	#include <loader.h>
28	#include <sproto.h>	27	#include <sproto.h>
29		28
30	void
31	set_logfile (char *val)
32	{
33	settings.logfilename = val;
34	}
35
36	void
37	call_version (void)
38	{
39	version (NULL);
40	exit (0);
41	}
42
43	void
44	showscores (void)
45	{
46	display_high_score (NULL, 9999, NULL);
47	exit (0);
48	}
49
50	void
51	set_debug (void)
52	{
53	settings.debug = llevDebug;
54	}
55
56	void
57	unset_debug (void)
58	{
59	settings.debug = llevInfo;
60	}
61
62	void
63	set_mondebug (void)
64	{
65	settings.debug = llevMonster;
66	}
67
68	void
69	set_dumpmon1 (void)
70	{
71	settings.dumpvalues = 1;
72	}
73
74	void
75	set_dumpmon2 (void)
76	{
77	settings.dumpvalues = 2;
78	}
79
80	void
81	set_dumpmon3 (void)
82	{
83	settings.dumpvalues = 3;
84	}
85
86	void
87	set_dumpmon4 (void)
88	{
89	settings.dumpvalues = 4;
90	}
91
92	void
93	set_dumpmon5 (void)
94	{
95	settings.dumpvalues = 5;
96	}
97
98	void
99	set_dumpmon6 (void)
100	{
101	settings.dumpvalues = 6;
102	}
103
104	void
105	set_dumpmon7 (void)
106	{
107	settings.dumpvalues = 7;
108	}
109
110	void
111	set_dumpmon8 (void)
112	{
113	settings.dumpvalues = 8;
114	}
115
116	void
117	set_dumpmon9 (void)
118	{
119	settings.dumpvalues = 9;
120	}
121
122	void
123	set_dumpmont (char *name)
124	{
125	settings.dumpvalues = 10;
126	settings.dumparg = name;
127	}
128
129	void
130	set_daemon (void)
131	{
132	settings.daemonmode = 1;
133	}
134
135	void
136	set_datadir (char *path)
137	{
138	settings.datadir = path;
139	}
140
141	void
142	set_confdir (char *path)
143	{
144	settings.confdir = path;
145	}
146
147	void
148	set_localdir (char *path)
149	{
150	settings.localdir = path;
151	}
152
153	void
154	set_mapdir (char *path)
155	{
156	settings.mapdir = path;
157	}
158
159	void
160	set_archetypes (char *path)
161	{
162	settings.archetypes = path;
163	}
164
165	void
166	set_regions (char *path)
167	{
168	settings.regions = path;
169	}
170
171	void
172	set_treasures (char *path)
173	{
174	settings.treasures = path;
175	}
176
177	void
178	set_uniquedir (char *path)
179	{
180	settings.uniquedir = path;
181	}
182
183	void
184	set_templatedir (char *path)
185	{
186	settings.templatedir = path;
187	}
188
189	void
190	set_playerdir (char *path)
191	{
192	settings.playerdir = path;
193	}
194
195	void
196	set_tmpdir (char *path)
197	{
198	settings.tmpdir = path;
199	}
200
201	void
202	showscoresparm (char *data)
203	{
204	display_high_score (NULL, 9999, data);
205	exit (0);
206	}
207
208	void
209	set_csport (char *val)
210	{
211	settings.csport = atoi (val);
212	if (settings.csport <= 0 \|\| settings.csport > 32765 \|\| (settings.csport < 1024 && getuid () != 0))
213	{
214	LOG (llevError, "%d is an invalid csport number.\n", settings.csport);
215	exit (1);
216	}
217	}
218
219	/* Most of this is shamelessly stolen from XSysStats. But since that is
220	* also my program, no problem.
221	*/
222	struct Command_Line_Options
223	{
224	const char cmd_option; / how it is called on the command line */
225	uint8 num_args; /* Number or args it takes */
226	uint8 pass; /* What pass this should be processed on. */
227	void (func) (); / function to call when we match this.
228	* if num_args is true, than that gets passed
229	* to the function, otherwise nothing is passed
230	*/
231	};
232
233	/* The way this system works is pretty simple - parse_args takes
234	* the options passed to the program and a pass number. If an option
235	* matches both in name and in pass (and we have enough options),
236	* we call the associated function. This makes writing a multi
237	* pass system very easy, and it is very easy to add in new options.
238	*/
239	struct Command_Line_Options options[] = {
240
241	/* Pass 1 functions - STuff that can/should be called before we actually
242	* initialise any data.
243	*/
244	{"-h", 0, 1, help},
245
246	/* Honor -help also, since it is somewhat common */
247	{"-help", 0, 1, help},
248	{"-v", 0, 1, call_version},
249	{"-d", 0, 1, set_debug},
250	{"+d", 0, 1, unset_debug},
251	{"-mon", 0, 1, set_mondebug},
252	{"-data", 1, 1, (void (*)()) set_datadir},
253	{"-conf", 1, 1, (void (*)()) set_confdir},
254	{"-local", 1, 1, (void (*)()) set_localdir},
255	{"-maps", 1, 1, (void (*)()) set_mapdir},
256	{"-arch", 1, 1, (void (*)()) set_archetypes},
257	{"-regions", 1, 1, (void (*)()) set_regions},
258	{"-playerdir", 1, 1, (void (*)()) set_playerdir},
259	{"-treasures", 1, 1, (void (*)()) set_treasures},
260	{"-uniquedir", 1, 1, (void (*)()) set_uniquedir},
261	{"-templatedir", 1, 1, (void (*)()) set_templatedir},
262	{"-tmpdir", 1, 1, (void (*)()) set_tmpdir},
263	{"-log", 1, 1, (void (*)()) set_logfile},
264
265	/* Pass 2 functions. Most of these could probably be in pass 1,
266	* as they don't require much of anything to bet set up.
267	*/
268	{"-csport", 1, 2, (void (*)()) set_csport},
269	{"-detach", 0, 2, set_daemon},
270
271	/* Start of pass 3 information. In theory, by pass 3, all data paths
272	* and defaults should have been set up.
273	*/
274	{"-o", 0, 3, compile_info},
275	{"-m", 0, 3, set_dumpmon1},
276	{"-m2", 0, 3, set_dumpmon2},
277	{"-m3", 0, 3, set_dumpmon3},
278	{"-m4", 0, 3, set_dumpmon4},
279	{"-m5", 0, 3, set_dumpmon5},
280	{"-m6", 0, 3, set_dumpmon6},
281	{"-m7", 0, 3, set_dumpmon7},
282	{"-m8", 0, 3, set_dumpmon8},
283	{"-m9", 0, 3, set_dumpmon9},
284	{"-mt", 1, 3, (void (*)()) set_dumpmont},
285	{"-mexp", 0, 3, dump_experience},
286	{"-s", 0, 3, showscores},
287	{"-score", 1, 3, (void (*)()) showscoresparm}
288	};
289
290
291	/* Note since this may be called before the library has been set up,
292	* we don't use any of crossfires built in logging functions.
293	*/
294	static void
295	parse_args (int argc, char *argv[], int pass)
296	{
297	size_t i;
298	int on_arg = 1;
299
300	while (on_arg < argc)
301	{
302	for (i = 0; i < sizeof (options) / sizeof (struct Command_Line_Options); i++)
303	{
304	if (!strcmp (options[i].cmd_option, argv[on_arg]))
305	{
306	/* Found a matching option, but should not be processed on
307	* this pass. Just skip over it
308	*/
309	if (options[i].pass != pass)
310	{
311	on_arg += options[i].num_args + 1;
312	break;
313	}
314	if (options[i].num_args)
315	{
316	if ((on_arg + options[i].num_args) >= argc)
317	{
318	fprintf (stderr, "%s requires an argument.\n", options[i].cmd_option);
319	exit (1);
320	}
321	else
322	{
323	if (options[i].num_args == 1)
324	((void ()(char )) options[i].func) (argv[on_arg + 1]);
325	if (options[i].num_args == 2)
326	((void ()(char , char *)) options[i].func) (argv[on_arg + 1], argv[on_arg + 2]);
327	on_arg += options[i].num_args + 1;
328	}
329	}
330	else
331	{ /* takes no args */
332	options[i].func ();
333	on_arg++;
334	}
335	break;
336	}
337	}
338	if (i == sizeof (options) / sizeof (struct Command_Line_Options))
339	{
340	fprintf (stderr, "Unknown option: %s\n", argv[on_arg]);
341	usage ();
342	exit (1);
343	}
344	}
345	}
346
347	//TODO: make this a constructor	29	//TODO: make this a constructor
348	static materialtype_t *	30	static materialtype_t *
349	get_empty_mat (void)	31	get_empty_mat (void)
350	{	32	{
351	materialtype_t *mt;	33	materialtype_t *mt;
352	int i;	34	int i;
353		35
354	mt = new materialtype_t;	36	mt = new materialtype_t;
355		37
356	mt->name = NULL;	38	mt->name = shstr_unknown;
357	mt->description = NULL;	39	mt->description = 0;
		40
358	for (i = 0; i < NROFATTACKS; i++)	41	for (i = 0; i < NROFATTACKS; i++)
359	{	42	{
360	mt->save[i] = 0;	43	mt->save[i] = 0;
361	mt->mod[i] = 0;	44	mt->mod[i] = 0;
362	}	45	}
		46
363	mt->chance = 0;	47	mt->chance = 0;
364	mt->difficulty = 0;	48	mt->difficulty = 0;
365	mt->magic = 0;	49	mt->magic = 0;
366	mt->damage = 0;	50	mt->damage = 0;
367	mt->wc = 0;	51	mt->wc = 0;
368	mt->ac = 0;	52	mt->ac = 0;
369	mt->sp = 0;	53	mt->sp = 0;
370	mt->weight = 100;	54	mt->weight = 100;
371	mt->value = 100;	55	mt->value = 100;
372	mt->next = NULL;	56	mt->density = 1;
		57	mt->next = 0;
		58
373	return mt;	59	return mt;
374	}	60	}
375		61
376	static void	62	void
377	load_materials (void)	63	load_materials (void)
378	{	64	{
379	char filename[MAX_BUF];	65	char filename[MAX_BUF];
380	materialtype_t *mt;
381		66
382	sprintf (filename, "%s/materials", settings.datadir);	67	sprintf (filename, "%s/materials", settings.datadir);
383	LOG (llevDebug, "Reading material type data from %s...\n", filename);	68	LOG (llevDebug, "Reading material type data from %s...\n", filename);
		69
		70	//TODO: somehow free old materials, or update them in-place
		71	materialt = 0;
384		72
385	object_thawer thawer (filename);	73	object_thawer thawer (filename);
386		74
387	if (!thawer)	75	if (!thawer)
388	{	76	{
389	LOG (llevError, "Cannot open %s for reading\n", filename);	77	LOG (llevError, "Cannot open %s for reading\n", filename);
390	mt = get_empty_mat ();	78	goto done;
391	mt->next = 0;	79	}
392	materialt = mt;	80
393	return;	81	while (thawer.kw != KW_name)
394	}	82	{
		83	thawer.next ();
395		84
396	mt = get_empty_mat ();	85	if (thawer.kw == KW_EOF)
397	materialt = mt;	86	goto done;
		87	}
		88
		89	materialtype_t *mt;
398		90
399	for (;;)	91	for (;;)
400	{	92	{
401	switch (thawer.get_kv ())	93	switch (thawer.kw)
402	{	94	{
403	case KW_name:	95	case KW_name:
404	/* clean up the previous entry */
405	if (mt->next)
406	{
407	if (!mt->description)
408	mt->description = mt->name;
409
410	mt = mt->next;
411	}
412
413	mt->next = get_empty_mat ();	96	mt = get_empty_mat ();
		97	mt->next = materialt;
		98	materialt = mt;
		99
414	thawer.get (mt->name);	100	thawer.get (mt->name);
		101	mt->description = mt->name;
415	break;	102	break;
416		103
417	case KW_description:	104	case KW_description:
418	thawer.get (mt->description);	105	thawer.get (mt->description);
419	break;	106	break;
483	default:	170	default:
484	if (!thawer.parse_error ("materials file", "materials"))	171	if (!thawer.parse_error ("materials file", "materials"))
485	goto done;	172	goto done;
486	break;	173	break;
487	}	174	}
		175
		176	thawer.next ();
488	}	177	}
489		178
490	done:	179	done:
491	if (mt->next)	180	if (!materialt)
492	{	181	materialt = get_empty_mat ();
493	delete mt->next;
494
495	mt->next = 0;
496	}
497		182
498	LOG (llevDebug, "Done.\n");	183	LOG (llevDebug, "Done.\n");
499	}	184	}
500		185
501	/* This loads the settings file. There could be debate whether this should	186	/* This loads the settings file. There could be debate whether this should
502	* be here or in the common directory - but since only the server needs this	187	* be here or in the common directory - but since only the server needs this
503	* information, having it here probably makes more sense.	188	* information, having it here probably makes more sense.
504	*/	189	*/
505	static void	190	void
506	load_settings (void)	191	load_settings (void)
507	{	192	{
508	char buf[MAX_BUF], *cp;	193	char buf[MAX_BUF], *cp;
509	int has_val, comp;	194	int has_val, comp;
510	FILE *fp;	195	FILE *fp;
…		…
513		198
514	/* We don't require a settings file at current time, but down the road,	199	/* We don't require a settings file at current time, but down the road,
515	* there will probably be so many values that not having a settings file	200	* there will probably be so many values that not having a settings file
516	* will not be a good thing.	201	* will not be a good thing.
517	*/	202	*/
518	if ((fp = open_and_uncompress (buf, 0, &comp)) == NULL)	203	if (!(fp = open_and_uncompress (buf, 0, &comp)))
519	{	204	{
520	LOG (llevError, "Warning: No settings file found\n");	205	LOG (llevError, "Error: No settings file found\n");
521	return;	206	exit (1);
522	}	207	}
		208
523	while (fgets (buf, MAX_BUF - 1, fp) != NULL)	209	while (fgets (buf, MAX_BUF - 1, fp) != NULL)
524	{	210	{
525	if (buf[0] == '#')	211	if (buf[0] == '#')
526	continue;	212	continue;
527	/* eliminate newline */	213	/* eliminate newline */
…		…
541	*cp++ = 0;	227	*cp++ = 0;
542	has_val = 1;	228	has_val = 1;
543	}	229	}
544	else	230	else
545	{	231	{
546	cp = "";	232	cp = (char *)"";
547	has_val = 0;	233	has_val = 0;
548	}	234	}
549		235
550	if (!strcasecmp (buf, "motd"))	236	if (!strcasecmp (buf, "motd"))
551	{	237	{
…		…
721	else	407	else
722	{	408	{
723	LOG (llevError, "load_settings: Unknown value for " "spell_failure_effects: %s\n", cp);	409	LOG (llevError, "load_settings: Unknown value for " "spell_failure_effects: %s\n", cp);
724	}	410	}
725	}	411	}
726	else if (!strcasecmp (buf, "casting_time"))
727	{
728	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
729	{
730	settings.casting_time = TRUE;
731	}
732	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
733	{
734	settings.casting_time = FALSE;
735	}
736	else
737	{
738	LOG (llevError, "load_settings: Unknown value for " "casting_time: %s\n", cp);
739	}
740	}
741	else if (!strcasecmp (buf, "real_wiz"))
742	{
743	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
744	{
745	settings.real_wiz = TRUE;
746	}
747	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
748	{
749	settings.real_wiz = FALSE;
750	}
751	else
752	{
753	LOG (llevError, "load_settings: Unknown value for " "real_wiz: %s\n", cp);
754	}
755	}
756	else if (!strcasecmp (buf, "spellpoint_level_depend"))	412	else if (!strcasecmp (buf, "spellpoint_level_depend"))
757	{	413	{
758	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))	414	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
759	{	415	{
760	settings.spellpoint_level_depend = TRUE;	416	settings.spellpoint_level_depend = TRUE;
…		…
864	}	520	}
865	else if (!strcasecmp (buf, "set_friendly_fire"))	521	else if (!strcasecmp (buf, "set_friendly_fire"))
866	{	522	{
867	int val = atoi (cp);	523	int val = atoi (cp);
868		524
869	#if COZY_SERVER
870	if (val < 0 \|\| val > 100)	525	if (val < 0 \|\| val > 100)
871	LOG (llevError, "load_settings: set_friendly_fire must be between 0 an 100" ", %d is invalid\n", val);	526	LOG (llevError, "load_settings: set_friendly_fire must be between 0 an 100" ", %d is invalid\n", val);
872	#else
873	if (val < 1 \|\| val > 100)
874	LOG (llevError, "load_settings: set_friendly_fire must be between 1 an 100" ", %d is invalid\n", val);
875	#endif
876	else	527	else
877	settings.set_friendly_fire = val;	528	settings.set_friendly_fire = val;
878	}	529	}
879	else if (!strcasecmp (buf, "armor_max_enchant"))	530	else if (!strcasecmp (buf, "armor_max_enchant"))
880	{	531	{
…		…
933	{	584	{
934	LOG (llevError, "load_settings: unknown value for armor_speed_linear: %s\n", cp);	585	LOG (llevError, "load_settings: unknown value for armor_speed_linear: %s\n", cp);
935	}	586	}
936		587
937	}	588	}
938	else if (!strcasecmp (buf, "no_player_stealing"))
939	{
940	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
941	{
942	settings.no_player_stealing = TRUE;
943	}
944	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
945	{
946	settings.no_player_stealing = FALSE;
947	}
948	else
949	{
950	LOG (llevError, "load_settings: unknown value for no_player_stealing: %s\n", cp);
951	}
952
953	}
954	else if (!strcasecmp (buf, "create_home_portals"))
955	{
956	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
957	{
958	settings.create_home_portals = TRUE;
959	}
960	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
961	{
962	settings.create_home_portals = FALSE;
963	}
964	else
965	{
966	LOG (llevError, "load_settings: Unknown value for create_home_portals: %s\n", cp);
967	}
968
969	}
970	else	589	else
971	{
972	LOG (llevError, "Unknown value in settings file: %s\n", buf);	590	LOG (llevError, "Unknown value in settings file: %s\n", buf);
973	}
974	}	591	}
975		592
976	close_and_delete (fp, comp);	593	close_and_delete (fp, comp);
977	}	594	}
978		595
979	/*	596	/*
980	* init() is called only once, when starting the program.	597	* init() is called only once, when starting the program.
981	*/	598	*/
982
983	void	599	void
984	init (int argc, char **argv)	600	init (int argc, char **argv)
985	{	601	{
986	init_done = 0; /* Must be done before init_signal() */	602	init_done = 0; /* Must be done before init_signal() */
987	rndm.seed (time (0));	603	rndm.seed (time (0));
988		604
989	logfile = stderr;	605	init_environ ();
990	parse_args (argc, argv, 1); /* First arg pass - right now it does
991	* nothing, but in future specifying the
992	* LibDir in this pass would be reasonable*/
993
994	cfperl_init ();	606	cfperl_init ();
995	init_library (); /* Must be called early */
996	load_settings (); /* Load the settings file */
997	load_materials ();
998	parse_args (argc, argv, 2);
999	fprintf (logfile, "Welcome to CrossFire, v%s\n", VERSION);
1000	fprintf (logfile, "Copyright (C) 2005, 2006, 2007 Marc Lehmann.\n");
1001	fprintf (logfile, "Copyright (C) 1994 Mark Wedel.\n");
1002	fprintf (logfile, "Copyright (C) 1992 Frank Tore Johansen.\n");
1003
1004	if (strcmp (settings.dm_mail, "") != 0)
1005	{
1006	fprintf (logfile, "Maintained locally by: %s\n", settings.dm_mail);
1007	fprintf (logfile, "Questions and bugs should be mailed to above address.\n");
1008	}
1009
1010	init_startup (); /* Write (C), check shutdown/forbid files */
1011	init_uuid ();
1012	init_signals (); /* Sets up signal interceptions */
1013	init_commands (); /* Sort command tables */
1014	init_skills ();
1015
1016	parse_args (argc, argv, 3);
1017
1018	if (settings.daemonmode)
1019	logfile = BecomeDaemon (settings.logfilename[0] == '\0' ? "logfile" : settings.logfilename);
1020
1021	init_beforeplay ();
1022	init_ericserver ();
1023	init_done = 1;	607	init_done = 1;
1024	}	608	}
1025		609
1026	void	610	void
1027	usage (void)	611	usage (void)
1028	{	612	{
1029	(void) fprintf (logfile, "Usage: crossfire [-h] [-<flags>]...\n");	613	fprintf (stderr, "Usage: deliantra-server [-h] [-<flags>]...\n");
1030	}	614	}
1031		615
1032	void	616	void
1033	help (void)	617	help (void)
1034	{	618	{
…		…
1075	}	659	}
1076		660
1077	void	661	void
1078	init_beforeplay (void)	662	init_beforeplay (void)
1079	{	663	{
1080	init_archetypes (); /* If not called before, reads all archetypes from file */
1081	init_artifacts (); /* If not called before, reads all artifacts from file */	664	init_artifacts (); /* If not called before, reads all artifacts from file */
1082	init_spells (); /* If not called before, links archtypes used by spells */
1083	init_regions (); /* If not called before, reads all regions from file */
1084	init_archetype_pointers (); /* Setup global pointers to archetypes */
1085	init_races (); /* overwrite race designations using entries in lib/races file */	665	init_races (); /* overwrite race designations using entries in lib/races file */
1086	init_gods (); /* init linked list of gods from archs */	666	init_gods (); /* init linked list of gods from archs */
1087	init_readable (); /* inits useful arrays for readable texts */	667	init_readable (); /* inits useful arrays for readable texts */
1088	init_formulae (); /* If not called before, reads formulae from file */	668	init_formulae (); /* If not called before, reads formulae from file */
1089
1090	switch (settings.dumpvalues)
1091	{
1092	case 1:
1093	print_monsters ();
1094	exit (0);
1095	case 2:
1096	dump_abilities ();
1097	exit (0);
1098	case 3:
1099	dump_artifacts ();
1100	exit (0);
1101	case 4:
1102	dump_spells ();
1103	exit (0);
1104	case 5:
1105	exit (0);
1106	case 6:
1107	dump_races ();
1108	exit (0);
1109	case 7:
1110	dump_alchemy ();
1111	exit (0);
1112	case 9:
1113	dump_alchemy_costs ();
1114	exit (0);
1115	case 10:
1116	dump_monster_treasure (settings.dumparg);
1117	exit (0);
1118	}
1119	}
1120
1121	void
1122	init_startup (void)
1123	{
1124	char buf[MAX_BUF];
1125	FILE *fp;
1126	int comp;
1127
1128	#ifdef SHUTDOWN_FILE
1129	sprintf (buf, "%s/%s", settings.confdir, SHUTDOWN_FILE);
1130	if ((fp = open_and_uncompress (buf, 0, &comp)) != NULL)
1131	{
1132	while (fgets (buf, MAX_BUF - 1, fp) != NULL)
1133	printf ("%s", buf);
1134	close_and_delete (fp, comp);
1135	exit (1);
1136	}
1137	#endif
1138
1139	if (forbid_play ())
1140	{ /* Maybe showing highscore should be allowed? */
1141	LOG (llevError, "CrossFire: Playing not allowed.\n");
1142	exit (-1);
1143	}
1144	}
1145
1146	/*
1147	* compile_info(): activated with the -o flag.
1148	* It writes out information on how Imakefile and config.h was configured
1149	* at compile time.
1150	*/
1151
1152	void
1153	compile_info (void)
1154	{
1155	int i = 0;
1156
1157	printf ("Non-standard include files:\n");
1158	#if !defined (__STRICT_ANSI__) \|\| defined (__sun__)
1159	# if !defined (Mips)
1160	printf ("<stdlib.h>\n");
1161	i = 1;
1162	# endif
1163	# if !defined (MACH) && !defined (sony)
1164	printf ("<malloc.h>\n");
1165	i = 1;
1166	# endif
1167	#endif
1168	#ifndef __STRICT_ANSI__
1169	# ifndef MACH
1170	printf ("<memory.h\n");
1171	i = 1;
1172	# endif
1173	#endif
1174	#ifndef sgi
1175	printf ("<sys/timeb.h>\n");
1176	i = 1;
1177	#endif
1178	if (!i)
1179	printf ("(none)\n");
1180	printf ("Datadir:\t\t%s\n", settings.datadir);
1181	printf ("Localdir:\t\t%s\n", settings.localdir);
1182	#ifdef PERM_FILE
1183	printf ("Perm file:\t<ETC>/%s\n", PERM_FILE);
1184	#endif
1185	#ifdef SHUTDOWN_FILE
1186	printf ("Shutdown file:\t<ETC>/%s\n", SHUTDOWN_FILE);
1187	#endif
1188	printf ("Save player:\t<true>\n");
1189	printf ("Save mode:\t%4.4o\n", SAVE_MODE);
1190	printf ("Playerdir:\t<VAR>/%s\n", settings.playerdir);
1191	printf ("Itemsdir:\t<VAR>/%s\n", settings.uniquedir);
1192	printf ("Tmpdir:\t\t%s\n", settings.tmpdir);
1193	#ifdef USE_CALLOC
1194	printf ("Use_calloc:\t<true>\n");
1195	#else
1196	printf ("Use_calloc:\t<false>\n");
1197	#endif
1198
1199	#ifdef X_EDITOR
1200	printf ("Editor:\t\t%s\n", X_EDITOR);
1201	#endif
1202
1203	printf ("Max_time:\t%d\n", MAX_TIME);
1204
1205	execl ("/bin/uname", "uname", "-a", NULL);
1206	LOG (llevError, "Oops, shouldn't have gotten here: execl(/bin/uname) failed: %s\n", strerror (errno));
1207	exit (-1);
1208	}	669	}
1209		670
1210	/* Signal handlers: */	671	/* Signal handlers: */
1211		672
1212	void	673	static void
1213	rec_sigabrt (int i)	674	rec_sigabrt (int i)
1214	{	675	{
1215	signal (SIGABRT, SIG_DFL);	676	signal (SIGABRT, SIG_DFL);
1216		677
1217	LOG (llevError, "SIGABRT received.\n");	678	LOG (llevError, "SIGABRT received.\n");
1218	cleanup ("SIGABRT received", 1);	679	cleanup ("SIGABRT received", 1);
1219	}	680	}
1220		681
1221	void	682	static void
1222	rec_sigsegv (int i)	683	rec_sigsegv (int i)
1223	{	684	{
1224	signal (SIGSEGV, SIG_DFL);	685	signal (SIGSEGV, SIG_DFL);
1225		686
1226	LOG (llevError, "SIGSEGV received.\n");	687	LOG (llevError, "SIGSEGV received.\n");
1227	cleanup ("SIGSEGV received", 1);	688	cleanup ("SIGSEGV received", 1);
1228	}	689	}
1229		690
1230	void	691	static void
1231	rec_sigquit (int i)	692	rec_sigquit (int i)
1232	{	693	{
1233	signal (SIGQUIT, SIG_IGN);	694	signal (SIGQUIT, SIG_IGN);
1234		695
1235	LOG (llevInfo, "SIGQUIT received\n");	696	LOG (llevInfo, "SIGQUIT received\n");
1236	cleanup ("SIGQUIT received", 1);	697	cleanup ("SIGQUIT received", 1);
1237	}	698	}
1238		699
1239	void	700	static void
1240	rec_sigbus (int i)	701	rec_sigbus (int i)
1241	{	702	{
1242	signal (SIGBUS, SIG_DFL);	703	signal (SIGBUS, SIG_DFL);
1243		704
1244	LOG (llevError, "SIGBUS received\n");	705	LOG (llevError, "SIGBUS received\n");
1245	cleanup ("SIGBUS received", 1);	706	cleanup ("SIGBUS received", 1);
		707	}
		708
		709	void
		710	reset_signals ()
		711	{
		712	signal (SIGABRT, SIG_DFL);
		713	signal (SIGQUIT, SIG_DFL);
		714	signal (SIGSEGV, SIG_DFL);
		715	signal (SIGBUS , SIG_DFL);
		716	signal (SIGINT , SIG_DFL);
		717	signal (SIGTERM, SIG_DFL);
1246	}	718	}
1247		719
1248	void	720	void
1249	init_signals (void)	721	init_signals (void)
1250	{	722	{
…		…
1259	sigaltstack (&ss, 0);	731	sigaltstack (&ss, 0);
1260		732
1261	struct sigaction sa;	733	struct sigaction sa;
1262		734
1263	sigfillset (&sa.sa_mask);	735	sigfillset (&sa.sa_mask);
1264	sa.sa_flags = SA_ONSTACK \| SA_RESTART;	736	sa.sa_flags = SA_RESTART;
1265		737
1266	sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0);	738	sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0);
1267	sa.sa_handler = rec_sigabrt; sigaction (SIGABRT, &sa, 0);	739	sa.sa_handler = rec_sigabrt; sigaction (SIGABRT, &sa, 0);
1268	sa.sa_handler = rec_sigquit; sigaction (SIGQUIT, &sa, 0);	740	sa.sa_handler = rec_sigquit; sigaction (SIGQUIT, &sa, 0);
		741	sa.sa_handler = rec_sigbus; sigaction (SIGBUS, &sa, 0);
		742
		743	sa.sa_flags \|= SA_ONSTACK;
1269	sa.sa_handler = rec_sigsegv; sigaction (SIGSEGV, &sa, 0);	744	sa.sa_handler = rec_sigsegv; sigaction (SIGSEGV, &sa, 0);
1270	sa.sa_handler = rec_sigbus; sigaction (SIGBUS, &sa, 0);
1271	}	745	}
1272		746
1273	/* init_races() - reads the races file in the lib/ directory, then	747	/* init_races() - reads the races file in the lib/ directory, then
1274	* overwrites old 'race' entries. This routine allow us to quickly	748	* overwrites old 'race' entries. This routine allow us to quickly
1275	* re-configure the 'alignment' of monsters, objects. Useful for	749	* re-configure the 'alignment' of monsters, objects. Useful for
…		…
1307	*cp = '\0';	781	*cp = '\0';
1308		782
1309	cp = buf;	783	cp = buf;
1310	while (cp == ' ' \|\| cp == '!' \|\| *cp == '@')	784	while (cp == ' ' \|\| cp == '!' \|\| *cp == '@')
1311	{	785	{
1312	if (*cp == '!')	786	if (*cp == '!') set_race = 0;
1313	set_race = 0;
1314	if (*cp == '@')	787	if (*cp == '@') set_list = 0;
1315	set_list = 0;	788
1316	cp++;	789	cp++;
1317	}	790	}
1318		791
1319	if (sscanf (cp, "RACE %s", variable))	792	if (sscanf (cp, "RACE %s", variable))
1320	/* set new race value */	793	/* set new race value */
…		…
1340	/* set creature race to race value */	813	/* set creature race to race value */
1341	if ((mon = archetype::find (cp)) == NULL)	814	if ((mon = archetype::find (cp)) == NULL)
1342	LOG (llevError, "Creature %s in race file lacks archetype\n", cp);	815	LOG (llevError, "Creature %s in race file lacks archetype\n", cp);
1343	else	816	else
1344	{	817	{
1345	if (set_race && (!mon->clone.race \|\| strcmp (mon->clone.race, race)))	818	if (set_race && (!mon->race \|\| strcmp (mon->race, race)))
1346	{	819	{
1347	if (mon->clone.race)	820	if (mon->race)
1348	LOG (llevDebug, "Resetting race to %s from %s for archetype %s\n", race, &mon->clone.race, &mon->name);	821	LOG (llevDebug, "Resetting race to %s from %s for archetype %s\n", race, &mon->race, &mon->archname);
1349		822
1350	mon->clone.race = race;	823	mon->race = race;
1351	}	824	}
1352		825
1353	/* if the arch is a monster, add it to the race list */	826	/* if the arch is a monster, add it to the race list */
1354	if (set_list && QUERY_FLAG (&mon->clone, FLAG_MONSTER))	827	if (set_list && QUERY_FLAG (mon, FLAG_MONSTER))
1355	add_to_racelist (race, &mon->clone);	828	add_to_racelist (race, mon);
1356	}	829	}
1357	}	830	}
1358	}	831	}
1359		832
1360	fclose (file);	833	fclose (file);
…		…
1369		842
1370	for (list = first_race; list; list = list->next)	843	for (list = first_race; list; list = list->next)
1371	{	844	{
1372	fprintf (stderr, "\nRACE %s:\t", &list->name);	845	fprintf (stderr, "\nRACE %s:\t", &list->name);
1373	for (tmp = list->member; tmp; tmp = tmp->next)	846	for (tmp = list->member; tmp; tmp = tmp->next)
1374	fprintf (stderr, "%s(%d), ", &tmp->ob->arch->name, tmp->ob->level);	847	fprintf (stderr, "%s(%d), ", &tmp->ob->arch->archname, tmp->ob->level);
1375	}	848	}
1376		849
1377	fprintf (stderr, "\n");	850	fprintf (stderr, "\n");
1378	}	851	}
1379		852

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/server/init.C (file contents): Revision 1.41 by root, Thu Feb 15 21:07:49 2007 UTC vs. Revision 1.68 by root, Sun Dec 28 06:59:27 2008 UTC

Diff Legend

Comparing deliantra/server/server/init.C (file contents):
Revision 1.41 by root, Thu Feb 15 21:07:49 2007 UTC vs.
Revision 1.68 by root, Sun Dec 28 06:59:27 2008 UTC