123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100 |
- /*
- * Copyright (C) 2000-2006 Erik Andersen <andersen@uclibc.org>
- *
- * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
- */
- #include <dirent.h>
- #include <stdio.h>
- #include <string.h>
- #include <stdlib.h>
- #include <errno.h>
- #include <sys/types.h>
- #include "dirstream.h"
- /* Experimentally off - libc_hidden_proto(memcpy) */
- /* libc_hidden_proto(opendir) */
- /* libc_hidden_proto(closedir) */
- /* libc_hidden_proto(qsort) */
- /* libc_hidden_proto(readdir) */
- int scandir(const char *dir, struct dirent ***namelist,
- int (*selector) (const struct dirent *),
- int (*compar) (const void *, const void *))
- {
- DIR *dp = opendir (dir);
- struct dirent *current;
- struct dirent **names = NULL;
- size_t names_size = 0, pos;
- int save;
- if (dp == NULL)
- return -1;
- save = errno;
- __set_errno (0);
- pos = 0;
- while ((current = readdir (dp)) != NULL) {
- int use_it = selector == NULL;
- if (! use_it)
- {
- use_it = (*selector) (current);
- /* The selector function might have changed errno.
- * It was zero before and it need to be again to make
- * the latter tests work. */
- if (! use_it)
- __set_errno (0);
- }
- if (use_it)
- {
- struct dirent *vnew;
- size_t dsize;
- /* Ignore errors from selector or readdir */
- __set_errno (0);
- if (unlikely(pos == names_size))
- {
- struct dirent **new;
- if (names_size == 0)
- names_size = 10;
- else
- names_size *= 2;
- new = (struct dirent **) realloc (names,
- names_size * sizeof (struct dirent *));
- if (new == NULL)
- break;
- names = new;
- }
- dsize = ¤t->d_name[_D_ALLOC_NAMLEN(current)] - (char*)current;
- vnew = (struct dirent *) malloc (dsize);
- if (vnew == NULL)
- break;
- names[pos++] = (struct dirent *) memcpy (vnew, current, dsize);
- }
- }
- if (unlikely(errno != 0))
- {
- save = errno;
- closedir (dp);
- while (pos > 0)
- free (names[--pos]);
- free (names);
- __set_errno (save);
- return -1;
- }
- closedir (dp);
- __set_errno (save);
- /* Sort the list if we have a comparison function to sort with. */
- if (compar != NULL)
- qsort (names, pos, sizeof (struct dirent *), compar);
- *namelist = names;
- return pos;
- }
|