win32/file.c

   1 /*
   2  * Win32 kernel functions
   3  *
   4  * Copyright 1995 Martin von Loewis, Sven Verdoolaege, and Cameron Heide
   5  */
   6
   7 #include "config.h"
   8
   9 #include <errno.h>
  10 #ifdef HAVE_SYS_ERRNO_H
  11 #include <sys/errno.h>
  12 #endif
  13 #include <stdlib.h>
  14 #include <unistd.h>
  15 #include <sys/types.h>
  16 #include <sys/stat.h>
  17 #ifdef HAVE_SYS_MMAN_H
  18 #include <sys/mman.h>
  19 #endif
  20 #include <fcntl.h>
  21 #include <string.h>
  22 #include <time.h>
  23 #include "winbase.h"
  24 #include "winerror.h"
  25 #include "file.h"
  26 #include "process.h"
  27 #include "heap.h"
  28 #include "debugtools.h"
  29
  30 DEFAULT_DEBUG_CHANNEL(file);
  31
  32 /***********************************************************************
  33  *              ReadFileEx                (KERNEL32.)
  34  */
  35 BOOL WINAPI ReadFileEx(HFILE hFile, LPVOID lpBuffer, DWORD numtoread,
  36                          LPOVERLAPPED lpOverlapped,
  37                          LPOVERLAPPED_COMPLETION_ROUTINE lpCompletionRoutine)
  38 {
  39
  40     FIXME("file %d to buf %p num %ld %p func %p stub\n",
  41           hFile, lpBuffer, numtoread, lpOverlapped, lpCompletionRoutine);
  42     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
  43     return 0;
  44 }
  45
  46 /**************************************************************************
  47  *              SetFileAttributes16     (KERNEL.421)
  48  */
  49 BOOL16 WINAPI SetFileAttributes16( LPCSTR lpFileName, DWORD attributes )
  50 {
  51     return SetFileAttributesA( lpFileName, attributes );
  52 }
  53
  54
  55 /**************************************************************************
  56  *              SetFileAttributesA      (KERNEL32.490)
  57  */
  58 BOOL WINAPI SetFileAttributesA(LPCSTR lpFileName, DWORD attributes)
  59 {
  60     struct stat buf;
  61     DOS_FULL_NAME full_name;
  62
  63     if (!DOSFS_GetFullName( lpFileName, TRUE, &full_name ))
  64         return FALSE;
  65
  66     TRACE("(%s,%lx)\n",lpFileName,attributes);
  67     if (attributes & FILE_ATTRIBUTE_NORMAL) {
  68       attributes &= ~FILE_ATTRIBUTE_NORMAL;
  69       if (attributes)
  70         FIXME("(%s):%lx illegal combination with FILE_ATTRIBUTE_NORMAL.\n",
  71               lpFileName,attributes);
  72     }
  73     if(stat(full_name.long_name,&buf)==-1)
  74     {
  75         FILE_SetDosError();
  76         return FALSE;
  77     }
  78     if (attributes & FILE_ATTRIBUTE_READONLY)
  79     {
  80         if(S_ISDIR(buf.st_mode))
  81             /* FIXME */
  82             WARN("FILE_ATTRIBUTE_READONLY ignored for directory.\n");
  83         else
  84             buf.st_mode &= ~0222; /* octal!, clear write permission bits */
  85         attributes &= ~FILE_ATTRIBUTE_READONLY;
  86     }
  87     else
  88     {
  89         /* add write permission */
  90         buf.st_mode |= 0600 | ((buf.st_mode & 044) >> 1);
  91     }
  92     if (attributes & FILE_ATTRIBUTE_DIRECTORY)
  93     {
  94         if (!S_ISDIR(buf.st_mode))
  95             FIXME("SetFileAttributes expected the file '%s' to be a directory",
  96                   lpFileName);
  97         attributes &= ~FILE_ATTRIBUTE_DIRECTORY;
  98     }
  99     attributes &= ~(FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM);
 100     if (attributes)
 101         FIXME("(%s):%lx attribute(s) not implemented.\n",
 102               lpFileName,attributes);
 103     if (-1==chmod(full_name.long_name,buf.st_mode))
 104     {
 105         FILE_SetDosError();
 106         MESSAGE("Wine ERROR: Couldn't set file attributes for existing file \"%s\". Check permissions !\n", full_name.long_name);
 107         return FALSE;
 108     }
 109     return TRUE;
 110 }
 111
 112
 113 /**************************************************************************
 114  *              SetFileAttributesW      (KERNEL32.491)
 115  */
 116 BOOL WINAPI SetFileAttributesW(LPCWSTR lpFileName, DWORD attributes)
 117 {
 118     LPSTR afn = HEAP_strdupWtoA( GetProcessHeap(), 0, lpFileName );
 119     BOOL res = SetFileAttributesA( afn, attributes );
 120     HeapFree( GetProcessHeap(), 0, afn );
 121     return res;
 122 }
 123
 124
 125 /**************************************************************************
 126  *              SetFileApisToOEM   (KERNEL32.645)
 127  */
 128 VOID WINAPI SetFileApisToOEM(void)
 129 {
 130   /*FIXME(file,"(): stub!\n");*/
 131 }
 132
 133
 134 /**************************************************************************
 135  *              SetFileApisToANSI   (KERNEL32.644)
 136  */
 137 VOID WINAPI SetFileApisToANSI(void)
 138 {
 139     /*FIXME(file,"(): stub\n");*/
 140 }
 141
 142
 143 /******************************************************************************
 144  * AreFileApisANSI [KERNEL32.105]  Determines if file functions are using ANSI
 145  *
 146  * RETURNS
 147  *    TRUE:  Set of file functions is using ANSI code page
 148  *    FALSE: Set of file functions is using OEM code page
 149  */
 150 BOOL WINAPI AreFileApisANSI(void)
 151 {
 152     FIXME("(void): stub\n");
 153     return TRUE;
 154 }
 155