2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2015, 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 * nsc.h: Definitions for Empire conditionals
29 * Known contributors to this file:
31 * Markus Armbruster, 2004-2015
49 NSC_DOUBLE, /* double */
50 NSC_STRING, /* character string */
51 /* unpromoted types */
52 NSC_CHAR, /* signed char */
53 NSC_UCHAR, /* unsigned char */
54 NSC_SHORT, /* short */
55 NSC_USHORT, /* unsigned short */
57 NSC_XCOORD, /* coord that needs x conversion */
58 NSC_YCOORD, /* coord that needs y conversion */
59 NSC_TIME, /* time_t */
60 NSC_FLOAT, /* float */
61 NSC_STRINGY, /* char[] */
62 /* aliases, must match typedefs */
63 NSC_NATID = NSC_UCHAR /* nation id */
66 /* Is TYPE a promoted value type? */
67 #define NSC_IS_PROMOTED(type) (NSC_LONG <= (type) && (type) <= NSC_STRING)
69 /* Return nsc_type for a signed integer with the same size as TYPE. */
70 #define NSC_SITYPE(type) \
71 (sizeof(type) == 1 ? NSC_CHAR \
72 : sizeof(type) == sizeof(short) ? NSC_SHORT \
73 : sizeof(type) == sizeof(int) ? NSC_INT \
74 : sizeof(type) == sizeof(long) ? NSC_LONG \
80 NSC_VAL, /* evaluated value */
81 NSC_OFF, /* symbolic value: at offset in object */
82 NSC_ID /* unresolved identifier (internal use) */
86 * Value, possibly symbolic
88 * If type is NSC_NOTYPE, it's an error value.
89 * If category is NSC_VAL, the value is in val_as, and the type is a
91 * If category is NSC_OFF, the value is in a context object, and
92 * val_as.sym specifies how to get it, as follows.
93 * If sym.get is null, and type is NSC_STRINGY, the value is a string
94 * stored in sym.len characters starting at sym.offs in the context
95 * object. sym.idx must be zero. Ugly wart: if sym.len is one, the
96 * terminating null character may be omitted.
97 * Else if sym.get is null, and sym.len is zero, the value is in the
98 * context object at offset sym.off. sym.idx must be zero.
99 * Else if sym.get is null, sym.len is non-zero, and the value has
100 * index sym.idx in an array of sym.len elements at offset sym.off in
101 * in the context object. I.e. the value is at sym.off + sym.idx *
102 * SZ, where SZ is the size of the value.
103 * If sym.get is not null, you obtain the value by calling get() like
104 * VAL->get(VAL, NP, CTXO), where NP points to the country to use for
105 * coordinate translation and access control (null for none), and CTXO
106 * is the context object. get() either returns a null pointer and
107 * sets VAL->val_as to the value, as appropriate for the type. Or it
108 * returns another context object and sets VAL->val_as.sym for it.
111 enum nsc_type val_type; /* type of value */
112 enum nsc_cat val_cat; /* category of value */
114 struct { /* cat NSC_OFF */
118 void *(*get)(struct valstr *, struct natstr *, void *);
121 double dbl; /* cat NSC_VAL, type NSC_DOUBLE */
122 struct { /* cat NSC_VAL, type NSC_STRING, cat NSC_ID */
126 long lng; /* cat NSC_VAL, type NSC_LONG */
130 /* Compiled condition */
132 char operator; /* '<', '=', '>', '#' */
133 enum nsc_type optype; /* operator type */
134 struct valstr lft; /* left operand */
135 struct valstr rgt; /* right operand */
140 NS_UNDEF, /* error value */
141 NS_LIST, /* list of IDs */
142 NS_DIST, /* circular area */
143 NS_AREA, /* rectangular area */
144 NS_ALL, /* everything */
145 NS_XY, /* one sector area */
146 NS_GROUP, /* group, i.e. fleet, wing, army */
147 NS_CARGO /* loaded on the same carrier */
150 /* Sector iterator */
152 coord x, y; /* current x-y */
153 coord dx, dy; /* accumlated x,y travel */
154 int id; /* return value of sctoff */
155 enum ns_seltype type; /* selection type: NS_AREA or NS_DIST */
156 int curdist; /* NS_DIST: current range */
157 struct range range; /* area of coverage */
158 int dist; /* NS_DIST: range */
159 coord cx, cy; /* NS_DIST: center x-y */
160 int ncond; /* # of selection conditions */
161 struct nscstr cond[NS_NCOND]; /* selection conditions */
166 int cur; /* current item */
167 enum ns_seltype sel; /* selection type, any but NS_UNDEF */
168 int type; /* item type being selected */
169 int curdist; /* if NS_DIST, current item's dist */
170 struct range range; /* NS_AREA/NS_DIST: range selector */
171 int dist; /* NS_DIST: distance selector */
172 coord cx, cy; /* NS_DIST: center x-y, NS_XY: xy */
173 char group; /* NS_GROUP: fleet/wing match */
174 int next; /* NS_CARGO: next item */
175 int size; /* NS_LIST: size of list */
176 int index; /* NS_LIST: index */
177 int list[NS_LSIZE]; /* NS_LIST: item list */
178 int ncond; /* # of selection conditions */
179 struct nscstr cond[NS_NCOND]; /* selection conditions */
183 * Symbol binding: associate NAME with VALUE.
192 NSC_DEITY = bit(0), /* access restricted to deity */
193 NSC_EXTRA = bit(1), /* computable from other selectors */
194 NSC_CONST = bit(2), /* field cannot be changed */
195 NSC_BITS = bit(3), /* value consists of flag bits */
196 NSC_HIDDEN = bit(4) /* visibility depends on contact */
200 * Selector descriptor
202 * A selector describes an attribute of some context object.
203 * A selector with ca_type NSC_NOTYPE is invalid.
204 * If ca_get is null, the selector describes a datum of type ca_type
205 * at offset ca_offs in the context object.
206 * A datum of type NSC_STRINGY is a string stored in an array of
207 * ca_len characters. Ugly wart: if ca_len is one, the terminating
208 * null character may be omitted.
209 * A datum of any other type is either a scalar of that type (if
210 * ca_len is zero), or an array of ca_len elements of that type.
211 * If ca_get is not null, the selector is virtual. Values can be
212 * obtained by calling ca_get(VAL, NP, CTXO), where VAL has been
213 * initialized from the selector and an index by nstr_mksymval(),
214 * NP points to the country to use for coordinate translation and
215 * access control (null for none), and CTXO is the context object.
216 * See struct valstr for details.
217 * Because virtual selectors don't have a setter method, xundump must
218 * be made to ignore them, by setting NSC_EXTRA.
219 * If flag NSC_DEITY is set, only deities can use this selector.
220 * If flag NSC_EXTRA is set, xdump and xundump ignore this selector.
221 * If flag NSC_CONST is set, the datum can't be changed from its
222 * initial value (xundump obeys that).
223 * If flag NSC_HIDDEN is set, the selector must be an array of MAXNOC
224 * elements, indexed by country number, and the context object must be
225 * EF_NATION. Array elements are masked for contact when opt_HIDDEN
227 * If ca_table is not EF_BAD, the datum refers to that Empire table;
228 * ca_type must be an integer type. If flag NSC_BITS is set, the
229 * datum consists of flag bits, and the referred table must be a
230 * symbol table defining those bits.
235 enum nsc_type ca_type;
236 unsigned short ca_len;
237 void *(*ca_get)(struct valstr *, struct natstr *, void *);
242 /* Is CA an array? */
243 #define CA_IS_ARRAY(ca) ((ca)->ca_type != NSC_STRINGY && (ca)->ca_len != 0)
245 /* If CA is an array, return its length, else zero */
246 #define CA_ARRAY_LEN(ca) ((ca)->ca_type != NSC_STRINGY ? (ca)->ca_len : 0)
248 extern struct castr ichr_ca[];
249 extern struct castr pchr_ca[];
250 extern struct castr sect_ca[];
251 extern struct castr dchr_ca[];
252 extern struct castr ship_ca[];
253 extern struct castr mchr_ca[];
254 extern struct castr plane_ca[];
255 extern struct castr plchr_ca[];
256 extern struct castr land_ca[];
257 extern struct castr lchr_ca[];
258 extern struct castr nuke_ca[];
259 extern struct castr nchr_ca[];
260 extern struct castr loan_ca[];
261 extern struct castr news_ca[];
262 extern struct castr lost_ca[];
263 extern struct castr commodity_ca[];
264 extern struct castr trade_ca[];
265 extern struct castr nat_ca[];
266 extern struct castr cou_ca[];
267 extern struct castr realm_ca[];
268 extern struct castr game_ca[];
269 extern struct castr intrchr_ca[];
270 extern struct castr rpt_ca[];
271 extern struct castr update_ca[];
272 extern struct castr empfile_ca[];
273 extern struct castr symbol_ca[];
274 extern struct symbol ship_chr_flags[];
275 extern struct symbol plane_chr_flags[];
276 extern struct symbol land_chr_flags[];
277 extern struct symbol nuke_chr_flags[];
278 extern struct castr mdchr_ca[];
279 extern struct symbol meta_type[];
280 extern struct symbol meta_flags[];
281 extern struct symbol missions[];
282 extern struct symbol plane_flags[];
283 extern struct symbol retreat_flags[];
284 extern struct symbol nation_status[];
285 extern struct symbol nation_flags[];
286 extern struct symbol nation_rejects[];
287 extern struct symbol nation_relations[];
288 extern struct symbol level[];
289 extern struct symbol agreement_statuses[];
290 extern struct symbol plague_stages[];
291 extern struct symbol packing[];
292 extern struct symbol resources[];
293 extern struct symbol sector_navigation[];
295 /* src/lib/common/nstreval.c */
296 extern struct valstr *nstr_mksymval(struct valstr *, struct castr *, int);
297 extern struct valstr *nstr_eval(struct valstr *, natid, void *,
299 extern int nstr_promote(int);
300 extern char *symbol_by_value(int, struct symbol *);
301 extern int symbol_set_fmt(char *, size_t, int, struct symbol *, int);
302 /* src/lib/global/nsc.c */
303 extern void nsc_init(void);
304 /* src/lib/subs/nxtitem.c */
305 extern int nxtitem(struct nstr_item *, void *);
306 /* src/lib/subs/nxtsct.c */
307 extern int nxtsct(struct nstr_sect *, struct sctstr *);
308 /* src/lib/subs/snxtitem.c */
309 extern int snxtitem(struct nstr_item *, int, char *, char *);
310 extern void snxtitem_area(struct nstr_item *, int, struct range *);
311 extern void snxtitem_dist(struct nstr_item *, int, int, int, int);
312 extern void snxtitem_xy(struct nstr_item *, int, coord, coord);
313 extern void snxtitem_all(struct nstr_item *, int);
314 extern void snxtitem_group(struct nstr_item *, int, char);
315 extern void snxtitem_rewind(struct nstr_item *);
316 extern int snxtitem_list(struct nstr_item *, int, int *, int);
317 extern void snxtitem_cargo(struct nstr_item *, int, int, int);
318 extern int snxtitem_use_condarg(struct nstr_item *);
319 /* src/lib/subs/snxtsct.c */
320 extern int snxtsct(struct nstr_sect *, char *);
321 extern void snxtsct_area(struct nstr_sect *, struct range *);
322 extern void snxtsct_all(struct nstr_sect *);
323 extern void snxtsct_rewind(struct nstr_sect *);
324 extern void snxtsct_dist(struct nstr_sect *, coord, coord, int);
325 extern int snxtsct_use_condarg(struct nstr_sect *);
326 /* src/lib/subs/nstr.c */
327 extern int nstr_comp(struct nscstr *np, int len, int type, char *str);
328 extern char *nstr_comp_val(char *, struct valstr *, int);
329 extern int nstr_exec(struct nscstr *, int, void *);
330 /* src/lib/update/nxtitemp.c */
331 extern void *nxtitemp(struct nstr_item *);