1 /*
2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2021, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure, Markus Armbruster
5 *
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.
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, see <http://www.gnu.org/licenses/>.
18 *
19 * ---
20 *
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.
24 *
25 * ---
26 *
27 * nsc.c: Empire selection global structures
28 *
29 * Known contributors to this file:
30 * Markus Armbruster, 2004-2021
31 */
32
33 /*
34 * Convention: uid selector comes first. Table TYPE has an uid
35 * selector if empfile[TYPE].cadef[0].ca_table == TYPE.
36 */
37
38 #include <config.h>
39
40 #include <limits.h>
41 #include <stdlib.h>
42 #include "empobj.h"
43 #include "optlist.h"
44 #include "news.h"
45 #include "nsc.h"
46 #include "product.h"
47 #include "unit.h"
48 #include "version.h"
49
50 static void *nsc_ver(struct valstr *, struct natstr *, void *);
51 static void *nsc_ver_maxnoc(struct valstr *, struct natstr *, void *);
52 static void *nsc_ver_version(struct valstr *, struct natstr *, void *);
53 static void *nsc_sct_terr(struct valstr *, struct natstr *, void *);
54 static void *nsc_sct_track(struct valstr *, struct natstr *, void *);
55 static void *nsc_cargo_nplane(struct valstr *, struct natstr *, void *);
56 static void *nsc_cargo_nchopper(struct valstr *, struct natstr *, void *);
57 static void *nsc_cargo_nxlight(struct valstr *, struct natstr *, void *);
58 static void *nsc_cargo_nland(struct valstr *, struct natstr *, void *);
59 static void *nsc_pln_att(struct valstr *, struct natstr *, void *);
60 static void *nsc_pln_def(struct valstr *, struct natstr *, void *);
61 static void *nsc_pln_nuketype(struct valstr *, struct natstr *, void *);
62 static void *nsc_lnd_att(struct valstr *, struct natstr *, void *);
63 static void *nsc_lnd_def(struct valstr *, struct natstr *, void *);
64 static void *nsc_lnd_vul(struct valstr *, struct natstr *, void *);
65 static void *nsc_lnd_spd(struct valstr *, struct natstr *, void *);
66 static void *nsc_lnd_vis(struct valstr *, struct natstr *, void *);
67 static void *nsc_lnd_frg(struct valstr *, struct natstr *, void *);
68 static void *nsc_lnd_acc(struct valstr *, struct natstr *, void *);
69 static void *nsc_lnd_dam(struct valstr *, struct natstr *, void *);
70 static void *nsc_lnd_aaf(struct valstr *, struct natstr *, void *);
71 static void *nsc_lchr(struct valstr *, struct natstr *, void *);
72 static void *nsc_nws_timestamp(struct valstr *, struct natstr *, void *);
73 static void *nsc_meta_type(struct valstr *, struct natstr *, void *);
74 static void *nsc_meta_len(struct valstr *, struct natstr *, void *);
75
76 /* Ugly hacks to avoid illegibly long lines */
77 #define fldoff(fld) offsetof(CURSTR, fld)
78 #define empobjoff(fld) offsetof(struct empobj, fld)
79
80 #define NSC_IELT(name, pfx, sfx, base, itype) \
81 {sizeof(sfx) == 1 ? name : pfx sfx, \
82 ((base) + (itype)*sizeof(short)), \
83 NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP}
84
85 #define NSC_IVEC(base, sfx) \
86 NSC_IELT("civil", "c", sfx, base, I_CIVIL), \
87 NSC_IELT("milit", "m", sfx, base, I_MILIT), \
88 NSC_IELT("shell", "s", sfx, base, I_SHELL), \
89 NSC_IELT("gun", "g", sfx, base, I_GUN), \
90 NSC_IELT("petrol", "p", sfx, base, I_PETROL), \
91 NSC_IELT("iron", "i", sfx, base, I_IRON), \
92 NSC_IELT("dust", "d", sfx, base, I_DUST), \
93 NSC_IELT("bar", "b", sfx, base, I_BAR), \
94 NSC_IELT("food", "f", sfx, base, I_FOOD), \
95 NSC_IELT("oil", "o", sfx, base, I_OIL), \
96 NSC_IELT("lcm", "l", sfx, base, I_LCM), \
97 NSC_IELT("hcm", "h", sfx, base, I_HCM), \
98 NSC_IELT("uw", "u", sfx, base, I_UW), \
99 NSC_IELT("rad", "r", sfx, base, I_RAD)
100
101 #define NSC_MELT(name, base, itype, flags, dump) \
102 {(name), ((base) + (itype)*sizeof(short)), \
103 NSC_SHORT, 0, NULL, EF_BAD, (flags), (dump) }
104
105 #define NSC_MVEC(base, mil_dump, oil_dump, rad_dump) \
106 NSC_MELT("c_build", base, I_CIVIL, 0, CA_DUMP_ONLY), \
107 NSC_MELT("m_build", base, I_MILIT, 0, mil_dump), \
108 NSC_MELT("s_build", base, I_SHELL, 0, CA_DUMP_ONLY), \
109 NSC_MELT("g_build", base, I_GUN, 0, CA_DUMP_ONLY), \
110 NSC_MELT("p_build", base, I_PETROL, 0, CA_DUMP_ONLY), \
111 NSC_MELT("i_build", base, I_IRON, 0, CA_DUMP_ONLY), \
112 NSC_MELT("d_build", base, I_DUST, 0, CA_DUMP_ONLY), \
113 NSC_MELT("b_build", base, I_BAR, 0, CA_DUMP_ONLY), \
114 NSC_MELT("f_build", base, I_FOOD, 0, CA_DUMP_ONLY), \
115 NSC_MELT("o_build", base, I_OIL, 0, oil_dump), \
116 NSC_MELT("l_build", base, I_LCM, 0, CA_DUMP), \
117 NSC_MELT("h_build", base, I_HCM, 0, CA_DUMP), \
118 NSC_MELT("u_build", base, I_UW, 0, CA_DUMP_ONLY), \
119 NSC_MELT("r_build", base, I_RAD, 0, rad_dump)
120
121 struct castr ichr_ca[] = {
122 #define CURSTR struct ichrstr
123 {"uid", fldoff(i_uid), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0,
124 CA_DUMP},
125 {"name", fldoff(i_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
126 {"mnem", fldoff(i_mnem), NSC_STRINGY, 1, NULL, EF_BAD, 0,
127 CA_DUMP_CONST},
128 {"power", fldoff(i_power), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
129 {"sell", fldoff(i_sell), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
130 {"lbs", fldoff(i_lbs), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
131 {"pkg", fldoff(i_pkg), NSC_INT, NUMPKG, NULL, EF_BAD, 0, CA_DUMP},
132 {"melt_denom", fldoff(i_melt_denom), NSC_INT, 0, NULL, EF_BAD, 0,
133 CA_DUMP},
134 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
135 #undef CURSTR
136 };
137
138 struct castr pchr_ca[] = {
139 #define CURSTR struct pchrstr
140 {"uid", fldoff(p_uid), NSC_INT, 0, NULL, EF_PRODUCT, 0, CA_DUMP},
141 {"name", fldoff(p_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
142 {"sname", fldoff(p_sname), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
143 {"ctype", fldoff(p_ctype), NSC_SITYPE(i_type), MAXPRCON, NULL,
144 EF_ITEM, 0, CA_DUMP},
145 {"camt", fldoff(p_camt), NSC_USHORT, MAXPRCON, NULL, EF_BAD, 0,
146 CA_DUMP},
147 {"bwork", fldoff(p_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
148 {"type", fldoff(p_type), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0,
149 CA_DUMP},
150 {"level", fldoff(p_level), NSC_INT, 0, NULL, EF_LEVEL, 0, CA_DUMP},
151 {"cost", fldoff(p_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
152 {"nrndx", fldoff(p_nrndx), NSC_INT, 0, NULL, EF_RESOURCES, 0, CA_DUMP},
153 {"nrdep", fldoff(p_nrdep), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
154 {"nlndx", fldoff(p_nlndx), NSC_INT, 0, NULL, EF_LEVEL, 0, CA_DUMP},
155 {"nlmin", fldoff(p_nlmin), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
156 {"nllag", fldoff(p_nllag), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
157 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
158 #undef CURSTR
159 };
160
161 struct castr sect_ca[] = {
162 #define CURSTR struct sctstr
163 /* uid needs to be NSC_DEITY because it discloses true origin */
164 {"uid", fldoff(sct_uid), NSC_INT, 0, NULL,
165 EF_SECTOR, NSC_DEITY, CA_DUMP_NONE},
166 {"timestamp", fldoff(sct_timestamp), NSC_TIME, 0, NULL,
167 EF_BAD, 0, CA_DUMP_NONE},
168 {"owner", fldoff(sct_own), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
169 {"xloc", fldoff(sct_x), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP_CONST},
170 {"yloc", fldoff(sct_y), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP_CONST},
171 {"des", fldoff(sct_type), NSC_CHAR, 0, NULL, EF_SECTOR_CHR, 0,
172 CA_DUMP},
173 {"effic", fldoff(sct_effic), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
174 {"mobil", fldoff(sct_mobil), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
175 {"off", fldoff(sct_off), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
176 {"loyal", fldoff(sct_loyal), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY,
177 CA_DUMP},
178 {"terr", 0, NSC_UCHAR, 0, nsc_sct_terr, EF_BAD, 0, CA_DUMP_NONE},
179 {"terr0", fldoff(sct_terr), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
180 {"terr1", fldoff(sct_terr1), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
181 {"terr2", fldoff(sct_terr2), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
182 {"terr3", fldoff(sct_terr3), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
183 {"dterr", fldoff(sct_dterr), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY,
184 CA_DUMP},
185 {"xdist", fldoff(sct_dist_x), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
186 {"ydist", fldoff(sct_dist_y), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
187 {"avail", fldoff(sct_avail), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
188 {"elev", fldoff(sct_elev), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
189 CA_DUMP},
190 {"work", fldoff(sct_work), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
191 {"coastal", fldoff(sct_coastal), NSC_UCHAR, 0, NULL, EF_BAD, 0,
192 CA_DUMP},
193 {"newdes", fldoff(sct_newtype), NSC_CHAR, 0, NULL, EF_SECTOR_CHR, 0,
194 CA_DUMP},
195 {"min", fldoff(sct_min), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
196 {"gold", fldoff(sct_gmin), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
197 {"fert", fldoff(sct_fertil), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
198 {"ocontent", fldoff(sct_oil), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
199 {"uran", fldoff(sct_uran), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
200 {"oldown", fldoff(sct_oldown), NSC_NATID, 0, NULL, EF_NATION, 0,
201 CA_DUMP},
202 {"track", 0, NSC_LONG, 0, nsc_sct_track, EF_BAD, 0, CA_DUMP_NONE},
203 NSC_IVEC(fldoff(sct_item), ""),
204 NSC_IVEC(fldoff(sct_dist), "_dist"),
205 NSC_IVEC(fldoff(sct_del), "_del"),
206 /* should let old owner access mines, but can't express that: */
207 {"mines", fldoff(sct_mines), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
208 CA_DUMP},
209 {"pstage", fldoff(sct_pstage), NSC_SHORT, 0, NULL,
210 EF_PLAGUE_STAGES, NSC_DEITY, CA_DUMP},
211 {"ptime", fldoff(sct_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
212 CA_DUMP},
213 {"che", fldoff(sct_che), NSC_UCHAR, 0, NULL, EF_BAD, NSC_DEITY,
214 CA_DUMP},
215 {"che_target", fldoff(sct_che_target), NSC_NATID, 0, NULL,
216 EF_NATION, NSC_DEITY, CA_DUMP},
217 {"fallout", fldoff(sct_fallout), NSC_USHORT, 0, NULL, EF_BAD, 0,
218 CA_DUMP},
219 {"access", fldoff(sct_access), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
220 {"road", fldoff(sct_road), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
221 {"rail", fldoff(sct_rail), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
222 {"dfense", fldoff(sct_defense), NSC_UCHAR, 0, NULL, EF_BAD, 0,
223 CA_DUMP},
224 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
225 #undef CURSTR
226 };
227
228 struct castr dchr_ca[] = {
229 #define CURSTR struct dchrstr
230 {"uid", fldoff(d_uid), NSC_UCHAR, 0, NULL, EF_SECTOR_CHR, 0, CA_DUMP},
231 {"name", fldoff(d_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
232 {"mnem", fldoff(d_mnem), NSC_STRINGY, 1, NULL, EF_BAD, 0,
233 CA_DUMP_CONST},
234 {"terrain", fldoff(d_terrain), NSC_UCHAR, 0, NULL, EF_SECTOR_CHR, 0,
235 CA_DUMP},
236 {"prd", fldoff(d_prd), NSC_INT, 0, NULL, EF_PRODUCT, 0, CA_DUMP},
237 {"peffic", fldoff(d_peffic), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
238 {"mob0", fldoff(d_mob0), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
239 {"mob1", fldoff(d_mob1), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
240 {"nav", fldoff(d_nav), NSC_SITYPE(enum d_navigation), 0, NULL,
241 EF_SECTOR_NAVIGATION, 0, CA_DUMP},
242 {"pkg", fldoff(d_pkg), NSC_SITYPE(enum i_packing), 0, NULL,
243 EF_PACKING, 0, CA_DUMP},
244 {"ostr", fldoff(d_ostr), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
245 {"dstr", fldoff(d_dstr), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
246 NSC_MVEC(fldoff(d_mat), CA_DUMP_ONLY, CA_DUMP_ONLY, CA_DUMP_ONLY),
247 {"bwork", fldoff(d_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
248 {"cost", fldoff(d_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
249 {"maint", fldoff(d_maint), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
250 {"maxpop", fldoff(d_maxpop), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
251 {"flags", fldoff(d_flags), NSC_INT, 0, NULL,
252 EF_SECTOR_CHR_FLAGS, NSC_BITS, CA_DUMP},
253 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
254 #undef CURSTR
255 };
256
257 #define NSC_GENITEM(ef_type, ef_chr) \
258 {"uid", empobjoff(uid), NSC_INT, 0, NULL, ef_type, 0, CA_DUMP}, \
259 {"timestamp", empobjoff(timestamp), NSC_TIME, 0, NULL, EF_BAD, 0, \
260 CA_DUMP_NONE}, \
261 {"owner", empobjoff(own), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP}, \
262 {"xloc", empobjoff(x), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP}, \
263 {"yloc", empobjoff(y), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP}, \
264 {"type", empobjoff(type), NSC_CHAR, 0, NULL, ef_chr, 0, CA_DUMP}, \
265 {"effic", empobjoff(effic), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP}, \
266 {"mobil", empobjoff(mobil), NSC_CHAR , 0, NULL, EF_BAD, 0, CA_DUMP}, \
267 {"off", empobjoff(off), NSC_UCHAR , 0, NULL, EF_BAD, 0, CA_DUMP}, \
268 {"tech", empobjoff(tech), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP}, \
269 {"group", empobjoff(group), NSC_STRINGY, 1, NULL, EF_BAD, 0, \
270 CA_DUMP_NONE}, \
271 {"opx", empobjoff(opx), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP}, \
272 {"opy", empobjoff(opy), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP}, \
273 {"mission", empobjoff(mission), NSC_SHORT, 0, NULL, EF_MISSIONS, 0, \
274 CA_DUMP}, \
275 {"radius", empobjoff(radius), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP}
276
277 struct castr ship_ca[] = {
278 #define CURSTR struct shpstr
279 NSC_GENITEM(EF_SHIP, EF_SHIP_CHR),
280 {"fleet", fldoff(shp_fleet), NSC_STRINGY, 1, NULL, EF_BAD, 0, CA_DUMP},
281 NSC_IVEC(fldoff(shp_item), ""),
282 {"pstage", fldoff(shp_pstage), NSC_SHORT, 0, NULL,
283 EF_PLAGUE_STAGES, NSC_DEITY, CA_DUMP},
284 {"ptime", fldoff(shp_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
285 CA_DUMP},
286 {"access", fldoff(shp_access), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
287 {"name", fldoff(shp_name), NSC_STRINGY, MAXSHPNAMLEN, NULL,
288 EF_BAD, 0, CA_DUMP},
289 /* should let builder access xbuilt, ybuilt, but can't express that: */
290 {"xbuilt", fldoff(shp_orig_x), NSC_XCOORD, 0, NULL,
291 EF_BAD, NSC_DEITY, CA_DUMP},
292 {"ybuilt", fldoff(shp_orig_y), NSC_YCOORD, 0, NULL,
293 EF_BAD, NSC_DEITY, CA_DUMP},
294 {"builder", fldoff(shp_orig_own), NSC_NATID, 0, NULL,
295 EF_NATION, NSC_DEITY, CA_DUMP},
296 {"rflags", fldoff(shp_rflags), NSC_INT, 0, NULL,
297 EF_RETREAT_FLAGS, NSC_BITS, CA_DUMP},
298 {"rpath", fldoff(shp_rpath), NSC_STRINGY, RET_LEN, NULL, EF_BAD, 0,
299 CA_DUMP},
300 {"nplane", 0, NSC_LONG, 0, nsc_cargo_nplane, EF_BAD, 0, CA_DUMP_NONE},
301 {"nchoppers", 0, NSC_LONG, 0, nsc_cargo_nchopper, EF_BAD, 0,
302 CA_DUMP_NONE},
303 {"nxlight", 0, NSC_LONG, 0, nsc_cargo_nxlight, EF_BAD, 0,
304 CA_DUMP_NONE},
305 {"nland", 0, NSC_LONG, 0, nsc_cargo_nland, EF_BAD, 0, CA_DUMP_NONE},
306 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
307 #undef CURSTR
308 };
309
310 struct castr mchr_ca[] = {
311 #define CURSTR struct mchrstr
312 {"type", fldoff(m_type), NSC_CHAR, 0, NULL, EF_SHIP_CHR, 0, CA_DUMP},
313 {"name", fldoff(m_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
314 NSC_IVEC(fldoff(m_item), ""),
315 NSC_MVEC(fldoff(m_mat), CA_DUMP_ONLY, CA_DUMP_ONLY, CA_DUMP_ONLY),
316 {"armor", fldoff(m_armor), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
317 {"speed", fldoff(m_speed), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
318 {"visib", fldoff(m_visib), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
319 {"vrnge", fldoff(m_vrnge), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
320 {"frnge", fldoff(m_frnge), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
321 {"glim", fldoff(m_glim), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
322 {"nxlight", fldoff(m_nxlight), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
323 {"nchoppers", fldoff(m_nchoppers), NSC_UCHAR, 0, NULL, EF_BAD, 0,
324 CA_DUMP},
325 {"bwork", fldoff(m_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
326 {"tech", fldoff(m_tech), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
327 {"cost", fldoff(m_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
328 {"flags", fldoff(m_flags), NSC_INT, 0, NULL,
329 EF_SHIP_CHR_FLAGS, NSC_BITS, CA_DUMP},
330 {"nplanes", fldoff(m_nplanes), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
331 {"nland", fldoff(m_nland), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
332 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
333 #undef CURSTR
334 };
335
336 struct castr plane_ca[] = {
337 #define CURSTR struct plnstr
338 NSC_GENITEM(EF_PLANE, EF_PLANE_CHR),
339 {"wing", fldoff(pln_wing), NSC_STRINGY, 1, NULL, EF_BAD, 0, CA_DUMP},
340 {"range", fldoff(pln_range), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
341 {"harden", fldoff(pln_harden), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
342 {"ship", fldoff(pln_ship), NSC_INT, 0, NULL, EF_SHIP, 0, CA_DUMP},
343 {"land", fldoff(pln_land), NSC_INT, 0, NULL, EF_LAND, 0, CA_DUMP},
344 {"flags", fldoff(pln_flags), NSC_INT, 0, NULL,
345 EF_PLANE_FLAGS, NSC_BITS, CA_DUMP},
346 {"access", fldoff(pln_access), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
347 {"theta", fldoff(pln_theta), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
348 {"att", 0, NSC_LONG, 0, nsc_pln_att, EF_BAD, 0, CA_DUMP_NONE},
349 {"def", 0, NSC_LONG, 0, nsc_pln_def, EF_BAD, 0, CA_DUMP_NONE},
350 {"nuketype", 0, NSC_LONG, 0, nsc_pln_nuketype, EF_BAD, 0,
351 CA_DUMP_NONE},
352 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
353 #undef CURSTR
354 };
355
356 struct castr plchr_ca[] = {
357 #define CURSTR struct plchrstr
358 {"type", fldoff(pl_type), NSC_CHAR, 0, NULL, EF_PLANE_CHR, 0, CA_DUMP},
359 {"name", fldoff(pl_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
360 NSC_MVEC(fldoff(pl_mat), CA_DUMP, CA_DUMP_ONLY, CA_DUMP_ONLY),
361 {"bwork", fldoff(pl_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
362 {"tech", fldoff(pl_tech), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
363 {"cost", fldoff(pl_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
364 {"acc", fldoff(pl_acc), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
365 {"load", fldoff(pl_load), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
366 {"att", fldoff(pl_att), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
367 {"def", fldoff(pl_def), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
368 {"range", fldoff(pl_range), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
369 {"fuel", fldoff(pl_fuel), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
370 {"stealth", fldoff(pl_stealth), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
371 {"flags", fldoff(pl_flags), NSC_INT, 0, NULL,
372 EF_PLANE_CHR_FLAGS, NSC_BITS, CA_DUMP},
373 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
374 #undef CURSTR
375 };
376
377 struct castr land_ca[] = {
378 #define CURSTR struct lndstr
379 NSC_GENITEM(EF_LAND, EF_LAND_CHR),
380 {"army", fldoff(lnd_army), NSC_STRINGY, 1, NULL, EF_BAD, 0, CA_DUMP},
381 {"ship", fldoff(lnd_ship), NSC_INT, 0, NULL, EF_SHIP, 0, CA_DUMP},
382 {"harden", fldoff(lnd_harden), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
383 {"retreat", fldoff(lnd_retreat), NSC_SHORT, 0, NULL, EF_BAD, 0,
384 CA_DUMP},
385 {"rflags", fldoff(lnd_rflags), NSC_INT, 0, NULL,
386 EF_RETREAT_FLAGS, NSC_BITS, CA_DUMP},
387 {"rpath", fldoff(lnd_rpath), NSC_STRINGY, RET_LEN, NULL, EF_BAD, 0,
388 CA_DUMP},
389 NSC_IVEC(fldoff(lnd_item), ""),
390 {"pstage", fldoff(lnd_pstage), NSC_SHORT, 0, NULL,
391 EF_PLAGUE_STAGES, NSC_DEITY, CA_DUMP},
392 {"ptime", fldoff(lnd_ptime), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
393 CA_DUMP},
394 {"land", fldoff(lnd_land), NSC_INT, 0, NULL, EF_LAND, 0, CA_DUMP},
395 {"access", fldoff(lnd_access), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
396 {"att", 0, NSC_DOUBLE, 0, nsc_lnd_att, EF_BAD, 0, CA_DUMP_NONE},
397 {"def", 0, NSC_DOUBLE, 0, nsc_lnd_def, EF_BAD, 0, CA_DUMP_NONE},
398 {"vul", 0, NSC_LONG, 0, nsc_lnd_vul, EF_BAD, 0, CA_DUMP_NONE},
399 {"spd", 0, NSC_LONG, 0, nsc_lnd_spd, EF_BAD, 0, CA_DUMP_NONE},
400 {"vis", 0, NSC_LONG, 0, nsc_lnd_vis, EF_BAD, 0, CA_DUMP_NONE},
401 {"frg", 0, NSC_LONG, 0, nsc_lnd_frg, EF_BAD, 0, CA_DUMP_NONE},
402 {"acc", 0, NSC_LONG, 0, nsc_lnd_acc, EF_BAD, 0, CA_DUMP_NONE},
403 {"dam", 0, NSC_LONG, 0, nsc_lnd_dam, EF_BAD, 0, CA_DUMP_NONE},
404 {"aaf", 0, NSC_LONG, 0, nsc_lnd_aaf, EF_BAD, 0, CA_DUMP_NONE},
405 {"nland", 0, NSC_LONG, 0, nsc_cargo_nland, EF_BAD, 0, CA_DUMP_NONE},
406 {"nxlight", 0, NSC_LONG, 0, nsc_cargo_nxlight, EF_BAD, 0,
407 CA_DUMP_NONE},
408 #undef CURSTR
409 #define CURSTR struct lchrstr
410 {"spy", fldoff(l_spy), NSC_INT, 0, nsc_lchr, EF_BAD, 0, CA_DUMP_NONE},
411 {"rmax", fldoff(l_rad), NSC_INT, 0, nsc_lchr, EF_BAD, 0, CA_DUMP_NONE},
412 {"ammo", fldoff(l_ammo), NSC_INT, 0, nsc_lchr, EF_BAD, 0,
413 CA_DUMP_NONE},
414 {"maxlight", fldoff(l_nxlight), NSC_UCHAR, 0, nsc_lchr,
415 EF_BAD, 0, CA_DUMP_NONE},
416 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
417 #undef CURSTR
418 };
419
420 struct castr lchr_ca[] = {
421 #define CURSTR struct lchrstr
422 {"type", fldoff(l_type), NSC_CHAR, 0, NULL, EF_LAND_CHR, 0, CA_DUMP},
423 {"name", fldoff(l_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
424 NSC_IVEC(fldoff(l_item), ""),
425 NSC_MVEC(fldoff(l_mat), CA_DUMP_ONLY, CA_DUMP_ONLY, CA_DUMP_ONLY),
426 {"bwork", fldoff(l_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
427 {"tech", fldoff(l_tech), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
428 {"cost", fldoff(l_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
429 {"att", fldoff(l_att), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
430 {"def", fldoff(l_def), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
431 {"vul", fldoff(l_vul), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
432 {"spd", fldoff(l_spd), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
433 {"vis", fldoff(l_vis), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
434 {"spy", fldoff(l_spy), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
435 {"rmax", fldoff(l_rad), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
436 {"frg", fldoff(l_frg), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
437 {"acc", fldoff(l_acc), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
438 {"dam", fldoff(l_dam), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
439 {"ammo", fldoff(l_ammo), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
440 {"aaf", fldoff(l_aaf), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
441 {"flags", fldoff(l_flags), NSC_INT, 0, NULL,
442 EF_LAND_CHR_FLAGS, NSC_BITS, CA_DUMP},
443 {"nxlight", fldoff(l_nxlight), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
444 {"nland", fldoff(l_nland), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
445 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
446 #undef CURSTR
447 };
448
449 struct castr nuke_ca[] = {
450 #define CURSTR struct nukstr
451 NSC_GENITEM(EF_NUKE, EF_NUKE_CHR),
452 {"stockpile", fldoff(nuk_stockpile), NSC_STRINGY, 1, NULL, EF_BAD, 0,
453 CA_DUMP},
454 {"plane", fldoff(nuk_plane), NSC_INT, 0, NULL, EF_PLANE, 0, CA_DUMP},
455 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
456 #undef CURSTR
457 };
458
459 struct castr nchr_ca[] = {
460 #define CURSTR struct nchrstr
461 {"type", fldoff(n_type), NSC_CHAR, 0, NULL, EF_NUKE_CHR, 0, CA_DUMP},
462 {"name", fldoff(n_name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP},
463 NSC_MVEC(fldoff(n_mat), CA_DUMP_ONLY, CA_DUMP, CA_DUMP),
464 {"blast", fldoff(n_blast), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
465 {"dam", fldoff(n_dam), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
466 {"bwork", fldoff(n_bwork), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
467 {"tech", fldoff(n_tech), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
468 {"cost", fldoff(n_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
469 {"weight", fldoff(n_weight), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
470 {"flags", fldoff(n_flags), NSC_INT, 0, NULL,
471 EF_NUKE_CHR_FLAGS, NSC_BITS, CA_DUMP},
472 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
473 #undef CURSTR
474 };
475
476 struct castr loan_ca[] = {
477 #define CURSTR struct lonstr
478 {"uid", fldoff(l_uid), NSC_INT, 0, NULL, EF_LOAN, 0, CA_DUMP},
479 {"timestamp", fldoff(l_timestamp), NSC_TIME, 0, NULL,
480 EF_BAD, 0, CA_DUMP_NONE},
481 {"loaner", fldoff(l_loner), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
482 {"loanee", fldoff(l_lonee), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
483 {"status", fldoff(l_status), NSC_CHAR, 0, NULL,
484 EF_AGREEMENT_STATUS, 0, CA_DUMP},
485 {"irate", fldoff(l_irate), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
486 {"ldur", fldoff(l_ldur), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
487 {"amtpaid", fldoff(l_amtpaid), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
488 {"amtdue", fldoff(l_amtdue), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
489 {"lastpay", fldoff(l_lastpay), NSC_TIME, 0, NULL, EF_BAD, 0, CA_DUMP},
490 {"duedate", fldoff(l_duedate), NSC_TIME, 0, NULL, EF_BAD, 0, CA_DUMP},
491 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
492 #undef CURSTR
493 };
494
495 struct castr news_ca[] = {
496 #define CURSTR struct nwsstr
497 {"timestamp", 0, NSC_LONG, 0, nsc_nws_timestamp, EF_BAD, 0,
498 CA_DUMP_NONE},
499 {"actor", fldoff(nws_ano), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
500 {"action", fldoff(nws_vrb), NSC_UCHAR, 0, NULL, EF_NEWS_CHR, 0,
501 CA_DUMP},
502 {"victim", fldoff(nws_vno), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
503 {"times", fldoff(nws_ntm), NSC_USHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
504 {"duration", fldoff(nws_duration), NSC_SHORT, 0, NULL, EF_BAD, 0,
505 CA_DUMP},
506 {"time", fldoff(nws_when), NSC_TIME, 0, NULL, EF_BAD, 0, CA_DUMP},
507 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
508 #undef CURSTR
509 };
510
511 struct castr lost_ca[] = {
512 #define CURSTR struct loststr
513 /* no need for uid as long as it's not referenced from other tables */
514 {"timestamp", fldoff(lost_timestamp), NSC_TIME, 0, NULL,
515 EF_BAD, 0, CA_DUMP},
516 {"owner", fldoff(lost_owner), NSC_NATID, 0, NULL, EF_NATION, 0,
517 CA_DUMP},
518 {"type", fldoff(lost_type), NSC_SHORT, 0, NULL, EF_TABLE, 0, CA_DUMP},
519 /* id's ca_table given by type, but can't express that: */
520 {"id", fldoff(lost_id), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
521 {"x", fldoff(lost_x), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
522 {"y", fldoff(lost_y), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
523 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
524 #undef CURSTR
525 };
526
527 struct castr commodity_ca[] = {
528 #define CURSTR struct comstr
529 {"uid", fldoff(com_uid), NSC_INT, 0, NULL, EF_COMM, 0, CA_DUMP},
530 {"timestamp", fldoff(com_timestamp), NSC_TIME, 0, NULL,
531 EF_BAD, 0, CA_DUMP_NONE},
532 {"owner", fldoff(com_owner), NSC_NATID, 0, NULL, EF_NATION, 0,
533 CA_DUMP},
534 {"type", fldoff(com_type), NSC_SITYPE(i_type), 0, NULL, EF_ITEM, 0,
535 CA_DUMP},
536 {"amount", fldoff(com_amount), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
537 {"price", fldoff(com_price), NSC_FLOAT, 0, NULL, EF_BAD, 0, CA_DUMP},
538 {"maxbidder", fldoff(com_maxbidder), NSC_INT, 0, NULL, EF_NATION, 0,
539 CA_DUMP},
540 {"markettime", fldoff(com_markettime), NSC_TIME, 0, NULL, EF_BAD, 0,
541 CA_DUMP},
542 /* should let maxbidder access xbuy, ybuy, but can't express that: */
543 {"xbuy", fldoff(com_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY,
544 CA_DUMP},
545 {"ybuy", fldoff(com_y), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY,
546 CA_DUMP},
547 /* should let owner access xsell, ysell, but can't express that: */
548 {"xsell", fldoff(sell_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY,
549 CA_DUMP},
550 {"ysell", fldoff(sell_y), NSC_YCOORD, 0, NULL, EF_BAD, NSC_DEITY,
551 CA_DUMP},
552 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
553 #undef CURSTR
554 };
555
556 struct castr trade_ca[] = {
557 #define CURSTR struct trdstr
558 {"uid", fldoff(trd_uid), NSC_INT, 0, NULL, EF_TRADE, 0, CA_DUMP},
559 {"timestamp", fldoff(trd_timestamp), NSC_TIME, 0, NULL,
560 EF_BAD, 0, CA_DUMP_NONE},
561 {"owner", fldoff(trd_owner), NSC_NATID, 0, NULL, EF_NATION, 0,
562 CA_DUMP},
563 {"type", fldoff(trd_type), NSC_SHORT, 0, NULL, EF_TABLE, 0, CA_DUMP},
564 /* unitid's ca_table given by type, but can't express that: */
565 {"unitid", fldoff(trd_unitid), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
566 {"price", fldoff(trd_price), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
567 {"maxbidder", fldoff(trd_maxbidder), NSC_INT, 0, NULL, EF_NATION, 0,
568 CA_DUMP},
569 {"markettime", fldoff(trd_markettime), NSC_TIME, 0, NULL, EF_BAD, 0,
570 CA_DUMP},
571 /* should let maxbidder access xloc, yloc, but can't express that: */
572 {"xloc", fldoff(trd_x), NSC_XCOORD, 0, NULL, EF_BAD, NSC_DEITY,
573 CA_DUMP},
574 {"yloc", fldoff(trd_y), NSC_YCOORD, 0, NULL, EF_BAD, NSC_DEITY,
575 CA_DUMP},
576 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
577 #undef CURSTR
578 };
579
580 struct castr cou_ca[] = {
581 #define CURSTR struct natstr
582 /*
583 * This is the owner's view, i.e. it applies only to the own
584 * nation. The public view nat_ca[], which applies to all
585 * nations, has the same selectors with different flags: NSC_DEITY
586 * is set except for cnum (which must come first) and all
587 * CA_DUMP_NONE selectors; these become CA_DUMP except for
588 * timestamp (which must come second).
589 * nat_ca[] should also make tech, research, education and
590 * happiness available, but we can't express the obfuscation
591 * necessary for foreign levels.
592 */
593 {"cnum", fldoff(nat_cnum), NSC_NATID, 0, NULL, EF_NATION, 0, CA_DUMP},
594 {"timestamp", fldoff(nat_timestamp), NSC_TIME, 0, NULL,
595 EF_BAD, 0, CA_DUMP_NONE},
596 {"stat", fldoff(nat_stat), NSC_SITYPE(enum nat_status), 0, NULL,
597 EF_NATION_STATUS, 0, CA_DUMP_NONE},
598 {"flags", fldoff(nat_flags), NSC_INT, 0, NULL,
599 EF_NATION_FLAGS, NSC_BITS, CA_DUMP},
600 {"cname", fldoff(nat_cnam), NSC_STRINGY, 20, NULL, EF_BAD, 0,
601 CA_DUMP_NONE},
602 {"passwd", fldoff(nat_pnam), NSC_STRINGY, 20, NULL,
603 EF_BAD, NSC_DEITY, CA_DUMP_NONE},
604 {"ip", fldoff(nat_hostaddr), NSC_STRINGY, 46, NULL, EF_BAD, 0,
605 CA_DUMP},
606 {"userid", fldoff(nat_userid), NSC_STRINGY, 32, NULL, EF_BAD, 0,
607 CA_DUMP},
608 {"xcap", fldoff(nat_xcap), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
609 {"ycap", fldoff(nat_ycap), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
610 {"xorg", fldoff(nat_xorg), NSC_XCOORD, 0, NULL,
611 EF_BAD, NSC_DEITY, CA_DUMP_NONE},
612 {"yorg", fldoff(nat_yorg), NSC_YCOORD, 0, NULL,
613 EF_BAD, NSC_DEITY, CA_DUMP_NONE},
614 {"update", fldoff(nat_update), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
615 {"tgms", fldoff(nat_tgms), NSC_USHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
616 {"ann", fldoff(nat_ann), NSC_USHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
617 {"timeused", fldoff(nat_timeused), NSC_INT, 0, NULL, EF_BAD, 0,
618 CA_DUMP},
619 {"btu", fldoff(nat_btu), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
620 {"access", fldoff(nat_access), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
621 {"milreserve", fldoff(nat_reserve), NSC_INT, 0, NULL, EF_BAD, 0,
622 CA_DUMP},
623 {"money", fldoff(nat_money), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
624 {"login", fldoff(nat_last_login), NSC_TIME, 0, NULL, EF_BAD, 0,
625 CA_DUMP},
626 {"logout", fldoff(nat_last_logout), NSC_TIME, 0, NULL, EF_BAD, 0,
627 CA_DUMP},
628 {"newstim", fldoff(nat_newstim), NSC_TIME, 0, NULL, EF_BAD, 0,
629 CA_DUMP},
630 {"annotim", fldoff(nat_annotim), NSC_TIME, 0, NULL, EF_BAD, 0,
631 CA_DUMP},
632 {"tech", fldoff(nat_level[NAT_TLEV]), NSC_FLOAT, 0, NULL, EF_BAD, 0,
633 CA_DUMP},
634 {"research", fldoff(nat_level[NAT_RLEV]), NSC_FLOAT, 0, NULL,
635 EF_BAD, 0, CA_DUMP},
636 {"education", fldoff(nat_level[NAT_ELEV]), NSC_FLOAT, 0, NULL,
637 EF_BAD, 0, CA_DUMP},
638 {"happiness", fldoff(nat_level[NAT_HLEV]), NSC_FLOAT, 0, NULL,
639 EF_BAD, 0, CA_DUMP},
640 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
641 #undef CURSTR
642 };
643
644 struct castr nat_ca[ARRAY_SIZE(cou_ca)];
645 /* initialized by nsc_init() */
646
647 struct castr relat_ca[] = {
648 #define CURSTR struct relatstr
649 {"uid", fldoff(rel_uid), NSC_INT, 0, NULL, EF_RELAT, 0, CA_DUMP},
650 {"timestamp", fldoff(rel_timestamp), NSC_TIME, 0, NULL,
651 EF_BAD, 0, CA_DUMP_NONE},
652 {"relations", fldoff(rel_relate), NSC_UCHAR, MAXNOC, NULL,
653 EF_NATION_RELATIONS, NSC_HIDDEN, CA_DUMP},
654 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
655 #undef CURSTR
656 };
657
658 struct castr contact_ca[] = {
659 #define CURSTR struct contactstr
660 {"uid", fldoff(con_uid), NSC_INT, 0, NULL, EF_CONTACT, 0, CA_DUMP},
661 {"timestamp", fldoff(con_timestamp), NSC_TIME, 0, NULL,
662 EF_BAD, 0, CA_DUMP_NONE},
663 /* mortals know there's contact (relations show), but not how strong */
664 {"contacts", fldoff(con_contact), NSC_UCHAR, MAXNOC, NULL,
665 EF_BAD, NSC_DEITY, CA_DUMP},
666 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
667 #undef CURSTR
668 };
669
670 struct castr reject_ca[] = {
671 #define CURSTR struct rejectstr
672 {"uid", fldoff(rej_uid), NSC_INT, 0, NULL, EF_REJECT, 0, CA_DUMP},
673 {"timestamp", fldoff(rej_timestamp), NSC_TIME, 0, NULL,
674 EF_BAD, 0, CA_DUMP_NONE},
675 {"rejects", fldoff(rej_rejects), NSC_UCHAR, MAXNOC, NULL,
676 EF_NATION_REJECTS, NSC_BITS, CA_DUMP},
677 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
678 #undef CURSTR
679 };
680
681 struct castr realm_ca[] = {
682 #define CURSTR struct realmstr
683 /* uid is encoded in cnum, realm */
684 {"timestamp", fldoff(r_timestamp), NSC_TIME, 0, NULL,
685 EF_BAD, 0, CA_DUMP_NONE},
686 {"cnum", fldoff(r_cnum), NSC_NATID, 0, NULL, EF_NATION, 0,
687 CA_DUMP_CONST},
688 {"realm", fldoff(r_realm), NSC_USHORT, 0, NULL, EF_BAD, 0,
689 CA_DUMP_CONST},
690 {"xl", fldoff(r_xl), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
691 {"xh", fldoff(r_xh), NSC_XCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
692 {"yl", fldoff(r_yl), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
693 {"yh", fldoff(r_yh), NSC_YCOORD, 0, NULL, EF_BAD, 0, CA_DUMP},
694 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
695 #undef CURSTR
696 };
697
698 struct castr game_ca[] = {
699 #define CURSTR struct gamestr
700 /* no need for uid */
701 {"timestamp", fldoff(game_timestamp), NSC_TIME, 0, NULL,
702 EF_BAD, 0, CA_DUMP_NONE},
703 {"upd_disable", fldoff(game_upd_disable), NSC_CHAR, 0, NULL,
704 EF_BAD, 0, CA_DUMP},
705 {"down", fldoff(game_down), NSC_CHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
706 {"turn", fldoff(game_turn), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
707 {"tick", fldoff(game_tick), NSC_SHORT, 0, NULL, EF_BAD, NSC_DEITY,
708 CA_DUMP},
709 {"rt", fldoff(game_rt), NSC_TIME, 0, NULL, EF_BAD, NSC_DEITY, CA_DUMP},
710 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
711 #undef CURSTR
712 };
713
714 struct castr intrchr_ca[] = {
715 #define CURSTR struct sctintrins
716 /* no need for uid as long as it's not referenced from other tables */
717 {"name", fldoff(in_name), NSC_STRING, 0, NULL, EF_BAD, 0,
718 CA_DUMP_CONST},
719 NSC_MVEC(fldoff(in_mat), CA_DUMP_ONLY, CA_DUMP_ONLY, CA_DUMP_ONLY),
720 {"bmobil", fldoff(in_bmobil), NSC_SHORT, 0, NULL, EF_BAD, 0, CA_DUMP},
721 {"cost", fldoff(in_cost), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP},
722 {"enable", fldoff(in_enable), NSC_UCHAR, 0, NULL, EF_BAD, 0, CA_DUMP},
723 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
724 #undef CURSTR
725 };
726
727 struct castr rpt_ca[] = {
728 #define CURSTR struct rptstr
729 {"uid", fldoff(r_uid), NSC_CHAR, 0, NULL, EF_NEWS_CHR, 0, CA_DUMP},
730 {"newstory", fldoff(r_newstory), NSC_STRING, NUM_RPTS, NULL,
731 EF_BAD, 0, CA_DUMP},
732 {"good_will", fldoff(r_good_will), NSC_INT, 0, NULL, EF_BAD, 0,
733 CA_DUMP},
734 {"newspage", fldoff(r_newspage), NSC_INT, 0, NULL,
735 EF_PAGE_HEADINGS, 0, CA_DUMP},
736 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
737 #undef CURSTR
738 };
739
740 struct castr update_ca[] = {
741 {"time", 0, NSC_TIME, 0, NULL, EF_BAD, 0, CA_DUMP},
742 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
743 };
744
745 struct castr empfile_ca[] = {
746 #define CURSTR struct empfile
747 {"uid", fldoff(uid), NSC_INT, 0, NULL, EF_TABLE, 0, CA_DUMP},
748 {"name", fldoff(name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP_CONST},
749 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
750 #undef CURSTR
751 };
752
753 struct castr symbol_ca[] = {
754 #define CURSTR struct symbol
755 /*
756 * value is const because it has to match what is compiled into
757 * the server. name is const because clients key on it.
758 */
759 {"value", fldoff(value), NSC_INT, 0, NULL, EF_BAD, 0, CA_DUMP_CONST},
760 {"name", fldoff(name), NSC_STRING, 0, NULL, EF_BAD, 0, CA_DUMP_CONST},
761 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
762 #undef CURSTR
763 };
764
765 struct castr mdchr_ca[] = {
766 #define CURSTR struct castr
767 /* no need for uid */
768 /* name must come first, clients may rely on it */
769 {"name", fldoff(ca_name), NSC_STRING, 0, NULL, EF_BAD, 0,
770 CA_DUMP_CONST},
771 {"type", fldoff(ca_type), NSC_LONG, 0, nsc_meta_type,
772 EF_META_TYPE, 0, CA_DUMP_CONST},
773 {"flags", fldoff(ca_flags), NSC_INT, 0, NULL,
774 EF_META_FLAGS, NSC_BITS, CA_DUMP_CONST},
775 {"len", fldoff(ca_len), NSC_LONG, 0, nsc_meta_len,
776 EF_BAD, 0, CA_DUMP_CONST},
777 {"table", fldoff(ca_table), NSC_INT, 0, NULL, EF_TABLE, 0,
778 CA_DUMP_CONST},
779 {NULL, 0, NSC_NOTYPE, 0, NULL, EF_BAD, 0, CA_DUMP}
780 #undef CURSTR
781 };
782
783 void
nsc_init(void)784 nsc_init(void)
785 {
786 static struct castr version_ca0 = {
787 "version", 0, NSC_STRING, 0, nsc_ver_version, EF_BAD, 0, CA_DUMP
788 };
789 static struct castr version_ca1 = {
790 "maxnoc", 0, NSC_LONG, 0, nsc_ver_maxnoc, EF_BAD, 0, CA_DUMP
791 };
792 static struct castr *ca;
793 struct keymatch *kp;
794 int n, i;
795
796 /* derive empfile[EF_VERSION].cadef from configkeys[] */
797 n = 0;
798 for (kp = configkeys; kp->km_key; ++kp) {
799 if (kp->km_type != NSC_NOTYPE && !(kp->km_flags & KM_INTERNAL))
800 n++;
801 }
802 ca = calloc(2 + n + 1, sizeof(*ca));
803 ca[0] = version_ca0;
804 ca[1] = version_ca1;
805 i = 2;
806 for (kp = configkeys; kp->km_key; ++kp) {
807 if (kp->km_type != NSC_NOTYPE && !(kp->km_flags & KM_INTERNAL)) {
808 ca[i].ca_type = kp->km_type;
809 ca[i].ca_off = kp - configkeys;
810 ca[i].ca_name = kp->km_key;
811 ca[i].ca_table = EF_BAD;
812 ca[i].ca_get = nsc_ver;
813 i++;
814 }
815 }
816 empfile[EF_VERSION].cadef = ca;
817
818 /* derive nat_ca[] from cou_ca[] */
819 nat_ca[0] = cou_ca[0]; /* cnum */
820 nat_ca[1] = cou_ca[1]; /* timestamp */
821 for (i = 2; cou_ca[i].ca_name; i++) {
822 nat_ca[i] = cou_ca[i];
823 if (nat_ca[i].ca_dump == CA_DUMP_NONE)
824 nat_ca[i].ca_dump = CA_DUMP;
825 else
826 nat_ca[i].ca_flags |= NSC_DEITY;
827 }
828 nat_ca[i] = cou_ca[i]; /* sentinel */
829 }
830
831 /*
832 * Virtual selectors
833 */
834
835 static void *
nsc_ver(struct valstr * val,struct natstr * np,void * ptr)836 nsc_ver(struct valstr *val, struct natstr *np, void *ptr)
837 {
838 struct keymatch *kp = &configkeys[val->val_as.sym.off];
839 val->val_as.sym.off = 0;
840 val->val_as.sym.get = NULL;
841 return kp->km_data;
842 }
843
844 static void *
nsc_ver_maxnoc(struct valstr * val,struct natstr * np,void * ptr)845 nsc_ver_maxnoc(struct valstr *val, struct natstr *np, void *ptr)
846 {
847 val->val_as.lng = MAXNOC;
848 return NULL;
849 }
850
851 static void *
nsc_ver_version(struct valstr * val,struct natstr * np,void * ptr)852 nsc_ver_version(struct valstr *val, struct natstr *np, void *ptr)
853 {
854 val->val_as.str.base = version;
855 val->val_as.str.maxsz = INT_MAX; /* really SIZE_MAX, but that's C99 */
856 return NULL;
857 }
858
859 static void *
nsc_sct_terr(struct valstr * val,struct natstr * np,void * ptr)860 nsc_sct_terr(struct valstr *val, struct natstr *np, void *ptr)
861 {
862 if (!np || np->nat_stat == STAT_GOD)
863 val->val_as.sym.off = offsetof(struct sctstr, sct_dterr);
864 else
865 val->val_as.sym.off = offsetof(struct sctstr, sct_terr);
866 val->val_as.sym.get = NULL;
867 return ptr;
868 }
869
870 static void *
nsc_sct_track(struct valstr * val,struct natstr * np,void * ptr)871 nsc_sct_track(struct valstr *val, struct natstr *np, void *ptr)
872 {
873 val->val_as.lng = sct_rail_track(ptr);
874 return NULL;
875 }
876
877 static void *
nsc_cargo_nplane(struct valstr * val,struct natstr * np,void * ptr)878 nsc_cargo_nplane(struct valstr *val, struct natstr *np, void *ptr)
879 {
880 struct empobj *obj = ptr;
881 int n, nch, nxl;
882
883 n = unit_nplane(obj->ef_type, obj->uid, &nch, &nxl, NULL);
884 val->val_as.lng = n - nch - nxl;
885 return NULL;
886 }
887
888 static void *
nsc_cargo_nchopper(struct valstr * val,struct natstr * np,void * ptr)889 nsc_cargo_nchopper(struct valstr *val, struct natstr *np, void *ptr)
890 {
891 struct empobj *obj = ptr;
892 int n;
893
894 unit_nplane(obj->ef_type, obj->uid, &n, NULL, NULL);
895 val->val_as.lng = n;
896 return NULL;
897 }
898
899 static void *
nsc_cargo_nxlight(struct valstr * val,struct natstr * np,void * ptr)900 nsc_cargo_nxlight(struct valstr *val, struct natstr *np, void *ptr)
901 {
902 struct empobj *obj = ptr;
903 int n;
904
905 unit_nplane(obj->ef_type, obj->uid, NULL, &n, NULL);
906 val->val_as.lng = n;
907 return NULL;
908 }
909
910 static void *
nsc_cargo_nland(struct valstr * val,struct natstr * np,void * ptr)911 nsc_cargo_nland(struct valstr *val, struct natstr *np, void *ptr)
912 {
913 struct empobj *obj = ptr;
914
915 val->val_as.lng = unit_cargo_count(obj->ef_type, obj->uid, EF_LAND);
916 return NULL;
917 }
918
919 static void *
nsc_pln_def(struct valstr * val,struct natstr * np,void * ptr)920 nsc_pln_def(struct valstr *val, struct natstr *np, void *ptr)
921 {
922 val->val_as.lng = pln_def(ptr);;
923 return NULL;
924 }
925
926 static void *
nsc_pln_att(struct valstr * val,struct natstr * np,void * ptr)927 nsc_pln_att(struct valstr *val, struct natstr *np, void *ptr)
928 {
929 val->val_as.lng = pln_att(ptr);
930 return NULL;
931 }
932
933 static void *
nsc_pln_nuketype(struct valstr * val,struct natstr * np,void * ptr)934 nsc_pln_nuketype(struct valstr *val, struct natstr *np, void *ptr)
935 {
936 struct nukstr *nukp = getnukep(nuk_on_plane(ptr));
937 val->val_as.lng = nukp ? nukp->nuk_type : -1;
938 return NULL;
939 }
940
941 static void *
nsc_lnd_att(struct valstr * val,struct natstr * np,void * ptr)942 nsc_lnd_att(struct valstr *val, struct natstr *np, void *ptr)
943 {
944 val->val_as.dbl = lnd_att(ptr);
945 return NULL;
946 }
947
948 static void *
nsc_lnd_def(struct valstr * val,struct natstr * np,void * ptr)949 nsc_lnd_def(struct valstr *val, struct natstr *np, void *ptr)
950 {
951 val->val_as.dbl = lnd_def(ptr);
952 return NULL;
953 }
954
955 static void *
nsc_lnd_vul(struct valstr * val,struct natstr * np,void * ptr)956 nsc_lnd_vul(struct valstr *val, struct natstr *np, void *ptr)
957 {
958 val->val_as.lng = lnd_vul(ptr);
959 return NULL;
960 }
961
962 static void *
nsc_lnd_spd(struct valstr * val,struct natstr * np,void * ptr)963 nsc_lnd_spd(struct valstr *val, struct natstr *np, void *ptr)
964 {
965 val->val_as.lng = lnd_spd(ptr);
966 return NULL;
967 }
968
969 static void *
nsc_lnd_vis(struct valstr * val,struct natstr * np,void * ptr)970 nsc_lnd_vis(struct valstr *val, struct natstr *np, void *ptr)
971 {
972 val->val_as.lng = lnd_vis(ptr);
973 return NULL;
974 }
975
976 static void *
nsc_lnd_frg(struct valstr * val,struct natstr * np,void * ptr)977 nsc_lnd_frg(struct valstr *val, struct natstr *np, void *ptr)
978 {
979 val->val_as.lng = lnd_frg(ptr);
980 return NULL;
981 }
982
983 static void *
nsc_lnd_acc(struct valstr * val,struct natstr * np,void * ptr)984 nsc_lnd_acc(struct valstr *val, struct natstr *np, void *ptr)
985 {
986 val->val_as.lng = lnd_acc(ptr);
987 return NULL;
988 }
989
990 static void *
nsc_lnd_dam(struct valstr * val,struct natstr * np,void * ptr)991 nsc_lnd_dam(struct valstr *val, struct natstr *np, void *ptr)
992 {
993 val->val_as.lng = lnd_dam(ptr);
994 return NULL;
995 }
996
997 static void *
nsc_lnd_aaf(struct valstr * val,struct natstr * np,void * ptr)998 nsc_lnd_aaf(struct valstr *val, struct natstr *np, void *ptr)
999 {
1000 val->val_as.lng = lnd_aaf(ptr);
1001 return NULL;
1002 }
1003
1004 static void *
nsc_lchr(struct valstr * val,struct natstr * np,void * ptr)1005 nsc_lchr(struct valstr *val, struct natstr *np, void *ptr)
1006 {
1007 val->val_as.sym.get = NULL;
1008 return lchr + ((struct lndstr *)ptr)->lnd_type;
1009 }
1010
1011 static void *
nsc_nws_timestamp(struct valstr * val,struct natstr * natp,void * ptr)1012 nsc_nws_timestamp(struct valstr *val, struct natstr *natp, void *ptr)
1013 {
1014 struct nwsstr *np = ptr;
1015
1016 val->val_as.lng = np->nws_when + np->nws_duration;
1017 return NULL;
1018 }
1019
1020 static void *
nsc_meta_type(struct valstr * val,struct natstr * natp,void * ptr)1021 nsc_meta_type(struct valstr *val, struct natstr *natp, void *ptr)
1022 {
1023 val->val_as.lng = nstr_promote(((struct castr *)ptr)->ca_type);
1024 return NULL;
1025 }
1026
1027 static void *
nsc_meta_len(struct valstr * val,struct natstr * natp,void * ptr)1028 nsc_meta_len(struct valstr *val, struct natstr *natp, void *ptr)
1029 {
1030 struct castr *ca = ptr;
1031
1032 val->val_as.lng = ca->ca_type == NSC_STRINGY ? 0 : ca->ca_len;
1033 return NULL;
1034 }
1035