143 lines
4.3 KiB
C
143 lines
4.3 KiB
C
$NetBSD: patch-scandir.c,v 1.2 2015/10/27 20:20:31 bsiegert Exp $
|
|
|
|
--- scandir.c.orig 2014-07-14 12:36:57.000000000 +0000
|
|
+++ scandir.c
|
|
@@ -0,0 +1,137 @@
|
|
+/* -*- Mode: C -*-
|
|
+ * Basename: scandir.c
|
|
+ * Revision: 1.3.1.5.1.3
|
|
+ * Last Modified By: Ulrich Pfeifer
|
|
+ * Last Modified On: Tue May 13 13:15:16 1997
|
|
+ * Language : C
|
|
+ * Update Count : 2
|
|
+ * Status : Unknown, Use with caution!
|
|
+ *
|
|
+ * (C) Copyright 1997, Universitaet Dortmund, all rights reserved.
|
|
+ * (C) Copyright CNIDR (see ../doc/CNIDR/COPYRIGHT)
|
|
+ */
|
|
+
|
|
+/*
|
|
+Title: COPYRIGHT freeWAIS-0.2
|
|
+Author: Jane Smith
|
|
+Copyright: Copyright 1993 CNIDR
|
|
+Last update: 10.01.93
|
|
+Abstract: This file contains the copyright statement for freeWAIS 0.2
|
|
+
|
|
+Copyright Statement for freeWAIS 0.2 and subsquent freeWAIS
|
|
+releases:
|
|
+
|
|
+Copyright (c) MCNC, Clearinghouse for Networked Information Discovery
|
|
+and Retrieval, 1993.
|
|
+
|
|
+Permission to use, copy, modify, distribute, and sell this software
|
|
+and its documentation, in whole or in part, for any purpose is hereby
|
|
+granted without fee, provided that
|
|
+
|
|
+1. The above copyright notice and this permission notice appear in all
|
|
+copies of the software and related documentation. Notices of copyright
|
|
+and/or attribution which appear at the beginning of any file included
|
|
+in this distribution must remain intact.
|
|
+
|
|
+2. Users of this software agree to make their best efforts (a) to
|
|
+return to MCNC any improvements or extensions that they make, so that
|
|
+these may be included in future releases; and (b) to inform MCNC/CNIDR
|
|
+of noteworthy uses of this software.
|
|
+
|
|
+3. The names of MCNC and Clearinghouse for Networked Information
|
|
+Discovery and Retrieval may not be used in any advertising or publicity
|
|
+relating to the software without the specific, prior written permission
|
|
+of MCNC/CNIDR.
|
|
+
|
|
+THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
|
|
+EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
|
|
+WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
|
|
+
|
|
+IN NO EVENT SHALL MCNC/CNIDR BE LIABLE FOR ANY SPECIAL, INCIDENTAL,
|
|
+INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND, OR ANY DAMAGES WHATSOEVER
|
|
+RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER OR NOT ADVISED OF
|
|
+THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF LIABILITY, ARISING OUT
|
|
+OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
+*/
|
|
+
|
|
+/*
|
|
+ * SCANDIR
|
|
+ * Scan a directory, collecting all (selected) items into a an array.
|
|
+ */
|
|
+
|
|
+#include <stdio.h>
|
|
+#include <dirent.h>
|
|
+#include <stdlib.h>
|
|
+#include <string.h>
|
|
+
|
|
+#ifdef DIRNAMLEN
|
|
+#define NLENGTH(dirent) ((dirent)->d_namlen)
|
|
+#else /* not DIRNAMLEN */
|
|
+#define NLENGTH(dirent) (strlen((dirent)->d_name))
|
|
+#endif /* not DIRNAMLEN */
|
|
+
|
|
+/* Initial guess at directory size. */
|
|
+#define INITIAL_SIZE 20
|
|
+
|
|
+int
|
|
+scandir(name, list, selector, sorter)
|
|
+ char *name;
|
|
+ dirent_t ***list;
|
|
+ int (*selector)();
|
|
+ int (*sorter)();
|
|
+{
|
|
+ register dirent_t **names;
|
|
+ register dirent_t *entp;
|
|
+ register DIR *dirp;
|
|
+ register int i;
|
|
+ register int size;
|
|
+
|
|
+ /* Get initial list space and open directory. */
|
|
+ size = INITIAL_SIZE;
|
|
+ names = (dirent_t **)malloc(size * sizeof names[0]);
|
|
+ if (names == NULL)
|
|
+ return -1;
|
|
+ dirp = opendir(name);
|
|
+ if (dirp == NULL)
|
|
+ return -1;
|
|
+
|
|
+ /* Read entries in the directory. */
|
|
+ for (i = 0; entp = readdir(dirp); )
|
|
+ if (selector == NULL || (*selector)(entp)) {
|
|
+ /* User wants them all, or he wants this one. */
|
|
+ if (++i >= size) {
|
|
+ size <<= 1;
|
|
+ names = (dirent_t **)
|
|
+ realloc((char *)names, size * sizeof names[0]);
|
|
+ if (names == NULL) {
|
|
+ closedir(dirp);
|
|
+ return -1;
|
|
+ }
|
|
+ }
|
|
+
|
|
+ /* Copy the entry. */
|
|
+ names[i - 1] = (dirent_t *)malloc(sizeof(dirent_t)
|
|
+ + NLENGTH(entp)+1);
|
|
+ if (names[i - 1] == NULL) {
|
|
+ closedir(dirp);
|
|
+ return -1;
|
|
+ }
|
|
+ names[i - 1]->d_ino = entp->d_ino;
|
|
+ names[i - 1]->d_reclen = entp->d_reclen;
|
|
+#ifdef DIRNAMLEN
|
|
+ names[i - 1]->d_namlen = entp->d_namlen;
|
|
+#endif
|
|
+ (void)strcpy(names[i - 1]->d_name, entp->d_name);
|
|
+ }
|
|
+
|
|
+ /* Close things off. */
|
|
+ names[i] = NULL;
|
|
+ *list = names;
|
|
+ closedir(dirp);
|
|
+
|
|
+ /* Sort? */
|
|
+ if (i && sorter)
|
|
+ qsort((char *)names, i, sizeof names[0], sorter);
|
|
+
|
|
+ return i;
|
|
+}
|