• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /**
2  * This file has no copyright assigned and is placed in the Public Domain.
3  * This file is part of the mingw-w64 runtime package.
4  * No warranty is given; refer to the file DISCLAIMER.PD within this package.
5  */
6 
7 #include <_mingw_unicode.h>
8 
9 #ifdef __cplusplus
10 extern "C" {
11 #endif
12 
13 #ifdef WANT_GETDISKFREESPACEEX_WRAPPER
14 
15 #undef GetDiskFreeSpaceEx
16 #define GetDiskFreeSpaceEx _GetDiskFreeSpaceEx
17 
18   extern WINBOOL (CALLBACK *GetDiskFreeSpaceEx)(LPCTSTR,PULARGE_INTEGER,PULARGE_INTEGER,PULARGE_INTEGER);
19 
20 #ifdef COMPILE_NEWAPIS_STUBS
Emulate_GetDiskFreeSpaceEx(LPCTSTR ptszRoot,PULARGE_INTEGER pliQuota,PULARGE_INTEGER pliTotal,PULARGE_INTEGER pliFree)21   static WINBOOL WINAPI Emulate_GetDiskFreeSpaceEx(LPCTSTR ptszRoot,PULARGE_INTEGER pliQuota,PULARGE_INTEGER pliTotal,PULARGE_INTEGER pliFree) {
22     DWORD dwSecPerClus,dwBytesPerSec,dwFreeClus,dwTotalClus;
23     WINBOOL fRc;
24     fRc = GetDiskFreeSpace(ptszRoot,&dwSecPerClus,&dwBytesPerSec,&dwFreeClus,&dwTotalClus);
25     if(fRc) {
26       DWORD dwBytesPerClus = dwSecPerClus *dwBytesPerSec;
27       *(__int64 *)pliQuota = Int32x32To64(dwBytesPerClus,dwFreeClus);
28       if(pliFree) {
29 	*pliFree = *pliQuota;
30       }
31       *(__int64 *)pliTotal = Int32x32To64(dwBytesPerClus,dwTotalClus);
32     }
33     return fRc;
34   }
35 
Probe_GetDiskFreeSpaceEx(LPCTSTR ptszRoot,PULARGE_INTEGER pliQuota,PULARGE_INTEGER pliTotal,PULARGE_INTEGER pliFree)36   static WINBOOL WINAPI Probe_GetDiskFreeSpaceEx(LPCTSTR ptszRoot,PULARGE_INTEGER pliQuota,PULARGE_INTEGER pliTotal,PULARGE_INTEGER pliFree) {
37     HINSTANCE hinst;
38     FARPROC fp;
39     WINBOOL fRc;
40     WINBOOL (CALLBACK *RealGetDiskFreeSpaceEx) (LPCTSTR,PULARGE_INTEGER,PULARGE_INTEGER,PULARGE_INTEGER);
41     hinst = GetModuleHandle(TEXT("KERNEL32"));
42     fp = GetProcAddress(hinst,"GetDiskFreeSpaceEx" __MINGW_PROCNAMEEXT_AW);
43     if(fp) {
44       *(FARPROC *)&RealGetDiskFreeSpaceEx = fp;
45       fRc = RealGetDiskFreeSpaceEx(ptszRoot,pliQuota,pliTotal,pliFree);
46       if(fRc || GetLastError()!=ERROR_CALL_NOT_IMPLEMENTED) {
47 	GetDiskFreeSpaceEx = RealGetDiskFreeSpaceEx;
48       } else {
49 	GetDiskFreeSpaceEx = Emulate_GetDiskFreeSpaceEx;
50 	fRc = GetDiskFreeSpaceEx(ptszRoot,pliQuota,pliTotal,pliFree);
51       }
52     } else {
53       GetDiskFreeSpaceEx = Emulate_GetDiskFreeSpaceEx;
54       fRc = GetDiskFreeSpaceEx(ptszRoot,pliQuota,pliTotal,pliFree);
55     }
56     return fRc;
57   }
58 
59   WINBOOL (CALLBACK *GetDiskFreeSpaceEx) (LPCTSTR,PULARGE_INTEGER,PULARGE_INTEGER,PULARGE_INTEGER) = Probe_GetDiskFreeSpaceEx;
60 #endif
61 #endif
62 
63 #ifdef WANT_GETLONGPATHNAME_WRAPPER
64 #include <shlobj.h>
65 
66 #undef GetLongPathName
67 #define GetLongPathName _GetLongPathName
68 
69   extern DWORD (CALLBACK *GetLongPathName)(LPCTSTR,LPTSTR,DWORD);
70 
71 #ifdef COMPILE_NEWAPIS_STUBS
Emulate_GetLongPathName(LPCTSTR ptszShort,LPTSTR ptszLong,DWORD ctchBuf)72   static DWORD WINAPI Emulate_GetLongPathName(LPCTSTR ptszShort,LPTSTR ptszLong,DWORD ctchBuf) {
73     LPSHELLFOLDER psfDesk;
74     HRESULT hr;
75     LPITEMIDLIST pidl;
76     TCHAR tsz[MAX_PATH];
77     DWORD dwRc;
78     LPMALLOC pMalloc;
79     if(GetFileAttributes(ptszShort)==0xFFFFFFFF) return 0;
80     dwRc = GetFullPathName(ptszShort,MAX_PATH,tsz,NULL);
81     if(dwRc==0) {
82     } else if(dwRc >= MAX_PATH) {
83       SetLastError(ERROR_BUFFER_OVERFLOW);
84       dwRc = 0;
85     } else {
86       hr = SHGetDesktopFolder(&psfDesk);
87       if(SUCCEEDED(hr)) {
88 	ULONG cwchEaten;
89 #if defined(UNICODE)
90 #ifdef __cplusplus
91 	hr = psfDesk->ParseDisplayName(NULL,NULL,tsz,&cwchEaten,&pidl,NULL);
92 #else
93 	hr = psfDesk->lpVtbl->ParseDisplayName(psfDesk,NULL,NULL,tsz,&cwchEaten,&pidl,NULL);
94 #endif
95 #else
96 	WCHAR wsz[MAX_PATH];
97 
98 	dwRc = MultiByteToWideChar(AreFileApisANSI() ? CP_ACP : CP_OEMCP,0,tsz,-1,wsz,MAX_PATH);
99 	if(dwRc==0) {
100 	  if(GetLastError()==ERROR_INSUFFICIENT_BUFFER) {
101 	    SetLastError(ERROR_BUFFER_OVERFLOW);
102 	  }
103 	  dwRc = 0;
104 	} else {
105 #ifdef __cplusplus
106 	  hr = psfDesk->ParseDisplayName(NULL,NULL,wsz,&cwchEaten,&pidl,NULL);
107 #else
108 	  hr = psfDesk->lpVtbl->ParseDisplayName(psfDesk,NULL,NULL,wsz,&cwchEaten,&pidl,NULL);
109 #endif
110 #endif
111 	  if(FAILED(hr)) {
112 	    if(HRESULT_FACILITY(hr)==FACILITY_WIN32) {
113 	      SetLastError(HRESULT_CODE(hr));
114 	    } else {
115 	      SetLastError(ERROR_INVALID_DATA);
116 	    }
117 	    dwRc = 0;
118 	  } else {
119 	    dwRc = SHGetPathFromIDList(pidl,tsz);
120 	    if(dwRc==0 && tsz[0]) {
121 	      SetLastError(ERROR_INVALID_DATA);
122 	    } else {
123 	      dwRc = lstrlen(tsz);
124 	      if(dwRc + 1 > ctchBuf) {
125 		SetLastError(ERROR_INSUFFICIENT_BUFFER);
126 		dwRc = dwRc + 1;
127 	      } else {
128 		lstrcpyn(ptszLong,tsz,ctchBuf);
129 	      }
130 	    }
131 	    if(SUCCEEDED(SHGetMalloc(&pMalloc))) {
132 #ifdef __cplusplus
133 	      pMalloc->Free(pidl);
134 	      pMalloc->Release();
135 #else
136 	      pMalloc->lpVtbl->Free(pMalloc,pidl);
137 	      pMalloc->lpVtbl->Release(pMalloc);
138 #endif
139 	    }
140 	  }
141 #if !defined(UNICODE)
142 	}
143 #endif
144 #ifdef __cplusplus
145 	psfDesk->Release();
146 #else
147 	psfDesk->lpVtbl->Release(psfDesk);
148 #endif
149       }
150     }
151     return dwRc;
152   }
153 
Probe_GetLongPathName(LPCTSTR ptszShort,LPTSTR ptszLong,DWORD ctchBuf)154   static DWORD WINAPI Probe_GetLongPathName(LPCTSTR ptszShort,LPTSTR ptszLong,DWORD ctchBuf) {
155     HINSTANCE hinst;
156     FARPROC fp;
157     DWORD dwRc;
158     DWORD (CALLBACK *RealGetLongPathName)(LPCTSTR,LPTSTR,DWORD);
159     hinst = GetModuleHandle(TEXT("KERNEL32"));
160 
161     fp = GetProcAddress(hinst,"GetLongPathName" __MINGW_PROCNAMEEXT_AW);
162     if(fp) {
163       *(FARPROC *)&RealGetLongPathName = fp;
164       dwRc = RealGetLongPathName(ptszShort,ptszLong,ctchBuf);
165       if(dwRc || GetLastError()!=ERROR_CALL_NOT_IMPLEMENTED) {
166 	GetLongPathName = RealGetLongPathName;
167       } else {
168 	GetLongPathName = Emulate_GetLongPathName;
169 	dwRc = GetLongPathName(ptszShort,ptszLong,ctchBuf);
170       }
171     } else {
172       GetLongPathName = Emulate_GetLongPathName;
173       dwRc = GetLongPathName(ptszShort,ptszLong,ctchBuf);
174     }
175     return dwRc;
176 
177   }
178 
179   DWORD (CALLBACK *GetLongPathName)(LPCTSTR,LPTSTR,DWORD) = Probe_GetLongPathName;
180 #endif
181 #endif
182 
183 #ifdef WANT_GETFILEATTRIBUTESEX_WRAPPER
184 
185 #undef GetFileAttributesEx
186 #define GetFileAttributesEx _GetFileAttributesEx
187 
188   extern WINBOOL (CALLBACK *GetFileAttributesEx)
189     (LPCTSTR,GET_FILEEX_INFO_LEVELS,LPVOID);
190 
191 #ifdef COMPILE_NEWAPIS_STUBS
192 
Emulate_GetFileAttributesEx(LPCTSTR ptszFile,GET_FILEEX_INFO_LEVELS level,LPVOID pv)193   static WINBOOL WINAPI Emulate_GetFileAttributesEx(LPCTSTR ptszFile,GET_FILEEX_INFO_LEVELS level,LPVOID pv) {
194     WINBOOL fRc;
195     if(level==GetFileExInfoStandard) {
196       if(GetFileAttributes(ptszFile)!=0xFFFFFFFF) {
197 	HANDLE hfind;
198 	WIN32_FIND_DATA wfd;
199 	hfind = FindFirstFile(ptszFile,&wfd);
200 	if(hfind!=INVALID_HANDLE_VALUE) {
201 	  LPWIN32_FILE_ATTRIBUTE_DATA pfad = pv;
202 	  FindClose(hfind);
203 	  pfad->dwFileAttributes = wfd.dwFileAttributes;
204 	  pfad->ftCreationTime = wfd.ftCreationTime;
205 	  pfad->ftLastAccessTime = wfd.ftLastAccessTime;
206 	  pfad->ftLastWriteTime = wfd.ftLastWriteTime;
207 	  pfad->nFileSizeHigh = wfd.nFileSizeHigh;
208 	  pfad->nFileSizeLow = wfd.nFileSizeLow;
209 
210 	  fRc = TRUE;
211 	} else {
212 	  fRc = FALSE;
213 	}
214       } else {
215 	fRc = FALSE;
216       }
217     } else {
218       SetLastError(ERROR_INVALID_PARAMETER);
219       fRc = FALSE;
220     }
221     return fRc;
222   }
223 
Probe_GetFileAttributesEx(LPCTSTR ptszFile,GET_FILEEX_INFO_LEVELS level,LPVOID pv)224   static WINBOOL WINAPI Probe_GetFileAttributesEx(LPCTSTR ptszFile,GET_FILEEX_INFO_LEVELS level,LPVOID pv) {
225     HINSTANCE hinst;
226     FARPROC fp;
227     WINBOOL fRc;
228     WINBOOL (CALLBACK *RealGetFileAttributesEx)(LPCTSTR,GET_FILEEX_INFO_LEVELS,LPVOID);
229     hinst = GetModuleHandle(TEXT("KERNEL32"));
230     fp = GetProcAddress(hinst,"GetFileAttributesEx" __MINGW_PROCNAMEEXT_AW);
231     if(fp) {
232       *(FARPROC *)&RealGetFileAttributesEx = fp;
233       fRc = RealGetFileAttributesEx(ptszFile,level,pv);
234       if(fRc || GetLastError()!=ERROR_CALL_NOT_IMPLEMENTED) {
235 	GetFileAttributesEx = RealGetFileAttributesEx;
236       } else {
237 	GetFileAttributesEx = Emulate_GetFileAttributesEx;
238 	fRc = GetFileAttributesEx(ptszFile,level,pv);
239       }
240     } else {
241       GetFileAttributesEx = Emulate_GetFileAttributesEx;
242       fRc = GetFileAttributesEx(ptszFile,level,pv);
243     }
244     return fRc;
245   }
246 
247   WINBOOL (CALLBACK *GetFileAttributesEx)(LPCTSTR,GET_FILEEX_INFO_LEVELS,LPVOID) = Probe_GetFileAttributesEx;
248 #endif
249 #endif
250 
251 #ifdef WANT_ISDEBUGGERPRESENT_WRAPPER
252 #define IsDebuggerPresent _IsDebuggerPresent
253 
254   extern WINBOOL (CALLBACK *IsDebuggerPresent)(VOID);
255 
256 #ifdef COMPILE_NEWAPIS_STUBS
Emulate_IsDebuggerPresent(VOID)257   static WINBOOL WINAPI Emulate_IsDebuggerPresent(VOID) { return FALSE; }
Probe_IsDebuggerPresent(VOID)258   static WINBOOL WINAPI Probe_IsDebuggerPresent(VOID) {
259     HINSTANCE hinst;
260     FARPROC fp;
261     WINBOOL (CALLBACK *RealIsDebuggerPresent)(VOID);
262     hinst = GetModuleHandle(TEXT("KERNEL32"));
263     fp = GetProcAddress(hinst,"IsDebuggerPresent");
264     if(fp) {
265       *(FARPROC *)&IsDebuggerPresent = fp;
266     } else {
267       IsDebuggerPresent = Emulate_IsDebuggerPresent;
268     }
269     return IsDebuggerPresent();
270   }
271 
272   WINBOOL (CALLBACK *IsDebuggerPresent)(VOID) = Probe_IsDebuggerPresent;
273 #endif
274 #endif
275 
276 #ifdef __cplusplus
277 }
278 #endif
279