server/common/init.C

/*
 * CrossFire, A Multiplayer game for X-windows
 * 
 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
 * Copyright (C) 2002 Mark Wedel & Crossfire Development Team
 * Copyright (C) 1992 Frank Tore Johansen
 * 
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 * The authors can be reached via e-mail at <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,
  STAT_LOSS_ON_DEATH,
  PK_LUCK_PENALTY,
  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,
  CASTING_TIME,
  REAL_WIZ,
  EXPLORE_MODE,
  SPELLPOINT_LEVEL_DEPEND,
  SET_FRIENDLY_FIRE,
  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,
  1,                            /* no_player_stealing */
  1,                            /* create_home_portals */
};

/* 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_archetypes ();           /* Reads all archetypes from file */
  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)
{
  archetype *at = first_archetype;

  while (at)
    {
      if (at->clone.type == MAP)
        {
          if (at->clone.race)
            first_map_ext_path = at->clone.race;

          if (EXIT_PATH (&at->clone))
            {
              first_map_path = EXIT_PATH (&at->clone);
              return;
            }
        }

      at = at->next;
    }

  LOG (llevDebug, "You Need a archetype called 'map' and it have to contain 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.31
Committed:	Thu Apr 12 14:18:04 2007 UTC (17 years, 2 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.30:	+0 -1 lines
Log Message:	move animation info into facedata and make it reloadable at runtime
#	User	Rev	Content
1	elmex	1.1	/*
2	pippijn	1.23	* CrossFire, A Multiplayer game for X-windows
3			*
4			* Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5			* Copyright (C) 2002 Mark Wedel & Crossfire Development Team
6			* Copyright (C) 1992 Frank Tore Johansen
7			*
8			* This program is free software; you can redistribute it and/or modify
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
11			* (at your option) any later version.
12			*
13			* This program is distributed in the hope that it will be useful,
14			* but WITHOUT ANY WARRANTY; without even the implied warranty of
15			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16			* GNU General Public License for more details.
17			*
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
20			* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21			*
22			* The authors can be reached via e-mail at <crossfire@schmorp.de>
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			STAT_LOSS_ON_DEATH,
78			PK_LUCK_PENALTY,
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			CASTING_TIME,
91			REAL_WIZ,
92			EXPLORE_MODE,
93			SPELLPOINT_LEVEL_DEPEND,
94			SET_FRIENDLY_FIRE,
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			1, /* no_player_stealing */
110			1, /* create_home_portals */
111	elmex	1.1	};
112
113			/* perhaps not the best place for this, but needs to be
114			* in some file in the common area so that standalone
115			* programs, like the random map generator, can be built.
116			*/
117	root	1.10	const char *const spellpathnames[NRSPELLPATHS] = {
118			"Protection",
119			"Fire",
120			"Frost",
121			"Electricity",
122			"Missiles",
123			"Self",
124			"Summoning",
125			"Abjuration",
126			"Restoration",
127			"Detonation",
128			"Mind",
129			"Creation",
130			"Teleportation",
131			"Information",
132			"Transmutation",
133			"Transferrence",
134			"Turning",
135			"Wounding",
136			"Death",
137			"Light"
138	elmex	1.1	};
139
140			/*
141			* It is vital that init_library() is called by any functions
142			* using this library.
143			* If you want to lessen the size of the program using the library,
144			* you can replace the call to init_library() with init_globals() and
145			* init_function_pointers(). Good idea to also call init_vars and
146			* init_hash_table if you are doing any object loading.
147			*/
148	root	1.10	void
149			init_library (void)
150			{
151			init_globals ();
152			init_block ();
153			init_archetypes (); /* Reads all archetypes from file */
154			init_dynamic ();
155			init_attackmess ();
156			init_experience ();
157	elmex	1.1	}
158
159
160	pippijn	1.21	/* init_environ initialises values from the environmental variables.
161	elmex	1.1	* it needs to be called very early, since command line options should
162			* overwrite these if specified.
163			*/
164	root	1.10	void
165			init_environ (void)
166			{
167			char *cp;
168	elmex	1.1
169	root	1.10	cp = getenv ("CROSSFIRE_LIBDIR");
170			if (cp)
171			settings.datadir = cp;
172			cp = getenv ("CROSSFIRE_LOCALDIR");
173			if (cp)
174			settings.localdir = cp;
175			cp = getenv ("CROSSFIRE_PLAYERDIR");
176			if (cp)
177			settings.playerdir = cp;
178			cp = getenv ("CROSSFIRE_MAPDIR");
179			if (cp)
180			settings.mapdir = cp;
181			cp = getenv ("CROSSFIRE_ARCHETYPES");
182			if (cp)
183			settings.archetypes = cp;
184			cp = getenv ("CROSSFIRE_TREASURES");
185			if (cp)
186			settings.treasures = cp;
187			cp = getenv ("CROSSFIRE_UNIQUEDIR");
188			if (cp)
189			settings.uniquedir = cp;
190			cp = getenv ("CROSSFIRE_TEMPLATEDIR");
191			if (cp)
192			settings.templatedir = cp;
193			cp = getenv ("CROSSFIRE_TMPDIR");
194			if (cp)
195			settings.tmpdir = cp;
196	elmex	1.1	}
197	root	1.10
198	elmex	1.1	/*
199			* Initialises all global variables.
200			* Might use environment-variables as default for some of them.
201			*/
202	root	1.10	void
203			init_globals (void)
204			{
205			if (settings.logfilename[0] == 0)
206	root	1.12	logfile = stderr;
207	root	1.10	else if ((logfile = fopen (settings.logfilename, "a")) == NULL)
208			{
209			fprintf (stderr, "Unable to open %s as the logfile - will use stderr instead\n", settings.logfilename);
210			logfile = stderr;
211	elmex	1.1	}
212	root	1.10	else
213	root	1.12	setvbuf (logfile, NULL, _IOLBF, 0);
214	elmex	1.1	}
215
216	root	1.10	void
217			init_dynamic (void)
218			{
219			archetype *at = first_archetype;
220
221			while (at)
222			{
223			if (at->clone.type == MAP)
224			{
225			if (at->clone.race)
226	root	1.19	first_map_ext_path = at->clone.race;
227	root	1.12
228	root	1.10	if (EXIT_PATH (&at->clone))
229			{
230	root	1.19	first_map_path = EXIT_PATH (&at->clone);
231	root	1.10	return;
232	elmex	1.1	}
233	root	1.2	}
234	root	1.12
235	root	1.10	at = at->next;
236	elmex	1.1	}
237	root	1.12
238	root	1.10	LOG (llevDebug, "You Need a archetype called 'map' and it have to contain start map\n");
239			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	}