1*4882a593Smuzhiyun // SPDX-License-Identifier: GPL-2.0-or-later
2*4882a593Smuzhiyun /*
3*4882a593Smuzhiyun * Copyright 2016, Cyril Bur, IBM Corp.
4*4882a593Smuzhiyun *
5*4882a593Smuzhiyun * Sending one self a signal should always get delivered.
6*4882a593Smuzhiyun */
7*4882a593Smuzhiyun
8*4882a593Smuzhiyun #include <errno.h>
9*4882a593Smuzhiyun #include <stdlib.h>
10*4882a593Smuzhiyun #include <stdio.h>
11*4882a593Smuzhiyun #include <string.h>
12*4882a593Smuzhiyun #include <signal.h>
13*4882a593Smuzhiyun #include <unistd.h>
14*4882a593Smuzhiyun
15*4882a593Smuzhiyun #include <altivec.h>
16*4882a593Smuzhiyun
17*4882a593Smuzhiyun #include "utils.h"
18*4882a593Smuzhiyun #include "../tm/tm.h"
19*4882a593Smuzhiyun
20*4882a593Smuzhiyun #define MAX_ATTEMPT 500000
21*4882a593Smuzhiyun #define TIMEOUT 10
22*4882a593Smuzhiyun
23*4882a593Smuzhiyun extern long tm_signal_self(pid_t pid, int sig, long *ret);
24*4882a593Smuzhiyun
25*4882a593Smuzhiyun static sig_atomic_t signaled;
26*4882a593Smuzhiyun static sig_atomic_t fail;
27*4882a593Smuzhiyun
signal_handler(int sig)28*4882a593Smuzhiyun static void signal_handler(int sig)
29*4882a593Smuzhiyun {
30*4882a593Smuzhiyun if (tcheck_active()) {
31*4882a593Smuzhiyun fail = 2;
32*4882a593Smuzhiyun return;
33*4882a593Smuzhiyun }
34*4882a593Smuzhiyun
35*4882a593Smuzhiyun if (sig == SIGUSR1)
36*4882a593Smuzhiyun signaled = 1;
37*4882a593Smuzhiyun else
38*4882a593Smuzhiyun fail = 1;
39*4882a593Smuzhiyun }
40*4882a593Smuzhiyun
test_signal_tm()41*4882a593Smuzhiyun static int test_signal_tm()
42*4882a593Smuzhiyun {
43*4882a593Smuzhiyun int i;
44*4882a593Smuzhiyun struct sigaction act;
45*4882a593Smuzhiyun
46*4882a593Smuzhiyun act.sa_handler = signal_handler;
47*4882a593Smuzhiyun act.sa_flags = 0;
48*4882a593Smuzhiyun sigemptyset(&act.sa_mask);
49*4882a593Smuzhiyun if (sigaction(SIGUSR1, &act, NULL) < 0) {
50*4882a593Smuzhiyun perror("sigaction SIGUSR1");
51*4882a593Smuzhiyun exit(1);
52*4882a593Smuzhiyun }
53*4882a593Smuzhiyun if (sigaction(SIGALRM, &act, NULL) < 0) {
54*4882a593Smuzhiyun perror("sigaction SIGALRM");
55*4882a593Smuzhiyun exit(1);
56*4882a593Smuzhiyun }
57*4882a593Smuzhiyun
58*4882a593Smuzhiyun SKIP_IF(!have_htm());
59*4882a593Smuzhiyun
60*4882a593Smuzhiyun for (i = 0; i < MAX_ATTEMPT; i++) {
61*4882a593Smuzhiyun /*
62*4882a593Smuzhiyun * If anything bad happens in ASM and we fail to set ret
63*4882a593Smuzhiyun * because *handwave* TM this will cause failure
64*4882a593Smuzhiyun */
65*4882a593Smuzhiyun long ret = 0xdead;
66*4882a593Smuzhiyun long rc = 0xbeef;
67*4882a593Smuzhiyun
68*4882a593Smuzhiyun alarm(0); /* Disable any pending */
69*4882a593Smuzhiyun signaled = 0;
70*4882a593Smuzhiyun alarm(TIMEOUT);
71*4882a593Smuzhiyun FAIL_IF(tcheck_transactional());
72*4882a593Smuzhiyun rc = tm_signal_self(getpid(), SIGUSR1, &ret);
73*4882a593Smuzhiyun if (ret == 0xdead)
74*4882a593Smuzhiyun /*
75*4882a593Smuzhiyun * This basically means the transaction aborted before we
76*4882a593Smuzhiyun * even got to the suspend... this is crazy but it
77*4882a593Smuzhiyun * happens.
78*4882a593Smuzhiyun * Yes this also means we might never make forward
79*4882a593Smuzhiyun * progress... the alarm() will trip eventually...
80*4882a593Smuzhiyun */
81*4882a593Smuzhiyun continue;
82*4882a593Smuzhiyun
83*4882a593Smuzhiyun if (rc || ret) {
84*4882a593Smuzhiyun /* Ret is actually an errno */
85*4882a593Smuzhiyun printf("TEXASR 0x%016lx, TFIAR 0x%016lx\n",
86*4882a593Smuzhiyun __builtin_get_texasr(), __builtin_get_tfiar());
87*4882a593Smuzhiyun fprintf(stderr, "(%d) Fail reason: %d rc=0x%lx ret=0x%lx\n",
88*4882a593Smuzhiyun i, fail, rc, ret);
89*4882a593Smuzhiyun FAIL_IF(ret);
90*4882a593Smuzhiyun }
91*4882a593Smuzhiyun while(!signaled && !fail)
92*4882a593Smuzhiyun asm volatile("": : :"memory");
93*4882a593Smuzhiyun if (!signaled) {
94*4882a593Smuzhiyun fprintf(stderr, "(%d) Fail reason: %d rc=0x%lx ret=0x%lx\n",
95*4882a593Smuzhiyun i, fail, rc, ret);
96*4882a593Smuzhiyun FAIL_IF(fail); /* For the line number */
97*4882a593Smuzhiyun }
98*4882a593Smuzhiyun }
99*4882a593Smuzhiyun
100*4882a593Smuzhiyun return 0;
101*4882a593Smuzhiyun }
102*4882a593Smuzhiyun
main(void)103*4882a593Smuzhiyun int main(void)
104*4882a593Smuzhiyun {
105*4882a593Smuzhiyun return test_harness(test_signal_tm, "signal_tm");
106*4882a593Smuzhiyun }
107