1 /*
2 * make sure PEEKUSER matches GETREGS
3 *
4 * Copyright (c) 2008 Analog Devices Inc.
5 *
6 * Licensed under the GPL-2 or later
7 */
8
9 #define _GNU_SOURCE
10
11 #include <errno.h>
12 #include <stdbool.h>
13 #include <stdio.h>
14 #include <stdlib.h>
15 #include <unistd.h>
16
17 #include <config.h>
18 #include "ptrace.h"
19
20 #include "test.h"
21 #include "spawn_ptrace_child.h"
22
23 char *TCID = "ptrace04";
24
25 static void cleanup();
26
27 #define R(r) { .name = "PT_" #r, .off = PT_##r },
28 static struct {
29 const char *name;
30 long off;
31 } regs[] = {
32 #ifdef __bfin__
33 R(ORIG_R0) R(ORIG_P0)
34 R(R0) R(R1) R(R2) R(R3) R(R4) R(R5) R(R6) R(R7)
35 R(P0) R(P1) R(P2) R(P3) R(P4) R(P5) R(FP) R(USP)
36 R(I0) R(I1) R(I2) R(I3)
37 R(M0) R(M1) R(M2) R(M3)
38 R(L0) R(L1) R(L2) R(L3)
39 R(B0) R(B1) R(B2) R(B3)
40 R(A0X) R(A0W) R(A1X) R(A1W)
41 R(LC0) R(LC1) R(LT0) R(LT1) R(LB0) R(LB1)
42 R(ASTAT)
43 R(RETS) R(PC) R(RETX) R(RETN) R(RETE)
44 R(SEQSTAT) R(IPEND) R(SYSCFG)
45 #endif
46 };
47
48 int TST_TOTAL = 2;
49
compare_registers(unsigned char poison)50 void compare_registers(unsigned char poison)
51 {
52 #ifdef HAVE_STRUCT_PTRACE_REGS
53 ptrace_regs _pt_regs;
54 size_t i;
55 long ret;
56 bool failed = false;
57
58 memset(&_pt_regs, poison, sizeof(_pt_regs));
59 errno = 0;
60 ret = ptrace(PTRACE_GETREGS, pid, NULL, &_pt_regs);
61 if (ret && errno) {
62 tst_resm(TFAIL | TERRNO, "PTRACE_GETREGS failed");
63 } else {
64
65 for (i = 0; i < ARRAY_SIZE(regs); ++i) {
66 errno = 0;
67 ret = ptrace(PTRACE_PEEKUSER, pid,
68 (void *)regs[i].off, NULL);
69 if (ret && errno) {
70 tst_resm(TFAIL | TERRNO,
71 "PTRACE_PEEKUSER: register %s "
72 "(offset %li) failed",
73 regs[i].name, regs[i].off);
74 failed = true;
75 continue;
76 }
77
78 long *pt_val = (void *)&_pt_regs + regs[i].off;
79 if (*pt_val != ret) {
80 tst_resm(TFAIL,
81 "register %s (offset %li) did not "
82 "match\n\tGETREGS: 0x%08lx "
83 "PEEKUSER: 0x%08lx",
84 regs[i].name, regs[i].off, *pt_val,
85 ret);
86 failed = true;
87 }
88
89 }
90
91 }
92
93 tst_resm((failed ? TFAIL : TPASS),
94 "PTRACE PEEKUSER/GETREGS (poison 0x%02x)", poison);
95 #else
96 tst_brkm(TCONF, cleanup, "System doesn't have ptrace_regs structure");
97 #endif
98 }
99
main(int argc,char * argv[])100 int main(int argc, char *argv[])
101 {
102 tst_parse_opts(argc, argv, NULL, NULL);
103
104 if (ARRAY_SIZE(regs) == 0)
105 tst_brkm(TCONF, NULL, "test not supported for your arch (yet)");
106
107 make_a_baby(argc, argv);
108
109 /* first compare register states when execl() syscall starts */
110 tst_resm(TINFO, "Before exec() in child");
111 compare_registers(0x00);
112 compare_registers(0xff);
113
114 /* then compare register states after execl() syscall finishes */
115 tst_resm(TINFO, "After exec() in child");
116 errno = 0;
117 if (ptrace(PTRACE_SYSCALL, pid, NULL, NULL) && errno) {
118 tst_brkm(TFAIL, NULL, "PTRACE_SYSCALL failed: %s",
119 strerror(errno));
120 }
121 compare_registers(0x00);
122 compare_registers(0xff);
123
124 /* hopefully this worked */
125 ptrace(PTRACE_KILL, pid, NULL, NULL);
126
127 tst_exit();
128 }
129
cleanup(void)130 static void cleanup(void)
131 {
132 }
133