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