dr_main.c revision 1.5 1 1.5 christos /* $NetBSD: dr_main.c,v 1.5 1997/10/13 19:43:54 christos Exp $ */
2 1.4 cgd
3 1.1 cgd /*
4 1.4 cgd * Copyright (c) 1983, 1993
5 1.4 cgd * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.5 christos #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.4 cgd #if 0
39 1.4 cgd static char sccsid[] = "@(#)dr_main.c 8.2 (Berkeley) 4/16/94";
40 1.4 cgd #else
41 1.5 christos __RCSID("$NetBSD: dr_main.c,v 1.5 1997/10/13 19:43:54 christos Exp $");
42 1.4 cgd #endif
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.1 cgd #include "driver.h"
46 1.5 christos #include <stdlib.h>
47 1.5 christos #include <unistd.h>
48 1.1 cgd
49 1.5 christos int
50 1.1 cgd dr_main()
51 1.1 cgd {
52 1.5 christos int n;
53 1.5 christos struct ship *sp;
54 1.1 cgd int nat[NNATION];
55 1.1 cgd int value = 0;
56 1.1 cgd
57 1.1 cgd (void) signal(SIGINT, SIG_IGN);
58 1.1 cgd (void) signal(SIGQUIT, SIG_IGN);
59 1.1 cgd (void) signal(SIGTSTP, SIG_IGN);
60 1.1 cgd if (issetuid)
61 1.3 cgd (void) setuid(geteuid());
62 1.1 cgd if (game < 0 || game >= NSCENE) {
63 1.1 cgd fprintf(stderr, "DRIVER: Bad game number %d\n", game);
64 1.1 cgd exit(1);
65 1.1 cgd }
66 1.1 cgd cc = &scene[game];
67 1.1 cgd ls = SHIP(cc->vessels);
68 1.1 cgd if (sync_open() < 0) {
69 1.1 cgd perror("driver: syncfile");
70 1.1 cgd exit(1);
71 1.1 cgd }
72 1.1 cgd for (n = 0; n < NNATION; n++)
73 1.1 cgd nat[n] = 0;
74 1.1 cgd foreachship(sp) {
75 1.1 cgd if (sp->file == NULL &&
76 1.1 cgd (sp->file = (struct File *)calloc(1, sizeof (struct File))) == NULL) {
77 1.1 cgd (void) fprintf(stderr, "DRIVER: Out of memory.\n");
78 1.1 cgd exit(1);
79 1.1 cgd }
80 1.1 cgd sp->file->index = sp - SHIP(0);
81 1.1 cgd sp->file->loadL = L_ROUND;
82 1.1 cgd sp->file->loadR = L_ROUND;
83 1.1 cgd sp->file->readyR = R_LOADED|R_INITIAL;
84 1.1 cgd sp->file->readyL = R_LOADED|R_INITIAL;
85 1.1 cgd sp->file->stern = nat[sp->nationality]++;
86 1.1 cgd sp->file->dir = sp->shipdir;
87 1.1 cgd sp->file->row = sp->shiprow;
88 1.1 cgd sp->file->col = sp->shipcol;
89 1.1 cgd }
90 1.1 cgd windspeed = cc->windspeed;
91 1.1 cgd winddir = cc->winddir;
92 1.1 cgd people = 0;
93 1.1 cgd for (;;) {
94 1.1 cgd sleep(7);
95 1.1 cgd if (Sync() < 0) {
96 1.1 cgd value = 1;
97 1.1 cgd break;
98 1.1 cgd }
99 1.1 cgd if (next() < 0)
100 1.1 cgd break;
101 1.1 cgd unfoul();
102 1.1 cgd checkup();
103 1.1 cgd prizecheck();
104 1.1 cgd moveall();
105 1.1 cgd thinkofgrapples();
106 1.1 cgd boardcomp();
107 1.1 cgd compcombat();
108 1.1 cgd resolve();
109 1.1 cgd reload();
110 1.1 cgd checksails();
111 1.1 cgd if (Sync() < 0) {
112 1.1 cgd value = 1;
113 1.1 cgd break;
114 1.1 cgd }
115 1.1 cgd }
116 1.1 cgd sync_close(1);
117 1.1 cgd return value;
118 1.1 cgd }
119