145 lines · c
1// SPDX-License-Identifier: GPL-2.0-only2/*3 * Copyright 2015, Michael Neuling, IBM Corp.4 *5 * Original: Michael Neuling 3/4/20146 * Modified: Rashmica Gupta 8/12/20157 *8 * Check if any of the Transaction Memory SPRs get corrupted.9 * - TFIAR - stores address of location of transaction failure10 * - TFHAR - stores address of software failure handler (if transaction11 * fails)12 * - TEXASR - lots of info about the transacion(s)13 *14 * (1) create more threads than cpus15 * (2) in each thread:16 * (a) set TFIAR and TFHAR a unique value17 * (b) loop for awhile, continually checking to see if18 * either register has been corrupted.19 *20 * (3) Loop:21 * (a) begin transaction22 * (b) abort transaction23 * (c) check TEXASR to see if FS has been corrupted24 */25 26#define _GNU_SOURCE27#include <stdio.h>28#include <stdlib.h>29#include <unistd.h>30#include <pthread.h>31#include <string.h>32 33#include "utils.h"34#include "tm.h"35 36int num_loops = 1000000;37int passed = 1;38 39void tfiar_tfhar(void *in)40{41 unsigned long tfhar, tfhar_rd, tfiar, tfiar_rd;42 int i;43 44 /* TFIAR: Last bit has to be high so userspace can read register */45 tfiar = ((unsigned long)in) + 1;46 tfiar += 2;47 mtspr(SPRN_TFIAR, tfiar);48 49 /* TFHAR: Last two bits are reserved */50 tfhar = ((unsigned long)in);51 tfhar &= ~0x3UL;52 tfhar += 4;53 mtspr(SPRN_TFHAR, tfhar);54 55 for (i = 0; i < num_loops; i++) {56 tfhar_rd = mfspr(SPRN_TFHAR);57 tfiar_rd = mfspr(SPRN_TFIAR);58 if ( (tfhar != tfhar_rd) || (tfiar != tfiar_rd) ) {59 passed = 0;60 return;61 }62 }63 return;64}65 66void texasr(void *in)67{68 unsigned long i;69 uint64_t result = 0;70 71 for (i = 0; i < num_loops; i++) {72 asm __volatile__(73 "tbegin.;"74 "beq 3f ;"75 "tabort. 0 ;"76 "tend.;"77 78 /* Abort handler */79 "3: ;"80 ::: "memory");81 82 /* Check the TEXASR */83 result = mfspr(SPRN_TEXASR);84 if ((result & TEXASR_FS) == 0) {85 passed = 0;86 return;87 }88 }89 return;90}91 92int test_tmspr()93{94 pthread_t *thread;95 int thread_num;96 unsigned long i;97 98 SKIP_IF(!have_htm());99 SKIP_IF(htm_is_synthetic());100 101 /* To cause some context switching */102 thread_num = 10 * sysconf(_SC_NPROCESSORS_ONLN);103 104 thread = malloc(thread_num * sizeof(pthread_t));105 if (thread == NULL)106 return EXIT_FAILURE;107 108 /* Test TFIAR and TFHAR */109 for (i = 0; i < thread_num; i += 2) {110 if (pthread_create(&thread[i], NULL, (void *)tfiar_tfhar,111 (void *)i))112 return EXIT_FAILURE;113 }114 /* Test TEXASR */115 for (i = 1; i < thread_num; i += 2) {116 if (pthread_create(&thread[i], NULL, (void *)texasr, (void *)i))117 return EXIT_FAILURE;118 }119 120 for (i = 0; i < thread_num; i++) {121 if (pthread_join(thread[i], NULL) != 0)122 return EXIT_FAILURE;123 }124 125 free(thread);126 127 if (passed)128 return 0;129 else130 return 1;131}132 133int main(int argc, char *argv[])134{135 if (argc > 1) {136 if (strcmp(argv[1], "-h") == 0) {137 printf("Syntax:\t [<num loops>]\n");138 return 0;139 } else {140 num_loops = atoi(argv[1]);141 }142 }143 return test_harness(test_tmspr, "tm_tmspr");144}145