linux C语言调试工具

/* * 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: process.c,v 1.104 2007/01/11 22:05:05 ldv Exp $ */ #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 #if HAVE_ASM_REG_H #if defined (SPARC) || defined (SPARC64) # define fpq kernel_fpq # define fq kernel_fq # define fpu kernel_fpu #endif /* SPARC || SPARC64 */ #include <asm/reg.h> #if defined (SPARC) || defined (SPARC64) # undef fpq # undef fq # undef fpu #endif /* SPARC || SPARC64 */ #endif /* HAVE_ASM_REG_H */ #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 #if defined 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 #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> #endif #ifndef WCOREDUMP #define WCOREDUMP(status) ((status) & 0200) #endif /* WTA: this was `&& !defined(LINUXSPARC)', this seems unneeded though? */ #if defined(HAVE_PRCTL) 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 #if defined(PR_SET_PDEATHSIG) { PR_SET_PDEATHSIG, "PR_SET_PDEATHSIG" }, #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_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_KEEP_CAPS" }, #endif #ifdef PR_SET_KEEPCAPS { PR_SET_KEEPCAPS, "PR_SET_KEEP_CAPS" }, #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_DEATHSIG case PR_GET_PDEATHSIG: 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 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: for (i=1; i<tcp->u_nargs; i++) tprintf(", %#lx", tcp->u_arg[i]); break; #endif #ifdef PR_SET_UNALIGN case PR_SET_UNALIGN: break; #endif #ifdef PR_GET_UNALIGN case PR_GET_UNALIGN: { int ctl; umove(tcp, tcp->u_arg[1], &ctl); tcp->auxstr = unalignctl_string(ctl); return RVAL_STR; } #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 /* AL