]> git.pond.sub.org Git - empserver/blobdiff - include/nsc.h
fairland: Tidy up comments
[empserver] / include / nsc.h
index 9abab00270de7b671a5cf63971924ceb716154f4..3e173929f32b4ee10307dd512857792b3a28f234 100644 (file)
@@ -1,6 +1,6 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2011, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ *  Copyright (C) 1986-2020, Dave Pare, Jeff Bailey, Thomas Ruschak,
  *                Ken Stevens, Steve McClure, Markus Armbruster
  *
  *  Empire is free software: you can redistribute it and/or modify
@@ -28,7 +28,7 @@
  *
  *  Known contributors to this file:
  *     Dave Pare, 1989
- *     Markus Armbruster, 2004-2010
+ *     Markus Armbruster, 2004-2016
  */
 
 #ifndef NSC_H
@@ -56,25 +56,25 @@ enum nsc_type {
     NSC_INT,                   /* int */
     NSC_XCOORD,                        /* coord that needs x conversion */
     NSC_YCOORD,                        /* coord that needs y conversion */
-    NSC_HIDDEN,                        /* unsigned char in struct natstr that
-                                  may need hiding */
     NSC_TIME,                  /* time_t */
     NSC_FLOAT,                 /* float */
     NSC_STRINGY,               /* char[] */
     /* aliases, must match typedefs */
-    NSC_NATID = NSC_UCHAR      /* nation id */
+    NSC_NATID = NSC_UCHAR      /* nation ID */
 };
 
-/* Is TYPE a promoted value type?  */
+/* Is TYPE a promoted value type? */
 #define NSC_IS_PROMOTED(type) (NSC_LONG <= (type) && (type) <= NSC_STRING)
 
