/*--------------------------------------------------------------------*/ /*--- Platform-specific syscalls stuff. syswrap-mips32-linux.c ----*/ /*--------------------------------------------------------------------*/ /* This file is part of Valgrind, a dynamic binary instrumentation framework. Copyright (C) 2010-2015 RT-RK mips-valgrind@rt-rk.com This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. The GNU General Public License is contained in the file COPYING. */ #if defined(VGP_mips32_linux) #include "pub_core_basics.h" #include "pub_core_vki.h" #include "pub_core_vkiscnums.h" #include "pub_core_threadstate.h" #include "pub_core_aspacemgr.h" #include "pub_core_debuglog.h" #include "pub_core_libcbase.h" #include "pub_core_libcassert.h" #include "pub_core_libcprint.h" #include "pub_core_libcproc.h" #include "pub_core_libcsignal.h" #include "pub_core_options.h" #include "pub_core_scheduler.h" #include "pub_core_sigframe.h" // For VG_(sigframe_destroy)() #include "pub_core_signals.h" #include "pub_core_syscall.h" #include "pub_core_syswrap.h" #include "pub_core_tooliface.h" #include "pub_core_transtab.h" // VG_(discard_translations) #include "priv_types_n_macros.h" #include "priv_syswrap-generic.h" /* for decls of generic wrappers */ #include "priv_syswrap-linux.h" /* for decls of linux-ish wrappers */ #include "priv_syswrap-main.h" #include "pub_core_debuginfo.h" // VG_(di_notify_*) #include "pub_core_xarray.h" #include "pub_core_clientstate.h" // VG_(brk_base), VG_(brk_limit) #include "pub_core_errormgr.h" #include "pub_core_gdbserver.h" // VG_(gdbserver) #include "pub_core_libcfile.h" #include "pub_core_machine.h" // VG_(get_SP) #include "pub_core_mallocfree.h" #include "pub_core_stacktrace.h" // For VG_(get_and_pp_StackTrace)() #include "pub_core_ume.h" #include "priv_syswrap-generic.h" #include "config.h" #include <errno.h> /* --------------------------------------------------------------------- clone() handling ------------------------------------------------------------------ */ /* Call f(arg1), but first switch stacks, using 'stack' as the new stack, and use 'retaddr' as f's return-to address. Also, clear all the integer registers before entering f.*/ __attribute__ ((noreturn)) void ML_ (call_on_new_stack_0_1) (Addr stack, Addr retaddr, void (*f) (Word), Word arg1); // a0 = stack // a1 = retaddr // a2 = f // a3 = arg1 asm ( ".text\n" ".globl vgModuleLocal_call_on_new_stack_0_1\n" "vgModuleLocal_call_on_new_stack_0_1:\n" " move $29, $4\n\t" // stack to %sp " move $25, $6\n\t" // f to t9/$25 " move $4, $7\n\t" // arg1 to $a0 " li $2, 0\n\t" // zero all GP regs " li $3, 0\n\t" " li $5, 0\n\t" " li $6, 0\n\t" " li $7, 0\n\t" " li $12, 0\n\t" " li $13, 0\n\t" " li $14, 0\n\t" " li $15, 0\n\t" " li $16, 0\n\t" " li $17, 0\n\t" " li $18, 0\n\t" " li $19, 0\n\t" " li $20, 0\n\t" " li $21, 0\n\t" " li $22, 0\n\t" " li $23, 0\n\t" " li $24, 0\n\t" " jr $25\n\t" // jump to dst " break 0x7\n" // should never get here ".previous\n" ); /* Perform a clone system call. clone is strange because it has fork()-like return-twice semantics, so it needs special handling here. Upon entry, we have: int (fn)(void*) in $a0 0 void* child_stack in $a1 4 int flags in $a2 8 void* arg in $a3 12 pid_t* child_tid in stack 16 pid_t* parent_tid in stack 20 void* tls_ptr in stack 24 System call requires: int $__NR_clone in $v0 int flags in $a0 0 void* child_stack in $a1 4 pid_t* parent_tid in $a2 8 void* tls_ptr in $a3 12 pid_t* child_tid in stack 16 int clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg, void *parent_tidptr, void *tls, void *child_tidptr) Returns an Int encoded in the linux-mips way, not a SysRes. */ #define __NR_CLONE VG_STRINGIFY(__NR_clone) #define __NR_EXIT VG_STRINGIFY(__NR_exit) //extern UInt do_syscall_clone_mips_linux (Word (*fn) (void *), //a0 0 32 void *stack, //a1 4 36 Int flags, //a2 8 40 void *arg, //a3 12 44 Int * child_tid, //stack 16 48 Int * parent_tid, //stack 20 52 Int tls); //stack 24 56 asm ( ".text\n" " .globl do_syscall_clone_mips_linux\n" " do_syscall_clone_mips_linux:\n" " subu $29,$29,32\n\t" " sw $31, 0($29)\n\t" " sw $2, 4($29)\n\t" " sw $3, 8($29)\n\t" " sw $30, 12($29)\n\t" " sw $28, 28($29)\n\t" /* set up child stack with function and arg */ /* syscall arg 2 child_stack is already in a1 */ " subu $5, $5, 32\n\t" /* make space on stack */ " sw $4, 0($5)\n\t" /* fn */ " sw $7, 4($5)\n\t" /* fn arg */ " sw $6, 8($5)\n\t" /* get other args to clone */ " move $4, $a2\n\t" /* a0 = flags */ " lw $6, 52($29)\n\t" /* a2 = parent_tid */ " lw $7, 48($29)\n\t" /* a3 = child_tid */ " sw $7, 16($29)\n\t" /* 16(sp) = child_tid */ " lw $7, 56($29)\n\t" /* a3 = tls_ptr */ /* do the system call */ " li $2, " __NR_CLONE "\n\t" /* __NR_clone */ " syscall\n\t" " nop\n\t" " bnez $7, .Lerror\n\t" " nop\n\t" " beqz $2, .Lstart\n\t" " nop\n\t" " lw $31, 0($sp)\n\t" " nop\n\t" " lw $30, 12($sp)\n\t" " nop\n\t" " addu $29,$29,32\n\t" /* free stack */ " nop\n\t" " jr $31\n\t" " nop\n\t" ".Lerror:\n\t" " li $31, 5\n\t" " jr $31\n\t" " nop\n\t" ".Lstart:\n\t" " lw $4, 4($29)\n\t" " nop\n\t" " lw $25, 0($29)\n\t" " nop\n\t" " jalr $25\n\t" " nop\n\t" " move $4, $2\n\t" /* retval from fn is in $v0 */ " li $2, " __NR_EXIT "\n\t" /* NR_exit */ " syscall\n\t" " nop\n\t" " .previous\n" ); #undef __NR_CLONE #undef __NR_EXIT // forward declarations static void setup_child (ThreadArchState *, ThreadArchState *); static SysRes sys_set_tls (ThreadId tid, Addr tlsptr); static SysRes mips_PRE_sys_mmap (ThreadId tid, UWord arg1, UWord arg2, UWord arg3, UWord arg4, UWord arg5, Off64T arg6); /* When a client clones, we need to keep track of the new thread. This means: 1. allocate a ThreadId+ThreadState+stack for the thread 2. initialize the thread's new VCPU state 3. create the thread using the same args as the client requested, but using the scheduler entrypoint for IP, and a separate stack for SP. */ static SysRes do_clone (ThreadId ptid, UInt flags, Addr sp, Int * parent_tidptr, Int * child_tidptr, Addr child_tls) { const Bool debug = False; ThreadId ctid = VG_ (alloc_ThreadState) (); ThreadState * ptst = VG_ (get_ThreadState) (ptid); ThreadState * ctst = VG_ (get_ThreadState) (ctid); UInt ret = 0; UWord * stack; SysRes res; vki_sigset_t blockall, savedmask; VG_ (sigfillset) (&blockall); vg_assert (VG_ (is_running_thread) (ptid)); vg_assert (VG_ (is_valid_tid) (ctid)); stack = (UWord *) ML_ (allocstack) (ctid); if (stack == NULL) { res = VG_ (mk_SysRes_Error) (VKI_ENOMEM); goto out; } setup_child (&ctst->arch, &ptst->arch); /* on MIPS we need to set V0 and A3 to zero */ ctst->arch.vex.guest_r2 = 0; ctst->arch.vex.guest_r7 = 0; if (sp != 0) ctst->arch.vex.guest_r29 = sp; ctst->os_state.parent = ptid; ctst->sig_mask = ptst->sig_mask; ctst->tmp_sig_mask = ptst->sig_mask; /* Start the child with its threadgroup being the same as the parent's. This is so that any exit_group calls that happen after the child is created but before it sets its os_state.threadgroup field for real (in thread_wrapper in syswrap-linux.c), really kill the new thread. a.k.a this avoids a race condition in which the thread is unkillable (via exit_group) because its threadgroup is not set. The race window is probably only a few hundred or a few thousand cycles long. See #226116. */ ctst->os_state.threadgroup = ptst->os_state.threadgroup; ML_(guess_and_register_stack) (sp, ctst); VG_TRACK (pre_thread_ll_create, ptid, ctid); if (flags & VKI_CLONE_SETTLS) { if (debug) VG_(printf)("clone child has SETTLS: tls at %#lx\n", child_tls); ctst->arch.vex.guest_r27 = child_tls; res = sys_set_tls(ctid, child_tls); if (sr_isError(res)) goto out; ctst->arch.vex.guest_r27 = child_tls; } flags &= ~VKI_CLONE_SETTLS; VG_ (sigprocmask) (VKI_SIG_SETMASK, &blockall, &savedmask); /* Create the new thread */ ret = do_syscall_clone_mips_linux (ML_ (start_thread_NORETURN), stack, flags, &VG_ (threads)[ctid], child_tidptr, parent_tidptr, 0 /*child_tls*/); /* High half word64 is syscall return value. Low half is the entire CR, from which we need to extract CR0.SO. */ if (debug) VG_(printf)("ret: 0x%x\n", ret); res = VG_ (mk_SysRes_mips32_linux) (/*val */ ret, 0, /*errflag */ 0); VG_ (sigprocmask) (VKI_SIG_SETMASK, &savedmask, NULL); out: if (sr_isError (res)) { VG_(cleanup_thread) (&ctst->arch); ctst->status = VgTs_Empty; VG_TRACK (pre_thread_ll_exit, ctid); } ptst->arch.vex.guest_r2 = 0; return res; } /* --------------------------------------------------------------------- More thread stuff ------------------------------------------------------------------ */ // MIPS doesn't have any architecture specific thread stuff that // needs to be cleaned up da li ????!!!!??? void VG_ (cleanup_thread) (ThreadArchState * arch) { } void setup_child ( /*OUT*/ ThreadArchState * child, /*IN*/ ThreadArchState * parent) { /* We inherit our parent's guest state. */ child->vex = parent->vex; child->vex_shadow1 = parent->vex_shadow1; child->vex_shadow2 = parent->vex_shadow2; } SysRes sys_set_tls ( ThreadId tid, Addr tlsptr ) { VG_(threads)[tid].arch.vex.guest_ULR = tlsptr; return VG_(mk_SysRes_Success)( 0 ); } /* --------------------------------------------------------------------- mips handler for mmap and mmap2 ------------------------------------------------------------------ */ static void notify_core_of_mmap(Addr a, SizeT len, UInt prot, UInt flags, Int fd, Off64T offset) { Bool d; /* 'a' is the return value from a real kernel mmap, hence: */ vg_assert(VG_IS_PAGE_ALIGNED(a)); /* whereas len is whatever the syscall supplied. So: */ len = VG_PGROUNDUP(len); d = VG_(am_notify_client_mmap)( a, len, prot, flags, fd, offset ); if (d) VG_(discard_translations)( a, (ULong)len, "notify_core_of_mmap" ); } static void notify_tool_of_mmap(Addr a, SizeT len, UInt prot, ULong di_handle) { Bool rr, ww, xx; /* 'a' is the return value from a real kernel mmap, hence: */ vg_assert(VG_IS_PAGE_ALIGNED(a)); /* whereas len is whatever the syscall supplied. So: */ len = VG_PGROUNDUP(len); rr = toBool(prot & VKI_PROT_READ); ww = toBool(prot & VKI_PROT_WRITE); xx = toBool(prot & VKI_PROT_EXEC); VG_TRACK( new_mem_mmap, a, len, rr, ww, xx, di_handle ); } /* Based on ML_(generic_PRE_sys_mmap) from syswrap-generic.c. If we are trying to do mmap with VKI_MAP_SHARED flag we need to align the start address on VKI_SHMLBA like we did in VG_(am_mmap_file_float_valgrind_flags) */ static SysRes mips_PRE_sys_mmap(ThreadId tid, UWord arg1, UWord arg2, UWord arg3, UWord arg4, UWord arg5, Off64T arg6) { Addr advised; SysRes sres; MapRequest mreq; Bool mreq_ok; if (arg2 == 0) { /* SuSV3 says: If len is zero, mmap() shall fail and no mapping shall be established. */ return VG_(mk_SysRes_Error)( VKI_EINVAL ); } if (!VG_IS_PAGE_ALIGNED(arg1)) { /* zap any misaligned addresses. */ /* SuSV3 says misaligned addresses only cause the MAP_FIXED case to fail. Here, we catch them all. */ return VG_(mk_SysRes_Error)( VKI_EINVAL ); } if (!VG_IS_PAGE_ALIGNED(arg6)) { /* zap any misaligned offsets. */ /* SuSV3 says: The off argument is constrained to be aligned and sized according to the value returned by sysconf() when passed _SC_PAGESIZE or _SC_PAGE_SIZE. */ return VG_(mk_SysRes_Error)( VKI_EINVAL ); } /* Figure out what kind of allocation constraints there are (fixed/hint/any), and ask aspacem what we should do. */ mreq.start = arg1; mreq.len = arg2; if (arg4 & VKI_MAP_FIXED) { mreq.rkind = MFixed; } else if (arg1 != 0) { mreq.rkind = MHint; } else { mreq.rkind = MAny; } if ((VKI_SHMLBA > VKI_PAGE_SIZE) && (VKI_MAP_SHARED & arg4) && !(VKI_MAP_FIXED & arg4)) mreq.len = arg2 + VKI_SHMLBA - VKI_PAGE_SIZE; /* Enquire ... */ advised = VG_(am_get_advisory)( &mreq, True/*client*/, &mreq_ok ); if ((VKI_SHMLBA > VKI_PAGE_SIZE) && (VKI_MAP_SHARED & arg4) && !(VKI_MAP_FIXED & arg4)) advised = VG_ROUNDUP(advised, VKI_SHMLBA); if (!mreq_ok) { /* Our request was bounced, so we'd better fail. */ return VG_(mk_SysRes_Error)( VKI_EINVAL ); } /* Otherwise we're OK (so far). Install aspacem's choice of address, and let the mmap go through. */ sres = VG_(am_do_mmap_NO_NOTIFY)(advised, arg2, arg3, arg4 | VKI_MAP_FIXED, arg5, arg6); /* A refinement: it may be that the kernel refused aspacem's choice of address. If we were originally asked for a hinted mapping, there is still a last chance: try again at any address. Hence: */ if (mreq.rkind == MHint && sr_isError(sres)) { mreq.start = 0; mreq.len = arg2; mreq.rkind = MAny; advised = VG_(am_get_advisory)( &mreq, True/*client*/, &mreq_ok ); if (!mreq_ok) { /* Our request was bounced, so we'd better fail. */ return VG_(mk_SysRes_Error)( VKI_EINVAL ); } /* and try again with the kernel */ sres = VG_(am_do_mmap_NO_NOTIFY)(advised, arg2, arg3, arg4 | VKI_MAP_FIXED, arg5, arg6); } if (!sr_isError(sres)) { ULong di_handle; /* Notify aspacem. */ notify_core_of_mmap( (Addr)sr_Res(sres), /* addr kernel actually assigned */ arg2, /* length */ arg3, /* prot */ arg4, /* the original flags value */ arg5, /* fd */ arg6 /* offset */ ); /* Load symbols? */ di_handle = VG_(di_notify_mmap)( (Addr)sr_Res(sres), False/*allow_SkFileV*/, (Int)arg5 ); /* Notify the tool. */ notify_tool_of_mmap( (Addr)sr_Res(sres), /* addr kernel actually assigned */ arg2, /* length */ arg3, /* prot */ di_handle /* so the tool can refer to the read debuginfo later, if it wants. */ ); } /* Stay sane */ if (!sr_isError(sres) && (arg4 & VKI_MAP_FIXED)) vg_assert(sr_Res(sres) == arg1); return sres; } /* --------------------------------------------------------------------- PRE/POST wrappers for mips/Linux-specific syscalls ------------------------------------------------------------------ */ #define PRE(name) DEFN_PRE_TEMPLATE(mips_linux, name) #define POST(name) DEFN_POST_TEMPLATE(mips_linux, name) /* Add prototypes for the wrappers declared here, so that gcc doesn't harass us for not having prototypes. Really this is a kludge -- the right thing to do is to make these wrappers 'static' since they aren't visible outside this file, but that requires even more macro magic. */ //DECL_TEMPLATE (mips_linux, sys_syscall); DECL_TEMPLATE (mips_linux, sys_mmap); DECL_TEMPLATE (mips_linux, sys_mmap2); DECL_TEMPLATE (mips_linux, sys_stat64); DECL_TEMPLATE (mips_linux, sys_lstat64); DECL_TEMPLATE (mips_linux, sys_fstatat64); DECL_TEMPLATE (mips_linux, sys_fstat64); DECL_TEMPLATE (mips_linux, sys_clone); DECL_TEMPLATE (mips_linux, sys_sigreturn); DECL_TEMPLATE (mips_linux, sys_rt_sigreturn); DECL_TEMPLATE (mips_linux, sys_cacheflush); DECL_TEMPLATE (mips_linux, sys_set_thread_area); DECL_TEMPLATE (mips_linux, sys_pipe); PRE(sys_mmap2) { /* Exactly like sys_mmap() except the file offset is specified in pagesize units rather than bytes, so that it can be used for files bigger than 2^32 bytes. */ SysRes r; PRINT("sys_mmap2 ( %#lx, %lu, %lu, %lu, %lu, %lu )", ARG1, ARG2, SARG3, SARG4, SARG5, SARG6); PRE_REG_READ6(long, "mmap2", unsigned long, start, unsigned long, length, unsigned long, prot, unsigned long, flags, unsigned long, fd, unsigned long, offset); r = mips_PRE_sys_mmap(tid, ARG1, ARG2, ARG3, ARG4, ARG5, VKI_PAGE_SIZE * (Off64T) ARG6); SET_STATUS_from_SysRes(r); } PRE(sys_mmap) { SysRes r; PRINT("sys_mmap ( %#lx, %lu, %ld, %ld, %ld, %lu )", ARG1, ARG2, SARG3, SARG4, SARG5, ARG6); PRE_REG_READ6(long, "mmap", unsigned long, start, vki_size_t, length, int, prot, int, flags, int, fd, unsigned long, offset); r = mips_PRE_sys_mmap(tid, ARG1, ARG2, ARG3, ARG4, ARG5, (Off64T) ARG6); SET_STATUS_from_SysRes(r); } // XXX: lstat64/fstat64/stat64 are generic, but not necessarily // applicable to every architecture -- I think only to 32-bit archs. // We're going to need something like linux/core_os32.h for such // things, eventually, I think. --njn PRE (sys_lstat64) { PRINT ("sys_lstat64 ( %#lx(%s), %#lx )", ARG1, (HChar *) ARG1, ARG2); PRE_REG_READ2 (long, "lstat64", char *, file_name, struct stat64 *, buf); PRE_MEM_RASCIIZ ("lstat64(file_name)", ARG1); PRE_MEM_WRITE ("lstat64(buf)", ARG2, sizeof (struct vki_stat64)); } POST (sys_lstat64) { vg_assert (SUCCESS); if (RES == 0) { POST_MEM_WRITE (ARG2, sizeof (struct vki_stat64)); } } PRE (sys_stat64) { PRINT ("sys_stat64 ( %#lx(%s), %#lx )", ARG1, (HChar *) ARG1, ARG2); PRE_REG_READ2 (long, "stat64", char *, file_name, struct stat64 *, buf); PRE_MEM_RASCIIZ ("stat64(file_name)", ARG1); PRE_MEM_WRITE ("stat64(buf)", ARG2, sizeof (struct vki_stat64)); } POST (sys_stat64) { POST_MEM_WRITE (ARG2, sizeof (struct vki_stat64)); } PRE (sys_fstatat64) { // ARG4 = int flags; Flags are or'ed together, therefore writing them // as a hex constant is more meaningful. PRINT("sys_fstatat64 ( %ld, %#lx(%s), %#lx, %#lx )", SARG1, ARG2, (HChar*)ARG2, ARG3, ARG4); PRE_REG_READ4(long, "fstatat64", int, dfd, char *, file_name, struct stat64 *, buf, int, flags); PRE_MEM_RASCIIZ ("fstatat64(file_name)", ARG2); PRE_MEM_WRITE ("fstatat64(buf)", ARG3, sizeof (struct vki_stat64)); } POST (sys_fstatat64) { POST_MEM_WRITE (ARG3, sizeof (struct vki_stat64)); } PRE (sys_fstat64) { PRINT ("sys_fstat64 ( %lu, %#lx )", SARG1, ARG2); PRE_REG_READ2 (long, "fstat64", unsigned long, fd, struct stat64 *, buf); PRE_MEM_WRITE ("fstat64(buf)", ARG2, sizeof (struct vki_stat64)); } POST (sys_fstat64) { POST_MEM_WRITE (ARG2, sizeof (struct vki_stat64)); } PRE (sys_clone) { Bool badarg = False; UInt cloneflags; PRINT ("sys_clone ( %lx, %#lx, %#lx, %#lx, %#lx )", ARG1, ARG2, ARG3, ARG4, ARG5); PRE_REG_READ2 (int, "clone", unsigned long, flags, void *, child_stack); if (ARG1 & VKI_CLONE_PARENT_SETTID) { if (VG_ (tdict).track_pre_reg_read) { PRA3 ("clone", int *, parent_tidptr); } PRE_MEM_WRITE ("clone(parent_tidptr)", ARG3, sizeof (Int)); if (!VG_ (am_is_valid_for_client)(ARG3, sizeof (Int), VKI_PROT_WRITE)) { badarg = True; } } if (ARG1 & (VKI_CLONE_CHILD_SETTID | VKI_CLONE_CHILD_CLEARTID)) { if (VG_ (tdict).track_pre_reg_read) { PRA5 ("clone", int *, child_tidptr); } PRE_MEM_WRITE ("clone(child_tidptr)", ARG5, sizeof (Int)); if (!VG_ (am_is_valid_for_client)(ARG5, sizeof (Int), VKI_PROT_WRITE)) { badarg = True; } } if (badarg) { SET_STATUS_Failure (VKI_EFAULT); return; } cloneflags = ARG1; if (!ML_ (client_signal_OK) (ARG1 & VKI_CSIGNAL)) { SET_STATUS_Failure (VKI_EINVAL); return; } /* Only look at the flags we really care about */ switch (cloneflags & (VKI_CLONE_VM | VKI_CLONE_FS |VKI_CLONE_FILES | VKI_CLONE_VFORK)) { case VKI_CLONE_VM | VKI_CLONE_FS | VKI_CLONE_FILES: /* thread creation */ PRINT ("sys_clone1 ( %#lx, %#lx, %#lx, %#lx, %#lx )", ARG1, ARG2, ARG3, ARG4, ARG5); SET_STATUS_from_SysRes (do_clone (tid, ARG1, /* flags */ (Addr) ARG2, /* child SP */ (Int *) ARG3, /* parent_tidptr */ (Int *) ARG5, /* child_tidptr */ (Addr) ARG4)); /* child_tls */ break; case VKI_CLONE_VFORK | VKI_CLONE_VM: /* vfork */ /* FALLTHROUGH - assume vfork == fork */ cloneflags &= ~(VKI_CLONE_VFORK | VKI_CLONE_VM); case 0: /* plain fork */ SET_STATUS_from_SysRes (ML_ (do_fork_clone) (tid, cloneflags, /* flags */ (Int *) ARG3, /* parent_tidptr */ (Int *) ARG5)); /* child_tidptr */ break; default: /* should we just ENOSYS? */ VG_ (message) (Vg_UserMsg, "Unsupported clone() flags: 0x%lx\n", ARG1); VG_ (message) (Vg_UserMsg, "\n"); VG_ (message) (Vg_UserMsg, "The only supported clone() uses are:\n"); VG_ (message) (Vg_UserMsg, " - via a threads library (LinuxThreads or NPTL)\n"); VG_ (message) (Vg_UserMsg, " - via the implementation of fork or vfork\n"); VG_ (unimplemented)("Valgrind does not support general clone()."); } if (SUCCESS) { if (ARG1 & VKI_CLONE_PARENT_SETTID) POST_MEM_WRITE (ARG3, sizeof (Int)); if (ARG1 & (VKI_CLONE_CHILD_SETTID | VKI_CLONE_CHILD_CLEARTID)) POST_MEM_WRITE (ARG5, sizeof (Int)); /* Thread creation was successful; let the child have the chance * to run */ *flags |= SfYieldAfter; } } PRE (sys_sigreturn) { PRINT ("sys_sigreturn ( )"); vg_assert (VG_ (is_valid_tid) (tid)); vg_assert (tid >= 1 && tid < VG_N_THREADS); vg_assert (VG_ (is_running_thread) (tid)); VG_ (sigframe_destroy) (tid, False); /* Tell the driver not to update the guest state with the "result", and set a bogus result to keep it happy. */ *flags |= SfNoWriteResult; SET_STATUS_Success (0); /* Check to see if any signals arose as a result of this. */ *flags |= SfPollAfter; } PRE (sys_rt_sigreturn) { PRINT ("rt_sigreturn ( )"); vg_assert (VG_ (is_valid_tid) (tid)); vg_assert (tid >= 1 && tid < VG_N_THREADS); vg_assert (VG_ (is_running_thread) (tid)); /* Restore register state from frame and remove it */ VG_ (sigframe_destroy) (tid, True); /* Tell the driver not to update the guest state with the "result", and set a bogus result to keep it happy. */ *flags |= SfNoWriteResult; SET_STATUS_Success (0); /* Check to see if any signals arose as a result of this. */ *flags |= SfPollAfter; } PRE (sys_set_thread_area) { PRINT ("set_thread_area (%lx)", ARG1); PRE_REG_READ1(long, "set_thread_area", unsigned long, addr); SET_STATUS_from_SysRes( sys_set_tls( tid, ARG1 ) ); } /* Very much MIPS specific */ PRE (sys_cacheflush) { PRINT ("cacheflush (%lx, %ld, %ld)", ARG1, SARG2, SARG3); PRE_REG_READ3(long, "cacheflush", unsigned long, addr, int, nbytes, int, cache); VG_ (discard_translations) ((Addr)ARG1, (ULong) ARG2, "PRE(sys_cacheflush)"); SET_STATUS_Success (0); } PRE(sys_pipe) { PRINT("sys_pipe ( %#lx )", ARG1); PRE_REG_READ1(int, "pipe", int *, filedes); PRE_MEM_WRITE( "pipe(filedes)", ARG1, 2*sizeof(int) ); } POST(sys_pipe) { Int p0, p1; vg_assert(SUCCESS); p0 = RES; p1 = sr_ResEx(status->sres); if (!ML_(fd_allowed)(p0, "pipe", tid, True) || !ML_(fd_allowed)(p1, "pipe", tid, True)) { VG_(close)(p0); VG_(close)(p1); SET_STATUS_Failure( VKI_EMFILE ); } else { if (VG_(clo_track_fds)) { ML_(record_fd_open_nameless)(tid, p0); ML_(record_fd_open_nameless)(tid, p1); } } } #undef PRE #undef POST /* --------------------------------------------------------------------- The mips/Linux syscall table ------------------------------------------------------------------ */ #define PLAX_(sysno, name) WRAPPER_ENTRY_X_(mips_linux, sysno, name) #define PLAXY(sysno, name) WRAPPER_ENTRY_XY(mips_linux, sysno, name) // This table maps from __NR_xxx syscall numbers (from // linux/include/asm-mips/unistd.h) to the appropriate PRE/POST sys_foo() // wrappers on mips (as per sys_call_table in linux/arch/mips/kernel/entry.S). // // For those syscalls not handled by Valgrind, the annotation indicate its // arch/OS combination, eg. */* (generic), */Linux (Linux only), ?/? // (unknown). static SyscallTableEntry syscall_main_table[] = { //.. PLAXY (__NR_syscall, sys_syscall), // 0 GENX_ (__NR_exit, sys_exit), // 1 GENX_ (__NR_fork, sys_fork), // 2 GENXY (__NR_read, sys_read), // 3 GENX_ (__NR_write, sys_write), // 4 GENXY (__NR_open, sys_open), // 5 GENXY (__NR_close, sys_close), // 6 GENXY (__NR_waitpid, sys_waitpid), // 7 GENXY (__NR_creat, sys_creat), // 8 GENX_ (__NR_link, sys_link), // 9 GENX_ (__NR_unlink, sys_unlink), // 10 GENX_ (__NR_execve, sys_execve), // 11 GENX_ (__NR_chdir, sys_chdir), // 12 GENXY (__NR_time, sys_time), // 13 GENX_ (__NR_mknod, sys_mknod), // 14 GENX_ (__NR_chmod, sys_chmod), // 15 GENX_ (__NR_lchown, sys_lchown), // 16 //.. LINX_ (__NR_lseek, sys_lseek), // 19 GENX_ (__NR_getpid, sys_getpid), // 20 LINX_ (__NR_mount, sys_mount), // 21 LINX_ (__NR_umount, sys_oldumount), // 22 GENX_ (__NR_setuid, sys_setuid), // 23 GENX_ (__NR_getuid, sys_getuid), // 24 LINX_ (__NR_stime, sys_stime), // 25 //.. PLAXY(__NR_ptrace, sys_ptrace), // 26 GENX_ (__NR_alarm, sys_alarm), // 27 //.. // (__NR_oldfstat, sys_fstat), // 28 GENX_ (__NR_pause, sys_pause), // 29 LINX_ (__NR_utime, sys_utime), // 30 //.. GENX_(__NR_stty, sys_ni_syscall), // 31 //.. GENX_(__NR_gtty, sys_ni_syscall), // 32 GENX_ (__NR_access, sys_access), // 33 //.. GENX_(__NR_nice, sys_nice), // 34 //.. GENX_(__NR_ftime, sys_ni_syscall), // 35 //.. GENX_(__NR_sync, sys_sync), // 36 GENX_ (__NR_kill, sys_kill), // 37 GENX_ (__NR_rename, sys_rename), // 38 GENX_ (__NR_mkdir, sys_mkdir), // 39 GENX_ (__NR_rmdir, sys_rmdir), // 40 GENXY (__NR_dup, sys_dup), // 41 PLAXY (__NR_pipe, sys_pipe), // 42 GENXY (__NR_times, sys_times), // 43 //.. GENX_(__NR_prof, sys_ni_syscall), // 44 GENX_ (__NR_brk, sys_brk), // 45 GENX_ (__NR_setgid, sys_setgid), // 46 GENX_ (__NR_getgid, sys_getgid), // 47 //.. // (__NR_signal, sys_signal), // 48 GENX_ (__NR_geteuid, sys_geteuid), // 49 GENX_ (__NR_getegid, sys_getegid), // 50 //.. GENX_(__NR_acct, sys_acct), // 51 LINX_ (__NR_umount2, sys_umount), // 52 //.. GENX_(__NR_lock, sys_ni_syscall), // 53 LINXY (__NR_ioctl, sys_ioctl), // 54 LINXY (__NR_fcntl, sys_fcntl), // 55 //.. GENX_(__NR_mpx, sys_ni_syscall), // 56 GENX_ (__NR_setpgid, sys_setpgid), // 57 //.. GENX_(__NR_ulimit, sys_ni_syscall), // 58 //.. // (__NR_oldolduname, sys_olduname), // 59 GENX_ (__NR_umask, sys_umask), // 60 GENX_ (__NR_chroot, sys_chroot), // 61 //.. // (__NR_ustat, sys_ustat) // 62 GENXY (__NR_dup2, sys_dup2), // 63 GENX_ (__NR_getppid, sys_getppid), // 64 GENX_ (__NR_getpgrp, sys_getpgrp), // 65 GENX_ (__NR_setsid, sys_setsid), // 66 LINXY (__NR_sigaction, sys_sigaction), // 67 //.. // (__NR_sgetmask, sys_sgetmask), // 68 //.. // (__NR_ssetmask, sys_ssetmask), // 69 GENX_ (__NR_setreuid, sys_setreuid), // 70 GENX_ (__NR_setregid, sys_setregid), // 71 // PLAX_(__NR_sigsuspend, sys_sigsuspend), // 72 LINXY (__NR_sigpending, sys_sigpending), // 73 //.. // (__NR_sethostname, sys_sethostname), // 74 GENX_ (__NR_setrlimit, sys_setrlimit), // 75 GENXY (__NR_getrlimit, sys_getrlimit), // 76 GENXY (__NR_getrusage, sys_getrusage), // 77 GENXY (__NR_gettimeofday, sys_gettimeofday), // 78 GENX_ (__NR_settimeofday, sys_settimeofday), // 79 GENXY (__NR_getgroups, sys_getgroups), // 80 GENX_ (__NR_setgroups, sys_setgroups), // 81 //.. PLAX_(__NR_select, old_select), // 82 GENX_ (__NR_symlink, sys_symlink), // 83 //.. // (__NR_oldlstat, sys_lstat), // 84 GENX_ (__NR_readlink, sys_readlink), // 85 //.. // (__NR_uselib, sys_uselib), // 86 //.. // (__NR_swapon, sys_swapon), // 87 //.. // (__NR_reboot, sys_reboot), // 88 //.. // (__NR_readdir, old_readdir), // 89 PLAX_ (__NR_mmap, sys_mmap), // 90 GENXY (__NR_munmap, sys_munmap), // 91 GENX_ (__NR_truncate, sys_truncate), // 92 GENX_ (__NR_ftruncate, sys_ftruncate), // 93 GENX_ (__NR_fchmod, sys_fchmod), // 94 GENX_ (__NR_fchown, sys_fchown), // 95 GENX_ (__NR_getpriority, sys_getpriority), // 96 GENX_ (__NR_setpriority, sys_setpriority), // 97 //.. GENX_(__NR_profil, sys_ni_syscall), // 98 GENXY (__NR_statfs, sys_statfs), // 99 GENXY (__NR_fstatfs, sys_fstatfs), // 100 //.. LINX_(__NR_ioperm, sys_ioperm), // 101 LINXY (__NR_socketcall, sys_socketcall), // 102 LINXY (__NR_syslog, sys_syslog), // 103 GENXY (__NR_setitimer, sys_setitimer), // 104 //.. GENXY(__NR_getitimer, sys_getitimer), // 105 GENXY (__NR_stat, sys_newstat), // 106 GENXY (__NR_lstat, sys_newlstat), // 107 GENXY (__NR_fstat, sys_newfstat), // 108 //.. // (__NR_olduname, sys_uname), // 109 //.. GENX_(__NR_iopl, sys_iopl), // 110 //.. LINX_(__NR_vhangup, sys_vhangup), // 111 //.. GENX_(__NR_idle, sys_ni_syscall), // 112 //.. // (__NR_vm86old, sys_vm86old), // 113 GENXY (__NR_wait4, sys_wait4), // 114 //.. // (__NR_swapoff, sys_swapoff), // 115 LINXY (__NR_sysinfo, sys_sysinfo), // 116 LINXY (__NR_ipc, sys_ipc), // 117 GENX_ (__NR_fsync, sys_fsync), // 118 PLAX_ (__NR_sigreturn, sys_sigreturn), // 119 PLAX_ (__NR_clone, sys_clone), // 120 //.. // (__NR_setdomainname, sys_setdomainname), // 121 GENXY (__NR_uname, sys_newuname), // 122 //.. PLAX_(__NR_modify_ldt, sys_modify_ldt), // 123 //.. LINXY(__NR_adjtimex, sys_adjtimex), // 124 GENXY (__NR_mprotect, sys_mprotect), // 125 LINXY (__NR_sigprocmask, sys_sigprocmask), // 126 //.. GENX_(__NR_create_module, sys_ni_syscall), // 127 //.. GENX_(__NR_init_module, sys_init_module), // 128 //.. // (__NR_delete_module, sys_delete_module), // 129 //.. GENX_(__NR_get_kernel_syms, sys_ni_syscall), // 130 //.. LINX_(__NR_quotactl, sys_quotactl), // 131 GENX_ (__NR_getpgid, sys_getpgid), // 132 GENX_ (__NR_fchdir, sys_fchdir), // 133 //.. // (__NR_bdflush, sys_bdflush), // 134 //.. // (__NR_sysfs, sys_sysfs), // 135 LINX_ (__NR_personality, sys_personality), // 136 //.. GENX_(__NR_afs_syscall, sys_ni_syscall), // 137 LINX_ (__NR_setfsuid, sys_setfsuid), // 138 LINX_ (__NR_setfsgid, sys_setfsgid), // 139 LINXY (__NR__llseek, sys_llseek), // 140 GENXY (__NR_getdents, sys_getdents), // 141 GENX_ (__NR__newselect, sys_select), // 142 GENX_ (__NR_flock, sys_flock), // 143 GENX_ (__NR_msync, sys_msync), // 144 GENXY (__NR_readv, sys_readv), // 145 GENX_ (__NR_writev, sys_writev), // 146 PLAX_ (__NR_cacheflush, sys_cacheflush), // 147 GENX_ (__NR_getsid, sys_getsid), // 151 GENX_ (__NR_fdatasync, sys_fdatasync), // 152 LINXY (__NR__sysctl, sys_sysctl), // 153 GENX_ (__NR_mlock, sys_mlock), // 154 GENX_ (__NR_munlock, sys_munlock), // 155 GENX_ (__NR_mlockall, sys_mlockall), // 156 LINX_ (__NR_munlockall, sys_munlockall), // 157 //.. LINXY(__NR_sched_setparam, sys_sched_setparam), // 158 LINXY (__NR_sched_getparam, sys_sched_getparam), // 159 LINX_ (__NR_sched_setscheduler, sys_sched_setscheduler), // 160 LINX_ (__NR_sched_getscheduler, sys_sched_getscheduler), // 161 LINX_ (__NR_sched_yield, sys_sched_yield), // 162 LINX_ (__NR_sched_get_priority_max, sys_sched_get_priority_max), // 163 LINX_ (__NR_sched_get_priority_min, sys_sched_get_priority_min), // 164 //.. //LINX?(__NR_sched_rr_get_interval, sys_sched_rr_get_interval), // 165 GENXY (__NR_nanosleep, sys_nanosleep), // 166 GENX_ (__NR_mremap, sys_mremap), // 167 LINXY (__NR_accept, sys_accept), // 168 LINX_ (__NR_bind, sys_bind), // 169 LINX_ (__NR_connect, sys_connect), // 170 LINXY (__NR_getpeername, sys_getpeername), // 171 LINXY (__NR_getsockname, sys_getsockname), // 172 LINXY (__NR_getsockopt, sys_getsockopt), // 173 LINX_ (__NR_listen, sys_listen), // 174 LINXY (__NR_recv, sys_recv), // 175 LINXY (__NR_recvfrom, sys_recvfrom), // 176 LINXY (__NR_recvmsg, sys_recvmsg), // 177 LINX_ (__NR_send, sys_send), // 178 LINX_ (__NR_sendmsg, sys_sendmsg), // 179 LINX_ (__NR_sendto, sys_sendto), // 180 LINX_ (__NR_setsockopt, sys_setsockopt), // 181 LINX_ (__NR_shutdown, sys_shutdown), // 182 LINXY (__NR_socket, sys_socket), // 183 LINXY (__NR_socketpair, sys_socketpair), // 184 LINX_ (__NR_setresuid, sys_setresuid), // 185 LINXY (__NR_getresuid, sys_getresuid), // 186 //.. GENX_(__NR_query_module, sys_ni_syscall), // 187 GENXY (__NR_poll, sys_poll), // 188 //.. LINX_ (__NR_setresgid, sys_setresgid), // 190 LINXY (__NR_getresgid, sys_getresgid), // 191 LINXY (__NR_prctl, sys_prctl), // 192 PLAX_ (__NR_rt_sigreturn, sys_rt_sigreturn), // 193 LINXY (__NR_rt_sigaction, sys_rt_sigaction), // 194 LINXY (__NR_rt_sigprocmask, sys_rt_sigprocmask), // 195 LINXY (__NR_rt_sigpending, sys_rt_sigpending), // 196 LINXY (__NR_rt_sigtimedwait, sys_rt_sigtimedwait), // 197 LINXY (__NR_rt_sigqueueinfo, sys_rt_sigqueueinfo), // 198 LINX_ (__NR_rt_sigsuspend, sys_rt_sigsuspend), // 199 GENXY (__NR_pread64, sys_pread64), // 200 GENX_ (__NR_pwrite64, sys_pwrite64), // 201 GENX_ (__NR_chown, sys_chown), // 202 GENXY (__NR_getcwd, sys_getcwd), // 203 LINXY (__NR_capget, sys_capget), // 204 //.. LINX_(__NR_capset, sys_capset), // 205 GENXY (__NR_sigaltstack, sys_sigaltstack), // 206 LINXY (__NR_sendfile, sys_sendfile), // 207 //.. GENXY(__NR_getpmsg, sys_getpmsg), // 208 //.. GENX_(__NR_putpmsg, sys_putpmsg), // 209 PLAX_ (__NR_mmap2, sys_mmap2), // 210 // GENX_(__NR_truncate64, sys_truncate64), // 211 GENX_ (__NR_ftruncate64, sys_ftruncate64), // 212 PLAXY (__NR_stat64, sys_stat64), // 213 PLAXY (__NR_lstat64, sys_lstat64), // 214 PLAXY (__NR_fstat64, sys_fstat64), // 215 //.. GENXY (__NR_mincore, sys_mincore), // 217 GENX_ (__NR_madvise, sys_madvise), // 218 GENXY (__NR_getdents64, sys_getdents64), // 219 LINXY (__NR_fcntl64, sys_fcntl64), // 220 //.. LINX_ (__NR_gettid, sys_gettid), // 222 //.. LINXY (__NR_getxattr, sys_getxattr), // 227 LINXY (__NR_lgetxattr, sys_lgetxattr), // 228 LINXY (__NR_fgetxattr, sys_fgetxattr), // 229 LINXY (__NR_listxattr, sys_listxattr), // 230 LINXY (__NR_llistxattr, sys_llistxattr), // 231 LINXY (__NR_flistxattr, sys_flistxattr), // 232 LINX_ (__NR_removexattr, sys_removexattr), // 233 LINX_ (__NR_lremovexattr, sys_lremovexattr), // 234 LINX_ (__NR_fremovexattr, sys_fremovexattr), // 235 //.. LINXY (__NR_sendfile64, sys_sendfile64), // 237 LINXY (__NR_futex, sys_futex), // 238 LINX_ (__NR_sched_setaffinity, sys_sched_setaffinity), // 239 LINXY (__NR_sched_getaffinity, sys_sched_getaffinity), // 240 LINX_ (__NR_io_setup, sys_io_setup), // 241 LINX_ (__NR_io_destroy, sys_io_destroy), // 242 LINXY (__NR_io_getevents, sys_io_getevents), // 243 LINX_ (__NR_io_submit, sys_io_submit), // 244 LINXY (__NR_io_cancel, sys_io_cancel), // 245 LINX_ (__NR_exit_group, sys_exit_group), // 246 //.. LINXY (__NR_epoll_create, sys_epoll_create), // 248 LINX_ (__NR_epoll_ctl, sys_epoll_ctl), // 249 LINXY (__NR_epoll_wait, sys_epoll_wait), // 250 //.. LINX_ (__NR_set_tid_address, sys_set_tid_address), // 252 LINX_ (__NR_fadvise64, sys_fadvise64), // 254 GENXY (__NR_statfs64, sys_statfs64), // 255 GENXY (__NR_fstatfs64, sys_fstatfs64), // 256 //.. LINXY (__NR_timer_create, sys_timer_create), // 257 LINXY (__NR_timer_settime, sys_timer_settime), // 258 LINXY (__NR_timer_gettime, sys_timer_gettime), // 259 LINX_ (__NR_timer_getoverrun, sys_timer_getoverrun), // 260 LINX_ (__NR_timer_delete, sys_timer_delete), // 261 LINX_ (__NR_clock_settime, sys_clock_settime), // 262 LINXY (__NR_clock_gettime, sys_clock_gettime), // 263 LINXY (__NR_clock_getres, sys_clock_getres), // 264 LINXY (__NR_clock_nanosleep, sys_clock_nanosleep), // 265 LINXY (__NR_tgkill, sys_tgkill), // 266 //.. GENX_(__NR_utimes, sys_utimes), // 267 LINXY (__NR_get_mempolicy, sys_get_mempolicy), // 269 LINX_ (__NR_set_mempolicy, sys_set_mempolicy), // 270 LINXY (__NR_mq_open, sys_mq_open), // 271 LINX_ (__NR_mq_unlink, sys_mq_unlink), // 272 LINX_ (__NR_mq_timedsend, sys_mq_timedsend), // 273 LINXY (__NR_mq_timedreceive, sys_mq_timedreceive), // 274 LINX_ (__NR_mq_notify, sys_mq_notify), // 275 LINXY (__NR_mq_getsetattr, sys_mq_getsetattr), // 276 LINX_ (__NR_inotify_init, sys_inotify_init), // 275 LINX_ (__NR_inotify_add_watch, sys_inotify_add_watch), // 276 LINX_ (__NR_inotify_rm_watch, sys_inotify_rm_watch), // 277 //.. PLAX_ (__NR_set_thread_area, sys_set_thread_area), // 283 //.. LINXY (__NR_openat, sys_openat), // 288 LINX_ (__NR_mkdirat, sys_mkdirat), // 289 LINX_ (__NR_mknodat, sys_mknodat), // 290 LINX_ (__NR_fchownat, sys_fchownat), // 291 LINX_ (__NR_futimesat, sys_futimesat), // 292 PLAXY (__NR_fstatat64, sys_fstatat64), // 293 LINX_ (__NR_unlinkat, sys_unlinkat), // 294 LINX_ (__NR_renameat, sys_renameat), // 295 LINX_ (__NR_linkat, sys_linkat), // 296 LINX_ (__NR_symlinkat, sys_symlinkat), // 297 LINX_ (__NR_readlinkat, sys_readlinkat), // 298 LINX_ (__NR_fchmodat, sys_fchmodat), // 299 LINX_ (__NR_faccessat, sys_faccessat), // 300 //.. LINXY (__NR_ppoll, sys_ppoll), // 302 //.. LINX_ (__NR_set_robust_list, sys_set_robust_list), // 309 LINXY (__NR_get_robust_list, sys_get_robust_list), // 310 //.. LINXY (__NR_epoll_pwait, sys_epoll_pwait), // 313 //.. LINX_ (__NR_utimensat, sys_utimensat), // 316 //.. LINX_ (__NR_fallocate, sys_fallocate), // 320 LINXY (__NR_timerfd_create, sys_timerfd_create), // 321 LINXY (__NR_timerfd_gettime, sys_timerfd_gettime), // 322 LINXY (__NR_timerfd_settime, sys_timerfd_settime), // 323 LINXY (__NR_signalfd4, sys_signalfd4), // 324 LINXY (__NR_eventfd2, sys_eventfd2), // 325 //.. LINXY (__NR_pipe2, sys_pipe2), // 328 LINXY (__NR_inotify_init1, sys_inotify_init1), // 329 //.. LINXY (__NR_prlimit64, sys_prlimit64), // 338 //.. LINXY (__NR_clock_adjtime, sys_clock_adjtime), // 341 LINX_ (__NR_syncfs, sys_syncfs), // 342 //.. LINXY (__NR_process_vm_readv, sys_process_vm_readv), // 345 LINX_ (__NR_process_vm_writev, sys_process_vm_writev), // 346 //.. LINXY(__NR_getrandom, sys_getrandom), // 353 LINXY(__NR_memfd_create, sys_memfd_create) // 354 }; SyscallTableEntry* ML_(get_linux_syscall_entry) (UInt sysno) { const UInt syscall_main_table_size = sizeof (syscall_main_table) / sizeof (syscall_main_table[0]); /* Is it in the contiguous initial section of the table? */ if (sysno < syscall_main_table_size) { SyscallTableEntry * sys = &syscall_main_table[sysno]; if (sys->before == NULL) return NULL; /* No entry. */ else return sys; } /* Can't find a wrapper. */ return NULL; } #endif // defined(VGP_mips32_linux) /*--------------------------------------------------------------------*/ /*--- end syswrap-mips-linux.c ---*/ /*--------------------------------------------------------------------*/