2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2017, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure, Markus Armbruster
6 * Empire 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 3 of the License, or
9 * (at your option) any later version.
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.
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
21 * See files README, COPYING and CREDITS in the root of the source
22 * tree for related information and legal notices. It is expected
23 * that future projects/authors will amend these files as needed.
27 * nxtitem.c: Get the next item from a list
29 * Known contributors to this file:
39 #include "prototypes.h"
45 nxtitem(struct nstr_item *np, void *ptr)
50 if (np->sel == NS_UNDEF)
52 gp = (struct empobj *)ptr;
54 if (np->sel == NS_LIST) {
56 if (np->index >= np->size)
58 np->cur = np->list[np->index];
59 } else if (np->sel == NS_CARGO) {
63 np->next = unit_cargo_next(np->type, np->next);
67 if (!ef_read(np->type, np->cur, ptr))
76 if (CANT_HAPPEN(!(ef_flags(np->type) & EFF_XY)))
78 if (!xyinrange(gp->x, gp->y, &np->range)) {
82 np->curdist = mapdist(gp->x, gp->y, np->cx, np->cy);
83 if (np->curdist > np->dist)
87 if (CANT_HAPPEN(!(ef_flags(np->type) & EFF_XY)))
89 if (!xyinrange(gp->x, gp->y, &np->range))
93 if (CANT_HAPPEN(!(ef_flags(np->type) & EFF_XY)))
95 if (xnorm(gp->x) != np->cx || ynorm(gp->y) != np->cy)
99 if (CANT_HAPPEN(!(ef_flags(np->type) & EFF_GROUP)))
101 if (np->group != gp->group)
108 if (selected && np->ncond) {
109 /* nstr_exec is expensive, so we do it last */
110 if (!nstr_exec(np->cond, np->ncond, ptr))