2 * Copyright (c) 1994-1996 Rick Sladkey <jrs@world.std.com>
3 * Copyright (c) 1996-2000 Wichert Akkerman <wichert@cistron.nl>
4 * Copyright (c) 2005-2007 Roland McGrath <roland@redhat.com>
5 * Copyright (c) 2008-2015 Dmitry V. Levin <ldv@altlinux.org>
6 * Copyright (c) 2014-2019 The strace developers.
9 * SPDX-License-Identifier: LGPL-2.1-or-later
14 #include <linux/prctl.h>
18 #include "xlat/prctl_options.h"
19 #include "xlat/pr_cap_ambient.h"
20 #include "xlat/pr_dumpable.h"
21 #include "xlat/pr_fp_mode.h"
22 #include "xlat/pr_mce_kill.h"
23 #include "xlat/pr_mce_kill_policy.h"
24 #include "xlat/pr_set_mm.h"
25 #include "xlat/pr_spec_cmds.h"
26 #include "xlat/pr_spec_get_store_bypass_flags.h"
27 #include "xlat/pr_spec_set_store_bypass_flags.h"
28 #include "xlat/pr_sve_vl_flags.h"
29 #include "xlat/pr_tsc.h"
30 #include "xlat/pr_unalign_flags.h"
33 # define TASK_COMM_LEN 16
36 #ifdef HAVE_LINUX_SECCOMP_H
37 # include <linux/seccomp.h>
39 #include "xlat/seccomp_mode.h"
41 #ifdef HAVE_LINUX_SECUREBITS_H
42 # include <linux/securebits.h>
44 #include "xlat/secbits.h"
46 /* these constants are the same as in <linux/capability.h> */
54 #ifndef PR_SVE_VL_LEN_MASK
55 # define PR_SVE_VL_LEN_MASK 0xffff
60 print_prctl_args(struct tcb *tcp, const unsigned int first)
64 for (i = first; i < n_args(tcp); ++i)
65 tprintf(", %#" PRI_klx, tcp->u_arg[i]);
69 sprint_sve_val(kernel_ulong_t arg)
71 static char out[sizeof("PR_SVE_SET_VL_ONEXEC|PR_SVE_VL_INHERIT|0x") +
72 sizeof(kernel_ulong_t) * 2];
74 kernel_ulong_t vl = arg & PR_SVE_VL_LEN_MASK;
75 kernel_ulong_t flags = arg & ~PR_SVE_VL_LEN_MASK;
76 const char *flags_str = sprintflags("", pr_sve_vl_flags, flags);
78 xsprintf(out, "%s%s%#" PRI_klx,
79 flags_str ?: "", flags_str ? "|" : "", vl);
86 const unsigned int option = tcp->u_arg[0];
87 const kernel_ulong_t arg2 = tcp->u_arg[1];
88 const kernel_ulong_t arg3 = tcp->u_arg[2];
90 * PR_SET_VMA is the only command which actually uses these arguments
91 * currently, and it is available only on Android for now.
94 const kernel_ulong_t arg4 = tcp->u_arg[3];
95 const kernel_ulong_t arg5 = tcp->u_arg[4];
100 printxval(prctl_options, option, "PR_???");
103 case PR_GET_KEEPCAPS:
105 case PR_GET_TIMERSLACK:
109 case PR_GET_CHILD_SUBREAPER:
116 printnum_int(tcp, arg2, "%u");
119 case PR_GET_DUMPABLE:
124 tcp->auxstr = xlookup(pr_dumpable, (kernel_ulong_t) tcp->u_rval);
134 printstr_ex(tcp, arg2, TASK_COMM_LEN,
139 case PR_GET_PDEATHSIG:
142 } else if (!umove_or_printaddr(tcp, arg2, &i)) {
149 case PR_GET_SECUREBITS:
152 if (syserror(tcp) || tcp->u_rval == 0)
154 tcp->auxstr = sprintflags("", secbits,
155 (kernel_ulong_t) tcp->u_rval);
158 case PR_GET_TID_ADDRESS:
162 printnum_kptr(tcp, arg2);
168 } else if (!umove_or_printaddr(tcp, arg2, &i)) {
170 printxval(pr_tsc, i, "PR_TSC_???");
178 } else if (!umove_or_printaddr(tcp, arg2, &i)) {
180 printflags(pr_unalign_flags, i, "PR_UNALIGN_???");
188 if (syserror(tcp) || tcp->u_rval == 0)
190 tcp->auxstr = sprintflags("", pr_fp_mode,
191 (kernel_ulong_t) tcp->u_rval);
196 tprintf(", %s", sprint_sve_val(arg2));
199 ATTRIBUTE_FALLTHROUGH;
204 if (syserror(tcp) || tcp->u_rval == 0)
207 tcp->auxstr = sprint_sve_val(tcp->u_rval);
211 case PR_GET_SPECULATION_CTRL:
214 printxval64(pr_spec_cmds, arg2, "PR_SPEC_???");
223 case PR_SPEC_STORE_BYPASS:
224 case PR_SPEC_INDIRECT_BRANCH:
225 tcp->auxstr = sprintflags("",
226 pr_spec_get_store_bypass_flags,
227 (kernel_ulong_t) tcp->u_rval);
233 /* PR_TASK_PERF_EVENTS_* take no arguments. */
234 case PR_TASK_PERF_EVENTS_DISABLE:
235 case PR_TASK_PERF_EVENTS_ENABLE:
238 case PR_SET_CHILD_SUBREAPER:
242 case PR_SET_KEEPCAPS:
244 tprintf(", %" PRI_klu, arg2);
247 case PR_SET_DUMPABLE:
249 printxval64(pr_dumpable, arg2, "SUID_DUMP_???");
252 case PR_CAPBSET_DROP:
253 case PR_CAPBSET_READ:
255 printxval64(cap, arg2, "CAP_???");
260 printxval64(pr_cap_ambient, arg2,
261 "PR_CAP_AMBIENT_???");
263 case PR_CAP_AMBIENT_RAISE:
264 case PR_CAP_AMBIENT_LOWER:
265 case PR_CAP_AMBIENT_IS_SET:
267 printxval64(cap, arg3, "CAP_???");
268 print_prctl_args(tcp, 3);
271 print_prctl_args(tcp, 2);
278 printxval64(pr_mce_kill, arg2, "PR_MCE_KILL_???");
280 if (PR_MCE_KILL_SET == arg2)
281 printxval64(pr_mce_kill_policy, arg3,
284 tprintf("%#" PRI_klx, arg3);
285 print_prctl_args(tcp, 3);
290 printstr_ex(tcp, arg2, TASK_COMM_LEN - 1,
295 # ifndef PR_SET_VMA_ANON_NAME
296 # define PR_SET_VMA_ANON_NAME 0
299 if (arg2 == PR_SET_VMA_ANON_NAME) {
300 tprintf(", PR_SET_VMA_ANON_NAME, %#" PRI_klx, arg3);
301 tprintf(", %" PRI_klu ", ", arg4);
304 /* There are no other sub-options now, but there
305 * might be in future... */
306 print_prctl_args(tcp, 1);
313 printxval(pr_set_mm, arg2, "PR_SET_MM_???");
314 print_prctl_args(tcp, 2);
317 case PR_SET_PDEATHSIG:
320 tprintf("%" PRI_klu, arg2);
327 if ((int) arg2 == -1) {
328 print_xlat_ex(arg2, "PR_SET_PTRACER_ANY",
331 tprintf("%" PRI_klu, arg2);
337 printxval64(seccomp_mode, arg2,
339 if (SECCOMP_MODE_STRICT == arg2)
341 if (SECCOMP_MODE_FILTER == arg2) {
343 decode_seccomp_fprog(tcp, arg3);
346 print_prctl_args(tcp, 2);
349 case PR_SET_SECUREBITS:
351 printflags64(secbits, arg2, "SECBIT_???");
354 case PR_SET_TIMERSLACK:
355 tprintf(", %" PRI_kld, arg2);
360 printxval(pr_tsc, arg2, "PR_TSC_???");
365 printflags(pr_unalign_flags, arg2, "PR_UNALIGN_???");
368 case PR_SET_NO_NEW_PRIVS:
369 case PR_SET_THP_DISABLE:
370 tprintf(", %" PRI_klu, arg2);
371 print_prctl_args(tcp, 2);
374 case PR_MCE_KILL_GET:
376 print_prctl_args(tcp, 1);
381 tcp->auxstr = xlookup(pr_mce_kill_policy,
382 (kernel_ulong_t) tcp->u_rval);
387 printflags(pr_fp_mode, arg2, "PR_FP_MODE_???");
390 case PR_SET_SPECULATION_CTRL:
392 printxval64(pr_spec_cmds, arg2, "PR_SPEC_???");
396 case PR_SPEC_STORE_BYPASS:
397 case PR_SPEC_INDIRECT_BRANCH:
398 printxval64(pr_spec_set_store_bypass_flags, arg3,
403 tprintf("%#" PRI_klx, arg3);
408 case PR_GET_NO_NEW_PRIVS:
409 case PR_GET_THP_DISABLE:
410 case PR_MPX_DISABLE_MANAGEMENT:
411 case PR_MPX_ENABLE_MANAGEMENT:
413 print_prctl_args(tcp, 1);
419 #if defined X86_64 || defined X32 || defined I386
420 # include "xlat/archvals.h"
424 const unsigned int option = tcp->u_arg[0];
425 const kernel_ulong_t addr = tcp->u_arg[1];
428 printxval(archvals, option, "ARCH_???");
436 printnum_ptr(tcp, addr);
440 tprintf(", %#" PRI_klx, addr);
443 #endif /* X86_64 || X32 || I386 */