iod.c revision 7fd2651f67a43fad3cc1cc2db7c0e5f9c568023c 
1/*
2 * iod.c		- Iterate a function on each entry of a directory
3 *
4 * Copyright (C) 1993, 1994  Remy Card <card@masi.ibp.fr>
5 *                           Laboratoire MASI, Institut Blaise Pascal
6 *                           Universite Pierre et Marie Curie (Paris VI)
7 *
8 * This file can be redistributed under the terms of the GNU Library General
9 * Public License
10 */
11
12/*
13 * History:
14 * 93/10/30	- Creation
15 */
16
17#include "e2p.h"
18#if HAVE_UNISTD_H
19#include <unistd.h>
20#endif
21#include <stdlib.h>
22#include <string.h>
23
24int iterate_on_dir (const char * dir_name,
25		    int (*func) (const char *, struct dirent *, void *),
26		    void * private)
27{
28	DIR * dir;
29	struct dirent *de, *dep;
30	int	max_len = -1, len, ret = 0;
31
32#if HAVE_PATHCONF && defined(_PC_NAME_MAX)
33	max_len = pathconf(dir_name, _PC_NAME_MAX);
34#endif
35	if (max_len == -1) {
36#ifdef _POSIX_NAME_MAX
37		max_len = _POSIX_NAME_MAX;
38#else
39#ifdef NAME_MAX
40		max_len = NAME_MAX;
41#else
42		max_len = 256;
43#endif /* NAME_MAX */
44#endif /* _POSIX_NAME_MAX */
45	}
46	max_len += sizeof(struct dirent);
47
48	de = malloc(max_len+1);
49	if (!de)
50		return -1;
51	memset(de, 0, max_len+1);
52
53	dir = opendir (dir_name);
54	if (dir == NULL) {
55		free(de);
56		return -1;
57	}
58	while ((dep = readdir (dir))) {
59#ifdef HAVE_RECLEN_DIRENT
60		len = dep->d_reclen;
61		if (len > max_len)
62			len = max_len;
63#else
64		len = sizeof(struct dirent);
65#endif
66		memcpy(de, dep, len);
67		if ((*func)(dir_name, de, private))
68			ret++;
69	}
70	free(de);
71	closedir(dir);
72	return ret;
73}
74