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

Comparing deliantra/server/server/init.C (file contents):
Revision 1.22 by root, Tue Dec 26 08:55:00 2006 UTC vs.
Revision 1.64 by root, Tue Apr 22 23:50:24 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	#include <global.h>	24	#include <global.h>
25	#include <material.h>	25	#include <material.h>
26	#include <loader.h>	26	#include <loader.h>
27	#include <sproto.h>	27	#include <sproto.h>
28
29	/* global weathermap */
30	weathermap_t **weathermap;
31		28
32	void	29	void
33	set_logfile (char *val)	30	set_logfile (char *val)
34	{	31	{
35	settings.logfilename = val;	32	settings.logfilename = val;
239	* pass system very easy, and it is very easy to add in new options.	236	* pass system very easy, and it is very easy to add in new options.
240	*/	237	*/
241	struct Command_Line_Options options[] = {	238	struct Command_Line_Options options[] = {
242		239
243	/* Pass 1 functions - STuff that can/should be called before we actually	240	/* Pass 1 functions - STuff that can/should be called before we actually
244	* initialize any data.	241	* initialise any data.
245	*/	242	*/
246	{"-h", 0, 1, help},	243	{"-h", 0, 1, help},
247		244
248	/* Honor -help also, since it is somewhat common */	245	/* Honor -help also, since it is somewhat common */
249	{"-help", 0, 1, help},	246	{"-help", 0, 1, help},
…		…
271	{"-detach", 0, 2, set_daemon},	268	{"-detach", 0, 2, set_daemon},
272		269
273	/* Start of pass 3 information. In theory, by pass 3, all data paths	270	/* Start of pass 3 information. In theory, by pass 3, all data paths
274	* and defaults should have been set up.	271	* and defaults should have been set up.
275	*/	272	*/
276	{"-o", 0, 3, compile_info},
277	{"-m", 0, 3, set_dumpmon1},	273	{"-m", 0, 3, set_dumpmon1},
278	{"-m2", 0, 3, set_dumpmon2},	274	{"-m2", 0, 3, set_dumpmon2},
279	{"-m3", 0, 3, set_dumpmon3},	275	{"-m3", 0, 3, set_dumpmon3},
280	{"-m4", 0, 3, set_dumpmon4},	276	{"-m4", 0, 3, set_dumpmon4},
281	{"-m5", 0, 3, set_dumpmon5},	277	{"-m5", 0, 3, set_dumpmon5},
282	{"-m6", 0, 3, set_dumpmon6},	278	{"-m6", 0, 3, set_dumpmon6},
283	{"-m7", 0, 3, set_dumpmon7},	279	{"-m7", 0, 3, set_dumpmon7},
284	{"-m8", 0, 3, set_dumpmon8},	280	{"-m8", 0, 3, set_dumpmon8},
285	{"-m9", 0, 3, set_dumpmon9},	281	{"-m9", 0, 3, set_dumpmon9},
286	{"-mt", 1, 3, (void (*)()) set_dumpmont},	282	{"-mt", 1, 3, (void (*)()) set_dumpmont},
287	{"-mexp", 0, 3, dump_experience},
288	{"-s", 0, 3, showscores},	283	{"-s", 0, 3, showscores},
289	{"-score", 1, 3, (void (*)()) showscoresparm}	284	{"-score", 1, 3, (void (*)()) showscoresparm}
290	};	285	};
291		286
292		287
293	/* Note since this may be called before the library has been set up,	288	/* Note since this may be called before the library has been set up,
294	* we don't use any of crossfires built in logging functions.	289	* we don't use any of deliantras built in logging functions.
295	*/	290	*/
296	static void	291	static void
297	parse_args (int argc, char *argv[], int pass)	292	parse_args (int argc, char *argv[], int pass)
298	{	293	{
299	size_t i;	294	size_t i;
…		…
376	}	371	}
377		372
378	static void	373	static void
379	load_materials (void)	374	load_materials (void)
380	{	375	{
381	char buf[MAX_BUF], filename[MAX_BUF], cp, next;	376	char filename[MAX_BUF];
382	FILE *fp;
383	materialtype_t *mt;	377	materialtype_t *mt;
384	int i, value;
385		378
386	sprintf (filename, "%s/materials", settings.datadir);	379	sprintf (filename, "%s/materials", settings.datadir);
387	LOG (llevDebug, "Reading material type data from %s...", filename);	380	LOG (llevDebug, "Reading material type data from %s...\n", filename);
388	if ((fp = fopen (filename, "r")) == NULL)	381
		382	object_thawer thawer (filename);
		383
		384	if (!thawer)
389	{	385	{
390	LOG (llevError, "Cannot open %s for reading\n", filename);	386	LOG (llevError, "Cannot open %s for reading\n", filename);
391	mt = get_empty_mat ();	387	mt = get_empty_mat ();
392	mt->next = NULL;	388	mt->next = 0;
393	materialt = mt;	389	materialt = mt;
394	return;	390	return;
395	}	391	}
		392
396	mt = get_empty_mat ();	393	mt = get_empty_mat ();
397	materialt = mt;	394	materialt = mt;
398	while (fgets (buf, MAX_BUF, fp) != NULL)	395
		396	for (;;)
399	{	397	{
400	if (*buf == '#')	398	thawer.next ();
401	continue;	399
402	if ((cp = strchr (buf, '\n')) != NULL)	400	switch (thawer.kw)
403	*cp = '\0';
404	cp = buf;
405	while (cp == ' ') / Skip blanks */
406	cp++;
407	if (!strncmp (cp, "name", 4))
408	{	401	{
		402	case KW_name:
409	/* clean up the previous entry */	403	/* clean up the previous entry */
410	if (mt->next != NULL)	404	if (mt->next)
411	{	405	{
412	if (mt->description == NULL)	406	if (!mt->description)
413	mt->description = mt->name;	407	mt->description = mt->name;
		408
414	mt = mt->next;	409	mt = mt->next;
415	}	410	}
		411
416	mt->next = get_empty_mat ();	412	mt->next = get_empty_mat ();
417	mt->name = strchr (cp, ' ') + 1;	413	thawer.get (mt->name);
418	}	414	break;
419	else if (!strncmp (cp, "description", 11))	415
		416	case KW_description:
		417	thawer.get (mt->description);
		418	break;
		419
		420	case KW_material:
		421	thawer.get (mt->material);
		422	break;
		423
		424	case KW_saves:
420	{	425	{
421	mt->description = strchr (cp, ' ') + 1;	426	const char *cp = thawer.get_str () - 1;
422	}	427
423	else if (sscanf (cp, "material %d", &value))
424	{
425	mt->material = value;
426	}
427	else if (!strncmp (cp, "saves", 5))
428	{
429	cp = strchr (cp, ' ') + 1;
430	for (i = 0; i < NROFATTACKS; i++)	428	for (int i = 0; i < NROFATTACKS; i++)
431	{
432	if (cp == NULL)
433	{	429	{
		430	if (!cp)
		431	{
434	mt->save[i] = 0;	432	mt->save[i] = 0;
435	continue;	433	continue;
		434	}
		435
		436	int value;
		437	++cp;
		438	sscanf (cp, "%d", &value);
		439	mt->save[i] = (sint8) value;
		440	cp = strchr (cp, ',');
436	}	441	}
437	if ((next = strchr (cp, ',')) != NULL)
438	*(next++) = '\0';
439	sscanf (cp, "%d", &value);
440	mt->save[i] = (sint8) value;
441	cp = next;
442	}
443	}
444	else if (!strncmp (cp, "mods", 4))
445	{
446	cp = strchr (cp, ' ') + 1;
447	for (i = 0; i < NROFATTACKS; i++)
448	{	442	}
449	if (cp == NULL)	443	break;
		444
		445	case KW_mods:
		446	{
		447	const char *cp = thawer.get_str () - 1;
		448
		449	for (int i = 0; i < NROFATTACKS; i++)
450	{	450	{
		451	if (!cp)
		452	{
451	mt->save[i] = 0;	453	mt->save[i] = 0;
452	continue;	454	continue;
		455	}
		456
		457	++cp;
		458	int value;
		459	sscanf (cp, "%d", &value);
		460	mt->mod[i] = (sint8) value;
		461	cp = strchr (cp, ',');
453	}	462	}
454	if ((next = strchr (cp, ',')) != NULL)
455	*(next++) = '\0';
456	sscanf (cp, "%d", &value);
457	mt->mod[i] = (sint8) value;
458	cp = next;
459	}
460	}	463	}
461	else if (sscanf (cp, "chance %d\n", &value))	464	break;
		465
		466	case KW_chance: thawer.get (mt->chance); break;
		467	case KW_difficulty: // cf+ alias, not original cf
		468	case KW_diff: thawer.get (mt->difficulty); break;
		469	case KW_magic: thawer.get (mt->magic); break;
		470	case KW_dam: // cf+ alias, not original cf
		471	case KW_damage: thawer.get (mt->damage); break;
		472	case KW_wc: thawer.get (mt->wc); break;
		473	case KW_ac: thawer.get (mt->ac); break;
		474	case KW_sp: thawer.get (mt->sp); break;
		475	case KW_weight: thawer.get (mt->weight); break;
		476	case KW_value: thawer.get (mt->value); break;
		477	case KW_density: thawer.get (mt->density); break;
		478
		479	case KW_EOF:
		480	goto done;
		481
		482	default:
		483	if (!thawer.parse_error ("materials file", "materials"))
		484	goto done;
		485	break;
462	{	486	}
463	mt->chance = (sint8) value;
464	}
465	else if (sscanf (cp, "diff %d\n", &value))
466	{
467	mt->difficulty = (sint8) value;
468	}
469	else if (sscanf (cp, "magic %d\n", &value))
470	{
471	mt->magic = (sint8) value;
472	}
473	else if (sscanf (cp, "damage %d\n", &value))
474	{
475	mt->damage = (sint8) value;
476	}
477	else if (sscanf (cp, "wc %d\n", &value))
478	{
479	mt->wc = (sint8) value;
480	}
481	else if (sscanf (cp, "ac %d\n", &value))
482	{
483	mt->ac = (sint8) value;
484	}
485	else if (sscanf (cp, "sp %d\n", &value))
486	{
487	mt->sp = (sint8) value;
488	}
489	else if (sscanf (cp, "weight %d\n", &value))
490	{
491	mt->weight = value;
492	}
493	else if (sscanf (cp, "value %d\n", &value))
494	{
495	mt->value = value;
496	}
497	}	487	}
		488
		489	done:
498	if (mt->next)	490	if (mt->next)
499	{	491	{
500	delete mt->next;	492	delete mt->next;
501		493
502	mt->next = NULL;	494	mt->next = 0;
503	}	495	}
		496
504	LOG (llevDebug, "Done.\n");	497	LOG (llevDebug, "Done.\n");
505	fclose (fp);
506	}	498	}
507		499
508	/* This loads the settings file. There could be debate whether this should	500	/* This loads the settings file. There could be debate whether this should
509	* be here or in the common directory - but since only the server needs this	501	* be here or in the common directory - but since only the server needs this
510	* information, having it here probably makes more sense.	502	* information, having it here probably makes more sense.
…		…
520		512
521	/* We don't require a settings file at current time, but down the road,	513	/* We don't require a settings file at current time, but down the road,
522	* there will probably be so many values that not having a settings file	514	* there will probably be so many values that not having a settings file
523	* will not be a good thing.	515	* will not be a good thing.
524	*/	516	*/
525	if ((fp = open_and_uncompress (buf, 0, &comp)) == NULL)	517	if (!(fp = open_and_uncompress (buf, 0, &comp)))
526	{	518	{
527	LOG (llevError, "Warning: No settings file found\n");	519	LOG (llevError, "Error: No settings file found\n");
528	return;	520	exit (1);
529	}	521	}
		522
530	while (fgets (buf, MAX_BUF - 1, fp) != NULL)	523	while (fgets (buf, MAX_BUF - 1, fp) != NULL)
531	{	524	{
532	if (buf[0] == '#')	525	if (buf[0] == '#')
533	continue;	526	continue;
534	/* eliminate newline */	527	/* eliminate newline */
…		…
548	*cp++ = 0;	541	*cp++ = 0;
549	has_val = 1;	542	has_val = 1;
550	}	543	}
551	else	544	else
552	{	545	{
553	cp = "";	546	cp = (char *)"";
554	has_val = 0;	547	has_val = 0;
555	}	548	}
556		549
557	if (!strcasecmp (buf, "motd"))	550	if (!strcasecmp (buf, "motd"))
558	{	551	{
…		…
728	else	721	else
729	{	722	{
730	LOG (llevError, "load_settings: Unknown value for " "spell_failure_effects: %s\n", cp);	723	LOG (llevError, "load_settings: Unknown value for " "spell_failure_effects: %s\n", cp);
731	}	724	}
732	}	725	}
733	else if (!strcasecmp (buf, "casting_time"))
734	{
735	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
736	{
737	settings.casting_time = TRUE;
738	}
739	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
740	{
741	settings.casting_time = FALSE;
742	}
743	else
744	{
745	LOG (llevError, "load_settings: Unknown value for " "casting_time: %s\n", cp);
746	}
747	}
748	else if (!strcasecmp (buf, "real_wiz"))
749	{
750	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
751	{
752	settings.real_wiz = TRUE;
753	}
754	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
755	{
756	settings.real_wiz = FALSE;
757	}
758	else
759	{
760	LOG (llevError, "load_settings: Unknown value for " "real_wiz: %s\n", cp);
761	}
762	}
763	else if (!strcasecmp (buf, "explore_mode"))
764	{
765	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
766	{
767	settings.explore_mode = TRUE;
768	}
769	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
770	{
771	settings.explore_mode = FALSE;
772	}
773	else
774	{
775	LOG (llevError, "load_settings: Unknown value for " "explore_mode: %s\n", cp);
776	}
777	}
778	else if (!strcasecmp (buf, "spellpoint_level_depend"))	726	else if (!strcasecmp (buf, "spellpoint_level_depend"))
779	{	727	{
780	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))	728	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
781	{	729	{
782	settings.spellpoint_level_depend = TRUE;	730	settings.spellpoint_level_depend = TRUE;
…		…
886	}	834	}
887	else if (!strcasecmp (buf, "set_friendly_fire"))	835	else if (!strcasecmp (buf, "set_friendly_fire"))
888	{	836	{
889	int val = atoi (cp);	837	int val = atoi (cp);
890		838
891	#if COZY_SERVER
892	if (val < 0 \|\| val > 100)	839	if (val < 0 \|\| val > 100)
893	LOG (llevError, "load_settings: set_friendly_fire must be between 0 an 100" ", %d is invalid\n", val);	840	LOG (llevError, "load_settings: set_friendly_fire must be between 0 an 100" ", %d is invalid\n", val);
894	#else
895	if (val < 1 \|\| val > 100)
896	LOG (llevError, "load_settings: set_friendly_fire must be between 1 an 100" ", %d is invalid\n", val);
897	#endif
898	else	841	else
899	settings.set_friendly_fire = val;	842	settings.set_friendly_fire = val;
900	}	843	}
901	else if (!strcasecmp (buf, "armor_max_enchant"))	844	else if (!strcasecmp (buf, "armor_max_enchant"))
902	{	845	{
…		…
955	{	898	{
956	LOG (llevError, "load_settings: unknown value for armor_speed_linear: %s\n", cp);	899	LOG (llevError, "load_settings: unknown value for armor_speed_linear: %s\n", cp);
957	}	900	}
958		901
959	}	902	}
960	else if (!strcasecmp (buf, "no_player_stealing"))
961	{
962	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
963	{
964	settings.no_player_stealing = TRUE;
965	}
966	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
967	{
968	settings.no_player_stealing = FALSE;
969	}
970	else
971	{
972	LOG (llevError, "load_settings: unknown value for no_player_stealing: %s\n", cp);
973	}
974
975	}
976	else if (!strcasecmp (buf, "create_home_portals"))
977	{
978	if (!strcasecmp (cp, "on") \|\| !strcasecmp (cp, "true"))
979	{
980	settings.create_home_portals = TRUE;
981	}
982	else if (!strcasecmp (cp, "off") \|\| !strcasecmp (cp, "false"))
983	{
984	settings.create_home_portals = FALSE;
985	}
986	else
987	{
988	LOG (llevError, "load_settings: Unknown value for create_home_portals: %s\n", cp);
989	}
990
991	}
992	else	903	else
993	{
994	LOG (llevError, "Unknown value in settings file: %s\n", buf);	904	LOG (llevError, "Unknown value in settings file: %s\n", buf);
995	}
996	}	905	}
997		906
998	close_and_delete (fp, comp);	907	close_and_delete (fp, comp);
999	}	908	}
1000
1001		909
1002	/*	910	/*
1003	* init() is called only once, when starting the program.	911	* init() is called only once, when starting the program.
1004	*/	912	*/
1005
1006	void	913	void
1007	init (int argc, char **argv)	914	init (int argc, char **argv)
1008	{	915	{
1009	init_done = 0; /* Must be done before init_signal() */	916	init_done = 0; /* Must be done before init_signal() */
1010	logfile = stderr;	917	rndm.seed (time (0));
		918
		919	init_environ ();
1011	parse_args (argc, argv, 1); /* First arg pass - right now it does	920	parse_args (argc, argv, 1); /* First arg pass - right now it does
1012	* nothing, but in future specifying the	921	* nothing, but in future specifying the
1013	* LibDir in this pass would be reasonable*/	922	* LibDir in this pass would be reasonable*/
1014		923
		924	init_anim (); // Must be called before perl
		925	init_globals ();
		926	init_experience ();
		927	init_attackmess ();
		928	init_dynamic ();
		929	init_block ();
1015	cfperl_init ();	930	cfperl_init ();
1016	init_library (); /* Must be called early */
1017	load_settings (); /* Load the settings file */	931	load_settings (); /* Load the settings file */
1018	init_weather ();
1019	load_materials ();	932	load_materials ();
1020	parse_args (argc, argv, 2);	933	parse_args (argc, argv, 2);
1021	fprintf (logfile, "Welcome to CrossFire, v%s\n", VERSION);	934	LOG (llevInfo, "Welcome to Deliantra, v" VERSION);
		935	LOG (llevInfo, "Copyright (C) Marc Alexander Lehmann / Robin Redeker / the Deliantra team.");
1022	fprintf (logfile, "Copyright (C) 1994 Mark Wedel.\n");	936	LOG (llevInfo, "Copyright (C) 1994 Mark Wedel.");
1023	fprintf (logfile, "Copyright (C) 1992 Frank Tore Johansen.\n");	937	LOG (llevInfo, "Copyright (C) 1992 Frank Tore Johansen.");
1024		938
1025	if (strcmp (settings.dm_mail, "") != 0)	939	if (strcmp (settings.dm_mail, "") != 0)
1026	{	940	{
1027	fprintf (logfile, "Maintained locally by: %s\n", settings.dm_mail);	941	LOG (llevInfo, "Maintained locally by: %s\n", settings.dm_mail);
1028	fprintf (logfile, "Questions and bugs should be mailed to above address.\n");	942	LOG (llevInfo, "Questions and bugs should be mailed to above address.\n");
1029	}	943	}
1030		944
1031	SRANDOM (time (NULL));	945	UUID::init ();
1032
1033	init_startup (); /* Write (C), check shutdown/forbid files */
1034	init_uuid ();
1035	init_signals (); /* Sets up signal interceptions */	946	init_signals (); /* Sets up signal interceptions */
1036	init_commands (); /* Sort command tables */	947	init_commands (); /* Sort command tables */
1037	read_map_log (); /* Load up the old temp map files */
1038	init_skills ();	948	init_skills ();
1039		949
1040	parse_args (argc, argv, 3);	950	parse_args (argc, argv, 3);
1041		951
1042	if (settings.daemonmode)
1043	logfile = BecomeDaemon (settings.logfilename[0] == '\0' ? "logfile" : settings.logfilename);
1044
1045	init_beforeplay ();	952	init_beforeplay ();
1046	init_ericserver ();
1047	init_done = 1;	953	init_done = 1;
1048	}	954	}
1049		955
1050	void	956	void
1051	usage (void)	957	usage (void)
1052	{	958	{
1053	(void) fprintf (logfile, "Usage: crossfire [-h] [-<flags>]...\n");	959	fprintf (stderr, "Usage: deliantra-server [-h] [-<flags>]...\n");
1054	}	960	}
1055		961
1056	void	962	void
1057	help (void)	963	help (void)
1058	{	964	{
…		…
1099	}	1005	}
1100		1006
1101	void	1007	void
1102	init_beforeplay (void)	1008	init_beforeplay (void)
1103	{	1009	{
1104	init_archetypes (); /* If not called before, reads all archetypes from file */
1105	init_artifacts (); /* If not called before, reads all artifacts from file */	1010	init_artifacts (); /* If not called before, reads all artifacts from file */
1106	init_spells (); /* If not called before, links archtypes used by spells */
1107	init_regions (); /* If not called before, reads all regions from file */
1108	init_archetype_pointers (); /* Setup global pointers to archetypes */
1109	init_races (); /* overwrite race designations using entries in lib/races file */	1011	init_races (); /* overwrite race designations using entries in lib/races file */
1110	init_gods (); /* init linked list of gods from archs */	1012	init_gods (); /* init linked list of gods from archs */
1111	init_readable (); /* inits useful arrays for readable texts */	1013	init_readable (); /* inits useful arrays for readable texts */
1112	init_formulae (); /* If not called before, reads formulae from file */	1014	init_formulae (); /* If not called before, reads formulae from file */
1113
1114	switch (settings.dumpvalues)
1115	{
1116	case 1:
1117	print_monsters ();
1118	exit (0);
1119	case 2:
1120	dump_abilities ();
1121	exit (0);
1122	case 3:
1123	dump_artifacts ();
1124	exit (0);
1125	case 4:
1126	dump_spells ();
1127	exit (0);
1128	case 5:
1129	exit (0);
1130	case 6:
1131	dump_races ();
1132	exit (0);
1133	case 7:
1134	dump_alchemy ();
1135	exit (0);
1136	case 9:
1137	dump_alchemy_costs ();
1138	exit (0);
1139	case 10:
1140	dump_monster_treasure (settings.dumparg);
1141	exit (0);
1142	}
1143	}
1144
1145	void
1146	init_startup (void)
1147	{
1148	char buf[MAX_BUF];
1149	FILE *fp;
1150	int comp;
1151
1152	#ifdef SHUTDOWN_FILE
1153	sprintf (buf, "%s/%s", settings.confdir, SHUTDOWN_FILE);
1154	if ((fp = open_and_uncompress (buf, 0, &comp)) != NULL)
1155	{
1156	while (fgets (buf, MAX_BUF - 1, fp) != NULL)
1157	printf ("%s", buf);
1158	close_and_delete (fp, comp);
1159	exit (1);
1160	}
1161	#endif
1162
1163	if (forbid_play ())
1164	{ /* Maybe showing highscore should be allowed? */
1165	LOG (llevError, "CrossFire: Playing not allowed.\n");
1166	exit (-1);
1167	}
1168	}
1169
1170	/*
1171	* compile_info(): activated with the -o flag.
1172	* It writes out information on how Imakefile and config.h was configured
1173	* at compile time.
1174	*/
1175
1176	void
1177	compile_info (void)
1178	{
1179	int i = 0;
1180
1181	printf ("Non-standard include files:\n");
1182	#if !defined (__STRICT_ANSI__) \|\| defined (__sun__)
1183	# if !defined (Mips)
1184	printf ("<stdlib.h>\n");
1185	i = 1;
1186	# endif
1187	# if !defined (MACH) && !defined (sony)
1188	printf ("<malloc.h>\n");
1189	i = 1;
1190	# endif
1191	#endif
1192	#ifndef __STRICT_ANSI__
1193	# ifndef MACH
1194	printf ("<memory.h\n");
1195	i = 1;
1196	# endif
1197	#endif
1198	#ifndef sgi
1199	printf ("<sys/timeb.h>\n");
1200	i = 1;
1201	#endif
1202	if (!i)
1203	printf ("(none)\n");
1204	printf ("Datadir:\t\t%s\n", settings.datadir);
1205	printf ("Localdir:\t\t%s\n", settings.localdir);
1206	#ifdef PERM_FILE
1207	printf ("Perm file:\t<ETC>/%s\n", PERM_FILE);
1208	#endif
1209	#ifdef SHUTDOWN_FILE
1210	printf ("Shutdown file:\t<ETC>/%s\n", SHUTDOWN_FILE);
1211	#endif
1212	printf ("Save player:\t<true>\n");
1213	printf ("Save mode:\t%4.4o\n", SAVE_MODE);
1214	printf ("Playerdir:\t<VAR>/%s\n", settings.playerdir);
1215	printf ("Itemsdir:\t<VAR>/%s\n", settings.uniquedir);
1216	printf ("Tmpdir:\t\t%s\n", settings.tmpdir);
1217	printf ("Map max timeout:\t%d\n", MAP_MAXTIMEOUT);
1218	printf ("Max objects:\t%d\n", MAX_OBJECTS);
1219	#ifdef USE_CALLOC
1220	printf ("Use_calloc:\t<true>\n");
1221	#else
1222	printf ("Use_calloc:\t<false>\n");
1223	#endif
1224
1225	#ifdef X_EDITOR
1226	printf ("Editor:\t\t%s\n", X_EDITOR);
1227	#endif
1228
1229	printf ("Max_time:\t%d\n", MAX_TIME);
1230
1231	execl ("/bin/uname", "uname", "-a", NULL);
1232	LOG (llevError, "Oops, shouldn't have gotten here: execl(/bin/uname) failed: %s\n", strerror (errno));
1233	exit (-1);
1234	}	1015	}
1235		1016
1236	/* Signal handlers: */	1017	/* Signal handlers: */
1237		1018
1238	void	1019	static void
		1020	rec_sigabrt (int i)
		1021	{
		1022	signal (SIGABRT, SIG_DFL);
		1023
		1024	LOG (llevError, "SIGABRT received.\n");
		1025	cleanup ("SIGABRT received", 1);
		1026	}
		1027
		1028	static void
