Home | History | Annotate | Line # | Download | only in sail
extern.h revision 1.13
      1  1.13       jsm /*	$NetBSD: extern.h,v 1.13 1999/12/28 18:05:24 jsm 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.13       jsm extern int mode;
     47  1.13       jsm extern 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.13       jsm extern char debug;			/* -D */
     54  1.13       jsm extern char randomize;			/* -x, give first available ship */
     55  1.13       jsm extern char longfmt;			/* -l, print score in long format */
     56  1.13       jsm extern char nobells;			/* -b, don't ring bell before Signal */
     57   1.1       tls 
     58   1.1       tls 	/* other initial modes */
     59  1.13       jsm extern 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.4  christos 	unsigned char loadL;		/* 22 */
    189   1.4  christos 	unsigned char loadR;		/* 24 */
    190   1.4  christos 	unsigned char readyL;		/* 26 */
    191   1.4  christos 	unsigned 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.4  christos 	unsigned 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.10       jsm 	const char *shipname;		/* 0 */
    218   1.1       tls 	struct shipspecs *specs;	/* 2 */
    219   1.4  christos 	unsigned 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.4  christos 	unsigned char vessels;		/* 12 */
    231  1.10       jsm 	const char *name;		/* 14 */
    232   1.1       tls 	struct ship ship[NSHIP];	/* 16 */
    233   1.1       tls };
    234   1.6       mrg extern struct scenario scene[];
    235  1.13       jsm extern 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.4  christos 	unsigned char class;
    243   1.1       tls 	char hull;
    244   1.4  christos 	unsigned 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.3   thorpej 	int rig1;
    253   1.3   thorpej 	int rig2;
    254   1.3   thorpej 	int rig3;
    255   1.3   thorpej 	int rig4;
    256   1.1       tls 	short pts;
    257   1.1       tls };
    258   1.6       mrg extern struct shipspecs specs[];
    259   1.1       tls 
    260  1.13       jsm extern struct scenario *cc;		/* the current scenario */
    261  1.13       jsm extern 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.13       jsm extern const 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.13       jsm extern const struct Tables RigTable[11][6];
    275  1.13       jsm extern const struct Tables HullTable[11][6];
    276   1.1       tls 
    277  1.13       jsm extern const char AMMO[9][4];
    278  1.13       jsm extern const char HDT[9][10];
    279  1.13       jsm extern const char HDTrake[9][10];
    280  1.13       jsm extern const char QUAL[9][5];
    281  1.13       jsm extern const char MT[9][3];
    282  1.10       jsm 
    283  1.10       jsm extern const char *const countryname[];
    284  1.10       jsm extern const char *const classname[];
    285  1.10       jsm extern const char *const directionname[];
    286  1.10       jsm extern const char *const qualname[];
    287  1.10       jsm extern const char loadname[];
    288   1.1       tls 
    289  1.10       jsm extern const char rangeofshot[];
    290   1.1       tls 
    291  1.10       jsm extern const char dr[], dc[];
    292   1.1       tls 
    293  1.13       jsm extern int winddir;
    294  1.13       jsm extern int windspeed;
    295  1.13       jsm extern int turn;
    296  1.13       jsm extern int game;
    297  1.13       jsm extern int alive;
    298  1.13       jsm extern int people;
    299  1.13       jsm extern char hasdriver;
    300   1.1       tls 
    301   1.4  christos /* assorted.c */
    302   1.4  christos void table __P((int, int, int, struct ship *, struct ship *, int));
    303   1.4  christos void Cleansnag __P((struct ship *, struct ship *, int, int));
    304   1.4  christos 
    305   1.4  christos /* dr_1.c */
    306   1.4  christos void unfoul __P((void));
    307   1.4  christos void boardcomp __P((void));
    308   1.4  christos int fightitout __P((struct ship *, struct ship *, int));
    309   1.4  christos void resolve __P((void));
    310   1.4  christos void compcombat __P((void));
    311   1.4  christos int next __P((void));
    312   1.4  christos 
    313   1.4  christos /* dr_2.c */
    314   1.4  christos void thinkofgrapples __P((void));
    315   1.4  christos void checkup __P((void));
    316   1.4  christos void prizecheck __P((void));
    317  1.12       jsm int str_end __P((const char *));
    318   1.4  christos void closeon __P((struct ship *, struct ship *, char[], int, int, int));
    319   1.4  christos int score __P((char[], struct ship *, struct ship *, int));
    320  1.10       jsm void move_ship __P((const char *, struct ship *, unsigned char *, short *, short *, char *));
    321   1.4  christos void try __P((char[], char [], int, int, int, int, int, struct ship *,
    322   1.4  christos     struct ship *, int *, int));
    323   1.4  christos void rmend __P((char *));
    324   1.4  christos 
    325   1.4  christos /* dr_3.c */
    326   1.4  christos void moveall __P((void));
    327   1.4  christos int stillmoving __P((int));
    328  1.12       jsm int is_isolated __P((struct ship *));
    329   1.4  christos int push __P((struct ship *, struct ship *));
    330   1.4  christos void step __P((int, struct ship *, char *));
    331   1.4  christos void sendbp __P((struct ship *, struct ship *, int, int));
    332  1.12       jsm int is_toughmelee __P((struct ship *, struct ship *, int, int));
    333   1.4  christos void reload __P((void));
    334   1.4  christos void checksails __P((void));
    335   1.4  christos 
    336   1.4  christos /* dr_4.c */
    337   1.4  christos void ungrap __P((struct ship *, struct ship *));
    338   1.4  christos void grap __P((struct ship *, struct ship *));
    339   1.4  christos 
    340   1.4  christos /* dr_5.c */
    341   1.4  christos void subtract __P((struct ship *, int, int [3], struct ship *, int));
    342   1.4  christos int mensent __P((struct ship *, struct ship *, int[3], struct ship **, int *,
    343   1.4  christos     int));
    344   1.4  christos 
    345   1.4  christos /* dr_main.c */
    346   1.4  christos int dr_main __P((void));
    347   1.4  christos 
    348   1.4  christos /* game.c */
    349   1.4  christos int maxturns __P((struct ship *, char *));
    350   1.4  christos int maxmove __P((struct ship *, int, int));
    351   1.4  christos 
    352   1.4  christos /* lo_main.c */
    353   1.4  christos int lo_main __P((void));
    354   1.4  christos 
    355   1.4  christos /* misc.c */
    356   1.4  christos int range __P((struct ship *, struct ship *));
    357   1.4  christos struct ship *closestenemy __P((struct ship *, int, int));
    358   1.4  christos int angle __P((int, int));
    359   1.4  christos int gunsbear __P((struct ship *, struct ship *));
    360   1.4  christos int portside __P((struct ship *, struct ship *, int));
    361   1.4  christos int colours __P((struct ship *));
    362   1.4  christos void logger __P((struct ship *));
    363   1.4  christos 
    364   1.4  christos /* parties.c */
    365   1.4  christos int meleeing __P((struct ship *, struct ship *));
    366   1.4  christos int boarding __P((struct ship *, int));
    367   1.4  christos void unboard __P((struct ship *, struct ship *, int));
    368   1.4  christos 
    369   1.4  christos /* pl_1.c */
    370   1.8   hubertf void leave __P((int)) __attribute__((__noreturn__));
    371   1.8   hubertf void choke __P((int)) __attribute__((__noreturn__));
    372   1.4  christos void child __P((int));
    373   1.4  christos 
    374   1.4  christos /* pl_2.c */
    375  1.11       jsm void play __P((void)) __attribute__((__noreturn__));
    376   1.4  christos 
    377   1.4  christos /* pl_3.c */
    378   1.4  christos void acceptcombat __P((void));
    379   1.4  christos void grapungrap __P((void));
    380   1.4  christos void unfoulplayer __P((void));
    381   1.4  christos 
    382   1.4  christos /* pl_4.c */
    383   1.4  christos void changesail __P((void));
    384   1.4  christos void acceptsignal __P((void));
    385   1.4  christos void lookout __P((void));
    386  1.10       jsm const char *saywhat __P((struct ship *, int));
    387   1.4  christos void eyeball __P((struct ship *));
    388   1.4  christos 
    389   1.4  christos /* pl_5.c */
    390   1.4  christos void acceptmove __P((void));
    391   1.4  christos void acceptboard __P((void));
    392   1.4  christos void parties __P((int[3], struct ship *, int, int));
    393   1.4  christos 
    394   1.4  christos /* pl_6.c */
    395   1.4  christos void repair __P((void));
    396   1.4  christos int turned __P((void));
    397   1.4  christos void loadplayer __P((void));
    398   1.4  christos 
    399   1.4  christos /* pl_7.c */
    400   1.4  christos void initscreen __P((void));
    401   1.4  christos void cleanupscreen __P((void));
    402   1.4  christos void newturn __P((int));
    403   1.5  christos void Signal __P((const char *, struct ship *, ...))
    404   1.5  christos 	 __attribute__((__format__(__printf__,1,3)));
    405   1.5  christos void Msg __P((const char *, ...))
    406   1.5  christos 	 __attribute__((__format__(__printf__,1,2)));
    407   1.4  christos void Scroll __P((void));
    408  1.10       jsm void prompt __P((const char *, struct ship *));
    409   1.4  christos void endprompt __P((int));
    410  1.10       jsm int sgetch __P((const char *, struct ship *, int));
    411  1.10       jsm void sgetstr __P((const char *, char *, int));
    412   1.4  christos void draw_screen __P((void));
    413   1.4  christos void draw_view __P((void));
    414   1.4  christos void draw_turn __P((void));
    415   1.4  christos void draw_stat __P((void));
    416   1.4  christos void draw_slot __P((void));
    417   1.4  christos void draw_board __P((void));
    418   1.4  christos void centerview __P((void));
    419   1.4  christos void upview __P((void));
    420   1.4  christos void downview __P((void));
    421   1.4  christos void leftview __P((void));
    422   1.4  christos void rightview __P((void));
    423   1.4  christos void adjustview __P((void));
    424   1.4  christos 
    425   1.4  christos /* pl_main.c */
    426   1.4  christos int pl_main __P((void));
    427   1.4  christos void initialize __P((void));
    428   1.4  christos 
    429   1.4  christos /* sync.c */
    430   1.4  christos void fmtship __P((char *, size_t, const char *, struct ship *));
    431   1.5  christos void makesignal __P((struct ship *, const char *, struct ship *, ...))
    432   1.5  christos 	 __attribute__((__format__(__printf__,2,4)));
    433   1.5  christos void makemsg __P((struct ship *, const char *, ...))
    434   1.5  christos 	 __attribute__((__format__(__printf__,2,3)));
    435   1.4  christos int sync_exists __P((int));
    436   1.4  christos int sync_open __P((void));
    437   1.4  christos void sync_close __P((int));
    438   1.9   hubertf void Write __P((int, struct ship *, long, long, long, long));
    439   1.9   hubertf void Writestr __P((int, struct ship *, const char *));
    440   1.4  christos int Sync __P((void));
    441   1.9   hubertf int sync_update __P((int, struct ship *, const char *, long, long, long, long));
    442