added speer skeletor
[archipelago] / xseg / sys / util.h
1 #ifndef _XSEG_SYS_UTIL_H
2 #define _XSEG_SYS_UTIL_H
3
4 #include <_sysutil.h>
5 #include <sys/domain.h>
6
7 /* log stuff */
8
9
10
11 #define FMTARG(fmt, arg, format, ...) fmt format "%s", arg, ## __VA_ARGS__
12 #define XSEGLOG(...) (xseg_snprintf(__xseg_errbuf, 4096, FMTARG("%s: ", __func__, ## __VA_ARGS__, "")), \
13                     __xseg_errbuf[4095] = 0, __xseg_log(__xseg_errbuf))
14
15 #define XSEGLOG2(__ctx, __level, ...)           \
16                 do {                            \
17                         if (__level <= ((__ctx)->log_level)) { \
18                                 __xseg_log2(__ctx, __level, FMTARG("%s: ", __func__, ## __VA_ARGS__ ,"")); \
19                         }       \
20                 } while(0) 
21
22 /* general purpose xflags */
23 #define X_ALLOC    ((uint32_t) (1 << 0))
24 #define X_LOCAL    ((uint32_t) (1 << 1))
25 #define X_NONBLOCK ((uint32_t) (1 << 2))
26
27
28 typedef uint64_t xpointer;
29
30 /* type to be used as absolute pointer
31  * this should be the same as xqindex
32  * and must fit into a pointer type
33  */
34 typedef uint64_t xptr; 
35
36 #define Noneidx ((xqindex)-1)
37 #define Null ((xpointer)-1)
38
39 #define __align(x, shift) (((((x) -1) >> (shift)) +1) << (shift))
40
41 #define XPTR_TYPE(ptrtype)      \
42         union {                 \
43                 ptrtype *t;     \
44                 xpointer x;     \
45         }
46
47 #define XPTRI(xptraddr)         \
48         (       (xpointer)(unsigned long)(xptraddr) +   \
49                 (xptraddr)->x                           )
50
51 #define XPTRISET(xptraddr, ptrval)      \
52         ((xptraddr)->x  =       (xpointer)(ptrval) -                    \
53                                 (xpointer)(unsigned long)(xptraddr)     )
54
55 #define XPTR(xptraddr)          \
56         (       (typeof((xptraddr)->t))                         \
57                 (unsigned long)                                 \
58                 (       (xpointer)(unsigned long)(xptraddr) +   \
59                         (xptraddr)->x           )               )
60
61 #define XPTRSET(xptraddr, ptrval)       \
62         ((xptraddr)->x  =       (xpointer)(unsigned long)(ptrval) -     \
63                                 (xpointer)(unsigned long)(xptraddr)     )
64
65
66
67 #define XPTR_OFFSET(base, ptr) ((unsigned long)(ptr) - (unsigned long)(base))
68
69 #define XPTR_MAKE(ptrval, base) ((xptr) XPTR_OFFSET(base, ptrval))
70
71 #define XPTR_TAKE(xptrval, base)        \
72         ( (void *) ( (unsigned long) base + (unsigned long) xptrval))
73
74 #endif