1239	rec_sigsegv (int i)	1029	rec_sigsegv (int i)
1240	{	1030	{
		1031	signal (SIGSEGV, SIG_DFL);
		1032
1241	LOG (llevError, "SIGSEGV received.\n");	1033	LOG (llevError, "SIGSEGV received.\n");
1242	fatal_signal (1, 1);	1034	cleanup ("SIGSEGV received", 1);
1243	}	1035	}
1244		1036
1245	void	1037	static void
1246	rec_sigint (int i)
1247	{
1248	LOG (llevInfo, "SIGINT received.\n");
1249	fatal_signal (0, 1);
1250	}
1251
1252	void
1253	rec_sighup (int i)
1254	{
1255	LOG (llevInfo, "SIGHUP received\n");
1256
1257	if (init_done)
1258	cleanup ();
1259
1260	exit (0);
1261	}
1262
1263	void
1264	rec_sigquit (int i)	1038	rec_sigquit (int i)
1265	{	1039	{
		1040	signal (SIGQUIT, SIG_IGN);
		1041
1266	LOG (llevInfo, "SIGQUIT received\n");	1042	LOG (llevInfo, "SIGQUIT received\n");
1267	fatal_signal (1, 1);	1043	cleanup ("SIGQUIT received", 1);
1268	}	1044	}
1269		1045
1270	void	1046	static void
1271	rec_sigbus (int i)	1047	rec_sigbus (int i)
1272	{	1048	{
1273	#ifdef SIGBUS	1049	signal (SIGBUS, SIG_DFL);
		1050
1274	LOG (llevError, "SIGBUS received\n");	1051	LOG (llevError, "SIGBUS received\n");
1275	fatal_signal (1, 1);	1052	cleanup ("SIGBUS received", 1);
1276	#endif
1277	}	1053	}
1278		1054
1279	void	1055	void
1280	rec_sigterm (int i)	1056	reset_signals ()
1281	{	1057	{
1282	LOG (llevInfo, "SIGTERM received\n");	1058	signal (SIGABRT, SIG_DFL);
1283	fatal_signal (0, 1);	1059	signal (SIGQUIT, SIG_DFL);
1284	}	1060	signal (SIGSEGV, SIG_DFL);
1285		1061	signal (SIGBUS , SIG_DFL);
1286	void	1062	signal (SIGINT , SIG_DFL);
1287	fatal_signal (int make_core, int close_sockets)	1063	signal (SIGTERM, SIG_DFL);
1288	{
1289	cleanup (make_core);
1290	}	1064	}
1291		1065
1292	void	1066	void
1293	init_signals (void)	1067	init_signals (void)
1294	{	1068	{
1295	signal (SIGHUP, rec_sighup);	1069	// large stack, but it's important data we want to save, and it is not usually
1296	signal (SIGINT, rec_sigint);	1070	// being physically allocated anyways
1297	signal (SIGQUIT, rec_sigquit);	1071	const size_t stacksize = 8 * 1024 * 1024 + SIGSTKSZ;
1298	signal (SIGSEGV, rec_sigsegv);	1072
1299	signal (SIGPIPE, SIG_IGN);	1073	stack_t ss;
1300	#ifdef SIGBUS	1074	ss.ss_sp = malloc (stacksize);
1301	signal (SIGBUS, rec_sigbus);	1075	ss.ss_flags = 0;
1302	#endif	1076	ss.ss_size = stacksize;
1303	signal (SIGTERM, rec_sigterm);	1077	sigaltstack (&ss, 0);
		1078
		1079	struct sigaction sa;
		1080
		1081	sigfillset (&sa.sa_mask);
		1082	sa.sa_flags = SA_RESTART;
		1083
		1084	sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0);
		1085	sa.sa_handler = rec_sigabrt; sigaction (SIGABRT, &sa, 0);
		1086	sa.sa_handler = rec_sigquit; sigaction (SIGQUIT, &sa, 0);
		1087	sa.sa_handler = rec_sigbus; sigaction (SIGBUS, &sa, 0);
		1088
		1089	sa.sa_flags \|= SA_ONSTACK;
		1090	sa.sa_handler = rec_sigsegv; sigaction (SIGSEGV, &sa, 0);
1304	}	1091	}
1305		1092
1306	/* init_races() - reads the races file in the lib/ directory, then	1093	/* init_races() - reads the races file in the lib/ directory, then
1307	* overwrites old 'race' entries. This routine allow us to quickly	1094	* overwrites old 'race' entries. This routine allow us to quickly
1308	* re-configure the 'alignment' of monsters, objects. Useful for	1095	* re-configure the 'alignment' of monsters, objects. Useful for
1309	* putting together lists of creatures, etc that belong to gods.	1096	* putting together lists of creatures, etc that belong to gods.
1310	*/	1097	*/
1311
1312	void	1098	void
1313	init_races (void)	1099	init_races (void)
1314	{	1100	{
1315	FILE *file;	1101	FILE *file;
1316	char race[MAX_BUF], fname[MAX_BUF], buf[MAX_BUF], *cp, variable[MAX_BUF];	1102	char race[MAX_BUF], fname[MAX_BUF], buf[MAX_BUF], *cp, variable[MAX_BUF];
…		…
1321	return;	1107	return;
1322	init_done = 1;	1108	init_done = 1;
1323	first_race = 0;	1109	first_race = 0;
1324		1110
1325	sprintf (fname, "%s/races", settings.datadir);	1111	sprintf (fname, "%s/races", settings.datadir);
1326	LOG (llevDebug, "Reading races from %s...", fname);	1112	LOG (llevDebug, "Reading races from %s...\n", fname);
1327	if (!(file = fopen (fname, "r")))	1113	if (!(file = fopen (fname, "r")))
1328	{	1114	{
1329	LOG (llevError, "Cannot open races file %s: %s\n", fname, strerror (errno));	1115	LOG (llevError, "Cannot open races file %s: %s\n", fname, strerror (errno));
1330	return;	1116	return;
1331	}	1117	}
…		…
1349	set_list = 0;	1135	set_list = 0;
1350	cp++;	1136	cp++;
1351	}	1137	}
1352		1138
1353	if (sscanf (cp, "RACE %s", variable))	1139	if (sscanf (cp, "RACE %s", variable))
1354	{ /* set new race value */	1140	/* set new race value */
1355	strcpy (race, variable);	1141	strcpy (race, variable);
1356	}
1357	else	1142	else
1358	{	1143	{
1359	char *cp1;	1144	char *cp1;
1360		1145
1361	/* Take out beginning spaces */	1146	/* Take out beginning spaces */
…		…
1372	if (cp[strlen (cp) - 1] == '\n')	1157	if (cp[strlen (cp) - 1] == '\n')
1373	cp[strlen (cp) - 1] = '\0';	1158	cp[strlen (cp) - 1] = '\0';
1374		1159
1375	/* set creature race to race value */	1160	/* set creature race to race value */
1376	if ((mon = archetype::find (cp)) == NULL)	1161	if ((mon = archetype::find (cp)) == NULL)
1377	LOG (llevError, "\nCreature %s in race file lacks archetype", cp);	1162	LOG (llevError, "Creature %s in race file lacks archetype\n", cp);
1378	else	1163	else
1379	{	1164	{
1380	if (set_race && (!mon->clone.race \|\| strcmp (mon->clone.race, race)))	1165	if (set_race && (!mon->race \|\| strcmp (mon->race, race)))
1381	{	1166	{
1382	if (mon->clone.race)	1167	if (mon->race)
1383	LOG (llevDebug, "\n Resetting race to %s from %s for archetype %s", race, &mon->clone.race, &mon->name);	1168	LOG (llevDebug, "Resetting race to %s from %s for archetype %s\n", race, &mon->race, &mon->archname);
1384		1169
1385	mon->clone.race = race;	1170	mon->race = race;
1386	}	1171	}
1387		1172
1388	/* if the arch is a monster, add it to the race list */	1173	/* if the arch is a monster, add it to the race list */
1389	if (set_list && QUERY_FLAG (&mon->clone, FLAG_MONSTER))	1174	if (set_list && QUERY_FLAG (mon, FLAG_MONSTER))
1390	add_to_racelist (race, &mon->clone);	1175	add_to_racelist (race, mon);
1391	}	1176	}
1392	}	1177	}
1393	}	1178	}
1394		1179
1395	fclose (file);	1180	fclose (file);
…		…
1404		1189
1405	for (list = first_race; list; list = list->next)	1190	for (list = first_race; list; list = list->next)
1406	{	1191	{
1407	fprintf (stderr, "\nRACE %s:\t", &list->name);	1192	fprintf (stderr, "\nRACE %s:\t", &list->name);
1408	for (tmp = list->member; tmp; tmp = tmp->next)	1193	for (tmp = list->member; tmp; tmp = tmp->next)
1409	fprintf (stderr, "%s(%d), ", &tmp->ob->arch->name, tmp->ob->level);	1194	fprintf (stderr, "%s(%d), ", &tmp->ob->arch->archname, tmp->ob->level);
1410	}	1195	}
1411		1196
1412	fprintf (stderr, "\n");	1197	fprintf (stderr, "\n");
1413	}	1198	}
1414		1199

Diff Legend

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

Comparing deliantra/server/server/init.C (file contents): Revision 1.22 by root, Tue Dec 26 08:55:00 2006 UTC vs. Revision 1.64 by root, Tue Apr 22 23:50:24 2008 UTC

Diff Legend

Comparing deliantra/server/server/init.C (file contents):
Revision 1.22 by root, Tue Dec 26 08:55:00 2006 UTC vs.
Revision 1.64 by root, Tue Apr 22 23:50:24 2008 UTC