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