Blame src/functional/setjmp.c
|
Szabolcs Nagy |
0c5fb5 |
#include <stdio.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include <unistd.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include <errno.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include <string.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include <signal.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include <setjmp.h>
|
|
Szabolcs Nagy |
0c5fb5 |
#include "test.h"
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
#define TEST(c, ...) ((c) ? 1 : (error(#c" failed: " __VA_ARGS__),0))
|
|
Szabolcs Nagy |
0c5fb5 |
#define TESTE(c) (errno=0, TEST(c, "errno = %s\n", strerror(errno)))
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
int main(void)
|
|
Szabolcs Nagy |
0c5fb5 |
{
|
|
Szabolcs Nagy |
0c5fb5 |
volatile int x = 0, r;
|
|
Szabolcs Nagy |
0c5fb5 |
jmp_buf jb;
|
|
Szabolcs Nagy |
0c5fb5 |
sigjmp_buf sjb;
|
|
Szabolcs Nagy |
0c5fb5 |
volatile sigset_t oldset;
|
|
Szabolcs Nagy |
0c5fb5 |
sigset_t set;
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
if (!setjmp(jb)) {
|
|
Szabolcs Nagy |
0c5fb5 |
x = 1;
|
|
Szabolcs Nagy |
0c5fb5 |
longjmp(jb, 1);
|
|
Szabolcs Nagy |
0c5fb5 |
}
|
|
Szabolcs Nagy |
0c5fb5 |
TEST(x==1, "setjmp/longjmp seems to have been bypassed\n");
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
x = 0;
|
|
Szabolcs Nagy |
0c5fb5 |
r = setjmp(jb);
|
|
Szabolcs Nagy |
0c5fb5 |
if (!x) {
|
|
Szabolcs Nagy |
0c5fb5 |
x = 1;
|
|
Szabolcs Nagy |
0c5fb5 |
longjmp(jb, 0);
|
|
Szabolcs Nagy |
0c5fb5 |
}
|
|
Szabolcs Nagy |
0c5fb5 |
TEST(r==1, "longjmp(jb, 0) caused setjmp to return %d\n", r);
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
sigemptyset(&set);
|
|
Szabolcs Nagy |
0c5fb5 |
sigaddset(&set, SIGUSR1);
|
|
Szabolcs Nagy |
0c5fb5 |
sigprocmask(SIG_UNBLOCK, &set, &set);
|
|
Szabolcs Nagy |
0c5fb5 |
oldset = set;
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
/* Improve the chances of catching failure of sigsetjmp to
|
|
Szabolcs Nagy |
0c5fb5 |
* properly save the signal mask in the sigjmb_buf. */
|
|
Szabolcs Nagy |
0c5fb5 |
memset(&sjb, -1, sizeof sjb);
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
if (!sigsetjmp(sjb, 1)) {
|
|
Szabolcs Nagy |
0c5fb5 |
sigemptyset(&set);
|
|
Szabolcs Nagy |
0c5fb5 |
sigaddset(&set, SIGUSR1);
|
|
Szabolcs Nagy |
0c5fb5 |
sigprocmask(SIG_BLOCK, &set, 0);
|
|
Szabolcs Nagy |
0c5fb5 |
siglongjmp(sjb, 1);
|
|
Szabolcs Nagy |
0c5fb5 |
}
|
|
Szabolcs Nagy |
0c5fb5 |
set = oldset;
|
|
Szabolcs Nagy |
0c5fb5 |
sigprocmask(SIG_SETMASK, &set, &set);
|
|
Szabolcs Nagy |
0c5fb5 |
TEST(sigismember(&set, SIGUSR1)==0, "siglongjmp failed to restore mask\n");
|
|
Szabolcs Nagy |
0c5fb5 |
|
|
Szabolcs Nagy |
0c5fb5 |
return test_status;
|
|
Szabolcs Nagy |
0c5fb5 |
}
|