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-2005, 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 the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
  23  *  related information and legal notices. It is expected that any future
  24  *  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
  32  *
  33  */
  34
  35 #include <stddef.h>
  36 #include "misc.h"
  37 #include "xy.h"
  38 #include "loan.h"
  39 #include "nsc.h"
  40 #include "news.h"
  41 #include "nuke.h"
  42 #include "plane.h"
  43 #include "ship.h"
  44 #include "land.h"
  45 #include "sect.h"
  46 #include "trade.h"
  47 #include "treaty.h"
  48 #include "genitem.h"
  49 #include "nat.h"
  50 #include "map.h"
  51 #include "commodity.h"
  52 #include "lost.h"
  53 #include "product.h"
  54 #include "file.h"
  55
  56 #define fldoff(str, fld) offsetof(struct str, fld)
  57
  58 #define NSC_IELT(name, pfx, sfx, base, itype)           \
  59 {NSC_SHORT, 0, 0, ((base) + (itype)*sizeof(u_short)),   \
  60 sizeof(sfx) == 1 ? name : pfx sfx, EF_BAD}
  61
  62 #define NSC_IVEC(base, sfx)             \
  63 NSC_IELT("civil", "c", sfx, base, I_CIVIL),     \
  64 NSC_IELT("milit", "m", sfx, base, I_MILIT),     \
  65 NSC_IELT("shell", "s", sfx, base, I_SHELL),     \
  66 NSC_IELT("gun", "g", sfx, base, I_GUN),         \
  67 NSC_IELT("petrol", "p", sfx, base, I_PETROL),   \
  68 NSC_IELT("iron", "i", sfx, base, I_IRON),       \
  69 NSC_IELT("dust", "d", sfx, base, I_DUST),       \
  70 NSC_IELT("bar", "b", sfx, base, I_BAR),         \
  71 NSC_IELT("food", "f", sfx, base, I_FOOD),       \
  72 NSC_IELT("oil", "o", sfx, base, I_OIL),         \
  73 NSC_IELT("lcm", "l", sfx, base, I_LCM),         \
  74 NSC_IELT("hcm", "h", sfx, base, I_HCM),         \
  75 NSC_IELT("uw", "u", sfx, base, I_UW),           \
  76 NSC_IELT("rad", "r", sfx, base, I_RAD)
  77
  78 struct castr ichr_ca[] = {
  79     {NSC_SITYPE(i_type), 0, 0, offsetof(struct ichrstr, i_vtype), "vtype", EF_ITEM},
  80     {NSC_STRING, 0, 0, offsetof(struct ichrstr, i_name), "name", EF_BAD},
  81     {NSC_INT, NSC_CONST, 0, offsetof(struct ichrstr, i_mnem), "mnem", EF_BAD},
  82     {NSC_INT, 0, 0, offsetof(struct ichrstr, i_value), "value", EF_BAD},
  83     {NSC_INT, 0, 0, offsetof(struct ichrstr, i_sell), "sell", EF_BAD},
  84     {NSC_INT, 0, 0, offsetof(struct ichrstr, i_lbs), "lbs", EF_BAD},
  85     {NSC_INT, 0, NUMPKG, offsetof(struct ichrstr, i_pkg), "pkg", EF_BAD},
  86     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
  87 };
  88
  89 struct castr pchr_ca[] = {
  90     {NSC_STRING, 0, 0, offsetof(struct pchrstr, p_name), "name", EF_BAD},
  91     {NSC_STRING, NSC_CONST, 0, offsetof(struct pchrstr, p_sname), "sname", EF_BAD},
  92     {NSC_SITYPE(i_type), 0, MAXPRCON, offsetof(struct pchrstr, p_ctype), "ctype", EF_ITEM},
  93     {NSC_USHORT, 0, MAXPRCON, offsetof(struct pchrstr, p_camt), "camt", EF_BAD},
  94     {NSC_SITYPE(i_type), 0, 0, offsetof(struct pchrstr, p_type), "type", EF_ITEM},
  95     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_level), "level", EF_BAD},
  96     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_cost), "cost", EF_BAD},
  97     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_nrndx), "nrndx", EF_BAD},
  98     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_nrdep), "nrdep", EF_BAD},
  99     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_nlndx), "nlndx", EF_BAD},
 100     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_nlmin), "nlmin", EF_BAD},
 101     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_nllag), "nllag", EF_BAD},
 102     {NSC_INT, 0, 0, offsetof(struct pchrstr, p_effic), "effic", EF_BAD},
 103     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 104 };
 105
 106 struct castr sect_ca[] = {
 107     {NSC_NATID, 0, 0, fldoff(sctstr, sct_own), "owner", EF_NATION},
 108     {NSC_XCOORD, 0, 0, fldoff(sctstr, sct_x), "xloc", EF_BAD},
 109     {NSC_YCOORD, 0, 0, fldoff(sctstr, sct_y), "yloc", EF_BAD},
 110     {NSC_TYPEID, 0, 0, fldoff(sctstr, sct_type), "des", EF_SECTOR_CHR},
 111     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_effic), "effic", EF_BAD},
 112     {NSC_SHORT, 0, 0, fldoff(sctstr, sct_mobil), "mobil", EF_BAD},
 113     {NSC_UCHAR, NSC_DEITY, 0, fldoff(sctstr, sct_loyal), "loyal", EF_BAD},
 114     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_terr), "terr", EF_BAD},
 115     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(sctstr, sct_terr), "terr0", EF_BAD},
 116     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_terr1), "terr1", EF_BAD},
 117     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_terr2), "terr2", EF_BAD},
 118     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_terr3), "terr3", EF_BAD},
 119     {NSC_XCOORD, 0, 0, fldoff(sctstr, sct_dist_x), "xdist", EF_BAD},
 120     {NSC_YCOORD, 0, 0, fldoff(sctstr, sct_dist_y), "ydist", EF_BAD},
 121     {NSC_SHORT, 0, 0, fldoff(sctstr, sct_avail), "avail", EF_BAD},
 122     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_work), "work", EF_BAD},
 123     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(sctstr, sct_coastal), "coastal", EF_BAD},
 124     {NSC_TYPEID, 0, 0, fldoff(sctstr, sct_newtype), "newdes", EF_SECTOR_CHR},
 125     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_min), "min", EF_BAD},
 126     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_gmin), "gold", EF_BAD},
 127     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_fertil), "fert", EF_BAD},
 128     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_oil), "ocontent", EF_BAD},
 129     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_uran), "uran", EF_BAD},
 130     {NSC_NATID, 0, 0, fldoff(sctstr, sct_oldown), "oldown", EF_NATION},
 131     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_off), "off", EF_BAD},
 132     NSC_IVEC(fldoff(sctstr, sct_item), ""),
 133     NSC_IVEC(fldoff(sctstr, sct_dist), "_dist"),
 134     NSC_IVEC(fldoff(sctstr, sct_del), "_del"),
 135     {NSC_SHORT, NSC_DEITY, 0, fldoff(sctstr, sct_mines), "mines", EF_BAD},
 136     {NSC_SHORT, NSC_DEITY, 0, fldoff(sctstr, sct_pstage), "pstage", EF_BAD},
 137     {NSC_SHORT, NSC_DEITY, 0, fldoff(sctstr, sct_ptime), "ptime", EF_BAD},
 138     {NSC_UCHAR, NSC_DEITY, 0, fldoff(sctstr, sct_che), "che", EF_BAD},
 139     {NSC_NATID, NSC_DEITY, 0, fldoff(sctstr, sct_che_target), "che_target", EF_NATION},
 140     {NSC_USHORT, 0, 0, fldoff(sctstr, sct_fallout), "fallout", EF_BAD},
 141     {NSC_TIME, 0, 0, fldoff(sctstr, sct_access), "access", EF_BAD},
 142     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_road), "road", EF_BAD},
 143     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_rail), "rail", EF_BAD},
 144     {NSC_UCHAR, 0, 0, fldoff(sctstr, sct_defense), "dfense", EF_BAD},
 145     {NSC_TIME, NSC_EXTRA, 0, fldoff(sctstr, sct_timestamp), "timestamp", EF_BAD},
 146     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 147 };
 148
 149 struct castr dchr_ca[] = {
 150     {NSC_STRING, 0, 0, offsetof(struct dchrstr, d_name), "name", EF_BAD},
 151     {NSC_INT, NSC_CONST, 0, offsetof(struct dchrstr, d_mnem), "mnem", EF_BAD},
 152     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_prd), "prd", EF_BAD},
 153     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_mcst), "mcst", EF_BAD},
 154     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_flg), "flg", EF_BAD},
 155     {NSC_SITYPE(i_packing), 0, 0, offsetof(struct dchrstr, d_pkg), "pkg", EF_BAD},
 156     {NSC_FLOAT, 0, 0, offsetof(struct dchrstr, d_ostr), "ostr", EF_BAD},
 157     {NSC_FLOAT, 0, 0, offsetof(struct dchrstr, d_dstr), "dstr", EF_BAD},
 158     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_value), "value", EF_BAD},
 159     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_cost), "cost", EF_BAD},
 160     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_build), "build", EF_BAD},
 161     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_lcms), "lcms", EF_BAD},
 162     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_hcms), "hcms", EF_BAD},
 163     {NSC_INT, 0, 0, offsetof(struct dchrstr, d_maxpop), "maxpop", EF_BAD},
 164     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 165 };
 166
 167 #define NSC_GENITEM(ef_type, ef_chr)                                    \
 168 { NSC_SHORT, 0, 0, fldoff(genitem, uid), "uid", ef_type},               \
 169 { NSC_NATID, 0, 0, fldoff(genitem, own), "owner", EF_NATION},           \
 170 { NSC_XCOORD, 0, 0, fldoff(genitem, x), "xloc", EF_BAD},                \
 171 { NSC_YCOORD, 0, 0, fldoff(genitem, y), "yloc", EF_BAD},                \
 172 { NSC_TYPEID, 0, 0, fldoff(genitem, type), "type", ef_chr},             \
 173 { NSC_CHAR, 0, 0, fldoff(genitem, effic), "effic", EF_BAD},             \
 174 { NSC_CHAR , 0, 0, fldoff(genitem, mobil), "mobil", EF_BAD},            \
 175 { NSC_SHORT, 0, 0, fldoff(genitem, tech), "tech", EF_BAD},              \
 176 { NSC_CHAR, NSC_EXTRA, 0, fldoff(genitem, group), "group", EF_BAD},     \
 177 { NSC_XCOORD, 0, 0, fldoff(genitem, opx), "opx", EF_BAD},               \
 178 { NSC_YCOORD, 0, 0, fldoff(genitem, opy), "opy", EF_BAD},               \
 179 { NSC_SHORT, 0, 0, fldoff(genitem, mission), "mission", EF_BAD},        \
 180 { NSC_SHORT, 0, 0, fldoff(genitem, radius), "radius", EF_BAD}
 181
 182 struct castr ship_ca[] = {
 183     NSC_GENITEM(EF_SHIP, EF_SHIP_CHR),
 184     {NSC_CHAR, 0, 0, fldoff(shpstr, shp_fleet), "fleet", EF_BAD},
 185     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(shpstr, shp_nplane), "nplane", EF_BAD},
 186     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(shpstr, shp_nland), "nland", EF_BAD},
 187     {NSC_XCOORD, 0, 0, fldoff(shpstr, shp_destx[0]), "xstart", EF_BAD},
 188     {NSC_XCOORD, 0, 0, fldoff(shpstr, shp_destx[1]), "xend", EF_BAD},
 189     {NSC_YCOORD, 0, 0, fldoff(shpstr, shp_desty[0]), "ystart", EF_BAD},
 190     {NSC_YCOORD, 0, 0, fldoff(shpstr, shp_desty[1]), "yend", EF_BAD},
 191     {NSC_SITYPE(i_type), 0, TMAX, fldoff(shpstr, shp_tstart), "cargostart", EF_ITEM},
 192     {NSC_SITYPE(i_type), 0, TMAX, fldoff(shpstr, shp_tend), "cargoend", EF_ITEM},
 193     {NSC_SHORT, 0, TMAX, fldoff(shpstr, shp_lstart), "amtstart", EF_BAD},
 194     {NSC_SHORT, 0, TMAX, fldoff(shpstr, shp_lend), "amtend", EF_BAD},
 195     {NSC_UCHAR, 0, 0, fldoff(shpstr, shp_autonav), "autonav", EF_BAD},
 196     NSC_IVEC(fldoff(shpstr, shp_item), ""),
 197     {NSC_SHORT, NSC_DEITY, 0, fldoff(shpstr, shp_pstage), "pstage", EF_BAD},
 198     {NSC_SHORT, NSC_DEITY, 0, fldoff(shpstr, shp_ptime), "ptime", EF_BAD},
 199     {NSC_TIME, 0, 0, fldoff(shpstr, shp_access), "access", EF_BAD},
 200     {NSC_TIME, NSC_EXTRA, 0, fldoff(shpstr, shp_timestamp), "timestamp", EF_BAD},
 201     {NSC_UCHAR, 0, 0, fldoff(shpstr, shp_mobquota), "mquota", EF_BAD},
 202     {NSC_STRINGY, 0, MAXSHPPATH, fldoff(shpstr, shp_path), "path", EF_BAD},
 203     {NSC_SHORT, 0, 0, fldoff(shpstr, shp_follow), "follow", EF_BAD},
 204     {NSC_STRINGY, 0, MAXSHPNAMLEN, fldoff(shpstr, shp_name), "name", EF_BAD},
 205     {NSC_UCHAR, 0, 0, fldoff(shpstr, shp_fuel), "fuel", EF_BAD},
 206     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(shpstr, shp_nchoppers), "nchoppers", EF_BAD},
 207     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(shpstr, shp_nxlight), "nxlight", EF_BAD},
 208     /* could let builder access these, but we can't express that yet: */
 209     {NSC_XCOORD, NSC_DEITY, 0, fldoff(shpstr, shp_orig_x), "xbuilt", EF_BAD},
 210     {NSC_YCOORD, NSC_DEITY, 0, fldoff(shpstr, shp_orig_y), "ybuilt", EF_BAD},
 211     {NSC_NATID, NSC_DEITY, 0, fldoff(shpstr, shp_orig_own), "builder", EF_NATION},
 212     {NSC_INT, 0, 0, fldoff(shpstr, shp_rflags), "rflags", EF_BAD},
 213     {NSC_STRINGY, 0, RET_LEN, fldoff(shpstr, shp_rpath), "rpath", EF_BAD},
 214     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 215 };
 216
 217 struct castr mchr_ca[] = {
 218     {NSC_STRING, 0, 0, offsetof(struct mchrstr, m_name), "name", EF_BAD},
 219     {NSC_USHORT, 0, I_MAX+1, offsetof(struct mchrstr, m_item), "item", EF_BAD},
 220     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_lcm), "lcm", EF_BAD},
 221     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_hcm), "hcm", EF_BAD},
 222     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_armor), "armor", EF_BAD},
 223     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_speed), "speed", EF_BAD},
 224     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_visib), "visib", EF_BAD},
 225     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_vrnge), "vrnge", EF_BAD},
 226     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_frnge), "frnge", EF_BAD},
 227     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_glim), "glim", EF_BAD},
 228     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_nxlight), "nxlight", EF_BAD},
 229     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_nchoppers), "nchoppers", EF_BAD},
 230     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_fuelc), "fuelc", EF_BAD},
 231     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_fuelu), "fuelu", EF_BAD},
 232     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_tech), "tech", EF_BAD},
 233     {NSC_INT, 0, 0, offsetof(struct mchrstr, m_cost), "cost", EF_BAD},
 234     {NSC_LONG, 0, 0, offsetof(struct mchrstr, m_flags), "flags", EF_SHIP_CHR_FLAGS},
 235     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_nplanes), "nplanes", EF_BAD},
 236     {NSC_UCHAR, 0, 0, offsetof(struct mchrstr, m_nland), "nland", EF_BAD},
 237     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 238 };
 239
 240 struct castr plane_ca[] = {
 241     NSC_GENITEM(EF_PLANE, EF_PLANE_CHR),
 242     {NSC_CHAR, 0, 0, fldoff(plnstr, pln_wing), "wing", EF_BAD},
 243     {NSC_UCHAR, 0, 0, fldoff(plnstr, pln_range), "range", EF_BAD},
 244     {NSC_SHORT, 0, 0, fldoff(plnstr, pln_ship), "ship", EF_BAD},
 245     {NSC_SHORT, 0, 0, fldoff(plnstr, pln_land), "land", EF_BAD},
 246     {NSC_INT, NSC_EXTRA, 0, fldoff(plnstr, pln_att), "att", EF_BAD},
 247     {NSC_INT, NSC_EXTRA, 0, fldoff(plnstr, pln_def), "def", EF_BAD},
 248     {NSC_CHAR, 0, 0, fldoff(plnstr, pln_harden), "harden", EF_BAD},
 249     {NSC_CHAR, 0, 0, fldoff(plnstr, pln_nuketype), "nuketype", EF_BAD},
 250     {NSC_CHAR, 0, 0, fldoff(plnstr, pln_flags), "flags", EF_BAD},
 251     {NSC_TIME, 0, 0, fldoff(plnstr, pln_access), "access", EF_BAD},
 252     {NSC_TIME, NSC_EXTRA, 0, fldoff(plnstr, pln_timestamp), "timestamp", EF_BAD},
 253     {NSC_FLOAT, 0, 0, fldoff(plnstr, pln_theta), "theta", EF_BAD},
 254     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 255 };
 256
 257 struct castr plchr_ca[] = {
 258     {NSC_STRING, 0, 0, offsetof(struct plchrstr, pl_name), "name", EF_BAD},
 259     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_lcm), "lcm", EF_BAD},
 260     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_hcm), "hcm", EF_BAD},
 261     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_cost), "cost", EF_BAD},
 262     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_tech), "tech", EF_BAD},
 263     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_acc), "acc", EF_BAD},
 264     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_load), "load", EF_BAD},
 265     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_att), "att", EF_BAD},
 266     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_def), "def", EF_BAD},
 267     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_range), "range", EF_BAD},
 268     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_crew), "crew", EF_BAD},
 269     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_fuel), "fuel", EF_BAD},
 270     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_stealth), "stealth", EF_BAD},
 271     {NSC_INT, 0, 0, offsetof(struct plchrstr, pl_flags), "flags", EF_PLANE_CHR_FLAGS},
 272     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 273 };
 274
 275 struct castr land_ca[] = {
 276     NSC_GENITEM(EF_LAND, EF_LAND_CHR),
 277     {NSC_CHAR, 0, 0, fldoff(lndstr, lnd_army), "army", EF_BAD},
 278     {NSC_SHORT, 0, 0, fldoff(lndstr, lnd_ship), "ship", EF_BAD},
 279     {NSC_CHAR, 0, 0, fldoff(lndstr, lnd_harden), "harden", EF_BAD},
 280     {NSC_SHORT, 0, 0, fldoff(lndstr, lnd_retreat), "retreat", EF_BAD},
 281     {NSC_UCHAR, 0, 0, fldoff(lndstr, lnd_fuel), "fuel", EF_BAD},
 282     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(lndstr, lnd_nxlight), "nxlight", EF_BAD},
 283     {NSC_INT, 0, 0, fldoff(lndstr, lnd_rflags), "rflags", EF_BAD},
 284     {NSC_STRINGY, 0, RET_LEN, fldoff(lndstr, lnd_rpath), "rpath", EF_BAD},
 285     {NSC_UCHAR, 0, 0, fldoff(lndstr, lnd_rad_max), "react", EF_BAD},
 286     NSC_IVEC(fldoff(lndstr, lnd_item), ""),
 287     {NSC_SHORT, NSC_DEITY, 0, fldoff(lndstr, lnd_pstage), "pstage", EF_BAD},
 288     {NSC_SHORT, NSC_DEITY, 0, fldoff(lndstr, lnd_ptime), "ptime", EF_BAD},
 289     {NSC_SHORT, 0, 0, fldoff(lndstr, lnd_land), "land", EF_BAD},
 290     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(lndstr, lnd_nland), "nland", EF_BAD},
 291     {NSC_TIME, 0, 0, fldoff(lndstr, lnd_access), "access", EF_BAD},
 292     {NSC_FLOAT, NSC_EXTRA, 0, fldoff(lndstr, lnd_att), "att", EF_BAD},
 293     {NSC_FLOAT, NSC_EXTRA, 0, fldoff(lndstr, lnd_def), "def", EF_BAD},
 294     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_vul), "vul", EF_BAD},
 295     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_spd), "spd", EF_BAD},
 296     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_vis), "vis", EF_BAD},
 297     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_spy), "spy", EF_BAD},
 298     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_rad), "rmax", EF_BAD},
 299     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_frg), "frg", EF_BAD},
 300     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_acc), "acc", EF_BAD},
 301     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_dam), "dam", EF_BAD},
 302     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_ammo), "ammo", EF_BAD},
 303     {NSC_INT, NSC_EXTRA, 0, fldoff(lndstr, lnd_aaf), "aaf", EF_BAD},
 304     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(lndstr, lnd_fuelc), "fuelc", EF_BAD},
 305     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(lndstr, lnd_fuelu), "fuelu", EF_BAD},
 306     {NSC_UCHAR, NSC_EXTRA, 0, fldoff(lndstr, lnd_maxlight), "maxlight", EF_BAD},
 307     {NSC_TIME, NSC_EXTRA, 0, fldoff(lndstr, lnd_timestamp), "timestamp", EF_BAD},
 308     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 309 };
 310
 311 struct castr lchr_ca[] = {
 312     {NSC_STRING, 0, 0, offsetof(struct lchrstr, l_name), "name", EF_BAD},
 313     {NSC_USHORT, 0, I_MAX+1, offsetof(struct mchrstr, m_item), "item", EF_BAD},
 314     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_lcm), "lcm", EF_BAD},
 315     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_hcm), "hcm", EF_BAD},
 316     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_gun), "gun", EF_BAD},
 317     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_shell), "shell", EF_BAD},
 318     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_tech), "tech", EF_BAD},
 319     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_cost), "cost", EF_BAD},
 320     {NSC_FLOAT, 0, 0, offsetof(struct lchrstr, l_att), "att", EF_BAD},
 321     {NSC_FLOAT, 0, 0, offsetof(struct lchrstr, l_def), "def", EF_BAD},
 322     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_vul), "vul", EF_BAD},
 323     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_spd), "spd", EF_BAD},
 324     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_vis), "vis", EF_BAD},
 325     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_spy), "spy", EF_BAD},
 326     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_rad), "rad", EF_BAD},
 327     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_frg), "frg", EF_BAD},
 328     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_acc), "acc", EF_BAD},
 329     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_dam), "dam", EF_BAD},
 330     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_ammo), "ammo", EF_BAD},
 331     {NSC_INT, 0, 0, offsetof(struct lchrstr, l_aaf), "aaf", EF_BAD},
 332     {NSC_UCHAR, 0, 0, offsetof(struct lchrstr, l_fuelc), "fuelc", EF_BAD},
 333     {NSC_UCHAR, 0, 0, offsetof(struct lchrstr, l_fuelu), "fuelu", EF_BAD},
 334     {NSC_UCHAR, 0, 0, offsetof(struct lchrstr, l_nxlight), "nxlight", EF_BAD},
 335     {NSC_UCHAR, 0, 0, offsetof(struct lchrstr, l_mxland), "mxland", EF_BAD},
 336     {NSC_LONG, 0, 0, offsetof(struct lchrstr, l_flags), "flags", EF_LAND_CHR_FLAGS},
 337     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 338 };
 339
 340 struct castr nuke_ca[] = {
 341     {NSC_SHORT, 0, 0, fldoff(nukstr, nuk_uid), "uid", EF_NUKE},
 342     {NSC_NATID, 0, 0, fldoff(nukstr, nuk_own), "owner", EF_NATION},
 343     {NSC_XCOORD, 0, 0, fldoff(nukstr, nuk_x), "xloc", EF_BAD},
 344     {NSC_YCOORD, 0, 0, fldoff(nukstr, nuk_y), "yloc", EF_BAD},
 345     {NSC_CHAR, 0, 0, fldoff(nukstr, nuk_n), "number", EF_BAD},
 346     {NSC_SHORT, 0, N_MAXNUKE, fldoff(nukstr, nuk_types), "types", EF_NUKE_CHR},
 347     {NSC_TIME, NSC_EXTRA, 0, fldoff(nukstr, nuk_timestamp), "timestamp", EF_BAD},
 348     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 349 };
 350
 351 struct castr nchr_ca[] = {
 352     {NSC_STRING, 0, 0, offsetof(struct nchrstr, n_name), "name", EF_BAD},
 353     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_lcm), "lcm", EF_BAD},
 354     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_hcm), "hcm", EF_BAD},
 355     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_oil), "oil", EF_BAD},
 356     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_rad), "rad", EF_BAD},
 357     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_blast), "blast", EF_BAD},
 358     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_dam), "dam", EF_BAD},
 359     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_cost), "cost", EF_BAD},
 360     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_tech), "tech", EF_BAD},
 361     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_weight), "weight", EF_BAD},
 362     {NSC_INT, 0, 0, offsetof(struct nchrstr, n_flags), "flags", EF_NUKE_CHR_FLAGS},
 363     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 364 };
 365
 366 struct castr treaty_ca[] = {
 367     {NSC_SHORT, 0, 0, fldoff(trtstr, trt_uid), "uid", EF_TREATY},
 368     {NSC_NATID, 0, 0, fldoff(trtstr, trt_cna), "cna", EF_NATION},
 369     {NSC_NATID, 0, 0, fldoff(trtstr, trt_cnb), "cnb", EF_NATION},
 370     {NSC_CHAR, 0, 0, fldoff(trtstr, trt_status), "status", EF_BAD},
 371     {NSC_SHORT, 0, 0, fldoff(trtstr, trt_acond), "acond", EF_TREATY_FLAGS},
 372     {NSC_SHORT, 0, 0, fldoff(trtstr, trt_bcond), "bcond", EF_TREATY_FLAGS},
 373     {NSC_TIME, 0, 0, fldoff(trtstr, trt_exp), "exp", EF_BAD},
 374     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 375 };
 376
 377 struct castr loan_ca[] = {
 378     {NSC_SHORT, 0, 0, fldoff(lonstr, l_uid), "uid", EF_LOAN},
 379     {NSC_NATID, 0, 0, fldoff(lonstr, l_loner), "loaner", EF_NATION},
 380     {NSC_NATID, 0, 0, fldoff(lonstr, l_lonee), "loanee", EF_NATION},
 381     {NSC_CHAR, 0, 0, fldoff(lonstr, l_status), "status", EF_BAD},
 382     {NSC_INT, 0, 0, fldoff(lonstr, l_irate), "irate", EF_BAD},
 383     {NSC_INT, 0, 0, fldoff(lonstr, l_ldur), "ldur", EF_BAD},
 384     {NSC_LONG, 0, 0, fldoff(lonstr, l_amtpaid), "amtpaid", EF_BAD},
 385     {NSC_LONG, 0, 0, fldoff(lonstr, l_amtdue), "amtdue", EF_BAD},
 386     {NSC_TIME, 0, 0, fldoff(lonstr, l_lastpay), "lastpay", EF_BAD},
 387     {NSC_TIME, 0, 0, fldoff(lonstr, l_duedate), "duedate", EF_BAD},
 388     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 389 };
 390
 391 struct castr news_ca[] = {
 392     {NSC_SHORT, 0, 0, fldoff(nwsstr, nws_uid), "uid", EF_NEWS},
 393     {NSC_NATID, 0, 0, fldoff(nwsstr, nws_ano), "actor", EF_NATION},
 394     {NSC_CHAR, 0, 0, fldoff(nwsstr, nws_vrb), "action", EF_NEWS_CHR},
 395     {NSC_NATID, 0, 0, fldoff(nwsstr, nws_vno), "victim", EF_NATION},
 396     {NSC_CHAR, 0, 0, fldoff(nwsstr, nws_ntm), "times", EF_BAD},
 397     {NSC_TIME, 0, 0, fldoff(nwsstr, nws_when), "time", EF_BAD},
 398     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 399 };
 400
 401 struct castr lost_ca[] = {
 402     {NSC_INT, 0, 0, fldoff(loststr, lost_uid), "uid", EF_LOST},
 403     {NSC_NATID, 0, 0, fldoff(loststr, lost_owner), "owner", EF_NATION},
 404     {NSC_CHAR, 0, 0, fldoff(loststr, lost_type), "type", EF_BAD},
 405     {NSC_SHORT, 0, 0, fldoff(loststr, lost_id), "id", EF_BAD},
 406     {NSC_XCOORD, 0, 0, fldoff(loststr, lost_x), "x", EF_BAD},
 407     {NSC_YCOORD, 0, 0, fldoff(loststr, lost_y), "y", EF_BAD},
 408     {NSC_TIME, 0, 0, fldoff(loststr, lost_timestamp), "timestamp", EF_BAD},
 409     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 410 };
 411
 412 struct castr commodity_ca[] = {
 413     {NSC_SHORT, 0, 0, fldoff(comstr, com_uid), "uid", EF_COMM},
 414     {NSC_NATID, 0, 0, fldoff(comstr, com_owner), "owner", EF_NATION},
 415     {NSC_SITYPE(i_type), 0, 0, fldoff(comstr, com_type), "type", EF_ITEM},
 416     {NSC_INT, 0, 0, fldoff(comstr, com_amount), "amount", EF_BAD},
 417     {NSC_INT, 0, 0, fldoff(comstr, com_maxbidder), "maxbidder", EF_NATION},
 418     {NSC_TIME, 0, 0, fldoff(comstr, com_markettime), "markettime", EF_BAD},
 419     /* could let maxbidder access these, but we can't express that yet: */
 420     {NSC_XCOORD, NSC_DEITY, 0, fldoff(comstr, com_x), "xbuy", EF_BAD},
 421     {NSC_XCOORD, NSC_DEITY, 0, fldoff(comstr, com_y), "ybuy", EF_BAD},
 422     /* could let the owner access these, but we can't express that yet: */
 423     {NSC_XCOORD, NSC_DEITY, 0, fldoff(comstr, sell_x), "xsell", EF_BAD},
 424     {NSC_YCOORD, NSC_DEITY, 0, fldoff(comstr, sell_y), "ysell", EF_BAD},
 425     {NSC_FLOAT, 0, 0, fldoff(comstr, com_price), "price", EF_BAD},
 426     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 427 };
 428
 429 struct castr trade_ca[] = {
 430     {NSC_SHORT, 0, 0, fldoff(trdstr, trd_uid), "uid", EF_TRADE},
 431     {NSC_NATID, 0, 0, fldoff(trdstr, trd_owner), "owner", EF_NATION},
 432     {NSC_CHAR, 0, 0, fldoff(trdstr, trd_type), "type", EF_BAD},
 433     {NSC_SHORT, 0, 0, fldoff(trdstr, trd_unitid), "unitid", EF_BAD},
 434     {NSC_LONG, 0, 0, fldoff(trdstr, trd_price), "price", EF_BAD},
 435     {NSC_INT, 0, 0, fldoff(trdstr, trd_maxbidder), "maxbidder", EF_NATION},
 436     {NSC_TIME, 0, 0, fldoff(trdstr, trd_markettime), "markettime", EF_BAD},
 437     /* could let the owner access these, but we can't express that yet: */
 438     {NSC_XCOORD, NSC_DEITY, 0, fldoff(trdstr, trd_x), "xloc", EF_BAD},
 439     {NSC_YCOORD, NSC_DEITY, 0, fldoff(trdstr, trd_y), "yloc", EF_BAD},
 440     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 441 };
 442
 443 struct castr nat_ca[] = {
 444     {NSC_NATID, 0, 0, fldoff(natstr, nat_cnum), "cnum", EF_NATION},
 445     {NSC_CHAR, 0, 0, fldoff(natstr, nat_stat), "stat", EF_BAD},
 446     {NSC_STRINGY, 0, 20, fldoff(natstr, nat_cnam), "cname", EF_BAD},
 447     {NSC_STRINGY, NSC_DEITY, 20, fldoff(natstr, nat_pnam), "passwd", EF_BAD},
 448     {NSC_STRINGY, 0, 32, fldoff(natstr, nat_hostaddr), "ip", EF_BAD},
 449     {NSC_STRINGY, 0, 512, fldoff(natstr, nat_hostname), "hostname", EF_BAD},
 450     {NSC_STRINGY, 0, 32, fldoff(natstr, nat_userid), "userid", EF_BAD},
 451     {NSC_XCOORD, 0, 0, fldoff(natstr, nat_xstart), "xstart", EF_BAD},
 452     {NSC_YCOORD, 0, 0, fldoff(natstr, nat_ystart), "ystart", EF_BAD},
 453     {NSC_XCOORD, 0, 0, fldoff(natstr, nat_xcap), "xcap", EF_BAD},
 454     {NSC_YCOORD, 0, 0, fldoff(natstr, nat_ycap), "ycap", EF_BAD},
 455     {NSC_XCOORD, NSC_DEITY, 0, fldoff(natstr, nat_xorg), "xorg", EF_BAD},
 456     {NSC_YCOORD, NSC_DEITY, 0, fldoff(natstr, nat_yorg), "yorg", EF_BAD},
 457     {NSC_CHAR, 0, 0, fldoff(natstr, nat_update), "update", EF_BAD},
 458     {NSC_UCHAR, 0, 0, fldoff(natstr, nat_missed), "missed", EF_BAD},
 459     {NSC_USHORT, 0, 0, fldoff(natstr, nat_tgms), "tgms", EF_BAD},
 460     {NSC_USHORT, 0, 0, fldoff(natstr, nat_ann), "ann", EF_BAD},
 461     {NSC_USHORT, 0, 0, fldoff(natstr, nat_minused), "minused", EF_BAD},
 462     {NSC_SHORT, 0, 0, fldoff(natstr, nat_btu), "btu", EF_BAD},
 463     {NSC_LONG, 0, 0, fldoff(natstr, nat_reserve), "milreserve", EF_BAD},
 464     {NSC_LONG, 0, 0, fldoff(natstr, nat_money), "money", EF_BAD},
 465     {NSC_TIME, 0, 0, fldoff(natstr, nat_last_login), "login", EF_BAD},
 466     {NSC_TIME, 0, 0, fldoff(natstr, nat_last_logout), "logout", EF_BAD},
 467     {NSC_TIME, 0, 0, fldoff(natstr, nat_newstim), "newstim", EF_BAD},
 468     {NSC_TIME, 0, 0, fldoff(natstr, nat_annotim), "annotim", EF_BAD},
 469     {NSC_FLOAT, 0, 0, fldoff(natstr, nat_level[NAT_TLEV]), "tech", EF_BAD},
 470     {NSC_FLOAT, 0, 0, fldoff(natstr, nat_level[NAT_RLEV]), "research", EF_BAD},
 471     {NSC_FLOAT, 0, 0, fldoff(natstr, nat_level[NAT_ELEV]), "education", EF_BAD},
 472     {NSC_FLOAT, 0, 0, fldoff(natstr, nat_level[NAT_HLEV]), "happiness", EF_BAD},
 473     /* FIXME nat_b[], nat_relate[], nat_contact[], nat_rejects[], nat_priorities[] */
 474     {NSC_LONG, 0, 0, fldoff(natstr, nat_flags),"flags", EF_BAD},
 475     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 476 };
 477
 478 struct castr intrchr_ca[] = {
 479     {NSC_STRING, NSC_CONST, 0, offsetof(struct sctintrins, in_name), "name", EF_BAD},
 480     {NSC_UCHAR, 0, 0, offsetof(struct sctintrins, in_lcms), "lcms", EF_BAD},
 481     {NSC_UCHAR, 0, 0, offsetof(struct sctintrins, in_hcms), "hcms", EF_BAD},
 482     {NSC_UCHAR, 0, 0, offsetof(struct sctintrins, in_dcost), "dcost", EF_BAD},
 483     {NSC_UCHAR, 0, 0, offsetof(struct sctintrins, in_mcost), "mcost", EF_BAD},
 484     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 485 };
 486
 487 struct castr rpt_ca[] = {
 488     {NSC_STRING, 0, NUM_RPTS, offsetof(struct rptstr, r_newstory), "newstory", EF_BAD},
 489     {NSC_INT, 0, 0, offsetof(struct rptstr, r_good_will), "good_will", EF_BAD},
 490     {NSC_INT, 0, 0, offsetof(struct rptstr, r_newspage), "newspage", EF_BAD},
 491     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 492 };
 493
 494 struct castr empfile_ca[] = {
 495     {NSC_INT, 0, 0, offsetof(struct empfile, uid), "uid", EF_TABLE},
 496     {NSC_STRING, 0, 0, offsetof(struct empfile, name), "name", EF_BAD},
 497     {NSC_STRING, 0, 0, offsetof(struct empfile, file), "file", EF_BAD},
 498     {NSC_INT, 0, 0, offsetof(struct empfile, flags), "flags", EF_BAD},
 499     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 500 };
 501
 502 struct castr symbol_ca[] = {
 503     {NSC_STRING, 0, 0, offsetof(struct symbol, name), "name", EF_BAD},
 504     {NSC_INT, 0, 0, offsetof(struct symbol, value), "value", EF_BAD},
 505     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 506 };
 507
 508 struct symbol ship_chr_flags[] = {
 509     {M_FOOD, "fish"},
 510     {M_TORP, "torp"},
 511     {M_DCH, "dchrg"},
 512     {M_FLY, "plane"},
 513     {M_MSL, "miss"},
 514     {M_OIL, "oil"},
 515     {M_SONAR, "sonar"},
 516     {M_MINE, "mine"},
 517     {M_SWEEP, "sweep"},
 518     {M_SUB, "sub"},
 519     {M_SPY, "spy"},
 520     {M_LAND, "land"},
 521     {M_SUBT, "sub-torp"},
 522     {M_TRADE, "trade"},
 523     {M_SEMILAND, "semi-land"},
 524     {M_OILER, "oiler"},
 525     {M_SUPPLY, "supply"},
 526     {M_ANTIMISSILE, "anti-missile"},
 527     {0, NULL}
 528 };
 529
 530 struct symbol land_chr_flags[] = {
 531     {L_XLIGHT, "xlight"},
 532     {L_ENGINEER, "engineer"},
 533     {L_SUPPLY, "supply"},
 534     {L_SECURITY, "security"},
 535     {L_LIGHT, "light"},
 536     {L_MARINE, "marine"},
 537     {L_RECON, "recon"},
 538     {L_RADAR, "radar"},
 539     {L_ASSAULT, "assault"},
 540     {L_FLAK, "flak"},
 541     {L_SPY, "spy"},
 542     {L_TRAIN, "train"},
 543     {L_HEAVY, "heavy"},
 544     {0, NULL}
 545 };
 546
 547 struct symbol plane_chr_flags[] = {
 548     {P_T, "tactical"},
 549     {P_B, "bomber"},
 550     {P_F, "intercept"},
 551     {P_C, "cargo"},
 552     {P_V, "VTOL"},
 553     {P_M, "missile"},
 554     {P_L, "light"},
 555     {P_S, "spy"},
 556     {P_I, "image"},
 557     {P_O, "satellite"},
 558     {P_X, "stealth"},
 559     {P_N, "SDI"},
 560     {P_H, "half-stealth"},
 561     {P_E, "x-light"},
 562     {P_K, "helo"},
 563     {P_A, "ASW"},
 564     {P_P, "para"},
 565     {P_ESC, "escort"},
 566     {P_MINE, "mine"},
 567     {P_SWEEP, "sweep"},
 568     {P_MAR, "marine"},
 569     {0, NULL}
 570 };
 571
 572 struct symbol nuke_chr_flags[] = {
 573     {N_NEUT, "neutron"},
 574     {0, NULL}
 575 };
 576
 577 struct castr mdchr_ca[] = {
 578     {NSC_STRING, 0, 0, offsetof(struct castr, ca_name), "name", EF_BAD},
 579     {NSC_CHAR, 0, 0, offsetof(struct castr, ca_type), "type", EF_META_TYPE},
 580     {NSC_UCHAR, 0, 0, offsetof(struct castr, ca_flags), "flags", EF_META_FLAGS},
 581     {NSC_USHORT, 0, 0, offsetof(struct castr, ca_len), "len", EF_BAD},
 582     {NSC_INT, 0, 0, offsetof(struct castr, ca_table), "table", EF_BAD},
 583     {NSC_NOTYPE, 0, 0, 0, NULL, EF_BAD}
 584 };
 585
 586 struct symbol meta_flags[] = {
 587     {NSC_DEITY, "DEITY"},
 588     {NSC_EXTRA, "EXTRA"},
 589     {NSC_CONST, "CONST"},
 590     {0, NULL}
 591 };
 592
 593 struct symbol meta_type[]  = {
 594     {NSC_LONG, "d"},
 595     {NSC_DOUBLE, "g"},
 596     {NSC_STRING, "s"},
 597     {NSC_TYPEID, "d"},
 598     {NSC_CHAR, "d"},
 599     {NSC_UCHAR, "d"},
 600     {NSC_SHORT, "d"},
 601     {NSC_USHORT, "d"},
 602     {NSC_INT, "d"},
 603     {NSC_XCOORD, "d"},
 604     {NSC_YCOORD, "d"},
 605     {NSC_TIME, "t"},
 606     {NSC_FLOAT, "g"},
 607     {NSC_STRINGY,"c"},
 608     {NSC_NOTYPE, NULL}
 609 };