dlls/crtdll/dir.c

   1 /*
   2  * CRTDLL drive/directory functions
   3  *
   4  * Copyright 1996,1998 Marcus Meissner
   5  * Copyright 1996 Jukka Iivonen
   6  * Copyright 1997,2000 Uwe Bonnes
   7  * Copyright 2000 Jon Griffiths
   8  *
   9  *
  10  * Implementation Notes:
  11  * MT Safe.
  12  */
  13
  14 #include "crtdll.h"
  15 #include <errno.h>
  16
  17 #include "drive.h"
  18 #include <time.h>
  19 #include "file.h"
  20
  21 DEFAULT_DEBUG_CHANNEL(crtdll);
  22
  23 /* INTERNAL: Translate find_t to PWIN32_FIND_DATAA */
  24 static void __CRTDLL__fttofd(LPWIN32_FIND_DATAA fd, find_t* ft);
  25 static void __CRTDLL__fttofd(LPWIN32_FIND_DATAA fd, find_t* ft)
  26 {
  27   static DWORD dummy;
  28
  29   /* Tested with crtdll.dll Version 2.50.4170 (NT) from win98 SE:
  30    * attrib 0x80 (FILE_ATTRIBUTE_NORMAL)is returned as 0.
  31    */
  32   if (fd->dwFileAttributes  == FILE_ATTRIBUTE_NORMAL)
  33     ft->attrib = 0;
  34   else
  35     ft->attrib = fd->dwFileAttributes;
  36
  37   ft->time_create = DOSFS_FileTimeToUnixTime(&fd->ftCreationTime,&dummy);
  38   ft->time_access = DOSFS_FileTimeToUnixTime(&fd->ftLastAccessTime,&dummy);
  39   ft->time_write = DOSFS_FileTimeToUnixTime(&fd->ftLastWriteTime,&dummy);
  40   ft->size = fd->nFileSizeLow;
  41   strcpy(ft->name, fd->cFileName);
  42 }
  43
  44
  45 /*********************************************************************
  46  *                  _chdir           (CRTDLL.51)
  47  *
  48  * Change the current directory.
  49  *
  50  * PARAMS
  51  *   newdir [in] Directory to change to
  52  *
  53  * RETURNS
  54  * Sucess:  0
  55  *
  56  * Failure: -1
  57  */
  58 INT __cdecl CRTDLL__chdir(LPCSTR newdir)
  59 {
  60   if (!SetCurrentDirectoryA(newdir))
  61   {
  62     __CRTDLL__set_errno(newdir?GetLastError():0);
  63     return -1;
  64   }
  65   return 0;
  66 }
  67
  68
  69 /*********************************************************************
  70  *                  _chdrive           (CRTDLL.52)
  71  *
  72  * Change the current drive.
  73  *
  74  * PARAMS
  75  *   newdrive [in] new drive to change to, A: =1, B: =2, etc
  76  *
  77  * RETURNS
  78  * Sucess:  0
  79  *
  80  * Failure: 1
  81  */
  82 BOOL __cdecl CRTDLL__chdrive(INT newdrive)
  83 {
  84   if (!DRIVE_SetCurrentDrive(newdrive-1))
  85   {
  86     __CRTDLL__set_errno(GetLastError());
  87     if (newdrive <= 0)
  88       CRTDLL_errno = EACCES;
  89     return -1;
  90   }
  91   return 0;
  92 }
  93
  94
  95 /*********************************************************************
  96  *                  _findclose     (CRTDLL.098)
  97  *
  98  * Free the resources from a search handle created from _findfirst.
  99  *
 100  * PARAMS
 101  *   hand [in]: Search handle to close
 102  *
 103  * RETURNS
 104  * Success:  0
 105  *
 106  * Failure:  -1
 107  */
 108 INT __cdecl CRTDLL__findclose(DWORD hand)
 109 {
 110   TRACE(":handle %ld\n",hand);
 111   if (!FindClose((HANDLE)hand))
 112   {
 113     __CRTDLL__set_errno(GetLastError());
 114     return -1;
 115   }
 116   return 0;
 117 }
 118
 119
 120  /*********************************************************************
 121  *                  _findfirst    (CRTDLL.099)
 122  *
 123  * Create and return a search handle for iterating through a file and
 124  * directory list.
 125  *
 126  * PARAMS
 127  *   fspec [in]  File specification string for search, e.g "C:\*.BAT"
 128  *
 129  *   ft [out]    A pointer to a find_t structure to populate.
 130  *
 131  * RETURNS
 132  * Success:  A handle for the search, suitable for passing to _findnext
 133  *           or _findclose. Populates the members of ft with the details
 134  *           of the first matching file.
 135  *
 136  * Failure:  -1.
 137  */
 138 DWORD __cdecl CRTDLL__findfirst(LPCSTR fspec, find_t* ft)
 139 {
 140   WIN32_FIND_DATAA find_data;
 141   HANDLE hfind;
 142
 143   hfind  = FindFirstFileA(fspec, &find_data);
 144   if (hfind == INVALID_HANDLE_VALUE)
 145   {
 146     __CRTDLL__set_errno(GetLastError());
 147     return -1;
 148   }
 149   __CRTDLL__fttofd(&find_data,ft);
 150   TRACE(":got handle %d\n",hfind);
 151   return hfind;
 152 }
 153
 154
 155 /*********************************************************************
 156  *                  _findnext     (CRTDLL.100)
 157  *
 158  * Return the next matching file/directory from a search hadle.
 159  *
 160  * PARAMS
 161  *   hand [in] Search handle from a pervious call to _findfirst
 162  *
 163  *   ft [out]  A pointer to a find_t structure to populate.
 164  *
 165  * RETURNS
 166  * Success:  0. Populates the members of ft with the details
 167  *           of the first matching file
 168  *
 169  * Failure:  -1
 170  */
 171 INT __cdecl CRTDLL__findnext(DWORD hand, find_t * ft)
 172 {
 173   WIN32_FIND_DATAA find_data;
 174
 175   if (!FindNextFileA(hand, &find_data))
 176   {
 177     SetLastError(ERROR_INVALID_DRIVE);
 178     __CRTDLL__set_errno(GetLastError());
 179     return -1;
 180   }
 181
 182   __CRTDLL__fttofd(&find_data,ft);
 183   return 0;
 184 }
 185
 186
 187 /*********************************************************************
 188  *                  _getcwd           (CRTDLL.120)
 189  *
 190  * Get the current directory.
 191  *
 192  * PARAMS
 193  * buf [out]  A buffer to place the current directory name in
 194  *
 195  * size [in]  The size of buf.
 196  *
 197  * RETURNS
 198  * Success: buf, or if buf is NULL, an allocated buffer
 199  *
 200  * Failure: NULL
 201  */
 202 CHAR* __cdecl CRTDLL__getcwd(LPSTR buf, INT size)
 203 {
 204   char dir[_MAX_PATH];
 205   int dir_len = GetCurrentDirectoryA(_MAX_PATH,dir);
 206
 207   if (dir_len < 1)
 208     return NULL; /* FIXME: Real return value untested */
 209
 210   if (!buf)
 211   {
 212     if (size < 0)
 213       return CRTDLL__strdup(dir);
 214     return __CRTDLL__strndup(dir,size);
 215   }
 216   if (dir_len >= size)
 217   {
 218     CRTDLL_errno = ERANGE;
 219     return NULL; /* buf too small */
 220   }
 221   strcpy(buf,dir);
 222   return buf;
 223 }
 224
 225
 226 /*********************************************************************
 227  *                  _getdcwd           (CRTDLL.121)
 228  *
 229  * Get the current directory on a drive. A: =1, B: =2, etc.
 230  * Passing drive 0 means the current drive.
 231  */
 232 CHAR* __cdecl CRTDLL__getdcwd(INT drive,LPSTR buf, INT size)
 233 {
 234   static CHAR* dummy;
 235
 236   if (!drive || --drive == DRIVE_GetCurrentDrive())
 237     return CRTDLL__getcwd(buf,size); /* current */
 238   else
 239   {
 240     char dir[_MAX_PATH];
 241     char drivespec[4] = {'A', ':', '\\', 0};
 242     int dir_len;
 243
 244     drivespec[0] += drive;
 245     if (GetDriveTypeA(drivespec) < DRIVE_REMOVABLE)
 246     {
 247       CRTDLL_errno = EACCES;
 248       return NULL;
 249     }
 250
 251     dir_len = GetFullPathNameA(drivespec,_MAX_PATH,dir,&dummy);
 252     if (dir_len >= size || dir_len < 1)
 253     {
 254       CRTDLL_errno = ERANGE;
 255       return NULL; /* buf too small */
 256     }
 257
 258     if (!buf)
 259       return CRTDLL__strdup(dir); /* allocate */
 260
 261     strcpy(buf,dir);
 262   }
 263   return buf;
 264 }
 265
 266
 267 /*********************************************************************
 268  *                  _getdiskfree     (CRTDLL.122)
 269  *
 270  * Get free disk space on given drive or the current drive.
 271  *
 272  */
 273 UINT __cdecl CRTDLL__getdiskfree(UINT disk, diskfree_t* d)
 274 {
 275   char drivespec[4] = {'@', ':', '\\', 0};
 276   DWORD ret[4];
 277   UINT err;
 278
 279   if (disk > 26)
 280     return ERROR_INVALID_PARAMETER; /* CRTDLL doesn't set errno here */
 281
 282   drivespec[0] += disk; /* make a drive letter */
 283
 284   if (GetDiskFreeSpaceA(disk==0?NULL:drivespec,ret,ret+1,ret+2,ret+3))
 285   {
 286     d->cluster_sectors = (unsigned)ret[0];
 287     d->sector_bytes = (unsigned)ret[1];
 288     d->available = (unsigned)ret[2];
 289     d->num_clusters = (unsigned)ret[3];
 290     return 0;
 291   }
 292   err = GetLastError();
 293   __CRTDLL__set_errno(err);
 294   return err;
 295 }
 296
 297
 298 /*********************************************************************
 299  *                  _getdrive           (CRTDLL.124)
 300  *
 301  *  Return current drive, A: =1, B: =2, etc
 302  */
 303 INT __cdecl CRTDLL__getdrive(VOID)
 304 {
 305   return DRIVE_GetCurrentDrive() + 1;
 306 }
 307
 308
 309 /*********************************************************************
 310  *                  _mkdir           (CRTDLL.234)
 311  *
 312  * Create a directory.
 313  */
 314 INT __cdecl CRTDLL__mkdir(LPCSTR newdir)
 315 {
 316   if (CreateDirectoryA(newdir,NULL))
 317     return 0;
 318
 319   __CRTDLL__set_errno(GetLastError());
 320   return -1;
 321 }
 322
 323 /*********************************************************************
 324  *                  _rmdir           (CRTDLL.255)
 325  *
 326  * Delete a directory
 327  *
 328  */
 329 INT __cdecl CRTDLL__rmdir(LPSTR dir)
 330 {
 331   if (RemoveDirectoryA(dir))
 332     return 0;
 333
 334   __CRTDLL__set_errno(GetLastError());
 335   return -1;
 336 }