-/* Return nsc_type for a signed integer with the same size as TYPE.  */
-#define NSC_SITYPE(type)                               \
+/* Return nsc_type for a signed integer with the same size as TYPE. */
+#define NSC_SITYPE(type) \
+    (BUILD_ASSERT_ONE(NSC_SITYPE_(type) != NSC_NOTYPE) * NSC_SITYPE_(type))
+#define NSC_SITYPE_(type)                              \
     (sizeof(type) == 1 ? NSC_CHAR                      \
      : sizeof(type) == sizeof(short) ? NSC_SHORT       \
      : sizeof(type) == sizeof(int) ? NSC_INT           \
      : sizeof(type) == sizeof(long) ? NSC_LONG         \
-     : 1/0)
+     : NSC_NOTYPE)
 
 /* Value category */
 enum nsc_cat {
@@ -88,13 +88,14 @@ enum nsc_cat {
  * Value, possibly symbolic
  *
  * If type is NSC_NOTYPE, it's an error value.
- * If category is NSC_VAL, the value is in val_as, and the type is a
+ * If category is NSC_VAL, the value is in @val_as, and the type is a
  * promoted type.
  * If category is NSC_OFF, the value is in a context object, and
- * val_as.sym specifies how to get it, as follows.
- * If sym.get is null, and type is NSC_STRINGY, the value is an array
- * of sym.len characters starting at sym.offs in the context object.
- * sym.idx must be zero.
+ * @val_as.sym specifies how to get it, as follows.
+ * If sym.get is null, and type is NSC_STRINGY, the value is a string
+ * stored in sym.len characters starting at sym.offs in the context
+ * object.  sym.idx must be zero.  Ugly wart: if sym.len is one, the
+ * terminating null character may be omitted.
  * Else if sym.get is null, and sym.len is zero, the value is in the
  * context object at offset sym.off.  sym.idx must be zero.
  * Else if sym.get is null, sym.len is non-zero, and the value has
@@ -117,6 +118,7 @@ struct valstr {
            int len;
            int idx;
            void *(*get)(struct valstr *, struct natstr *, void *);
+           int hidden;
        } sym;
        double dbl;             /* cat NSC_VAL, type NSC_DOUBLE */
        struct {                /* cat NSC_VAL, type NSC_STRING, cat NSC_ID */
@@ -150,7 +152,7 @@ enum ns_seltype {
 /* Sector iterator */
 struct nstr_sect {
     coord x, y;                        /* current x-y */
-    coord dx, dy;              /* accumlated x,y travel */
+    coord dx, dy;              /* accumulated x,y travel */
     int id;                    /* return value of sctoff */
     enum ns_seltype type;      /* selection type: NS_AREA or NS_DIST */
     int curdist;               /* NS_DIST: current range */
@@ -180,7 +182,7 @@ struct nstr_item {
 };
 
 /*
- * Symbol binding: associate NAME with VALUE.
+ * Symbol binding: associate @name with @value.
  */
 struct symbol {
     int value;
@@ -190,37 +192,50 @@ struct symbol {
 /* Selector flags */
 enum {
     NSC_DEITY = bit(0),                /* access restricted to deity */
-    NSC_EXTRA = bit(1),                /* computable from other selectors */
-    NSC_CONST = bit(2),                /* field cannot be changed */
-    NSC_BITS = bit(3)          /* value consists of flag bits */
+    NSC_BITS = bit(3),         /* value consists of flag bits */
+    NSC_HIDDEN = bit(4)                /* visibility depends on contact */
+};
+
+/* Selector use by xdump and xundump */
+enum ca_dump {
+    /* order is relevant */
+    CA_DUMP,                   /* xdump and xundump normally */
+    CA_DUMP_CONST,             /* same, but value can't be changed  */
+    CA_DUMP_ONLY,              /* only in xdump command */
+    CA_DUMP_NONE               /* do not xdump or xundump */
 };
 
 /*
  * Selector descriptor
  *
  * A selector describes an attribute of some context object.
- * A selector with ca_type NSC_NOTYPE is invalid.
- * If ca_get is null, the selector describes a datum of type ca_type
- * at offset ca_offs in the context object.
- * A datum of type NSC_STRINGY is an array of ca_len characters.
+ * A selector with @ca_type NSC_NOTYPE is invalid.
+ * If @ca_get is null, the selector describes a datum of type @ca_type
+ * at offset @ca_offs in the context object.
+ * A datum of type NSC_STRINGY is a string stored in an array of
+ * @ca_len characters.  Ugly wart: if @ca_len is one, the terminating
+ * null character may be omitted.
  * A datum of any other type is either a scalar of that type (if
- * ca_len is zero), or an array of ca_len elements of that type.
- * If ca_get is not null, the selector is virtual.  Values can be
- * obtained by calling ca_get(VAL, NP, CTXO), where VAL has been
+ * @ca_len is zero), or an array of @ca_len elements of that type.
+ * If @ca_get is not null, the selector is virtual.  Values can be
+ * obtained by calling @ca_get(VAL, NP, CTXO), where VAL has been
  * initialized from the selector and an index by nstr_mksymval(),
  * NP points to the country to use for coordinate translation and
  * access control (null for none), and CTXO is the context object.
  * See struct valstr for details.
  * Because virtual selectors don't have a setter method, xundump must
- * be made to ignore them, by setting NSC_EXTRA.
- * If flag NSC_DEITY is set, only to deities can use this selector.
- * If flag NSC_EXTRA is set, xdump and xundump ignore this selector.
- * If flag NSC_CONST is set, the datum can't be changed from its
- * initial value (xundump obeys that).
- * If ca_table is not EF_BAD, the datum refers to that Empire table;
- * ca_type must be an integer type.  If flag NSC_BITS is set, the
- * datum consists of flag bits, and the referred table must be a
- * symbol table defining those bits.
+ * be made to ignore them, by setting @ca_dump to CA_DUMP_NONE.
+ * If @ca_table is not EF_BAD, the datum refers to that Empire table;
+ * @ca_type must be an integer type.
+ * If NSC_BITS is set in @ca_flags, the datum consists of flag bits,
+ * and the referred table must be a symbol table defining those bits.
+ * If NSC_DEITY is set in @ca_flags, only deities can use this
+ * selector.
+ * If NSC_HIDDEN is set in @ca_flags, the selector must be an array of
+ * MAXNOC elements, indexed by country number.  Array elements are
+ * masked for contact when opt_HIDDEN is on.  Only implemented for
+ * integer types and context object EF_RELAT.
+ * @ca_dump specifies how xdump and xundump are to use the selector.
  */
 struct castr {
     char *ca_name;
@@ -230,9 +245,14 @@ struct castr {
     void *(*ca_get)(struct valstr *, struct natstr *, void *);
     int ca_table;
     int ca_flags;
+    enum ca_dump ca_dump;
 };
 
-/* variables using the above */
+/* Is CA an array? */
+#define CA_IS_ARRAY(ca) ((ca)->ca_type != NSC_STRINGY && (ca)->ca_len != 0)
+
+/* If CA is an array, return its length, else zero */
+#define CA_ARRAY_LEN(ca) ((ca)->ca_type != NSC_STRINGY ? (ca)->ca_len : 0)
 
 extern struct castr ichr_ca[];
 extern struct castr pchr_ca[];
@@ -246,7 +266,6 @@ extern struct castr land_ca[];
 extern struct castr lchr_ca[];
 extern struct castr nuke_ca[];
 extern struct castr nchr_ca[];
-extern struct castr treaty_ca[];
 extern struct castr loan_ca[];
 extern struct castr news_ca[];
 extern struct castr lost_ca[];
@@ -254,6 +273,9 @@ extern struct castr commodity_ca[];
 extern struct castr trade_ca[];
 extern struct castr nat_ca[];
 extern struct castr cou_ca[];
+extern struct castr relat_ca[];
+extern struct castr contact_ca[];
+extern struct castr reject_ca[];
 extern struct castr realm_ca[];
 extern struct castr game_ca[];
 extern struct castr intrchr_ca[];
@@ -265,7 +287,6 @@ extern struct symbol ship_chr_flags[];
 extern struct symbol plane_chr_flags[];
 extern struct symbol land_chr_flags[];
 extern struct symbol nuke_chr_flags[];
-extern struct symbol treaty_flags[];
 extern struct castr mdchr_ca[];
 extern struct symbol meta_type[];
 extern struct symbol meta_flags[];
@@ -281,14 +302,17 @@ extern struct symbol agreement_statuses[];
 extern struct symbol plague_stages[];
 extern struct symbol packing[];
 extern struct symbol resources[];
+extern struct symbol sect_chr_flags[];
 extern struct symbol sector_navigation[];
 
 /* src/lib/common/nstreval.c */
 extern struct valstr *nstr_mksymval(struct valstr *, struct castr *, int);
-extern struct valstr *nstr_exec_val(struct valstr *, natid, void *,
-                                   enum nsc_type);
+extern struct valstr *nstr_eval(struct valstr *, natid, void *,
+                               enum nsc_type);
 extern int nstr_promote(int);
 extern char *symbol_by_value(int, struct symbol *);
+extern int symbol_set_fmt(char *, size_t, int, struct symbol *,
+                         char *, int);
 /* src/lib/global/nsc.c */
 extern void nsc_init(void);
 /* src/lib/subs/nxtitem.c */