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