xref: /dragonfly/games/mille/mille.c (revision 16dd80e4)
1 /*-
2  * Copyright (c) 1982, 1993
3  *	The Regents of the University of California.  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. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * $FreeBSD: src/games/mille/mille.c,v 1.10 1999/12/12 06:17:24 billf Exp $
30  *
31  * @(#) Copyright (c) 1982, 1993 The Regents of the University of California.  All rights reserved.
32  * @(#)mille.c	8.1 (Berkeley) 5/31/93
33  * $FreeBSD: src/games/mille/mille.c,v 1.10 1999/12/12 06:17:24 billf Exp $
34  */
35 
36 #include "mille.h"
37 #include <signal.h>
38 #include <term.h>
39 
40 /*
41  * @(#)mille.c	1.3 (Berkeley) 5/10/83
42  */
43 
44 static void usage (void) __dead2;
45 
46 int
47 main(int ac, char *av[])
48 {
49 	bool	restore;
50 
51 	/* Revoke setgid privileges */
52 	setgid(getgid());
53 
54 	if (strcmp(av[0], "a.out") == 0) {
55 		outf = fopen("q", "w");
56 		setbuf(outf, NULL);
57 		Debug = TRUE;
58 	}
59 	restore = FALSE;
60 	switch (ac) {
61 	  case 2:
62 		rest_f(av[1]);
63 		restore = TRUE;
64 	  case 1:
65 		break;
66 	  default:
67 		usage();
68 		/* NOTREACHED */
69 	}
70 	Play = PLAYER;
71 	initscr();
72 	delwin(stdscr);
73 	stdscr = Board = newwin(BOARD_Y, BOARD_X, 0, 0);
74 	Score = newwin(SCORE_Y, SCORE_X, 0, 40);
75 	Miles = newwin(MILES_Y, MILES_X, 17, 0);
76 #ifdef attron
77 	idlok(Board, TRUE);
78 	idlok(Score, TRUE);
79 	idlok(Miles, TRUE);
80 #endif
81 	leaveok(Score, TRUE);
82 	leaveok(Miles, TRUE);
83 	clearok(curscr, TRUE);
84 	srandomdev();
85 	cbreak();
86 	noecho();
87 	signal(SIGINT, rub);
88 	for (;;) {
89 		if (!restore || (Player[PLAYER].total >= 5000
90 		    || Player[COMP].total >= 5000)) {
91 			if (Player[COMP].total < Player[PLAYER].total)
92 				Player[PLAYER].games++;
93 			else if (Player[COMP].total > Player[PLAYER].total)
94 				Player[COMP].games++;
95 			Player[COMP].total = 0;
96 			Player[PLAYER].total = 0;
97 		}
98 		do {
99 			if (!restore)
100 				Handstart = Play = other(Handstart);
101 			if (!restore || On_exit) {
102 				shuffle();
103 				init();
104 			}
105 			newboard();
106 			if (restore)
107 				mvwaddstr(Score, ERR_Y, ERR_X, Initstr);
108 			prboard();
109 			do {
110 				domove();
111 				if (Finished)
112 					newscore();
113 				prboard();
114 			} while (!Finished);
115 			check_more();
116 			restore = On_exit = FALSE;
117 		} while (Player[COMP].total < 5000
118 		    && Player[PLAYER].total < 5000);
119 	}
120 }
121 
122 static void
123 usage(void)
124 {
125 	fprintf(stderr, "usage: mille [restore_file]\n");
126 	exit(1);
127 }
128 
129 /*
130  *	Routine to trap rubouts, and make sure they really want to
131  * quit.
132  */
133 void
134 rub(int sig __unused)
135 {
136 	signal(SIGINT, SIG_IGN);
137 	if (getyn(REALLYPROMPT))
138 		die(0);
139 	signal(SIGINT, rub);
140 }
141 
142 /*
143  *	Time to go beddy-by
144  */
145 void
146 die(int code)
147 {
148 
149 	signal(SIGINT, SIG_IGN);
150 	if (outf)
151 		fflush(outf);
152 	mvcur(0, COLS - 1, LINES - 1, 0);
153 	endwin();
154 	exit(code);
155 }
156