[unix-history] / games / mille / mille.c

/*
 * Copyright (c) 1982 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1982 Regents of the University of California.\n\
 All rights reserved.\n";
#endif /* not lint */

#ifndef lint
static char sccsid[] = "@(#)mille.c	5.5 (Berkeley) 2/28/91";
#endif /* not lint */

# include	"mille.h"
# include	<signal.h>
# ifdef attron
#	include	<term.h>
# endif	attron

/*
 * @(#)mille.c	1.3 (Berkeley) 5/10/83
 */

void	rub();

main(ac, av)
reg int		ac;
reg char	*av[]; {

	reg bool	restore;

	/* run as the user */
	setuid(getuid());

	if (strcmp(av[0], "a.out") == 0) {
		outf = fopen("q", "w");
		setbuf(outf, (char *)NULL);
		Debug = TRUE;
	}
	restore = FALSE;
	switch (ac) {
	  case 2:
		rest_f(av[1]);
		restore = TRUE;
	  case 1:
		break;
	  default:
		printf("usage: milles [ restore_file ]\n");
		exit(-1);
		/* NOTREACHED */
	}
	Play = PLAYER;
	initscr();
# ifdef attron
#	define	CA	cursor_address
# endif
	if (!CA) {
		printf("Sorry.  Need cursor addressing to play mille\n");
		exit(-1);
	}
	delwin(stdscr);
	stdscr = Board = newwin(BOARD_Y, BOARD_X, 0, 0);
	Score = newwin(SCORE_Y, SCORE_X, 0, 40);
	Miles = newwin(MILES_Y, MILES_X, 17, 0);
#ifdef attron
	idlok(Board, TRUE);
	idlok(Score, TRUE);
	idlok(Miles, TRUE);
#endif
	leaveok(Score, TRUE);
	leaveok(Miles, TRUE);
	clearok(curscr, TRUE);
# ifndef PROF
	srandom(getpid());
# else
	srandom(0);
# endif
	crmode();
	noecho();
	signal(SIGINT, rub);
	for (;;) {
		if (!restore || (Player[PLAYER].total >= 5000
		    || Player[COMP].total >= 5000)) {
			if (Player[COMP].total < Player[PLAYER].total)
				Player[PLAYER].games++;
			else if (Player[COMP].total > Player[PLAYER].total)
				Player[COMP].games++;
			Player[COMP].total = 0;
			Player[PLAYER].total = 0;
		}
		do {
			if (!restore)
				Handstart = Play = other(Handstart);
			if (!restore || On_exit) {
				shuffle();
				init();
			}
			newboard();
			if (restore)
				mvwaddstr(Score, ERR_Y, ERR_X, Initstr);
			prboard();
			do {
				domove();
				if (Finished)
					newscore();
				prboard();
			} while (!Finished);
			check_more();
			restore = On_exit = FALSE;
		} while (Player[COMP].total < 5000
		    && Player[PLAYER].total < 5000);
	}
}

/*
 *	Routine to trap rubouts, and make sure they really want to
 * quit.
 */
void
rub() {

	(void)signal(SIGINT, SIG_IGN);
	if (getyn(REALLYPROMPT))
		die();
	(void)signal(SIGINT, rub);
}

/*
 *	Time to go beddy-by
 */
