2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2004, 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 * main.c: Thread and signal initialization for Empire Server
30 * Known contributors to this file:
32 * Steve McClure, 1996, 1998
38 #include <sys/ioctl.h>
49 #include "../lib/gen/getopt.h"
58 #include "empthread.h"
67 #include "prototypes.h"
69 static void nullify_objects(void);
70 static void init_files(void);
71 static void close_files(void);
72 static void create_pidfile(char *, pid_t);
75 static void loc_NTInit(void);
76 static void loc_NTTerm(void);
79 static char pidfname[] = "server.pid";
81 /* Debugging? If yes call abort() on internal error. */
83 /* Run as daemon? If yes, detach from controlling terminal etc. */
87 print_usage(char *program_name)
90 printf("Usage: %s -i -I service_name -r -R service_name -D datadir -e config_file -d -p\n",
92 printf("-i install service with the default name %s\n", DEFAULT_SERVICE_NAME);
93 printf("-r remove service with the default name %s\n", DEFAULT_SERVICE_NAME);
96 printf("Usage: %s -D datadir -e config_file -d -p -s\n", program_name);
97 printf("-s stack check flag (include print flag)\n");
99 printf("-p print flag\n");
100 printf("-d debug mode\n");
104 main(int argc, char **argv)
108 int install_service_set = 0;
109 char *service_name = NULL;
110 int remove_service_set = 0;
113 char *config_file = NULL;
117 # define XOPTS "iI:rR:"
121 while ((op = getopt(argc, argv, "D:de:psh" XOPTS)) != EOF) {
130 flags |= EMPTH_PRINT;
137 config_file = optarg;
141 service_name = optarg;
146 install_service_set++;
149 service_name = optarg;
154 remove_service_set++;
158 flags |= EMPTH_STACKCHECK;
162 print_usage(argv[0]);
168 if ((debug || flags || datadir_set || config_file != NULL) &&
169 remove_service_set) {
170 fprintf(stderr, "Can't use -p, -s, -d, -D or -e with either "
171 "-r or -R options\n");
174 if ((debug || flags) && install_service_set) {
175 fprintf(stderr, "Can't use -d, -p or -s with either "
176 "-i or -I options\n");
179 if (install_service_set && remove_service_set) {
180 fprintf(stderr, "Can't use both -r or -R and -i or -I "
188 if (remove_service_set)
189 return remove_service(service_name);
192 if (emp_config(config_file) < 0)
194 if (chdir(datadir)) {
195 fprintf(stderr, "Can't chdir to %s (%s)\n", datadir, strerror(errno));
200 if (install_service_set)
201 return install_service(argv[0], service_name, datadir_set, config_file);
207 if (daemonize != 0) {
208 SERVICE_TABLE_ENTRY DispatchTable[]={{"Empire Server", service_main},{NULL, NULL}};
209 if (StartServiceCtrlDispatcher(DispatchTable))
213 * If it is service startup error then exit otherwise
214 * start server in the foreground
216 if (GetLastError() != ERROR_FAILED_SERVICE_CONTROLLER_CONNECT) {
217 logerror("Failed to dispatch service (%d)", GetLastError());
232 CANT_HAPPEN("main thread terminated");
239 * Initialize for serving, acquire resources.
248 update_policy_check();
258 if (opt_MOB_ACCESS) {
259 /* This fixes up mobility upon restart */
270 start_server(int flags)
274 struct sigaction act;
278 create_pidfile(pidfname, pid);
279 logerror("------------------------------------------------------");
280 logerror("Empire server (pid %d) started", (int)pid);
283 /* signal() should not be used with mit pthreads. Anyway if u
284 have a posix threads u definitly have posix signals -- Sasha */
285 sigemptyset(&act.sa_mask);
286 act.sa_handler = shutdwn;
287 sigaction(SIGTERM, &act, NULL);
288 sigaction(SIGINT, &act, NULL);
289 act.sa_handler = panic;
290 sigaction(SIGBUS, &act, NULL);
291 sigaction(SIGSEGV, &act, NULL);
292 sigaction(SIGILL, &act, NULL);
293 sigaction(SIGFPE, &act, NULL);
294 act.sa_handler = SIG_IGN;
295 sigaction(SIGPIPE, &act, NULL);
298 empth_init((char **)&player, flags);
300 empth_create(PP_ACCEPT, player_accept, (50 * 1024), flags,
301 "AcceptPlayers", "Accept network connections", 0);
302 empth_create(PP_KILLIDLE, player_kill_idle, (50 * 1024), flags,
303 "KillIdle", "Kills idle player connections", 0);
304 empth_create(PP_SCHED, update_sched, (50 * 1024), flags, "UpdateSched",
305 "Schedules updates to occur", 0);
306 empth_create(PP_TIMESTAMP, delete_lostitems, (50 * 1024), flags,
307 "DeleteItems", "Deletes old lost items", 0);
308 if (opt_MOB_ACCESS) {
309 /* Start the mobility access check thread */
310 empth_create(PP_TIMESTAMP, mobility_check, (50 * 1024), flags,
311 "MobilityCheck", "Writes the timestamp file", 0);
315 empth_create(PP_TIMESTAMP, market_update, (50 * 1024), flags,
316 "MarketUpdate", "Updates the market", 0);
321 * Finish serving, release resources.
334 create_pidfile(char *fname, pid_t pid)
336 FILE *pidf = fopen(fname, "w");
338 || fprintf(pidf, "%d\n", pid) < 0
340 logerror("Can't write PID file (%s)", strerror(errno));
349 failed |= !ef_open(EF_NATION, O_RDWR, EFF_MEM);
350 failed |= !ef_open(EF_SECTOR, O_RDWR, EFF_MEM);
351 failed |= !ef_open(EF_SHIP, O_RDWR, EFF_MEM);
352 failed |= !ef_open(EF_PLANE, O_RDWR, EFF_MEM);
353 failed |= !ef_open(EF_LAND, O_RDWR, EFF_MEM);
354 failed |= !ef_open(EF_NEWS, O_RDWR, 0);
355 failed |= !ef_open(EF_LOAN, O_RDWR, 0);
356 failed |= !ef_open(EF_TREATY, O_RDWR, 0);
357 failed |= !ef_open(EF_NUKE, O_RDWR, EFF_MEM);
358 failed |= !ef_open(EF_POWER, O_RDWR, 0);
359 failed |= !ef_open(EF_TRADE, O_RDWR, 0);
360 failed |= !ef_open(EF_MAP, O_RDWR, EFF_MEM);
361 failed |= !ef_open(EF_BMAP, O_RDWR, EFF_MEM);
362 failed |= !ef_open(EF_COMM, O_RDWR, 0);
363 failed |= !ef_open(EF_LOST, O_RDWR, 0);
365 logerror("Missing files, giving up");
390 /* we're going down. try to close the files at least */
395 struct sigaction act;
398 sigemptyset(&act.sa_mask);
399 act.sa_handler = SIG_DFL;
400 sigaction(SIGBUS, &act, NULL);
401 sigaction(SIGSEGV, &act, NULL);
402 sigaction(SIGILL, &act, NULL);
403 sigaction(SIGFPE, &act, NULL);
404 logerror("server received fatal signal %d", sig);
407 if (CANT_HAPPEN(sig != SIGBUS && sig != SIGSEGV
408 && sig != SIGILL && sig != SIGFPE))
421 logerror("Shutdown commencing (cleaning up threads.)");
423 for (p = player_next(0); p != 0; p = player_next(p)) {
424 if (p->state != PS_PLAYING)
426 pr_flash(p, "Server shutting down...\n");
427 p->state = PS_SHUTDOWN;
430 pr_flash(p, "Shutdown aborting command\n");
432 empth_wakeup(p->proc);
436 /* Sleep and let some cleanup happen - note this doesn't work
437 when called from a signal handler, since we may or may not
438 be in the right thread. So we just pass by and kill 'em
441 empth_sleep(now + 1);
444 for (p = player_next(0); p != 0; p = player_next(p)) {
447 empth_terminate(p->proc);
448 p = player_delete(p);
451 logerror("Server shutting down on signal %d", sig);
453 logerror("Server shutting down at deity's request");
467 nullify_objects(void)
472 dchr[SCT_CAPIT] = bigcity_dchr;
474 dchr[SCT_LIGHT].d_cost = -1;
476 dchr[SCT_HEAVY].d_cost = -1;
478 dchr[SCT_OIL].d_cost = -1;
479 dchr[SCT_REFINE].d_cost = -1;
481 for (i = 0; i < pln_maxno; i++) {
487 plchr[i].pl_fuel = 0;
489 for (i = 0; i < lnd_maxno; i++) {
494 /* Fix up the military values */
495 lchr[i].l_mil = lchr[i].l_item[I_MILIT];
497 for (i = 0; i < shp_maxno; i++) {
503 if (mchr[i].m_flags & M_OIL)
507 for (i = 0; i < nuk_maxno; i++) {
513 for (i = 0; i <= SCT_MAXDEF; i++) {
519 for (i = 0; i < prd_maxno; i++) {
520 for (j = 0; j < MAXPRCON; j++) {
521 if (opt_NO_HCMS && pchr[i].p_ctype[j] == I_HCM)
522 pchr[i].p_camt[j] = 0;
523 if (opt_NO_LCMS && pchr[i].p_ctype[j] == I_LCM)
524 pchr[i].p_camt[j] = 0;
525 if (opt_NO_OIL && pchr[i].p_ctype[j] == I_OIL)
526 pchr[i].p_camt[j] = 0;
536 WORD wVersionRequested;
539 wVersionRequested = MAKEWORD(2, 0);
540 rc = WSAStartup(wVersionRequested, &wsaData);
542 logerror("WSAStartup failed. %d", rc);