win32/file.c

   1 /*
   2  * Win32 kernel functions
   3  *
   4  * Copyright 1995 Martin von Loewis, Sven Verdoolaege, and Cameron Heide
   5  */
   6
   7 #include <errno.h>
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10 #include <unistd.h>
  11 #include <sys/types.h>
  12 #include <sys/stat.h>
  13 #include <sys/mman.h>
  14 #include <fcntl.h>
  15 #include <string.h>
  16 #include <time.h>
  17 #include "windows.h"
  18 #include "winbase.h"
  19 #include "winerror.h"
  20 #include "file.h"
  21 #include "heap.h"
  22 #include "handle32.h"
  23 #include "xmalloc.h"
  24 #include "stddebug.h"
  25 #define DEBUG_WIN32
  26 #include "debug.h"
  27
  28 DWORD ErrnoToLastError(int errno_num);
  29
  30 static int TranslateCreationFlags(DWORD create_flags);
  31 static int TranslateAccessFlags(DWORD access_flags);
  32
  33 /***********************************************************************
  34  *             WriteFile               (KERNEL32.578)
  35  */
  36 BOOL32 WINAPI WriteFile(HFILE32 hFile, LPVOID lpBuffer, DWORD numberOfBytesToWrite,
  37                         LPDWORD numberOfBytesWritten, LPOVERLAPPED lpOverlapped)
  38 {
  39     LONG        res;
  40
  41     res = _lwrite32(hFile,lpBuffer,numberOfBytesToWrite);
  42     if (res==-1) {
  43         SetLastError(ErrnoToLastError(errno));
  44         return FALSE;
  45     }
  46     if(numberOfBytesWritten)
  47         *numberOfBytesWritten = res;
  48     return TRUE;
  49 }
  50
  51 /***********************************************************************
  52  *              ReadFile                (KERNEL32.428)
  53  */
  54 BOOL32 WINAPI ReadFile(HFILE32 hFile, LPVOID lpBuffer, DWORD numtoread,
  55                        LPDWORD numread, LPOVERLAPPED lpOverlapped)
  56 {
  57     int actual_read;
  58
  59     actual_read = _lread32(hFile,lpBuffer,numtoread);
  60     if(actual_read == -1) {
  61         SetLastError(ErrnoToLastError(errno));
  62         return FALSE;
  63     }
  64     if(numread)
  65         *numread = actual_read;
  66
  67     return TRUE;
  68 }
  69
  70
  71 /*************************************************************************
  72  *              CreateFile32A              (KERNEL32.45)
  73  *
  74  * Doesn't support character devices, pipes, template files, or a
  75  * lot of the 'attributes' flags yet.
  76  */
  77 HFILE32 WINAPI CreateFile32A(LPCSTR filename, DWORD access, DWORD sharing,
  78                              LPSECURITY_ATTRIBUTES security, DWORD creation,
  79                              DWORD attributes, HANDLE32 template)
  80 {
  81     int access_flags, create_flags;
  82
  83     /* Translate the various flags to Unix-style.
  84      */
  85     access_flags = TranslateAccessFlags(access);
  86     create_flags = TranslateCreationFlags(creation);
  87
  88     if(template)
  89         dprintf_file(stddeb, "CreateFile: template handles not supported.\n");
  90
  91     /* If the name starts with '\\?' or '\\.', ignore the first 3 chars.
  92      */
  93     if(!strncmp(filename, "\\\\?", 3) || !strncmp(filename, "\\\\.", 3))
  94         filename += 3;
  95
  96     /* If the name still starts with '\\', it's a UNC name.
  97      */
  98     if(!strncmp(filename, "\\\\", 2))
  99     {
 100         dprintf_file(stddeb, "CreateFile: UNC names not supported.\n");
 101         SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
 102         return HFILE_ERROR32;
 103     }
 104
 105     /* If the name is either CONIN$ or CONOUT$, give them stdin
 106      * or stdout, respectively.
 107      */
 108     if(!strcmp(filename, "CONIN$")) return GetStdHandle( STD_INPUT_HANDLE );
 109     if(!strcmp(filename, "CONOUT$")) return GetStdHandle( STD_OUTPUT_HANDLE );
 110
 111     return FILE_Open( filename, access_flags | create_flags );
 112 }
 113
 114
 115 /*************************************************************************
 116  *              CreateFile32W              (KERNEL32.48)
 117  */
 118 HFILE32 WINAPI CreateFile32W(LPCWSTR filename, DWORD access, DWORD sharing,
 119                              LPSECURITY_ATTRIBUTES security, DWORD creation,
 120                              DWORD attributes, HANDLE32 template)
 121 {
 122     LPSTR afn = HEAP_strdupWtoA( GetProcessHeap(), 0, filename );
 123     HFILE32 res = CreateFile32A( afn, access, sharing, security, creation,
 124                                  attributes, template );
 125     HeapFree( GetProcessHeap(), 0, afn );
 126     return res;
 127 }
 128
 129 static int TranslateAccessFlags(DWORD access_flags)
 130 {
 131     int rc = 0;
 132
 133     switch(access_flags)
 134     {
 135         case GENERIC_READ:
 136             rc = O_RDONLY;
 137             break;
 138
 139         case GENERIC_WRITE:
 140             rc = O_WRONLY;
 141             break;
 142
 143         case (GENERIC_READ | GENERIC_WRITE):
 144             rc = O_RDWR;
 145             break;
 146     }
 147
 148     return rc;
 149 }
 150
 151 static int TranslateCreationFlags(DWORD create_flags)
 152 {
 153     int rc = 0;
 154
 155     switch(create_flags)
 156     {
 157         case CREATE_NEW:
 158             rc = O_CREAT | O_EXCL;
 159             break;
 160
 161         case CREATE_ALWAYS:
 162             rc = O_CREAT | O_TRUNC;
 163             break;
 164
 165         case OPEN_EXISTING:
 166             rc = 0;
 167             break;
 168
 169         case OPEN_ALWAYS:
 170             rc = O_CREAT;
 171             break;
 172
 173         case TRUNCATE_EXISTING:
 174             rc = O_TRUNC;
 175             break;
 176     }
 177
 178     return rc;
 179 }
 180
 181
 182 /**************************************************************************
 183  *              SetFileAttributes16     (KERNEL.421)
 184  */
 185 BOOL16 WINAPI SetFileAttributes16( LPCSTR lpFileName, DWORD attributes )
 186 {
 187     return SetFileAttributes32A( lpFileName, attributes );
 188 }
 189
 190
 191 /**************************************************************************
 192  *              SetFileAttributes32A    (KERNEL32.490)
 193  */
 194 BOOL32 WINAPI SetFileAttributes32A(LPCSTR lpFileName, DWORD attributes)
 195 {
 196     struct stat buf;
 197     DOS_FULL_NAME full_name;
 198
 199     if (!DOSFS_GetFullName( lpFileName, TRUE, &full_name ))
 200         return FALSE;
 201
 202     dprintf_file(stddeb,"SetFileAttributes(%s,%lx)\n",lpFileName,attributes);
 203     if(stat(full_name.long_name,&buf)==-1)
 204     {
 205         SetLastError(ErrnoToLastError(errno));
 206         return FALSE;
 207     }
 208     if (attributes & FILE_ATTRIBUTE_READONLY)
 209     {
 210         buf.st_mode &= ~0222; /* octal!, clear write permission bits */
 211         attributes &= ~FILE_ATTRIBUTE_READONLY;
 212     }
 213     attributes &= ~(FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM);
 214     if (attributes)
 215         fprintf(stdnimp,"SetFileAttributesA(%s):%lx attribute(s) not implemented.\n",lpFileName,attributes);
 216     if (-1==chmod(full_name.long_name,buf.st_mode))
 217     {
 218         SetLastError(ErrnoToLastError(errno));
 219         return FALSE;
 220     }
 221     return TRUE;
 222 }
 223
 224
 225 /**************************************************************************
 226  *              SetFileAttributes32W    (KERNEL32.491)
 227  */
 228 BOOL32 WINAPI SetFileAttributes32W(LPCWSTR lpFileName, DWORD attributes)
 229 {
 230     LPSTR afn = HEAP_strdupWtoA( GetProcessHeap(), 0, lpFileName );
 231     BOOL32 res = SetFileAttributes32A( afn, attributes );
 232     HeapFree( GetProcessHeap(), 0, afn );
 233     return res;
 234 }
 235
 236
 237 /**************************************************************************
 238  *              SetFileApisToOEM   (KERNEL32.645)
 239  */
 240 VOID WINAPI SetFileApisToOEM(void)
 241 {
 242     /*fprintf(stdnimp,"SetFileApisToOEM(),stub!\n");*/
 243 }
 244
 245
 246 /**************************************************************************
 247  *              SetFileApisToANSI   (KERNEL32.644)
 248  */
 249 VOID WINAPI SetFileApisToANSI(void)
 250 {
 251     /*fprintf(stdnimp,"SetFileApisToANSI(),stub!\n");*/
 252 }
 253
 254
 255 /**************************************************************************
 256  *              AreFileApisANSI   (KERNEL32.105)
 257  */
 258 BOOL32 WINAPI AreFileApisANSI(void)
 259 {
 260     fprintf(stdnimp,"AreFileApisANSI(),stub!\n");
 261     return TRUE;
 262 }
 263
 264