Replaced USER32.DLL use by hardcoded tables for VkKeyScanA and
[wine] / 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         buf.st_mode &= ~0222; /* octal!, clear write permission bits */
81         attributes &= ~FILE_ATTRIBUTE_READONLY;
82     }
83     else
84     {
85         /* add write permission */
86         buf.st_mode |= 0600 | ((buf.st_mode & 044) >> 1);
87     }
88     if (attributes & FILE_ATTRIBUTE_DIRECTORY)
89     {
90         if (!S_ISDIR(buf.st_mode))
91             FIXME("SetFileAttributes expected the file '%s' to be a directory",
92                   lpFileName);
93         attributes &= ~FILE_ATTRIBUTE_DIRECTORY;
94     }
95     attributes &= ~(FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM);
96     if (attributes)
97         FIXME("(%s):%lx attribute(s) not implemented.\n",
98               lpFileName,attributes);
99     if (-1==chmod(full_name.long_name,buf.st_mode))
100     {
101         FILE_SetDosError();
102         MESSAGE("Wine ERROR: Couldn't set file attributes for existing file \"%s\". Check permissions !\n", full_name.long_name);
103         return FALSE;
104     }
105     return TRUE;
106 }
107
108
109 /**************************************************************************
110  *              SetFileAttributesW      (KERNEL32.491)
111  */
112 BOOL WINAPI SetFileAttributesW(LPCWSTR lpFileName, DWORD attributes)
113 {
114     LPSTR afn = HEAP_strdupWtoA( GetProcessHeap(), 0, lpFileName );
115     BOOL res = SetFileAttributesA( afn, attributes );
116     HeapFree( GetProcessHeap(), 0, afn );
117     return res;
118 }
119
120
121 /**************************************************************************
122  *              SetFileApisToOEM   (KERNEL32.645)
123  */
124 VOID WINAPI SetFileApisToOEM(void)
125 {
126   /*FIXME(file,"(): stub!\n");*/
127 }
128
129
130 /**************************************************************************
131  *              SetFileApisToANSI   (KERNEL32.644)
132  */
133 VOID WINAPI SetFileApisToANSI(void)
134 {
135     /*FIXME(file,"(): stub\n");*/
136 }
137
138
139 /******************************************************************************
140  * AreFileApisANSI [KERNEL32.105]  Determines if file functions are using ANSI
141  *
142  * RETURNS
143  *    TRUE:  Set of file functions is using ANSI code page
144  *    FALSE: Set of file functions is using OEM code page
145  */
146 BOOL WINAPI AreFileApisANSI(void)
147 {
148     FIXME("(void): stub\n");
149     return TRUE;
150 }
151