File: sun_scandir.c

package info (click to toggle)
gramofile 1.6-4
  • links: PTS
  • area: main
  • in suites: woody
  • size: 820 kB
  • ctags: 536
  • sloc: ansic: 10,238; makefile: 55
file content (70 lines) | stat: -rw-r--r-- 2,247 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
/*******************************************************************************
*                                                                              *
*                                   Viewmol                                    *
*                                                                              *
*                              S C A N D I R . C                               *
*                                                                              *
*                    Copyright (c) Joerg-R. Hill, May 1999                     *
*                                                                              *
********************************************************************************
*
* $Id: scandir.c,v 1.1 1999/05/24 01:29:43 jrh Exp $
* $Log: scandir.c,v $
* Revision 1.1  1999/05/24 01:29:43  jrh
* Initial revision
*
*/
#include<dirent.h>
#include<stdlib.h>
#include<string.h>
#include<sys/types.h>

/* This function is only required for SunOS, all other supported OS
   have this function in their system library */

int
scandir (const char *dir, struct dirent ***namelist,
	 int (*select) (const struct dirent *),
	 int (*compar) (const struct dirent **, const struct dirent **))
{
  DIR *d;
  struct dirent *entry;
  register int i = 0;
  size_t entrysize;

  if ((d = opendir (dir)) == NULL)
    return (-1);

  *namelist = NULL;
  while ((entry = readdir (d)) != NULL)
    {
      if (select == NULL || (select != NULL && (*select) (entry)))
	{
	  *namelist = (struct dirent **) realloc ((void *) (*namelist),
			     (size_t) ((i + 1) * sizeof (struct dirent *)));
	  if (*namelist == NULL)
	    return (-1);
	  entrysize = sizeof (struct dirent) - sizeof (entry->d_name) + strlen (entry->d_na
								    me) + 1;
	  (*namelist)[i] = (struct dirent *) malloc (entrysize);
	  if ((*namelist)[i] == NULL)
	    return (-1);
	  memcpy ((*namelist)[i], entry, entrysize);
	  i++;
	}
    }
  if (closedir (d))
    return (-1);
  if (i == 0)
    return (-1);
  if (compar != NULL)
    qsort ((void *) (*namelist), (size_t) i, sizeof (struct dirent *), compar);

  return (i);
}

int
alphasort (const struct dirent **a, const struct dirent **b)
{
  return (strcmp ((*a)->d_name, (*b)->d_name));
}