s390xcap.c revision 280304 
1#include <stdio.h>
2#include <stdlib.h>
3#include <string.h>
4#include <setjmp.h>
5#include <signal.h>
6
7extern unsigned long OPENSSL_s390xcap_P[];
8
9static sigjmp_buf ill_jmp;
10static void ill_handler(int sig)
11{
12    siglongjmp(ill_jmp, sig);
13}
14
15unsigned long OPENSSL_s390x_facilities(void);
16
17void OPENSSL_cpuid_setup(void)
18{
19    sigset_t oset;
20    struct sigaction ill_act, oact;
21
22    if (OPENSSL_s390xcap_P[0])
23        return;
24
25    OPENSSL_s390xcap_P[0] = 1UL << (8 * sizeof(unsigned long) - 1);
26
27    memset(&ill_act, 0, sizeof(ill_act));
28    ill_act.sa_handler = ill_handler;
29    sigfillset(&ill_act.sa_mask);
30    sigdelset(&ill_act.sa_mask, SIGILL);
31    sigdelset(&ill_act.sa_mask, SIGTRAP);
32    sigprocmask(SIG_SETMASK, &ill_act.sa_mask, &oset);
33    sigaction(SIGILL, &ill_act, &oact);
34
35    /* protection against missing store-facility-list-extended */
36    if (sigsetjmp(ill_jmp, 1) == 0)
37        OPENSSL_s390x_facilities();
38
39    sigaction(SIGILL, &oact, NULL);
40    sigprocmask(SIG_SETMASK, &oset, NULL);
41}
42