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