win32/findfile.c

   1 #include <sys/types.h>
   2 #include <dirent.h>
   3 #include <string.h>
   4 #include <ctype.h>
   5 #include <malloc.h>
   6 #include "xmalloc.h"
   7 #include "windows.h"
   8 #include "dos_fs.h"
   9 #include "heap.h"
  10 #include "string32.h"
  11
  12 #define PATH_LEN 260
  13
  14 struct FindFileContext32 {
  15     DIR *       dir;
  16     char mask[PATH_LEN];
  17     char path[PATH_LEN];
  18 };
  19
  20 typedef struct FindFileContext32 FindFileContext32;
  21
  22 const char *DOSFS_Hash(const char *, int, int);
  23
  24 /* example D:\*.dbs */
  25
  26 static BOOL32 MatchWildCard(LPCSTR file, LPCSTR mask)
  27 {
  28     int len;
  29
  30     /* We should check volume information to see if long filenames possible.
  31      */
  32
  33     len = strlen(file);
  34
  35     while (*file) {
  36         if (*mask == '*') {
  37             if (*(mask+1)) {
  38                 while (*file && (toupper(*file) != *(mask+1))) file++;
  39                 if (!*file)
  40                     return FALSE;
  41             }
  42             else
  43                 break;
  44         }
  45         else {
  46             if (*mask != '?' && *mask != toupper(*file)) {
  47                 return FALSE;
  48             }
  49             file++;
  50         }
  51         mask++;
  52     }
  53     return (TRUE);
  54 }
  55
  56 /*************************************************************************
  57  *              FindNextFile32A             (KERNEL32.126)
  58  */
  59 BOOL32 FindNextFile32A(HANDLE32 handle, LPWIN32_FIND_DATA32A data)
  60 {
  61     FindFileContext32 *context;
  62     struct dirent *dirent;
  63     char  dosname[14];
  64
  65     memset(data, 0, sizeof(WIN32_FIND_DATA32A));
  66     context = (FindFileContext32 *) handle;
  67
  68     while ((dirent = readdir(context->dir)) != NULL) {
  69         if (strcmp(dirent->d_name, "..") == 0 ||
  70             strcmp(dirent->d_name, ".") == 0)
  71             continue;
  72
  73         strcpy(dosname, DOSFS_Hash(dirent->d_name, FALSE, FALSE));
  74
  75         if (MatchWildCard(dirent->d_name, context->mask)) {
  76             /* Full file name - is this a long file name?
  77              * If it is, we should probably use the dirent
  78              * instead of the dos hashed name.
  79              */
  80             strcpy(data->cFileName, dosname);
  81
  82             /* file name expressed in 8.3 format */
  83             strcpy(data->cAlternateFileName, dosname);
  84             return (TRUE);
  85         }
  86     }
  87
  88     return (FALSE);
  89 }
  90
  91 /*************************************************************************
  92  *              FindNextFile32W             (KERNEL32.127)
  93  */
  94 BOOL32 FindNextFile32W(HANDLE32 handle, LPWIN32_FIND_DATA32W data)
  95 {
  96     WIN32_FIND_DATA32A  adata;
  97
  98     adata.dwFileAttributes      = data->dwFileAttributes;
  99     adata.ftCreationTime        = data->ftCreationTime;
 100     adata.ftLastAccessTime      = data->ftLastAccessTime;
 101     adata.ftLastWriteTime       = data->ftLastWriteTime;
 102     adata.nFileSizeHigh         = data->nFileSizeHigh;
 103     adata.nFileSizeLow          = data->nFileSizeLow;
 104     adata.dwReserved0           = data->dwReserved0;
 105     adata.dwReserved1           = data->dwReserved1;
 106     STRING32_UniToAnsi(adata.cFileName,data->cFileName);
 107     STRING32_UniToAnsi(adata.cAlternateFileName,data->cAlternateFileName);
 108     return FindNextFile32A(handle,&adata);
 109 }
 110
 111 /*************************************************************************
 112  *              FindFirstFile32A             (KERNEL32.123)
 113  */
 114
 115 HANDLE32 FindFirstFile32A(LPCSTR lpfilename,
 116                           LPWIN32_FIND_DATA32A lpFindFileData)
 117 {
 118     const char *unixpath;
 119     char *slash, *p;
 120     FindFileContext32 *context;
 121
 122     context = HeapAlloc(SystemHeap, 0, sizeof(FindFileContext32));
 123     if (!context)
 124         return (INVALID_HANDLE_VALUE);
 125
 126     slash = strrchr(lpfilename, '\\');
 127     if (slash) {
 128         lstrcpyn32A(context->path, lpfilename, slash - lpfilename + 1);
 129         context->path[slash - lpfilename + 1] = '\0';
 130         unixpath = DOSFS_GetUnixFileName(context->path, FALSE);
 131         if (!unixpath) {
 132             /* FIXME: SetLastError(??) */
 133             HeapFree(SystemHeap, 0, context);
 134             return INVALID_HANDLE_VALUE;
 135         }
 136         lstrcpy32A(context->mask, slash+1);
 137     }
 138     else {
 139         context->path[0] = '\0';
 140         unixpath = ".";
 141         lstrcpy32A(context->mask, lpfilename);
 142     }
 143
 144     context->dir = opendir(unixpath);
 145     if (!context->dir) {
 146         /* FIXME: SetLastError(??) */
 147         HeapFree(SystemHeap, 0, context);
 148         return INVALID_HANDLE_VALUE;
 149     }
 150
 151     /* uppercase mask in place */
 152     for (p = context->mask ; *p; p++)
 153         *p = toupper(*p);
 154
 155     if (!FindNextFile32A((HANDLE32) context, lpFindFileData))
 156         return (INVALID_HANDLE_VALUE);
 157     return ((HANDLE32) context);
 158 }
 159
 160 /*************************************************************************
 161  *              FindFirstFile32W             (KERNEL32.124)
 162  */
 163 HANDLE32 FindFirstFile32W(LPCWSTR filename,LPWIN32_FIND_DATA32W data)
 164 {
 165     WIN32_FIND_DATA32A  adata;
 166     LPSTR               afn = STRING32_DupUniToAnsi(filename);
 167     HANDLE32            res;
 168
 169     adata.dwFileAttributes      = data->dwFileAttributes;
 170     adata.ftCreationTime        = data->ftCreationTime;
 171     adata.ftLastAccessTime      = data->ftLastAccessTime;
 172     adata.ftLastWriteTime       = data->ftLastWriteTime;
 173     adata.nFileSizeHigh         = data->nFileSizeHigh;
 174     adata.nFileSizeLow          = data->nFileSizeLow;
 175     adata.dwReserved0           = data->dwReserved0;
 176     adata.dwReserved1           = data->dwReserved1;
 177     STRING32_UniToAnsi(adata.cFileName,data->cFileName);
 178     STRING32_UniToAnsi(adata.cAlternateFileName,data->cAlternateFileName);
 179     res=FindFirstFile32A(afn,&adata);
 180     free(afn);
 181     return res;
 182 }
 183
 184 /*************************************************************************
 185  *              FindClose32             (KERNEL32.119)
 186  */
 187 BOOL32 FindClose32(HANDLE32 handle)
 188 {
 189     FindFileContext32 *context;
 190
 191     context = (FindFileContext32 *) handle;
 192     if (context->dir)
 193         closedir(context->dir);
 194     HeapFree(SystemHeap, 0, context);
 195     return (TRUE);
 196 }