ucw/lib.h

   1 /*
   2  *      The UCW Library -- Miscellaneous Functions
   3  *
   4  *      (c) 1997--2009 Martin Mares <mj@ucw.cz>
   5  *      (c) 2005 Tomas Valla <tom@ucw.cz>
   6  *      (c) 2006 Robert Spalek <robert@ucw.cz>
   7  *      (c) 2007 Pavel Charvat <pchar@ucw.cz>
   8  *
   9  *      This software may be freely distributed and used according to the terms
  10  *      of the GNU Lesser General Public License.
  11  */
  12
  13 #ifndef _UCW_LIB_H
  14 #define _UCW_LIB_H
  15
  16 #include <ucw/config.h>
  17 #include <stdarg.h>
  18
  19 #ifdef CONFIG_UCW_CLEAN_ABI
  20 #define assert_failed ucw_assert_failed
  21 #define assert_failed_noinfo ucw_assert_failed_noinfo
  22 #define big_alloc ucw_big_alloc
  23 #define big_alloc_zero ucw_big_alloc_zero
  24 #define big_free ucw_big_free
  25 #define die ucw_die
  26 #define log_die_hook ucw_log_die_hook
  27 #define log_file ucw_log_file
  28 #define log_fork ucw_log_fork
  29 #define log_init ucw_log_init
  30 #define log_pid ucw_log_pid
  31 #define log_title ucw_log_title
  32 #define msg ucw_msg
  33 #define page_alloc ucw_page_alloc
  34 #define page_alloc_zero ucw_page_alloc_zero
  35 #define page_free ucw_page_free
  36 #define page_realloc ucw_page_realloc
  37 #define random_max ucw_random_max
  38 #define random_max_u64 ucw_random_max_u64
  39 #define random_u32 ucw_random_u32
  40 #define random_u64 ucw_random_u64
  41 #define vdie ucw_vdie
  42 #define vmsg ucw_vmsg
  43 #define xfree ucw_xfree
  44 #define xmalloc ucw_xmalloc
  45 #define xmalloc_zero ucw_xmalloc_zero
  46 #define xrealloc ucw_xrealloc
  47 #define xstrdup ucw_xstrdup
  48 #endif
  49
  50 /*** === Macros for handling structures, offsets and alignment ***/
  51
  52 #define CHECK_PTR_TYPE(x, type) ((x)-(type)(x) + (type)(x))             /** Check that a pointer @x is of type @type. Fail compilation if not. **/
  53 #define PTR_TO(s, i) &((s*)0)->i                                        /** Return OFFSETOF() in form of a pointer. **/
  54 #define OFFSETOF(s, i) ((uns)offsetof(s, i))                            /** Offset of item @i from the start of structure @s **/
  55 #define SKIP_BACK(s, i, p) ((s *)((char *)p - OFFSETOF(s, i)))          /** Given a pointer @p to item @i of structure @s, return a pointer to the start of the struct. **/
  56
  57 /** Align an integer @s to the nearest higher multiple of @a (which should be a power of two) **/
  58 #define ALIGN_TO(s, a) (((s)+a-1)&~(a-1))
  59
  60 /** Align a pointer @p to the nearest higher multiple of @s. **/
  61 #define ALIGN_PTR(p, s) ((uintptr_t)(p) % (s) ? (typeof(p))((uintptr_t)(p) + (s) - (uintptr_t)(p) % (s)) : (p))
  62
  63 #define UNALIGNED_PART(ptr, type) (((uintptr_t) (ptr)) % sizeof(type))
  64
  65 /*** === Other utility macros ***/
  66
  67 #define MIN(a,b) (((a)<(b))?(a):(b))                    /** Minimum of two numbers **/
  68 #define MAX(a,b) (((a)>(b))?(a):(b))                    /** Maximum of two numbers **/
  69 #define CLAMP(x,min,max) ({ int _t=x; (_t < min) ? min : (_t > max) ? max : _t; })      /** Clip a number @x to interval [@min,@max] **/
  70 #define ABS(x) ((x) < 0 ? -(x) : (x))                   /** Absolute value **/
  71 #define ARRAY_SIZE(a) (sizeof(a)/sizeof(*(a)))          /** The number of elements of an array **/
  72 #define STRINGIFY(x) #x                                 /** Convert macro parameter to a string **/
  73 #define STRINGIFY_EXPANDED(x) STRINGIFY(x)              /** Convert an expanded macro parameter to a string **/
  74 #define GLUE(x,y) x##y                                  /** Glue two tokens together **/
  75 #define GLUE_(x,y) x##_##y                              /** Glue two tokens together, separating them by an underscore **/
  76
  77 #define COMPARE(x,y) do { if ((x)<(y)) return -1; if ((x)>(y)) return 1; } while(0)             /** Numeric comparison function for qsort() **/
  78 #define REV_COMPARE(x,y) COMPARE(y,x)                                                           /** Reverse numeric comparison **/
  79 #define COMPARE_LT(x,y) do { if ((x)<(y)) return 1; if ((x)>(y)) return 0; } while(0)
  80 #define COMPARE_GT(x,y) COMPARE_LT(y,x)
  81
  82 #define ROL(x, bits) (((x) << (bits)) | ((uns)(x) >> (sizeof(uns)*8 - (bits))))         /** Bitwise rotation of an unsigned int to the left **/
  83 #define ROR(x, bits) (((uns)(x) >> (bits)) | ((x) << (sizeof(uns)*8 - (bits))))         /** Bitwise rotation of an unsigned int to the right **/
  84
  85 /*** === Shortcuts for GCC Extensions ***/
  86
  87 #ifdef __GNUC__
  88
  89 #undef inline
  90 #define NONRET __attribute__((noreturn))                                /** Function does not return **/
  91 #define UNUSED __attribute__((unused))                                  /** Variable/parameter is knowingly unused **/
  92 #define CONSTRUCTOR __attribute__((constructor))                        /** Call function upon start of program **/
  93 #define CONSTRUCTOR_WITH_PRIORITY(p) __attribute__((constructor(p)))    /** Define constructor with a given priority **/
  94 #define PACKED __attribute__((packed))                                  /** Structure should be packed **/
  95 #define CONST __attribute__((const))                                    /** Function depends only on arguments **/
  96 #define PURE __attribute__((pure))                                      /** Function depends only on arguments and global vars **/
  97 #define FORMAT_CHECK(x,y,z) __attribute__((format(x,y,z)))              /** Checking of printf-like format strings **/
  98 #define likely(x) __builtin_expect((x),1)                               /** Use `if (likely(@x))` if @x is almost always true **/
  99 #define unlikely(x) __builtin_expect((x),0)                             /** Use `if (unlikely(@x))` to hint that @x is almost always false **/
 100
 101 #if __GNUC__ >= 4 || __GNUC__ == 3 && __GNUC_MINOR__ >= 3
 102 #define ALWAYS_INLINE inline __attribute__((always_inline))             /** Forcibly inline **/
 103 #define NO_INLINE __attribute__((noinline))                             /** Forcibly uninline **/
 104 #else
 105 #define ALWAYS_INLINE inline
 106 #endif
 107
 108 #if __GNUC__ >= 4
 109 #define LIKE_MALLOC __attribute__((malloc))                             /** Function returns a "new" pointer **/
 110 #define SENTINEL_CHECK __attribute__((sentinel))                        /** The last argument must be NULL **/
 111 #else
 112 #define LIKE_MALLOC
 113 #define SENTINEL_CHECK
 114 #endif
 115
 116 #else
 117 #error This program requires the GNU C compiler.
 118 #endif
 119
 120 /***
 121  * [[logging]]
 122  *
 123  * === Basic logging functions (see <<log:,Logging>> and <ucw/log.h> for more)
 124  ***/
 125
 126 enum log_levels {                       /** The available log levels to pass to msg() and friends. **/
 127   L_DEBUG=0,                            // 'D' - Debugging
 128   L_INFO,                               // 'I' - Informational
 129   L_WARN,                               // 'W' - Warning
 130   L_ERROR,                              // 'E' - Error, but non-critical
 131   L_INFO_R,                             // 'i' - An alternative set of levels for messages caused by remote events
 132   L_WARN_R,                             // 'w'   (e.g., a packet received via network)
 133   L_ERROR_R,                            // 'e'
 134   L_FATAL,                              // '!' - Fatal error
 135   L_MAX
 136 };
 137
 138 #define LOG_LEVEL_NAMES P(DEBUG) P(INFO) P(WARN) P(ERROR) P(INFO_R) P(WARN_R) P(ERROR_R) P(FATAL)
 139
 140 // Return the letter associated with a given severity level
 141 #define LS_LEVEL_LETTER(level) ("DIWEiwe!###"[( level )])
 142
 143 #define L_SIGHANDLER    0x80000000      /** Avoid operations that are unsafe in signal handlers **/
 144 #define L_LOGGER_ERR    0x40000000      /** Used internally to avoid infinite reporting of logging errors **/
 145
 146 /**
 147  * This is the basic printf-like function for logging a message.
 148  * The @flags contain the log level and possibly other flag bits (like `L_SIGHANDLER`).
 149  **/
 150 void msg(uns flags, const char *fmt, ...) FORMAT_CHECK(printf,2,3);
 151 void vmsg(uns flags, const char *fmt, va_list args);            /** A vararg version of msg(). **/
 152 void die(const char *, ...) NONRET FORMAT_CHECK(printf,1,2);    /** Log a fatal error message and exit the program. **/
 153 void vdie(const char *fmt, va_list args) NONRET;                /** va_list version of die() **/
 154
 155 extern char *log_title;                 /** An optional log message title. Set to program name by log_init(). **/
 156 extern int log_pid;                     /** An optional PID printed in each log message. Set to 0 if it shouldn't be logged. **/
 157 extern void (*log_die_hook)(void);      /** An optional function called just before die() exists. **/
 158
 159 void log_init(const char *argv0);       /** Set @log_title to the program name extracted from @argv[0]. **/
 160 void log_fork(void);                    /** Call after fork() to update @log_pid. **/
 161 void log_file(const char *name);        /** Establish logging to the named file. Also redirect stderr there. **/
 162
 163 void assert_failed(const char *assertion, const char *file, int line) NONRET;
 164 void assert_failed_noinfo(void) NONRET;
 165
 166 #ifdef DEBUG_ASSERTS
 167 /**
 168  * Check an assertion. If the condition @x is false, stop the program with a fatal error.
 169  * Assertion checks are compiled only when `DEBUG_ASSERTS` is defined.
 170  **/
 171 #define ASSERT(x) ({ if (unlikely(!(x))) assert_failed(#x, __FILE__, __LINE__); 1; })
 172 #else
 173 #define ASSERT(x) ({ if (__builtin_constant_p(x) && !(x)) assert_failed_noinfo(); 1; })
 174 #endif
 175
 176 #define COMPILE_ASSERT(name,x) typedef char _COMPILE_ASSERT_##name[!!(x)-1]
 177
 178 #ifdef LOCAL_DEBUG
 179 #define DBG(x,y...) msg(L_DEBUG, x,##y) /** If `LOCAL_DEBUG` is defined before including <ucw/lib.h>, log a debug message. Otherwise do nothing. **/
 180 /**
 181  * If `LOCAL_DEBUG` is defined before including <ucw/lib.h>, log current
 182  * file name and line number. Otherwise do nothing.
 183  **/
 184 #define DBG_SPOT msg(L_DEBUG, "%s:%d (%s)", __FILE__, __LINE__, __func__)
 185 #else
 186 #define DBG(x,y...) do { } while(0)
 187 #define DBG_SPOT do { } while(0)
 188 #endif
 189
 190 #ifdef DEBUG_ASSERTS
 191 /**
 192  * Sometimes, we may want to check that a pointer points to a valid memory
 193  * location before we start using it for anything more complicated. This
 194  * macro checks pointer validity by reading the byte it points to.
 195  **/
 196 #define ASSERT_READABLE(ptr) ({ volatile char *__p = (ptr); *__p; })
 197 /** Like the previous macro, but it checks writeability, too. **/
 198 #define ASSERT_WRITEABLE(ptr) ({ volatile char *__p = (ptr); *__p = *__p; })
 199 #else
 200 #define ASSERT_READABLE(ptr) do { } while(0)
 201 #define ASSERT_WRITEABLE(ptr) do { } while(0)
 202 #endif
 203
 204 /*** === Memory allocation ***/
 205
 206 /*
 207  * Unfortunately, several libraries we might want to link to define
 208  * their own xmalloc and we don't want to interfere with them, hence
 209  * the renaming.
 210  */
 211 #define xmalloc ucw_xmalloc
 212 #define xrealloc ucw_xrealloc
 213 #define xfree ucw_xfree
 214
 215 void *xmalloc(size_t) LIKE_MALLOC;              /** Allocate memory and die() if there is none. **/
 216 void *xrealloc(void *, size_t);                 /** Reallocate memory and die() if there is none. **/
 217 void xfree(void *);                             /** Free memory allocated by xmalloc() or xrealloc(). **/
 218
 219 void *xmalloc_zero(size_t) LIKE_MALLOC;         /** Allocate memory and fill it by zeroes. **/
 220 char *xstrdup(const char *) LIKE_MALLOC;        /** Make a xmalloc()'ed copy of a string. Returns NULL for NULL string. **/
 221
 222 /* bigalloc.c */
 223
 224 void *page_alloc(u64 len) LIKE_MALLOC;          // Internal: allocates a multiple of CPU_PAGE_SIZE bytes with mmap
 225 void *page_alloc_zero(u64 len) LIKE_MALLOC;
 226 void page_free(void *start, u64 len);
 227 void *page_realloc(void *start, u64 old_len, u64 new_len);
 228
 229 void *big_alloc(u64 len) LIKE_MALLOC;           /** Allocate a large memory block in the most efficient way available. **/
 230 void *big_alloc_zero(u64 len) LIKE_MALLOC;      /** Allocate and clear a large memory block. **/
 231 void big_free(void *start, u64 len);            /** Free block allocated by @big_alloc() or @big_alloc_zero(). **/
 232
 233 /*** === Random numbers (random.c) ***/
 234
 235 uns random_u32(void);                           /** Return a pseudorandom 32-bit number. **/
 236 uns random_max(uns max);                        /** Return a pseudorandom 32-bit number in range [0,@max). **/
 237 u64 random_u64(void);                           /** Return a pseudorandom 64-bit number. **/
 238 u64 random_max_u64(u64 max);                    /** Return a pseudorandom 64-bit number in range [0,@max). **/
 239
 240 #endif