home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / s / stex2-18.zip / SeeTeX / Xtex / Dir.c < prev    next >
C/C++ Source or Header  |  1992-05-05  |  4KB  |  164 lines
  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 "SFinternal.h"
  34.  
  35. #if defined(SYSV) || defined(USG)
  36. #include <dirent.h>
  37. #else /* defined(SYSV) || defined(USG) */
  38. #include <sys/dir.h>
  39. #define dirent direct
  40. #endif /* defined(SYSV) || defined(USG) */
  41.  
  42. #include <sys/stat.h>
  43.  
  44. #if defined(SYSV) || defined(USG)
  45. extern void qsort();
  46. #endif /* 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) fstat(dirp->dd_fd, &statBuf);
  124.     dir->st_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(SYSV) || defined(USG)
  151.     qsort((char *) result, (unsigned) i, sizeof(SFEntry), SFcompareEntries);
  152. #else /* defined(SYSV) || defined(USG) */
  153.     qsort((char *) result, i, sizeof(SFEntry), SFcompareEntries);
  154. #endif /* 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. }
  164.