[unix-history] / usr / src / games / sail / pl_1.c

#ifndef lint
static	char *sccsid = "@(#)pl_1.c	1.9 83/07/20";
#endif

#include "player.h"
#include <sys/types.h>
#include <wait.h>

int choke(), child();

/*ARGSUSED*/
main(argc, argv)
int argc;
char **argv;
{
	register struct ship *sp;
	int aheadfirst, ma;
	int ta;
	char nodrive = 0, randomize = 0, debug = 0;
	char *badstring();
	extern char _sobuf[];

	setbuf(stdout, _sobuf);

	while (*++argv && **argv == '-')
		switch (*++*argv) {
		case 'd':
			nodrive = 1;
			break;
		case 'D':
			debug++;
			break;
		case 'x':
			randomize = 1;
			break;
		default:
			printf("Unknown flag '%s'\n",*argv);
			break;
		}
	if (*argv)
		game = atoi(*argv);
	else
		game = -1;
	initialize(nodrive, randomize, debug);
	Signal("Aye aye, Sir", (struct ship *)0);
	for (;;) {
		prompt();
		switch (sgetch(0)) {
		case 'm':
			if (mc->crew3 && !snagged(ms)
			    && windspeed != 0) {
				ta = maxturns(ms);
				aheadfirst = ta & 0100000;
				ma = maxmove(ms, mf->dir, 0);
				ta &= 077777;
				acceptmove(ma, ta, aheadfirst);
			} else
				Signal("Unable to move", (struct ship *)0);
			break;
		case 's':
			acceptsignal();
			break;
		case 'g':
			grapungrap();
			break;
		case 'u':
			unfoulplayer();
			break;
		case 'v':
			Signal("%s", (struct ship *)0, version);
			break;
		case 'b':
			doboarding();
			break;
		case 'f':
			acceptcombat();
			break;
		case 'l':
			loadplayer();
			break;
		case 'c':
			changesail();
			break;
		case 'r':
			repair();
			break;
		case 'B':
			Signal("'Hands to stations!'", (struct ship *)0);
			unboard(ms, ms, 1);	/* cancel DBP's */
			unboard(ms, ms, 0);	/* cancel offense */
			break;
		case '\f':
			centerview();
			board();
			screen();
			break;
		case 'L':
			mf->loadL = L_EMPTY;
			mf->loadR = L_EMPTY;
			mf->readyL = R_EMPTY;
			mf->readyR = R_EMPTY;
			Signal("Broadsides unloaded", (struct ship *)0);
			break;
		case 'q':
			Signal("Type 'Q' to quit", (struct ship *)0);
			break;
		case 'Q':
			leave(LEAVE_QUIT);
			break;
		case 'I':
			foreachship(sp)
				eyeball(sp);
			break;
		case 'i':
			eyeball(closestenemy(ms, 0, 1));
			break;
		case 'C':
			centerview();
			draw_view();
			break;
		case 'U':
			upview();
			draw_view();
			break;
		case 'D':
		case 'N':
			downview();
			draw_view();
			break;
		case 'H':
			leftview();
			draw_view();
			break;
		case 'J':
			rightview();
			draw_view();
			break;
		case 'F':
			lookout();
			break;
		case 'S':
			dont_adjust = !dont_adjust;
			break;
		}
		signalflags();
		lost();
	}
}

