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 HAVE_STRUCT_TCB_EXT_ARG
  48 SYS_FUNC(lseek)
  49 {
  50         printfd(tcp, tcp->u_arg[0]);
  51
  52         long long offset;
  53 # if SUPPORTED_PERSONALITIES > 1
  54         /* tcp->ext_arg is not initialized for compat personality */
  55         if (current_personality == 1) {
  56                 offset = tcp->u_arg[1];
  57         } else
  58 # endif
  59         {
  60                 offset = tcp->ext_arg[1];
  61         }
  62         int whence = tcp->u_arg[2];
  63
  64         tprintf(", %lld, ", offset);
  65         printxval(whence_codes, whence, "SEEK_???");
  66
  67         return RVAL_DECODED | RVAL_LUDECIMAL;
  68 }
  69 #else
  70 SYS_FUNC(lseek)
  71 {
  72         printfd(tcp, tcp->u_arg[0]);
  73
  74         long offset =
  75 # if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
  76 #  ifdef X86_64
  77                 current_personality == 1 ?
  78                         (long)(int) tcp->u_arg[1] : tcp->u_arg[1];
  79 #  else
  80                 current_wordsize == 4 ?
  81                         (long)(int) tcp->u_arg[1] : tcp->u_arg[1];
  82 #  endif
  83 # else
  84                 tcp->u_arg[1];
  85 # endif
  86         int whence = tcp->u_arg[2];
  87
  88         tprintf(", %ld, ", offset);
  89         printxval(whence_codes, whence, "SEEK_???");
  90
  91         return RVAL_DECODED | RVAL_UDECIMAL;
  92 }
  93 #endif
  94
  95 /* llseek syscall takes explicitly two ulong arguments hi, lo,
  96  * rather than one 64-bit argument for which LONG_LONG works
  97  * appropriate for the native byte order.
  98  *
  99  * See kernel's fs/read_write.c::SYSCALL_DEFINE5(llseek, ...)
 100  *
 101  * hi,lo are "unsigned longs" and combined exactly this way in kernel:
 102  * ((loff_t) hi << 32) | lo
 103  * Note that for architectures with kernel's long wider than userspace long
 104  * (such as x32), combining code will use *kernel's*, i.e. *wide* longs
 105  * for hi and lo. We would need to use tcp->ext_arg[N] on x32...
 106  * ...however, x32 (and x86_64) does not _have_ llseek syscall as such.
 107  */
 108 SYS_FUNC(llseek)
 109 {
 110         if (entering(tcp)) {
 111                 printfd(tcp, tcp->u_arg[0]);
 112                 tprintf(", %lld, ",
 113                         (zero_extend_signed_to_ull(tcp->u_arg[1]) << 32)
 114                         | zero_extend_signed_to_ull(tcp->u_arg[2]));
 115         } else {
 116                 printnum_int64(tcp, tcp->u_arg[3], "%" PRIu64);
 117                 tprints(", ");
 118                 printxval(whence_codes, tcp->u_arg[4], "SEEK_???");
 119         }
 120         return 0;
 121 }