t_dir.c revision 313535 
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
43ATF_TC(seekdir_basic);
44ATF_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
51ATF_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
137ATF_TC(telldir_leak);
138ATF_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
145ATF_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
181ATF_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