initialize(nodriver, randomize, debug)
char randomize, nodriver, debug;
{
	register struct File *fp;
	register struct ship *sp;
	char captain[80], file[25];
	char message[60];
	int load;
	int people = 0;
	register int n;
	char *nameptr;
	int nat[NNATION];

	(void) srand(getpid());

	if (game < 0) {
		(void) puts("Choose a scenario:\n");
		(void) puts("\n\tNUMBER\tSHIPS\tIN PLAY\tTITLE");
		for (n = 0; n < NSCENE; n++) {
			printf("\t%d):\t%d", n, scene[n].vessels);
			(void) sprintf(file, "/tmp/.%d", n);
			if (access(file, 0) >= 0)
				printf("\tYES");
			else
				printf("\tno");
			printf("\t%s\n", scene[n].name);
		}
reprint:
		printf("\nScenario number? ");
		(void) fflush(stdout);
		(void) scanf("%d", &game);
		while (getchar() != '\n')
			;
	}
	if (game < 0 || game >= NSCENE) {
		(void) puts("Very funny.");
		exit(1);
	}
	cc = &scene[game];
	ls = cc->ship + cc->vessels;

	(void) sprintf(file, "/tmp/.%d", game);
	if (access(file, 0) < 0) {
		int omask;
#ifdef SETUID
		omask = umask(077);
#else
		omask = umask(011);
#endif
		syncfile = fopen(file, "w+");
		(void) umask(omask);
	} else {
		syncfile = fopen(file, "r+");
		people = 1;
	}
	lastsync = 0;

	for (n = 0; n < NNATION; n++)
		nat[n] = 0;
	foreachship(sp) {
		sp->file = (struct File *) calloc(1, sizeof (struct File));
		if (sp->file == NULL) {
			(void) puts("OUT OF MEMORY");
			exit(0);
		}
		sp->file->stern = nat[sp->nationality]++;
	}
	if (people > 0) {
		(void) puts("Synchronizing with the other players...");
		(void) fflush(stdout);
		Sync();
		foreachship(sp) {
			if (sp->file->captain[0]
			    || sp->file->struck || sp->file->captured != 0)
				break;
		}
		if (sp >= ls) {
			(void) puts("All ships taken in that scenario.");
			foreachship(sp)
				free((char *)sp->file);
			people = 0;
			(void) fclose(syncfile);
			goto reprint;
		}
		player = sp - cc->ship;
	} else
		player = 0;

	while (randomize) {
		printf("%s\n\n", cc->name);
		foreachship(sp) {
			printf("  %2d:  %-10s %-15s  (%-2d pts)   %s\n",
				sp - SHIP(0),
				countryname[sp->nationality],
				sp->shipname,
				sp->specs->pts,
				saywhat(sp, 1));
		}
		printf("\nWhich ship do you want (0-%d)? ", cc->vessels-1);
		(void) fflush(stdout);
		if (scanf("%d", &player) != 1 || player < 0
		    || player >= cc->vessels) {
			while (getchar() != '\n')
				;
			(void) puts("Say what?");
		} else {
			while (getchar() != '\n')
				;
			Sync();
			fp = SHIP(player)->file;
			if (fp->captain[0] || fp->struck || fp->captured != 0)
				(void) puts("Sorry, that ship is taken.");
			else
				break;
		}
	}

	ms = SHIP(player);
	mf = ms->file;
	mc = ms->specs;

	(void) signal(SIGHUP, choke);
	(void) signal(SIGINT, choke);
	(void) signal(SIGQUIT, choke);
	(void) signal(SIGCHLD, child);

	Write(W_CAPTAIN, ms, 1, (int) "begin", 0, 0, 0);
	if (people)
		Write(W_PEOPLE, SHIP(0), 0, cc->people + 1, 0, 0, 0);
	Sync();
	printf("Your ship is the %s, a %d gun %s (%s crew).\n",
		ms->shipname, mc->guns, classname[mc->class],
		qualname[mc->qual]);
	if ((nameptr = (char *) getenv("SAILNAME")) && *nameptr)
		(void) strncpy(captain, nameptr, sizeof captain);
	else {
		(void) printf("Your name, Captain? ");
		(void) fflush(stdout);
		(void) gets(captain);
		if (!*captain)
			(void) strcpy(captain, "no name");
	}
	captain[sizeof captain - 1] = '\0';
	for (n = 0; n < 2; n++) {
		printf("\nInitial broadside %s (grape, chain, round, double): ",
			n ? "right" : "left");
		(void) fflush(stdout);
		(void) scanf("%s", file);
		switch (*file) {
		case 'g':
			load = L_GRAPE;
			break;
		case 'c':
			load = L_CHAIN;
			break;
		case 'r':
			load = L_ROUND;
			break;
		case 'd':
			load = L_DOUBLE;
			break;
		default:
			load = L_ROUND;
		}
		if (n) {
			mf->loadR = load;
			mf->readyR = R_LOADED|R_INITIAL;
		} else {
			mf->loadL = load;
			mf->readyL = R_LOADED|R_INITIAL;
		}
	}
	Write(W_CAPTAIN, ms, 1, (int)captain, 0, 0, 0);
	if (!people && !nodriver) {
		char num[10];
		(void) sprintf(num, "%d", game);
		if (!fork()) {
			if (debug)
				execl(DEBUGDRIVER, DRIVERNAME, num, 0);
			else
				execl(DRIVER, DRIVERNAME, num, 0);
			perror(DRIVER);
			exit(1);
		}
	}

	initscreen();

	board();
	(void) sprintf(message, "Captain %s assuming command", captain);
	Write(W_SIGNAL, ms, 1, (int)message, 0, 0, 0);

	newturn();
}

