ucw/lib.h

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