Home | History | Annotate | Line # | Download | only in gen
      1 /* $NetBSD: t_dir.c,v 1.11 2018/06/19 09:20:46 gson Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2010 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     17  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     20  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     26  * POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/stat.h>
     30 #include <assert.h>
     31 #include <atf-c.h>
     32 #include <dirent.h>
     33 #include <err.h>
     34 #include <errno.h>
     35 #include <fcntl.h>
     36 #include <stdio.h>
     37 #include <stdlib.h>
     38 #include <string.h>
     39 #include <unistd.h>
     40 
     41 
     42 
     43 ATF_TC(seekdir_basic);
     44 ATF_TC_HEAD(seekdir_basic, tc)
     45 {
     46 
     47 	atf_tc_set_md_var(tc, "descr", "Check telldir(3) and seekdir(3) "
     48 	    "for correct behavior (PR lib/24324)");
     49 }
     50 
     51 ATF_TC_BODY(seekdir_basic, tc)
     52 {
     53 	DIR *dp;
     54 	char *wasname;
     55 	struct dirent *entry;
     56 	long here;
     57 
     58 #define	CREAT(x, m)	do {						\
     59 		int _creat_fd;						\
     60 		ATF_REQUIRE_MSG((_creat_fd = creat((x), (m))) != -1,	\
     61 		    "creat(%s, %x) failed: %s", (x), (m),		\
     62 		    strerror(errno));					\
     63 		(void)close(_creat_fd);					\
     64 	} while (0)
     65 
     66 	ATF_REQUIRE_MSG(mkdir("t", 0755) == 0,
     67 	    "mkdir failed: %s", strerror(errno));
     68 	CREAT("t/a", 0600);
     69 	CREAT("t/b", 0600);
     70 	CREAT("t/c", 0600);
     71 
     72 	dp = opendir("t");
     73 	if ( dp == NULL)
     74 		atf_tc_fail("Could not open temp directory.");
     75 
     76 	/* skip two for . and .. */
     77 	entry = readdir(dp);
     78 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
     79 	    ".", strerror(errno));
     80 
     81 	entry = readdir(dp);
     82 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
     83 	    "..", strerror(errno));
     84 
     85 	/* get first entry */
     86 	entry = readdir(dp);
     87 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
     88 	    "first", strerror(errno));
     89 
     90 	here = telldir(dp);
     91 	ATF_REQUIRE_MSG(here != -1, "telldir failed: %s", strerror(errno));
     92 
     93 	/* get second entry */
     94 	entry = readdir(dp);
     95 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
     96 	    "second", strerror(errno));
     97 
     98 	wasname = strdup(entry->d_name);
     99 	if (wasname == NULL)
    100 		atf_tc_fail("cannot allocate memory");
    101 
    102 	/* get third entry */
    103 	entry = readdir(dp);
    104 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
    105 	    "third", strerror(errno));
    106 
    107 	/* try to return to the position after the first entry */
    108 	seekdir(dp, here);
    109 	entry = readdir(dp);
    110 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
    111 	    "first[1]", strerror(errno));
    112 	if (strcmp(entry->d_name, wasname) != 0)
    113 		atf_tc_fail("1st seekdir found wrong name");
    114 
    115 	/* try again, and throw in a telldir() for good measure */
    116 	seekdir(dp, here);
    117 	here = telldir(dp);
    118 	entry = readdir(dp);
    119 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
    120 	    "second[1]", strerror(errno));
    121 	if (strcmp(entry->d_name, wasname) != 0)
    122 		atf_tc_fail("2nd seekdir found wrong name");
    123 
    124 	/* One more time, to make sure that telldir() doesn't affect result */
    125 	seekdir(dp, here);
    126 	entry = readdir(dp);
    127 	ATF_REQUIRE_MSG(entry != NULL, "readdir[%s] failed: %s",
    128 	    "third[1]", strerror(errno));
    129 
    130 	if (strcmp(entry->d_name, wasname) != 0)
    131 		atf_tc_fail("3rd seekdir found wrong name");
    132 
    133 	closedir(dp);
    134 	free(wasname);
    135 }
    136 
    137 ATF_TC(telldir_leak);
    138 ATF_TC_HEAD(telldir_leak, tc)
    139 {
    140 
    141 	atf_tc_set_md_var(tc, "descr",
    142 	    "Check telldir(3) for memory leakage (PR lib/24324)");
    143 }
    144 
    145 ATF_TC_BODY(telldir_leak, tc)
    146 {
    147 	DIR *dp;
    148 	char *memused;
    149 	int i;
    150 	int oktouse = 4096;
    151 
    152 	dp = opendir(".");
    153 	if (dp == NULL)
    154 		atf_tc_fail("Could not open current directory");
    155 
    156 	(void)telldir(dp);
    157 	memused = sbrk(0);
    158 	closedir(dp);
    159 
    160 	for (i = 0; i < 1000; i++) {
    161 		dp = opendir(".");
    162 		if (dp == NULL)
    163 			atf_tc_fail("Could not open current directory");
    164 
    165 		(void)telldir(dp);
    166 		closedir(dp);
    167 
    168 		if ((char *)sbrk(0) - memused > oktouse) {
    169 			(void)printf("Used %td extra bytes for %d telldir "
    170 			    "calls", ((char *)sbrk(0) - memused), i);
    171 			oktouse = (char *)sbrk(0) - memused;
    172 		}
    173 	}
    174 	if (oktouse > 4096) {
    175 		atf_tc_fail("Failure: leaked %d bytes", oktouse);
    176 	} else {
    177 		(void)printf("OK: used %td bytes\n", (char *)(sbrk(0))-memused);
    178 	}
    179 }
    180 
    181 ATF_TP_ADD_TCS(tp)
    182 {
    183 
    184 	ATF_TP_ADD_TC(tp, seekdir_basic);
    185 	ATF_TP_ADD_TC(tp, telldir_leak);
    186 
    187 	return atf_no_error();
    188 }
    189