Option: only one word key per file.
[idzebra-moved-to-github.git] / index / dir.c
1 /*
2  * Copyright (C) 1994-1995, Index Data I/S 
3  * All rights reserved.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: dir.c,v $
7  * Revision 1.5  1995-09-06 16:11:16  adam
8  * Option: only one word key per file.
9  *
10  * Revision 1.4  1995/09/04  12:33:41  adam
11  * Various cleanup. YAZ util used instead.
12  *
13  * Revision 1.3  1995/09/01  14:06:35  adam
14  * Split of work into more files.
15  *
16  * Revision 1.2  1995/09/01  10:57:07  adam
17  * Minor changes.
18  *
19  * Revision 1.1  1995/09/01  10:34:51  adam
20  * Added dir.c
21  *
22  */
23 #include <stdio.h>
24 #include <assert.h>
25 #include <unistd.h>
26 #include <dirent.h>
27 #include <sys/stat.h>
28 #include <sys/types.h>
29 #include <fcntl.h>
30 #include <ctype.h>
31
32 #include <alexutil.h>
33 #include "index.h"
34
35 struct dir_entry *dir_open (const char *rep)
36 {
37     DIR *dir;
38     struct dirent *dent;
39     size_t entry_max = 20;
40     size_t idx = 0;
41     struct dir_entry *entry;
42
43     logf (LOG_LOG, "dir_open %s", rep);
44     if (!(dir = opendir(rep)))
45     {
46         logf (LOG_WARN|LOG_ERRNO, "opendir %s", rep);
47         if (errno != ENOENT)
48             exit (1);
49         return NULL;
50     }
51     if (!(entry = malloc (sizeof(*entry) * entry_max)))
52     {
53         logf (LOG_FATAL|LOG_ERRNO, "malloc");
54         exit (1);
55     }    
56     while ((dent = readdir (dir)))
57     {
58         if (strcmp (dent->d_name, ".") == 0 ||
59             strcmp (dent->d_name, "..") == 0)
60             continue;
61         if (idx == entry_max-1)
62         {
63             struct dir_entry *entry_n;
64
65             if (!(entry_n = malloc (sizeof(*entry) * (entry_max + 100))))
66             {
67                 logf (LOG_FATAL|LOG_ERRNO, "malloc");
68                 exit (1);
69             }
70             memcpy (entry_n, entry, idx * sizeof(*entry));
71             free (entry);
72             entry = entry_n;
73             entry_max += 100;
74         }
75         if (!(entry[idx].name = malloc (strlen(dent->d_name)+1)))
76         {
77             logf (LOG_FATAL|LOG_ERRNO, "malloc");
78             exit (1);
79         }
80         strcpy (entry[idx].name, dent->d_name);
81         idx++;
82     }
83     entry[idx].name = NULL;
84     closedir (dir);
85     return entry;
86 }
87
88 static int dir_cmp (const void *p1, const void *p2)
89 {
90     return strcmp (((struct dir_entry *) p1)->name,
91                    ((struct dir_entry *) p2)->name);
92 }
93
94 void dir_sort (struct dir_entry *e)
95 {
96     size_t nmemb = 0;
97     while (e[nmemb].name)
98         nmemb++;
99     qsort (e, nmemb, sizeof(*e), dir_cmp); 
100 }
101
102 void dir_free (struct dir_entry **e_p)
103 {
104     size_t i = 0;
105     struct dir_entry *e = *e_p;
106
107     assert (e);
108     while (e[i].name)
109         free (e[i++].name);
110     free (e);
111     *e_p = NULL;
112 }