qcsrc/lib/replicate.qh

   1 #pragma once
   2
   3 #ifndef MENUQC
   4
   5         #define REPLICATE(...) EVAL_REPLICATE(OVERLOAD(REPLICATE, __VA_ARGS__))
   6         #define EVAL_REPLICATE(...) __VA_ARGS__
   7
   8         [[accumulate]] void ReplicateVars(entity this, string thisname, int i) {}
   9
  10         #define REPLICATE_3(fld, type, var) REPLICATE_4(fld, type, var, )
  11         #define REPLICATE_4(fld, type, var, func) REPLICATE_##type(fld, var, func)
  12         #define REPLICATE_string(fld, var, func) \
  13                 REPLICATE_7(fld, string, var, , \
  14         { if (field) strunzone(field); field = strzone(it); }, \
  15         { if (field) strunzone(field); field = string_null; }, \
  16         { \
  17                 /* also initialize to the default value of func when requesting cvars */ \
  18                 string s = func(field); \
  19                 if (s != field) \
  20                 { \
  21                     strunzone(field); \
  22                     field = strzone(s); \
  23                 } \
  24         })
  25         #define REPLICATE_float(fld, var, func) REPLICATE_7(fld, float, var, func,  { field = stof(it); },          , )
  26         #define REPLICATE_bool(fld, var, func) REPLICATE_7(fld, bool, var, func,   { field = boolean(stoi(it)); }, , )
  27         #define REPLICATE_int(fld, var, func) REPLICATE_7(fld, int, var, func,    { field = stoi(it); },          , )
  28
  29         #if defined(SVQC)
  30                 #define REPLICATE_7(fld, type, var, func, create, destroy, after) \
  31                         void ReplicateVars(entity this, string thisname, int i) \
  32                         { \
  33                                 type field = this.fld; \
  34                                 if (i < 0) { destroy } \
  35                                 else \
  36                                 { \
  37                                         string it = func(argv(i + 1)); \
  38                                         bool current = thisname == var; \
  39                                         if (i > 0) \
  40                                         { \
  41                                                 if (current) { create } \
  42                                         } \
  43                                         else \
  44                                         { \
  45                                                 stuffcmd(this, "cl_cmd sendcvar " var "\n"); \
  46                                         } \
  47                                         if (current) { after } \
  48                                 } \
  49                                 this.fld = field; \
  50                         }
  51         #elif defined(CSQC)
  52                 // TODO
  53                 #define REPLICATE_7(fld, type, var, func, create, destroy, after)
  54         #endif
  55
  56 #endif