granicus.if.org Git - strace/blob - lseek.c

   1 /*
   2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
   3  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
   4  * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
   5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
   6  * Copyright (c) 2002-2005 Roland McGrath <roland@redhat.com>
   7  * Copyright (c) 2009 Andreas Schwab <schwab@redhat.com>
   8  * Copyright (c) 2012 H.J. Lu <hongjiu.lu@intel.com>
   9  * Copyright (c) 2013 Denys Vlasenko <vda.linux@googlemail.com>
  10  * Copyright (c) 2014-2016 Dmitry V. Levin <ldv@altlinux.org>
  11  * All rights reserved.
  12  *
  13  * Redistribution and use in source and binary forms, with or without
  14  * modification, are permitted provided that the following conditions
  15  * are met:
  16  * 1. Redistributions of source code must retain the above copyright
  17  *    notice, this list of conditions and the following disclaimer.
  18  * 2. Redistributions in binary form must reproduce the above copyright
  19  *    notice, this list of conditions and the following disclaimer in the
  20  *    documentation and/or other materials provided with the distribution.
  21  * 3. The name of the author may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  28  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  29  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  30  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  32  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  33  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  */
  35
  36 #include "defs.h"
  37
  38 #include "xlat/whence_codes.h"
  39
  40 /* Linux kernel has exactly one version of lseek:
  41  * fs/read_write.c::SYSCALL_DEFINE3(lseek, unsigned, fd, off_t, offset, unsigned, origin)
  42  * In kernel, off_t is always the same as (kernel's) long
  43  * (see include/uapi/asm-generic/posix_types.h),
  44  * which means that on x32 we need to use tcp->ext_arg[N] to get offset argument.
  45  * Use test/x32_lseek.c to test lseek decoding.
  46  */
  47 #if defined(LINUX_MIPSN32) || defined(X32)
  48 SYS_FUNC(lseek)
  49 {
  50         printfd(tcp, tcp->u_arg[0]);
  51
  52         long long offset;
  53 # ifdef X32
  54         /* tcp->ext_arg is not initialized for i386 personality */
  55         if (current_personality == 1)
  56                 offset = tcp->u_arg[1];
  57         else
  58 # endif
  59         offset = tcp->ext_arg[1];
  60         int whence = tcp->u_arg[2];
  61
  62         tprintf(", %lld, ", offset);
  63         printxval(whence_codes, whence, "SEEK_???");
  64
  65         return RVAL_DECODED | RVAL_LUDECIMAL;
  66 }
  67 #else
  68 SYS_FUNC(lseek)
  69 {
  70         printfd(tcp, tcp->u_arg[0]);
  71
  72         long offset =
  73 # if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
  74 #  ifdef X86_64
  75                 current_personality == 1 ?
  76                         (long)(int) tcp->u_arg[1] : tcp->u_arg[1];
  77 #  else
  78                 current_wordsize == 4 ?
  79                         (long)(int) tcp->u_arg[1] : tcp->u_arg[1];
  80 #  endif
  81 # else
  82                 tcp->u_arg[1];
  83 # endif
  84         int whence = tcp->u_arg[2];
  85
  86         tprintf(", %ld, ", offset);
  87         printxval(whence_codes, whence, "SEEK_???");
  88
  89         return RVAL_DECODED | RVAL_UDECIMAL;
  90 }
  91 #endif
  92
  93 /* llseek syscall takes explicitly two ulong arguments hi, lo,
  94  * rather than one 64-bit argument for which LONG_LONG works
  95  * appropriate for the native byte order.
  96  *
  97  * See kernel's fs/read_write.c::SYSCALL_DEFINE5(llseek, ...)
  98  *
  99  * hi,lo are "unsigned longs" and combined exactly this way in kernel:
 100  * ((loff_t) hi << 32) | lo
 101  * Note that for architectures with kernel's long wider than userspace long
 102  * (such as x32), combining code will use *kernel's*, i.e. *wide* longs
 103  * for hi and lo. We would need to use tcp->ext_arg[N] on x32...
 104  * ...however, x32 (and x86_64) does not _have_ llseek syscall as such.
 105  */
 106 SYS_FUNC(llseek)
 107 {
 108         if (entering(tcp)) {
 109                 printfd(tcp, tcp->u_arg[0]);
 110                 tprintf(", %lld, ",
 111                         ((unsigned long long) (unsigned long) tcp->u_arg[1]) << 32
 112                         | (unsigned long long) (unsigned long) tcp->u_arg[2]);
 113         } else {
 114                 printnum_int64(tcp, tcp->u_arg[3], "%" PRIu64);
 115                 tprints(", ");
 116                 printxval(whence_codes, tcp->u_arg[4], "SEEK_???");
 117         }
 118         return 0;
 119 }