extern.h revision 1.2 1 1.2 tls /* $NetBSD: extern.h,v 1.2 1997/01/07 12:42:17 tls Exp $ */
2 1.2 tls
3 1.1 tls /*
4 1.1 tls * Copyright (c) 1983, 1993
5 1.1 tls * The Regents of the University of California. All rights reserved.
6 1.1 tls *
7 1.1 tls * Redistribution and use in source and binary forms, with or without
8 1.1 tls * modification, are permitted provided that the following conditions
9 1.1 tls * are met:
10 1.1 tls * 1. Redistributions of source code must retain the above copyright
11 1.1 tls * notice, this list of conditions and the following disclaimer.
12 1.1 tls * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 tls * notice, this list of conditions and the following disclaimer in the
14 1.1 tls * documentation and/or other materials provided with the distribution.
15 1.1 tls * 3. All advertising materials mentioning features or use of this software
16 1.1 tls * must display the following acknowledgement:
17 1.1 tls * This product includes software developed by the University of
18 1.1 tls * California, Berkeley and its contributors.
19 1.1 tls * 4. Neither the name of the University nor the names of its contributors
20 1.1 tls * may be used to endorse or promote products derived from this software
21 1.1 tls * without specific prior written permission.
22 1.1 tls *
23 1.1 tls * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 tls * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 tls * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 tls * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 tls * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 tls * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 tls * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 tls * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 tls * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 tls * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 tls * SUCH DAMAGE.
34 1.1 tls *
35 1.1 tls * @(#)externs.h 8.1 (Berkeley) 5/31/93
36 1.1 tls */
37 1.1 tls
38 1.1 tls #include <stdio.h>
39 1.1 tls #include <signal.h>
40 1.2 tls #include <string.h>
41 1.1 tls #include <ctype.h>
42 1.1 tls #include <setjmp.h>
43 1.1 tls #include "machdep.h"
44 1.1 tls
45 1.1 tls /* program mode */
46 1.1 tls int mode;
47 1.1 tls jmp_buf restart;
48 1.1 tls #define MODE_PLAYER 1
49 1.1 tls #define MODE_DRIVER 2
50 1.1 tls #define MODE_LOGGER 3
51 1.1 tls
52 1.1 tls /* command line flags */
53 1.1 tls char debug; /* -D */
54 1.1 tls char randomize; /* -x, give first available ship */
55 1.1 tls char longfmt; /* -l, print score in long format */
56 1.1 tls char nobells; /* -b, don't ring bell before Signal */
57 1.1 tls
58 1.1 tls /* other initial modes */
59 1.1 tls char issetuid; /* running setuid */
60 1.1 tls
61 1.1 tls #define die() ((rand() >> 3) % 6 + 1)
62 1.1 tls #define sqr(a) ((a) * (a))
63 1.1 tls #define abs(a) ((a) > 0 ? (a) : -(a))
64 1.1 tls #define min(a,b) ((a) < (b) ? (a) : (b))
65 1.1 tls
66 1.1 tls #define grappled(a) ((a)->file->ngrap)
67 1.1 tls #define fouled(a) ((a)->file->nfoul)
68 1.1 tls #define snagged(a) (grappled(a) + fouled(a))
69 1.1 tls
70 1.1 tls #define grappled2(a, b) ((a)->file->grap[(b)->file->index].sn_count)
71 1.1 tls #define fouled2(a, b) ((a)->file->foul[(b)->file->index].sn_count)
72 1.1 tls #define snagged2(a, b) (grappled2(a, b) + fouled2(a, b))
73 1.1 tls
74 1.1 tls #define Xgrappled2(a, b) ((a)->file->grap[(b)->file->index].sn_turn < turn-1 ? grappled2(a, b) : 0)
75 1.1 tls #define Xfouled2(a, b) ((a)->file->foul[(b)->file->index].sn_turn < turn-1 ? fouled2(a, b) : 0)
76 1.1 tls #define Xsnagged2(a, b) (Xgrappled2(a, b) + Xfouled2(a, b))
77 1.1 tls
78 1.1 tls #define cleangrapple(a, b, c) Cleansnag(a, b, c, 1)
79 1.1 tls #define cleanfoul(a, b, c) Cleansnag(a, b, c, 2)
80 1.1 tls #define cleansnag(a, b, c) Cleansnag(a, b, c, 3)
81 1.1 tls
82 1.1 tls #define sterncolour(sp) ((sp)->file->stern+'0'-((sp)->file->captured?10:0))
83 1.1 tls #define sternrow(sp) ((sp)->file->row + dr[(sp)->file->dir])
84 1.1 tls #define sterncol(sp) ((sp)->file->col + dc[(sp)->file->dir])
85 1.1 tls
86 1.1 tls #define capship(sp) ((sp)->file->captured?(sp)->file->captured:(sp))
87 1.1 tls
88 1.1 tls #define readyname(r) ((r) & R_LOADING ? '*' : ((r) & R_INITIAL ? '!' : ' '))
89 1.1 tls
90 1.1 tls /* loadL and loadR, should match loadname[] */
91 1.1 tls #define L_EMPTY 0 /* should be 0, don't change */
92 1.1 tls #define L_GRAPE 1
93 1.1 tls #define L_CHAIN 2
94 1.1 tls #define L_ROUND 3
95 1.1 tls #define L_DOUBLE 4
96 1.1 tls #define L_EXPLODE 5
97 1.1 tls
98 1.1 tls /*
99 1.1 tls * readyL and readyR, these are bits, except R_EMPTY
100 1.1 tls */
101 1.1 tls #define R_EMPTY 0 /* not loaded and not loading */
102 1.1 tls #define R_LOADING 1 /* loading */
103 1.1 tls #define R_DOUBLE 2 /* loading double */
104 1.1 tls #define R_LOADED 4 /* loaded */
105 1.1 tls #define R_INITIAL 8 /* loaded initial */
106 1.1 tls
107 1.1 tls #define HULL 0
108 1.1 tls #define RIGGING 1
109 1.1 tls
110 1.1 tls #define W_CAPTAIN 1
111 1.1 tls #define W_CAPTURED 2
112 1.1 tls #define W_CLASS 3
113 1.1 tls #define W_CREW 4
114 1.1 tls #define W_DBP 5
115 1.1 tls #define W_DRIFT 6
116 1.1 tls #define W_EXPLODE 7
117 1.1 tls #define W_FILE 8
118 1.1 tls #define W_FOUL 9
119 1.1 tls #define W_GUNL 10
120 1.1 tls #define W_GUNR 11
121 1.1 tls #define W_HULL 12
122 1.1 tls #define W_MOVE 13
123 1.1 tls #define W_OBP 14
124 1.1 tls #define W_PCREW 15
125 1.1 tls #define W_UNFOUL 16
126 1.1 tls #define W_POINTS 17
127 1.1 tls #define W_QUAL 18
128 1.1 tls #define W_UNGRAP 19
129 1.1 tls #define W_RIGG 20
130 1.1 tls #define W_COL 21
131 1.1 tls #define W_DIR 22
132 1.1 tls #define W_ROW 23
133 1.1 tls #define W_SIGNAL 24
134 1.1 tls #define W_SINK 25
135 1.1 tls #define W_STRUCK 26
136 1.1 tls #define W_TA 27
137 1.1 tls #define W_ALIVE 28
138 1.1 tls #define W_TURN 29
139 1.1 tls #define W_WIND 30
140 1.1 tls #define W_FS 31
141 1.1 tls #define W_GRAP 32
142 1.1 tls #define W_RIG1 33
143 1.1 tls #define W_RIG2 34
144 1.1 tls #define W_RIG3 35
145 1.1 tls #define W_RIG4 36
146 1.1 tls #define W_BEGIN 37
147 1.1 tls #define W_END 38
148 1.1 tls #define W_DDEAD 39
149 1.1 tls
150 1.1 tls #define NLOG 10
151 1.1 tls struct logs {
152 1.1 tls char l_name[20];
153 1.1 tls int l_uid;
154 1.1 tls int l_shipnum;
155 1.1 tls int l_gamenum;
156 1.1 tls int l_netpoints;
157 1.1 tls };
158 1.1 tls
159 1.1 tls struct BP {
160 1.1 tls short turnsent;
161 1.1 tls struct ship *toship;
162 1.1 tls short mensent;
163 1.1 tls };
164 1.1 tls
165 1.1 tls struct snag {
166 1.1 tls short sn_count;
167 1.1 tls short sn_turn;
168 1.1 tls };
169 1.1 tls
170 1.1 tls #define NSCENE nscene
171 1.1 tls #define NSHIP 10
172 1.1 tls #define NBP 3
173 1.1 tls
174 1.1 tls #define NNATION 8
175 1.1 tls #define N_A 0
176 1.1 tls #define N_B 1
177 1.1 tls #define N_S 2
178 1.1 tls #define N_F 3
179 1.1 tls #define N_J 4
180 1.1 tls #define N_D 5
181 1.1 tls #define N_K 6
182 1.1 tls #define N_O 7
183 1.1 tls
184 1.1 tls struct File {
185 1.1 tls int index;
186 1.1 tls char captain[20]; /* 0 */
187 1.1 tls short points; /* 20 */
188 1.1 tls char loadL; /* 22 */
189 1.1 tls char loadR; /* 24 */
190 1.1 tls char readyL; /* 26 */
191 1.1 tls char readyR; /* 28 */
192 1.1 tls struct BP OBP[NBP]; /* 30 */
193 1.1 tls struct BP DBP[NBP]; /* 48 */
194 1.1 tls char struck; /* 66 */
195 1.1 tls struct ship *captured; /* 68 */
196 1.1 tls short pcrew; /* 70 */
197 1.1 tls char movebuf[10]; /* 72 */
198 1.1 tls char drift; /* 82 */
199 1.1 tls short nfoul;
200 1.1 tls short ngrap;
201 1.1 tls struct snag foul[NSHIP]; /* 84 */
202 1.1 tls struct snag grap[NSHIP]; /* 124 */
203 1.1 tls char RH; /* 224 */
204 1.1 tls char RG; /* 226 */
205 1.1 tls char RR; /* 228 */
206 1.1 tls char FS; /* 230 */
207 1.1 tls char explode; /* 232 */
208 1.1 tls char sink; /* 234 */
209 1.1 tls char dir;
210 1.1 tls short col;
211 1.1 tls short row;
212 1.1 tls char loadwith;
213 1.1 tls char stern;
214 1.1 tls };
215 1.1 tls
216 1.1 tls struct ship {
217 1.1 tls char *shipname; /* 0 */
218 1.1 tls struct shipspecs *specs; /* 2 */
219 1.1 tls char nationality; /* 4 */
220 1.1 tls short shiprow; /* 6 */
221 1.1 tls short shipcol; /* 8 */
222 1.1 tls char shipdir; /* 10 */
223 1.1 tls struct File *file; /* 12 */
224 1.1 tls };
225 1.1 tls
226 1.1 tls struct scenario {
227 1.1 tls char winddir; /* 0 */
228 1.1 tls char windspeed; /* 2 */
229 1.1 tls char windchange; /* 4 */
230 1.1 tls char vessels; /* 12 */
231 1.1 tls char *name; /* 14 */
232 1.1 tls struct ship ship[NSHIP]; /* 16 */
233 1.1 tls };
234 1.1 tls struct scenario scene[];
235 1.1 tls int nscene;
236 1.1 tls
237 1.1 tls struct shipspecs {
238 1.1 tls char bs;
239 1.1 tls char fs;
240 1.1 tls char ta;
241 1.1 tls short guns;
242 1.1 tls char class;
243 1.1 tls char hull;
244 1.1 tls char qual;
245 1.1 tls char crew1;
246 1.1 tls char crew2;
247 1.1 tls char crew3;
248 1.1 tls char gunL;
249 1.1 tls char gunR;
250 1.1 tls char carL;
251 1.1 tls char carR;
252 1.1 tls char rig1;
253 1.1 tls char rig2;
254 1.1 tls char rig3;
255 1.1 tls char rig4;
256 1.1 tls short pts;
257 1.1 tls };
258 1.1 tls struct shipspecs specs[];
259 1.1 tls
260 1.1 tls struct scenario *cc; /* the current scenario */
261 1.1 tls struct ship *ls; /* &cc->ship[cc->vessels] */
262 1.1 tls
263 1.1 tls #define SHIP(s) (&cc->ship[s])
264 1.1 tls #define foreachship(sp) for ((sp) = cc->ship; (sp) < ls; (sp)++)
265 1.1 tls
266 1.1 tls struct windeffects {
267 1.1 tls char A, B, C, D;
268 1.1 tls };
269 1.1 tls struct windeffects WET[7][6];
270 1.1 tls
271 1.1 tls struct Tables {
272 1.1 tls char H, G, C, R;
273 1.1 tls };
274 1.1 tls struct Tables RigTable[11][6];
275 1.1 tls struct Tables HullTable[11][6];
276 1.1 tls
277 1.1 tls char AMMO[9][4];
278 1.1 tls char HDT[9][10];
279 1.1 tls char HDTrake[9][10];
280 1.1 tls char QUAL[9][5];
281 1.1 tls char MT[9][3];
282 1.1 tls
283 1.1 tls char *countryname[];
284 1.1 tls char *classname[];
285 1.1 tls char *directionname[];
286 1.1 tls char *qualname[];
287 1.1 tls char loadname[];
288 1.1 tls
289 1.1 tls char rangeofshot[];
290 1.1 tls
291 1.1 tls char dr[], dc[];
292 1.1 tls
293 1.1 tls int winddir;
294 1.1 tls int windspeed;
295 1.1 tls int turn;
296 1.1 tls int game;
297 1.1 tls int alive;
298 1.1 tls int people;
299 1.1 tls char hasdriver;
300 1.1 tls
301 1.1 tls char *info();
302 1.1 tls char *quality();
303 1.1 tls double arctan();
304 1.1 tls char *saywhat();
305 1.1 tls struct ship *closestenemy();
306 1.1 tls
307 1.1 tls char *calloc();
308 1.1 tls char *rindex();
309 1.1 tls char *strcpy();
310 1.1 tls char *strcat();
311 1.1 tls char *strncpy();
312 1.1 tls char *getenv();
313 1.1 tls char *gets();
314