zenithsiz/ftmemsim-valgrind
1
0
Fork 0
mirror of https://github.com/Zenithsiz/ftmemsim-valgrind.git synced 2026-02-08 21:09:49 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity
Files
c54854475c331d7035bb1f42ef1eb4a07f4707d0
ftmemsim-valgrind/coregrind/m_syswrap/syswrap-ppc32-linux.c
Philippe Waroquiers 489cfd5156 Fix 342040 Valgrind mishandles clone with CLONE_VFORK | CLONE_VM that clones to a different stack 
Fix 373192 Calling posix_spawn in glibc 2.24 completely broken

Functionally, this patch just does the following 2 changes to the
fork clone handling:
* It does not mask anymore CLONE_VFORK :
  The only effect of this flag is to suspend the parent, waiting for
  the child to either exit or execve.
  If some applications depends on this synchronisation, better keep it,
  as it will not harm to suspend the parent valgrind waiting for the
  child valgrind to exit or execve.
* In case the guest calls the clone syscall providing a non zero client stack,
  set the child guest SP after the syscall, before executing guest instructions.
  Not setting the guest stack ptr was the source of the problem reported
  in the bugs.

This also adds a test case  none/tests/linux/clonev.
Before this patch, test gives a SEGV, which is fixed by the patch.

The patch is however a lot bigger : this fix was touching some (mostly
identical/duplicated) code in all the linux platforms.
So, the clone/fork code has been factorised as much as possible.
This removes about 1700 lines of code.

This has been tested on:
* amd64
* x86
* ppc64 be and le
* ppc32
* arm64

This has been compiled on but *not really tested* on:
* mips64 (not too clear how to properly build and run valgrind on gcc22)

It has *not* been compiled and *not* tested on:
* arm
* mips32
* tilegx
* darwin   (normally, no impact)
* solaris  (normally, no impact)

The changes are relatively mechanical, so it is not impossible that
it will compile and work out of the box on these platforms.
Otherwise, questions welcome.

A few points of interest:
* Some platforms did have a typedef void vki_modify_ldt_t,
  and some platforms had no definition for this type at all.
  To make it easier to factorise, for such platforms, the following has
  been used:
     typedef char vki_modify_ldt_t;
    When the sizeof vki_modify_ldt_t is > 1, then the arg syscall is checked.
  This is somewhat a hack, but was simplifying the factorisation.

* for mips32/mips64 and tilegx, there is a strange unconditional assignment
  of 0 to a register (guest_r2 on mips, guest_r0 on tilegx).
  Unclear what this is, in particular because this is assigned whatever
  the result of the syscall (success or not).
  



git-svn-id: svn://svn.valgrind.org/valgrind/trunk@16186
2016-12-11 21:39:23 +00:00

1048 lines
43 KiB
C
Raw Blame History

