server/common/init.C

/*
 * This file is part of Crossfire TRT, the Multiplayer Online Role Playing Game.
 * 
 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
 * Copyright (©) 1992,2007 Frank Tore Johansen
 * 
 * Crossfire TRT is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the Free
 * Software Foundation; either version 2 of the License, or (at your option)
 * any later version.
 * 
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
 * for more details.
 * 
 * You should have received a copy of the GNU General Public License along
 * with Crossfire TRT; if not, write to the Free Software Foundation, Inc. 51
 * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 * 
 * The authors can be reached via e-mail to <crossfire@schmorp.de>
 */

#define EXTERN                  // horrible hack

#include <global.h>
#include <object.h>

extern const char *const attacktype_desc[NROFATTACKS] = {
# define def(uc, lc, name, plus, change) # name,
#  include "attackinc.h"
# undef def
};

extern const char *const resist_plus[NROFATTACKS] = {
# define def(uc, lc, name, plus, change) # plus,
#  include "attackinc.h"
# undef def
};

extern const char *const change_resist_msg[NROFATTACKS] = {
# define def(uc, lc, name, plus, change) # change,
#  include "attackinc.h"
# undef def
};

int resist_table[NROFATTACKS] = {
# define def(uc, lc, name, plus, change) ATNR_ ## uc,
#  include "attackinc.h"
# undef def
};

/* You unforunately need to looking in include/global.h to see what these
 * correspond to.
 */
struct Settings settings = {
  LOGFILE,                      /* Logfile */
  CSPORT,                       /* Client/server port */

/* Debug level */
#ifdef DEBUG
  llevDebug,
#else
  llevInfo,
#endif

  0, NULL, 0,                   /* dumpvalues, dumparg, daemonmode */
  0,                            /* argc */
  NULL,                         /* argv */
  CONFDIR,
  DATADIR,
  LOCALDIR,
  PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
  UNIQUE_DIR, TEMPLATE_DIR,
  TMPDIR,
  PK_LUCK_PENALTY,
  STAT_LOSS_ON_DEATH,
  PERMANENT_EXPERIENCE_RATIO,
  DEATH_PENALTY_RATIO,
  DEATH_PENALTY_LEVEL,
  BALANCED_STAT_LOSS,
  NOT_PERMADETH,
  SIMPLE_EXP,
  SET_TITLE,
  RESURRECTION,
  SEARCH_ITEMS,
  SPELL_ENCUMBRANCE,
  SPELL_FAILURE_EFFECTS,
  SET_FRIENDLY_FIRE,
  0,
  0,
  EXPLORE_MODE,
  SPELLPOINT_LEVEL_DEPEND,
  MOTD,
  "rules",
  "news",
  "",                           /* DM_MAIL */
  0, 0, 0, 0, 0, 0, 0, 0,       /* worldmap settings */
  0,
  1.0,

/* Armor enchantment stuff */
  ARMOR_MAX_ENCHANT,
  ARMOR_WEIGHT_REDUCTION,
  ARMOR_WEIGHT_LINEAR,
  ARMOR_SPEED_IMPROVEMENT,
  ARMOR_SPEED_LINEAR,
};

/* perhaps not the best place for this, but needs to be
 * in some file in the common area so that standalone
 * programs, like the random map generator, can be built.
 */
const char *const spellpathnames[NRSPELLPATHS] = {
  "Protection",
  "Fire",
  "Frost",
  "Electricity",
  "Missiles",
  "Self",
  "Summoning",
  "Abjuration",
  "Restoration",
  "Detonation",
  "Mind",
  "Creation",
  "Teleportation",
  "Information",
  "Transmutation",
  "Transferrence",
  "Turning",
  "Wounding",
  "Death",
  "Light"
};

/*
 * It is vital that init_library() is called by any functions
 * using this library.
 * If you want to lessen the size of the program using the library,
 * you can replace the call to init_library() with init_globals() and
 * init_function_pointers().  Good idea to also call init_vars and
 * init_hash_table if you are doing any object loading.
 */
void
init_library (void)
{
  init_globals ();
  init_block ();
  init_dynamic ();
  init_attackmess ();
  init_experience ();
}

/* init_environ initialises values from the environmental variables.
 * it needs to be called very early, since command line options should
 * overwrite these if specified.
 */
