1 /* savedir.c -- save the list of files in a directory in a string
3 Copyright (C) 1990, 1997, 1998, 1999, 2000, 2001, 2003, 2004, 2005,
4 2006 Free Software Foundation, Inc.
6 This program is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>. */
19 /* Written by David MacKenzie <djm@gnu.ai.mit.edu>. */
25 #include <sys/types.h>
30 #ifndef _D_EXACT_NAMLEN
31 # define _D_EXACT_NAMLEN(dp) strlen ((dp)->d_name)
41 #ifndef NAME_SIZE_DEFAULT
42 # define NAME_SIZE_DEFAULT 512
45 /* The results of opendir() in this file are not used with dirfd and fchdir,
46 therefore save some unnecessary work in fchdir.c. */
50 /* Return a freshly allocated string containing the file names
51 in directory DIRP, separated by '\0' characters;
52 the end is marked by two '\0' characters in a row.
53 Return NULL (setting errno) if DIRP cannot be read or closed.
54 If DIRP is NULL, return NULL without affecting errno. */
57 savedirstream (DIR *dirp)
60 size_t allocated = NAME_SIZE_DEFAULT;
67 name_space = xmalloc (allocated);
71 struct dirent const *dp;
79 /* Skip "", ".", and "..". "" is returned by at least one buggy
80 implementation: Solaris 2.4 readdir on NFS file systems. */
82 if (entry[entry[0] != '.' ? 0 : entry[1] != '.' ? 1 : 2] != '\0')
84 size_t entry_size = _D_EXACT_NAMLEN (dp) + 1;
85 if (used + entry_size < used)
87 if (allocated <= used + entry_size)
91 if (2 * allocated < allocated)
95 while (allocated <= used + entry_size);
97 name_space = xrealloc (name_space, allocated);
99 memcpy (name_space + used, entry, entry_size);
103 name_space[used] = '\0';
105 if (closedir (dirp) != 0)
116 /* Return a freshly allocated string containing the file names
117 in directory DIR, separated by '\0' characters;
118 the end is marked by two '\0' characters in a row.
119 Return NULL (setting errno) if DIR cannot be opened, read, or closed. */
122 savedir (char const *dir)
124 return savedirstream (opendir (dir));
127 /* Return a freshly allocated string containing the file names
128 in directory FD, separated by '\0' characters;
129 the end is marked by two '\0' characters in a row.
130 Return NULL (setting errno) if FD cannot be read or closed. */
135 return savedirstream (fdopendir (fd));