leave(conditions)
int conditions;
{
	FILE *fp;
	int people;
	float net;
	char * capn;
	char message[60];
	register int n;
	struct logs log[10], temp;

	(void) signal(SIGHUP, SIG_IGN);
	(void) signal(SIGINT, SIG_IGN);
	(void) signal(SIGQUIT, SIG_IGN);
	(void) signal(SIGALRM, SIG_IGN);
	(void) signal(SIGCHLD, SIG_IGN);

	if (conditions != -1) {
		capn = mf->captain;
		(void) sprintf(message,"Captain %s relinquishing.",capn);
		Write(W_SIGNAL, ms, 1, (int)message, 0, 0, 0);

		if (fp = fopen(LOGFILE, "r+")) {
			net = (float)mf->points / mc->pts;
			people = getw(fp);
			n = fread((char *)log, sizeof(struct logs), 10, fp);
			for (; n < 10; n++)
				log[n].l_name[0]
					= log[n].l_uid
					= log[n].l_shipnum
					= log[n].l_gamenum
					= log[n].l_netpoints = 0;
			rewind(fp);
			if (people < 0)
				(void) putw(1, fp);
			else
				(void) putw(people + 1, fp);
			for (n = 0; n < 10; n++)
				if (net > (float) log[n].l_netpoints / scene[log[n].l_gamenum].ship[log[n].l_shipnum].specs->pts) {
					(void) fwrite((char *)log,
						sizeof (struct logs), n, fp);
					(void) strcpy(temp.l_name, capn);
					temp.l_uid = getuid();
					temp.l_shipnum = player;
					temp.l_gamenum = game;
					temp.l_netpoints = mf->points;
					(void) fwrite((char *)&temp,
						sizeof temp, 1, fp);
					(void) fwrite((char *)&log[n],
						sizeof (struct logs), 9-n, fp);
					break;
				}
			(void) fclose(fp);
		}
		Write(W_CAPTAIN, ms, 1, (int)" ", 0, 0, 0);
		Write(W_PEOPLE, SHIP(0), 0, cc->people - 1, 0, 0, 0);
		if (done_curses) {
			screen();
			Signal("It looks like you've had it!",
				(struct ship *)0);
			switch (conditions) {
			case LEAVE_QUIT:
				break;
			case LEAVE_CAPTURED:
				Signal("Your ship was captured.",
					(struct ship *)0);
				break;
			case LEAVE_HURRICAN:
				Signal("Hurricane!  All ships destroyed.",
					(struct ship *)0);
				break;
			case LEAVE_DRIVER:
				Signal("The driver died.", (struct ship *)0);
				break;
			default:
				Signal("A funny thing happened (%d).",
					(struct ship *)0, conditions);
			}
		} else {
			if (conditions == LEAVE_DRIVER)
				printf("The driver died.\n");
			else
				printf("leave: unknown code %d\n", conditions);
		}
		(void) fclose(syncfile);
	}
	if (done_curses) {
		lastline();
		nocrmode();
		echo();
		endwin();
	}
	exit(0);
}

choke()
{
	leave(LEAVE_QUIT);
}

child()
{
	union wait status;
	int pid;

	(void) signal(SIGCHLD, SIG_IGN);
	do {
		pid = wait3(&status, WNOHANG|WUNTRACED, (struct rusage *)0);
		if (pid < 0 || pid > 0 && !WIFSTOPPED(status))
			leave(LEAVE_DRIVER);
	} while (pid != 0);
	(void) signal(SIGCHLD, child);
}
Commit	Line	Data
c77f0542	1	#ifndef lint
b3a57661	2	static char *sccsid = "@(#)pl_1.c 1.9 83/07/20";
c77f0542	3	#endif
7fc06086	4
c77f0542 CL	5	#include "player.h"
c77f0542 CL	6	#include <sys/types.h>
b3a57661	7	#include <wait.h>
c77f0542	8
b3a57661	9	int choke(), child();
c77f0542	10
b3a57661 EW	11	/ARGSUSED/
	12	main(argc, argv)
	13	int argc;
	14	char **argv;
