1 /* savedir.c -- save the list of files in a directory in a string
2 Copyright (C) 1990 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
18 /* Written by David MacKenzie <djm@gnu.ai.mit.edu>. */
20 #include <sys/types.h>
26 #if defined(DIRENT) || defined(_POSIX_VERSION)
28 #define NLENGTH(direct) (strlen((direct)->d_name))
29 #else /* not (DIRENT or _POSIX_VERSION) */
31 #define NLENGTH(direct) ((direct)->d_namlen)
41 #endif /* DIRENT or _POSIX_VERSION */
44 /* Fake a return value. */
45 #define CLOSEDIR(d) (closedir (d), 0)
47 #define CLOSEDIR(d) closedir (d)
63 /* Return a freshly allocated string containing the filenames
64 in directory DIR, separated by '\0' characters;
65 the end is marked by two '\0' characters in a row.
66 NAME_SIZE is the number of bytes to initially allocate
67 for the string; it will be enlarged as needed.
68 Return NULL if DIR cannot be opened or if out of memory. */
71 savedir (dir, name_size)
84 name_space = (char *) malloc (name_size);
85 if (name_space == NULL)
92 while ((dp = readdir (dirp)) != NULL)
94 /* Skip "." and ".." (some NFS filesystems' directories lack them). */
95 if (dp->d_name[0] != '.'
96 || (dp->d_name[1] != '\0'
97 && (dp->d_name[1] != '.' || dp->d_name[2] != '\0')))
99 unsigned size_needed = (namep - name_space) + NLENGTH (dp) + 2;
101 if (size_needed > name_size)
103 char *new_name_space;
105 while (size_needed > name_size)
108 new_name_space = realloc (name_space, name_size);
109 if (new_name_space == NULL)
114 namep += new_name_space - name_space;
115 name_space = new_name_space;
117 namep = stpcpy (namep, dp->d_name) + 1;