1*f50a7f3dSThomas Gleixner // SPDX-License-Identifier: GPL-2.0-only 216aab321SRashmica Gupta /* 316aab321SRashmica Gupta * Copyright 2015, Michael Neuling, IBM Corp. 416aab321SRashmica Gupta * 516aab321SRashmica Gupta * Original: Michael Neuling 3/4/2014 616aab321SRashmica Gupta * Modified: Rashmica Gupta 8/12/2015 716aab321SRashmica Gupta * 816aab321SRashmica Gupta * Check if any of the Transaction Memory SPRs get corrupted. 916aab321SRashmica Gupta * - TFIAR - stores address of location of transaction failure 1016aab321SRashmica Gupta * - TFHAR - stores address of software failure handler (if transaction 1116aab321SRashmica Gupta * fails) 1216aab321SRashmica Gupta * - TEXASR - lots of info about the transacion(s) 1316aab321SRashmica Gupta * 1416aab321SRashmica Gupta * (1) create more threads than cpus 1516aab321SRashmica Gupta * (2) in each thread: 1616aab321SRashmica Gupta * (a) set TFIAR and TFHAR a unique value 1716aab321SRashmica Gupta * (b) loop for awhile, continually checking to see if 1816aab321SRashmica Gupta * either register has been corrupted. 1916aab321SRashmica Gupta * 2016aab321SRashmica Gupta * (3) Loop: 2116aab321SRashmica Gupta * (a) begin transaction 2216aab321SRashmica Gupta * (b) abort transaction 2316aab321SRashmica Gupta * (c) check TEXASR to see if FS has been corrupted 2416aab321SRashmica Gupta */ 2516aab321SRashmica Gupta 2616aab321SRashmica Gupta #define _GNU_SOURCE 2716aab321SRashmica Gupta #include <stdio.h> 2816aab321SRashmica Gupta #include <stdlib.h> 2916aab321SRashmica Gupta #include <unistd.h> 3016aab321SRashmica Gupta #include <pthread.h> 3116aab321SRashmica Gupta #include <string.h> 3216aab321SRashmica Gupta 3316aab321SRashmica Gupta #include "utils.h" 3416aab321SRashmica Gupta #include "tm.h" 3516aab321SRashmica Gupta 3616aab321SRashmica Gupta int num_loops = 10000; 3716aab321SRashmica Gupta int passed = 1; 3816aab321SRashmica Gupta 3916aab321SRashmica Gupta void tfiar_tfhar(void *in) 4016aab321SRashmica Gupta { 4116aab321SRashmica Gupta int i, cpu; 4216aab321SRashmica Gupta unsigned long tfhar, tfhar_rd, tfiar, tfiar_rd; 4316aab321SRashmica Gupta cpu_set_t cpuset; 4416aab321SRashmica Gupta 4516aab321SRashmica Gupta CPU_ZERO(&cpuset); 4616aab321SRashmica Gupta cpu = (unsigned long)in >> 1; 4716aab321SRashmica Gupta CPU_SET(cpu, &cpuset); 4816aab321SRashmica Gupta sched_setaffinity(0, sizeof(cpuset), &cpuset); 4916aab321SRashmica Gupta 5016aab321SRashmica Gupta /* TFIAR: Last bit has to be high so userspace can read register */ 5116aab321SRashmica Gupta tfiar = ((unsigned long)in) + 1; 5216aab321SRashmica Gupta tfiar += 2; 5316aab321SRashmica Gupta mtspr(SPRN_TFIAR, tfiar); 5416aab321SRashmica Gupta 5516aab321SRashmica Gupta /* TFHAR: Last two bits are reserved */ 5616aab321SRashmica Gupta tfhar = ((unsigned long)in); 5716aab321SRashmica Gupta tfhar &= ~0x3UL; 5816aab321SRashmica Gupta tfhar += 4; 5916aab321SRashmica Gupta mtspr(SPRN_TFHAR, tfhar); 6016aab321SRashmica Gupta 6116aab321SRashmica Gupta for (i = 0; i < num_loops; i++) { 6216aab321SRashmica Gupta tfhar_rd = mfspr(SPRN_TFHAR); 6316aab321SRashmica Gupta tfiar_rd = mfspr(SPRN_TFIAR); 6416aab321SRashmica Gupta if ( (tfhar != tfhar_rd) || (tfiar != tfiar_rd) ) { 6516aab321SRashmica Gupta passed = 0; 6616aab321SRashmica Gupta return; 6716aab321SRashmica Gupta } 6816aab321SRashmica Gupta } 6916aab321SRashmica Gupta return; 7016aab321SRashmica Gupta } 7116aab321SRashmica Gupta 7216aab321SRashmica Gupta void texasr(void *in) 7316aab321SRashmica Gupta { 7416aab321SRashmica Gupta unsigned long i; 7516aab321SRashmica Gupta uint64_t result = 0; 7616aab321SRashmica Gupta 7716aab321SRashmica Gupta for (i = 0; i < num_loops; i++) { 7816aab321SRashmica Gupta asm __volatile__( 7916aab321SRashmica Gupta "tbegin.;" 8016aab321SRashmica Gupta "beq 3f ;" 8116aab321SRashmica Gupta "tabort. 0 ;" 8216aab321SRashmica Gupta "tend.;" 8316aab321SRashmica Gupta 8416aab321SRashmica Gupta /* Abort handler */ 8516aab321SRashmica Gupta "3: ;" 8616aab321SRashmica Gupta ::: "memory"); 8716aab321SRashmica Gupta 8816aab321SRashmica Gupta /* Check the TEXASR */ 8916aab321SRashmica Gupta result = mfspr(SPRN_TEXASR); 9016aab321SRashmica Gupta if ((result & TEXASR_FS) == 0) { 9116aab321SRashmica Gupta passed = 0; 9216aab321SRashmica Gupta return; 9316aab321SRashmica Gupta } 9416aab321SRashmica Gupta } 9516aab321SRashmica Gupta return; 9616aab321SRashmica Gupta } 9716aab321SRashmica Gupta 9816aab321SRashmica Gupta int test_tmspr() 9916aab321SRashmica Gupta { 100693b31b2SBreno Leitao pthread_t *thread; 10116aab321SRashmica Gupta int thread_num; 10216aab321SRashmica Gupta unsigned long i; 10316aab321SRashmica Gupta 10416aab321SRashmica Gupta SKIP_IF(!have_htm()); 10516aab321SRashmica Gupta 10616aab321SRashmica Gupta /* To cause some context switching */ 10716aab321SRashmica Gupta thread_num = 10 * sysconf(_SC_NPROCESSORS_ONLN); 10816aab321SRashmica Gupta 109693b31b2SBreno Leitao thread = malloc(thread_num * sizeof(pthread_t)); 110693b31b2SBreno Leitao if (thread == NULL) 11116aab321SRashmica Gupta return EXIT_FAILURE; 11216aab321SRashmica Gupta 113693b31b2SBreno Leitao /* Test TFIAR and TFHAR */ 114693b31b2SBreno Leitao for (i = 0; i < thread_num; i += 2) { 115693b31b2SBreno Leitao if (pthread_create(&thread[i], NULL, (void *)tfiar_tfhar, 116693b31b2SBreno Leitao (void *)i)) 11716aab321SRashmica Gupta return EXIT_FAILURE; 11816aab321SRashmica Gupta } 119693b31b2SBreno Leitao /* Test TEXASR */ 120693b31b2SBreno Leitao for (i = 1; i < thread_num; i += 2) { 121693b31b2SBreno Leitao if (pthread_create(&thread[i], NULL, (void *)texasr, (void *)i)) 12216aab321SRashmica Gupta return EXIT_FAILURE; 123693b31b2SBreno Leitao } 124693b31b2SBreno Leitao 125693b31b2SBreno Leitao for (i = 0; i < thread_num; i++) { 126693b31b2SBreno Leitao if (pthread_join(thread[i], NULL) != 0) 127693b31b2SBreno Leitao return EXIT_FAILURE; 128693b31b2SBreno Leitao } 129693b31b2SBreno Leitao 130693b31b2SBreno Leitao free(thread); 13116aab321SRashmica Gupta 13216aab321SRashmica Gupta if (passed) 13316aab321SRashmica Gupta return 0; 13416aab321SRashmica Gupta else 13516aab321SRashmica Gupta return 1; 13616aab321SRashmica Gupta } 13716aab321SRashmica Gupta 13816aab321SRashmica Gupta int main(int argc, char *argv[]) 13916aab321SRashmica Gupta { 14016aab321SRashmica Gupta if (argc > 1) { 14116aab321SRashmica Gupta if (strcmp(argv[1], "-h") == 0) { 14216aab321SRashmica Gupta printf("Syntax:\t [<num loops>]\n"); 14316aab321SRashmica Gupta return 0; 14416aab321SRashmica Gupta } else { 14516aab321SRashmica Gupta num_loops = atoi(argv[1]); 14616aab321SRashmica Gupta } 14716aab321SRashmica Gupta } 14816aab321SRashmica Gupta return test_harness(test_tmspr, "tm_tmspr"); 14916aab321SRashmica Gupta } 150