void
init_environ (void)
{
  char *cp;

  cp = getenv ("CROSSFIRE_LIBDIR");
  if (cp)
    settings.datadir = cp;

  cp = getenv ("CROSSFIRE_LOCALDIR");
  if (cp)
    settings.localdir = cp;

  cp = getenv ("CROSSFIRE_PLAYERDIR");
  if (cp)
    settings.playerdir = cp;

  cp = getenv ("CROSSFIRE_MAPDIR");
  if (cp)
    settings.mapdir = cp;

  cp = getenv ("CROSSFIRE_ARCHETYPES");
  if (cp)
    settings.archetypes = cp;

  cp = getenv ("CROSSFIRE_TREASURES");
  if (cp)
    settings.treasures = cp;

  cp = getenv ("CROSSFIRE_UNIQUEDIR");
  if (cp)
    settings.uniquedir = cp;

  cp = getenv ("CROSSFIRE_TEMPLATEDIR");
  if (cp)
    settings.templatedir = cp;

  cp = getenv ("CROSSFIRE_TMPDIR");
  if (cp)
    settings.tmpdir = cp;
}

/*
 * Initialises all global variables.
 * Might use environment-variables as default for some of them.
 */
void
init_globals (void)
{
  if (settings.logfilename[0] == 0)
    logfile = stderr;
  else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
    {
      fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
      logfile = stderr;
    }
  else
    setvbuf (logfile, NULL, _IOLBF, 0);
}

void
init_dynamic (void)
{
  for_all_archetypes (at)
    {
      if (at->type == MAP)
        {
          if (at->race)
            first_map_ext_path = at->race;

          if (EXIT_PATH (at))
            {
              first_map_path = EXIT_PATH (at);
              return;
            }
        }
    }

  LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n");
  exit (-1);
}

/*
 * initialises the attack messages.
 * Called by init_library().
 */

//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];

