log.h

   1 /*
   2 Copyright (c) 2003-2006 by Juliusz Chroboczek
   3
   4 Permission is hereby granted, free of charge, to any person obtaining a copy
   5 of this software and associated documentation files (the "Software"), to deal
   6 in the Software without restriction, including without limitation the rights
   7 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
   8 copies of the Software, and to permit persons to whom the Software is
   9 furnished to do so, subject to the following conditions:
  10
  11 The above copyright notice and this permission notice shall be included in
  12 all copies or substantial portions of the Software.
  13
  14 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
  17 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  18 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  19 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  20 THE SOFTWARE.
  21 */
  22
  23 #define L_ERROR 0x1
  24 #define L_WARN 0x2
  25 #define L_FORBIDDEN 0x4
  26 #define L_UNCACHEABLE 0x8
  27 #define L_SUPERSEDED 0x10
  28 #define L_VARY 0x20
  29
  30 #define D_SERVER_CONN 0x100
  31 #define D_SERVER_REQ 0x200
  32 #define D_CLIENT_CONN 0x400
  33 #define D_CLIENT_REQ 0x800
  34 #define D_ATOM_REFCOUNT 0x1000
  35 #define D_REFCOUNT 0x2000
  36 #define D_LOCK 0x4000
  37 #define D_OBJECT 0x8000
  38 #define D_OBJECT_DATA 0x10000
  39 #define D_SERVER_OFFSET 0x20000
  40 #define D_CLIENT_DATA 0x40000
  41 #define D_DNS 0x80000
  42 #define D_CHILD 0x100000
  43 #define D_IO 0x200000
  44
  45 #define LOGGING_DEFAULT (L_ERROR | L_WARN | L_UNCACHEABLE)
  46 #define LOGGING_MAX 0xFF
  47
  48 extern AtomPtr logFile;
  49 extern FILE *logF;
  50
  51 void preinitLog(void);
  52 void initLog(void);
  53 void reopenLog(void);
  54
  55 void really_do_log(int type, const char *f, ...)
  56     ATTRIBUTE ((format (printf, 2, 3)));
  57 void really_do_log_v(int type, const char *f, va_list args)
  58     ATTRIBUTE ((format (printf, 2, 0)));
  59 void really_do_log_n(int type, const char *s, int n);
  60 void really_do_log_error(int type, int e, const char *f, ...)
  61     ATTRIBUTE ((format (printf, 3, 4)));
  62 void really_do_log_error_v(int type, int e, const char *f, va_list args)
  63     ATTRIBUTE ((format (printf, 3, 0)));
  64
  65 #ifdef __GNUC__
  66 #define DO_BACKTRACE()                  \
  67   do {                                  \
  68     int n;                              \
  69     void *buffer[10];                   \
  70     n = backtrace(buffer, 5);           \
  71     fflush(stderr);                     \
  72     backtrace_symbols_fd(buffer, n, 2); \
  73  } while(0)
  74 #else
  75 #define DO_BACKTRACE() /* */
  76 #endif
  77
  78 /* These are macros because it's important that they should be
  79    optimised away. */
  80
  81 #if defined __STDC_VERSION__ && __STDC_VERSION__ >= 199901L
  82
  83 #define do_log(_type, ...)                                           \
  84     do {                                                             \
  85         if((_type) & (LOGGING_MAX)) really_do_log((_type), __VA_ARGS__); \
  86     } while(0)
  87 #define do_log_error(_type, _e, ...)                                 \
  88     do {                                                             \
  89         if((_type) & (LOGGING_MAX))                                  \
  90             really_do_log_error((_type), (_e), __VA_ARGS__);         \
  91     } while(0)
  92
  93 #elif defined(__GNUC__)
  94
  95 #define do_log(_type, _args...)                                \
  96     do {                                                       \
  97         if((_type) & (LOGGING_MAX)) really_do_log((_type), _args); \
  98     } while(0)
  99 #define do_log_error(_type, _e, _args...)                      \
 100     do {                                                       \
 101         if((_type) & (LOGGING_MAX))                            \
 102             really_do_log_error((_type), (_e), _args);         \
 103     } while(0)
 104
 105 #else
 106
 107 /* No variadic macros -- let's hope inline works. */
 108
 109 static inline void
 110 do_log(int type, const char *f, ...)
 111 {
 112     va_list args;
 113
 114     va_start(args, f);
 115     if((type & (LOGGING_MAX)) != 0)
 116         really_do_log_v(type, f, args);
 117     va_end(args);
 118 }
 119
 120 static inline void
 121 do_log_error(int type, int e, const char *f, ...)
 122 {
 123     va_list args;
 124
 125     va_start(args, f);
 126     if((type & (LOGGING_MAX)) != 0)
 127         really_do_log_error_v(type, e, f, args);
 128     va_end(args);
 129 }
 130
 131 #endif
 132
 133 #define do_log_n(_type, _s, _n) \
 134     do { \
 135         if((_type) & (LOGGING_MAX)) really_do_log_n((_type), (_s), (_n)); \
 136     } while(0)