daemon/utils.h

   1 /*
   2  *  Dolda Connect - Modular multiuser Direct Connect-style client
   3  *  Copyright (C) 2004 Fredrik Tolf (fredrik@dolda2000.com)
   4  *
   5  *  This program is free software; you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation; either version 2 of the License, or
   8  *  (at your option) any later version.
   9  *
  10  *  This program is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with this program; if not, write to the Free Software
  17  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18 */
  19 #ifndef _UTILS_H
  20 #define _UTILS_H
  21
  22 #include <stdarg.h>
  23 #include <stdlib.h>
  24 #include <malloc.h>
  25 #include "log.h"
  26
  27 struct wcspair {
  28     struct wcspair *next;
  29     wchar_t *key;
  30     wchar_t *val;
  31 };
  32
  33 /* "Safe" functions */
  34 #define smalloc(size) ({void *__result__; ((__result__ = malloc(size)) == NULL)?({LOGOOM(size); abort(); (void *)0;}):__result__;})
  35 #define srealloc(ptr, size) ({void *__result__; ((__result__ = realloc((ptr), (size))) == NULL)?({LOGOOM(size); abort(); (void *)0;}):__result__;})
  36 #define swcsdup(wcs) ((wchar_t *)wcscpy(smalloc(sizeof(wchar_t) * (wcslen(wcs) + 1)), (wcs)))
  37 #define sstrdup(str) ((char *)strcpy(smalloc(strlen(str) + 1), (str)))
  38
  39 #define CBCHAIN(name, args...) \
  40 struct cbchain_ ## name { \
  41     struct cbchain_ ## name *next, *prev; \
  42     int (*func)(args, void *data); \
  43     void (*destroy)(void *data); \
  44     void *data; \
  45 } * name
  46
  47 #define GCBCHAIN(name, args...) \
  48 struct cbchain_ ## name * name = NULL
  49
  50 #define EGCBCHAIN(name, args...) \
  51 extern struct cbchain_ ## name { \
  52     struct cbchain_ ## name *next, *prev; \
  53     int (*func)(args, void *data); \
  54     void *data; \
  55 } * name
  56
  57 extern int vswprintf (wchar_t *__restrict __s, size_t __n,
  58                       __const wchar_t *__restrict __format,
  59                       __gnuc_va_list __arg);
  60 extern int swprintf (wchar_t *__restrict __s, size_t __n,
  61                      __const wchar_t *__restrict __format, ...);
  62
  63 char *vsprintf2(char *format, va_list al);
  64 char *sprintf2(char *format, ...)
  65 #if defined(__GNUC__) && 0
  66     __attribute__ ((format (printf, 1, 2)))
  67 #endif
  68 ;
  69 wchar_t *vswprintf2(wchar_t *format, va_list al);
  70 wchar_t *swprintf2(wchar_t *format, ...);
  71 wchar_t *icmbstowcs(char *mbs, char *charset);
  72 wchar_t *icsmbstowcs(char *mbs, char *charset, wchar_t *def);
  73 char *icwcstombs(wchar_t *wcs, char *charset);
  74 char *icswcstombs(wchar_t *wcs, char *charset, char *def);
  75 wchar_t *wcstolower(wchar_t *wcs);
  76 wchar_t ucptowc(int ucp);
  77 void _sizebuf(void **buf, size_t *bufsize, size_t reqsize, size_t elsize, int algo);
  78 double ntime(void);
  79 int wcsexists(wchar_t *h, wchar_t *n);
  80 #ifndef HAVE_WCSCASECMP
  81 int wcscasecmp(const wchar_t *s1, const wchar_t *s2);
  82 #endif
  83 char *hexencode(char *data, size_t datalen);
  84 char *hexdecode(char *data, size_t *len);
  85 char *base64encode(char *data, size_t datalen);
  86 char *base64decode(char *data, size_t *datalen);
  87 char *base32encode(char *data, size_t datalen);
  88 char *base32decode(char *data, size_t *datalen);
  89 void _freeparr(void **arr);
  90 int _parrlen(void **arr);
  91 char *findfile(char *gname, char *uname, char *homedir);
  92 struct wcspair *newwcspair(wchar_t *key, wchar_t *val, struct wcspair **list);
  93 void freewcspair(struct wcspair *pair, struct wcspair **list);
  94
  95 #define sizebuf(b, bs, rs, es, a) _sizebuf((void **)(b), (bs), (rs), (es), (a))
  96 #define sizebuf2(b, rs, a) _sizebuf((void **)(&(b)), &(b ## size), (rs), sizeof(*(b)), (a))
  97 #define addtobuf(b, c) \
  98 do { \
  99     _sizebuf((void **)(&(b)), &(b ## size), (b ## data) + 1, sizeof(*(b)), 1); \
 100     (b)[(b ## data)++] = (c); \
 101 } while(0)
 102 #define bufcat(d, s, n) \
 103 do { \
 104     size_t __bufcat_size__; \
 105     __bufcat_size__ = (n); \
 106     _sizebuf((void **)(&(d)), &(d ## size), (d ## data) + __bufcat_size__, sizeof(*(d)), 1); \
 107     memcpy((d) + (d ## data), (s), sizeof(*(d)) * __bufcat_size__); \
 108     (d ## data) += __bufcat_size__; \
 109 } while (0)
 110
 111 #define freeparr(parr) _freeparr((void **)(parr))
 112 #define parrlen(parr) _parrlen((void **)(parr))
 113
 114 #define CBREG(obj, name, funca, destroya, dataa) \
 115 do { \
 116     struct cbchain_ ## name *__new_cb__; \
 117     __new_cb__ = smalloc(sizeof(*__new_cb__)); \
 118     __new_cb__->func = funca; \
 119     __new_cb__->destroy = destroya; \
 120     __new_cb__->data = dataa; \
 121     __new_cb__->prev = NULL; \
 122     __new_cb__->next = (obj)->name; \
 123     (obj)->name = __new_cb__; \
 124 } while(0)
 125
 126 #define CBUNREG(obj, name, dataa) \
 127 do { \
 128     struct cbchain_ ## name *__cur__; \
 129     for(__cur__ = (obj)->name; __cur__ != NULL; __cur__ = __cur__->next) { \
 130         if(__cur__->data == (dataa)) { \
 131             if(__cur__->destroy != NULL) \
 132                 __cur__->destroy(__cur__->data); \
 133             if(__cur__->prev != NULL) \
 134                 __cur__->prev->next = __cur__->next; \
 135             if(__cur__->next != NULL) \
 136                 __cur__->next->prev = __cur__->prev; \
 137             if(__cur__ == (obj)->name) \
 138                 (obj)->name = __cur__->next; \
 139             free(__cur__); \
 140             break; \
 141         } \
 142     } \
 143 } while(0)
 144
 145 #define GCBREG(name, funca, dataa) \
 146 do { \
 147     struct cbchain_ ## name *__new_cb__; \
 148     __new_cb__ = smalloc(sizeof(*__new_cb__)); \
 149     __new_cb__->func = funca; \
 150     __new_cb__->data = dataa; \
 151     __new_cb__->prev = NULL; \
 152     __new_cb__->next = name; \
 153     name = __new_cb__; \
 154 } while(0)
 155
 156 #define CBCHAININIT(obj, name) (obj)->name = NULL
 157
 158 #define CBCHAINFREE(obj, name) \
 159 do { \
 160     struct cbchain_ ## name *__cur__; \
 161     while((__cur__ = (obj)->name) != NULL) { \
 162         (obj)->name = __cur__->next; \
 163         if(__cur__->destroy != NULL) \
 164             __cur__->destroy(__cur__->data); \
 165         free(__cur__); \
 166     } \
 167 } while(0)
 168
 169 #define CBCHAINDOCB(obj, name, args...) \
 170 do { \
 171     struct cbchain_ ## name *__cur__, *__next__; \
 172     for(__cur__ = (obj)->name; __cur__ != NULL; __cur__ = __next__) { \
 173         __next__ = __cur__->next; \
 174         if(__cur__->func(args, __cur__->data)) { \
 175             if(__cur__->next != NULL) \
 176                 __cur__->next->prev = __cur__->prev; \
 177             if(__cur__->prev != NULL) \
 178                 __cur__->prev->next = __cur__->next; \
 179             if(__cur__ == (obj)->name) \
 180                 (obj)->name = __cur__->next; \
 181             free(__cur__); \
 182         } \
 183     } \
 184 } while(0)
 185
 186 #define GCBCHAINDOCB(name, args...) \
 187 ({ \
 188     struct cbchain_ ## name *__cur__; \
 189     int __ret__; \
 190     __ret__ = 0; \
 191     for(__cur__ = name; __cur__ != NULL; __cur__ = __cur__->next) { \
 192         if(__cur__->func(args, __cur__->data)) { \
 193             __ret__ = 1; \
 194             break; \
 195         } \
 196     } \
 197     __ret__; \
 198 })
 199
 200 #endif