| /* |
| * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl> |
| * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl> |
| * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com> |
| * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl> |
| * Copyright (c) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation |
| * Linux for s390 port by D.J. Barrow |
| * <barrow_dj@mail.yahoo.com,djbarrow@de.ibm.com> |
| * Copyright (c) 2000 PocketPenguins Inc. Linux for Hitachi SuperH |
| * port by Greg Banks <gbanks@pocketpenguins.com> |
| |
| * |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * 3. The name of the author may not be used to endorse or promote products |
| * derived from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| * |
| * $Id$ |
| */ |
| |
| #include "defs.h" |
| |
| #include <fcntl.h> |
| #include <sys/stat.h> |
| #include <sys/time.h> |
| #include <sys/wait.h> |
| #include <sys/resource.h> |
| #include <sys/utsname.h> |
| #include <sys/user.h> |
| #include <sys/syscall.h> |
| #include <signal.h> |
| #ifdef SUNOS4 |
| #include <machine/reg.h> |
| #endif /* SUNOS4 */ |
| |
| #ifdef FREEBSD |
| #include <sys/ptrace.h> |
| #endif |
| |
| #ifdef HAVE_SYS_REG_H |
| # include <sys/reg.h> |
| #ifndef PTRACE_PEEKUSR |
| # define PTRACE_PEEKUSR PTRACE_PEEKUSER |
| #endif |
| #ifndef PTRACE_POKEUSR |
| # define PTRACE_POKEUSR PTRACE_POKEUSER |
| #endif |
| #endif |
| |
| #ifdef HAVE_LINUX_PTRACE_H |
| #undef PTRACE_SYSCALL |
| # ifdef HAVE_STRUCT_IA64_FPREG |
| # define ia64_fpreg XXX_ia64_fpreg |
| # endif |
| # ifdef HAVE_STRUCT_PT_ALL_USER_REGS |
| # define pt_all_user_regs XXX_pt_all_user_regs |
| # endif |
| #include <linux/ptrace.h> |
| # undef ia64_fpreg |
| # undef pt_all_user_regs |
| #endif |
| |
| #if defined (LINUX) && defined (SPARC64) |
| # define r_pc r_tpc |
| # undef PTRACE_GETREGS |
| # define PTRACE_GETREGS PTRACE_GETREGS64 |
| # undef PTRACE_SETREGS |
| # define PTRACE_SETREGS PTRACE_SETREGS64 |
| #endif /* LINUX && SPARC64 */ |
| |
| #ifdef HAVE_LINUX_FUTEX_H |
| # include <linux/futex.h> |
| #endif |
| #ifdef LINUX |
| # ifndef FUTEX_WAIT |
| # define FUTEX_WAIT 0 |
| # endif |
| # ifndef FUTEX_WAKE |
| # define FUTEX_WAKE 1 |
| # endif |
| # ifndef FUTEX_FD |
| # define FUTEX_FD 2 |
| # endif |
| # ifndef FUTEX_REQUEUE |
| # define FUTEX_REQUEUE 3 |
| # endif |
| #endif /* LINUX */ |
| |
| #ifdef LINUX |
| #include <sched.h> |
| #include <asm/posix_types.h> |
| #undef GETGROUPS_T |
| #define GETGROUPS_T __kernel_gid_t |
| #undef GETGROUPS32_T |
| #define GETGROUPS32_T __kernel_gid32_t |
| #endif /* LINUX */ |
| |
| #if defined(LINUX) && defined(IA64) |
| # include <asm/ptrace_offsets.h> |
| # include <asm/rse.h> |
| #endif |
| |
| #ifdef HAVE_PRCTL |
| # include <sys/prctl.h> |
| |
| static const struct xlat prctl_options[] = { |
| #ifdef PR_MAXPROCS |
| { PR_MAXPROCS, "PR_MAXPROCS" }, |
| #endif |
| #ifdef PR_ISBLOCKED |
| { PR_ISBLOCKED, "PR_ISBLOCKED" }, |
| #endif |
| #ifdef PR_SETSTACKSIZE |
| { PR_SETSTACKSIZE, "PR_SETSTACKSIZE" }, |
| #endif |
| #ifdef PR_GETSTACKSIZE |
| { PR_GETSTACKSIZE, "PR_GETSTACKSIZE" }, |
| #endif |
| #ifdef PR_MAXPPROCS |
| { PR_MAXPPROCS, "PR_MAXPPROCS" }, |
| #endif |
| #ifdef PR_UNBLKONEXEC |
| { PR_UNBLKONEXEC, "PR_UNBLKONEXEC" }, |
| #endif |
| #ifdef PR_ATOMICSIM |
| { PR_ATOMICSIM, "PR_ATOMICSIM" }, |
| #endif |
| #ifdef PR_SETEXITSIG |
| { PR_SETEXITSIG, "PR_SETEXITSIG" }, |
| #endif |
| #ifdef PR_RESIDENT |
| { PR_RESIDENT, "PR_RESIDENT" }, |
| #endif |
| #ifdef PR_ATTACHADDR |
| { PR_ATTACHADDR, "PR_ATTACHADDR" }, |
| #endif |
| #ifdef PR_DETACHADDR |
| { PR_DETACHADDR, "PR_DETACHADDR" }, |
| #endif |
| #ifdef PR_TERMCHILD |
| { PR_TERMCHILD, "PR_TERMCHILD" }, |
| #endif |
| #ifdef PR_GETSHMASK |
| { PR_GETSHMASK, "PR_GETSHMASK" }, |
| #endif |
| #ifdef PR_GETNSHARE |
| { PR_GETNSHARE, "PR_GETNSHARE" }, |
| #endif |
| #ifdef PR_COREPID |
| { PR_COREPID, "PR_COREPID" }, |
| #endif |
| #ifdef PR_ATTACHADDRPERM |
| { PR_ATTACHADDRPERM, "PR_ATTACHADDRPERM" }, |
| #endif |
| #ifdef PR_PTHREADEXIT |
| { PR_PTHREADEXIT, "PR_PTHREADEXIT" }, |
| #endif |
| #ifdef PR_SET_PDEATHSIG |
| { PR_SET_PDEATHSIG, "PR_SET_PDEATHSIG" }, |
| #endif |
| #ifdef PR_GET_PDEATHSIG |
| { PR_GET_PDEATHSIG, "PR_GET_PDEATHSIG" }, |
| #endif |
| #ifdef PR_GET_DUMPABLE |
| { PR_GET_DUMPABLE, "PR_GET_DUMPABLE" }, |
| #endif |
| #ifdef PR_SET_DUMPABLE |
| { PR_SET_DUMPABLE, "PR_SET_DUMPABLE" }, |
| #endif |
| #ifdef PR_GET_UNALIGN |
| { PR_GET_UNALIGN, "PR_GET_UNALIGN" }, |
| #endif |
| #ifdef PR_SET_UNALIGN |
| { PR_SET_UNALIGN, "PR_SET_UNALIGN" }, |
| #endif |
| #ifdef PR_GET_KEEPCAPS |
| { PR_GET_KEEPCAPS, "PR_GET_KEEPCAPS" }, |
| #endif |
| #ifdef PR_SET_KEEPCAPS |
| { PR_SET_KEEPCAPS, "PR_SET_KEEPCAPS" }, |
| #endif |
| #ifdef PR_GET_FPEMU |
| { PR_GET_FPEMU, "PR_GET_FPEMU" }, |
| #endif |
| #ifdef PR_SET_FPEMU |
| { PR_SET_FPEMU, "PR_SET_FPEMU" }, |
| #endif |
| #ifdef PR_GET_FPEXC |
| { PR_GET_FPEXC, "PR_GET_FPEXC" }, |
| #endif |
| #ifdef PR_SET_FPEXC |
| { PR_SET_FPEXC, "PR_SET_FPEXC" }, |
| #endif |
| #ifdef PR_GET_TIMING |
| { PR_GET_TIMING, "PR_GET_TIMING" }, |
| #endif |
| #ifdef PR_SET_TIMING |
| { PR_SET_TIMING, "PR_SET_TIMING" }, |
| #endif |
| #ifdef PR_SET_NAME |
| { PR_SET_NAME, "PR_SET_NAME" }, |
| #endif |
| #ifdef PR_GET_NAME |
| { PR_GET_NAME, "PR_GET_NAME" }, |
| #endif |
| #ifdef PR_GET_ENDIAN |
| { PR_GET_ENDIAN, "PR_GET_ENDIAN" }, |
| #endif |
| #ifdef PR_SET_ENDIAN |
| { PR_SET_ENDIAN, "PR_SET_ENDIAN" }, |
| #endif |
| #ifdef PR_GET_SECCOMP |
| { PR_GET_SECCOMP, "PR_GET_SECCOMP" }, |
| #endif |
| #ifdef PR_SET_SECCOMP |
| { PR_SET_SECCOMP, "PR_SET_SECCOMP" }, |
| #endif |
| #ifdef PR_GET_TSC |
| { PR_GET_TSC, "PR_GET_TSC" }, |
| #endif |
| #ifdef PR_SET_TSC |
| { PR_SET_TSC, "PR_SET_TSC" }, |
| #endif |
| #ifdef PR_GET_SECUREBITS |
| { PR_GET_SECUREBITS, "PR_GET_SECUREBITS" }, |
| #endif |
| #ifdef PR_SET_SECUREBITS |
| { PR_SET_SECUREBITS, "PR_SET_SECUREBITS" }, |
| #endif |
| { 0, NULL }, |
| }; |
| |
| |
| static const char * |
| unalignctl_string (unsigned int ctl) |
| { |
| static char buf[16]; |
| |
| switch (ctl) { |
| #ifdef PR_UNALIGN_NOPRINT |
| case PR_UNALIGN_NOPRINT: |
| return "NOPRINT"; |
| #endif |
| #ifdef PR_UNALIGN_SIGBUS |
| case PR_UNALIGN_SIGBUS: |
| return "SIGBUS"; |
| #endif |
| default: |
| break; |
| } |
| sprintf(buf, "%x", ctl); |
| return buf; |
| } |
| |
| |
| int |
| sys_prctl(tcp) |
| struct tcb *tcp; |
| { |
| int i; |
| |
| if (entering(tcp)) { |
| printxval(prctl_options, tcp->u_arg[0], "PR_???"); |
| switch (tcp->u_arg[0]) { |
| #ifdef PR_GETNSHARE |
| case PR_GETNSHARE: |
| break; |
| #endif |
| #ifdef PR_SET_PDEATHSIG |
| case PR_SET_PDEATHSIG: |
| tprintf(", %lu", tcp->u_arg[1]); |
| break; |
| #endif |
| #ifdef PR_GET_PDEATHSIG |
| case PR_GET_PDEATHSIG: |
| break; |
| #endif |
| #ifdef PR_SET_DUMPABLE |
| case PR_SET_DUMPABLE: |
| tprintf(", %lu", tcp->u_arg[1]); |
| break; |
| #endif |
| #ifdef PR_GET_DUMPABLE |
| case PR_GET_DUMPABLE: |
| break; |
| #endif |
| #ifdef PR_SET_UNALIGN |
| case PR_SET_UNALIGN: |
| tprintf(", %s", unalignctl_string(tcp->u_arg[1])); |
| break; |
| #endif |
| #ifdef PR_GET_UNALIGN |
| case PR_GET_UNALIGN: |
| tprintf(", %#lx", tcp->u_arg[1]); |
| break; |
| #endif |
| #ifdef PR_SET_KEEPCAPS |
| case PR_SET_KEEPCAPS: |
| tprintf(", %lu", tcp->u_arg[1]); |
| break; |
| #endif |
| #ifdef PR_GET_KEEPCAPS |
| case PR_GET_KEEPCAPS: |
| break; |
| #endif |
| default: |
| for (i = 1; i < tcp->u_nargs; i++) |
| tprintf(", %#lx", tcp->u_arg[i]); |
| break; |
| } |
| } else { |
| switch (tcp->u_arg[0]) { |
| #ifdef PR_GET_PDEATHSIG |
| case PR_GET_PDEATHSIG: |
| if (umove(tcp, tcp->u_arg[1], &i) < 0) |
| tprintf(", %#lx", tcp->u_arg[1]); |
| else |
| tprintf(", {%u}", i); |
| break; |
| #endif |
| #ifdef PR_GET_DUMPABLE |
| case PR_GET_DUMPABLE: |
| return RVAL_UDECIMAL; |
| #endif |
| #ifdef PR_GET_UNALIGN |
| case PR_GET_UNALIGN: |
| if (syserror(tcp) || umove(tcp, tcp->u_arg[1], &i) < 0) |
| break; |
| tcp->auxstr = unalignctl_string(i); |
| return RVAL_STR; |
| #endif |
| #ifdef PR_GET_KEEPCAPS |
| case PR_GET_KEEPCAPS: |
| return RVAL_UDECIMAL; |
| #endif |
| default: |
| break; |
| } |
| } |
| return 0; |
| } |
| #endif /* HAVE_PRCTL */ |
| |
| #if defined(FREEBSD) || defined(SUNOS4) || defined(SVR4) |
| int |
| sys_gethostid(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) |
| return RVAL_HEX; |
| return 0; |
| } |
| #endif /* FREEBSD || SUNOS4 || SVR4 */ |
| |
| int |
| sys_sethostname(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printpathn(tcp, tcp->u_arg[0], tcp->u_arg[1]); |
| tprintf(", %lu", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| #if defined(ALPHA) || defined(FREEBSD) || defined(SUNOS4) || defined(SVR4) |
| int |
| sys_gethostname(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| if (syserror(tcp)) |
| tprintf("%#lx", tcp->u_arg[0]); |
| else |
| printpath(tcp, tcp->u_arg[0]); |
| tprintf(", %lu", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| #endif /* ALPHA || FREEBSD || SUNOS4 || SVR4 */ |
| |
| int |
| sys_setdomainname(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printpathn(tcp, tcp->u_arg[0], tcp->u_arg[1]); |
| tprintf(", %lu", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| #if !defined(LINUX) |
| |
| int |
| sys_getdomainname(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| if (syserror(tcp)) |
| tprintf("%#lx", tcp->u_arg[0]); |
| else |
| printpath(tcp, tcp->u_arg[0]); |
| tprintf(", %lu", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| #endif /* !LINUX */ |
| |
| int |
| sys_exit(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| fprintf(stderr, "_exit returned!\n"); |
| return -1; |
| } |
| /* special case: we stop tracing this process, finish line now */ |
| tprintf("%ld) ", tcp->u_arg[0]); |
| tabto(acolumn); |
| tprintf("= ?"); |
| printtrailer(); |
| return 0; |
| } |
| |
| int |
| internal_exit(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tcp->flags |= TCB_EXITING; |
| #ifdef __NR_exit_group |
| # ifdef IA64 |
| if (ia32) { |
| if (tcp->scno == 252) |
| tcp->flags |= TCB_GROUP_EXITING; |
| } else |
| # endif |
| if (known_scno(tcp) == __NR_exit_group) |
| tcp->flags |= TCB_GROUP_EXITING; |
| #endif |
| } |
| return 0; |
| } |
| |
| /* TCP is creating a child we want to follow. |
| If there will be space in tcbtab for it, set TCB_FOLLOWFORK and return 0. |
| If not, clear TCB_FOLLOWFORK, print an error, and return 1. */ |
| static void |
| fork_tcb(struct tcb *tcp) |
| { |
| if (nprocs == tcbtabsize) |
| expand_tcbtab(); |
| |
| tcp->flags |= TCB_FOLLOWFORK; |
| } |
| |
| #ifdef USE_PROCFS |
| |
| int |
| sys_fork(struct tcb *tcp) |
| { |
| if (exiting(tcp) && !syserror(tcp)) { |
| if (getrval2(tcp)) { |
| tcp->auxstr = "child process"; |
| return RVAL_UDECIMAL | RVAL_STR; |
| } |
| } |
| return 0; |
| } |
| |
| #if UNIXWARE > 2 |
| |
| int |
| sys_rfork(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf ("%ld", tcp->u_arg[0]); |
| } |
| else if (!syserror(tcp)) { |
| if (getrval2(tcp)) { |
| tcp->auxstr = "child process"; |
| return RVAL_UDECIMAL | RVAL_STR; |
| } |
| } |
| return 0; |
| } |
| |
| #endif |
| |
| int |
| internal_fork(tcp) |
| struct tcb *tcp; |
| { |
| struct tcb *tcpchild; |
| |
| if (exiting(tcp)) { |
| #ifdef SYS_rfork |
| if (known_scno(tcp) == SYS_rfork && !(tcp->u_arg[0]&RFPROC)) |
| return 0; |
| #endif |
| if (getrval2(tcp)) |
| return 0; |
| if (!followfork) |
| return 0; |
| fork_tcb(tcp); |
| if (syserror(tcp)) |
| return 0; |
| tcpchild = alloctcb(tcp->u_rval); |
| if (proc_open(tcpchild, 2) < 0) |
| droptcb(tcpchild); |
| } |
| return 0; |
| } |
| |
| #else /* !USE_PROCFS */ |
| |
| #ifdef LINUX |
| |
| /* defines copied from linux/sched.h since we can't include that |
| * ourselves (it conflicts with *lots* of libc includes) |
| */ |
| #define CSIGNAL 0x000000ff /* signal mask to be sent at exit */ |
| #define CLONE_VM 0x00000100 /* set if VM shared between processes */ |
| #define CLONE_FS 0x00000200 /* set if fs info shared between processes */ |
| #define CLONE_FILES 0x00000400 /* set if open files shared between processes */ |
| #define CLONE_SIGHAND 0x00000800 /* set if signal handlers shared */ |
| #define CLONE_IDLETASK 0x00001000 /* kernel-only flag */ |
| #define CLONE_PTRACE 0x00002000 /* set if we want to let tracing continue on the child too */ |
| #define CLONE_VFORK 0x00004000 /* set if the parent wants the child to wake it up on mm_release */ |
| #define CLONE_PARENT 0x00008000 /* set if we want to have the same parent as the cloner */ |
| #define CLONE_THREAD 0x00010000 /* Same thread group? */ |
| #define CLONE_NEWNS 0x00020000 /* New namespace group? */ |
| #define CLONE_SYSVSEM 0x00040000 /* share system V SEM_UNDO semantics */ |
| #define CLONE_SETTLS 0x00080000 /* create a new TLS for the child */ |
| #define CLONE_PARENT_SETTID 0x00100000 /* set the TID in the parent */ |
| #define CLONE_CHILD_CLEARTID 0x00200000 /* clear the TID in the child */ |
| #define CLONE_DETACHED 0x00400000 /* parent wants no child-exit signal */ |
| #define CLONE_UNTRACED 0x00800000 /* set if the tracing process can't force CLONE_PTRACE on this clone */ |
| #define CLONE_CHILD_SETTID 0x01000000 /* set the TID in the child */ |
| |
| static const struct xlat clone_flags[] = { |
| { CLONE_VM, "CLONE_VM" }, |
| { CLONE_FS, "CLONE_FS" }, |
| { CLONE_FILES, "CLONE_FILES" }, |
| { CLONE_SIGHAND, "CLONE_SIGHAND" }, |
| { CLONE_IDLETASK, "CLONE_IDLETASK"}, |
| { CLONE_PTRACE, "CLONE_PTRACE" }, |
| { CLONE_VFORK, "CLONE_VFORK" }, |
| { CLONE_PARENT, "CLONE_PARENT" }, |
| { CLONE_THREAD, "CLONE_THREAD" }, |
| { CLONE_NEWNS, "CLONE_NEWNS" }, |
| { CLONE_SYSVSEM, "CLONE_SYSVSEM" }, |
| { CLONE_SETTLS, "CLONE_SETTLS" }, |
| { CLONE_PARENT_SETTID,"CLONE_PARENT_SETTID" }, |
| { CLONE_CHILD_CLEARTID,"CLONE_CHILD_CLEARTID" }, |
| { CLONE_DETACHED, "CLONE_DETACHED" }, |
| { CLONE_UNTRACED, "CLONE_UNTRACED" }, |
| { CLONE_CHILD_SETTID,"CLONE_CHILD_SETTID" }, |
| { 0, NULL }, |
| }; |
| |
| # ifdef I386 |
| # include <asm/ldt.h> |
| # ifdef HAVE_STRUCT_USER_DESC |
| # define modify_ldt_ldt_s user_desc |
| # endif |
| extern void print_ldt_entry(); |
| # endif |
| |
| # if defined IA64 |
| # define ARG_FLAGS 0 |
| # define ARG_STACK 1 |
| # define ARG_STACKSIZE (known_scno(tcp) == SYS_clone2 ? 2 : -1) |
| # define ARG_PTID (known_scno(tcp) == SYS_clone2 ? 3 : 2) |
| # define ARG_CTID (known_scno(tcp) == SYS_clone2 ? 4 : 3) |
| # define ARG_TLS (known_scno(tcp) == SYS_clone2 ? 5 : 4) |
| # elif defined S390 || defined S390X || defined CRISV10 || defined CRISV32 |
| # define ARG_STACK 0 |
| # define ARG_FLAGS 1 |
| # define ARG_PTID 2 |
| # define ARG_CTID 3 |
| # define ARG_TLS 4 |
| # elif defined X86_64 || defined ALPHA |
| # define ARG_FLAGS 0 |
| # define ARG_STACK 1 |
| # define ARG_PTID 2 |
| # define ARG_CTID 3 |
| # define ARG_TLS 4 |
| # else |
| # define ARG_FLAGS 0 |
| # define ARG_STACK 1 |
| # define ARG_PTID 2 |
| # define ARG_TLS 3 |
| # define ARG_CTID 4 |
| # endif |
| |
| int |
| sys_clone(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| unsigned long flags = tcp->u_arg[ARG_FLAGS]; |
| tprintf("child_stack=%#lx, ", tcp->u_arg[ARG_STACK]); |
| # ifdef ARG_STACKSIZE |
| if (ARG_STACKSIZE != -1) |
| tprintf("stack_size=%#lx, ", |
| tcp->u_arg[ARG_STACKSIZE]); |
| # endif |
| tprintf("flags="); |
| printflags(clone_flags, flags &~ CSIGNAL, NULL); |
| if ((flags & CSIGNAL) != 0) |
| tprintf("|%s", signame(flags & CSIGNAL)); |
| if ((flags & (CLONE_PARENT_SETTID|CLONE_CHILD_SETTID |
| |CLONE_CHILD_CLEARTID|CLONE_SETTLS)) == 0) |
| return 0; |
| if (flags & CLONE_PARENT_SETTID) |
| tprintf(", parent_tidptr=%#lx", tcp->u_arg[ARG_PTID]); |
| if (flags & CLONE_SETTLS) { |
| # ifdef I386 |
| struct modify_ldt_ldt_s copy; |
| if (umove(tcp, tcp->u_arg[ARG_TLS], ©) != -1) { |
| tprintf(", {entry_number:%d, ", |
| copy.entry_number); |
| if (!verbose(tcp)) |
| tprintf("...}"); |
| else |
| print_ldt_entry(©); |
| } |
| else |
| # endif |
| tprintf(", tls=%#lx", tcp->u_arg[ARG_TLS]); |
| } |
| if (flags & (CLONE_CHILD_SETTID|CLONE_CHILD_CLEARTID)) |
| tprintf(", child_tidptr=%#lx", tcp->u_arg[ARG_CTID]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_unshare(struct tcb *tcp) |
| { |
| if (entering(tcp)) |
| printflags(clone_flags, tcp->u_arg[0], "CLONE_???"); |
| return 0; |
| } |
| #endif /* LINUX */ |
| |
| int |
| sys_fork(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) |
| return RVAL_UDECIMAL; |
| return 0; |
| } |
| |
| int |
| change_syscall(struct tcb *tcp, int new) |
| { |
| #ifdef LINUX |
| #if defined(I386) |
| /* Attempt to make vfork into fork, which we can follow. */ |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(ORIG_EAX * 4), new) < 0) |
| return -1; |
| return 0; |
| #elif defined(X86_64) |
| /* Attempt to make vfork into fork, which we can follow. */ |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(ORIG_RAX * 8), new) < 0) |
| return -1; |
| return 0; |
| #elif defined(POWERPC) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, |
| (char*)(sizeof(unsigned long)*PT_R0), new) < 0) |
| return -1; |
| return 0; |
| #elif defined(S390) || defined(S390X) |
| /* s390 linux after 2.4.7 has a hook in entry.S to allow this */ |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(PT_GPR2), new)<0) |
| return -1; |
| return 0; |
| #elif defined(M68K) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(4*PT_ORIG_D0), new)<0) |
| return -1; |
| return 0; |
| #elif defined(SPARC) || defined(SPARC64) |
| struct pt_regs regs; |
| if (ptrace(PTRACE_GETREGS, tcp->pid, (char*)®s, 0)<0) |
| return -1; |
| regs.u_regs[U_REG_G1] = new; |
| if (ptrace(PTRACE_SETREGS, tcp->pid, (char*)®s, 0)<0) |
| return -1; |
| return 0; |
| #elif defined(MIPS) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(REG_V0), new)<0) |
| return -1; |
| return 0; |
| #elif defined(ALPHA) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(REG_A3), new)<0) |
| return -1; |
| return 0; |
| #elif defined(AVR32) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(REG_R8), new) < 0) |
| return -1; |
| return 0; |
| #elif defined(BFIN) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(REG_P0), new)<0) |
| return -1; |
| return 0; |
| #elif defined(IA64) |
| if (ia32) { |
| switch (new) { |
| case 2: |
| break; /* x86 SYS_fork */ |
| case SYS_clone: |
| new = 120; |
| break; |
| default: |
| fprintf(stderr, "%s: unexpected syscall %d\n", |
| __FUNCTION__, new); |
| return -1; |
| } |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(PT_R1), new)<0) |
| return -1; |
| } else if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(PT_R15), new)<0) |
| return -1; |
| return 0; |
| #elif defined(HPPA) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(PT_GR20), new)<0) |
| return -1; |
| return 0; |
| #elif defined(SH) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(4*(REG_REG0+3)), new)<0) |
| return -1; |
| return 0; |
| #elif defined(SH64) |
| /* Top half of reg encodes the no. of args n as 0x1n. |
| Assume 0 args as kernel never actually checks... */ |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(REG_SYSCALL), |
| 0x100000 | new) < 0) |
| return -1; |
| return 0; |
| #elif defined(CRISV10) || defined(CRISV32) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, (char*)(4*PT_R9), new) < 0) |
| return -1; |
| return 0; |
| #elif defined(ARM) |
| /* Some kernels support this, some (pre-2.6.16 or so) don't. */ |
| # ifndef PTRACE_SET_SYSCALL |
| # define PTRACE_SET_SYSCALL 23 |
| # endif |
| |
| if (ptrace (PTRACE_SET_SYSCALL, tcp->pid, 0, new & 0xffff) != 0) |
| return -1; |
| |
| return 0; |
| #elif defined(TILE) |
| if (ptrace(PTRACE_POKEUSER, tcp->pid, |
| (char*)PTREGS_OFFSET_REG(0), |
| new) != 0) |
| return -1; |
| return 0; |
| #else |
| #warning Do not know how to handle change_syscall for this architecture |
| #endif /* architecture */ |
| #endif /* LINUX */ |
| return -1; |
| } |
| |
| #ifdef LINUX |
| int |
| internal_fork(struct tcb *tcp) |
| { |
| if (entering(tcp)) { |
| if (!followfork) |
| return 0; |
| fork_tcb(tcp); |
| if (setbpt(tcp) < 0) |
| return 0; |
| } else { |
| struct tcb *tcpchild; |
| int pid; |
| int bpt; |
| |
| if (!(tcp->flags & TCB_FOLLOWFORK)) |
| return 0; |
| |
| bpt = tcp->flags & TCB_BPTSET; |
| |
| if (syserror(tcp)) { |
| if (bpt) |
| clearbpt(tcp); |
| return 0; |
| } |
| |
| pid = tcp->u_rval; |
| |
| #ifdef CLONE_PTRACE /* See new setbpt code. */ |
| tcpchild = pid2tcb(pid); |
| if (tcpchild != NULL) { |
| /* The child already reported its startup trap |
| before the parent reported its syscall return. */ |
| if ((tcpchild->flags |
| & (TCB_STARTUP|TCB_ATTACHED|TCB_SUSPENDED)) |
| != (TCB_STARTUP|TCB_ATTACHED|TCB_SUSPENDED)) |
| fprintf(stderr, "\ |
| [preattached child %d of %d in weird state!]\n", |
| pid, tcp->pid); |
| } |
| else |
| #endif /* CLONE_PTRACE */ |
| { |
| fork_tcb(tcp); |
| tcpchild = alloctcb(pid); |
| } |
| |
| #ifndef CLONE_PTRACE |
| /* Attach to the new child */ |
| if (ptrace(PTRACE_ATTACH, pid, (char *) 1, 0) < 0) { |
| if (bpt) |
| clearbpt(tcp); |
| perror("PTRACE_ATTACH"); |
| fprintf(stderr, "Too late?\n"); |
| droptcb(tcpchild); |
| return 0; |
| } |
| #endif /* !CLONE_PTRACE */ |
| |
| if (bpt) |
| clearbpt(tcp); |
| |
| tcpchild->flags |= TCB_ATTACHED; |
| /* Child has BPT too, must be removed on first occasion. */ |
| if (bpt) { |
| tcpchild->flags |= TCB_BPTSET; |
| tcpchild->baddr = tcp->baddr; |
| memcpy(tcpchild->inst, tcp->inst, |
| sizeof tcpchild->inst); |
| } |
| tcpchild->parent = tcp; |
| tcp->nchildren++; |
| if (tcpchild->flags & TCB_SUSPENDED) { |
| /* The child was born suspended, due to our having |
| forced CLONE_PTRACE. */ |
| if (bpt) |
| clearbpt(tcpchild); |
| |
| tcpchild->flags &= ~(TCB_SUSPENDED|TCB_STARTUP); |
| if (ptrace_restart(PTRACE_SYSCALL, tcpchild, 0) < 0) |
| return -1; |
| |
| if (!qflag) |
| fprintf(stderr, "\ |
| Process %u resumed (parent %d ready)\n", |
| pid, tcp->pid); |
| } |
| else { |
| if (!qflag) |
| fprintf(stderr, "Process %d attached\n", pid); |
| } |
| |
| #ifdef TCB_CLONE_THREAD |
| { |
| /* |
| * Save the flags used in this call, |
| * in case we point TCP to our parent below. |
| */ |
| int call_flags = tcp->u_arg[ARG_FLAGS]; |
| if ((tcp->flags & TCB_CLONE_THREAD) && |
| tcp->parent != NULL) { |
| /* The parent in this clone is itself a |
| thread belonging to another process. |
| There is no meaning to the parentage |
| relationship of the new child with the |
| thread, only with the process. We |
| associate the new thread with our |
| parent. Since this is done for every |
| new thread, there will never be a |
| TCB_CLONE_THREAD process that has |
| children. */ |
| --tcp->nchildren; |
| tcp = tcp->parent; |
| tcpchild->parent = tcp; |
| ++tcp->nchildren; |
| } |
| if (call_flags & CLONE_THREAD) { |
| tcpchild->flags |= TCB_CLONE_THREAD; |
| ++tcp->nclone_threads; |
| } |
| if (call_flags & CLONE_DETACHED) { |
| tcpchild->flags |= TCB_CLONE_DETACHED; |
| ++tcp->nclone_detached; |
| } |
| } |
| #endif /* TCB_CLONE_THREAD */ |
| } |
| return 0; |
| } |
| |
| #else /* !LINUX */ |
| |
| int |
| internal_fork(tcp) |
| struct tcb *tcp; |
| { |
| struct tcb *tcpchild; |
| int pid; |
| int dont_follow = 0; |
| |
| #ifdef SYS_vfork |
| if (known_scno(tcp) == SYS_vfork) { |
| /* Attempt to make vfork into fork, which we can follow. */ |
| if (change_syscall(tcp, SYS_fork) < 0) |
| dont_follow = 1; |
| } |
| #endif |
| if (entering(tcp)) { |
| if (!followfork || dont_follow) |
| return 0; |
| fork_tcb(tcp); |
| if (setbpt(tcp) < 0) |
| return 0; |
| } |
| else { |
| int bpt = tcp->flags & TCB_BPTSET; |
| |
| if (!(tcp->flags & TCB_FOLLOWFORK)) |
| return 0; |
| if (bpt) |
| clearbpt(tcp); |
| |
| if (syserror(tcp)) |
| return 0; |
| |
| pid = tcp->u_rval; |
| fork_tcb(tcp); |
| tcpchild = alloctcb(pid); |
| #ifdef SUNOS4 |
| #ifdef oldway |
| /* The child must have run before it can be attached. */ |
| { |
| struct timeval tv; |
| tv.tv_sec = 0; |
| tv.tv_usec = 10000; |
| select(0, NULL, NULL, NULL, &tv); |
| } |
| if (ptrace(PTRACE_ATTACH, pid, (char *)1, 0) < 0) { |
| perror("PTRACE_ATTACH"); |
| fprintf(stderr, "Too late?\n"); |
| droptcb(tcpchild); |
| return 0; |
| } |
| #else /* !oldway */ |
| /* Try to catch the new process as soon as possible. */ |
| { |
| int i; |
| for (i = 0; i < 1024; i++) |
| if (ptrace(PTRACE_ATTACH, pid, (char *) 1, 0) >= 0) |
| break; |
| if (i == 1024) { |
| perror("PTRACE_ATTACH"); |
| fprintf(stderr, "Too late?\n"); |
| droptcb(tcpchild); |
| return 0; |
| } |
| } |
| #endif /* !oldway */ |
| #endif /* SUNOS4 */ |
| tcpchild->flags |= TCB_ATTACHED; |
| /* Child has BPT too, must be removed on first occasion */ |
| if (bpt) { |
| tcpchild->flags |= TCB_BPTSET; |
| tcpchild->baddr = tcp->baddr; |
| memcpy(tcpchild->inst, tcp->inst, |
| sizeof tcpchild->inst); |
| } |
| tcpchild->parent = tcp; |
| tcp->nchildren++; |
| if (!qflag) |
| fprintf(stderr, "Process %d attached\n", pid); |
| } |
| return 0; |
| } |
| |
| #endif /* !LINUX */ |
| |
| #endif /* !USE_PROCFS */ |
| |
| #if defined(SUNOS4) || defined(LINUX) || defined(FREEBSD) |
| |
| int |
| sys_vfork(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) |
| return RVAL_UDECIMAL; |
| return 0; |
| } |
| |
| #endif /* SUNOS4 || LINUX || FREEBSD */ |
| |
| #ifndef LINUX |
| |
| static char idstr[16]; |
| |
| int |
| sys_getpid(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| sprintf(idstr, "ppid %lu", getrval2(tcp)); |
| tcp->auxstr = idstr; |
| return RVAL_STR; |
| } |
| return 0; |
| } |
| |
| int |
| sys_getuid(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| sprintf(idstr, "euid %lu", getrval2(tcp)); |
| tcp->auxstr = idstr; |
| return RVAL_STR; |
| } |
| return 0; |
| } |
| |
| int |
| sys_getgid(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| sprintf(idstr, "egid %lu", getrval2(tcp)); |
| tcp->auxstr = idstr; |
| return RVAL_STR; |
| } |
| return 0; |
| } |
| |
| #endif /* !LINUX */ |
| |
| #ifdef LINUX |
| |
| int |
| sys_setuid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf("%u", (uid_t) tcp->u_arg[0]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_setgid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf("%u", (gid_t) tcp->u_arg[0]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_getresuid(struct tcb *tcp) |
| { |
| if (exiting(tcp)) { |
| __kernel_uid_t uid; |
| if (syserror(tcp)) |
| tprintf("%#lx, %#lx, %#lx", tcp->u_arg[0], |
| tcp->u_arg[1], tcp->u_arg[2]); |
| else { |
| if (umove(tcp, tcp->u_arg[0], &uid) < 0) |
| tprintf("%#lx, ", tcp->u_arg[0]); |
| else |
| tprintf("[%lu], ", (unsigned long) uid); |
| if (umove(tcp, tcp->u_arg[1], &uid) < 0) |
| tprintf("%#lx, ", tcp->u_arg[1]); |
| else |
| tprintf("[%lu], ", (unsigned long) uid); |
| if (umove(tcp, tcp->u_arg[2], &uid) < 0) |
| tprintf("%#lx", tcp->u_arg[2]); |
| else |
| tprintf("[%lu]", (unsigned long) uid); |
| } |
| } |
| return 0; |
| } |
| |
| int |
| sys_getresgid(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| __kernel_gid_t gid; |
| if (syserror(tcp)) |
| tprintf("%#lx, %#lx, %#lx", tcp->u_arg[0], |
| tcp->u_arg[1], tcp->u_arg[2]); |
| else { |
| if (umove(tcp, tcp->u_arg[0], &gid) < 0) |
| tprintf("%#lx, ", tcp->u_arg[0]); |
| else |
| tprintf("[%lu], ", (unsigned long) gid); |
| if (umove(tcp, tcp->u_arg[1], &gid) < 0) |
| tprintf("%#lx, ", tcp->u_arg[1]); |
| else |
| tprintf("[%lu], ", (unsigned long) gid); |
| if (umove(tcp, tcp->u_arg[2], &gid) < 0) |
| tprintf("%#lx", tcp->u_arg[2]); |
| else |
| tprintf("[%lu]", (unsigned long) gid); |
| } |
| } |
| return 0; |
| } |
| |
| #endif /* LINUX */ |
| |
| int |
| sys_setreuid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printuid("", tcp->u_arg[0]); |
| printuid(", ", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_setregid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printuid("", tcp->u_arg[0]); |
| printuid(", ", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| #if defined(LINUX) || defined(FREEBSD) |
| int |
| sys_setresuid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printuid("", tcp->u_arg[0]); |
| printuid(", ", tcp->u_arg[1]); |
| printuid(", ", tcp->u_arg[2]); |
| } |
| return 0; |
| } |
| int |
| sys_setresgid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printuid("", tcp->u_arg[0]); |
| printuid(", ", tcp->u_arg[1]); |
| printuid(", ", tcp->u_arg[2]); |
| } |
| return 0; |
| } |
| |
| #endif /* LINUX || FREEBSD */ |
| |
| int |
| sys_setgroups(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| unsigned long len, size, start, cur, end, abbrev_end; |
| GETGROUPS_T gid; |
| int failed = 0; |
| |
| len = tcp->u_arg[0]; |
| tprintf("%lu, ", len); |
| if (len == 0) { |
| tprintf("[]"); |
| return 0; |
| } |
| start = tcp->u_arg[1]; |
| if (start == 0) { |
| tprintf("NULL"); |
| return 0; |
| } |
| size = len * sizeof(gid); |
| end = start + size; |
| if (!verbose(tcp) || size / sizeof(gid) != len || end < start) { |
| tprintf("%#lx", start); |
| return 0; |
| } |
| if (abbrev(tcp)) { |
| abbrev_end = start + max_strlen * sizeof(gid); |
| if (abbrev_end < start) |
| abbrev_end = end; |
| } else { |
| abbrev_end = end; |
| } |
| tprintf("["); |
| for (cur = start; cur < end; cur += sizeof(gid)) { |
| if (cur > start) |
| tprintf(", "); |
| if (cur >= abbrev_end) { |
| tprintf("..."); |
| break; |
| } |
| if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) { |
| tprintf("?"); |
| failed = 1; |
| break; |
| } |
| tprintf("%lu", (unsigned long) gid); |
| } |
| tprintf("]"); |
| if (failed) |
| tprintf(" %#lx", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_getgroups(tcp) |
| struct tcb *tcp; |
| { |
| unsigned long len; |
| |
| if (entering(tcp)) { |
| len = tcp->u_arg[0]; |
| tprintf("%lu, ", len); |
| } else { |
| unsigned long size, start, cur, end, abbrev_end; |
| GETGROUPS_T gid; |
| int failed = 0; |
| |
| len = tcp->u_rval; |
| if (len == 0) { |
| tprintf("[]"); |
| return 0; |
| } |
| start = tcp->u_arg[1]; |
| if (start == 0) { |
| tprintf("NULL"); |
| return 0; |
| } |
| if (tcp->u_arg[0] == 0) { |
| tprintf("%#lx", start); |
| return 0; |
| } |
| size = len * sizeof(gid); |
| end = start + size; |
| if (!verbose(tcp) || tcp->u_arg[0] == 0 || |
| size / sizeof(gid) != len || end < start) { |
| tprintf("%#lx", start); |
| return 0; |
| } |
| if (abbrev(tcp)) { |
| abbrev_end = start + max_strlen * sizeof(gid); |
| if (abbrev_end < start) |
| abbrev_end = end; |
| } else { |
| abbrev_end = end; |
| } |
| tprintf("["); |
| for (cur = start; cur < end; cur += sizeof(gid)) { |
| if (cur > start) |
| tprintf(", "); |
| if (cur >= abbrev_end) { |
| tprintf("..."); |
| break; |
| } |
| if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) { |
| tprintf("?"); |
| failed = 1; |
| break; |
| } |
| tprintf("%lu", (unsigned long) gid); |
| } |
| tprintf("]"); |
| if (failed) |
| tprintf(" %#lx", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| #ifdef LINUX |
| int |
| sys_setgroups32(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| unsigned long len, size, start, cur, end, abbrev_end; |
| GETGROUPS32_T gid; |
| int failed = 0; |
| |
| len = tcp->u_arg[0]; |
| tprintf("%lu, ", len); |
| if (len == 0) { |
| tprintf("[]"); |
| return 0; |
| } |
| start = tcp->u_arg[1]; |
| if (start == 0) { |
| tprintf("NULL"); |
| return 0; |
| } |
| size = len * sizeof(gid); |
| end = start + size; |
| if (!verbose(tcp) || size / sizeof(gid) != len || end < start) { |
| tprintf("%#lx", start); |
| return 0; |
| } |
| if (abbrev(tcp)) { |
| abbrev_end = start + max_strlen * sizeof(gid); |
| if (abbrev_end < start) |
| abbrev_end = end; |
| } else { |
| abbrev_end = end; |
| } |
| tprintf("["); |
| for (cur = start; cur < end; cur += sizeof(gid)) { |
| if (cur > start) |
| tprintf(", "); |
| if (cur >= abbrev_end) { |
| tprintf("..."); |
| break; |
| } |
| if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) { |
| tprintf("?"); |
| failed = 1; |
| break; |
| } |
| tprintf("%lu", (unsigned long) gid); |
| } |
| tprintf("]"); |
| if (failed) |
| tprintf(" %#lx", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_getgroups32(tcp) |
| struct tcb *tcp; |
| { |
| unsigned long len; |
| |
| if (entering(tcp)) { |
| len = tcp->u_arg[0]; |
| tprintf("%lu, ", len); |
| } else { |
| unsigned long size, start, cur, end, abbrev_end; |
| GETGROUPS32_T gid; |
| int failed = 0; |
| |
| len = tcp->u_rval; |
| if (len == 0) { |
| tprintf("[]"); |
| return 0; |
| } |
| start = tcp->u_arg[1]; |
| if (start == 0) { |
| tprintf("NULL"); |
| return 0; |
| } |
| size = len * sizeof(gid); |
| end = start + size; |
| if (!verbose(tcp) || tcp->u_arg[0] == 0 || |
| size / sizeof(gid) != len || end < start) { |
| tprintf("%#lx", start); |
| return 0; |
| } |
| if (abbrev(tcp)) { |
| abbrev_end = start + max_strlen * sizeof(gid); |
| if (abbrev_end < start) |
| abbrev_end = end; |
| } else { |
| abbrev_end = end; |
| } |
| tprintf("["); |
| for (cur = start; cur < end; cur += sizeof(gid)) { |
| if (cur > start) |
| tprintf(", "); |
| if (cur >= abbrev_end) { |
| tprintf("..."); |
| break; |
| } |
| if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) { |
| tprintf("?"); |
| failed = 1; |
| break; |
| } |
| tprintf("%lu", (unsigned long) gid); |
| } |
| tprintf("]"); |
| if (failed) |
| tprintf(" %#lx", tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| #endif /* LINUX */ |
| |
| #if defined(ALPHA) || defined(SUNOS4) || defined(SVR4) |
| int |
| sys_setpgrp(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| #ifndef SVR4 |
| tprintf("%lu, %lu", tcp->u_arg[0], tcp->u_arg[1]); |
| #endif /* !SVR4 */ |
| } |
| return 0; |
| } |
| #endif /* ALPHA || SUNOS4 || SVR4 */ |
| |
| int |
| sys_getpgrp(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| #ifndef SVR4 |
| tprintf("%lu", tcp->u_arg[0]); |
| #endif /* !SVR4 */ |
| } |
| return 0; |
| } |
| |
| int |
| sys_getsid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf("%lu", tcp->u_arg[0]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_setsid(tcp) |
| struct tcb *tcp; |
| { |
| return 0; |
| } |
| |
| int |
| sys_getpgid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf("%lu", tcp->u_arg[0]); |
| } |
| return 0; |
| } |
| |
| int |
| sys_setpgid(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| tprintf("%lu, %lu", tcp->u_arg[0], tcp->u_arg[1]); |
| } |
| return 0; |
| } |
| |
| #if UNIXWARE >= 2 |
| |
| #include <sys/privilege.h> |
| |
| |
| static const struct xlat procpriv_cmds [] = { |
| { SETPRV, "SETPRV" }, |
| { CLRPRV, "CLRPRV" }, |
| { PUTPRV, "PUTPRV" }, |
| { GETPRV, "GETPRV" }, |
| { CNTPRV, "CNTPRV" }, |
| { 0, NULL }, |
| }; |
| |
| |
| static const struct xlat procpriv_priv [] = { |
| { P_OWNER, "P_OWNER" }, |
| { P_AUDIT, "P_AUDIT" }, |
| { P_COMPAT, "P_COMPAT" }, |
| { P_DACREAD, "P_DACREAD" }, |
| { P_DACWRITE, "P_DACWRITE" }, |
| { P_DEV, "P_DEV" }, |
| { P_FILESYS, "P_FILESYS" }, |
| { P_MACREAD, "P_MACREAD" }, |
| { P_MACWRITE, "P_MACWRITE" }, |
| { P_MOUNT, "P_MOUNT" }, |
| { P_MULTIDIR, "P_MULTIDIR" }, |
| { P_SETPLEVEL, "P_SETPLEVEL" }, |
| { P_SETSPRIV, "P_SETSPRIV" }, |
| { P_SETUID, "P_SETUID" }, |
| { P_SYSOPS, "P_SYSOPS" }, |
| { P_SETUPRIV, "P_SETUPRIV" }, |
| { P_DRIVER, "P_DRIVER" }, |
| { P_RTIME, "P_RTIME" }, |
| { P_MACUPGRADE, "P_MACUPGRADE" }, |
| { P_FSYSRANGE, "P_FSYSRANGE" }, |
| { P_SETFLEVEL, "P_SETFLEVEL" }, |
| { P_AUDITWR, "P_AUDITWR" }, |
| { P_TSHAR, "P_TSHAR" }, |
| { P_PLOCK, "P_PLOCK" }, |
| { P_CORE, "P_CORE" }, |
| { P_LOADMOD, "P_LOADMOD" }, |
| { P_BIND, "P_BIND" }, |
| { P_ALLPRIVS, "P_ALLPRIVS" }, |
| { 0, NULL }, |
| }; |
| |
| |
| static const struct xlat procpriv_type [] = { |
| { PS_FIX, "PS_FIX" }, |
| { PS_INH, "PS_INH" }, |
| { PS_MAX, "PS_MAX" }, |
| { PS_WKG, "PS_WKG" }, |
| { 0, NULL }, |
| }; |
| |
| |
| static void |
| printpriv(struct tcb *tcp, long addr, int len, const struct xlat *opt) |
| { |
| priv_t buf [128]; |
| int max = verbose (tcp) ? sizeof buf / sizeof buf [0] : 10; |
| int dots = len > max; |
| int i; |
| |
| if (len > max) len = max; |
| |
| if (len <= 0 || |
| umoven (tcp, addr, len * sizeof buf[0], (char *) buf) < 0) |
| { |
| tprintf ("%#lx", addr); |
| return; |
| } |
| |
| tprintf ("["); |
| |
| for (i = 0; i < len; ++i) { |
| const char *t, *p; |
| |
| if (i) tprintf (", "); |
| |
| if ((t = xlookup (procpriv_type, buf [i] & PS_TYPE)) && |
| (p = xlookup (procpriv_priv, buf [i] & ~PS_TYPE))) |
| { |
| tprintf ("%s|%s", t, p); |
| } |
| else { |
| tprintf ("%#lx", buf [i]); |
| } |
| } |
| |
| if (dots) tprintf (" ..."); |
| |
| tprintf ("]"); |
| } |
| |
| |
| int |
| sys_procpriv(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) { |
| printxval(procpriv_cmds, tcp->u_arg[0], "???PRV"); |
| switch (tcp->u_arg[0]) { |
| case CNTPRV: |
| tprintf(", %#lx, %ld", tcp->u_arg[1], tcp->u_arg[2]); |
| break; |
| |
| case GETPRV: |
| break; |
| |
| default: |
| tprintf (", "); |
| printpriv (tcp, tcp->u_arg[1], tcp->u_arg[2]); |
| tprintf (", %ld", tcp->u_arg[2]); |
| } |
| } |
| else if (tcp->u_arg[0] == GETPRV) { |
| if (syserror (tcp)) { |
| tprintf(", %#lx, %ld", tcp->u_arg[1], tcp->u_arg[2]); |
| } |
| else { |
| tprintf (", "); |
| printpriv (tcp, tcp->u_arg[1], tcp->u_rval); |
| tprintf (", %ld", tcp->u_arg[2]); |
| } |
| } |
| |
| return 0; |
| } |
| |
| #endif /* UNIXWARE */ |
| |
| |
| static void |
| printargv(tcp, addr) |
| struct tcb *tcp; |
| long addr; |
| { |
| union { |
| unsigned int p32; |
| unsigned long p64; |
| char data[sizeof(long)]; |
| } cp; |
| char *sep; |
| int n = 0; |
| |
| cp.p64 = 1; |
| for (sep = ""; !abbrev(tcp) || n < max_strlen / 2; sep = ", ", ++n) { |
| if (umoven(tcp, addr, personality_wordsize[current_personality], |
| cp.data) < 0) { |
| tprintf("%#lx", addr); |
| return; |
| } |
| if (personality_wordsize[current_personality] == 4) |
| cp.p64 = cp.p32; |
| if (cp.p64 == 0) |
| break; |
| tprintf("%s", sep); |
| printstr(tcp, cp.p64, -1); |
| addr += personality_wordsize[current_personality]; |
| } |
| if (cp.p64) |
| tprintf("%s...", sep); |
| } |
| |
| static void |
| printargc(fmt, tcp, addr) |
| char *fmt; |
| struct tcb *tcp; |
| long addr; |
| { |
| int count; |
| char *cp; |
| |
| for (count = 0; umove(tcp, addr, &cp) >= 0 && cp != NULL; count++) { |
| addr += sizeof(char *); |
| } |
| tprintf(fmt, count, count == 1 ? "" : "s"); |
| } |
| |
| #if defined(SPARC) || defined(SPARC64) || defined(SUNOS4) |
| int |
| sys_execv(struct tcb *tcp) |
| { |
| if (entering(tcp)) { |
| printpath(tcp, tcp->u_arg[0]); |
| if (!verbose(tcp)) |
| tprintf(", %#lx", tcp->u_arg[1]); |
| else { |
| tprintf(", ["); |
| printargv(tcp, tcp->u_arg[1]); |
| tprintf("]"); |
| } |
| } |
| return 0; |
| } |
| #endif /* SPARC || SPARC64 || SUNOS4 */ |
| |
| int |
| sys_execve(struct tcb *tcp) |
| { |
| if (entering(tcp)) { |
| printpath(tcp, tcp->u_arg[0]); |
| if (!verbose(tcp)) |
| tprintf(", %#lx", tcp->u_arg[1]); |
| else { |
| tprintf(", ["); |
| printargv(tcp, tcp->u_arg[1]); |
| tprintf("]"); |
| } |
| if (!verbose(tcp)) |
| tprintf(", %#lx", tcp->u_arg[2]); |
| else if (abbrev(tcp)) |
| printargc(", [/* %d var%s */]", tcp, tcp->u_arg[2]); |
| else { |
| tprintf(", ["); |
| printargv(tcp, tcp->u_arg[2]); |
| tprintf("]"); |
| } |
| } |
| return 0; |
| } |
| |
| #if UNIXWARE > 2 |
| |
| int sys_rexecve(tcp) |
| struct tcb *tcp; |
| { |
| if (entering (tcp)) { |
| sys_execve (tcp); |
| tprintf (", %ld", tcp->u_arg[3]); |
| } |
| return 0; |
| } |
| |
| #endif |
| |
| int |
| internal_exec(tcp) |
| struct tcb *tcp; |
| { |
| #ifdef SUNOS4 |
| if (exiting(tcp) && !syserror(tcp) && followfork) |
| fixvfork(tcp); |
| #endif /* SUNOS4 */ |
| #if defined LINUX && defined TCB_WAITEXECVE |
| if (exiting(tcp) && syserror(tcp)) |
| tcp->flags &= ~TCB_WAITEXECVE; |
| else |
| tcp->flags |= TCB_WAITEXECVE; |
| #endif /* LINUX && TCB_WAITEXECVE */ |
| return 0; |
| } |
| |
| #ifdef LINUX |
| #ifndef __WNOTHREAD |
| #define __WNOTHREAD 0x20000000 |
| #endif |
| #ifndef __WALL |
| #define __WALL 0x40000000 |
| #endif |
| #ifndef __WCLONE |
| #define __WCLONE 0x80000000 |
| #endif |
| #endif /* LINUX */ |
| |
| static const struct xlat wait4_options[] = { |
| { WNOHANG, "WNOHANG" }, |
| #ifndef WSTOPPED |
| { WUNTRACED, "WUNTRACED" }, |
| #endif |
| #ifdef WEXITED |
| { WEXITED, "WEXITED" }, |
| #endif |
| #ifdef WTRAPPED |
| { WTRAPPED, "WTRAPPED" }, |
| #endif |
| #ifdef WSTOPPED |
| { WSTOPPED, "WSTOPPED" }, |
| #endif |
| #ifdef WCONTINUED |
| { WCONTINUED, "WCONTINUED" }, |
| #endif |
| #ifdef WNOWAIT |
| { WNOWAIT, "WNOWAIT" }, |
| #endif |
| #ifdef __WCLONE |
| { __WCLONE, "__WCLONE" }, |
| #endif |
| #ifdef __WALL |
| { __WALL, "__WALL" }, |
| #endif |
| #ifdef __WNOTHREAD |
| { __WNOTHREAD, "__WNOTHREAD" }, |
| #endif |
| { 0, NULL }, |
| }; |
| |
| #if !defined WCOREFLAG && defined WCOREFLG |
| # define WCOREFLAG WCOREFLG |
| #endif |
| #ifndef WCOREFLAG |
| # define WCOREFLAG 0x80 |
| #endif |
| #ifndef WCOREDUMP |
| # define WCOREDUMP(status) ((status) & 0200) |
| #endif |
| |
| |
| #ifndef W_STOPCODE |
| #define W_STOPCODE(sig) ((sig) << 8 | 0x7f) |
| #endif |
| #ifndef W_EXITCODE |
| #define W_EXITCODE(ret, sig) ((ret) << 8 | (sig)) |
| #endif |
| |
| static int |
| printstatus(status) |
| int status; |
| { |
| int exited = 0; |
| |
| /* |
| * Here is a tricky presentation problem. This solution |
| * is still not entirely satisfactory but since there |
| * are no wait status constructors it will have to do. |
| */ |
| if (WIFSTOPPED(status)) { |
| tprintf("[{WIFSTOPPED(s) && WSTOPSIG(s) == %s}", |
| signame(WSTOPSIG(status))); |
| status &= ~W_STOPCODE(WSTOPSIG(status)); |
| } |
| else if (WIFSIGNALED(status)) { |
| tprintf("[{WIFSIGNALED(s) && WTERMSIG(s) == %s%s}", |
| signame(WTERMSIG(status)), |
| WCOREDUMP(status) ? " && WCOREDUMP(s)" : ""); |
| status &= ~(W_EXITCODE(0, WTERMSIG(status)) | WCOREFLAG); |
| } |
| else if (WIFEXITED(status)) { |
| tprintf("[{WIFEXITED(s) && WEXITSTATUS(s) == %d}", |
| WEXITSTATUS(status)); |
| exited = 1; |
| status &= ~W_EXITCODE(WEXITSTATUS(status), 0); |
| } |
| else { |
| tprintf("[%#x]", status); |
| return 0; |
| } |
| |
| if (status == 0) |
| tprintf("]"); |
| else |
| tprintf(" | %#x]", status); |
| |
| return exited; |
| } |
| |
| static int |
| printwaitn(struct tcb *tcp, int n, int bitness) |
| { |
| int status; |
| int exited = 0; |
| |
| if (entering(tcp)) { |
| #ifdef LINUX |
| /* On Linux, kernel-side pid_t is typedef'ed to int |
| * on all arches. Also, glibc-2.8 truncates wait3 and wait4 |
| * pid argument to int on 64bit arches, producing, |
| * for example, wait4(4294967295, ...) instead of -1 |
| * in strace. We have to use int here, not long. |
| */ |
| int pid = tcp->u_arg[0]; |
| tprintf("%d, ", pid); |
| #else |
| /* |
| * Sign-extend a 32-bit value when that's what it is. |
| */ |
| long pid = tcp->u_arg[0]; |
| if (personality_wordsize[current_personality] < sizeof pid) |
| pid = (long) (int) pid; |
| tprintf("%ld, ", pid); |
| #endif |
| } else { |
| /* status */ |
| if (!tcp->u_arg[1]) |
| tprintf("NULL"); |
| else if (syserror(tcp) || tcp->u_rval == 0) |
| tprintf("%#lx", tcp->u_arg[1]); |
| else if (umove(tcp, tcp->u_arg[1], &status) < 0) |
| tprintf("[?]"); |
| else |
| exited = printstatus(status); |
| /* options */ |
| tprintf(", "); |
| printflags(wait4_options, tcp->u_arg[2], "W???"); |
| if (n == 4) { |
| tprintf(", "); |
| /* usage */ |
| if (!tcp->u_arg[3]) |
| tprintf("NULL"); |
| #ifdef LINUX |
| else if (tcp->u_rval > 0) { |
| #ifdef ALPHA |
| if (bitness) |
| printrusage32(tcp, tcp->u_arg[3]); |
| else |
| #endif |
| printrusage(tcp, tcp->u_arg[3]); |
| } |
| #endif /* LINUX */ |
| #ifdef SUNOS4 |
| else if (tcp->u_rval > 0 && exited) |
| printrusage(tcp, tcp->u_arg[3]); |
| #endif /* SUNOS4 */ |
| else |
| tprintf("%#lx", tcp->u_arg[3]); |
| } |
| } |
| return 0; |
| } |
| |
| int |
| internal_wait(tcp, flagarg) |
| struct tcb *tcp; |
| int flagarg; |
| { |
| int got_kids; |
| |
| #ifdef TCB_CLONE_THREAD |
| if (tcp->flags & TCB_CLONE_THREAD) |
| /* The children we wait for are our parent's children. */ |
| got_kids = (tcp->parent->nchildren |
| > tcp->parent->nclone_detached); |
| else |
| got_kids = (tcp->nchildren > tcp->nclone_detached); |
| #else |
| got_kids = tcp->nchildren > 0; |
| #endif |
| |
| if (entering(tcp) && got_kids) { |
| /* There are children that this parent should block for. |
| But ptrace made us the parent of the traced children |
| and the real parent will get ECHILD from the wait call. |
| |
| XXX If we attached with strace -f -p PID, then there |
| may be untraced dead children the parent could be reaping |
| now, but we make him block. */ |
| |
| /* ??? WTA: fix bug with hanging children */ |
| |
| if (!(tcp->u_arg[flagarg] & WNOHANG)) { |
| /* |
| * There are traced children. We'll make the parent |
| * block to avoid a false ECHILD error due to our |
| * ptrace having stolen the children. However, |
| * we shouldn't block if there are zombies to reap. |
| * XXX doesn't handle pgrp matches (u_arg[0]==0,<-1) |
| */ |
| struct tcb *child = NULL; |
| if (tcp->nzombies > 0 && |
| (tcp->u_arg[0] == -1 || |
| (child = pid2tcb(tcp->u_arg[0])) == NULL)) |
| return 0; |
| if (tcp->u_arg[0] > 0) { |
| /* |
| * If the parent waits for a specified child |
| * PID, then it must get ECHILD right away |
| * if that PID is not one of its children. |
| * Make sure that the requested PID matches |
| * one of the parent's children that we are |
| * tracing, and don't suspend it otherwise. |
| */ |
| if (child == NULL) |
| child = pid2tcb(tcp->u_arg[0]); |
| if (child == NULL || child->parent != ( |
| #ifdef TCB_CLONE_THREAD |
| (tcp->flags & TCB_CLONE_THREAD) |
| ? tcp->parent : |
| #endif |
| tcp) || |
| (child->flags & TCB_EXITING)) |
| return 0; |
| } |
| tcp->flags |= TCB_SUSPENDED; |
| tcp->waitpid = tcp->u_arg[0]; |
| #ifdef TCB_CLONE_THREAD |
| if (tcp->flags & TCB_CLONE_THREAD) |
| tcp->parent->nclone_waiting++; |
| #endif |
| } |
| } |
| if (exiting(tcp) && tcp->u_error == ECHILD && got_kids) { |
| if (tcp->u_arg[flagarg] & WNOHANG) { |
| /* We must force a fake result of 0 instead of |
| the ECHILD error. */ |
| extern int force_result(); |
| return force_result(tcp, 0, 0); |
| } |
| } |
| else if (exiting(tcp) && tcp->u_error == 0 && tcp->u_rval > 0 && |
| tcp->nzombies > 0 && pid2tcb(tcp->u_rval) == NULL) { |
| /* |
| * We just reaped a child we don't know about, |
| * presumably a zombie we already droptcb'd. |
| */ |
| tcp->nzombies--; |
| } |
| return 0; |
| } |
| |
| #ifdef SVR4 |
| |
| int |
| sys_wait(tcp) |
| struct tcb *tcp; |
| { |
| if (exiting(tcp)) { |
| /* The library wrapper stuffs this into the user variable. */ |
| if (!syserror(tcp)) |
| printstatus(getrval2(tcp)); |
| } |
| return 0; |
| } |
| |
| #endif /* SVR4 */ |
| |
| #ifdef FREEBSD |
| int |
| sys_wait(tcp) |
| struct tcb *tcp; |
| { |
| int status; |
| |
| if (exiting(tcp)) { |
| if (!syserror(tcp)) { |
| if (umove(tcp, tcp->u_arg[0], &status) < 0) |
| tprintf("%#lx", tcp->u_arg[0]); |
| else |
| printstatus(status); |
| } |
| } |
| return 0; |
| } |
| #endif |
| |
| int |
| sys_waitpid(tcp) |
| struct tcb *tcp; |
| { |
| return printwaitn(tcp, 3, 0); |
| } |
| |
| int |
| sys_wait4(tcp) |
| struct tcb *tcp; |
| { |
| return printwaitn(tcp, 4, 0); |
| } |
| |
| #ifdef ALPHA |
| int |
| sys_osf_wait4(tcp) |
| struct tcb *tcp; |
| { |
| return printwaitn(tcp, 4, 1); |
| } |
| #endif |
| |
| #if defined SVR4 || defined LINUX |
| |
| static const struct xlat waitid_types[] = { |
| { P_PID, "P_PID" }, |
| #ifdef P_PPID |
| { P_PPID, "P_PPID" }, |
| #endif |
| { P_PGID, "P_PGID" }, |
| #ifdef P_SID |
| { P_SID, "P_SID" }, |
| #endif |
| #ifdef P_CID |
| { P_CID, "P_CID" }, |
| #endif |
| #ifdef P_UID |
| { P_UID, "P_UID" }, |
| #endif |
| #ifdef P_GID |
| { P_GID, "P_GID" }, |
| #endif |
| { P_ALL, "P_ALL" }, |
| #ifdef P_LWPID |
| { P_LWPID, "P_LWPID" }, |
| #endif |
| { 0, NULL }, |
| }; |
| |
| int |
| sys_waitid(tcp) |
| struct tcb *tcp; |
| { |
| siginfo_t si; |
| int exited; |
| |
| if (entering(tcp)) { |
| printxval(waitid_types, tcp->u_arg[0], "P_???"); |
| tprintf(", %ld, ", tcp->u_arg[1]); |
| } |
| else { |
| /* siginfo */ |
| exited = 0; |
| if (!tcp->u_arg[2]) |
| tprintf("NULL"); |
| else if (syserror(tcp)) |
| tprintf("%#lx", tcp->u_arg[2]); |
| else if (umove(tcp, tcp->u_arg[2], &si) < 0) |
| tprintf("{???}"); |
| else |
| printsiginfo(&si, verbose(tcp)); |
| /* options */ |
| tprintf(", "); |
| printflags(wait4_options, tcp->u_arg[3], "W???"); |
| if (tcp->u_nargs > 4) { |
| /* usage */ |
| tprintf(", "); |
| if (!tcp->u_arg[4]) |
| tprintf("NULL"); |
| else if (tcp->u_error) |
| tprintf("%#lx", tcp->u_arg[4]); |
| else |
| printrusage(tcp, tcp->u_arg[4]); |
| } |
| } |
| return 0; |
| } |
| |
| #endif /* SVR4 or LINUX */ |
| |
| int |
| sys_alarm(tcp) |
| struct tcb *tcp; |
| { |
| if (entering(tcp)) |
| tprintf("%lu", tcp->u_arg[0]); |
| return 0; |
| } |
| |
| int |
| sys_uname(tcp) |
| struct tcb *tcp; |
| { |
| struct utsname uname; |
| |
| if (exiting(tcp)) { |
| if (syserror(tcp) || !verbose(tcp)) |
| tprintf("%#lx", tcp->u_arg[0]); |
| else if (umove(tcp, tcp->u_arg[0], &uname) < 0) |
| tprintf("{...}"); |
| else if (!abbrev(tcp)) { |
| |
| tprintf("{sysname=\"%s\", nodename=\"%s\", ", |
| uname.sysname, uname.nodename); |
| tprintf("release=\"%s\", version=\"%s\", ", |
| uname.release, uname.version); |
| tprintf("machine=\"%s\"", uname.machine); |
| #ifdef LINUX |
| #ifndef __GLIBC__ |
| tprintf(", domainname=\"%s\"", uname.domainname); |
| #endif |
| #endif |
| tprintf("}"); |
| } |
| else |
| tprintf("{sys=\"%s\", node=\"%s\", ...}", |
| uname.sysname, uname.nodename); |
| } |
| return 0; |
| } |
| |
| #ifndef SVR4 |
| |
| static const struct xlat ptrace_cmds[] = { |
| # ifndef FREEBSD |
| { PTRACE_TRACEME, "PTRACE_TRACEME" }, |
| { PTRACE_PEEKTEXT, "PTRACE_PEEKTEXT", }, |
| { PTRACE_PEEKDATA, "PTRACE_PEEKDATA", }, |
| { PTRACE_PEEKUSER, "PTRACE_PEEKUSER", }, |
| { PTRACE_POKETEXT, "PTRACE_POKETEXT", }, |
| { PTRACE_POKEDATA, "PTRACE_POKEDATA", }, |
| { PTRACE_POKEUSER, "PTRACE_POKEUSER", }, |
| { PTRACE_CONT, "PTRACE_CONT" }, |
| { PTRACE_KILL, "PTRACE_KILL" }, |
| { PTRACE_SINGLESTEP, "PTRACE_SINGLESTEP" }, |
| { PTRACE_ATTACH, "PTRACE_ATTACH" }, |
| { PTRACE_DETACH, "PTRACE_DETACH" }, |
| # ifdef PTRACE_GETREGS |
| { PTRACE_GETREGS, "PTRACE_GETREGS" }, |
| # endif |
| # ifdef PTRACE_SETREGS |
| { PTRACE_SETREGS, "PTRACE_SETREGS" }, |
| # endif |
| # ifdef PTRACE_GETFPREGS |
| { PTRACE_GETFPREGS, "PTRACE_GETFPREGS", }, |
| # endif |
| # ifdef PTRACE_SETFPREGS |
| { PTRACE_SETFPREGS, "PTRACE_SETFPREGS", }, |
| # endif |
| # ifdef PTRACE_GETFPXREGS |
| { PTRACE_GETFPXREGS, "PTRACE_GETFPXREGS", }, |
| # endif |
| # ifdef PTRACE_SETFPXREGS |
| { PTRACE_SETFPXREGS, "PTRACE_SETFPXREGS", }, |
| # endif |
| # ifdef PTRACE_GETVRREGS |
| { PTRACE_GETVRREGS, "PTRACE_GETVRREGS", }, |
| # endif |
| # ifdef PTRACE_SETVRREGS |
| { PTRACE_SETVRREGS, "PTRACE_SETVRREGS", }, |
| # endif |
| # ifdef PTRACE_SETOPTIONS |
| { PTRACE_SETOPTIONS, "PTRACE_SETOPTIONS", }, |
| # endif |
| # ifdef PTRACE_GETEVENTMSG |
| { PTRACE_GETEVENTMSG, "PTRACE_GETEVENTMSG", }, |
| # endif |
| # ifdef PTRACE_GETSIGINFO |
| { PTRACE_GETSIGINFO, "PTRACE_GETSIGINFO", }, |
| # endif |
| # ifdef PTRACE_SETSIGINFO |
| { PTRACE_SETSIGINFO, "PTRACE_SETSIGINFO", }, |
| # endif |
| # ifdef PTRACE_SET_SYSCALL |
| { PTRACE_SET_SYSCALL, "PTRACE_SET_SYSCALL", }, |
| # endif |
| # ifdef SUNOS4 |
| { PTRACE_READDATA, "PTRACE_READDATA" }, |
| { PTRACE_WRITEDATA, "PTRACE_WRITEDATA" }, |
| { PTRACE_READTEXT, "PTRACE_READTEXT" }, |
| { PTRACE_WRITETEXT, "PTRACE_WRITETEXT" }, |
| { PTRACE_GETFPAREGS, "PTRACE_GETFPAREGS" }, |
| { PTRACE_SETFPAREGS, "PTRACE_SETFPAREGS" }, |
| # ifdef SPARC |
| { PTRACE_GETWINDOW, "PTRACE_GETWINDOW" }, |
| { PTRACE_SETWINDOW, "PTRACE_SETWINDOW" }, |
| # else /* !SPARC */ |
| { PTRACE_22, "PTRACE_22" }, |
| { PTRACE_23, "PTRACE_3" }, |
| # endif /* !SPARC */ |
| # endif /* SUNOS4 */ |
| { PTRACE_SYSCALL, "PTRACE_SYSCALL" }, |
| # ifdef SUNOS4 |
| { PTRACE_DUMPCORE, "PTRACE_DUMPCORE" }, |
| # ifdef I386 |
| { PTRACE_SETWRBKPT, "PTRACE_SETWRBKPT" }, |
| { PTRACE_SETACBKPT, "PTRACE_SETACBKPT" }, |
| { PTRACE_CLRDR7, "PTRACE_CLRDR7" }, |
| # else /* !I386 */ |
| { PTRACE_26, "PTRACE_26" }, |
| { PTRACE_27, "PTRACE_27" }, |
| { PTRACE_28, "PTRACE_28" }, |
| # endif /* !I386 */ |
| { PTRACE_GETUCODE, "PTRACE_GETUCODE" }, |
| # endif /* SUNOS4 */ |
| |
| # else /* FREEBSD */ |
| |
| { PT_TRACE_ME, "PT_TRACE_ME" }, |
| { PT_READ_I, "PT_READ_I" }, |
| { PT_READ_D, "PT_READ_D" }, |
| { PT_WRITE_I, "PT_WRITE_I" }, |
| { PT_WRITE_D, "PT_WRITE_D" }, |
| # ifdef PT_READ_U |
| { PT_READ_U, "PT_READ_U" }, |
| # endif |
| { PT_CONTINUE, "PT_CONTINUE" }, |
| { PT_KILL, "PT_KILL" }, |
| { PT_STEP, "PT_STEP" }, |
| { PT_ATTACH, "PT_ATTACH" }, |
| { PT_DETACH, "PT_DETACH" }, |
| { PT_GETREGS, "PT_GETREGS" }, |
| { PT_SETREGS, "PT_SETREGS" }, |
| { PT_GETFPREGS, "PT_GETFPREGS" }, |
| { PT_SETFPREGS, "PT_SETFPREGS" }, |
| { PT_GETDBREGS, "PT_GETDBREGS" }, |
| { PT_SETDBREGS, "PT_SETDBREGS" }, |
| # endif /* FREEBSD */ |
| { 0, NULL }, |
| }; |
| |
| # ifndef FREEBSD |
| # ifdef PTRACE_SETOPTIONS |
| static const struct xlat ptrace_setoptions_flags[] = { |
| # ifdef PTRACE_O_TRACESYSGOOD |
| { PTRACE_O_TRACESYSGOOD,"PTRACE_O_TRACESYSGOOD" }, |
| # endif |
| # ifdef PTRACE_O_TRACEFORK |
| { PTRACE_O_TRACEFORK, "PTRACE_O_TRACEFORK" }, |
| # endif |
| # ifdef PTRACE_O_TRACEVFORK |
| { PTRACE_O_TRACEVFORK, "PTRACE_O_TRACEVFORK" }, |
| # endif |
| # ifdef PTRACE_O_TRACECLONE |
| { PTRACE_O_TRACECLONE, "PTRACE_O_TRACECLONE" }, |
| # endif |
| # ifdef PTRACE_O_TRACEEXEC |
| { PTRACE_O_TRACEEXEC, "PTRACE_O_TRACEEXEC" }, |
| # endif |
| # ifdef PTRACE_O_TRACEVFORKDONE |
| { PTRACE_O_TRACEVFORKDONE,"PTRACE_O_TRACEVFORKDONE"}, |
| # endif |
| # ifdef PTRACE_O_TRACEEXIT |
| { PTRACE_O_TRACEEXIT, "PTRACE_O_TRACEEXIT" }, |
| # endif |
| { 0, NULL }, |
| }; |
| # endif /* PTRACE_SETOPTIONS */ |
| # endif /* !FREEBSD */ |
| |
| # ifndef FREEBSD |
| const struct xlat struct_user_offsets[] = { |
| # ifdef LINUX |
| # if defined(S390) || defined(S390X) |
| { PT_PSWMASK, "psw_mask" }, |
| { PT_PSWADDR, "psw_addr" }, |
| { PT_GPR0, "gpr0" }, |
| { PT_GPR1, "gpr1" }, |
| { PT_GPR2, "gpr2" }, |
| { PT_GPR3, "gpr3" }, |
| { PT_GPR4, "gpr4" }, |
| { PT_GPR5, "gpr5" }, |
| { PT_GPR6, "gpr6" }, |
| { PT_GPR7, "gpr7" }, |
| { PT_GPR8, "gpr8" }, |
| { PT_GPR9, "gpr9" }, |
| { PT_GPR10, "gpr10" }, |
| { PT_GPR11, "gpr11" }, |
| { PT_GPR12, "gpr12" }, |
| { PT_GPR13, "gpr13" }, |
| { PT_GPR14, "gpr14" }, |
| { PT_GPR15, "gpr15" }, |
| { PT_ACR0, "acr0" }, |
| { PT_ACR1, "acr1" }, |
| { PT_ACR2, "acr2" }, |
| { PT_ACR3, "acr3" }, |
| { PT_ACR4, "acr4" }, |
| { PT_ACR5, "acr5" }, |
| { PT_ACR6, "acr6" }, |
| { PT_ACR7, "acr7" }, |
| { PT_ACR8, "acr8" }, |
| { PT_ACR9, "acr9" }, |
| { PT_ACR10, "acr10" }, |
| { PT_ACR11, "acr11" }, |
| { PT_ACR12, "acr12" }, |
| { PT_ACR13, "acr13" }, |
| { PT_ACR14, "acr14" }, |
| { PT_ACR15, "acr15" }, |
| { PT_ORIGGPR2, "orig_gpr2" }, |
| { PT_FPC, "fpc" }, |
| # if defined(S390) |
| { PT_FPR0_HI, "fpr0.hi" }, |
| { PT_FPR0_LO, "fpr0.lo" }, |
| { PT_FPR1_HI, "fpr1.hi" }, |
| { PT_FPR1_LO, "fpr1.lo" }, |
| { PT_FPR2_HI, "fpr2.hi" }, |
| { PT_FPR2_LO, "fpr2.lo" }, |
| { PT_FPR3_HI, "fpr3.hi" }, |
| { PT_FPR3_LO, "fpr3.lo" }, |
| { PT_FPR4_HI, "fpr4.hi" }, |
| { PT_FPR4_LO, "fpr4.lo" }, |
| { PT_FPR5_HI, "fpr5.hi" }, |
| { PT_FPR5_LO, "fpr5.lo" }, |
| { PT_FPR6_HI, "fpr6.hi" }, |
| { PT_FPR6_LO, "fpr6.lo" }, |
| { PT_FPR7_HI, "fpr7.hi" }, |
| { PT_FPR7_LO, "fpr7.lo" }, |
| { PT_FPR8_HI, "fpr8.hi" }, |
| { PT_FPR8_LO, "fpr8.lo" }, |
| { PT_FPR9_HI, "fpr9.hi" }, |
| { PT_FPR9_LO, "fpr9.lo" }, |
| { PT_FPR10_HI, "fpr10.hi" }, |
| { PT_FPR10_LO, "fpr10.lo" }, |
| { PT_FPR11_HI, "fpr11.hi" }, |
| { PT_FPR11_LO, "fpr11.lo" }, |
| { PT_FPR12_HI, "fpr12.hi" }, |
| { PT_FPR12_LO, "fpr12.lo" }, |
| { PT_FPR13_HI, "fpr13.hi" }, |
| { PT_FPR13_LO, "fpr13.lo" }, |
| { PT_FPR14_HI, "fpr14.hi" }, |
| { PT_FPR14_LO, "fpr14.lo" }, |
| { PT_FPR15_HI, "fpr15.hi" }, |
| { PT_FPR15_LO, "fpr15.lo" }, |
| # endif |
| # if defined(S390X) |
| { PT_FPR0, "fpr0" }, |
| { PT_FPR1, "fpr1" }, |
| { PT_FPR2, "fpr2" }, |
| { PT_FPR3, "fpr3" }, |
| { PT_FPR4, "fpr4" }, |
| { PT_FPR5, "fpr5" }, |
| { PT_FPR6, "fpr6" }, |
| { PT_FPR7, "fpr7" }, |
| { PT_FPR8, "fpr8" }, |
| { PT_FPR9, "fpr9" }, |
| { PT_FPR10, "fpr10" }, |
| { PT_FPR11, "fpr11" }, |
| { PT_FPR12, "fpr12" }, |
| { PT_FPR13, "fpr13" }, |
| { PT_FPR14, "fpr14" }, |
| { PT_FPR15, "fpr15" }, |
| # endif |
| { PT_CR_9, "cr9" }, |
| { PT_CR_10, "cr10" }, |
| { PT_CR_11, "cr11" }, |
| { PT_IEEE_IP, "ieee_exception_ip" }, |
| # elif defined(SPARC) |
| /* XXX No support for these offsets yet. */ |
| # elif defined(HPPA) |
| /* XXX No support for these offsets yet. */ |
| # elif defined(POWERPC) |
| # ifndef PT_ORIG_R3 |
| # define PT_ORIG_R3 34 |
| # endif |
| # define REGSIZE (sizeof(unsigned long)) |
| { REGSIZE*PT_R0, "r0" }, |
| { REGSIZE*PT_R1, "r1" }, |
| { REGSIZE*PT_R2, "r2" }, |
| { REGSIZE*PT_R3, "r3" }, |
| { REGSIZE*PT_R4, "r4" }, |
| { REGSIZE*PT_R5, "r5" }, |
| { REGSIZE*PT_R6, "r6" }, |
| { REGSIZE*PT_R7, "r7" }, |
| { REGSIZE*PT_R8, "r8" }, |
| { REGSIZE*PT_R9, "r9" }, |
| { REGSIZE*PT_R10, "r10" }, |
| { REGSIZE*PT_R11, "r11" }, |
| { REGSIZE*PT_R12, "r12" }, |
| { REGSIZE*PT_R13, "r13" }, |
| { REGSIZE*PT_R14, "r14" }, |
| { REGSIZE*PT_R15, "r15" }, |
| { REGSIZE*PT_R16, "r16" }, |
| { REGSIZE*PT_R17, "r17" }, |
| { REGSIZE*PT_R18, "r18" }, |
| { REGSIZE*PT_R19, "r19" }, |
| { REGSIZE*PT_R20, "r20" }, |
| { REGSIZE*PT_R21, "r21" }, |
| { REGSIZE*PT_R22, "r22" }, |
| { REGSIZE*PT_R23, "r23" }, |
| { REGSIZE*PT_R24, "r24" }, |
| { REGSIZE*PT_R25, "r25" }, |
| { REGSIZE*PT_R26, "r26" }, |
| { REGSIZE*PT_R27, "r27" }, |
| { REGSIZE*PT_R28, "r28" }, |
| { REGSIZE*PT_R29, "r29" }, |
| { REGSIZE*PT_R30, "r30" }, |
| { REGSIZE*PT_R31, "r31" }, |
| { REGSIZE*PT_NIP, "NIP" }, |
| { REGSIZE*PT_MSR, "MSR" }, |
| { REGSIZE*PT_ORIG_R3, "ORIG_R3" }, |
| { REGSIZE*PT_CTR, "CTR" }, |
| { REGSIZE*PT_LNK, "LNK" }, |
| { REGSIZE*PT_XER, "XER" }, |
| { REGSIZE*PT_CCR, "CCR" }, |
| { REGSIZE*PT_FPR0, "FPR0" }, |
| # undef REGSIZE |
| # elif defined(ALPHA) |
| { 0, "r0" }, |
| { 1, "r1" }, |
| { 2, "r2" }, |
| { 3, "r3" }, |
| { 4, "r4" }, |
| { 5, "r5" }, |
| { 6, "r6" }, |
| { 7, "r7" }, |
| { 8, "r8" }, |
| { 9, "r9" }, |
| { 10, "r10" }, |
| { 11, "r11" }, |
| { 12, "r12" }, |
| { 13, "r13" }, |
| { 14, "r14" }, |
| { 15, "r15" }, |
| { 16, "r16" }, |
| { 17, "r17" }, |
| { 18, "r18" }, |
| { 19, "r19" }, |
| { 20, "r20" }, |
| { 21, "r21" }, |
| { 22, "r22" }, |
| { 23, "r23" }, |
| { 24, "r24" }, |
| { 25, "r25" }, |
| { 26, "r26" }, |
| { 27, "r27" }, |
| { 28, "r28" }, |
| { 29, "gp" }, |
| { 30, "fp" }, |
| { 31, "zero" }, |
| { 32, "fp0" }, |
| { 33, "fp" }, |
| { 34, "fp2" }, |
| { 35, "fp3" }, |
| { 36, "fp4" }, |
| { 37, "fp5" }, |
| { 38, "fp6" }, |
| { 39, "fp7" }, |
| { 40, "fp8" }, |
| { 41, "fp9" }, |
| { 42, "fp10" }, |
| { 43, "fp11" }, |
| { 44, "fp12" }, |
| { 45, "fp13" }, |
| { 46, "fp14" }, |
| { 47, "fp15" }, |
| { 48, "fp16" }, |
| { 49, "fp17" }, |
| { 50, "fp18" }, |
| { 51, "fp19" }, |
| { 52, "fp20" }, |
| { 53, "fp21" }, |
| { 54, "fp22" }, |
| { 55, "fp23" }, |
| { 56, "fp24" }, |
| { 57, "fp25" }, |
| { 58, "fp26" }, |
| { 59, "fp27" }, |
| { 60, "fp28" }, |
| { 61, "fp29" }, |
| { 62, "fp30" }, |
| { 63, "fp31" }, |
| { 64, "pc" }, |
| # elif defined(IA64) |
| { PT_F32, "f32" }, { PT_F33, "f33" }, { PT_F34, "f34" }, |
| { PT_F35, "f35" }, { PT_F36, "f36" }, { PT_F37, "f37" }, |
| { PT_F38, "f38" }, { PT_F39, "f39" }, { PT_F40, "f40" }, |
| { PT_F41, "f41" }, { PT_F42, "f42" }, { PT_F43, "f43" }, |
| { PT_F44, "f44" }, { PT_F45, "f45" }, { PT_F46, "f46" }, |
| { PT_F47, "f47" }, { PT_F48, "f48" }, { PT_F49, "f49" }, |
| { PT_F50, "f50" }, { PT_F51, "f51" }, { PT_F52, "f52" }, |
| { PT_F53, "f53" }, { PT_F54, "f54" }, { PT_F55, "f55" }, |
| { PT_F56, "f56" }, { PT_F57, "f57" }, { PT_F58, "f58" }, |
| { PT_F59, "f59" }, { PT_F60, "f60" }, { PT_F61, "f61" }, |
| { PT_F62, "f62" }, { PT_F63, "f63" }, { PT_F64, "f64" }, |
| { PT_F65, "f65" }, { PT_F66, "f66" }, { PT_F67, "f67" }, |
| { PT_F68, "f68" }, { PT_F69, "f69" }, { PT_F70, "f70" }, |
| { PT_F71, "f71" }, { PT_F72, "f72" }, { PT_F73, "f73" }, |
| { PT_F74, "f74" }, { PT_F75, "f75" }, { PT_F76, "f76" }, |
| { PT_F77, "f77" }, { PT_F78, "f78" }, { PT_F79, "f79" }, |
| { PT_F80, "f80" }, { PT_F81, "f81" }, { PT_F82, "f82" }, |
| { PT_F83, "f83" }, { PT_F84, "f84" }, { PT_F85, "f85" }, |
| { PT_F86, "f86" }, { PT_F87, "f87" }, { PT_F88, "f88" }, |
| { PT_F89, "f89" }, { PT_F90, "f90" }, { PT_F91, "f91" }, |
| { PT_F92, "f92" }, { PT_F93, "f93" }, { PT_F94, "f94" }, |
| { PT_F95, "f95" }, { PT_F96, "f96" }, { PT_F97, "f97" }, |
| { PT_F98, "f98" }, { PT_F99, "f99" }, { PT_F100, "f100" }, |
| { PT_F101, "f101" }, { PT_F102, "f102" }, { PT_F103, "f103" }, |
| { PT_F104, "f104" }, { PT_F105, "f105" }, { PT_F106, "f106" }, |
| { PT_F107, "f107" }, { PT_F108, "f108" }, { PT_F109, "f109" }, |
| { PT_F110, "f110" }, { PT_F111, "f111" }, { PT_F112, "f112" }, |
| { PT_F113, "f113" }, { PT_F114, "f114" }, { PT_F115, "f115" }, |
| { PT_F116, "f116" }, { PT_F117, "f117" }, { PT_F118, "f118" }, |
| { PT_F119, "f119" }, { PT_F120, "f120" }, { PT_F121, "f121" }, |
| { PT_F122, "f122" }, { PT_F123, "f123" }, { PT_F124, "f124" }, |
| { PT_F125, "f125" }, { PT_F126, "f126" }, { PT_F127, "f127" }, |
| /* switch stack: */ |
| { PT_F2, "f2" }, { PT_F3, "f3" }, { PT_F4, "f4" }, |
| { PT_F5, "f5" }, { PT_F10, "f10" }, { PT_F11, "f11" }, |
| { PT_F12, "f12" }, { PT_F13, "f13" }, { PT_F14, "f14" }, |
| { PT_F15, "f15" }, { PT_F16, "f16" }, { PT_F17, "f17" }, |
| { PT_F18, "f18" }, { PT_F19, "f19" }, { PT_F20, "f20" }, |
| { PT_F21, "f21" }, { PT_F22, "f22" }, { PT_F23, "f23" }, |
| { PT_F24, "f24" }, { PT_F25, "f25" }, { PT_F26, "f26" }, |
| { PT_F27, "f27" }, { PT_F28, "f28" }, { PT_F29, "f29" }, |
| { PT_F30, "f30" }, { PT_F31, "f31" }, { PT_R4, "r4" }, |
| { PT_R5, "r5" }, { PT_R6, "r6" }, { PT_R7, "r7" }, |
| { PT_B1, "b1" }, { PT_B2, "b2" }, { PT_B3, "b3" }, |
| { PT_B4, "b4" }, { PT_B5, "b5" }, |
| { PT_AR_EC, "ar.ec" }, { PT_AR_LC, "ar.lc" }, |
| /* pt_regs */ |
| { PT_CR_IPSR, "psr" }, { PT_CR_IIP, "ip" }, |
| { PT_CFM, "cfm" }, { PT_AR_UNAT, "ar.unat" }, |
| { PT_AR_PFS, "ar.pfs" }, { PT_AR_RSC, "ar.rsc" }, |
| { PT_AR_RNAT, "ar.rnat" }, { PT_AR_BSPSTORE, "ar.bspstore" }, |
| { PT_PR, "pr" }, { PT_B6, "b6" }, { PT_AR_BSP, "ar.bsp" }, |
| { PT_R1, "r1" }, { PT_R2, "r2" }, { PT_R3, "r3" }, |
| { PT_R12, "r12" }, { PT_R13, "r13" }, { PT_R14, "r14" }, |
| { PT_R15, "r15" }, { PT_R8, "r8" }, { PT_R9, "r9" }, |
| { PT_R10, "r10" }, { PT_R11, "r11" }, { PT_R16, "r16" }, |
| { PT_R17, "r17" }, { PT_R18, "r18" }, { PT_R19, "r19" }, |
| { PT_R20, "r20" }, { PT_R21, "r21" }, { PT_R22, "r22" }, |
| { PT_R23, "r23" }, { PT_R24, "r24" }, { PT_R25, "r25" }, |
| { PT_R26, "r26" }, { PT_R27, "r27" }, { PT_R28, "r28" }, |
| { PT_R29, "r29" }, { PT_R30, "r30" }, { PT_R31, "r31" }, |
| { PT_AR_CCV, "ar.ccv" }, { PT_AR_FPSR, "ar.fpsr" }, |
| { PT_B0, "b0" }, { PT_B7, "b7" }, { PT_F6, "f6" }, |
| { PT_F7, "f7" }, { PT_F8, "f8" }, { PT_F9, "f9" }, |
| # ifdef PT_AR_CSD |
| { PT_AR_CSD, "ar.csd" }, |
| # endif |
| # ifdef PT_AR_SSD |
| { PT_AR_SSD, "ar.ssd" }, |
| # endif |
| { PT_DBR, "dbr" }, { PT_IBR, "ibr" }, { PT_PMD, "pmd" }, |
| # elif defined(I386) |
| { 4*EBX, "4*EBX" }, |
| { 4*ECX, "4*ECX" }, |
| { 4*EDX, "4*EDX" }, |
| { 4*ESI, "4*ESI" }, |
| { 4*EDI, "4*EDI" }, |
| { 4*EBP, "4*EBP" }, |
| { 4*EAX, "4*EAX" }, |
| { 4*DS, "4*DS" }, |
| { 4*ES, "4*ES" }, |
| { 4*FS, "4*FS" }, |
| { 4*GS, "4*GS" }, |
| { 4*ORIG_EAX, "4*ORIG_EAX" }, |
| { 4*EIP, "4*EIP" }, |
| { 4*CS, "4*CS" }, |
| { 4*EFL, "4*EFL" }, |
| { 4*UESP, "4*UESP" }, |
| { 4*SS, "4*SS" }, |
| # elif defined(X86_64) |
| { 8*R15, "8*R15" }, |
| { 8*R14, "8*R14" }, |
| { 8*R13, "8*R13" }, |
| { 8*R12, "8*R12" }, |
| { 8*RBP, "8*RBP" }, |
| { 8*RBX, "8*RBX" }, |
| { 8*R11, "8*R11" }, |
| { 8*R10, "8*R10" }, |
| { 8*R9, "8*R9" }, |
| { 8*R8, "8*R8" }, |
| { 8*RAX, "8*RAX" }, |
| { 8*RCX, "8*RCX" }, |
| { 8*RDX, "8*RDX" }, |
| { 8*RSI, "8*RSI" }, |
| { 8*RDI, "8*RDI" }, |
| { 8*ORIG_RAX, "8*ORIG_RAX" }, |
| { 8*RIP, "8*RIP" }, |
| { 8*CS, "8*CS" }, |
| { 8*EFLAGS, "8*EFL" }, |
| { 8*RSP, "8*RSP" }, |
| { 8*SS, "8*SS" }, |
| # elif defined(M68K) |
| { 4*PT_D1, "4*PT_D1" }, |
| { 4*PT_D2, "4*PT_D2" }, |
| { 4*PT_D3, "4*PT_D3" }, |
| { 4*PT_D4, "4*PT_D4" }, |
| { 4*PT_D5, "4*PT_D5" }, |
| { 4*PT_D6, "4*PT_D6" }, |
| { 4*PT_D7, "4*PT_D7" }, |
| { 4*PT_A0, "4*PT_A0" }, |
| { 4*PT_A1, "4*PT_A1" }, |
| { 4*PT_A2, "4*PT_A2" }, |
| { 4*PT_A3, "4*PT_A3" }, |
| { 4*PT_A4, "4*PT_A4" }, |
| { 4*PT_A5, "4*PT_A5" }, |
| { 4*PT_A6, "4*PT_A6" }, |
| { 4*PT_D0, "4*PT_D0" }, |
| { 4*PT_USP, "4*PT_USP" }, |
| { 4*PT_ORIG_D0, "4*PT_ORIG_D0" }, |
| { 4*PT_SR, "4*PT_SR" }, |
| { 4*PT_PC, "4*PT_PC" }, |
| # elif defined(SH) |
| { 4*REG_REG0, "4*REG_REG0" }, |
| { 4*(REG_REG0+1), "4*REG_REG1" }, |
| { 4*(REG_REG0+2), "4*REG_REG2" }, |
| { 4*(REG_REG0+3), "4*REG_REG3" }, |
| { 4*(REG_REG0+4), "4*REG_REG4" }, |
| { 4*(REG_REG0+5), "4*REG_REG5" }, |
| { 4*(REG_REG0+6), "4*REG_REG6" }, |
| { 4*(REG_REG0+7), "4*REG_REG7" }, |
| { 4*(REG_REG0+8), "4*REG_REG8" }, |
| { 4*(REG_REG0+9), "4*REG_REG9" }, |
| { 4*(REG_REG0+10), "4*REG_REG10" }, |
| { 4*(REG_REG0+11), "4*REG_REG11" }, |
| { 4*(REG_REG0+12), "4*REG_REG12" }, |
| { 4*(REG_REG0+13), "4*REG_REG13" }, |
| { 4*(REG_REG0+14), "4*REG_REG14" }, |
| { 4*REG_REG15, "4*REG_REG15" }, |
| { 4*REG_PC, "4*REG_PC" }, |
| { 4*REG_PR, "4*REG_PR" }, |
| { 4*REG_SR, "4*REG_SR" }, |
| { 4*REG_GBR, "4*REG_GBR" }, |
| { 4*REG_MACH, "4*REG_MACH" }, |
| { 4*REG_MACL, "4*REG_MACL" }, |
| { 4*REG_SYSCALL, "4*REG_SYSCALL" }, |
| { 4*REG_FPUL, "4*REG_FPUL" }, |
| { 4*REG_FPREG0, "4*REG_FPREG0" }, |
| { 4*(REG_FPREG0+1), "4*REG_FPREG1" }, |
| { 4*(REG_FPREG0+2), "4*REG_FPREG2" }, |
| { 4*(REG_FPREG0+3), "4*REG_FPREG3" }, |
| { 4*(REG_FPREG0+4), "4*REG_FPREG4" }, |
| { 4*(REG_FPREG0+5), "4*REG_FPREG5" }, |
| { 4*(REG_FPREG0+6), "4*REG_FPREG6" }, |
| { 4*(REG_FPREG0+7), "4*REG_FPREG7" }, |
| { 4*(REG_FPREG0+8), "4*REG_FPREG8" }, |
| { 4*(REG_FPREG0+9), "4*REG_FPREG9" }, |
| { 4*(REG_FPREG0+10), "4*REG_FPREG10" }, |
| { 4*(REG_FPREG0+11), "4*REG_FPREG11" }, |
| { 4*(REG_FPREG0+12), "4*REG_FPREG12" }, |
| { 4*(REG_FPREG0+13), "4*REG_FPREG13" }, |
| { 4*(REG_FPREG0+14), "4*REG_FPREG14" }, |
| { 4*REG_FPREG15, "4*REG_FPREG15" }, |
| # ifdef REG_XDREG0 |
| { 4*REG_XDREG0, "4*REG_XDREG0" }, |
| { 4*(REG_XDREG0+2), "4*REG_XDREG2" }, |
| { 4*(REG_XDREG0+4), "4*REG_XDREG4" }, |
| { 4*(REG_XDREG0+6), "4*REG_XDREG6" }, |
| { 4*(REG_XDREG0+8), "4*REG_XDREG8" }, |
| { 4*(REG_XDREG0+10), "4*REG_XDREG10" }, |
| { 4*(REG_XDREG0+12), "4*REG_XDREG12" }, |
| { 4*REG_XDREG14, "4*REG_XDREG14" }, |
| # endif |
| { 4*REG_FPSCR, "4*REG_FPSCR" }, |
| # elif defined(SH64) |
| { 0, "PC(L)" }, |
| { 4, "PC(U)" }, |
| { 8, "SR(L)" }, |
| { 12, "SR(U)" }, |
| { 16, "syscall no.(L)" }, |
| { 20, "syscall_no.(U)" }, |
| { 24, "R0(L)" }, |
| { 28, "R0(U)" }, |
| { 32, "R1(L)" }, |
| { 36, "R1(U)" }, |
| { 40, "R2(L)" }, |
| { 44, "R2(U)" }, |
| { 48, "R3(L)" }, |
| { 52, "R3(U)" }, |
| { 56, "R4(L)" }, |
| { 60, "R4(U)" }, |
| { 64, "R5(L)" }, |
| { 68, "R5(U)" }, |
| { 72, "R6(L)" }, |
| { 76, "R6(U)" }, |
| { 80, "R7(L)" }, |
| { 84, "R7(U)" }, |
| { 88, "R8(L)" }, |
| { 92, "R8(U)" }, |
| { 96, "R9(L)" }, |
| { 100, "R9(U)" }, |
| { 104, "R10(L)" }, |
| { 108, "R10(U)" }, |
| { 112, "R11(L)" }, |
| { 116, "R11(U)" }, |
| { 120, "R12(L)" }, |
| { 124, "R12(U)" }, |
| { 128, "R13(L)" }, |
| { 132, "R13(U)" }, |
| { 136, "R14(L)" }, |
| { 140, "R14(U)" }, |
| { 144, "R15(L)" }, |
| { 148, "R15(U)" }, |
| { 152, "R16(L)" }, |
| { 156, "R16(U)" }, |
| { 160, "R17(L)" }, |
| { 164, "R17(U)" }, |
| { 168, "R18(L)" }, |
| { 172, "R18(U)" }, |
| { 176, "R19(L)" }, |
| { 180, "R19(U)" }, |
| { 184, "R20(L)" }, |
| { 188, "R20(U)" }, |
| { 192, "R21(L)" }, |
| { 196, "R21(U)" }, |
| { 200, "R22(L)" }, |
| { 204, "R22(U)" }, |
| { 208, "R23(L)" }, |
| { 212, "R23(U)" }, |
| { 216, "R24(L)" }, |
| { 220, "R24(U)" }, |
| { 224, "R25(L)" }, |
| { 228, "R25(U)" }, |
| { 232, "R26(L)" }, |
| { 236, "R26(U)" }, |
| { 240, "R27(L)" }, |
| { 244, "R27(U)" }, |
| { 248, "R28(L)" }, |
| { 252, "R28(U)" }, |
| { 256, "R29(L)" }, |
| { 260, "R29(U)" }, |
| { 264, "R30(L)" }, |
| { 268, "R30(U)" }, |
| { 272, "R31(L)" }, |
| { 276, "R31(U)" }, |
| { 280, "R32(L)" }, |
| { 284, "R32(U)" }, |
| { 288, "R33(L)" }, |
| { 292, "R33(U)" }, |
| { 296, "R34(L)" }, |
| { 300, "R34(U)" }, |
| { 304, "R35(L)" }, |
| { 308, "R35(U)" }, |
| { 312, "R36(L)" }, |
| { 316, "R36(U)" }, |
| { 320, "R37(L)" }, |
| { 324, "R37(U)" }, |
| { 328, "R38(L)" }, |
| { 332, "R38(U)" }, |
| { 336, "R39(L)" }, |
| { 340, "R39(U)" }, |
| { 344, "R40(L)" }, |
| { 348, "R40(U)" }, |
| { 352, "R41(L)" }, |
| { 356, "R41(U)" }, |
| { 360, "R42(L)" }, |
| { 364, "R42(U)" }, |
| { 368, "R43(L)" }, |
| { 372, "R43(U)" }, |
| { 376, "R44(L)" }, |
| { 380, "R44(U)" }, |
| { 384, "R45(L)" }, |
| { 388, "R45(U)" }, |
| { 392, "R46(L)" }, |
| { 396, "R46(U)" }, |
| { 400, "R47(L)" }, |
| { 404, "R47(U)" }, |
| { 408, "R48(L)" }, |
| { 412, "R48(U)" }, |
| { 416, "R49(L)" }, |
| { 420, "R49(U)" }, |
| { 424, "R50(L)" }, |
| { 428, "R50(U)" }, |
| { 432, "R51(L)" }, |
| { 436, "R51(U)" }, |
| { 440, "R52(L)" }, |
| { 444, "R52(U)" }, |
| { 448, "R53(L)" }, |
| { 452, "R53(U)" }, |
| { 456, "R54(L)" }, |
| { 460, "R54(U)" }, |
| { 464, "R55(L)" }, |
| { 468, "R55(U)" }, |
| { 472, "R56(L)" }, |
| { 476, "R56(U)" }, |
| { 480, "R57(L)" }, |
| { 484, "R57(U)" }, |
| { 488, "R58(L)" }, |
| { 492, "R58(U)" }, |
| { 496, "R59(L)" }, |
| { 500, "R59(U)" }, |
| { 504, "R60(L)" }, |
| { 508, "R60(U)" }, |
| { 512, "R61(L)" }, |
| { 516, "R61(U)" }, |
| { 520, "R62(L)" }, |
| { 524, "R62(U)" }, |
| { 528, "TR0(L)" }, |
| { 532, "TR0(U)" }, |
| { 536, "TR1(L)" }, |
| { 540, "TR1(U)" }, |
| { 544, "TR2(L)" }, |
| { 548, "TR2(U)" }, |
| { 552, "TR3(L)" }, |
| { 556, "TR3(U)" }, |
| { 560, "TR4(L)" }, |
| { 564, "TR4(U)" }, |
| { 568, "TR5(L)" }, |
| { 572, "TR5(U)" }, |
| { 576, "TR6(L)" }, |
| { 580, "TR6(U)" }, |
| { 584, "TR7(L)" }, |
| { 588, "TR7(U)" }, |
| /* This entry is in case pt_regs contains dregs (depends on |
| the kernel build options). */ |
| { uoff(regs), "offsetof(struct user, regs)" }, |
| { uoff(fpu), "offsetof(struct user, fpu)" }, |
| # elif defined(ARM) |
| { uoff(regs.ARM_r0), "r0" }, |
| { uoff(regs.ARM_r1), "r1" }, |
| { uoff(regs.ARM_r2), "r2" }, |
| { uoff(regs.ARM_r3), "r3" }, |
| { uoff(regs.ARM_r4), "r4" }, |
| { uoff(regs.ARM_r5), "r5" }, |
| { uoff(regs.ARM_r6), "r6" }, |
|