]> git.pond.sub.org Git - empserver/blob - src/lib/common/nsc.c
Move selector code from src/lib/global to src/lib/common
[empserver] / src / lib / common / nsc.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2008, 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 files README, COPYING and CREDITS in the root of the source
23  *  tree for related information and legal notices.  It is expected
24  *  that future projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  nsc.c: Empire selection global structures
29  * 
30  *  Known contributors to this file:
31  *     Markus Armbruster, 2004-2008
32  */
33
34 /*
35  * Convention: uid selector comes first.  Table TYPE has an uid
36  * selector if empfile[TYPE].cadef[0].ca_table == TYPE.
37  */
38
39 #include <config.h>
40
41 #include <stdlib.h>
42 #include "empobj.h"
43 #include "file.h"
44 #include "optlist.h"
45 #include "nsc.h"
46 #include "product.h"
47
48 static void *nsc_ver(struct valstr *, struct natstr *, void *);
49 static void *nsc_ver_maxnoc(struct valstr *, struct natstr *, void *);
50 static void *nsc_sct_terr(struct valstr *, struct natstr *, void *);
51 static void *nsc_pln_att(struct valstr *, struct natstr *, void *);
52 static void *nsc_pln_def(struct valstr *, struct natstr *, void *);
53 static void *nsc_lnd_att(struct valstr *, struct natstr *, void *);
54 static void *nsc_lnd_def(struct valstr *, struct natstr *, void *);
55 static void *nsc_lnd_vul(struct valstr *, struct natstr *, void *);
56 static void *nsc_lnd_spd(struct valstr *, struct natstr *, void *);
57 static void *nsc_lnd_vis(struct valstr *, struct natstr *, void *);
58 static void *nsc_lnd_frg(struct valstr *, struct natstr *, void *);
59 static void *nsc_lnd_acc(struct valstr *, struct natstr *, void *);
60 static void *nsc_lnd_dam(struct valstr *, struct natstr *, void *);
61 static void *nsc_lnd_aaf(struct valstr *, struct natstr *, void *);
62 static void *nsc_lchr(struct valstr *, struct natstr *, void *);
63
64 /* Ugly hack to improve legibility by avoid long lines */
65 #define fldoff(fld) offsetof(CURSTR, fld)
66 #define empobjoff(fld) offsetof(struct empobj, fld)
67
68 #define NSC_IELT(name, pfx, sfx, base, itype)   \
69     {sizeof(sfx) == 1 ? name : pfx sfx,         \
70      ((base) + (itype)*sizeof(unsigned short)), \
71      NSC_SHORT, 0, NULL, EF_BAD, 0}
72
73 #define NSC_IVEC(base, sfx)                     \
74 NSC_IELT("civil", "c", sfx, base, I_CIVIL),     \
75 NSC_IELT("milit", "m", sfx, base, I_MILIT),     \
76 NSC_IELT("shell", "s", sfx, base, I_SHELL),     \
77 NSC_IELT("gun", "g", sfx, base, I_GUN),         \
78 NSC_IELT("petrol", "p", sfx, base, I_PETROL),   \
79 NSC_IELT("iron", "i", sfx, base, I_IRON),       \
80 NSC_IELT("dust", "d", sfx, base, I_DUST),       \
81 NSC_IELT("bar", "b", sfx, base, I_BAR),         \
82 NSC_IELT("food", "f", sfx, base, I_FOOD),       \
83 NSC_IELT("oil", "o", sfx, base, I_OIL),         \
84 NSC_IELT("lcm", "l", sfx, base, I_LCM),         \
85 NSC_IELT("hcm", "h", sfx, base, I_HCM),         \
86 NSC_IELT("uw", "u", sfx, base, I_UW),           \
87 NSC_IELT("rad", "r", sfx, base, I_RAD)
88
89 struct castr ichr_ca[] = {
90 #define CURSTR struct ichrstr
91     {"uid", fldoff(i_uid), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0},
92     {"name", fldoff(i_name), NSC_STRING, 0, NULL, EF_BAD, 0},
93     {"mnem", fldoff(i_mnem), NSC_STRINGY, 1, NULL, EF_BAD, NSC_CONST},
94     {"value", fldoff(i_value), NSC_INT, 0, NULL, EF_BAD, 0},
95     {"sell", fldoff(i_sell), NSC_INT, 0, NULL, EF_BAD, 0},
96     {"lbs", fldoff(i_lbs), NSC_INT, 0, NULL, EF_BAD, 0},
97     {"pkg", fldoff(i_pkg), NSC_INT, NUMPKG, NULL, EF_BAD, 0},
98     {"melt_denom", fldoff(i_melt_denom), NSC_INT, 0, NULL, EF_BAD, 0},
99     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
100 #undef CURSTR
101 };
102
103 struct castr pchr_ca[] = {
104 #define CURSTR struct pchrstr
105     {"uid", fldoff(p_uid), NSC_INT, 0, NULL, EF_PRODUCT, 0},
106     {"name", fldoff(p_name), NSC_STRING, 0, NULL, EF_BAD, 0},
107     {"sname", fldoff(p_sname), NSC_STRING, 0, NULL, EF_BAD, NSC_CONST},
108     {"ctype", fldoff(p_ctype), NSC_SITYPE(i_type), MAXPRCON, NULL,
109      EF_ITEM, 0},
110     {"camt", fldoff(p_camt), NSC_USHORT, MAXPRCON, NULL, EF_BAD, 0},
111     {"type", fldoff(p_type), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0},
112     {"level", fldoff(p_level), NSC_INT, 0, NULL, EF_LEVEL, 0},
113     {"cost", fldoff(p_cost), NSC_INT, 0, NULL, EF_BAD, 0},
114     {"nrndx", fldoff(p_nrndx), NSC_INT, 0, NULL, EF_RESOURCES, 0},
115     {"nrdep", fldoff(p_nrdep), NSC_INT, 0, NULL, EF_BAD, 0},
116     {"nlndx", fldoff(p_nlndx), NSC_INT, 0, NULL, EF_LEVEL, 0},
117     {"nlmin", fldoff(p_nlmin), NSC_INT, 0, NULL, EF_BAD, 0},
118     {"nllag", fldoff(p_nllag), NSC_INT, 0, NULL, EF_BAD, 0},
119     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
120 #undef CURSTR
121 };
122
123 struct castr sect_ca[] = {
124 #define CURSTR struct sctstr
125     /* uid needs to be NSC_DEITY because it discloses true origin */
126     {"uid", fldoff(sct_uid), NSC_SHORT, 0, NULL,
127      EF_SECTOR, NSC_DEITY | NSC_EXTRA},
128     {"timestamp", fldoff(sct_timestamp), NSC_TIME, 0, NULL,
129      EF_BAD, NSC_EXTRA},
130     {"owner", fldoff(sct_own), NSC_NATID, 0, NULL, EF_NATION, 0},
131     {"xloc", fldoff(sct_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_CONST},
132     {"yloc", fldoff(sct_y), NSC_YCOORD, 0, NULL, EF_BAD, NSC_CONST},
133     {"des", fldoff(sct_type), NSC_CHAR, 0, NULL, EF_SECTOR_CHR, 0},
134     {"effic", fldoff(sct_effic), NSC_UCHAR, 0, NULL, EF_BAD, 0},
135     {"mobil", fldoff(sct_mobil), NSC_SHORT, 0, NULL, EF_BAD, 0},
136     {"loyal", fldoff(sct_loyal), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY},
137     {"terr", 0, NSC_UCHAR, 0, nsc_sct_terr, EF_BAD, NSC_EXTRA},
138     {"terr0", fldoff(sct_terr), NSC_UCHAR, 0, NULL, EF_BAD, 0},
139     {"terr1", fldoff(sct_terr1), NSC_UCHAR, 0, NULL, EF_BAD, 0},
140     {"terr2", fldoff(sct_terr2), NSC_UCHAR, 0, NULL, EF_BAD, 0},
141     {"terr3", fldoff(sct_terr3), NSC_UCHAR, 0, NULL, EF_BAD, 0},
142     {"dterr", fldoff(sct_dterr), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY},
143     {"xdist", fldoff(sct_dist_x), NSC_XCOORD, 0, NULL, EF_BAD, 0},
144     {"ydist", fldoff(sct_dist_y), NSC_YCOORD, 0, NULL, EF_BAD, 0},
145     {"avail", fldoff(sct_avail), NSC_SHORT, 0, NULL, EF_BAD, 0},
146     {"elev", fldoff(sct_elev), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
147     {"work", fldoff(sct_work), NSC_UCHAR, 0, NULL, EF_BAD, 0},
148     {"coastal", fldoff(sct_coastal), NSC_UCHAR, 0, NULL, EF_BAD, 0},
149     {"newdes", fldoff(sct_newtype), NSC_CHAR, 0, NULL, EF_SECTOR_CHR, 0},
150     {"min", fldoff(sct_min), NSC_UCHAR, 0, NULL, EF_BAD, 0},
151     {"gold", fldoff(sct_gmin), NSC_UCHAR, 0, NULL, EF_BAD, 0},
152     {"fert", fldoff(sct_fertil), NSC_UCHAR, 0, NULL, EF_BAD, 0},
153     {"ocontent", fldoff(sct_oil), NSC_UCHAR, 0, NULL, EF_BAD, 0},
154     {"uran", fldoff(sct_uran), NSC_UCHAR, 0, NULL, EF_BAD, 0},
155     {"oldown", fldoff(sct_oldown), NSC_NATID, 0, NULL, EF_NATION, 0},
156     {"off", fldoff(sct_off), NSC_UCHAR, 0, NULL, EF_BAD, 0},
157     NSC_IVEC(fldoff(sct_item), ""),
158     NSC_IVEC(fldoff(sct_dist), "_dist"),
159     NSC_IVEC(fldoff(sct_del), "_del"),
160     /* should let old owner access mines, but can't express that: */
161     {"mines", fldoff(sct_mines), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
162     {"pstage", fldoff(sct_pstage), NSC_SHORT, 0, NULL,
163      EF_PLAGUE_STAGES, NSC_DEITY},
164     {"ptime", fldoff(sct_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
165     {"che", fldoff(sct_che), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY},
166     {"che_target", fldoff(sct_che_target), NSC_NATID, 0, NULL,
167      EF_NATION, NSC_DEITY},
168     {"fallout", fldoff(sct_fallout), NSC_USHORT, 0, NULL, EF_BAD, 0},
169     {"access", fldoff(sct_access), NSC_SHORT, 0, NULL, EF_BAD, 0},
170     {"road", fldoff(sct_road), NSC_UCHAR, 0, NULL, EF_BAD, 0},
171     {"rail", fldoff(sct_rail), NSC_UCHAR, 0, NULL, EF_BAD, 0},
172     {"dfense", fldoff(sct_defense), NSC_UCHAR, 0, NULL, EF_BAD, 0},
173     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
174 #undef CURSTR
175 };
176
177 struct castr dchr_ca[] = {
178 #define CURSTR struct dchrstr
179     {"uid", fldoff(d_uid), NSC_UCHAR, 0, NULL, EF_SECTOR_CHR, 0},
180     {"name", fldoff(d_name), NSC_STRING, 0, NULL, EF_BAD, 0},
181     {"mnem", fldoff(d_mnem), NSC_STRINGY, 1, NULL, EF_BAD, NSC_CONST},
182     {"prd", fldoff(d_prd), NSC_INT, 0, NULL, EF_PRODUCT, 0},
183     {"peffic", fldoff(d_peffic), NSC_INT, 0, NULL, EF_BAD, 0},
184     {"mob0", fldoff(d_mob0), NSC_FLOAT, 0, NULL, EF_BAD, 0},
185     {"mob1", fldoff(d_mob1), NSC_FLOAT, 0, NULL, EF_BAD, 0},
186     {"nav", fldoff(d_nav), NSC_SITYPE(enum d_navigation), 0, NULL,
187      EF_SECTOR_NAVIGATION, 0},
188     {"pkg", fldoff(d_pkg), NSC_SITYPE(enum i_packing), 0, NULL,
189      EF_PACKING, 0},
190     {"ostr", fldoff(d_ostr), NSC_FLOAT, 0, NULL, EF_BAD, 0},
191     {"dstr", fldoff(d_dstr), NSC_FLOAT, 0, NULL, EF_BAD, 0},
192     {"value", fldoff(d_value), NSC_INT, 0, NULL, EF_BAD, 0},
193     {"cost", fldoff(d_cost), NSC_INT, 0, NULL, EF_BAD, 0},
194     {"build", fldoff(d_build), NSC_INT, 0, NULL, EF_BAD, 0},
195     {"lcms", fldoff(d_lcms), NSC_INT, 0, NULL, EF_BAD, 0},
196     {"hcms", fldoff(d_hcms), NSC_INT, 0, NULL, EF_BAD, 0},
197     {"maxpop", fldoff(d_maxpop), NSC_INT, 0, NULL, EF_BAD, 0},
198     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
199 #undef CURSTR
200 };
201
202 #define NSC_GENITEM(ef_type, ef_chr)                                    \
203     {"uid", empobjoff(uid),  NSC_SHORT, 0, NULL, ef_type, 0},           \
204     {"timestamp", empobjoff(timestamp), NSC_TIME, 0, NULL, EF_BAD, NSC_EXTRA}, \
205     {"owner", empobjoff(own),  NSC_NATID, 0, NULL, EF_NATION, 0},       \
206     {"xloc", empobjoff(x),  NSC_XCOORD, 0, NULL, EF_BAD, 0},            \
207     {"yloc", empobjoff(y),  NSC_YCOORD, 0, NULL, EF_BAD, 0},            \
208     {"type", empobjoff(type),  NSC_CHAR, 0, NULL, ef_chr, 0},           \
209     {"effic", empobjoff(effic),  NSC_CHAR, 0, NULL, EF_BAD, 0},         \
210     {"mobil", empobjoff(mobil),  NSC_CHAR , 0, NULL, EF_BAD, 0},        \
211     {"off", empobjoff(off),  NSC_UCHAR , 0, NULL, EF_BAD, 0},           \
212     {"tech", empobjoff(tech),  NSC_SHORT, 0, NULL, EF_BAD, 0},          \
213     {"group", empobjoff(group),  NSC_STRINGY, 1, NULL, EF_BAD, NSC_EXTRA}, \
214     {"opx", empobjoff(opx),  NSC_XCOORD, 0, NULL, EF_BAD, 0},           \
215     {"opy", empobjoff(opy),  NSC_YCOORD, 0, NULL, EF_BAD, 0},           \
216     {"mission", empobjoff(mission),  NSC_SHORT, 0, NULL, EF_MISSIONS, 0}, \
217     {"radius", empobjoff(radius),  NSC_SHORT, 0, NULL, EF_BAD, 0}
218
219 struct castr ship_ca[] = {
220 #define CURSTR struct shpstr
221     NSC_GENITEM(EF_SHIP, EF_SHIP_CHR),
222     {"fleet", fldoff(shp_fleet), NSC_STRINGY, 1, NULL, EF_BAD, 0},
223     {"nplane", fldoff(shp_nplane), NSC_UCHAR, 0, NULL, EF_BAD, NSC_EXTRA},
224     {"nland", fldoff(shp_nland), NSC_UCHAR, 0, NULL, EF_BAD, NSC_EXTRA},
225     {"xstart", fldoff(shp_destx[0]), NSC_XCOORD, 0, NULL, EF_BAD, 0},
226     {"xend", fldoff(shp_destx[1]), NSC_XCOORD, 0, NULL, EF_BAD, 0},
227     {"ystart", fldoff(shp_desty[0]), NSC_YCOORD, 0, NULL, EF_BAD, 0},
228     {"yend", fldoff(shp_desty[1]), NSC_YCOORD, 0, NULL, EF_BAD, 0},
229     {"cargostart", fldoff(shp_tstart), NSC_SITYPE(i_type), TMAX, NULL,
230      EF_ITEM, 0},
231     {"cargoend", fldoff(shp_tend), NSC_SITYPE(i_type), TMAX, NULL,
232      EF_ITEM, 0},
233     {"amtstart", fldoff(shp_lstart), NSC_SHORT, TMAX, NULL, EF_BAD, 0},
234     {"amtend", fldoff(shp_lend), NSC_SHORT, TMAX, NULL, EF_BAD, 0},
235     {"autonav", fldoff(shp_autonav), NSC_UCHAR, 0, NULL, EF_BAD, 0},
236     NSC_IVEC(fldoff(shp_item), ""),
237     {"pstage", fldoff(shp_pstage), NSC_SHORT, 0, NULL,
238      EF_PLAGUE_STAGES, NSC_DEITY},
239     {"ptime", fldoff(shp_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
240     {"access", fldoff(shp_access), NSC_SHORT, 0, NULL, EF_BAD, 0},
241     {"mquota", fldoff(shp_mobquota), NSC_UCHAR, 0, NULL, EF_BAD, 0},
242     {"path", fldoff(shp_path), NSC_STRINGY, MAXSHPPATH, NULL, EF_BAD, 0},
243     {"follow", fldoff(shp_follow), NSC_SHORT, 0, NULL, EF_BAD, 0},
244     {"name", fldoff(shp_name), NSC_STRINGY, MAXSHPNAMLEN, NULL,
245      EF_BAD, 0},
246     {"nchoppers", fldoff(shp_nchoppers), NSC_UCHAR, 0, NULL,
247      EF_BAD, NSC_EXTRA},
248     {"nxlight", fldoff(shp_nxlight), NSC_UCHAR, 0, NULL,
249      EF_BAD, NSC_EXTRA},
250     /* should let builder access xbuilt, ybuilt, but can't express that: */
251     {"xbuilt", fldoff(shp_orig_x), NSC_XCOORD, 0, NULL,
252      EF_BAD, NSC_DEITY},
253     {"ybuilt", fldoff(shp_orig_y), NSC_YCOORD, 0, NULL,
254      EF_BAD, NSC_DEITY},
255     {"builder", fldoff(shp_orig_own), NSC_NATID, 0, NULL,
256      EF_NATION, NSC_DEITY},
257     {"rflags", fldoff(shp_rflags), NSC_INT, 0, NULL,
258      EF_RETREAT_FLAGS, NSC_BITS},
259     {"rpath", fldoff(shp_rpath), NSC_STRINGY, RET_LEN, NULL, EF_BAD, 0},
260     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
261 #undef CURSTR
262 };
263
264 struct castr mchr_ca[] = {
265 #define CURSTR struct mchrstr
266     {"type", fldoff(m_type), NSC_CHAR, 0, NULL, EF_SHIP_CHR, 0},
267     {"name", fldoff(m_name), NSC_STRING, 0, NULL, EF_BAD, 0},
268     NSC_IVEC(fldoff(m_item), ""),
269     {"l_build", fldoff(m_lcm), NSC_INT, 0, NULL, EF_BAD, 0},
270     {"h_build", fldoff(m_hcm), NSC_INT, 0, NULL, EF_BAD, 0},
271     {"armor", fldoff(m_armor), NSC_INT, 0, NULL, EF_BAD, 0},
272     {"speed", fldoff(m_speed), NSC_INT, 0, NULL, EF_BAD, 0},
273     {"visib", fldoff(m_visib), NSC_INT, 0, NULL, EF_BAD, 0},
274     {"vrnge", fldoff(m_vrnge), NSC_INT, 0, NULL, EF_BAD, 0},
275     {"frnge", fldoff(m_frnge), NSC_INT, 0, NULL, EF_BAD, 0},
276     {"glim", fldoff(m_glim), NSC_INT, 0, NULL, EF_BAD, 0},
277     {"nxlight", fldoff(m_nxlight), NSC_UCHAR, 0, NULL, EF_BAD, 0},
278     {"nchoppers", fldoff(m_nchoppers), NSC_UCHAR, 0, NULL, EF_BAD, 0},
279     {"tech", fldoff(m_tech), NSC_INT, 0, NULL, EF_BAD, 0},
280     {"cost", fldoff(m_cost), NSC_INT, 0, NULL, EF_BAD, 0},
281     {"flags", fldoff(m_flags), NSC_LONG, 0, NULL,
282      EF_SHIP_CHR_FLAGS, NSC_BITS},
283     {"nplanes", fldoff(m_nplanes), NSC_UCHAR, 0, NULL, EF_BAD, 0},
284     {"nland", fldoff(m_nland), NSC_UCHAR, 0, NULL, EF_BAD, 0},
285     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
286 #undef CURSTR
287 };
288
289 struct castr plane_ca[] = {
290 #define CURSTR struct plnstr
291     NSC_GENITEM(EF_PLANE, EF_PLANE_CHR),
292     {"wing", fldoff(pln_wing), NSC_STRINGY, 1, NULL, EF_BAD, 0},
293     {"range", fldoff(pln_range), NSC_UCHAR, 0, NULL, EF_BAD, 0},
294     {"ship", fldoff(pln_ship), NSC_SHORT, 0, NULL, EF_BAD, 0},
295     {"land", fldoff(pln_land), NSC_SHORT, 0, NULL, EF_BAD, 0},
296     {"harden", fldoff(pln_harden), NSC_CHAR, 0, NULL, EF_BAD, 0},
297     {"nuketype", fldoff(pln_nuketype), NSC_CHAR, 0, NULL, EF_BAD, 0},
298     {"flags", fldoff(pln_flags), NSC_CHAR, 0, NULL,
299      EF_PLANE_FLAGS, NSC_BITS},
300     {"access", fldoff(pln_access), NSC_SHORT, 0, NULL, EF_BAD, 0},
301     {"theta", fldoff(pln_theta), NSC_FLOAT, 0, NULL, EF_BAD, 0},
302     {"att", 0, NSC_LONG, 0, nsc_pln_att, EF_BAD, NSC_EXTRA},
303     {"def", 0, NSC_LONG, 0, nsc_pln_def, EF_BAD, NSC_EXTRA},
304     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
305 #undef CURSTR
306 };
307
308 struct castr plchr_ca[] = {
309 #define CURSTR struct plchrstr
310     {"type", fldoff(pl_type), NSC_CHAR, 0, NULL, EF_PLANE_CHR, 0},
311     {"name", fldoff(pl_name), NSC_STRING, 0, NULL, EF_BAD, 0},
312     {"l_build", fldoff(pl_lcm), NSC_INT, 0, NULL, EF_BAD, 0},
313     {"h_build", fldoff(pl_hcm), NSC_INT, 0, NULL, EF_BAD, 0},
314     {"cost", fldoff(pl_cost), NSC_INT, 0, NULL, EF_BAD, 0},
315     {"tech", fldoff(pl_tech), NSC_INT, 0, NULL, EF_BAD, 0},
316     {"acc", fldoff(pl_acc), NSC_INT, 0, NULL, EF_BAD, 0},
317     {"load", fldoff(pl_load), NSC_INT, 0, NULL, EF_BAD, 0},
318     {"att", fldoff(pl_att), NSC_INT, 0, NULL, EF_BAD, 0},
319     {"def", fldoff(pl_def), NSC_INT, 0, NULL, EF_BAD, 0},
320     {"range", fldoff(pl_range), NSC_INT, 0, NULL, EF_BAD, 0},
321     {"crew", fldoff(pl_crew), NSC_INT, 0, NULL, EF_BAD, 0},
322     {"fuel", fldoff(pl_fuel), NSC_INT, 0, NULL, EF_BAD, 0},
323     {"stealth", fldoff(pl_stealth), NSC_INT, 0, NULL, EF_BAD, 0},
324     {"flags", fldoff(pl_flags), NSC_INT, 0, NULL,
325      EF_PLANE_CHR_FLAGS, NSC_BITS},
326     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
327 #undef CURSTR
328 };
329
330 struct castr land_ca[] = {
331 #define CURSTR struct lndstr
332     NSC_GENITEM(EF_LAND, EF_LAND_CHR),
333     {"army", fldoff(lnd_army), NSC_STRINGY, 1, NULL, EF_BAD, 0},
334     {"ship", fldoff(lnd_ship), NSC_SHORT, 0, NULL, EF_BAD, 0},
335     {"harden", fldoff(lnd_harden), NSC_CHAR, 0, NULL, EF_BAD, 0},
336     {"retreat", fldoff(lnd_retreat), NSC_SHORT, 0, NULL, EF_BAD, 0},
337     {"nxlight", fldoff(lnd_nxlight), NSC_UCHAR, 0, NULL,
338      EF_BAD, NSC_EXTRA},
339     {"rflags", fldoff(lnd_rflags), NSC_INT, 0, NULL,
340      EF_RETREAT_FLAGS, NSC_BITS},
341     {"rpath", fldoff(lnd_rpath), NSC_STRINGY, RET_LEN, NULL, EF_BAD, 0},
342     {"react", fldoff(lnd_rad_max), NSC_UCHAR, 0, NULL, EF_BAD, 0},
343     NSC_IVEC(fldoff(lnd_item), ""),
344     {"pstage", fldoff(lnd_pstage), NSC_SHORT, 0, NULL,
345      EF_PLAGUE_STAGES, NSC_DEITY},
346     {"ptime", fldoff(lnd_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
347     {"land", fldoff(lnd_land), NSC_SHORT, 0, NULL, EF_BAD, 0},
348     {"nland", fldoff(lnd_nland), NSC_UCHAR, 0, NULL, EF_BAD, NSC_EXTRA},
349     {"access", fldoff(lnd_access), NSC_SHORT, 0, NULL, EF_BAD, 0},
350     {"att", 0, NSC_DOUBLE, 0, nsc_lnd_att, EF_BAD, NSC_EXTRA},
351     {"def", 0, NSC_DOUBLE, 0, nsc_lnd_def, EF_BAD, NSC_EXTRA},
352     {"vul", 0, NSC_LONG, 0, nsc_lnd_vul, EF_BAD, NSC_EXTRA},
353     {"spd", 0, NSC_LONG, 0, nsc_lnd_spd, EF_BAD, NSC_EXTRA},
354     {"vis", 0, NSC_LONG, 0, nsc_lnd_vis, EF_BAD, NSC_EXTRA},
355     {"frg", 0, NSC_LONG, 0, nsc_lnd_frg, EF_BAD, NSC_EXTRA},
356     {"acc", 0, NSC_LONG, 0, nsc_lnd_acc, EF_BAD, NSC_EXTRA},
357     {"dam", 0, NSC_LONG, 0, nsc_lnd_dam, EF_BAD, NSC_EXTRA},
358     {"aaf", 0, NSC_LONG, 0, nsc_lnd_aaf, EF_BAD, NSC_EXTRA},
359 #undef CURSTR
360 #define CURSTR struct lchrstr
361     {"spy", fldoff(l_spy), NSC_INT, 0, nsc_lchr, EF_BAD, NSC_EXTRA},
362     {"rmax", fldoff(l_rad), NSC_INT, 0, nsc_lchr, EF_BAD, NSC_EXTRA},
363     {"ammo", fldoff(l_ammo), NSC_INT, 0, nsc_lchr, EF_BAD, NSC_EXTRA},
364     {"maxlight", fldoff(l_nxlight), NSC_UCHAR, 0, nsc_lchr,
365      EF_BAD, NSC_EXTRA},
366     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
367 #undef CURSTR
368 };
369
370 struct castr lchr_ca[] = {
371 #define CURSTR struct lchrstr
372     {"type", fldoff(l_type), NSC_CHAR, 0, NULL, EF_LAND_CHR, 0},
373     {"name", fldoff(l_name), NSC_STRING, 0, NULL, EF_BAD, 0},
374     NSC_IVEC(fldoff(l_item), ""),
375     {"l_build", fldoff(l_lcm), NSC_INT, 0, NULL, EF_BAD, 0},
376     {"h_build", fldoff(l_hcm), NSC_INT, 0, NULL, EF_BAD, 0},
377     {"tech", fldoff(l_tech), NSC_INT, 0, NULL, EF_BAD, 0},
378     {"cost", fldoff(l_cost), NSC_INT, 0, NULL, EF_BAD, 0},
379     {"att", fldoff(l_att), NSC_FLOAT, 0, NULL, EF_BAD, 0},
380     {"def", fldoff(l_def), NSC_FLOAT, 0, NULL, EF_BAD, 0},
381     {"vul", fldoff(l_vul), NSC_INT, 0, NULL, EF_BAD, 0},
382     {"spd", fldoff(l_spd), NSC_INT, 0, NULL, EF_BAD, 0},
383     {"vis", fldoff(l_vis), NSC_INT, 0, NULL, EF_BAD, 0},
384     {"spy", fldoff(l_spy), NSC_INT, 0, NULL, EF_BAD, 0},
385     {"rmax", fldoff(l_rad), NSC_INT, 0, NULL, EF_BAD, 0},
386     {"frg", fldoff(l_frg), NSC_INT, 0, NULL, EF_BAD, 0},
387     {"acc", fldoff(l_acc), NSC_INT, 0, NULL, EF_BAD, 0},
388     {"dam", fldoff(l_dam), NSC_INT, 0, NULL, EF_BAD, 0},
389     {"ammo", fldoff(l_ammo), NSC_INT, 0, NULL, EF_BAD, 0},
390     {"aaf", fldoff(l_aaf), NSC_INT, 0, NULL, EF_BAD, 0},
391     {"nxlight", fldoff(l_nxlight), NSC_UCHAR, 0, NULL, EF_BAD, 0},
392     {"nland", fldoff(l_nland), NSC_UCHAR, 0, NULL, EF_BAD, 0},
393     {"flags", fldoff(l_flags), NSC_LONG, 0, NULL,
394      EF_LAND_CHR_FLAGS, NSC_BITS},
395     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
396 #undef CURSTR
397 };
398
399 struct castr nuke_ca[] = {
400 #define CURSTR struct nukstr
401     NSC_GENITEM(EF_NUKE, EF_NUKE_CHR),
402     {"plane", fldoff(nuk_plane), NSC_SHORT, 0, NULL, EF_BAD, 0},
403     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
404 #undef CURSTR
405 };
406
407 struct castr nchr_ca[] = {
408 #define CURSTR struct nchrstr
409     {"type", fldoff(n_type), NSC_CHAR, 0, NULL, EF_NUKE_CHR, 0},
410     {"name", fldoff(n_name), NSC_STRING, 0, NULL, EF_BAD, 0},
411     {"l_build", fldoff(n_lcm), NSC_INT, 0, NULL, EF_BAD, 0},
412     {"h_build", fldoff(n_hcm), NSC_INT, 0, NULL, EF_BAD, 0},
413     {"o_build", fldoff(n_oil), NSC_INT, 0, NULL, EF_BAD, 0},
414     {"r_build", fldoff(n_rad), NSC_INT, 0, NULL, EF_BAD, 0},
415     {"blast", fldoff(n_blast), NSC_INT, 0, NULL, EF_BAD, 0},
416     {"dam", fldoff(n_dam), NSC_INT, 0, NULL, EF_BAD, 0},
417     {"cost", fldoff(n_cost), NSC_INT, 0, NULL, EF_BAD, 0},
418     {"tech", fldoff(n_tech), NSC_INT, 0, NULL, EF_BAD, 0},
419     {"weight", fldoff(n_weight), NSC_INT, 0, NULL, EF_BAD, 0},
420     {"flags", fldoff(n_flags), NSC_INT, 0, NULL,
421      EF_NUKE_CHR_FLAGS, NSC_BITS},
422     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
423 #undef CURSTR
424 };
425
426 struct castr treaty_ca[] = {
427 #define CURSTR struct trtstr
428     {"uid", fldoff(trt_uid), NSC_SHORT, 0, NULL, EF_TREATY, 0},
429     {"timestamp", fldoff(trt_timestamp), NSC_TIME, 0, NULL,
430      EF_BAD, NSC_EXTRA},
431     {"cna", fldoff(trt_cna), NSC_NATID, 0, NULL, EF_NATION, 0},
432     {"cnb", fldoff(trt_cnb), NSC_NATID, 0, NULL, EF_NATION, 0},
433     {"status", fldoff(trt_status), NSC_CHAR, 0, NULL,
434      EF_AGREEMENT_STATUS, 0},
435     {"acond", fldoff(trt_acond), NSC_SHORT, 0, NULL,
436      EF_TREATY_FLAGS, NSC_BITS},
437     {"bcond", fldoff(trt_bcond), NSC_SHORT, 0, NULL,
438      EF_TREATY_FLAGS, NSC_BITS},
439     {"exp", fldoff(trt_exp), NSC_TIME, 0, NULL, EF_BAD, 0},
440     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
441 #undef CURSTR
442 };
443
444 struct castr loan_ca[] = {
445 #define CURSTR struct lonstr
446     {"uid", fldoff(l_uid), NSC_SHORT, 0, NULL, EF_LOAN, 0},
447     {"timestamp", fldoff(l_timestamp), NSC_TIME, 0, NULL,
448      EF_BAD, NSC_EXTRA},
449     {"loaner", fldoff(l_loner), NSC_NATID, 0, NULL, EF_NATION, 0},
450     {"loanee", fldoff(l_lonee), NSC_NATID, 0, NULL, EF_NATION, 0},
451     {"status", fldoff(l_status), NSC_CHAR, 0, NULL,
452      EF_AGREEMENT_STATUS, 0},
453     {"irate", fldoff(l_irate), NSC_INT, 0, NULL, EF_BAD, 0},
454     {"ldur", fldoff(l_ldur), NSC_INT, 0, NULL, EF_BAD, 0},
455     {"amtpaid", fldoff(l_amtpaid), NSC_LONG, 0, NULL, EF_BAD, 0},
456     {"amtdue", fldoff(l_amtdue), NSC_LONG, 0, NULL, EF_BAD, 0},
457     {"lastpay", fldoff(l_lastpay), NSC_TIME, 0, NULL, EF_BAD, 0},
458     {"duedate", fldoff(l_duedate), NSC_TIME, 0, NULL, EF_BAD, 0},
459     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
460 #undef CURSTR
461 };
462
463 struct castr news_ca[] = {
464 #define CURSTR struct nwsstr
465     /* no need for uid as long as it's not referenced from other tables */
466     {"timestamp", fldoff(nws_timestamp), NSC_TIME, 0, NULL,
467      EF_BAD, NSC_EXTRA},
468     {"actor", fldoff(nws_ano), NSC_NATID, 0, NULL, EF_NATION, 0},
469     {"action", fldoff(nws_vrb), NSC_UCHAR, 0, NULL, EF_NEWS_CHR, 0},
470     {"victim", fldoff(nws_vno), NSC_NATID, 0, NULL, EF_NATION, 0},
471     {"times", fldoff(nws_ntm), NSC_CHAR, 0, NULL, EF_BAD, 0},
472     {"time", fldoff(nws_when), NSC_TIME, 0, NULL, EF_BAD, 0},
473     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
474 #undef CURSTR
475 };
476
477 struct castr lost_ca[] = {
478 #define CURSTR struct loststr
479    /* no need for uid as long as it's not referenced from other tables */
480     {"timestamp", fldoff(lost_timestamp), NSC_TIME, 0, NULL,
481      EF_BAD, 0},
482     {"owner", fldoff(lost_owner), NSC_NATID, 0, NULL, EF_NATION, 0},
483     {"type", fldoff(lost_type), NSC_CHAR, 0, NULL, EF_TABLE, 0},
484     {"id", fldoff(lost_id), NSC_SHORT, 0, NULL, EF_BAD, 0},
485     {"x", fldoff(lost_x), NSC_XCOORD, 0, NULL, EF_BAD, 0},
486     {"y", fldoff(lost_y), NSC_YCOORD, 0, NULL, EF_BAD, 0},
487     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
488 #undef CURSTR
489 };
490
491 struct castr commodity_ca[] = {
492 #define CURSTR struct comstr
493     {"uid", fldoff(com_uid), NSC_SHORT, 0, NULL, EF_COMM, 0},
494     {"timestamp", fldoff(com_timestamp), NSC_TIME, 0, NULL,
495      EF_BAD, NSC_EXTRA},
496     {"owner", fldoff(com_owner), NSC_NATID, 0, NULL, EF_NATION, 0},
497     {"type", fldoff(com_type), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0},
498     {"amount", fldoff(com_amount), NSC_INT, 0, NULL, EF_BAD, 0},
499     {"price", fldoff(com_price), NSC_FLOAT, 0, NULL, EF_BAD, 0},
500     {"maxbidder", fldoff(com_maxbidder), NSC_INT, 0, NULL, EF_NATION, 0},
501     {"markettime", fldoff(com_markettime), NSC_TIME, 0, NULL, EF_BAD, 0},
502     /* should let maxbidder access xbuy, ybuy, but can't express that: */
503     {"xbuy", fldoff(com_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY},
504     {"ybuy", fldoff(com_y), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY},
505     /* should let owner access xsell, ysell, but can't express that: */
506     {"xsell", fldoff(sell_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY},
507     {"ysell", fldoff(sell_y), NSC_YCOORD, 0, NULL, EF_BAD, NSC_DEITY},
508     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
509 #undef CURSTR
510 };
511
512 struct castr trade_ca[] = {
513 #define CURSTR struct trdstr
514     {"uid", fldoff(trd_uid), NSC_SHORT, 0, NULL, EF_TRADE, 0},
515     {"timestamp", fldoff(trd_timestamp), NSC_TIME, 0, NULL,
516      EF_BAD, NSC_EXTRA},
517     {"owner", fldoff(trd_owner), NSC_NATID, 0, NULL, EF_NATION, 0},
518     {"type", fldoff(trd_type), NSC_CHAR, 0, NULL, EF_TABLE, 0},
519     {"unitid", fldoff(trd_unitid), NSC_SHORT, 0, NULL, EF_BAD, 0},
520     {"price", fldoff(trd_price), NSC_LONG, 0, NULL, EF_BAD, 0},
521     {"maxbidder", fldoff(trd_maxbidder), NSC_INT, 0, NULL, EF_NATION, 0},
522     {"markettime", fldoff(trd_markettime), NSC_TIME, 0, NULL, EF_BAD, 0},
523     /* should let maxbidder access xloc, yloc, but can't express that: */
524     {"xloc", fldoff(trd_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY},
525     {"yloc", fldoff(trd_y), NSC_YCOORD, 0, NULL, EF_BAD, NSC_DEITY},
526     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
527 #undef CURSTR
528 };
529
530 struct castr cou_ca[] = {
531 #define CURSTR struct natstr
532     /*
533      * This is the owner's view, i.e. it applies only to the own
534      * nation.  The public view nat_ca[], which applies to all
535      * nations, has the same selectors with different flags: NSC_DEITY
536      * is set except for cnum (which must come first) and all
537      * NSC_EXTRA selectors; NSC_EXTRA is cleared except for timestamp
538      * (which must come second).
539      * nat_ca[] should also make tech, research, education and
540      * happiness available, but we can't express the obfuscation
541      * necessary for foreign levels.
542      */
543     {"cnum", fldoff(nat_cnum), NSC_NATID, 0, NULL, EF_NATION, 0},
544     {"timestamp", fldoff(nat_timestamp), NSC_TIME, 0, NULL,
545      EF_BAD, NSC_EXTRA},
546     {"stat", fldoff(nat_stat), NSC_SITYPE(enum nat_status), 0, NULL,
547      EF_NATION_STATUS, NSC_EXTRA},
548     {"cname", fldoff(nat_cnam), NSC_STRINGY, 20, NULL, EF_BAD, NSC_EXTRA},
549     {"passwd", fldoff(nat_pnam), NSC_STRINGY, 20, NULL,
550      EF_BAD, NSC_DEITY | NSC_EXTRA},
551     {"ip", fldoff(nat_hostaddr), NSC_STRINGY, 32, NULL, EF_BAD, 0},
552     {"hostname", fldoff(nat_hostname), NSC_STRINGY, 512, NULL, EF_BAD, 0},
553     {"userid", fldoff(nat_userid), NSC_STRINGY, 32, NULL, EF_BAD, 0},
554     {"xcap", fldoff(nat_xcap), NSC_XCOORD, 0, NULL, EF_BAD, 0},
555     {"ycap", fldoff(nat_ycap), NSC_YCOORD, 0, NULL, EF_BAD, 0},
556     {"xorg", fldoff(nat_xorg), NSC_XCOORD, 0, NULL,
557      EF_BAD, NSC_DEITY | NSC_EXTRA},
558     {"yorg", fldoff(nat_yorg), NSC_YCOORD, 0, NULL,
559      EF_BAD, NSC_DEITY | NSC_EXTRA},
560     {"dayno", fldoff(nat_dayno), NSC_CHAR, 0, NULL, EF_BAD, 0},
561     {"update", fldoff(nat_update), NSC_CHAR, 0, NULL, EF_BAD, 0},
562     {"tgms", fldoff(nat_tgms), NSC_USHORT, 0, NULL, EF_BAD, 0},
563     {"ann", fldoff(nat_ann), NSC_USHORT, 0, NULL, EF_BAD, 0},
564     {"minused", fldoff(nat_minused), NSC_USHORT, 0, NULL, EF_BAD, 0},
565     {"btu", fldoff(nat_btu), NSC_SHORT, 0, NULL, EF_BAD, 0},
566     {"access", fldoff(nat_access), NSC_SHORT, 0, NULL, EF_BAD, 0},
567     {"milreserve", fldoff(nat_reserve), NSC_LONG, 0, NULL, EF_BAD, 0},
568     {"money", fldoff(nat_money), NSC_LONG, 0, NULL, EF_BAD, 0},
569     {"login", fldoff(nat_last_login), NSC_TIME, 0, NULL, EF_BAD, 0},
570     {"logout", fldoff(nat_last_logout), NSC_TIME, 0, NULL, EF_BAD, 0},
571     {"newstim", fldoff(nat_newstim), NSC_TIME, 0, NULL, EF_BAD, 0},
572     {"annotim", fldoff(nat_annotim), NSC_TIME, 0, NULL, EF_BAD, 0},
573     {"tech", fldoff(nat_level[NAT_TLEV]), NSC_FLOAT, 0, NULL, EF_BAD, 0},
574     {"research", fldoff(nat_level[NAT_RLEV]), NSC_FLOAT, 0, NULL,
575      EF_BAD, 0},
576     {"education", fldoff(nat_level[NAT_ELEV]), NSC_FLOAT, 0, NULL,
577      EF_BAD, 0},
578     {"happiness", fldoff(nat_level[NAT_HLEV]), NSC_FLOAT, 0, NULL,
579      EF_BAD, 0},
580     {"relations", fldoff(nat_relate), NSC_HIDDEN, MAXNOC, NULL,
581      EF_NATION_RELATIONS, NSC_EXTRA},
582     /* mortals know there's contact (relations show), but not how strong */
583     {"contacts", fldoff(nat_contact), NSC_UCHAR, MAXNOC, NULL,
584      EF_BAD, NSC_DEITY | NSC_EXTRA},
585     {"rejects", fldoff(nat_rejects), NSC_UCHAR, MAXNOC, NULL,
586      EF_NATION_REJECTS, NSC_EXTRA | NSC_BITS},
587     {"flags", fldoff(nat_flags), NSC_LONG, 0, NULL,
588      EF_NATION_FLAGS, NSC_BITS},
589     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
590 #undef CURSTR
591 };
592
593 struct castr nat_ca[sizeof(cou_ca) / sizeof(*cou_ca)];
594 /* initialized by nsc_init() */
595
596 struct castr realm_ca[] = {
597 #define CURSTR struct realmstr
598     /* uid is encoded in cnum, realm */
599     {"timestamp", fldoff(r_timestamp), NSC_TIME, 0, NULL,
600      EF_BAD, NSC_EXTRA},
601     {"cnum", fldoff(r_cnum), NSC_NATID, 0, NULL, EF_NATION, NSC_CONST},
602     {"realm", fldoff(r_realm), NSC_USHORT, 0, NULL, EF_BAD, NSC_CONST},
603     {"xl", fldoff(r_xl), NSC_XCOORD, 0, NULL, EF_BAD, 0},
604     {"xh", fldoff(r_xh), NSC_XCOORD, 0, NULL, EF_BAD, 0},
605     {"yl", fldoff(r_yl), NSC_YCOORD, 0, NULL, EF_BAD, 0},
606     {"yh", fldoff(r_yh), NSC_YCOORD, 0, NULL, EF_BAD, 0},
607     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
608 #undef CURSTR
609 };
610
611 struct castr game_ca[] = {
612 #define CURSTR struct gamestr
613     /* no need for uid */
614     {"timestamp", fldoff(game_timestamp), NSC_TIME, 0, NULL,
615      EF_BAD, NSC_EXTRA},
616     {"upd_disable", fldoff(game_upd_disable), NSC_CHAR, 0, NULL,
617      EF_BAD, 0},
618     {"turn", fldoff(game_turn), NSC_SHORT, 0, NULL, EF_BAD, 0},
619     {"tick", fldoff(game_tick), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY},
620     {"rt", fldoff(game_rt), NSC_TIME, 0, NULL, EF_BAD, NSC_DEITY},
621     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
622 #undef CURSTR
623 };
624
625 struct castr intrchr_ca[] = {
626 #define CURSTR struct sctintrins
627     /* no need for uid as long as it's not referenced from other tables */
628     {"name", fldoff(in_name), NSC_STRING, 0, NULL, EF_BAD, NSC_CONST},
629     {"lcms", fldoff(in_lcms), NSC_UCHAR, 0, NULL, EF_BAD, 0},
630     {"hcms", fldoff(in_hcms), NSC_UCHAR, 0, NULL, EF_BAD, 0},
631     {"dcost", fldoff(in_dcost), NSC_UCHAR, 0, NULL, EF_BAD, 0},
632     {"mcost", fldoff(in_mcost), NSC_UCHAR, 0, NULL, EF_BAD, 0},
633     {"enable", fldoff(in_enable), NSC_UCHAR, 0, NULL, EF_BAD, 0},
634     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
635 #undef CURSTR
636 };
637
638 struct castr rpt_ca[] = {
639 #define CURSTR struct rptstr
640     {"uid", fldoff(r_uid), NSC_CHAR, 0, NULL, EF_NEWS_CHR, 0},
641     {"newstory", fldoff(r_newstory), NSC_STRING, NUM_RPTS, NULL,
642      EF_BAD, 0},
643     {"good_will", fldoff(r_good_will), NSC_INT, 0, NULL, EF_BAD, 0},
644     {"newspage", fldoff(r_newspage), NSC_INT, 0, NULL,
645      EF_PAGE_HEADINGS, 0},
646     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
647 #undef CURSTR
648 };
649
650 struct castr update_ca[] = {
651     {"time", 0, NSC_TIME, 0, NULL, EF_BAD, 0},
652     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
653 };
654
655 struct castr empfile_ca[] = {
656 #define CURSTR struct empfile
657     {"uid", fldoff(uid), NSC_INT, 0, NULL, EF_TABLE, 0},
658     {"name", fldoff(name), NSC_STRING, 0, NULL, EF_BAD, NSC_CONST},
659     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
660 #undef CURSTR
661 };
662
663 struct castr symbol_ca[] = {
664 #define CURSTR struct symbol
665     /*
666      * value is is const because it has to match what is compiled into
667      * the server.  name is const because clients key on it.
668      */
669     {"value", fldoff(value), NSC_INT, 0, NULL, EF_BAD, NSC_CONST},
670     {"name", fldoff(name), NSC_STRING, 0, NULL, EF_BAD, NSC_CONST},
671     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
672 #undef CURSTR
673 };
674
675 struct castr mdchr_ca[] = {
676 #define CURSTR struct castr
677     /* no need for uid */
678     /* name must come first, clients may rely on it */
679     {"name", fldoff(ca_name), NSC_STRING, 0, NULL, EF_BAD, NSC_CONST},
680     {"type", fldoff(ca_type), NSC_CHAR, 0, NULL, EF_META_TYPE, NSC_CONST},
681     {"flags", fldoff(ca_flags), NSC_UCHAR, 0, NULL,
682      EF_META_FLAGS, NSC_CONST | NSC_BITS},
683     {"len", fldoff(ca_len), NSC_USHORT, 0, NULL, EF_BAD, NSC_CONST},
684     {"table", fldoff(ca_table), NSC_INT, 0, NULL, EF_BAD, NSC_CONST},
685     {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0}
686 #undef CURSTR
687 };
688
689 void
690 nsc_init(void)
691 {
692     static struct castr version_ca0 = {
693         "version", 0, NSC_STRINGY, sizeof(PACKAGE_STRING), NULL, EF_BAD, 0
694     };
695     static struct castr version_ca1 = {
696         "maxnoc", 0, NSC_LONG, 0, nsc_ver_maxnoc, EF_BAD, 0
697     };
698     static struct castr *ca;
699     struct keymatch *kp;
700     int n, i;
701     unsigned flags;
702
703     /* derive empfile[EF_VERSION].cadef from configkeys[] */
704     n = 0;
705     for (kp = configkeys; kp->km_key; ++kp) {
706         if (kp->km_type != NSC_NOTYPE && !(kp->km_flags & KM_INTERNAL))
707             n++;
708     }
709     ca = calloc(2 + n + 1, sizeof(*ca));
710     ca[0] = version_ca0;
711     ca[1] = version_ca1;
712     i = 2;
713     for (kp = configkeys; kp->km_key; ++kp) {
714         if (kp->km_type != NSC_NOTYPE && !(kp->km_flags & KM_INTERNAL)) {
715             ca[i].ca_type = kp->km_type;
716             ca[i].ca_off = kp - configkeys;
717             ca[i].ca_name = kp->km_key;
718             ca[i].ca_table = EF_BAD;
719             ca[i].ca_get = nsc_ver;
720             i++;
721         }
722     }
723     empfile[EF_VERSION].cadef = ca;
724
725     /* derive nat_ca[] from cou_ca[] */
726     nat_ca[0] = cou_ca[0];      /* cnum */
727     nat_ca[1] = cou_ca[1];      /* timestamp */
728     for (i = 2; cou_ca[i].ca_name; i++) {
729         nat_ca[i] = cou_ca[i];
730         flags = nat_ca[i].ca_flags;
731         if (flags & NSC_EXTRA)
732             flags &= ~NSC_EXTRA;
733         else
734             flags |= NSC_DEITY;
735         nat_ca[i].ca_flags = flags;
736     }
737     nat_ca[i] = cou_ca[i];      /* sentinel */
738 }
739
740 /*
741  * Virtual selectors
742  */
743
744 static void *
745 nsc_ver(struct valstr *val, struct natstr *np, void *ptr)
746 {
747     struct keymatch *kp = &configkeys[val->val_as.sym.off];
748     val->val_as.sym.off = 0;
749     val->val_as.sym.get = NULL;
750     return kp->km_data;
751 }
752
753 static void *
754 nsc_ver_maxnoc(struct valstr *val, struct natstr *np, void *ptr)
755 {
756     val->val_as.lng = MAXNOC;
757     return NULL;
758 }
759
760 static void *
761 nsc_sct_terr(struct valstr *val, struct natstr *np, void *ptr)
762 {
763     if (!np || np->nat_stat == STAT_GOD)
764         val->val_as.sym.off = offsetof(struct sctstr, sct_dterr);
765     else
766         val->val_as.sym.off = offsetof(struct sctstr, sct_terr);
767     val->val_as.sym.get = NULL;
768     return ptr;
769 }
770
771 static void *
772 nsc_pln_def(struct valstr *val, struct natstr *np, void *ptr)
773 {
774     val->val_as.lng = pln_def(ptr);;
775     return NULL;
776 }
777
778 static void *
779 nsc_pln_att(struct valstr *val, struct natstr *np, void *ptr)
780 {
781     val->val_as.lng = pln_att(ptr);
782     return NULL;
783 }
784
785 static void *
786 nsc_lnd_att(struct valstr *val, struct natstr *np, void *ptr)
787 {
788     val->val_as.dbl = lnd_att(ptr);
789     return NULL;
790 }
791
792 static void *
793 nsc_lnd_def(struct valstr *val, struct natstr *np, void *ptr)
794 {
795     val->val_as.dbl = lnd_def(ptr);
796     return NULL;
797 }
798
799 static void *
800 nsc_lnd_vul(struct valstr *val, struct natstr *np, void *ptr)
801 {
802     val->val_as.lng = lnd_vul(ptr);
803     return NULL;
804 }
805
806 static void *
807 nsc_lnd_spd(struct valstr *val, struct natstr *np, void *ptr)
808 {
809     val->val_as.lng = lnd_spd(ptr);
810     return NULL;
811 }
812
813 static void *
814 nsc_lnd_vis(struct valstr *val, struct natstr *np, void *ptr)
815 {
816     val->val_as.lng = lnd_vis(ptr);
817     return NULL;
818 }
819
820 static void *
821 nsc_lnd_frg(struct valstr *val, struct natstr *np, void *ptr)
822 {
823     val->val_as.lng = lnd_frg(ptr);
824     return NULL;
825 }
826
827 static void *
828 nsc_lnd_acc(struct valstr *val, struct natstr *np, void *ptr)
829 {
830     val->val_as.lng = lnd_acc(ptr);
831     return NULL;
832 }
833
834 static void *
835 nsc_lnd_dam(struct valstr *val, struct natstr *np, void *ptr)
836 {
837     val->val_as.lng = lnd_dam(ptr);
838     return NULL;
839 }
840
841 static void *
842 nsc_lnd_aaf(struct valstr *val, struct natstr *np, void *ptr)
843 {
844     val->val_as.lng = lnd_aaf(ptr);
845     return NULL;
846 }
847
848 static void *
849 nsc_lchr(struct valstr *val, struct natstr *np, void *ptr)
850 {
851     val->val_as.sym.get = NULL;
852     return lchr + ((struct lndstr *)ptr)->lnd_type;
853 }