c77f0542	15	{
b3a57661 EW	16	register struct ship *sp;
	17	int aheadfirst, ma;
	18	int ta;
	19	char nodrive = 0, randomize = 0, debug = 0;
	20	char *badstring();
	21	extern char _sobuf[];
c77f0542	22
b3a57661	23	setbuf(stdout, _sobuf);
7fc06086	24
b3a57661 EW	25	while (++argv && *argv == '-')
	26	switch (++argv) {
	27	case 'd':
	28	nodrive = 1;
	29	break;
	30	case 'D':
	31	debug++;
	32	break;
	33	case 'x':
	34	randomize = 1;
	35	break;
	36	default:
	37	printf("Unknown flag '%s'\n",*argv);
	38	break;
7fc06086	39	}
b3a57661 EW	40	if (*argv)
	41	game = atoi(*argv);
	42	else
	43	game = -1;
	44	initialize(nodrive, randomize, debug);
	45	Signal("Aye aye, Sir", (struct ship *)0);
	46	for (;;) {
	47	prompt();
	48	switch (sgetch(0)) {
	49	case 'm':
	50	if (mc->crew3 && !snagged(ms)
	51	&& windspeed != 0) {
	52	ta = maxturns(ms);
	53	aheadfirst = ta & 0100000;
	54	ma = maxmove(ms, mf->dir, 0);
	55	ta &= 077777;
	56	acceptmove(ma, ta, aheadfirst);
	57	} else
	58	Signal("Unable to move", (struct ship *)0);
	59	break;
	60	case 's':
	61	acceptsignal();
	62	break;
	63	case 'g':
	64	grapungrap();
	65	break;
	66	case 'u':
	67	unfoulplayer();
	68	break;
	69	case 'v':
	70	Signal("%s", (struct ship *)0, version);
	71	break;
	72	case 'b':
	73	doboarding();
	74	break;
	75	case 'f':
	76	acceptcombat();
	77	break;
	78	case 'l':
	79	loadplayer();
	80	break;
	81	case 'c':
	82	changesail();
	83	break;
	84	case 'r':
	85	repair();
	86	break;
	87	case 'B':
	88	Signal("'Hands to stations!'", (struct ship *)0);
	89	unboard(ms, ms, 1); /* cancel DBP's */
	90	unboard(ms, ms, 0); /* cancel offense */
	91	break;
	92	case '\f':
	93	centerview();
	94	board();
7fc06086	95	screen();
b3a57661 EW	96	break;
	97	case 'L':
	98	mf->loadL = L_EMPTY;
	99	mf->loadR = L_EMPTY;
	100	mf->readyL = R_EMPTY;
	101	mf->readyR = R_EMPTY;
	102	Signal("Broadsides unloaded", (struct ship *)0);
	103	break;
	104	case 'q':
	105	Signal("Type 'Q' to quit", (struct ship *)0);
	106	break;
	107	case 'Q':
	108	leave(LEAVE_QUIT);
	109	break;
	110	case 'I':
	111	foreachship(sp)
	112	eyeball(sp);
	113	break;
	114	case 'i':
	115	eyeball(closestenemy(ms, 0, 1));
	116	break;
	117	case 'C':
	118	centerview();
	119	draw_view();
	120	break;
	121	case 'U':
	122	upview();
	123	draw_view();
	124	break;
	125	case 'D':
	126	case 'N':
	127	downview();
	128	draw_view();
	129	break;
	130	case 'H':
	131	leftview();
	132	draw_view();
	133	break;
	134	case 'J':
	135	rightview();
	136	draw_view();
	137	break;
	138	case 'F':
	139	lookout();
	140	break;
	141	case 'S':
	142	dont_adjust = !dont_adjust;
	143	break;
7fc06086	144	}
b3a57661 EW	145	signalflags();
b3a57661 EW	146	lost();
c77f0542	147	}
c77f0542 CL	148	}
c77f0542 CL	149
bba7bfeb BJ	150	initialize(nodriver, randomize, debug)
bba7bfeb BJ	151	char randomize, nodriver, debug;
c77f0542	152	{
b3a57661 EW	153	register struct File *fp;
	154	register struct ship *sp;
	155	char captain[80], file[25];
7fc06086	156	char message[60];
b3a57661	157	int load;
7fc06086	158	int people = 0;
7fc06086	159	register int n;
7fc06086	160	char *nameptr;
b3a57661	161	int nat[NNATION];
c77f0542	162
b3a57661	163	(void) srand(getpid());
c77f0542	164
7fc06086	165	if (game < 0) {
b3a57661 EW	166	(void) puts("Choose a scenario:\n");
	167	(void) puts("\n\tNUMBER\tSHIPS\tIN PLAY\tTITLE");
	168	for (n = 0; n < NSCENE; n++) {
7fc06086	169	printf("\t%d):\t%d", n, scene[n].vessels);
b3a57661	170	(void) sprintf(file, "/tmp/.%d", n);
7fc06086 BJ	171	if (access(file, 0) >= 0)
	172	printf("\tYES");
	173	else
	174	printf("\tno");
	175	printf("\t%s\n", scene[n].name);
	176	}
c77f0542	177	reprint:
7fc06086	178	printf("\nScenario number? ");
b3a57661 EW	179	(void) fflush(stdout);
	180	(void) scanf("%d", &game);
	181	while (getchar() != '\n')
	182	;
7fc06086	183	}
b3a57661 EW	184	if (game < 0 \|\| game >= NSCENE) {
b3a57661 EW	185	(void) puts("Very funny.");
7fc06086 BJ	186	exit(1);
7fc06086 BJ	187	}
b3a57661 EW	188	cc = &scene[game];
	189	ls = cc->ship + cc->vessels;
	190
	191	(void) sprintf(file, "/tmp/.%d", game);
7fc06086 BJ	192	if (access(file, 0) < 0) {
7fc06086 BJ	193	int omask;
a2294d92	194	#ifdef SETUID
7fc06086	195	omask = umask(077);
a2294d92	196	#else
7fc06086	197	omask = umask(011);
a2294d92	198	#endif
7fc06086	199	syncfile = fopen(file, "w+");
b3a57661	200	(void) umask(omask);
7fc06086 BJ	201	} else {
	202	syncfile = fopen(file, "r+");
	203	people = 1;
c77f0542	204	}
7fc06086	205	lastsync = 0;
b3a57661 EW	206
	207	for (n = 0; n < NNATION; n++)
	208	nat[n] = 0;
	209	foreachship(sp) {
	210	sp->file = (struct File *) calloc(1, sizeof (struct File));
	211	if (sp->file == NULL) {
	212	(void) puts("OUT OF MEMORY");
7fc06086 BJ	213	exit(0);
7fc06086 BJ	214	}
b3a57661	215	sp->file->stern = nat[sp->nationality]++;
c77f0542	216	}
7fc06086	217	if (people > 0) {
b3a57661 EW	218	(void) puts("Synchronizing with the other players...");
	219	(void) fflush(stdout);
	220	Sync();
	221	foreachship(sp) {
	222	if (sp->file->captain[0]
	223	\|\| sp->file->struck \|\| sp->file->captured != 0)
	224	break;
7fc06086	225	}
b3a57661 EW	226	if (sp >= ls) {
	227	(void) puts("All ships taken in that scenario.");
	228	foreachship(sp)
	229	free((char *)sp->file);
7fc06086	230	people = 0;
b3a57661	231	(void) fclose(syncfile);
7fc06086 BJ	232	goto reprint;
7fc06086 BJ	233	}
b3a57661	234	player = sp - cc->ship;
7fc06086 BJ	235	} else
7fc06086 BJ	236	player = 0;
b3a57661	237
7fc06086	238	while (randomize) {
b3a57661 EW	239	printf("%s\n\n", cc->name);
	240	foreachship(sp) {
	241	printf(" %2d: %-10s %-15s (%-2d pts) %s\n",
	242	sp - SHIP(0),
	243	countryname[sp->nationality],
	244	sp->shipname,
	245	sp->specs->pts,
	246	saywhat(sp, 1));
7fc06086	247	}
b3a57661 EW	248	printf("\nWhich ship do you want (0-%d)? ", cc->vessels-1);
	249	(void) fflush(stdout);
	250	if (scanf("%d", &player) != 1 \|\| player < 0
	251	\|\| player >= cc->vessels) {
	252	while (getchar() != '\n')
	253	;
	254	(void) puts("Say what?");
7fc06086	255	} else {
b3a57661 EW	256	while (getchar() != '\n')
	257	;
	258	Sync();
	259	fp = SHIP(player)->file;
	260	if (fp->captain[0] \|\| fp->struck \|\| fp->captured != 0)
	261	(void) puts("Sorry, that ship is taken.");
7fc06086 BJ	262	else
	263	break;
	264	}
c77f0542	265	}
7fc06086	266
b3a57661 EW	267	ms = SHIP(player);
	268	mf = ms->file;
	269	mc = ms->specs;
7fc06086	270
b3a57661 EW	271	(void) signal(SIGHUP, choke);
	272	(void) signal(SIGINT, choke);
	273	(void) signal(SIGQUIT, choke);
	274	(void) signal(SIGCHLD, child);
	275
	276	Write(W_CAPTAIN, ms, 1, (int) "begin", 0, 0, 0);
7fc06086	277	if (people)
b3a57661 EW	278	Write(W_PEOPLE, SHIP(0), 0, cc->people + 1, 0, 0, 0);
	279	Sync();
	280	printf("Your ship is the %s, a %d gun %s (%s crew).\n",
	281	ms->shipname, mc->guns, classname[mc->class],
	282	qualname[mc->qual]);
	283	if ((nameptr = (char ) getenv("SAILNAME")) && nameptr)
	284	(void) strncpy(captain, nameptr, sizeof captain);
7fc06086	285	else {
b3a57661 EW	286	(void) printf("Your name, Captain? ");
	287	(void) fflush(stdout);
	288	(void) gets(captain);
	289	if (!*captain)
	290	(void) strcpy(captain, "no name");
c77f0542	291	}
b3a57661 EW	292	captain[sizeof captain - 1] = '\0';
	293	for (n = 0; n < 2; n++) {
	294	printf("\nInitial broadside %s (grape, chain, round, double): ",
	295	n ? "right" : "left");
	296	(void) fflush(stdout);
	297	(void) scanf("%s", file);
	298	switch (*file) {
7fc06086	299	case 'g':
b3a57661	300	load = L_GRAPE;
7fc06086 BJ	301	break;
7fc06086 BJ	302	case 'c':
b3a57661	303	load = L_CHAIN;
7fc06086 BJ	304	break;
7fc06086 BJ	305	case 'r':
b3a57661	306	load = L_ROUND;
7fc06086 BJ	307	break;
7fc06086 BJ	308	case 'd':
b3a57661	309	load = L_DOUBLE;
7fc06086	310	break;
b3a57661 EW	311	default:
b3a57661 EW	312	load = L_ROUND;
7fc06086	313	}
b3a57661 EW	314	if (n) {
	315	mf->loadR = load;
	316	mf->readyR = R_LOADED\|R_INITIAL;
7fc06086	317	} else {
b3a57661 EW	318	mf->loadL = load;
b3a57661 EW	319	mf->readyL = R_LOADED\|R_INITIAL;
7fc06086	320	}
c77f0542	321	}
b3a57661	322	Write(W_CAPTAIN, ms, 1, (int)captain, 0, 0, 0);
7fc06086 BJ	323	if (!people && !nodriver) {
7fc06086 BJ	324	char num[10];
b3a57661	325	(void) sprintf(num, "%d", game);
7fc06086	326	if (!fork()) {
bba7bfeb BJ	327	if (debug)
	328	execl(DEBUGDRIVER, DRIVERNAME, num, 0);
	329	else
	330	execl(DRIVER, DRIVERNAME, num, 0);
7fc06086	331	perror(DRIVER);
7fc06086 BJ	332	exit(1);
7fc06086 BJ	333	}
c77f0542	334	}
7fc06086	335
b3a57661	336	initscreen();
7fc06086 BJ	337
7fc06086 BJ	338	board();
b3a57661 EW	339	(void) sprintf(message, "Captain %s assuming command", captain);
b3a57661 EW	340	Write(W_SIGNAL, ms, 1, (int)message, 0, 0, 0);
7fc06086	341
b3a57661	342	newturn();
c77f0542 CL	343	}
c77f0542 CL	344
b3a57661 EW	345	leave(conditions)
b3a57661 EW	346	int conditions;
c77f0542	347	{
b3a57661 EW	348	FILE *fp;
	349	int people;
	350	float net;
	351	char * capn;
	352	char message[60];
	353	register int n;
	354	struct logs log[10], temp;
c77f0542	355
b3a57661 EW	356	(void) signal(SIGHUP, SIG_IGN);
	357	(void) signal(SIGINT, SIG_IGN);
	358	(void) signal(SIGQUIT, SIG_IGN);
	359	(void) signal(SIGALRM, SIG_IGN);
	360	(void) signal(SIGCHLD, SIG_IGN);
c77f0542	361
b3a57661 EW	362	if (conditions != -1) {
	363	capn = mf->captain;
	364	(void) sprintf(message,"Captain %s relinquishing.",capn);
	365	Write(W_SIGNAL, ms, 1, (int)message, 0, 0, 0);
c77f0542	366
b3a57661 EW	367	if (fp = fopen(LOGFILE, "r+")) {
	368	net = (float)mf->points / mc->pts;
	369	people = getw(fp);
	370	n = fread((char *)log, sizeof(struct logs), 10, fp);
	371	for (; n < 10; n++)
	372	log[n].l_name[0]
	373	= log[n].l_uid
	374	= log[n].l_shipnum
	375	= log[n].l_gamenum
	376	= log[n].l_netpoints = 0;
	377	rewind(fp);
	378	if (people < 0)
	379	(void) putw(1, fp);
	380	else
	381	(void) putw(people + 1, fp);
	382	for (n = 0; n < 10; n++)
	383	if (net > (float) log[n].l_netpoints / scene[log[n].l_gamenum].ship[log[n].l_shipnum].specs->pts) {
	384	(void) fwrite((char *)log,
	385	sizeof (struct logs), n, fp);
	386	(void) strcpy(temp.l_name, capn);
	387	temp.l_uid = getuid();
	388	temp.l_shipnum = player;
	389	temp.l_gamenum = game;
	390	temp.l_netpoints = mf->points;
	391	(void) fwrite((char *)&temp,
	392	sizeof temp, 1, fp);
	393	(void) fwrite((char *)&log[n],
	394	sizeof (struct logs), 9-n, fp);
	395	break;
	396	}
	397	(void) fclose(fp);
7fc06086	398	}
b3a57661 EW	399	Write(W_CAPTAIN, ms, 1, (int)" ", 0, 0, 0);
	400	Write(W_PEOPLE, SHIP(0), 0, cc->people - 1, 0, 0, 0);
	401	if (done_curses) {
	402	screen();
	403	Signal("It looks like you've had it!",
	404	(struct ship *)0);
	405	switch (conditions) {
	406	case LEAVE_QUIT:
	407	break;
	408	case LEAVE_CAPTURED:
	409	Signal("Your ship was captured.",
	410	(struct ship *)0);
	411	break;
	412	case LEAVE_HURRICAN:
	413	Signal("Hurricane! All ships destroyed.",
	414	(struct ship *)0);
	415	break;
	416	case LEAVE_DRIVER:
	417	Signal("The driver died.", (struct ship *)0);
	418	break;
	419	default:
	420	Signal("A funny thing happened (%d).",
	421	(struct ship *)0, conditions);
	422	}
	423	} else {
	424	if (conditions == LEAVE_DRIVER)
	425	printf("The driver died.\n");
	426	else
	427	printf("leave: unknown code %d\n", conditions);
7fc06086	428	}
b3a57661 EW	429	(void) fclose(syncfile);
	430	}
	431	if (done_curses) {
	432	lastline();
	433	nocrmode();
	434	echo();
	435	endwin();
c77f0542	436	}
b3a57661	437	exit(0);
7fc06086	438	}
c77f0542	439
b3a57661	440	choke()
c77f0542	441	{
b3a57661	442	leave(LEAVE_QUIT);
c77f0542 CL	443	}
c77f0542 CL	444
b3a57661	445	child()
c77f0542	446	{
b3a57661 EW	447	union wait status;
b3a57661 EW	448	int pid;
c77f0542	449
b3a57661 EW	450	(void) signal(SIGCHLD, SIG_IGN);
	451	do {
	452	pid = wait3(&status, WNOHANG\|WUNTRACED, (struct rusage *)0);
	453	if (pid < 0 \|\| pid > 0 && !WIFSTOPPED(status))
	454	leave(LEAVE_DRIVER);
	455	} while (pid != 0);
	456	(void) signal(SIGCHLD, child);
c77f0542	457	}