Home | History | Annotate | Download | only in strace
      1 /*
      2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk (at) cs.few.eur.nl>
      3  * Copyright (c) 1993 Branko Lankester <branko (at) hacktic.nl>
      4  * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs (at) world.std.com>
      5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert (at) cistron.nl>
      6  * Copyright (c) 2005-2015 Dmitry V. Levin <ldv (at) 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 *const tcp, const kernel_ulong_t 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(", %" PRI_klu, 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 }
    159