qcsrc/lib/replicate.qh

   1 #pragma once
   2
   3 #ifdef GAMEQC
   4
   5     /**
   6      * Replicate a client cvar into a server field
   7      *
   8      * @param fld   The field to replicate into
   9      * @param type  The field type
  10      * @param cvar  The cvar name
  11      */
  12         #define REPLICATE(...) EVAL_REPLICATE(OVERLOAD(REPLICATE, __VA_ARGS__))
  13         #define EVAL_REPLICATE(...) __VA_ARGS__
  14
  15         #if defined(SVQC)
  16         ACCUMULATE void ReplicateVars(entity this, entity store, string thisname, int i) {}
  17         #elif defined(CSQC)
  18         ACCUMULATE void ReplicateVars(bool would_destroy) {}
  19         #endif
  20
  21         #define REPLICATE_3(fld, type, var) REPLICATE_4(fld, type, var, )
  22         #define REPLICATE_4(fld, type, var, func) REPLICATE_##type(fld, var, func)
  23         #if defined(SVQC)
  24                 #define REPLICATE_string(fld, var, func) \
  25                         REPLICATE_7(fld, string, var, , \
  26                 { strcpy(field, it); }, \
  27                 { strfree(field); }, \
  28                 { \
  29                         /* also initialize to the default value of func when requesting cvars */ \
  30                         string s = func(field); \
  31                         if (s != field) \
  32                         { \
  33                                 strcpy(field, s); \
  34                         } \
  35                 })
  36                 #define REPLICATE_float(fld, var, func) REPLICATE_7(fld, float, var, func,  { field = stof(it); },          , )
  37                 #define REPLICATE_bool(fld, var, func) REPLICATE_7(fld, bool, var, func,   { field = boolean(stoi(it)); }, , )
  38                 #define REPLICATE_int(fld, var, func) REPLICATE_7(fld, int, var, func,    { field = stoi(it); },          , )
  39
  40                 #define REPLICATE_7(fld, type, var, func, create, destroy, after) \
  41                         void ReplicateVars(entity this, entity store, string thisname, int i) \
  42                         { \
  43                                 type field = store.fld; \
  44                                 if (i < 0) { destroy } \
  45                                 else \
  46                                 { \
  47                                         string it = func(argv(i + 1)); \
  48                                         bool current = thisname == var; \
  49                                         if (i > 0) \
  50                                         { \
  51                                                 if (current) { create } \
  52                                         } \
  53                                         else \
  54                                         { \
  55                                                 stuffcmd(this, strcat("cl_cmd sendcvar ", var, "\n")); \
  56                                         } \
  57                                         if (current) { after } \
  58                                 } \
  59                                 store.fld = field; \
  60                         }
  61         #elif defined(CSQC)
  62                 #define REPLICATE_string(fld, var, func) REPLICATE_7(fld, float, var, func, (fld != cvar_string(var)), { strcpy(fld, cvar_string(var)); }, { strfree(fld); })
  63                 #define REPLICATE_float(fld, var, func) REPLICATE_7(fld, float, var, func, (fld != cvar(var)), { fld = cvar(var); }, )
  64                 #define REPLICATE_bool(fld, var, func) REPLICATE_7(fld, bool, var, func, (fld != cvar(var)), { fld = cvar(var); }, )
  65                 #define REPLICATE_int(fld, var, func) REPLICATE_7(fld, int, var, func, (fld != cvar(var)), { fld = cvar(var); }, )
  66
  67                 #define REPLICATE_7(fld, type, var, func, check, update, destroy) \
  68                         void ReplicateVars(bool would_destroy) \
  69                         { \
  70                                 if (would_destroy > 0) { destroy } \
  71                                 else if (check) \
  72                                 { \
  73                                         localcmd(strcat("cl_cmd sendcvar ", var, "\n")); \
  74                                         update \
  75                                 } \
  76                         }
  77
  78                 #define REPLICATE_SIMPLE(field, cvarname) MACRO_BEGIN \
  79                         if (field != cvar(cvarname)) \
  80                         { \
  81                                 localcmd(strcat("cl_cmd sendcvar ", cvarname, "\n")); \
  82                                 field = cvar(cvarname); \
  83                         } \
  84                 MACRO_END
  85         #endif
  86
  87 #endif