qcsrc/lib/log.qh

   1 #ifndef LOG_H
   2 #define LOG_H
   3
   4 #define assert(expr, ...) _assert(LOG_SEVERE, expr, __VA_ARGS__)
   5 #define assert_once(expr, ...) \
   6         MACRO_BEGIN { \
   7                 static bool __once; \
   8                 if (!__once) \
   9                 { \
  10                         assert(expr, __VA_ARGS__); \
  11                         __once = true; \
  12                 } \
  13         } MACRO_END
  14 #define demand(expr, ...) _assert(LOG_FATAL, expr, __VA_ARGS__)
  15 #define _assert(f, expr, then) \
  16         MACRO_BEGIN \
  17         { \
  18                 if (!(expr)) \
  19                 { \
  20                         f("assertion failed: `" #expr "`\n"); \
  21                         then; \
  22                 } \
  23         } MACRO_END
  24
  25 #define ASSERT_LESS(name, var, const) noref int name[(const - var + 1)];
  26
  27
  28 #if defined(MENUQC)
  29 string(string...) strcat0n = #53;
  30 #else
  31 string(string...) strcat0n = #115;
  32 #endif
  33
  34 #define _LOG(f, level, s) \
  35         MACRO_BEGIN { \
  36                 f(sprintf("^9[::"level "^9] ["__FILE__ "^7:^9%s^7:^9%d] \n^7%s\n", __FUNC__, __LINE__, s)); \
  37         } MACRO_END
  38
  39 #define  LOG_FATAL(...) _LOG_FATAL(strcat0n(__VA_ARGS__))
  40 #define  LOG_FATALF(...) _LOG_FATAL(sprintf(__VA_ARGS__))
  41 #define _LOG_FATAL(s) _LOG(error, "^1FATAL", s)
  42
  43 #define  LOG_SEVERE(...) _LOG_SEVERE(strcat0n(__VA_ARGS__))
  44 #define  LOG_SEVEREF(...) _LOG_SEVERE(sprintf(__VA_ARGS__))
  45 #define _LOG_SEVERE(s) _LOG(backtrace, "^1SEVERE", s)
  46
  47 #define  LOG_WARNING(...) _LOG_WARNING(strcat0n(__VA_ARGS__))
  48 #define  LOG_WARNINGF(...) _LOG_WARNING(sprintf(__VA_ARGS__))
  49 #define _LOG_WARNING(s) _LOG(print, "^3WARNING", s)
  50
  51 #define  LOG_INFO(...) _LOG_INFO(strcat0n(__VA_ARGS__))
  52 #define  LOG_INFOF(...) _LOG_INFO(sprintf(__VA_ARGS__))
  53 #define _LOG_INFO(s) \
  54         MACRO_BEGIN { \
  55                 string ___s = s; \
  56                 if (autocvar_developer) \
  57                         _LOG(print, "^5INFO", ___s); \
  58                 else \
  59                         print(___s); \
  60         } MACRO_END
  61
  62 #define  LOG_TRACE(...) _LOG_TRACE(strcat0n(__VA_ARGS__))
  63 #define  LOG_TRACEF(...) _LOG_TRACE(sprintf(__VA_ARGS__))
  64 #define _LOG_TRACE(s) _LOG(dprint, "^6TRACE", s)
  65
  66 #define  LOG_DEBUG(...) _LOG_DEBUG(strcat0n(__VA_ARGS__))
  67 #define  LOG_DEBUGF(...) _LOG_DEBUG(sprintf(__VA_ARGS__))
  68 #define _LOG_DEBUG(s) _LOG(dprint2, "^2DEBUG", s)
  69
  70 #define dprint2(msg) \
  71         MACRO_BEGIN { \
  72                 if (autocvar_developer > 1) dprint(msg); \
  73         } MACRO_END
  74
  75 // TODO: this sucks, lets find a better way to do backtraces?
  76 #ifdef SVQC
  77         void builtin_remove(entity);
  78         #define _backtrace() builtin_remove(NULL)
  79 #else
  80         void remove(entity);
  81         #define _backtrace() remove(NULL)
  82 #endif
  83
  84 noref int autocvar_developer;
  85 noref bool autocvar_prvm_backtraceforwarnings;
  86
  87 #ifdef SVQC
  88 #define bt_cvar_set(cvar, value) builtin_cvar_set(cvar, value)
  89 #else
  90 #define bt_cvar_set(cvar, value) cvar_set(cvar, value)
  91 #endif
  92
  93 #define backtrace(msg) \
  94         MACRO_BEGIN \
  95         { \
  96                 int dev = autocvar_developer; \
  97                 bool war = autocvar_prvm_backtraceforwarnings; \
  98                 bt_cvar_set("developer", "1"); \
  99                 bt_cvar_set("prvm_backtraceforwarnings", "1"); \
 100                 print("\n--- CUT HERE ---\n", msg); \
 101                 _backtrace(); \
 102                 print("\n--- CUT UNTIL HERE ---\n"); \
 103                 bt_cvar_set("developer", ftos(dev)); \
 104                 bt_cvar_set("prvm_backtraceforwarnings", ftos(war)); \
 105         } MACRO_END
 106
 107 #endif