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