111 lines
2.4 KiB
C
111 lines
2.4 KiB
C
|
/*
|
||
|
|
* Copyright 2016, Cyril Bur, IBM Corp.
|
||
|
|
*
|
||
|
|
* This program is free software; you can redistribute it and/or
|
||
|
|
* modify it under the terms of the GNU General Public License
|
||
|
|
* as published by the Free Software Foundation; either version
|
||
|
|
* 2 of the License, or (at your option) any later version.
|
||
|
|
*
|
||
|
|
* 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");
|
||
|
|
}
|