1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
#ifndef __TUNNEL_MACRO_H__
#define __TUNNEL_MACRO_H__
#include <stdlib.h>
#include <string.h>
#define _new(T, ...) ({ T __v = { __VA_ARGS__ }; _copy(&__v); })
#define _copy(p, ...) _copy_(p, ## __VA_ARGS__, sizeof(*p))
#define _copy_(p, n, ...) memcpy(malloc(n), p, n)
#define __unused __attribute__((unused))
#define __cleanup(f) __attribute__((cleanup(f)))
#define CAT(a, b) CAT_(a, b)
#define CAT_(a, b) a ## b
#define UNIQ(name) CAT(name, __LINE__)
#define defer \
auto void UNIQ(defer_func)(int *); \
int UNIQ(defer_var) __cleanup(UNIQ(defer_func)); \
void UNIQ(defer_func)(int *p __unused)
static __unused void __let_nothing(void)
{
}
#define let(p, e, ...) let_(p, e, ## __VA_ARGS__, __let_nothing)
#define let_(p, e, f, ...) \
for (int step = 1; step; ) \
for (typeof(e) p = e; step; f(p), step = 0)
static inline int lenv(void **pp)
{
int count = 0;
if (pp) {
for (; *pp; pp++)
count++;
}
return count;
}
#define lenv(v) lenv((void **) v)
static inline void **addv(void ***v, void *p)
{
if (! v) {
*v = calloc(2, sizeof(*v));
**v = p;
} else {
int len = lenv(*v);
*v = realloc(*v, sizeof(*v) * (len + 2));
(*v)[len] = p;
(*v)[len + 1] = NULL;
}
return *v;
}
#define addv(v, p) addv((void ***) v, p)
#endif
|
