granicus.if.org Git - strace/blob - dirent.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) 2005-2015 Dmitry V. Levin <ldv@altlinux.org>
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. The name of the author may not be used to endorse or promote products
  18  *    derived from this software without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  21  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  22  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  23  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  24  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  25  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  26  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  27  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  28  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  29  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include "defs.h"
  33
  34 #include DEF_MPERS_TYPE(kernel_dirent)
  35
  36 #include MPERS_DEFS
  37
  38 #define D_NAME_LEN_MAX 256
  39
  40 static void
  41 print_old_dirent(struct tcb *tcp, long addr)
  42 {
  43         kernel_dirent d;
  44
  45         if (umove_or_printaddr(tcp, addr, &d))
  46                 return;
  47
  48         tprintf("{d_ino=%llu, d_off=%llu, d_reclen=%u, d_name=",
  49                 zero_extend_signed_to_ull(d.d_ino),
  50                 zero_extend_signed_to_ull(d.d_off), d.d_reclen);
  51         if (d.d_reclen > D_NAME_LEN_MAX)
  52                 d.d_reclen = D_NAME_LEN_MAX;
  53         printpathn(tcp, addr + offsetof(kernel_dirent, d_name), d.d_reclen);
  54         tprints("}");
  55 }
  56
  57 SYS_FUNC(readdir)
  58 {
  59         if (entering(tcp)) {
  60                 printfd(tcp, tcp->u_arg[0]);
  61                 tprints(", ");
  62         } else {
  63                 if (tcp->u_rval == 0)
  64                         printaddr(tcp->u_arg[1]);
  65                 else
  66                         print_old_dirent(tcp, tcp->u_arg[1]);
  67                 /* Not much point in printing this out, it is always 1. */
  68                 if (tcp->u_arg[2] != 1)
  69                         tprintf(", %lu", tcp->u_arg[2]);
  70         }
  71         return 0;
  72 }
  73
  74 SYS_FUNC(getdents)
  75 {
  76         unsigned int i, len, dents = 0;
  77         unsigned char *buf;
  78
  79         if (entering(tcp)) {
  80                 printfd(tcp, tcp->u_arg[0]);
  81                 tprints(", ");
  82                 return 0;
  83         }
  84
  85         const unsigned int count = tcp->u_arg[2];
  86
  87         if (syserror(tcp) || !verbose(tcp)) {
  88                 printaddr(tcp->u_arg[1]);
  89                 tprintf(", %u", count);
  90                 return 0;
  91         }
  92
  93         /* Beware of insanely large or too small values in tcp->u_rval */
  94         if (tcp->u_rval > 1024*1024)
  95                 len = 1024*1024;
  96         else if (tcp->u_rval < (int) sizeof(kernel_dirent))
  97                 len = 0;
  98         else
  99                 len = tcp->u_rval;
 100
 101         if (len) {
 102                 buf = malloc(len);
 103                 if (!buf || umoven(tcp, tcp->u_arg[1], len, buf) < 0) {
 104                         printaddr(tcp->u_arg[1]);
 105                         tprintf(", %u", count);
 106                         free(buf);
 107                         return 0;
 108                 }
 109         } else {
 110                 buf = NULL;
 111         }
 112
 113         if (!abbrev(tcp))
 114                 tprints("[");
 115         for (i = 0; len && i <= len - sizeof(kernel_dirent); ) {
 116                 kernel_dirent *d = (kernel_dirent *) &buf[i];
 117
 118                 if (!abbrev(tcp)) {
 119                         int oob = d->d_reclen < sizeof(kernel_dirent) ||
 120                                   i + d->d_reclen - 1 >= len;
 121                         int d_name_len = oob ? len - i : d->d_reclen;
 122                         d_name_len -= offsetof(kernel_dirent, d_name) + 1;
 123                         if (d_name_len > D_NAME_LEN_MAX)
 124                                 d_name_len = D_NAME_LEN_MAX;
 125
 126                         tprintf("%s{d_ino=%llu, d_off=%llu, d_reclen=%u"
 127                                 ", d_name=", i ? ", " : "",
 128                                 zero_extend_signed_to_ull(d->d_ino),
 129                                 zero_extend_signed_to_ull(d->d_off),
 130                                 d->d_reclen);
 131
 132                         if (print_quoted_string(d->d_name, d_name_len,
 133                                                 QUOTE_0_TERMINATED) > 0) {
 134                                 tprints("...");
 135                         }
 136
 137                         tprints(", d_type=");
 138                         if (oob)
 139                                 tprints("?");
 140                         else
 141                                 printxval(dirent_types, buf[i + d->d_reclen - 1], "DT_???");
 142                         tprints("}");
 143                 }
 144                 dents++;
 145                 if (d->d_reclen < sizeof(kernel_dirent)) {
 146                         tprints("/* d_reclen < sizeof(struct dirent) */");
 147                         break;
 148                 }
 149                 i += d->d_reclen;
 150         }
 151         if (!abbrev(tcp))
 152                 tprints("]");
 153         else
 154                 tprintf("/* %u entries */", dents);
 155         tprintf(", %u", count);
 156         free(buf);
 157         return 0;
 158 }