die() {

	(void)signal(SIGINT, SIG_IGN);
	if (outf)
		fflush(outf);
	mvcur(0, COLS - 1, LINES - 1, 0);
	endwin();
	exit(1);
}
Commit	Line	Data
15637ed4 RG	1	/*
	2	* Copyright (c) 1982 Regents of the University of California.
	3	* All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
	13	* 3. All advertising materials mentioning features or use of this software
	14	* must display the following acknowledgement:
	15	* This product includes software developed by the University of
	16	* California, Berkeley and its contributors.
	17	* 4. Neither the name of the University nor the names of its contributors
	18	* may be used to endorse or promote products derived from this software
	19	* without specific prior written permission.
	20	*
	21	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	22	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	23	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	24	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	25	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	26	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	27	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	28	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	29	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	30	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	31	* SUCH DAMAGE.
	32	*/
	33
	34	#ifndef lint
	35	char copyright[] =
	36	"@(#) Copyright (c) 1982 Regents of the University of California.\n\
	37	All rights reserved.\n";
	38	#endif /* not lint */
	39
	40	#ifndef lint
	41	static char sccsid[] = "@(#)mille.c 5.5 (Berkeley) 2/28/91";
	42	#endif /* not lint */
	43
	44	# include "mille.h"
	45	# include <signal.h>
	46	# ifdef attron
	47	# include <term.h>
	48	# endif attron
	49
	50	/*
	51	* @(#)mille.c 1.3 (Berkeley) 5/10/83
	52	*/
	53
	54	void rub();
	55
	56	main(ac, av)
	57	reg int ac;
	58	reg char *av[]; {
	59
	60	reg bool restore;
	61
	62	/* run as the user */
	63	setuid(getuid());
	64
65	if (strcmp(av[0], "a.out") == 0) {
66	outf = fopen("q", "w");
67	setbuf(outf, (char *)NULL);
68	Debug = TRUE;
69	}
70	restore = FALSE;
71	switch (ac) {
72	case 2:
73	rest_f(av[1]);
74	restore = TRUE;
75	case 1:
76	break;
77	default:
78	printf("usage: milles [ restore_file ]\n");
79	exit(-1);
80	/* NOTREACHED */
81	}
82	Play = PLAYER;
83	initscr();
84	# ifdef attron
85	# define CA cursor_address
86	# endif
87	if (!CA) {
88	printf("Sorry. Need cursor addressing to play mille\n");
89	exit(-1);
90	}
91	delwin(stdscr);
92	stdscr = Board = newwin(BOARD_Y, BOARD_X, 0, 0);
93	Score = newwin(SCORE_Y, SCORE_X, 0, 40);
94	Miles = newwin(MILES_Y, MILES_X, 17, 0);
95	#ifdef attron
96	idlok(Board, TRUE);
97	idlok(Score, TRUE);
98	idlok(Miles, TRUE);
99	#endif
100	leaveok(Score, TRUE);
101	leaveok(Miles, TRUE);
102	clearok(curscr, TRUE);
103	# ifndef PROF
104	srandom(getpid());
105	# else
106	srandom(0);
107	# endif
108	crmode();
109	noecho();
110	signal(SIGINT, rub);
111	for (;;) {
112	if (!restore \|\| (Player[PLAYER].total >= 5000
113	\|\| Player[COMP].total >= 5000)) {
114	if (Player[COMP].total < Player[PLAYER].total)
115	Player[PLAYER].games++;
116	else if (Player[COMP].total > Player[PLAYER].total)
117	Player[COMP].games++;
118	Player[COMP].total = 0;
119	Player[PLAYER].total = 0;
120	}
121	do {
122	if (!restore)
123	Handstart = Play = other(Handstart);
124	if (!restore \|\| On_exit) {
125	shuffle();
126	init();
127	}
128	newboard();
129	if (restore)
130	mvwaddstr(Score, ERR_Y, ERR_X, Initstr);
131	prboard();
132	do {
133	domove();
134	if (Finished)
135	newscore();
136	prboard();
137	} while (!Finished);
138	check_more();
139	restore = On_exit = FALSE;
140	} while (Player[COMP].total < 5000
141	&& Player[PLAYER].total < 5000);
142	}
143	}
144
145	/*
146	* Routine to trap rubouts, and make sure they really want to
147	* quit.
148	*/
149	void
150	rub() {
151
152	(void)signal(SIGINT, SIG_IGN);
153	if (getyn(REALLYPROMPT))
154	die();
155	(void)signal(SIGINT, rub);
156	}
157
158	/*
159	* Time to go beddy-by
160	*/
161	die() {
162
163	(void)signal(SIGINT, SIG_IGN);
164	if (outf)
165	fflush(outf);
166	mvcur(0, COLS - 1, LINES - 1, 0);
167	endwin();
168	exit(1);
169	}
170