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