main.c revision 1.5 1 1.5 cgd /* $NetBSD: main.c,v 1.5 1995/04/22 10:08:54 cgd Exp $ */
2 1.5 cgd
3 1.1 cgd /*
4 1.5 cgd * Copyright (c) 1980, 1993
5 1.5 cgd * 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.1 cgd #ifndef lint
37 1.5 cgd static char copyright[] =
38 1.5 cgd "@(#) Copyright (c) 1980, 1993\n\
39 1.5 cgd 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.5 cgd #if 0
44 1.5 cgd static char sccsid[] = "@(#)main.c 8.1 (Berkeley) 5/31/93";
45 1.5 cgd #else
46 1.5 cgd static char rcsid[] = "$NetBSD: main.c,v 1.5 1995/04/22 10:08:54 cgd Exp $";
47 1.5 cgd #endif
48 1.1 cgd #endif /* not lint */
49 1.1 cgd
50 1.1 cgd # include "robots.h"
51 1.1 cgd # include <signal.h>
52 1.1 cgd # include <ctype.h>
53 1.1 cgd
54 1.1 cgd main(ac, av)
55 1.1 cgd int ac;
56 1.1 cgd char **av;
57 1.1 cgd {
58 1.1 cgd register char *sp;
59 1.1 cgd register bool bad_arg;
60 1.1 cgd register bool show_only;
61 1.1 cgd extern char *Scorefile;
62 1.1 cgd extern int Max_per_uid;
63 1.1 cgd void quit();
64 1.1 cgd
65 1.1 cgd show_only = FALSE;
66 1.1 cgd if (ac > 1) {
67 1.1 cgd bad_arg = FALSE;
68 1.1 cgd for (++av; ac > 1 && *av[0]; av++, ac--)
69 1.1 cgd if (av[0][0] != '-')
70 1.1 cgd if (isdigit(av[0][0]))
71 1.1 cgd Max_per_uid = atoi(av[0]);
72 1.1 cgd else {
73 1.1 cgd setuid(getuid());
74 1.1 cgd setgid(getgid());
75 1.1 cgd Scorefile = av[0];
76 1.1 cgd # ifdef FANCY
77 1.1 cgd sp = rindex(Scorefile, '/');
78 1.1 cgd if (sp == NULL)
79 1.1 cgd sp = Scorefile;
80 1.1 cgd if (strcmp(sp, "pattern_roll") == 0)
81 1.1 cgd Pattern_roll = TRUE;
82 1.1 cgd else if (strcmp(sp, "stand_still") == 0)
83 1.1 cgd Stand_still = TRUE;
84 1.1 cgd if (Pattern_roll || Stand_still)
85 1.1 cgd Teleport = TRUE;
86 1.1 cgd # endif
87 1.1 cgd }
88 1.1 cgd else
89 1.1 cgd for (sp = &av[0][1]; *sp; sp++)
90 1.1 cgd switch (*sp) {
91 1.1 cgd case 's':
92 1.1 cgd show_only = TRUE;
93 1.1 cgd break;
94 1.1 cgd case 'r':
95 1.1 cgd Real_time = TRUE;
96 1.1 cgd break;
97 1.1 cgd case 'a':
98 1.1 cgd Start_level = 4;
99 1.1 cgd break;
100 1.1 cgd case 'j':
101 1.1 cgd Jump = TRUE;
102 1.1 cgd break;
103 1.1 cgd case 't':
104 1.1 cgd Teleport = TRUE;
105 1.1 cgd break;
106 1.1 cgd default:
107 1.1 cgd fprintf(stderr, "robots: uknown option: %c\n", *sp);
108 1.1 cgd bad_arg = TRUE;
109 1.1 cgd break;
110 1.1 cgd }
111 1.1 cgd if (bad_arg) {
112 1.1 cgd exit(1);
113 1.1 cgd /* NOTREACHED */
114 1.1 cgd }
115 1.1 cgd }
116 1.1 cgd
117 1.1 cgd if (show_only) {
118 1.1 cgd show_score();
119 1.1 cgd exit(0);
120 1.1 cgd /* NOTREACHED */
121 1.1 cgd }
122 1.1 cgd
123 1.1 cgd initscr();
124 1.1 cgd signal(SIGINT, quit);
125 1.1 cgd crmode();
126 1.1 cgd noecho();
127 1.1 cgd nonl();
128 1.1 cgd if (LINES != Y_SIZE || COLS != X_SIZE) {
129 1.1 cgd if (LINES < Y_SIZE || COLS < X_SIZE) {
130 1.1 cgd endwin();
131 1.1 cgd printf("Need at least a %dx%d screen\n",
132 1.1 cgd Y_SIZE, X_SIZE);
133 1.1 cgd exit(1);
134 1.1 cgd }
135 1.1 cgd delwin(stdscr);
136 1.1 cgd stdscr = newwin(Y_SIZE, X_SIZE, 0, 0);
137 1.1 cgd }
138 1.1 cgd
139 1.1 cgd srand(getpid());
140 1.1 cgd if (Real_time)
141 1.1 cgd signal(SIGALRM, move_robots);
142 1.1 cgd do {
143 1.1 cgd init_field();
144 1.1 cgd for (Level = Start_level; !Dead; Level++) {
145 1.1 cgd make_level();
146 1.1 cgd play_level();
147 1.1 cgd }
148 1.1 cgd move(My_pos.y, My_pos.x);
149 1.1 cgd printw("AARRrrgghhhh....");
150 1.1 cgd refresh();
151 1.1 cgd score();
152 1.1 cgd } while (another());
153 1.1 cgd quit();
154 1.1 cgd }
155 1.1 cgd
156 1.5 cgd void
157 1.5 cgd __cputchar(ch)
158 1.5 cgd int ch;
159 1.5 cgd {
160 1.5 cgd (void)putchar(ch);
161 1.5 cgd }
162 1.5 cgd
163 1.1 cgd /*
164 1.1 cgd * quit:
165 1.1 cgd * Leave the program elegantly.
166 1.1 cgd */
167 1.1 cgd void
168 1.1 cgd quit()
169 1.1 cgd {
170 1.3 mycroft endwin();
171 1.1 cgd exit(0);
172 1.1 cgd /* NOTREACHED */
173 1.1 cgd }
174 1.1 cgd
175 1.1 cgd /*
176 1.1 cgd * another:
177 1.1 cgd * See if another game is desired
178 1.1 cgd */
179 1.1 cgd another()
180 1.1 cgd {
181 1.1 cgd register int y;
182 1.1 cgd
183 1.1 cgd #ifdef FANCY
184 1.1 cgd if ((Stand_still || Pattern_roll) && !Newscore)
185 1.1 cgd return TRUE;
186 1.1 cgd #endif
187 1.1 cgd
188 1.1 cgd if (query("Another game?")) {
189 1.1 cgd if (Full_clear) {
190 1.1 cgd for (y = 1; y <= Num_scores; y++) {
191 1.1 cgd move(y, 1);
192 1.1 cgd clrtoeol();
193 1.1 cgd }
194 1.1 cgd refresh();
195 1.1 cgd }
196 1.1 cgd return TRUE;
197 1.1 cgd }
198 1.1 cgd return FALSE;
199 1.1 cgd }
200