2 * Copyright (c) 1990, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
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. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * @(#)update.c 8.1 (Berkeley) 5/31/93
37 * $FreeBSD: src/games/atc/update.c,v 1.6 1999/11/30 03:48:21 billf Exp $
38 * $DragonFly: src/games/atc/update.c,v 1.2 2003/06/17 04:25:22 dillon Exp $
42 * Copyright (c) 1987 by Ed James, UC Berkeley. All rights reserved.
44 * Copy permission is hereby granted provided that this notice is
45 * retained on all partial or complete copies.
47 * For more info on this and all of my stuff, mail edjames@berkeley.edu.
57 int i
, dir_diff
, mask
, unclean
;
58 PLANE
*pp
, *p1
, *p2
, *p
;
61 mask
= sigblock(sigmask(SIGINT
));
65 signal(SIGALRM
, update
);
72 /* put some planes in the air */
75 for (pp
= ground
.head
; pp
!= NULL
; pp
= pp
->next
) {
76 if (pp
->new_altitude
> 0) {
85 /* do altitude change and basic movement */
86 for (pp
= air
.head
; pp
!= NULL
; pp
= pp
->next
) {
87 /* type 0 only move every other turn */
88 if (pp
->plane_type
== 0 && clck
& 1)
93 loser(pp
, "ran out of fuel.");
95 pp
->altitude
+= SGN(pp
->new_altitude
- pp
->altitude
);
98 dir_diff
= pp
->new_dir
- pp
->dir
;
100 * Allow for circle commands
102 if (pp
->new_dir
>= 0 && pp
->new_dir
< MAXDIR
) {
103 if (dir_diff
> MAXDIR
/2)
105 else if (dir_diff
< -(MAXDIR
/2))
110 else if (dir_diff
< -2)
113 if (pp
->dir
>= MAXDIR
)
115 else if (pp
->dir
< 0)
118 pp
->xpos
+= displacement
[pp
->dir
].dx
;
119 pp
->ypos
+= displacement
[pp
->dir
].dy
;
121 if (pp
->delayd
&& pp
->xpos
== sp
->beacon
[pp
->delayd_no
].x
&&
122 pp
->ypos
== sp
->beacon
[pp
->delayd_no
].y
) {
124 if (pp
->status
== S_UNMARKED
)
125 pp
->status
= S_MARKED
;
128 switch (pp
->dest_type
) {
130 if (pp
->xpos
== sp
->airport
[pp
->dest_no
].x
&&
131 pp
->ypos
== sp
->airport
[pp
->dest_no
].y
&&
133 if (pp
->dir
!= sp
->airport
[pp
->dest_no
].dir
)
134 loser(pp
, "landed in the wrong direction.");
142 if (pp
->xpos
== sp
->exit
[pp
->dest_no
].x
&&
143 pp
->ypos
== sp
->exit
[pp
->dest_no
].y
) {
144 if (pp
->altitude
!= 9)
145 loser(pp
, "exited at the wrong altitude.");
153 loser(pp
, "has a bizarre destination, get help!");
155 if (pp
->altitude
> 9)
156 /* "this is impossible" */
157 loser(pp
, "exceded flight ceiling.");
158 if (pp
->altitude
<= 0) {
159 for (i
= 0; i
< sp
->num_airports
; i
++)
160 if (pp
->xpos
== sp
->airport
[i
].x
&&
161 pp
->ypos
== sp
->airport
[i
].y
) {
162 if (pp
->dest_type
== T_AIRPORT
)
164 "landed at the wrong airport.");
167 "landed instead of exited.");
169 loser(pp
, "crashed on the ground.");
171 if (pp
->xpos
< 1 || pp
->xpos
>= sp
->width
- 1 ||
172 pp
->ypos
< 1 || pp
->ypos
>= sp
->height
- 1) {
173 for (i
= 0; i
< sp
->num_exits
; i
++)
174 if (pp
->xpos
== sp
->exit
[i
].x
&&
175 pp
->ypos
== sp
->exit
[i
].y
) {
176 if (pp
->dest_type
== T_EXIT
)
178 "exited via the wrong exit.");
181 "exited instead of landed.");
183 loser(pp
, "illegally left the flight arena.");
188 * Traverse the list once, deleting the planes that are gone.
190 for (pp
= air
.head
; pp
!= NULL
; pp
= p2
) {
192 if (pp
->status
== S_GONE
) {
200 for (p1
= air
.head
; p1
!= NULL
; p1
= p1
->next
)
201 for (p2
= p1
->next
; p2
!= NULL
; p2
= p2
->next
)
202 if (too_close(p1
, p2
, 1)) {
205 (void)sprintf(buf
, "collided with plane '%c'.",
210 * Check every other update. Actually, only add on even updates.
211 * Otherwise, prop jobs show up *on* entrance. Remember that
212 * we don't update props on odd updates.
214 if ((random() % sp
->newplane_time
) == 0)
221 alarm(sp
->update_secs
);
229 static char buf
[50], *bp
, *comm_start
;
234 (void)sprintf(bp
, "%c%d%c%c%d: ", name(pp
), pp
->altitude
,
235 (pp
->fuel
< LOWFUEL
) ? '*' : ' ',
236 (pp
->dest_type
== T_AIRPORT
) ? 'A' : 'E', pp
->dest_no
);
238 comm_start
= bp
= index(buf
, '\0');
239 if (pp
->altitude
== 0)
240 (void)sprintf(bp
, "Holding @ A%d", pp
->orig_no
);
241 else if (pp
->new_dir
>= MAXDIR
|| pp
->new_dir
< 0)
242 strcpy(bp
, "Circle");
243 else if (pp
->new_dir
!= pp
->dir
)
244 (void)sprintf(bp
, "%d", dir_deg(pp
->new_dir
));
246 bp
= index(buf
, '\0');
248 (void)sprintf(bp
, " @ B%d", pp
->delayd_no
);
250 bp
= index(buf
, '\0');
251 if (*comm_start
== '\0' &&
252 (pp
->status
== S_UNMARKED
|| pp
->status
== S_IGNORED
))
253 strcpy(bp
, "---------");
262 if (p
->plane_type
== 0)
263 return ('A' + p
->plane_no
);
265 return ('a' + p
->plane_no
);
270 if (l
< 'a' && l
> 'z' && l
< 'A' && l
> 'Z')
272 else if (l
>= 'a' && l
<= 'z')
280 static int last_plane
= -1;
282 int found
, start_plane
= last_plane
;
287 if (last_plane
>= 26)
289 for (pp
= air
.head
; pp
!= NULL
; pp
= pp
->next
)
290 if (pp
->plane_no
== last_plane
) {
295 for (pp
= ground
.head
; pp
!= NULL
; pp
= pp
->next
)
296 if (pp
->plane_no
== last_plane
) {
300 } while (found
&& last_plane
!= start_plane
);
301 if (last_plane
== start_plane
)
309 int i
, num_starts
, close
, rnd
, rnd2
, pnum
;
311 bzero(&p
, sizeof (p
));
314 p
.plane_type
= random() % 2;
316 num_starts
= sp
->num_exits
+ sp
->num_airports
;
317 rnd
= random() % num_starts
;
319 if (rnd
< sp
->num_exits
) {
320 p
.dest_type
= T_EXIT
;
323 p
.dest_type
= T_AIRPORT
;
324 p
.dest_no
= rnd
- sp
->num_exits
;
327 /* loop until we get a plane not near another */
328 for (i
= 0; i
< num_starts
; i
++) {
329 /* loop till we get a different start point */
330 while ((rnd2
= random() % num_starts
) == rnd
)
332 if (rnd2
< sp
->num_exits
) {
333 p
.orig_type
= T_EXIT
;
335 p
.xpos
= sp
->exit
[rnd2
].x
;
336 p
.ypos
= sp
->exit
[rnd2
].y
;
337 p
.new_dir
= p
.dir
= sp
->exit
[rnd2
].dir
;
338 p
.altitude
= p
.new_altitude
= 7;
340 for (p1
= air
.head
; p1
!= NULL
; p1
= p1
->next
)
341 if (too_close(p1
, &p
, 4)) {
348 p
.orig_type
= T_AIRPORT
;
349 p
.orig_no
= rnd2
- sp
->num_exits
;
350 p
.xpos
= sp
->airport
[p
.orig_no
].x
;
351 p
.ypos
= sp
->airport
[p
.orig_no
].y
;
352 p
.new_dir
= p
.dir
= sp
->airport
[p
.orig_no
].dir
;
353 p
.altitude
= p
.new_altitude
= 0;
355 p
.fuel
= sp
->width
+ sp
->height
;
366 bcopy(&p
, pp
, sizeof (p
));
368 if (pp
->orig_type
== T_AIRPORT
)
373 return (pp
->dest_type
);
382 for (pp
= air
.head
; pp
!= NULL
; pp
= pp
->next
)
383 if (pp
->plane_no
== n
)
385 for (pp
= ground
.head
; pp
!= NULL
; pp
= pp
->next
)
386 if (pp
->plane_no
== n
)
392 too_close(p1
, p2
, dist
)
393 const PLANE
*p1
, *p2
;
396 if (ABS(p1
->altitude
- p2
->altitude
) <= dist
&&
397 ABS(p1
->xpos
- p2
->xpos
) <= dist
&& ABS(p1
->ypos
- p2
->ypos
) <= dist
)
409 case 3: return (135);
410 case 4: return (180);
411 case 5: return (225);
412 case 6: return (270);
413 case 7: return (315);