src/util/readdir_nt.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 /*
  11  * readdir.c - A minimal implementation of readdir to ease porting of AFS to
  12  * NT. Include dirent.h to pickup the required structs and prototypes.
  13  *
  14  * Implemented routines:
  15  * opendir
  16  * closedir
  17  * readdir
  18  */
  19 #include <afsconfig.h>
  20 #include <afs/param.h>
  21
  22
  23 #include <errno.h>
  24 #include <afs/errmap_nt.h>
  25 #include <windows.h>
  26 #include <winbase.h>
  27 #include <dirent.h>
  28 #include <stdlib.h>
  29 #include <sys/stat.h>
  30
  31 /* opendir() - The case insensitive version of opendir */
  32 DIR *
  33 opendir(const char *path)
  34 {
  35     DIR *tDir;
  36     HANDLE tH;
  37     char tPath[MAX_PATH];
  38     WIN32_FIND_DATA tData;
  39     int ntErr;
  40
  41     (void)strcpy(tPath, path);
  42     (void)strcat(tPath, "\\*");
  43     tH = FindFirstFile(tPath, &tData);
  44
  45     if (tH == INVALID_HANDLE_VALUE) {
  46         ntErr = GetLastError();
  47         switch (ntErr) {
  48         case ERROR_DIRECTORY:
  49             errno = ENOTDIR;
  50             return (DIR *) 0;
  51         case ERROR_BAD_PATHNAME:
  52             /* AFS NT client returns ERROR_BAD_PATHNAME where it should return
  53              * ERROR_DIRECTORY.
  54              */
  55         case ERROR_FILE_NOT_FOUND:
  56             /* If at the "root" directory, then this can happen if it's empty.
  57              */
  58             {
  59                 struct stat status;
  60                 size_t len = strlen(tPath) - 1;
  61                 tPath[len] = '\0';
  62                 if (len >= 2 && tPath[len - 2] != ':') {
  63                     tPath[len - 1] = '\0';
  64                 }
  65                 if (stat(tPath, &status) < 0) {
  66                     errno = nterr_nt2unix(GetLastError(), ENOENT);
  67                     return (DIR *) 0;
  68                 }
  69                 if (!(status.st_mode & _S_IFDIR)) {
  70                     errno = ENOTDIR;
  71                     return (DIR *) 0;
  72                 }
  73             }
  74             break;
  75         default:
  76             errno = nterr_nt2unix(GetLastError(), ENOENT);
  77             return (DIR *) 0;
  78         }
  79     }
  80
  81     tDir = (DIR *) malloc(sizeof(DIR));
  82     if (!tDir) {
  83         errno = ENOMEM;
  84     } else {
  85         memset((void *)tDir, 0, sizeof(*tDir));
  86         tDir->h = tH;
  87         tDir->data = tData;
  88     }
  89     return tDir;
  90 }
  91
  92 int
  93 closedir(DIR * dir)
  94 {
  95     if (!dir || !dir->h) {
  96         errno = EINVAL;
  97         return -1;
  98     }
  99
 100     if (dir->h != INVALID_HANDLE_VALUE)
 101         FindClose(dir->h);
 102     free((void *)dir);
 103     return 0;
 104 }
 105
 106 struct dirent *
 107 readdir(DIR * dir)
 108 {
 109     int rc;
 110
 111     if (!dir) {
 112         errno = EBADF;
 113         return (struct dirent *)0;
 114     }
 115
 116     errno = 0;
 117     if (dir->h == INVALID_HANDLE_VALUE)
 118         return (struct dirent *)0;
 119
 120     if (dir->first) {
 121         dir->first = 0;
 122     } else {
 123         while (rc = FindNextFile(dir->h, &dir->data)) {
 124             if ((strcmp(dir->data.cFileName, ".") == 0)
 125                 || (strcmp(dir->data.cFileName, "..") == 0)) {
 126
 127                 continue;       /* skip "." and ".." */
 128             }
 129             break;              /* found a non '.' or '..' entry. */
 130         }
 131         if (rc == 0) {          /* FindNextFile() failed */
 132             if (GetLastError() == ERROR_NO_MORE_FILES)
 133                 return (struct dirent *)0;
 134             else {
 135                 errno = nterr_nt2unix(GetLastError(), EBADF);
 136                 return (struct dirent *)0;
 137             }
 138         }
 139     }
 140
 141     dir->cdirent.d_name = dir->data.cFileName;
 142     return &dir->cdirent;
 143 }