1*4882a593Smuzhiyun // SPDX-License-Identifier: GPL-2.0-or-later
2*4882a593Smuzhiyun /*
3*4882a593Smuzhiyun * Ptrace test for TAR, PPR, DSCR registers
4*4882a593Smuzhiyun *
5*4882a593Smuzhiyun * Copyright (C) 2015 Anshuman Khandual, IBM Corporation.
6*4882a593Smuzhiyun */
7*4882a593Smuzhiyun #include "ptrace.h"
8*4882a593Smuzhiyun #include "ptrace-tar.h"
9*4882a593Smuzhiyun
10*4882a593Smuzhiyun /* Tracer and Tracee Shared Data */
11*4882a593Smuzhiyun int shm_id;
12*4882a593Smuzhiyun int *cptr;
13*4882a593Smuzhiyun int *pptr;
14*4882a593Smuzhiyun
tar(void)15*4882a593Smuzhiyun void tar(void)
16*4882a593Smuzhiyun {
17*4882a593Smuzhiyun unsigned long reg[3];
18*4882a593Smuzhiyun int ret;
19*4882a593Smuzhiyun
20*4882a593Smuzhiyun cptr = (int *)shmat(shm_id, NULL, 0);
21*4882a593Smuzhiyun printf("%-30s TAR: %u PPR: %lx DSCR: %u\n",
22*4882a593Smuzhiyun user_write, TAR_1, PPR_1, DSCR_1);
23*4882a593Smuzhiyun
24*4882a593Smuzhiyun mtspr(SPRN_TAR, TAR_1);
25*4882a593Smuzhiyun mtspr(SPRN_PPR, PPR_1);
26*4882a593Smuzhiyun mtspr(SPRN_DSCR, DSCR_1);
27*4882a593Smuzhiyun
28*4882a593Smuzhiyun cptr[2] = 1;
29*4882a593Smuzhiyun
30*4882a593Smuzhiyun /* Wait on parent */
31*4882a593Smuzhiyun while (!cptr[0])
32*4882a593Smuzhiyun asm volatile("" : : : "memory");
33*4882a593Smuzhiyun
34*4882a593Smuzhiyun reg[0] = mfspr(SPRN_TAR);
35*4882a593Smuzhiyun reg[1] = mfspr(SPRN_PPR);
36*4882a593Smuzhiyun reg[2] = mfspr(SPRN_DSCR);
37*4882a593Smuzhiyun
38*4882a593Smuzhiyun printf("%-30s TAR: %lu PPR: %lx DSCR: %lu\n",
39*4882a593Smuzhiyun user_read, reg[0], reg[1], reg[2]);
40*4882a593Smuzhiyun
41*4882a593Smuzhiyun /* Unblock the parent now */
42*4882a593Smuzhiyun cptr[1] = 1;
43*4882a593Smuzhiyun shmdt((int *)cptr);
44*4882a593Smuzhiyun
45*4882a593Smuzhiyun ret = validate_tar_registers(reg, TAR_2, PPR_2, DSCR_2);
46*4882a593Smuzhiyun if (ret)
47*4882a593Smuzhiyun exit(1);
48*4882a593Smuzhiyun exit(0);
49*4882a593Smuzhiyun }
50*4882a593Smuzhiyun
trace_tar(pid_t child)51*4882a593Smuzhiyun int trace_tar(pid_t child)
52*4882a593Smuzhiyun {
53*4882a593Smuzhiyun unsigned long reg[3];
54*4882a593Smuzhiyun
55*4882a593Smuzhiyun FAIL_IF(start_trace(child));
56*4882a593Smuzhiyun FAIL_IF(show_tar_registers(child, reg));
57*4882a593Smuzhiyun printf("%-30s TAR: %lu PPR: %lx DSCR: %lu\n",
58*4882a593Smuzhiyun ptrace_read_running, reg[0], reg[1], reg[2]);
59*4882a593Smuzhiyun
60*4882a593Smuzhiyun FAIL_IF(validate_tar_registers(reg, TAR_1, PPR_1, DSCR_1));
61*4882a593Smuzhiyun FAIL_IF(stop_trace(child));
62*4882a593Smuzhiyun return TEST_PASS;
63*4882a593Smuzhiyun }
64*4882a593Smuzhiyun
trace_tar_write(pid_t child)65*4882a593Smuzhiyun int trace_tar_write(pid_t child)
66*4882a593Smuzhiyun {
67*4882a593Smuzhiyun FAIL_IF(start_trace(child));
68*4882a593Smuzhiyun FAIL_IF(write_tar_registers(child, TAR_2, PPR_2, DSCR_2));
69*4882a593Smuzhiyun printf("%-30s TAR: %u PPR: %lx DSCR: %u\n",
70*4882a593Smuzhiyun ptrace_write_running, TAR_2, PPR_2, DSCR_2);
71*4882a593Smuzhiyun
72*4882a593Smuzhiyun FAIL_IF(stop_trace(child));
73*4882a593Smuzhiyun return TEST_PASS;
74*4882a593Smuzhiyun }
75*4882a593Smuzhiyun
ptrace_tar(void)76*4882a593Smuzhiyun int ptrace_tar(void)
77*4882a593Smuzhiyun {
78*4882a593Smuzhiyun pid_t pid;
79*4882a593Smuzhiyun int ret, status;
80*4882a593Smuzhiyun
81*4882a593Smuzhiyun // TAR was added in v2.07
82*4882a593Smuzhiyun SKIP_IF(!have_hwcap2(PPC_FEATURE2_ARCH_2_07));
83*4882a593Smuzhiyun
84*4882a593Smuzhiyun shm_id = shmget(IPC_PRIVATE, sizeof(int) * 3, 0777|IPC_CREAT);
85*4882a593Smuzhiyun pid = fork();
86*4882a593Smuzhiyun if (pid < 0) {
87*4882a593Smuzhiyun perror("fork() failed");
88*4882a593Smuzhiyun return TEST_FAIL;
89*4882a593Smuzhiyun }
90*4882a593Smuzhiyun
91*4882a593Smuzhiyun if (pid == 0)
92*4882a593Smuzhiyun tar();
93*4882a593Smuzhiyun
94*4882a593Smuzhiyun if (pid) {
95*4882a593Smuzhiyun pptr = (int *)shmat(shm_id, NULL, 0);
96*4882a593Smuzhiyun pptr[0] = 0;
97*4882a593Smuzhiyun pptr[1] = 0;
98*4882a593Smuzhiyun
99*4882a593Smuzhiyun while (!pptr[2])
100*4882a593Smuzhiyun asm volatile("" : : : "memory");
101*4882a593Smuzhiyun ret = trace_tar(pid);
102*4882a593Smuzhiyun if (ret)
103*4882a593Smuzhiyun return ret;
104*4882a593Smuzhiyun
105*4882a593Smuzhiyun ret = trace_tar_write(pid);
106*4882a593Smuzhiyun if (ret)
107*4882a593Smuzhiyun return ret;
108*4882a593Smuzhiyun
109*4882a593Smuzhiyun /* Unblock the child now */
110*4882a593Smuzhiyun pptr[0] = 1;
111*4882a593Smuzhiyun
112*4882a593Smuzhiyun /* Wait on child */
113*4882a593Smuzhiyun while (!pptr[1])
114*4882a593Smuzhiyun asm volatile("" : : : "memory");
115*4882a593Smuzhiyun
116*4882a593Smuzhiyun shmdt((int *)pptr);
117*4882a593Smuzhiyun
118*4882a593Smuzhiyun ret = wait(&status);
119*4882a593Smuzhiyun shmctl(shm_id, IPC_RMID, NULL);
120*4882a593Smuzhiyun if (ret != pid) {
121*4882a593Smuzhiyun printf("Child's exit status not captured\n");
122*4882a593Smuzhiyun return TEST_PASS;
123*4882a593Smuzhiyun }
124*4882a593Smuzhiyun
125*4882a593Smuzhiyun return (WIFEXITED(status) && WEXITSTATUS(status)) ? TEST_FAIL :
126*4882a593Smuzhiyun TEST_PASS;
127*4882a593Smuzhiyun }
128*4882a593Smuzhiyun return TEST_PASS;
129*4882a593Smuzhiyun }
130*4882a593Smuzhiyun
main(int argc,char * argv[])131*4882a593Smuzhiyun int main(int argc, char *argv[])
132*4882a593Smuzhiyun {
133*4882a593Smuzhiyun return test_harness(ptrace_tar, "ptrace_tar");
134*4882a593Smuzhiyun }
135