dpkg (1.18.25) stretch; urgency=medium
[dpkg] / lib / compat / scandir.c
CommitLineData
1479465f
GJ
1/*
2 * libcompat - system compatibility library
3 *
4 * Copyright © 1995 Ian Jackson <ijackson@chiark.greenend.org.uk>
5 * Copyright © 2008, 2009 Guillem Jover <guillem@debian.org>
6 *
7 * This is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program. If not, see <https://www.gnu.org/licenses/>.
19 */
20
21#include <config.h>
22
23#include <sys/types.h>
24
25#include <string.h>
26#include <dirent.h>
27#include <stdlib.h>
28
29#include "compat.h"
30
31static int
32cleanup(DIR *dir, struct dirent **dirlist, int used)
33{
34 if (dir)
35 closedir(dir);
36
37 if (dirlist) {
38 int i;
39
40 for (i = 0; i < used; i++)
41 free(dirlist[i]);
42 free(dirlist);
43 }
44
45 return -1;
46}
47
48int
49scandir(const char *dir, struct dirent ***namelist,
50 int (*filter)(const struct dirent *),
51 int (*cmp)(const void *, const void *))
52{
53 DIR *d;
54 struct dirent *e, *m, **list;
55 int used, avail;
56
57 d = opendir(dir);
58 if (!d)
59 return -1;
60
61 list = NULL;
62 used = avail = 0;
63
64 while ((e = readdir(d)) != NULL) {
65 if (filter != NULL && !filter(e))
66 continue;
67
68 if (used >= avail - 1) {
69 struct dirent **newlist;
70
71 if (avail)
72 avail *= 2;
73 else
74 avail = 20;
75 newlist = realloc(list, avail * sizeof(struct dirent *));
76 if (!newlist)
77 return cleanup(d, list, used);
78 list = newlist;
79 }
80
81 m = malloc(sizeof(struct dirent) + strlen(e->d_name));
82 if (!m)
83 return cleanup(d, list, used);
84 *m = *e;
85 strcpy(m->d_name, e->d_name);
86
87 list[used] = m;
88 used++;
89 }
90
91 closedir(d);
92
93 if (list != NULL && cmp != NULL)
94 qsort(list, used, sizeof(struct dirent *), cmp);
95
96 *namelist = list;
97
98 return used;
99}