void
init_attackmess (void)
{
  char buf[MAX_BUF];
  char filename[MAX_BUF];
  char *cp, *p;
  FILE *fp;
  static int has_been_done = 0;
  int mess, level, comp;
  int mode = 0, total = 0;

  if (has_been_done)
    return;
  else
    has_been_done = 1;

  sprintf (filename, "%s/attackmess", settings.datadir);
  LOG (llevDebug, "Reading attack messages from %s...\n", filename);
  if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
    {
      LOG (llevError, "Can't open %s.\n", filename);
      return;
    }

  level = 0;
  while (fgets (buf, MAX_BUF, fp) != NULL)
    {
      if (*buf == '#')
        continue;
      if ((cp = strchr (buf, '\n')) != NULL)
        *cp = '\0';
      cp = buf;
      while (*cp == ' ')        /* Skip blanks */
        cp++;

      if (strncmp (cp, "TYPE:", 5) == 0)
        {
          p = strtok (buf, ":");
          p = strtok (NULL, ":");
          if (mode == 1)
            {
              attack_mess[mess][level].level = -1;
              attack_mess[mess][level].buf1 = NULL;
              attack_mess[mess][level].buf2 = NULL;
              attack_mess[mess][level].buf3 = NULL;
            }
          level = 0;
          mess = atoi (p);
          mode = 1;
          continue;
        }
      if (mode == 1)
        {
          p = strtok (buf, "=");
          attack_mess[mess][level].level = atoi (buf);
          p = strtok (NULL, "=");
          if (p != NULL)
            attack_mess[mess][level].buf1 = strdup (p);
          else
            attack_mess[mess][level].buf1 = strdup ("");
          mode = 2;
          continue;
        }
      else if (mode == 2)
        {
          p = strtok (buf, "=");
          attack_mess[mess][level].level = atoi (buf);
          p = strtok (NULL, "=");
          if (p != NULL)
            attack_mess[mess][level].buf2 = strdup (p);
          else
            attack_mess[mess][level].buf2 = strdup ("");
          mode = 3;
          continue;
        }
      else if (mode == 3)
        {
          p = strtok (buf, "=");
          attack_mess[mess][level].level = atoi (buf);
          p = strtok (NULL, "=");
          if (p != NULL)
            attack_mess[mess][level].buf3 = strdup (p);
          else
            attack_mess[mess][level].buf3 = strdup ("");
          mode = 1;
          level++;
          total++;
          continue;
        }
    }
  LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
  close_and_delete (fp, comp);
}
Revision:	1.37
Committed:	Mon Jun 4 13:04:00 2007 UTC (17 years ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.36:	+6 -10 lines
Log Message:	- archetype is now a subclass of object. - store archetypes in an object_vector. - use a different startegy for archetype loading (reloading is MOST CERTAINLY broken).
#	User	Rev	Content
1	elmex	1.1	/*
2	root	1.36	* This file is part of Crossfire TRT, the Multiplayer Online Role Playing Game.
3	pippijn	1.23	*
4	root	1.36	* Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
5			* Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
6			* Copyright (©) 1992,2007 Frank Tore Johansen
7	pippijn	1.23	*
8	root	1.36	* Crossfire TRT is free software; you can redistribute it and/or modify it
9			* under the terms of the GNU General Public License as published by the Free
10			* Software Foundation; either version 2 of the License, or (at your option)
11			* any later version.
12	pippijn	1.23	*
13	root	1.36	* This program is distributed in the hope that it will be useful, but
14			* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15			* or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16			* for more details.
17	pippijn	1.23	*
18	root	1.36	* You should have received a copy of the GNU General Public License along
19			* with Crossfire TRT; if not, write to the Free Software Foundation, Inc. 51
20			* Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21			*
22			* The authors can be reached via e-mail to <crossfire@schmorp.de>
23	pippijn	1.23	*/
24	elmex	1.1
25	root	1.10	#define EXTERN // horrible hack
26	root	1.7
27	elmex	1.1	#include <global.h>
28			#include <object.h>
29
30	root	1.10	extern const char *const attacktype_desc[NROFATTACKS] = {
31	root	1.11	# define def(uc, lc, name, plus, change) # name,
32			# include "attackinc.h"
33			# undef def
34	root	1.7	};
35
36	root	1.10	extern const char *const resist_plus[NROFATTACKS] = {
37	root	1.11	# define def(uc, lc, name, plus, change) # plus,
38			# include "attackinc.h"
39			# undef def
40	root	1.7	};
41
42	root	1.10	extern const char *const change_resist_msg[NROFATTACKS] = {
43	root	1.11	# define def(uc, lc, name, plus, change) # change,
44			# include "attackinc.h"
45			# undef def
46	root	1.7	};
47
48			int resist_table[NROFATTACKS] = {
49	root	1.11	# define def(uc, lc, name, plus, change) ATNR_ ## uc,
50			# include "attackinc.h"
51			# undef def
52	root	1.7	};
53
54	elmex	1.1	/* You unforunately need to looking in include/global.h to see what these
55			* correspond to.
56			*/
57			struct Settings settings = {
58	root	1.10	LOGFILE, /* Logfile */
59			CSPORT, /* Client/server port */
60	elmex	1.1
61			/* Debug level */
62			#ifdef DEBUG
63			llevDebug,
64			#else
65			llevInfo,
66			#endif
67
68	root	1.10	0, NULL, 0, /* dumpvalues, dumparg, daemonmode */
69			0, /* argc */
70			NULL, /* argv */
71			CONFDIR,
72			DATADIR,
73			LOCALDIR,
74			PLAYERDIR, MAPDIR, ARCHETYPES, REGIONS, TREASURES,
75			UNIQUE_DIR, TEMPLATE_DIR,
76			TMPDIR,
77	root	1.34	PK_LUCK_PENALTY,
78	root	1.10	STAT_LOSS_ON_DEATH,
79			PERMANENT_EXPERIENCE_RATIO,
80			DEATH_PENALTY_RATIO,
81			DEATH_PENALTY_LEVEL,
82			BALANCED_STAT_LOSS,
83			NOT_PERMADETH,
84			SIMPLE_EXP,
85			SET_TITLE,
86			RESURRECTION,
87			SEARCH_ITEMS,
88			SPELL_ENCUMBRANCE,
89			SPELL_FAILURE_EFFECTS,
90	root	1.34	SET_FRIENDLY_FIRE,
91	root	1.35	0,
92			0,
93	root	1.10	EXPLORE_MODE,
94			SPELLPOINT_LEVEL_DEPEND,
95			MOTD,
96			"rules",
97			"news",
98			"", /* DM_MAIL */
99			0, 0, 0, 0, 0, 0, 0, 0, /* worldmap settings */
100			0,
101			1.0,
102
103	elmex	1.1	/* Armor enchantment stuff */
104	root	1.10	ARMOR_MAX_ENCHANT,
105			ARMOR_WEIGHT_REDUCTION,
106			ARMOR_WEIGHT_LINEAR,
107			ARMOR_SPEED_IMPROVEMENT,
108			ARMOR_SPEED_LINEAR,
109	elmex	1.1	};
110
111			/* perhaps not the best place for this, but needs to be
112			* in some file in the common area so that standalone
113			* programs, like the random map generator, can be built.
114			*/
115	root	1.10	const char *const spellpathnames[NRSPELLPATHS] = {
116			"Protection",
117			"Fire",
118			"Frost",
119			"Electricity",
120			"Missiles",
121			"Self",
122			"Summoning",
123			"Abjuration",
124			"Restoration",
125			"Detonation",
126			"Mind",
127			"Creation",
128			"Teleportation",
129			"Information",
130			"Transmutation",
131			"Transferrence",
132			"Turning",
133			"Wounding",
134			"Death",
135			"Light"
136	elmex	1.1	};
137
138			/*
139			* It is vital that init_library() is called by any functions
140			* using this library.
141			* If you want to lessen the size of the program using the library,
142			* you can replace the call to init_library() with init_globals() and
143			* init_function_pointers(). Good idea to also call init_vars and
144			* init_hash_table if you are doing any object loading.
145			*/
146	root	1.10	void
147			init_library (void)
148			{
149			init_globals ();
150			init_block ();
151			init_dynamic ();
152			init_attackmess ();
153			init_experience ();
154	elmex	1.1	}
155
156	pippijn	1.21	/* init_environ initialises values from the environmental variables.
157	elmex	1.1	* it needs to be called very early, since command line options should
158			* overwrite these if specified.
159			*/
160	root	1.10	void
161			init_environ (void)
162			{
163			char *cp;
164	elmex	1.1
165	root	1.10	cp = getenv ("CROSSFIRE_LIBDIR");
166			if (cp)
167			settings.datadir = cp;
168	root	1.33
169	root	1.10	cp = getenv ("CROSSFIRE_LOCALDIR");
170			if (cp)
171			settings.localdir = cp;
172	root	1.33
173	root	1.10	cp = getenv ("CROSSFIRE_PLAYERDIR");
174			if (cp)
175			settings.playerdir = cp;
176	root	1.33
177	root	1.10	cp = getenv ("CROSSFIRE_MAPDIR");
178			if (cp)
179			settings.mapdir = cp;
180	root	1.33
181	root	1.10	cp = getenv ("CROSSFIRE_ARCHETYPES");
182			if (cp)
183			settings.archetypes = cp;
184	root	1.33
185	root	1.10	cp = getenv ("CROSSFIRE_TREASURES");
186			if (cp)
187			settings.treasures = cp;
188	root	1.33
189	root	1.10	cp = getenv ("CROSSFIRE_UNIQUEDIR");
190			if (cp)
191			settings.uniquedir = cp;
192	root	1.33
193	root	1.10	cp = getenv ("CROSSFIRE_TEMPLATEDIR");
194			if (cp)
195			settings.templatedir = cp;
196	root	1.33
197	root	1.10	cp = getenv ("CROSSFIRE_TMPDIR");
198			if (cp)
199			settings.tmpdir = cp;
200	elmex	1.1	}
201	root	1.10
202	elmex	1.1	/*
203			* Initialises all global variables.
204			* Might use environment-variables as default for some of them.
205			*/
206	root	1.10	void
207			init_globals (void)
208			{
209			if (settings.logfilename[0] == 0)
210	root	1.12	logfile = stderr;
211	root	1.10	else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
212			{
213			fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
214			logfile = stderr;
215	elmex	1.1	}
216	root	1.10	else
217	root	1.12	setvbuf (logfile, NULL, _IOLBF, 0);
218	elmex	1.1	}
219
220	root	1.10	void
221			init_dynamic (void)
222			{
223	root	1.37	for_all_archetypes (at)
224	root	1.10	{
225	root	1.37	if (at->type == MAP)
226	root	1.10	{
227	root	1.37	if (at->race)
228			first_map_ext_path = at->race;
229	root	1.12
230	root	1.37	if (EXIT_PATH (at))
231	root	1.10	{
232	root	1.37	first_map_path = EXIT_PATH (at);
233	root	1.10	return;
234	elmex	1.1	}
235	root	1.2	}
236	elmex	1.1	}
237	root	1.12
238	root	1.32	LOG (llevDebug, "You need an archetype of type 'map' and it has to contain the player start map\n");
239	root	1.10	exit (-1);
240	elmex	1.1	}
241
242			/*
243	pippijn	1.21	* initialises the attack messages.
244	elmex	1.1	* Called by init_library().
245			*/
246
247			//attackmess_t attack_mess[NROFATTACKMESS][MAXATTACKMESS];
248
249	root	1.10	void
250			init_attackmess (void)
251			{
252			char buf[MAX_BUF];
253			char filename[MAX_BUF];
254			char cp, p;
255			FILE *fp;
256			static int has_been_done = 0;
257			int mess, level, comp;
258			int mode = 0, total = 0;
259
260			if (has_been_done)
261			return;
262			else
263			has_been_done = 1;
264
265			sprintf (filename, "%s/attackmess", settings.datadir);
266	pippijn	1.20	LOG (llevDebug, "Reading attack messages from %s...\n", filename);
267	root	1.10	if ((fp = open_and_uncompress (filename, 0, &comp)) == NULL)
268			{
269			LOG (llevError, "Can't open %s.\n", filename);
270			return;
271	elmex	1.1	}
272
273	root	1.10	level = 0;
274			while (fgets (buf, MAX_BUF, fp) != NULL)
275			{
276			if (*buf == '#')
277			continue;
278			if ((cp = strchr (buf, '\n')) != NULL)
279			*cp = '\0';
280			cp = buf;
281			while (cp == ' ') / Skip blanks */
282			cp++;
283
284			if (strncmp (cp, "TYPE:", 5) == 0)
285			{
286			p = strtok (buf, ":");
287			p = strtok (NULL, ":");
288			if (mode == 1)
289			{
290			attack_mess[mess][level].level = -1;
291			attack_mess[mess][level].buf1 = NULL;
292			attack_mess[mess][level].buf2 = NULL;
293			attack_mess[mess][level].buf3 = NULL;
294	root	1.2	}
295	root	1.10	level = 0;
296			mess = atoi (p);
297			mode = 1;
298			continue;
299			}
300			if (mode == 1)
301			{
302			p = strtok (buf, "=");
303			attack_mess[mess][level].level = atoi (buf);
304			p = strtok (NULL, "=");
305			if (p != NULL)
306	root	1.16	attack_mess[mess][level].buf1 = strdup (p);
307	root	1.10	else
308	root	1.16	attack_mess[mess][level].buf1 = strdup ("");
309	root	1.10	mode = 2;
310			continue;
311			}
312			else if (mode == 2)
313			{
314			p = strtok (buf, "=");
315			attack_mess[mess][level].level = atoi (buf);
316			p = strtok (NULL, "=");
317			if (p != NULL)
318	root	1.16	attack_mess[mess][level].buf2 = strdup (p);
319	root	1.10	else
320	root	1.16	attack_mess[mess][level].buf2 = strdup ("");
321	root	1.10	mode = 3;
322			continue;
323	root	1.2	}
324	root	1.10	else if (mode == 3)
325			{
326			p = strtok (buf, "=");
327			attack_mess[mess][level].level = atoi (buf);
328			p = strtok (NULL, "=");
329			if (p != NULL)
330	root	1.16	attack_mess[mess][level].buf3 = strdup (p);
331	root	1.10	else
332	root	1.16	attack_mess[mess][level].buf3 = strdup ("");
333	root	1.10	mode = 1;
334			level++;
335			total++;
336			continue;
337	root	1.2	}
338	elmex	1.1	}
339	root	1.10	LOG (llevDebug, "got %d messages in %d categories.\n", total, mess + 1);
340			close_and_delete (fp, comp);
341	elmex	1.1	}