main.c revision 1.4 1 /* $NetBSD: main.c,v 1.4 1995/04/27 21:22:25 mycroft Exp $ */
2
3 /*-
4 * Copyright (c) 1990, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Ed James.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright (c) 1987 by Ed James, UC Berkeley. All rights reserved.
41 *
42 * Copy permission is hereby granted provided that this notice is
43 * retained on all partial or complete copies.
44 *
45 * For more info on this and all of my stuff, mail edjames (at) berkeley.edu.
46 */
47
48 #ifndef lint
49 static char copyright[] =
50 "@(#) Copyright (c) 1990, 1993\n\
51 The Regents of the University of California. All rights reserved.\n";
52 #endif /* not lint */
53
54 #ifndef lint
55 #if 0
56 static char sccsid[] = "@(#)main.c 8.1 (Berkeley) 5/31/93";
57 #else
58 static char rcsid[] = "$NetBSD: main.c,v 1.4 1995/04/27 21:22:25 mycroft Exp $";
59 #endif
60 #endif /* not lint */
61
62 #include "include.h"
63 #include "pathnames.h"
64
65 main(ac, av)
66 char *av[];
67 {
68 int seed;
69 int f_usage = 0, f_list = 0, f_showscore = 0;
70 int f_printpath = 0;
71 char *file = NULL;
72 char *name, *ptr;
73 struct sigaction sa;
74 #ifdef BSD
75 struct itimerval itv;
76 #endif
77 extern char *default_game(), *okay_game();
78 extern void log_score(), quit(), update();
79
80 start_time = seed = time(0);
81
82 name = *av++;
83 while (*av) {
84 #ifndef SAVEDASH
85 if (**av == '-')
86 *++*av;
87 else
88 break;
89 #endif
90 ptr = *av++;
91 while (*ptr) {
92 switch (*ptr) {
93 case '?':
94 case 'u':
95 f_usage++;
96 break;
97 case 'l':
98 f_list++;
99 break;
100 case 's':
101 case 't':
102 f_showscore++;
103 break;
104 case 'p':
105 f_printpath++;
106 break;
107 case 'r':
108 seed = atoi(*av);
109 av++;
110 break;
111 case 'f':
112 case 'g':
113 file = *av;
114 av++;
115 break;
116 default:
117 fprintf(stderr, "Unknown option '%c'\n", *ptr,
118 name);
119 f_usage++;
120 break;
121 }
122 ptr++;
123 }
124 }
125 srandom(seed);
126
127 if (f_usage)
128 fprintf(stderr,
129 "Usage: %s -[u?lstp] [-[gf] game_name] [-r random seed]\n",
130 name);
131 if (f_showscore)
132 log_score(1);
133 if (f_list)
134 list_games();
135 if (f_printpath) {
136 char buf[100];
137
138 strcpy(buf, _PATH_GAMES);
139 buf[strlen(buf) - 1] = '\0';
140 puts(buf);
141 }
142
143 if (f_usage || f_showscore || f_list || f_printpath)
144 exit(0);
145
146 if (file == NULL)
147 file = default_game();
148 else
149 file = okay_game(file);
150
151 if (file == NULL || read_file(file) < 0)
152 exit(1);
153
154 init_gr();
155 setup_screen(sp);
156
157 addplane();
158
159 signal(SIGINT, quit);
160 signal(SIGQUIT, quit);
161 #ifdef BSD
162 signal(SIGTSTP, SIG_IGN);
163 signal(SIGSTOP, SIG_IGN);
164 #endif
165 signal(SIGHUP, log_score);
166 signal(SIGTERM, log_score);
167
168 tcgetattr(fileno(stdin), &tty_start);
169 tty_new = tty_start;
170 tty_new.c_lflag &= ~(ICANON|ECHO);
171 tty_new.c_cc[VMIN] = 1;
172 tty_new.c_cc[VTIME] = 0;
173 tcsetattr(fileno(stdin), TCSADRAIN, &tty_new);
174
175 sa.sa_handler = update;
176 sigemptyset(&sa.sa_mask);
177 sigaddset(&sa.sa_mask, SIGALRM);
178 sigaddset(&sa.sa_mask, SIGINT);
179 sa.sa_flags = 0;
180 sigaction(SIGALRM, &sa, (struct sigaction *)0);
181
182 #ifdef BSD
183 itv.it_value.tv_sec = 0;
184 itv.it_value.tv_usec = 1;
185 itv.it_interval.tv_sec = sp->update_secs;
186 itv.it_interval.tv_usec = 0;
187 setitimer(ITIMER_REAL, &itv, NULL);
188 #endif
189 #ifdef SYSV
190 alarm(sp->update_secs);
191 #endif
192
193 for (;;) {
194 if (getcommand() != 1)
195 planewin();
196 else {
197 #ifdef BSD
198 itv.it_value.tv_sec = 0;
199 itv.it_value.tv_usec = 0;
200 setitimer(ITIMER_REAL, &itv, NULL);
201 #endif
202 #ifdef SYSV
203 alarm(0);
204 #endif
205
206 update();
207
208 #ifdef BSD
209 itv.it_value.tv_sec = sp->update_secs;
210 itv.it_value.tv_usec = 0;
211 itv.it_interval.tv_sec = sp->update_secs;
212 itv.it_interval.tv_usec = 0;
213 setitimer(ITIMER_REAL, &itv, NULL);
214 #endif
215 #ifdef SYSV
216 alarm(sp->update_secs);
217 #endif
218 }
219 }
220 }
221
222 read_file(s)
223 char *s;
224 {
225 extern FILE *yyin;
226 int retval;
227
228 file = s;
229 yyin = fopen(s, "r");
230 if (yyin == NULL) {
231 perror(s);
232 return (-1);
233 }
234 retval = yyparse();
235 fclose(yyin);
236
237 if (retval != 0)
238 return (-1);
239 else
240 return (0);
241 }
242
243 char *
244 default_game()
245 {
246 FILE *fp;
247 static char file[256];
248 char line[256], games[256];
249
250 strcpy(games, _PATH_GAMES);
251 strcat(games, GAMES);
252
253 if ((fp = fopen(games, "r")) == NULL) {
254 perror(games);
255 return (NULL);
256 }
257 if (fgets(line, sizeof(line), fp) == NULL) {
258 fprintf(stderr, "%s: no default game available\n", games);
259 return (NULL);
260 }
261 fclose(fp);
262 line[strlen(line) - 1] = '\0';
263 strcpy(file, _PATH_GAMES);
264 strcat(file, line);
265 return (file);
266 }
267
268 char *
269 okay_game(s)
270 char *s;
271 {
272 FILE *fp;
273 static char file[256];
274 char *ret = NULL, line[256], games[256];
275
276 strcpy(games, _PATH_GAMES);
277 strcat(games, GAMES);
278
279 if ((fp = fopen(games, "r")) == NULL) {
280 perror(games);
281 return (NULL);
282 }
283 while (fgets(line, sizeof(line), fp) != NULL) {
284 line[strlen(line) - 1] = '\0';
285 if (strcmp(s, line) == 0) {
286 strcpy(file, _PATH_GAMES);
287 strcat(file, line);
288 ret = file;
289 break;
290 }
291 }
292 fclose(fp);
293 if (ret == NULL) {
294 test_mode = 1;
295 ret = s;
296 fprintf(stderr, "%s: %s: game not found\n", games, s);
297 fprintf(stderr, "Your score will not be logged.\n");
298 sleep(2); /* give the guy time to read it */
299 }
300 return (ret);
301 }
302
303 list_games()
304 {
305 FILE *fp;
306 char line[256], games[256];
307 int num_games = 0;
308
309 strcpy(games, _PATH_GAMES);
310 strcat(games, GAMES);
311
312 if ((fp = fopen(games, "r")) == NULL) {
313 perror(games);
314 return (-1);
315 }
316 puts("available games:");
317 while (fgets(line, sizeof(line), fp) != NULL) {
318 printf(" %s", line);
319 num_games++;
320 }
321 fclose(fp);
322 if (num_games == 0) {
323 fprintf(stderr, "%s: no games available\n", games);
324 return (-1);
325 }
326 return (0);
327 }
328