File: prctl-ppc-dexcr.c

package info (click to toggle)
strace 6.13%2Bds-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 71,488 kB
  • sloc: ansic: 176,497; sh: 9,675; makefile: 4,133; cpp: 885; awk: 353; perl: 267; exp: 62; sed: 9
file content (151 lines) | stat: -rw-r--r-- 3,646 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
/*
 * Check decoding of prctl PR_PPC_GET_DEXCR and PR_PPC_SET_DEXCR operations.
 *
 * Copyright (c) 2021-2024 The strace developers.
 * All rights reserved.
 *
 * SPDX-License-Identifier: GPL-2.0-or-later
 */

#include "tests.h"
#include "scno.h"
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <linux/prctl.h>

#include "xlat.h"
#include "xlat/pr_ppc_dexcr_ctrl_flags.h"

#ifdef INJECT_RETVAL
# define INJ_STR " (INJECTED)"
#else
# define INJ_STR ""
#endif

#if SIZEOF_KERNEL_LONG_T == 8
# define HIBITS(a) a
#else
# define HIBITS(a)
#endif

int
main(int argc, char *argv[])
{
	prctl_marker();

#ifdef INJECT_RETVAL
	unsigned long num_skip;
	long inject_retval;
	bool locked = false;

	if (argc < 3)
		error_msg_and_fail("Usage: %s NUM_SKIP INJECT_RETVAL", argv[0]);

	num_skip = strtoul(argv[1], NULL, 0);
	inject_retval = strtol(argv[2], NULL, 0);

	for (size_t i = 0; i < num_skip; i++) {
		if (prctl_marker() != inject_retval)
			continue;

		locked = true;
		break;
	}

	if (!locked)
		error_msg_and_fail("Have not locked on prctl(-1, -2, -3, -4"
				   ", -5) returning %ld", inject_retval);
#endif /* INJECT_RETVAL */

	static const struct strval_klong aspects[] = {
		{ 0, "PR_PPC_DEXCR_SBHE" },
		{ 1, "PR_PPC_DEXCR_IBRTPD" },
		{ 2, "PR_PPC_DEXCR_SRAPD" },
		{ 3, "PR_PPC_DEXCR_NPHIE" },
		{ 4, NULL },
		{ 4, NULL },
	};
	static const struct strval_klong flags[] = {
		{ 0, "" },
		{ 1, "PR_PPC_DEXCR_CTRL_EDITABLE" },
		{ 2, "PR_PPC_DEXCR_CTRL_SET" },
		{ 3, "PR_PPC_DEXCR_CTRL_EDITABLE|PR_PPC_DEXCR_CTRL_SET" },
		{ 23, "PR_PPC_DEXCR_CTRL_EDITABLE|PR_PPC_DEXCR_CTRL_SET"
		      "|PR_PPC_DEXCR_CTRL_CLEAR"
		      "|PR_PPC_DEXCR_CTRL_CLEAR_ONEXEC" },
		{ 0xe0, NULL },
		{ 0x57ae57e9, "PR_PPC_DEXCR_CTRL_EDITABLE"
			      "|PR_PPC_DEXCR_CTRL_SET_ONEXEC|0x57ae57e0" },
		{ (kernel_ulong_t) -1LLU, "PR_PPC_DEXCR_CTRL_EDITABLE"
					  "|PR_PPC_DEXCR_CTRL_SET"
					  "|PR_PPC_DEXCR_CTRL_CLEAR"
					  "|PR_PPC_DEXCR_CTRL_SET_ONEXEC"
					  "|PR_PPC_DEXCR_CTRL_CLEAR_ONEXEC"
					  "|0x" HIBITS("ffffffff") "ffffffe0" },
	};
	long rc;

	for (size_t i = 0; i < ARRAY_SIZE(aspects); i++) {
		for (size_t j = 0; j < ARRAY_SIZE(flags); j++) {
			rc = syscall(__NR_prctl, PR_PPC_SET_DEXCR,
				     aspects[i].val, flags[j].val, 1, 2);
			const char *errstr = sprintrc(rc);

			printf("prctl(" XLAT_KNOWN(0x49, "PR_PPC_SET_DEXCR")
			       ", %s",
			       sprintxlat(aspects[i].str,aspects[i].val,
					  "PR_PPC_DEXCR_???"));
			printf(", %s, 0x1, 0x2) = %s" INJ_STR "\n",
			       sprintxlat(flags[j].str && flags[j].str[0]
					  ? flags[j].str : NULL,
					  flags[j].val,
					  flags[j].str
					  ? NULL : "PR_PPC_DEXCR_CTRL_???"),
			       errstr);
		}

		for (size_t j = 0; j < 2; j++) {
			rc = syscall(__NR_prctl, PR_PPC_GET_DEXCR,
				     aspects[i].val, j, j, j);
			const char *errstr = sprintrc(rc);

			printf("prctl(" XLAT_KNOWN(0x48, "PR_PPC_GET_DEXCR")
			       ", %s, %#zx, %#zx, %#zx) = ",
			       sprintxlat(aspects[i].str,aspects[i].val,
					  "PR_PPC_DEXCR_???"), j, j, j);

			if (rc > 0) {
				printf("%#lx", rc);
#if !XLAT_RAW
				size_t k;

				for (k = 0; k < ARRAY_SIZE(flags); k++) {
					if (flags[k].val == (unsigned long) rc)
					{
						if (flags[k].str) {
							printf(" (%s)",
							       flags[k].str);
						}
						break;
					}
				}

				if (k == ARRAY_SIZE(flags)
				    && (rc & PR_PPC_DEXCR_CTRL_MASK)) {
					printf(" (");
					printflags(pr_ppc_dexcr_ctrl_flags, rc,
						   NULL);
					printf(")");
				}
#endif /* !XLAT_RAW */
				puts(INJ_STR);
			} else {
				printf("%s" INJ_STR "\n", errstr);
			}
		}
	}

	puts("+++ exited with 0 +++");
	return 0;
}