/*--------------------------------------------------------------------*/
/*--- Platform-specific syscalls stuff. syswrap-ppc32-linux.c ---*/
/*--------------------------------------------------------------------*/
/*
This file is part of Valgrind, a dynamic binary instrumentation
framework.
Copyright (C) 2005-2015 Nicholas Nethercote <njn@valgrind.org>
Copyright (C) 2005-2015 Cerion Armour-Brown <cerion@open-works.co.uk>
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_ppc32_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 "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"
/* ---------------------------------------------------------------------
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 );
// r3 = stack
// r4 = retaddr
// r5 = f
// r6 = arg1
asm(
".text\n"
".globl vgModuleLocal_call_on_new_stack_0_1\n"
"vgModuleLocal_call_on_new_stack_0_1:\n"
" mr %r1,%r3\n\t" // stack to %sp
" mtlr %r4\n\t" // retaddr to %lr
" mtctr %r5\n\t" // f to count reg
" mr %r3,%r6\n\t" // arg1 to %r3
" li 0,0\n\t" // zero all GP regs
" li 4,0\n\t"
" li 5,0\n\t"
" li 6,0\n\t"
" li 7,0\n\t"
" li 8,0\n\t"
" li 9,0\n\t"
" li 10,0\n\t"
" li 11,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"
" li 25,0\n\t"
" li 26,0\n\t"
" li 27,0\n\t"
" li 28,0\n\t"
" li 29,0\n\t"
" li 30,0\n\t"
" li 31,0\n\t"
" mtxer 0\n\t" // CAB: Need this?
" mtcr 0\n\t" // CAB: Need this?
" bctr\n\t" // jump to dst
" trap\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 r3
void* child_stack in r4
int flags in r5
void* arg in r6
pid_t* child_tid in r7
pid_t* parent_tid in r8
void* ??? in r9
System call requires:
int $__NR_clone in r0 (sc number)
int flags in r3 (sc arg1)
void* child_stack in r4 (sc arg2)
pid_t* parent_tid in r5 (sc arg3)
?? child_tls in r6 (sc arg4)
pid_t* child_tid in r7 (sc arg5)
void* ??? in r8 (sc arg6)
Returns an Int encoded in the linux-ppc32 way, not a SysRes.
*/
#define __NR_CLONE VG_STRINGIFY(__NR_clone)
#define __NR_EXIT VG_STRINGIFY(__NR_exit)
// See priv_syswrap-linux.h for arg profile.
asm(
".text\n"
".globl do_syscall_clone_ppc32_linux\n"
"do_syscall_clone_ppc32_linux:\n"
" stwu 1,-32(1)\n"
" stw 29,20(1)\n"
" stw 30,24(1)\n"
" stw 31,28(1)\n"
" mr 30,3\n" // preserve fn
" mr 31,6\n" // preserve arg
// setup child stack
" rlwinm 4,4,0,~0xf\n" // trim sp to multiple of 16 bytes
" li 0,0\n"
" stwu 0,-16(4)\n" // make initial stack frame
" mr 29,4\n" // preserve sp
// setup syscall
" li 0,"__NR_CLONE"\n" // syscall number
" mr 3,5\n" // syscall arg1: flags
// r4 already setup // syscall arg2: child_stack
" mr 5,8\n" // syscall arg3: parent_tid
" mr 6,2\n" // syscall arg4: REAL THREAD tls
" mr 7,7\n" // syscall arg5: child_tid
" mr 8,8\n" // syscall arg6: ????
" mr 9,9\n" // syscall arg7: ????
" sc\n" // clone()
" mfcr 4\n" // return CR in r4 (low word of ULong)
" cmpwi 3,0\n" // child if retval == 0
" bne 1f\n" // jump if !child
/* CHILD - call thread function */
/* Note: 2.4 kernel doesn't set the child stack pointer,
so we do it here.
That does leave a small window for a signal to be delivered
on the wrong stack, unfortunately. */
" mr 1,29\n"
" mtctr 30\n" // ctr reg = fn
" mr 3,31\n" // r3 = arg
" bctrl\n" // call fn()
// exit with result
" li 0,"__NR_EXIT"\n"
" sc\n"
// Exit returned?!
" .long 0\n"
// PARENT or ERROR - return
"1: lwz 29,20(1)\n"
" lwz 30,24(1)\n"
" lwz 31,28(1)\n"
" addi 1,1,32\n"
" blr\n"
".previous\n"
);
#undef __NR_CLONE
#undef __NR_EXIT
/* ---------------------------------------------------------------------
More thread stuff
------------------------------------------------------------------ */
void VG_(cleanup_thread) ( ThreadArchState* arch )
{
}
/* ---------------------------------------------------------------------
PRE/POST wrappers for ppc32/Linux-specific syscalls
------------------------------------------------------------------ */
#define PRE(name) DEFN_PRE_TEMPLATE(ppc32_linux, name)
#define POST(name) DEFN_POST_TEMPLATE(ppc32_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(ppc32_linux, sys_mmap);
DECL_TEMPLATE(ppc32_linux, sys_mmap2);
DECL_TEMPLATE(ppc32_linux, sys_stat64);
DECL_TEMPLATE(ppc32_linux, sys_lstat64);
DECL_TEMPLATE(ppc32_linux, sys_fstatat64);
DECL_TEMPLATE(ppc32_linux, sys_fstat64);
DECL_TEMPLATE(ppc32_linux, sys_sigreturn);
DECL_TEMPLATE(ppc32_linux, sys_rt_sigreturn);
DECL_TEMPLATE(ppc32_linux, sys_sigsuspend);
DECL_TEMPLATE(ppc32_linux, sys_spu_create);
DECL_TEMPLATE(ppc32_linux, sys_spu_run);
PRE(sys_mmap)
{
SysRes r;
PRINT("sys_mmap ( %#lx, %lu, %lu, %lu, %lu, %lu )",
ARG1, ARG2, ARG3, ARG4, ARG5, ARG6 );
PRE_REG_READ6(long, "mmap",
unsigned long, start, unsigned long, length,
unsigned long, prot, unsigned long, flags,
unsigned long, fd, unsigned long, offset);
r = ML_(generic_PRE_sys_mmap)( tid, ARG1, ARG2, ARG3, ARG4, ARG5,
(Off64T)ARG6 );
SET_STATUS_from_SysRes(r);
}
PRE(sys_mmap2)
{
SysRes r;
// Exactly like old_mmap() except:
// - the file offset is specified in 4K units rather than bytes,
// so that it can be used for files bigger than 2^32 bytes.
PRINT("sys_mmap2 ( %#lx, %lu, %lu, %lu, %lu, %lu )",
ARG1, ARG2, ARG3, ARG4, ARG5, ARG6 );
PRE_REG_READ6(long, "mmap2",
unsigned long, start, unsigned long, length,
unsigned long, prot, unsigned long, flags,
unsigned long, fd, unsigned long, offset);
r = ML_(generic_PRE_sys_mmap)( tid, ARG1, ARG2, ARG3, ARG4, ARG5,
4096 * (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_stat64)
{
PRINT("sys_stat64 ( %#lx, %#lx )",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_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_fstatat64)
{
PRINT("sys_fstatat64 ( %ld, %#lx(%s), %#lx )", SARG1, ARG2, (HChar*)ARG2,
ARG3);
PRE_REG_READ3(long, "fstatat64",
int, dfd, char *, file_name, struct stat64 *, buf);
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 )", ARG1, 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(old_select, MayBlock)
//.. {
//.. /* struct sel_arg_struct {
//.. unsigned long n;
//.. fd_set *inp, *outp, *exp;
//.. struct timeval *tvp;
//.. };
//.. */
//.. PRE_REG_READ1(long, "old_select", struct sel_arg_struct *, args);
//.. PRE_MEM_READ( "old_select(args)", ARG1, 5*sizeof(UWord) );
//..
//.. {
//.. UInt* arg_struct = (UInt*)ARG1;
//.. UInt a1, a2, a3, a4, a5;
//..
//.. a1 = arg_struct[0];
//.. a2 = arg_struct[1];
//.. a3 = arg_struct[2];
//.. a4 = arg_struct[3];
//.. a5 = arg_struct[4];
//..
//.. PRINT("old_select ( %d, %p, %p, %p, %p )", a1,a2,a3,a4,a5);
//.. if (a2 != (Addr)NULL)
//.. PRE_MEM_READ( "old_select(readfds)", a2, a1/8 /* __FD_SETSIZE/8 */ );
//.. if (a3 != (Addr)NULL)
//.. PRE_MEM_READ( "old_select(writefds)", a3, a1/8 /* __FD_SETSIZE/8 */ );
//.. if (a4 != (Addr)NULL)
//.. PRE_MEM_READ( "old_select(exceptfds)", a4, a1/8 /* __FD_SETSIZE/8 */ );
//.. if (a5 != (Addr)NULL)
//.. PRE_MEM_READ( "old_select(timeout)", a5, sizeof(struct vki_timeval) );
//.. }
//.. }
PRE(sys_sigreturn)
{
/* See comments on PRE(sys_rt_sigreturn) in syswrap-amd64-linux.c for
an explanation of what follows. */
//ThreadState* tst;
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));
///* Adjust esp to point to start of frame; skip back up over
// sigreturn sequence's "popl %eax" and handler ret addr */
//tst = VG_(get_ThreadState)(tid);
//tst->arch.vex.guest_ESP -= sizeof(Addr)+sizeof(Word);
// Should we do something equivalent on ppc32? Who knows.
///* This is only so that the EIP is (might be) useful to report if
// something goes wrong in the sigreturn */
//ML_(fixup_guest_state_to_restart_syscall)(&tst->arch);
// Should we do something equivalent on ppc32? Who knows.
/* Restore register state from frame and remove it */
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)
{
/* See comments on PRE(sys_rt_sigreturn) in syswrap-amd64-linux.c for
an explanation of what follows. */
//ThreadState* tst;
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));
///* Adjust esp to point to start of frame; skip back up over handler
// ret addr */
//tst = VG_(get_ThreadState)(tid);
//tst->arch.vex.guest_ESP -= sizeof(Addr);
// Should we do something equivalent on ppc32? Who knows.
///* This is only so that the EIP is (might be) useful to report if
// something goes wrong in the sigreturn */
//ML_(fixup_guest_state_to_restart_syscall)(&tst->arch);
// Should we do something equivalent on ppc32? Who knows.
/* 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_modify_ldt, Special)
//.. {
//.. PRINT("sys_modify_ldt ( %d, %p, %d )", ARG1,ARG2,ARG3);
//.. PRE_REG_READ3(int, "modify_ldt", int, func, void *, ptr,
//.. unsigned long, bytecount);
//..
//.. if (ARG1 == 0) {
//.. /* read the LDT into ptr */
//.. PRE_MEM_WRITE( "modify_ldt(ptr)", ARG2, ARG3 );
//.. }
//.. if (ARG1 == 1 || ARG1 == 0x11) {
//.. /* write the LDT with the entry pointed at by ptr */
//.. PRE_MEM_READ( "modify_ldt(ptr)", ARG2, sizeof(vki_modify_ldt_t) );
//.. }
//.. /* "do" the syscall ourselves; the kernel never sees it */
//.. SET_RESULT( VG_(sys_modify_ldt)( tid, ARG1, (void*)ARG2, ARG3 ) );
//..
//.. if (ARG1 == 0 && !VG_(is_kerror)(RES) && RES > 0) {
//.. POST_MEM_WRITE( ARG2, RES );
//.. }
//.. }
//.. PRE(sys_set_thread_area, Special)
//.. {
//.. PRINT("sys_set_thread_area ( %p )", ARG1);
//.. PRE_REG_READ1(int, "set_thread_area", struct user_desc *, u_info)
//.. PRE_MEM_READ( "set_thread_area(u_info)", ARG1, sizeof(vki_modify_ldt_t) );
//..
//.. /* "do" the syscall ourselves; the kernel never sees it */
//.. SET_RESULT( VG_(sys_set_thread_area)( tid, (void *)ARG1 ) );
//.. }
//.. PRE(sys_get_thread_area, Special)
//.. {
//.. PRINT("sys_get_thread_area ( %p )", ARG1);
//.. PRE_REG_READ1(int, "get_thread_area", struct user_desc *, u_info)
//.. PRE_MEM_WRITE( "get_thread_area(u_info)", ARG1, sizeof(vki_modify_ldt_t) );
//..
//.. /* "do" the syscall ourselves; the kernel never sees it */
//.. SET_RESULT( VG_(sys_get_thread_area)( tid, (void *)ARG1 ) );
//..
//.. if (!VG_(is_kerror)(RES)) {
//.. POST_MEM_WRITE( ARG1, sizeof(vki_modify_ldt_t) );
//.. }
//.. }
//.. // Parts of this are ppc32-specific, but the *PEEK* cases are generic.
//.. // XXX: Why is the memory pointed to by ARG3 never checked?
//.. PRE(sys_ptrace, 0)
//.. {
//.. PRINT("sys_ptrace ( %d, %d, %p, %p )", ARG1,ARG2,ARG3,ARG4);
//.. PRE_REG_READ4(int, "ptrace",
//.. long, request, long, pid, long, addr, long, data);
//.. switch (ARG1) {
//.. case VKI_PTRACE_PEEKTEXT:
//.. case VKI_PTRACE_PEEKDATA:
//.. case VKI_PTRACE_PEEKUSR:
//.. PRE_MEM_WRITE( "ptrace(peek)", ARG4,
//.. sizeof (long));
//.. break;
//.. case VKI_PTRACE_GETREGS:
//.. PRE_MEM_WRITE( "ptrace(getregs)", ARG4,
//.. sizeof (struct vki_user_regs_struct));
//.. break;
//.. case VKI_PTRACE_GETFPREGS:
//.. PRE_MEM_WRITE( "ptrace(getfpregs)", ARG4,
//.. sizeof (struct vki_user_i387_struct));
//.. break;
//.. case VKI_PTRACE_GETFPXREGS:
//.. PRE_MEM_WRITE( "ptrace(getfpxregs)", ARG4,
//.. sizeof(struct vki_user_fxsr_struct) );
//.. break;
//.. case VKI_PTRACE_SETREGS:
//.. PRE_MEM_READ( "ptrace(setregs)", ARG4,
//.. sizeof (struct vki_user_regs_struct));
//.. break;
//.. case VKI_PTRACE_SETFPREGS:
//.. PRE_MEM_READ( "ptrace(setfpregs)", ARG4,
//.. sizeof (struct vki_user_i387_struct));
//.. break;
//.. case VKI_PTRACE_SETFPXREGS:
//.. PRE_MEM_READ( "ptrace(setfpxregs)", ARG4,
//.. sizeof(struct vki_user_fxsr_struct) );
//.. break;
//.. default:
//.. break;
//.. }
//.. }
//.. POST(sys_ptrace)
//.. {
//.. switch (ARG1) {
//.. case VKI_PTRACE_PEEKTEXT:
//.. case VKI_PTRACE_PEEKDATA:
//.. case VKI_PTRACE_PEEKUSR:
//.. POST_MEM_WRITE( ARG4, sizeof (long));
//.. break;
//.. case VKI_PTRACE_GETREGS:
//.. POST_MEM_WRITE( ARG4, sizeof (struct vki_user_regs_struct));
//.. break;
//.. case VKI_PTRACE_GETFPREGS:
//.. POST_MEM_WRITE( ARG4, sizeof (struct vki_user_i387_struct));
//.. break;
//.. case VKI_PTRACE_GETFPXREGS:
//.. POST_MEM_WRITE( ARG4, sizeof(struct vki_user_fxsr_struct) );
//.. break;
//.. default:
//.. break;
//.. }
//.. }
/* NB: This is an almost identical clone of versions for x86-linux and
arm-linux, which are themselves literally identical. */
PRE(sys_sigsuspend)
{
/* The C library interface to sigsuspend just takes a pointer to
a signal mask but this system call only takes the first word of
the signal mask as an argument so only 32 signals are supported.
In fact glibc normally uses rt_sigsuspend if it is available as
that takes a pointer to the signal mask so supports more signals.
*/
*flags |= SfMayBlock;
PRINT("sys_sigsuspend ( %lu )", ARG1 );
PRE_REG_READ1(int, "sigsuspend", vki_old_sigset_t, mask);
}
PRE(sys_spu_create)
{
PRE_MEM_RASCIIZ("stat64(filename)", ARG1);
}
POST(sys_spu_create)
{
vg_assert(SUCCESS);
}
PRE(sys_spu_run)
{
*flags |= SfMayBlock;
if (ARG2 != 0)
PRE_MEM_WRITE("npc", ARG2, sizeof(unsigned int));
PRE_MEM_READ("event", ARG3, sizeof(unsigned int));
}
POST(sys_spu_run)
{
if (ARG2 != 0)
POST_MEM_WRITE(ARG2, sizeof(unsigned int));
}
#undef PRE
#undef POST
/* ---------------------------------------------------------------------
The ppc32/Linux syscall table
------------------------------------------------------------------ */
/* Add an ppc32-linux specific wrapper to a syscall table. */
#define PLAX_(sysno, name) WRAPPER_ENTRY_X_(ppc32_linux, sysno, name)
#define PLAXY(sysno, name) WRAPPER_ENTRY_XY(ppc32_linux, sysno, name)
// This table maps from __NR_xxx syscall numbers (from
// linux/include/asm-ppc/unistd.h) to the appropriate PRE/POST sys_foo()
// wrappers on ppc32 (as per sys_call_table in linux/arch/ppc/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_table[] = {
//.. (restart_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 ## P
//.. GENX_(__NR_break, sys_ni_syscall), // 17
//.. // (__NR_oldstat, sys_stat), // 18 (obsolete)
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 ## P
GENX_(__NR_getuid, sys_getuid), // 24 ## P
//..
//.. // (__NR_stime, sys_stime), // 25 * (SVr4,SVID,X/OPEN)
//.. PLAXY(__NR_ptrace, sys_ptrace), // 26
GENX_(__NR_alarm, sys_alarm), // 27
//.. // (__NR_oldfstat, sys_fstat), // 28 * L -- obsolete
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
LINXY(__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 */* (ANSI C)
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 Linux -- obsolete
GENX_(__NR_umask, sys_umask), // 60
GENX_(__NR_chroot, sys_chroot), // 61
//.. // (__NR_ustat, sys_ustat) // 62 SVr4 -- deprecated
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 */* (ANSI C)
//.. // (__NR_ssetmask, sys_ssetmask), // 69 */* (ANSI C)
//..
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_old_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 -- obsolete
//..
GENX_(__NR_readlink, sys_readlink), // 85
//.. // (__NR_uselib, sys_uselib), // 86 */Linux
//.. // (__NR_swapon, sys_swapon), // 87 */Linux
//.. // (__NR_reboot, sys_reboot), // 88 */Linux
//.. // (__NR_readdir, old_readdir), // 89 -- superseded
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 -- obsolete
//..
//.. GENX_(__NR_iopl, sys_iopl), // 110
LINX_(__NR_vhangup, sys_vhangup), // 111
//.. GENX_(__NR_idle, sys_ni_syscall), // 112
//.. // (__NR_vm86old, sys_vm86old), // 113 x86/Linux-only
GENXY(__NR_wait4, sys_wait4), // 114
//..
//.. // (__NR_swapoff, sys_swapoff), // 115 */Linux
LINXY(__NR_sysinfo, sys_sysinfo), // 116
LINXY(__NR_ipc, sys_ipc), // 117
GENX_(__NR_fsync, sys_fsync), // 118
PLAX_(__NR_sigreturn, sys_sigreturn), // 119 ?/Linux
//..
LINX_(__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
LINX_(__NR_init_module, sys_init_module), // 128
LINX_(__NR_delete_module, sys_delete_module), // 129
//..
//.. // Nb: get_kernel_syms() was removed 2.4-->2.6
//.. 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 */Linux
//..
//.. // (__NR_sysfs, sys_sysfs), // 135 SVr4
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
GENX_(__NR_getsid, sys_getsid), // 147
GENX_(__NR_fdatasync, sys_fdatasync), // 148
LINXY(__NR__sysctl, sys_sysctl), // 149
//..
GENX_(__NR_mlock, sys_mlock), // 150
GENX_(__NR_munlock, sys_munlock), // 151
GENX_(__NR_mlockall, sys_mlockall), // 152
LINX_(__NR_munlockall, sys_munlockall), // 153
LINXY(__NR_sched_setparam, sys_sched_setparam), // 154
//..
LINXY(__NR_sched_getparam, sys_sched_getparam), // 155
LINX_(__NR_sched_setscheduler, sys_sched_setscheduler), // 156
LINX_(__NR_sched_getscheduler, sys_sched_getscheduler), // 157
LINX_(__NR_sched_yield, sys_sched_yield), // 158
LINX_(__NR_sched_get_priority_max, sys_sched_get_priority_max),// 159
LINX_(__NR_sched_get_priority_min, sys_sched_get_priority_min),// 160
LINXY(__NR_sched_rr_get_interval, sys_sched_rr_get_interval), // 161
GENXY(__NR_nanosleep, sys_nanosleep), // 162
GENX_(__NR_mremap, sys_mremap), // 163
LINX_(__NR_setresuid, sys_setresuid), // 164
LINXY(__NR_getresuid, sys_getresuid), // 165
//.. GENX_(__NR_query_module, sys_ni_syscall), // 166
GENXY(__NR_poll, sys_poll), // 167
//.. // (__NR_nfsservctl, sys_nfsservctl), // 168 */Linux
//..
LINX_(__NR_setresgid, sys_setresgid), // 169
LINXY(__NR_getresgid, sys_getresgid), // 170
LINXY(__NR_prctl, sys_prctl), // 171
PLAX_(__NR_rt_sigreturn, sys_rt_sigreturn), // 172
LINXY(__NR_rt_sigaction, sys_rt_sigaction), // 173
LINXY(__NR_rt_sigprocmask, sys_rt_sigprocmask), // 174
LINXY(__NR_rt_sigpending, sys_rt_sigpending), // 175
LINXY(__NR_rt_sigtimedwait, sys_rt_sigtimedwait), // 176
LINXY(__NR_rt_sigqueueinfo, sys_rt_sigqueueinfo), // 177
LINX_(__NR_rt_sigsuspend, sys_rt_sigsuspend), // 178
GENXY(__NR_pread64, sys_pread64), // 179
GENX_(__NR_pwrite64, sys_pwrite64), // 180
GENX_(__NR_chown, sys_chown), // 181
GENXY(__NR_getcwd, sys_getcwd), // 182
LINXY(__NR_capget, sys_capget), // 183
LINX_(__NR_capset, sys_capset), // 184
GENXY(__NR_sigaltstack, sys_sigaltstack), // 185
LINXY(__NR_sendfile, sys_sendfile), // 186
//.. GENXY(__NR_getpmsg, sys_getpmsg), // 187
//.. GENX_(__NR_putpmsg, sys_putpmsg), // 188
// Nb: we treat vfork as fork
GENX_(__NR_vfork, sys_fork), // 189
GENXY(__NR_ugetrlimit, sys_getrlimit), // 190
LINX_(__NR_readahead, sys_readahead), // 191 */Linux
PLAX_(__NR_mmap2, sys_mmap2), // 192
GENX_(__NR_truncate64, sys_truncate64), // 193
GENX_(__NR_ftruncate64, sys_ftruncate64), // 194
//..
PLAXY(__NR_stat64, sys_stat64), // 195
PLAXY(__NR_lstat64, sys_lstat64), // 196
PLAXY(__NR_fstat64, sys_fstat64), // 197
// __NR_pciconfig_read // 198
// __NR_pciconfig_write // 199
// __NR_pciconfig_iobase // 200
// __NR_multiplexer // 201
GENXY(__NR_getdents64, sys_getdents64), // 202
LINX_(__NR_pivot_root, sys_pivot_root), // 203
LINXY(__NR_fcntl64, sys_fcntl64), // 204
GENX_(__NR_madvise, sys_madvise), // 205
GENXY(__NR_mincore, sys_mincore), // 206
LINX_(__NR_gettid, sys_gettid), // 207
//.. LINX_(__NR_tkill, sys_tkill), // 208 */Linux
LINX_(__NR_setxattr, sys_setxattr), // 209
LINX_(__NR_lsetxattr, sys_lsetxattr), // 210
LINX_(__NR_fsetxattr, sys_fsetxattr), // 211
LINXY(__NR_getxattr, sys_getxattr), // 212
LINXY(__NR_lgetxattr, sys_lgetxattr), // 213
LINXY(__NR_fgetxattr, sys_fgetxattr), // 214
LINXY(__NR_listxattr, sys_listxattr), // 215
LINXY(__NR_llistxattr, sys_llistxattr), // 216
LINXY(__NR_flistxattr, sys_flistxattr), // 217
LINX_(__NR_removexattr, sys_removexattr), // 218
LINX_(__NR_lremovexattr, sys_lremovexattr), // 219
LINX_(__NR_fremovexattr, sys_fremovexattr), // 220
LINXY(__NR_futex, sys_futex), // 221
LINX_(__NR_sched_setaffinity, sys_sched_setaffinity), // 222
LINXY(__NR_sched_getaffinity, sys_sched_getaffinity), // 223
/* 224 currently unused */
// __NR_tuxcall // 225
LINXY(__NR_sendfile64, sys_sendfile64), // 226
//..
LINX_(__NR_io_setup, sys_io_setup), // 227
LINX_(__NR_io_destroy, sys_io_destroy), // 228
LINXY(__NR_io_getevents, sys_io_getevents), // 229
LINX_(__NR_io_submit, sys_io_submit), // 230
LINXY(__NR_io_cancel, sys_io_cancel), // 231
//..
LINX_(__NR_set_tid_address, sys_set_tid_address), // 232
LINX_(__NR_fadvise64, sys_fadvise64), // 233 */(Linux?)
LINX_(__NR_exit_group, sys_exit_group), // 234
//.. GENXY(__NR_lookup_dcookie, sys_lookup_dcookie), // 235
LINXY(__NR_epoll_create, sys_epoll_create), // 236
LINX_(__NR_epoll_ctl, sys_epoll_ctl), // 237
LINXY(__NR_epoll_wait, sys_epoll_wait), // 238
//.. // (__NR_remap_file_pages, sys_remap_file_pages), // 239 */Linux
LINXY(__NR_timer_create, sys_timer_create), // 240
LINXY(__NR_timer_settime, sys_timer_settime), // 241
LINXY(__NR_timer_gettime, sys_timer_gettime), // 242
LINX_(__NR_timer_getoverrun, sys_timer_getoverrun), // 243
LINX_(__NR_timer_delete, sys_timer_delete), // 244
LINX_(__NR_clock_settime, sys_clock_settime), // 245
LINXY(__NR_clock_gettime, sys_clock_gettime), // 246
LINXY(__NR_clock_getres, sys_clock_getres), // 247
LINXY(__NR_clock_nanosleep, sys_clock_nanosleep), // 248
// __NR_swapcontext // 249
LINXY(__NR_tgkill, sys_tgkill), // 250 */Linux
//.. GENX_(__NR_utimes, sys_utimes), // 251
GENXY(__NR_statfs64, sys_statfs64), // 252
GENXY(__NR_fstatfs64, sys_fstatfs64), // 253
LINX_(__NR_fadvise64_64, sys_fadvise64_64), // 254 */(Linux?)
// __NR_rtas // 255
/* Number 256 is reserved for sys_debug_setcontext */
/* Number 257 is reserved for vserver */
/* Number 258 is reserved for new sys_remap_file_pages */
LINX_(__NR_mbind, sys_mbind), // 259
LINXY(__NR_get_mempolicy, sys_get_mempolicy), // 260
LINX_(__NR_set_mempolicy, sys_set_mempolicy), // 261
LINXY(__NR_mq_open, sys_mq_open), // 262
LINX_(__NR_mq_unlink, sys_mq_unlink), // 263
LINX_(__NR_mq_timedsend, sys_mq_timedsend), // 264
LINXY(__NR_mq_timedreceive, sys_mq_timedreceive), // 265
LINX_(__NR_mq_notify, sys_mq_notify), // 266
LINXY(__NR_mq_getsetattr, sys_mq_getsetattr), // 267
// __NR_kexec_load // 268
/* Number 269 is reserved for sys_add_key */
/* Number 270 is reserved for sys_request_key */
/* Number 271 is reserved for sys_keyctl */
/* Number 272 is reserved for sys_waitid */
LINX_(__NR_ioprio_set, sys_ioprio_set), // 273
LINX_(__NR_ioprio_get, sys_ioprio_get), // 274
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
PLAXY(__NR_spu_run, sys_spu_run), // 278
PLAX_(__NR_spu_create, sys_spu_create), // 279
LINXY(__NR_pselect6, sys_pselect6), // 280
LINXY(__NR_ppoll, sys_ppoll), // 281
LINXY(__NR_openat, sys_openat), // 286
LINX_(__NR_mkdirat, sys_mkdirat), // 287
LINX_(__NR_mknodat, sys_mknodat), // 288
LINX_(__NR_fchownat, sys_fchownat), // 289
LINX_(__NR_futimesat, sys_futimesat), // 290
PLAXY(__NR_fstatat64, sys_fstatat64), // 291
LINX_(__NR_unlinkat, sys_unlinkat), // 292
LINX_(__NR_renameat, sys_renameat), // 293
LINX_(__NR_linkat, sys_linkat), // 294
LINX_(__NR_symlinkat, sys_symlinkat), // 295
LINX_(__NR_readlinkat, sys_readlinkat), // 296
LINX_(__NR_fchmodat, sys_fchmodat), // 297
LINX_(__NR_faccessat, sys_faccessat), // 298
LINX_(__NR_set_robust_list, sys_set_robust_list), // 299
LINXY(__NR_get_robust_list, sys_get_robust_list), // 300
LINXY(__NR_move_pages, sys_move_pages), // 301
LINXY(__NR_getcpu, sys_getcpu), // 302
LINXY(__NR_epoll_pwait, sys_epoll_pwait), // 303
LINX_(__NR_utimensat, sys_utimensat), // 304
LINXY(__NR_signalfd, sys_signalfd), // 305
LINXY(__NR_timerfd_create, sys_timerfd_create), // 306
LINXY(__NR_eventfd, sys_eventfd), // 307
LINX_(__NR_sync_file_range2, sys_sync_file_range2), // 308
LINX_(__NR_fallocate, sys_fallocate), // 309
// LINXY(__NR_subpage_prot, sys_ni_syscall), // 310
LINXY(__NR_timerfd_settime, sys_timerfd_settime), // 311
LINXY(__NR_timerfd_gettime, sys_timerfd_gettime), // 312
LINXY(__NR_signalfd4, sys_signalfd4), // 313
LINXY(__NR_eventfd2, sys_eventfd2), // 314
LINXY(__NR_epoll_create1, sys_epoll_create1), // 315
LINXY(__NR_dup3, sys_dup3), // 316
LINXY(__NR_pipe2, sys_pipe2), // 317
LINXY(__NR_inotify_init1, sys_inotify_init1), // 318
LINXY(__NR_perf_event_open, sys_perf_event_open), // 319
LINXY(__NR_preadv, sys_preadv), // 320
LINX_(__NR_pwritev, sys_pwritev), // 321
LINXY(__NR_rt_tgsigqueueinfo, sys_rt_tgsigqueueinfo),// 322
LINXY(__NR_socket, sys_socket), // 326
LINX_(__NR_bind, sys_bind), // 327
LINX_(__NR_connect, sys_connect), // 328
LINX_(__NR_listen, sys_listen), // 329
LINXY(__NR_accept, sys_accept), // 330
LINXY(__NR_getsockname, sys_getsockname), // 331
LINXY(__NR_getpeername, sys_getpeername), // 332
LINX_(__NR_send, sys_send), // 334
LINX_(__NR_sendto, sys_sendto), // 335
LINXY(__NR_recv, sys_recv), // 336
LINXY(__NR_recvfrom, sys_recvfrom), // 337
LINX_(__NR_shutdown, sys_shutdown), // 338
LINX_(__NR_setsockopt, sys_setsockopt), // 339
LINXY(__NR_recvmmsg, sys_recvmmsg), // 343
LINXY(__NR_accept4, sys_accept4), // 344
LINX_(__NR_clock_adjtime, sys_clock_adjtime), // 347
LINX_(__NR_syncfs, sys_syncfs), // 348
LINXY(__NR_sendmmsg, sys_sendmmsg), // 349
LINXY(__NR_process_vm_readv, sys_process_vm_readv), // 351
LINX_(__NR_process_vm_writev, sys_process_vm_writev),// 352
LINXY(__NR_getrandom, sys_getrandom), // 359
LINXY(__NR_memfd_create, sys_memfd_create) // 360
};
SyscallTableEntry* ML_(get_linux_syscall_entry) ( UInt sysno )
{
const UInt syscall_table_size
= sizeof(syscall_table) / sizeof(syscall_table[0]);
/* Is it in the contiguous initial section of the table? */
if (sysno < syscall_table_size) {
SyscallTableEntry* sys = &syscall_table[sysno];
if (sys->before == NULL)
return NULL; /* no entry */
else
return sys;
}
/* Can't find a wrapper */
return NULL;
}
#endif // defined(VGP_ppc32_linux)
/*--------------------------------------------------------------------*/
/*--- end ---*/
/*--------------------------------------------------------------------*/
Reference in New Issue View Git Blame Copy Permalink