2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2005, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 * See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23 * related information and legal notices. It is expected that any future
24 * projects/authors will amend these files as needed.
28 * emp_config.c: Allows config file to control server config. from a file
30 * Known contributors to this file:
32 * Steve McClure, 1998-2000
38 * 1. Change other constants - such as Num Countries etc.
39 * Just requires variables to be assigned, then dynamic allocation in
40 * a few places. Some checks needed in the server to check the world
41 * hasn't changed size etc.
42 * 2. Could look at loading in planes, units etc. Should be easy enough.
49 #include <stdlib.h> /* atoi free atol */
55 #include "gen.h" /* parse */
58 static int emp_config_dummy;
60 /* things that can be changed */
61 struct keymatch configkeys[] = {
62 #define EMP_CONFIG_C_OUTPUT
63 #include "econfig-spec.h"
64 #undef EMP_CONFIG_C_OUTPUT
67 static struct keymatch *keylookup(s_char *key, struct keymatch tbl[]);
68 static int set_option(const char *, int);
71 * read in empire configuration
74 emp_config(char *file)
88 if ((fp = fopen(file, "r")) == NULL) {
89 if (file == dflt_econfig && errno == ENOENT)
91 fprintf(stderr, "Can't open %s for reading (%s)\n",
92 file, strerror(errno));
96 while (fgets(buf, sizeof buf, fp) != NULL) {
98 for (i = 0; buf[i] && isspace(buf[i]); ++i) ;
99 if (!buf[i] || buf[i] == '#')
101 if (parse(buf, av, NULL, scanspace, NULL) < 0) {
102 fprintf(stderr, "%s:%d: Can't parse line %s", file, lno, buf);
106 if ((kp = keylookup(av[0], configkeys)) == NULL) {
107 fprintf(stderr, "%s:%d: Unknown config key %s\n",
113 fprintf(stderr, "%s:%d: Config key %s needs a value\n",
119 switch (kp->km_type) {
121 *(int *)kp->km_data = atoi(av[1]);
124 *(float *)kp->km_data = atof(av[1]);
127 *(double *)kp->km_data = atof(av[1]);
130 *(long *)kp->km_data = atol(av[1]);
133 if (kp->km_flags & KM_ALLOC)
134 free(*(char **)kp->km_data);
135 *(char **)kp->km_data = strdup(av[1]);
136 kp->km_flags |= KM_ALLOC;
139 for (i = 1; av[i]; ++i) {
140 if (set_option(av[i], kp->km_key[0] != 'n') < 0) {
141 fprintf(stderr, "%s:%d: Unknown option %s\n",
151 fprintf(stderr, "%s:%d: Junk after value of config key %s\n",
157 WORLD_X &= ~1; /* make even */
162 /* find the key in the table */
163 static struct keymatch *
164 keylookup(register s_char *command, struct keymatch *tbl)
166 register struct keymatch *kp;
168 if (command == 0 || *command == 0)
170 for (kp = tbl; kp->km_key != 0; kp++) {
171 if (strcmp(kp->km_key, command) == 0)
178 print_config(FILE *fp)
180 struct option_list *op;
183 fprintf(fp, "# Empire Configuration File:\n");
184 for (kp = configkeys; kp->km_key; kp++) {
185 if (kp->km_comment) {
186 if (kp->km_comment[0] != '\n')
188 fprintf(fp, "%s\n", kp->km_comment);
192 switch (kp->km_type) {
194 fprintf(fp, "%s \"%s\"\n", kp->km_key, *(char **)kp->km_data);
197 fprintf(fp, "%s %d\n", kp->km_key, *(int *)kp->km_data);
200 fprintf(fp, "%s %g\n", kp->km_key, *(float *)kp->km_data);
203 fprintf(fp, "%s %g\n", kp->km_key, *(double *)kp->km_data);
206 fprintf(fp, "%s %ld\n", kp->km_key, *(long *)kp->km_data);
209 for (op = Options; op->opt_key; op++)
210 if (*op->opt_valuep != (kp->km_key[0] == 'n'))
211 fprintf(fp, "%s %s\n", kp->km_key, op->opt_key);
222 /* Set option S to value VAL; return 0 on success, -1 on failure. */
224 set_option(const char *s, int val)
226 struct option_list *op;
228 for (op = Options; op->opt_key; op++) {
229 if (strcmp(op->opt_key, s) == 0) {
230 *op->opt_valuep = val;