]> git.pond.sub.org Git - empserver/blob - src/lib/update/nxtitemp.c
Import of Empire 4.2.12
[empserver] / src / lib / update / nxtitemp.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                           Ken Stevens, Steve McClure
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 2 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, write to the Free Software
18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  *  ---
21  *
22  *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23  *  related information and legal notices. It is expected that any future
24  *  projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  nxtitemp.c: Get next item from list
29  * 
30  *  Known contributors to this file:
31  *     Dave Pare, 1989
32  */
33
34 #include "misc.h"
35 #include "var.h"
36 #include "xy.h"
37 #include "plane.h"
38 #include "ship.h"
39 #include "nuke.h"
40 #include "land.h"
41 #include "nsc.h"
42 #include "nat.h"
43 #include "file.h"
44 #include "genitem.h"
45 #include "player.h"
46 #include "update.h"
47 #include "gen.h"
48 #include "common.h"
49
50 s_char *
51 nxtitemp(struct nstr_item *np, int owner)
52 {
53         struct  genitem *gp;
54         int     selected;
55
56         if (np->sel == NS_UNDEF)
57                 return 0;
58         do {
59                 if (np->sel == NS_LIST) {
60                         np->index++;
61                         if (np->index >= np->size)
62                                 return 0;
63                         np->cur = np->list[np->index];
64                 } else {
65                         np->cur++;
66                 }
67                 gp = (struct genitem *)ef_ptr(np->type,np->cur);
68                 if (gp == (struct genitem *)0)
69                         return 0;
70
71                 selected = 1;
72                 switch (np->sel) {
73                 /*
74                  * This one won't work unless you're running in emp_player
75                  *
76                  */
77                 case NS_LIST:
78                         if ((np->flags & EFF_OWNER) && !owner)
79                                 selected = 0;
80                         break;
81                 case NS_ALL:
82                         /* XXX maybe combine NS_LIST and NS_ALL later */
83                         break;
84                 case NS_DIST:
85                         if (!xyinrange(gp->x, gp->y, &np->range)) {
86                                 selected = 0;
87                                 break;
88                         }
89                         np->curdist = mapdist((int)gp->x, (int)gp->y,
90                                 (int)np->cx, (int)np->cy);
91                         if (np->curdist > np->dist)
92                                 selected = 0;
93                         break;
94                 case NS_AREA:
95                         if (!xyinrange(gp->x, gp->y, &np->range))
96                                 selected = 0;
97                         if (gp->x == np->range.hx || gp->y == np->range.hy)
98                                 selected = 0;
99                         break;
100                 case NS_XY:
101                         if (xnorm(gp->x) != np->cx || ynorm(gp->y) != np->cy)
102                                 selected = 0;
103                         break;
104                 case NS_GROUP:
105                         if (np->group != gp->group)
106                                 selected = 0;
107                         break;
108                 default:
109                         logerror("nxtitemp: bad selector %d\n", np->sel);
110                         return 0;
111                 }
112                 if (selected && np->ncond) {
113                         /* nstr_exec is expensive, so we do it last */
114                         if (!nstr_exec(np->cond, np->ncond, (s_char *)gp, np->type))
115                                 selected = 0;
116                 }
117         } while (!selected);
118         return (s_char *)gp;
119 }