Sync ACPICA with Intel's version 20210730.
[dragonfly.git] / games / battlestar / fly.c
1 /*      @(#)fly.c       8.2 (Berkeley) 4/28/95                          */
2 /*      $NetBSD: fly.c,v 1.15 2012/10/13 19:58:53 dholland Exp $        */
3
4 /*
5  * Copyright (c) 1983, 1993
6  *      The Regents of the University of California.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the University nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32
33 #include "extern.h"
34 #undef UP
35 #include <curses.h>
36 #include <assert.h>
37
38 #define MIDR  (LINES/2 - 1)
39 #define MIDC  (COLS/2 - 1)
40
41 static int     row, column;
42 static int     dr = 0, dc = 0;
43 static char    destroyed;
44 int     ourclock = 120;         /* time for all the flights in the game */
45 static char    cross = 0;
46 static sig_t   oldsig;
47
48 static void blast(void);
49 static void endfly(void);
50 static void moveenemy(int);
51 static void notarget(void);
52 static void screen(void);
53 static void succumb(int);
54 static void target(void);
55
56 static void
57 succumb(int dummy __unused)
58 {
59         if (oldsig == SIG_DFL) {
60                 endfly();
61                 exit(1);
62         }
63         if (oldsig != SIG_IGN) {
64                 endfly();
65                 (*oldsig) (SIGINT);
66         }
67 }
68
69 int
70 visual(void)
71 {
72         destroyed = 0;
73         if (initscr() == NULL) {
74                 puts("Whoops!  No more memory...");
75                 return (0);
76         }
77         oldsig = signal(SIGINT, succumb);
78         cbreak();
79         noecho();
80         screen();
81         row = rnd(LINES - 3) + 1;
82         column = rnd(COLS - 2) + 1;
83         moveenemy(0);
84         for (;;) {
85                 switch (getchar()) {
86
87                 case 'h':
88                 case 'r':
89                         dc = -1;
90                         fuel--;
91                         break;
92
93                 case 'H':
94                 case 'R':
95                         dc = -5;
96                         fuel -= 10;
97                         break;
98
99                 case 'l':
100                         dc = 1;
101                         fuel--;
102                         break;
103
104                 case 'L':
105                         dc = 5;
106                         fuel -= 10;
107                         break;
108
109                 case 'j':
110                 case 'u':
111                         dr = 1;
112                         fuel--;
113                         break;
114
115                 case 'J':
116                 case 'U':
117                         dr = 5;
118                         fuel -= 10;
119                         break;
120
121                 case 'k':
122                 case 'd':
123                         dr = -1;
124                         fuel--;
125                         break;
126
127                 case 'K':
128                 case 'D':
129                         dr = -5;
130                         fuel -= 10;
131                         break;
132
133                 case '+':
134                         if (cross) {
135                                 cross = 0;
136                                 notarget();
137                         } else
138                                 cross = 1;
139                         break;
140
141                 case ' ':
142                 case 'f':
143                         if (torps) {
144                                 torps -= 2;
145                                 blast();
146                                 if (row == MIDR && column < MIDC + 2 && 
147                                     column > MIDC - 2) {
148                                         destroyed = 1;
149                                         alarm(0);
150                                 }
151                         } else
152                                 mvaddstr(0, 0, "*** Out of torpedoes. ***");
153                         break;
154
155                 case 'q':
156                         endfly();
157                         return (0);
158
159                 default:
160                         mvaddstr(0, 26, "Commands = r,R,l,L,u,U,d,D,f,+,q");
161                         continue;
162
163                 case EOF:
164                         break;
165                 }
166                 if (destroyed) {
167                         endfly();
168                         return (1);
169                 }
170                 if (ourclock <= 0) {
171                         endfly();
172                         die();
173                 }
174         }
175 }
176
177 static void
178 screen(void)
179 {
180         int     r, c, n;
181         int     i;
182
183         clear();
184         i = rnd(100);
185         for (n = 0; n < i; n++) {
186                 r = rnd(LINES - 3) + 1;
187                 c = rnd(COLS);
188                 mvaddch(r, c, '.');
189         }
190         mvaddstr(LINES - 1 - 1, 21, "TORPEDOES           FUEL           TIME");
191         refresh();
192 }
193
194 static void
195 target(void)
196 {
197         int     n;
198
199         move(MIDR, MIDC - 10);
200         addstr("-------   +   -------");
201         for (n = MIDR - 4; n < MIDR - 1; n++) {
202                 mvaddch(n, MIDC, '|');
203                 mvaddch(n + 6, MIDC, '|');
204         }
205 }
206
207 static void
208 notarget(void)
209 {
210         int     n;
211
212         move(MIDR, MIDC - 10);
213         addstr("                     ");
214         for (n = MIDR - 4; n < MIDR - 1; n++) {
215                 mvaddch(n, MIDC, ' ');
216                 mvaddch(n + 6, MIDC, ' ');
217         }
218 }
219
220 static void
221 blast(void)
222 {
223         int     n;
224
225         alarm(0);
226         move(LINES - 1, 24);
227         printw("%3d", torps);
228         for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
229                 mvaddch(n, MIDC + MIDR - n, '/');
230                 mvaddch(n, MIDC - MIDR + n, '\\');
231                 refresh();
232         }
233         mvaddch(MIDR, MIDC, '*');
234         for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
235                 mvaddch(n, MIDC + MIDR - n, ' ');
236                 mvaddch(n, MIDC - MIDR + n, ' ');
237                 refresh();
238         }
239         alarm(1);
240 }
241
242 static void
243 moveenemy(int dummy __unused)
244 {
245         double  d;
246         int     oldr, oldc;
247
248         oldr = row;
249         oldc = column;
250         if (fuel > 0) {
251                 if (row + dr <= LINES - 3 && row + dr > 0)
252                         row += dr;
253                 if (column + dc < COLS - 1 && column + dc > 0)
254                         column += dc;
255         } else
256                 if (fuel < 0) {
257                         fuel = 0;
258                         mvaddstr(0, 60, "*** Out of fuel ***");
259                 }
260         d = (double) ((row - MIDR) * (row - MIDR) + (column - MIDC) * 
261             (column - MIDC));
262         if (d < 16) {
263                 row += (rnd(9) - 4) % (4 - abs(row - MIDR));
264                 column += (rnd(9) - 4) % (4 - abs(column - MIDC));
265         }
266         ourclock--;
267         mvaddstr(oldr, oldc - 1, "   ");
268         if (cross)
269                 target();
270         mvaddstr(row, column - 1, "/-\\");
271         move(LINES - 1, 24);
272         printw("%3d", torps);
273         move(LINES - 1, 42);
274         printw("%3d", fuel);
275         move(LINES - 1, 57);
276         printw("%3d", ourclock);
277         refresh();
278         signal(SIGALRM, moveenemy);
279         alarm(1);
280 }
281
282 static void
283 endfly(void)
284 {
285         alarm(0);
286         signal(SIGALRM, SIG_DFL);
287         mvcur(0, COLS - 1, LINES - 1, 0);
288         endwin();
289         signal(SIGTSTP, SIG_DFL);
290         signal(SIGINT, oldsig);
291 }