dir.c

   1 /*
   2  * Copyright 1989 Software Research Associates, Inc., Tokyo, Japan
   3  *
   4  * Permission to use, copy, modify, and distribute this software and its
   5  * documentation for any purpose and without fee is hereby granted, provided
   6  * that the above copyright notice appear in all copies and that both that
   7  * copyright notice and this permission notice appear in supporting
   8  * documentation, and that the name of Software Research Associates not be used
   9  * in advertising or publicity pertaining to distribution of the software
  10  * without specific, written prior permission.  Software Research Associates
  11  * makes no representations about the suitability of this software for any
  12  * purpose.  It is provided "as is" without express or implied warranty.
  13  *
  14  * SOFTWARE RESEARCH ASSOCIATES DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
  15  * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS,
  16  * IN NO EVENT SHALL SOFTWARE RESEARCH ASSOCIATES BE LIABLE FOR ANY SPECIAL,
  17  * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
  18  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
  19  * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  20  * PERFORMANCE OF THIS SOFTWARE.
  21  *
  22  * Author: Erik M. van der Poel
  23  *         Software Research Associates, Inc., Tokyo, Japan
  24  *         erik@sra.co.jp
  25  */
  26
  27 #include <stdio.h>
  28
  29 #ifdef SEL_FILE_IGNORE_CASE
  30 #include <ctype.h>
  31 #endif /* def SEL_FILE_IGNORE_CASE */
  32
  33 #include "selfile.h"
  34
  35 #if defined(SVR4) || defined(SYSV) || defined(USG) || defined(__osf__)
  36 #include <dirent.h>
  37 #else /* defined(SVR4) || defined(SYSV) || defined(USG) */
  38 #include <sys/dir.h>
  39 #define dirent direct
  40 #endif /* defined(SVR4) || defined(SYSV) || defined(USG) */
  41
  42 #include <sys/stat.h>
  43
  44 #if defined(SVR4) || defined(SYSV) || defined(USG)
  45 extern void qsort();
  46 #endif /* defined(SVR4) || defined(SYSV) || defined(USG) */
  47
  48 #ifdef SEL_FILE_IGNORE_CASE
  49 int
  50 SFcompareEntries(p, q)
  51         SFEntry *p;
  52         SFEntry *q;
  53 {
  54         register char   *r, *s;
  55         register char   c1, c2;
  56
  57         r = p->real;
  58         s = q->real;
  59
  60         c1 = *r++;
  61         if (islower(c1)) {
  62                 c1 = toupper(c1);
  63         }
  64         c2 = *s++;
  65         if (islower(c2)) {
  66                 c2 = toupper(c2);
  67         }
  68
  69         while (c1 == c2) {
  70                 if (!c1) {
  71                         return strcmp(p->real, q->real);
  72                 }
  73                 c1 = *r++;
  74                 if (islower(c1)) {
  75                         c1 = toupper(c1);
  76                 }
  77                 c2 = *s++;
  78                 if (islower(c2)) {
  79                         c2 = toupper(c2);
  80                 }
  81         }
  82
  83         return c1 - c2;
  84 }
  85 #else /* def SEL_FILE_IGNORE_CASE */
  86 int
  87 SFcompareEntries(p, q)
  88         SFEntry *p;
  89         SFEntry *q;
  90 {
  91         return strcmp(p->real, q->real);
  92 }
  93 #endif /* def SEL_FILE_IGNORE_CASE */
  94
  95 int
  96 SFgetDir(dir)
  97         SFDir   *dir;
  98 {
  99         SFEntry         *result = NULL;
 100         int             alloc = 0;
 101         int             i;
 102         DIR             *dirp;
 103         struct dirent   *dp;
 104         char            *str;
 105         int             len;
 106         int             maxChars;
 107         struct stat     statBuf;
 108
 109         maxChars = strlen(dir->dir) - 1;
 110
 111         dir->entries = NULL;
 112         dir->nEntries = 0;
 113         dir->nChars = 0;
 114
 115         result = NULL;
 116         i = 0;
 117
 118         dirp = opendir(".");
 119         if (!dirp) {
 120                 return 1;
 121         }
 122
 123         (void) stat(".", &statBuf);
 124         dir->mtime = statBuf.st_mtime;
 125
 126         (void) readdir(dirp);   /* throw away "." */
 127
 128 #ifndef S_IFLNK
 129         (void) readdir(dirp);   /* throw away ".." */
 130 #endif /* ndef S_IFLNK */
 131
 132         while (dp = readdir(dirp)) {
 133                 if (i >= alloc) {
 134                         alloc = 2 * (alloc + 1);
 135                         result = (SFEntry *) XtRealloc((char *) result,
 136                                 (unsigned) (alloc * sizeof(SFEntry)));
 137                 }
 138                 result[i].statDone = 0;
 139                 str = dp->d_name;
 140                 len = strlen(str);
 141                 result[i].real = XtMalloc((unsigned) (len + 2));
 142                 (void) strcat(strcpy(result[i].real, str), " ");
 143                 if (len > maxChars) {
 144                         maxChars = len;
 145                 }
 146                 result[i].shown = result[i].real;
 147                 i++;
 148         }
 149
 150 #if defined(SVR4) || defined(SYSV) || defined(USG)
 151         qsort((char *) result, (unsigned) i, sizeof(SFEntry), SFcompareEntries);
 152 #else /* defined(SVR4) || defined(SYSV) || defined(USG) */
 153         qsort((char *) result, i, sizeof(SFEntry), SFcompareEntries);
 154 #endif /* defined(SVR4) || defined(SYSV) || defined(USG) */
 155
 156         dir->entries = result;
 157         dir->nEntries = i;
 158         dir->nChars = maxChars + 1;
 159
 160         closedir(dirp);
 161
 162         return 0;
 163 }