10 #include <ccan/tap/tap.h>
11 #include <ccan/ptrint/ptrint.h>
12 #include <ccan/altstack/altstack.h>
23 int fail, call1, call2;
26 #define e(x) (900+(x))
27 #define seterr(x) (errno = e(x))
28 #define setcall(x) ((call1 |= !errno ? (x) : 0), (call2 |= errno || state.out ? (x) : 0))
29 #define getrlimit(...) (fail&getrlimit_ ? (seterr(getrlimit_), -1) : (setcall(getrlimit_), getrlimit(__VA_ARGS__)))
30 #define mmap(...) (fail&mmap_ ? (seterr(mmap_), (void *)-1) : (setcall(mmap_), mmap(__VA_ARGS__)))
31 #define munmap(a, b) (fail&munmap_ ? (seterr(munmap_), -1) : (setcall(munmap_), munmap(m_=(a), msz_=(b))))
32 #define setrlimit(...) (fail&setrlimit_ ? (seterr(setrlimit_), -1) : (setcall(setrlimit_), setrlimit(__VA_ARGS__)))
33 #define sigaltstack(...) (fail&sigaltstack_ ? (seterr(sigaltstack_), -1) : (setcall(sigaltstack_), sigaltstack(__VA_ARGS__)))
34 #define sigaction(...) (fail&sigaction_ ? (seterr(sigaction_), -1) : (setcall(sigaction_), sigaction(__VA_ARGS__)))
43 #define stderr mystderr
45 #include <ccan/altstack/altstack.c>
50 static void __attribute__((optimize("O0"))) dn(unsigned long i)
52 if (used) used = altstack_used();
55 static void *wrap(void *i)
61 #define chkfail(x, y, z, c1, c2) \
66 ok1((fail = x) && (y)); \
72 #define chkok(y, z, c1, c2) \
86 long pgsz = sysconf(_SC_PAGESIZE);
90 chkfail(getrlimit_, altstack(8*MiB, wrap, int2ptr(0), 0) == -1, e(getrlimit_),
94 chkfail(setrlimit_, altstack(8*MiB, wrap, int2ptr(0), 0) == -1, e(setrlimit_),
98 chkfail(mmap_, altstack(8*MiB, wrap, int2ptr(0), 0) == -1, e(mmap_),
99 getrlimit_|setrlimit_,
102 chkfail(sigaltstack_, altstack(8*MiB, wrap, int2ptr(0), 0) == -1, e(sigaltstack_),
103 getrlimit_|setrlimit_|mmap_,
106 chkfail(sigaction_, altstack(8*MiB, wrap, int2ptr(0), 0) == -1, e(sigaction_),
107 getrlimit_|setrlimit_|mmap_|sigaltstack_,
108 setrlimit_|munmap_|sigaltstack_);
110 chkfail(munmap_, altstack(8*MiB, wrap, int2ptr(0), 0) == 1, e(munmap_),
111 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_,
112 setrlimit_|sigaltstack_|sigaction_);
113 if (fail = 0, munmap(m_, msz_) == -1)
116 chkok( altstack(1*MiB, wrap, int2ptr(1000000), 0) == -1, EOVERFLOW,
117 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_,
118 setrlimit_|munmap_|sigaltstack_|sigaction_);
120 // be sure segv catch is repeatable (SA_NODEFER)
121 chkok( altstack(1*MiB, wrap, int2ptr(1000000), 0) == -1, EOVERFLOW,
122 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_,
123 setrlimit_|munmap_|sigaltstack_|sigaction_);
126 chkfail(munmap_, altstack(1*MiB, wrap, int2ptr(1000000), 0) == -1, EOVERFLOW,
127 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_,
128 setrlimit_|sigaltstack_|sigaction_);
129 if (fail = 0, munmap(m_, msz_) == -1)
132 ok1(altstack_max() == 1*MiB);
133 diag("used: %lu", used);
134 ok1(used >= 1*MiB - pgsz && used <= 1*MiB + pgsz);
137 for(p = altstack_geterr(); *p; p++)
138 if (*p >= '0' && *p <= '9')
141 #define estr "(altstack@~~~) SIGSEGV caught; (altstack@~~~) munmap(m, max): Unknown error ~~~"
142 ok1(strcmp(altstack_geterr(), estr) == 0);
144 char buf[ALTSTACK_ERR_MAXLEN*2] = {0};
145 if ((mystderr = fmemopen(buf, sizeof(buf), "w")) == NULL)
150 ok1(strcmp(buf, estr "\n") == 0);
153 chkok( altstack(8*MiB, wrap, int2ptr(1000000), 0) == -1, EOVERFLOW,
154 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_,
155 setrlimit_|munmap_|sigaltstack_|sigaction_);
157 diag("used: %lu", used);
158 ok1(used >= 8*MiB - pgsz && used <= 8*MiB + pgsz);
161 chkok( altstack(8*MiB, wrap, int2ptr(100000), 0) == 0, 0,
162 getrlimit_|setrlimit_|mmap_|sigaltstack_|sigaction_|munmap_,
163 setrlimit_|munmap_|sigaltstack_|sigaction_);
168 diag("used: %lu", used);
169 ok1(used == 32 || used == 40);
171 return exit_status();