contrib/netbsd-tests/lib/libc/gen/t_dir.c

   1 /* $NetBSD: t_dir.c,v 1.10 2017/01/11 18:15:02 christos 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 }