| 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 | |
|---|
| 23 | extern long tm_signal_self(pid_t pid, int sig, long *ret); |
|---|
| 24 | |
|---|
| 25 | static sig_atomic_t signaled; |
|---|
| 26 | static sig_atomic_t fail; |
|---|
| 27 | |
|---|
| 28 | static 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 | |
|---|
| 41 | static 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 | |
|---|
| 104 | int main(void) |
|---|
| 105 | { |
|---|
| 106 | return test_harness(test_signal_tm, "signal_tm" ); |
|---|
| 107 | } |
|---|
| 108 | |
|---|
