108 lines
		
	
	
		
			2.2 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			108 lines
		
	
	
		
			2.2 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| // 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());
 | |
| 	SKIP_IF(htm_is_synthetic());
 | |
| 
 | |
| 	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");
 | |
| }
 |