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

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

Diff Legend

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

Comparing deliantra/server/server/init.C (file contents): Revision 1.16 by pippijn, Mon Dec 11 19:46:47 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.16 by pippijn, Mon Dec 11 19:46:47 2006 UTC vs.
Revision 1.64 by root, Tue Apr 22 23:50:24 2008 UTC