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);
ATF_TC_HEAD(seekdir_basic,tc)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
ATF_TC_BODY(seekdir_basic,tc)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 /* There is no sbrk on AArch64 and RISC-V */
138 #if !defined(__aarch64__) && !defined(__riscv)
139 ATF_TC(telldir_leak);
ATF_TC_HEAD(telldir_leak,tc)140 ATF_TC_HEAD(telldir_leak, tc)
141 {
142
143 atf_tc_set_md_var(tc, "descr",
144 "Check telldir(3) for memory leakage (PR lib/24324)");
145 }
146
ATF_TC_BODY(telldir_leak,tc)147 ATF_TC_BODY(telldir_leak, tc)
148 {
149 DIR *dp;
150 char *memused;
151 int i;
152 int oktouse = 4096;
153
154 dp = opendir(".");
155 if (dp == NULL)
156 atf_tc_fail("Could not open current directory");
157
158 (void)telldir(dp);
159 memused = sbrk(0);
160 closedir(dp);
161
162 for (i = 0; i < 1000; i++) {
163 dp = opendir(".");
164 if (dp == NULL)
165 atf_tc_fail("Could not open current directory");
166
167 (void)telldir(dp);
168 closedir(dp);
169
170 if ((char *)sbrk(0) - memused > oktouse) {
171 (void)printf("Used %td extra bytes for %d telldir "
172 "calls", ((char *)sbrk(0) - memused), i);
173 oktouse = (char *)sbrk(0) - memused;
174 }
175 }
176 if (oktouse > 4096) {
177 atf_tc_fail("Failure: leaked %d bytes", oktouse);
178 } else {
179 (void)printf("OK: used %td bytes\n", (char *)(sbrk(0))-memused);
180 }
181 }
182 #endif
183
ATF_TP_ADD_TCS(tp)184 ATF_TP_ADD_TCS(tp)
185 {
186
187 ATF_TP_ADD_TC(tp, seekdir_basic);
188 #if !defined(__aarch64__) && !defined(__riscv)
189 ATF_TP_ADD_TC(tp, telldir_leak);
190 #endif
191
192 return atf_no_error();
193 }
194