t_dir.c revision 1.8 
1/* $NetBSD: t_dir.c,v 1.8 2017/01/11 07:26:17 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	entry = readdir(dp);
79
80	/* get first entry */
81	entry = readdir(dp);
82	here = telldir(dp);
83	ATF_REQUIRE_MSG(here != -1,
84	    "telldir failed: %s", strerror(errno));
85
86	/* get second entry */
87	entry = readdir(dp);
88	wasname = strdup(entry->d_name);
89	if (wasname == NULL)
90		atf_tc_fail("cannot allocate memory");
91
92	/* get third entry */
93	entry = readdir(dp);
94
95	/* try to return to the position after the first entry */
96	seekdir(dp, here);
97	entry = readdir(dp);
98
99	if (entry == NULL)
100		atf_tc_fail("entry 1 not found");
101	if (strcmp(entry->d_name, wasname) != 0)
102		atf_tc_fail("1st seekdir found wrong name");
103
104	/* try again, and throw in a telldir() for good measure */
105	seekdir(dp, here);
106	here = telldir(dp);
107	entry = readdir(dp);
108
109	if (entry == NULL)
110		atf_tc_fail("entry 2 not found");
111	if (strcmp(entry->d_name, wasname) != 0)
112		atf_tc_fail("2nd seekdir found wrong name");
113
114	/* One more time, to make sure that telldir() doesn't affect result */
115	seekdir(dp, here);
116	entry = readdir(dp);
117
118	if (entry == NULL)
119		atf_tc_fail("entry 3 not found");
120	if (strcmp(entry->d_name, wasname) != 0)
121		atf_tc_fail("3rd seekdir found wrong name");
122
123	closedir(dp);
124	free(wasname);
125}
126
127ATF_TC(telldir_leak);
128ATF_TC_HEAD(telldir_leak, tc)
129{
130
131	atf_tc_set_md_var(tc, "descr",
132	    "Check telldir(3) for memory leakage (PR lib/24324)");
133}
134
135ATF_TC_BODY(telldir_leak, tc)
136{
137	DIR *dp;
138	char *memused;
139	int i;
140	int oktouse = 4096;
141
142	dp = opendir(".");
143	if (dp == NULL)
144		atf_tc_fail("Could not open current directory");
145
146	(void)telldir(dp);
147	memused = sbrk(0);
148	closedir(dp);
149
150	for (i = 0; i < 1000; i++) {
151		dp = opendir(".");
152		if (dp == NULL)
153			atf_tc_fail("Could not open current directory");
154
155		(void)telldir(dp);
156		closedir(dp);
157
158		if ((char *)sbrk(0) - memused > oktouse) {
159			(void)printf("Used %td extra bytes for %d telldir "
160			    "calls", ((char *)sbrk(0) - memused), i);
161			oktouse = (char *)sbrk(0) - memused;
162		}
163	}
164	if (oktouse > 4096) {
165		atf_tc_fail("Failure: leaked %d bytes", oktouse);
166	} else {
167		(void)printf("OK: used %td bytes\n", (char *)(sbrk(0))-memused);
168	}
169}
170
171ATF_TP_ADD_TCS(tp)
172{
173
174	ATF_TP_ADD_TC(tp, seekdir_basic);
175	ATF_TP_ADD_TC(tp, telldir_leak);
176
177	return atf_no_error();
178}
179