?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
server: Use the helper to reset the clip rect when the desktop size changes.
[wine.git] / dlls / kernelbase / file.c
blob7c2e132bdcb42604624d1989c10f258e6ba567d4
1 /*
2 * File handling functions
3 *
4 * Copyright 1993 John Burton
5 * Copyright 1996, 2004 Alexandre Julliard
6 * Copyright 2008 Jeff Zaroyko
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 */
22
23 #include <stdarg.h>
24 #include <stdio.h>
25
26 #include "winerror.h"
27 #include "ntstatus.h"
28 #define WIN32_NO_STATUS
29 #include "windef.h"
30 #include "winbase.h"
31 #include "winnls.h"
32 #include "winternl.h"
33 #include "winioctl.h"
34 #include "wincon.h"
35 #include "fileapi.h"
36 #include "shlwapi.h"
37 #include "ddk/ntddk.h"
38 #include "ddk/ntddser.h"
39
40 #include "kernelbase.h"
41 #include "wine/exception.h"
42 #include "wine/debug.h"
43
44 WINE_DEFAULT_DEBUG_CHANNEL(file);
45
46 /* info structure for FindFirstFile handle */
47 typedef struct
48 {
49 DWORD magic; /* magic number */
50 HANDLE handle; /* handle to directory */
51 CRITICAL_SECTION cs; /* crit section protecting this structure */
52 FINDEX_SEARCH_OPS search_op; /* Flags passed to FindFirst. */
53 FINDEX_INFO_LEVELS level; /* Level passed to FindFirst */
54 UNICODE_STRING path; /* NT path used to open the directory */
55 BOOL is_root; /* is directory the root of the drive? */
56 BOOL wildcard; /* did the mask contain wildcard characters? */
57 UINT data_pos; /* current position in dir data */
58 UINT data_len; /* length of dir data */
59 UINT data_size; /* size of data buffer, or 0 when everything has been read */
60 BYTE data[1]; /* directory data */
61 } FIND_FIRST_INFO;
62
63 #define FIND_FIRST_MAGIC 0xc0ffee11
64
65 static const UINT max_entry_size = offsetof( FILE_BOTH_DIRECTORY_INFORMATION, FileName[256] );
66
67 const WCHAR windows_dir[] = L"C:\\windows";
68 const WCHAR system_dir[] = L"C:\\windows\\system32";
69
70 static BOOL oem_file_apis;
71
72
73 static void WINAPI read_write_apc( void *apc_user, PIO_STATUS_BLOCK io, ULONG reserved )
74 {
75 LPOVERLAPPED_COMPLETION_ROUTINE func = apc_user;
76 func( RtlNtStatusToDosError( io->Status ), io->Information, (LPOVERLAPPED)io );
77 }
78
79 static const WCHAR *get_machine_wow64_dir( WORD machine )
80 {
81 switch (machine)
82 {
83 case IMAGE_FILE_MACHINE_TARGET_HOST: return system_dir;
84 case IMAGE_FILE_MACHINE_I386: return L"C:\\windows\\syswow64";
85 case IMAGE_FILE_MACHINE_ARMNT: return L"C:\\windows\\sysarm32";
86 case IMAGE_FILE_MACHINE_AMD64: return L"C:\\windows\\sysx8664";
87 case IMAGE_FILE_MACHINE_ARM64: return L"C:\\windows\\sysarm64";
88 default: return NULL;
89 }
90 }
91
92
93 /***********************************************************************
94 * Operations on file names
95 ***********************************************************************/
96
97
98 /***********************************************************************
99 * contains_path
100 *
101 * Check if the file name contains a path; helper for SearchPathW.
102 * A relative path is not considered a path unless it starts with ./ or ../
103 */
104 static inline BOOL contains_path( const WCHAR *name )
105 {
106 if (RtlDetermineDosPathNameType_U( name ) != RELATIVE_PATH) return TRUE;
107 if (name[0] != '.') return FALSE;
108 if (name[1] == '/' || name[1] == '\\') return TRUE;
109 return (name[1] == '.' && (name[2] == '/' || name[2] == '\\'));
110 }
111
112
113 /***********************************************************************
114 * add_boot_rename_entry
115 *
116 * Adds an entry to the registry that is loaded when windows boots and
117 * checks if there are some files to be removed or renamed/moved.
118 * <fn1> has to be valid and <fn2> may be NULL. If both pointers are
119 * non-NULL then the file is moved, otherwise it is deleted. The
120 * entry of the registry key is always appended with two zero
121 * terminated strings. If <fn2> is NULL then the second entry is
122 * simply a single 0-byte. Otherwise the second filename goes
123 * there. The entries are prepended with \??\ before the path and the
124 * second filename gets also a '!' as the first character if
125 * MOVEFILE_REPLACE_EXISTING is set. After the final string another
126 * 0-byte follows to indicate the end of the strings.
127 * i.e.:
128 * \??\D:\test\file1[0]
129 * !\??\D:\test\file1_renamed[0]
130 * \??\D:\Test|delete[0]
131 * [0] <- file is to be deleted, second string empty
132 * \??\D:\test\file2[0]
133 * !\??\D:\test\file2_renamed[0]
134 * [0] <- indicates end of strings
135 *
136 * or:
137 * \??\D:\test\file1[0]
138 * !\??\D:\test\file1_renamed[0]
139 * \??\D:\Test|delete[0]
140 * [0] <- file is to be deleted, second string empty
141 * [0] <- indicates end of strings
142 *
143 */
144 static BOOL add_boot_rename_entry( LPCWSTR source, LPCWSTR dest, DWORD flags )
145 {
146 static const int info_size = FIELD_OFFSET( KEY_VALUE_PARTIAL_INFORMATION, Data );
147
148 OBJECT_ATTRIBUTES attr;
149 UNICODE_STRING session_manager = RTL_CONSTANT_STRING( L"\\Registry\\Machine\\System\\CurrentControlSet\\Control\\Session Manager" );
150 UNICODE_STRING pending_file_rename_operations = RTL_CONSTANT_STRING( L"PendingFileRenameOperations" );
151 UNICODE_STRING source_name, dest_name;
152 KEY_VALUE_PARTIAL_INFORMATION *info;
153 BOOL rc = FALSE;
154 HANDLE key = 0;
155 DWORD len1, len2;
156 DWORD size = 0;
157 BYTE *buffer = NULL;
158 WCHAR *p;
159
160 if (!RtlDosPathNameToNtPathName_U( source, &source_name, NULL, NULL ))
161 {
162 SetLastError( ERROR_PATH_NOT_FOUND );
163 return FALSE;
164 }
165 dest_name.Buffer = NULL;
166 if (dest && !RtlDosPathNameToNtPathName_U( dest, &dest_name, NULL, NULL ))
167 {
168 RtlFreeUnicodeString( &source_name );
169 SetLastError( ERROR_PATH_NOT_FOUND );
170 return FALSE;
171 }
172
173 attr.Length = sizeof(attr);
174 attr.RootDirectory = 0;
175 attr.ObjectName = &session_manager;
176 attr.Attributes = 0;
177 attr.SecurityDescriptor = NULL;
178 attr.SecurityQualityOfService = NULL;
179
180 if (NtCreateKey( &key, KEY_ALL_ACCESS, &attr, 0, NULL, 0, NULL ) != STATUS_SUCCESS)
181 {
182 RtlFreeUnicodeString( &source_name );
183 RtlFreeUnicodeString( &dest_name );
184 return FALSE;
185 }
186
187 len1 = source_name.Length + sizeof(WCHAR);
188 if (dest)
189 {
190 len2 = dest_name.Length + sizeof(WCHAR);
191 if (flags & MOVEFILE_REPLACE_EXISTING)
192 len2 += sizeof(WCHAR); /* Plus 1 because of the leading '!' */
193 }
194 else len2 = sizeof(WCHAR); /* minimum is the 0 characters for the empty second string */
195
196 /* First we check if the key exists and if so how many bytes it already contains. */
197 if (NtQueryValueKey( key, &pending_file_rename_operations, KeyValuePartialInformation,
198 NULL, 0, &size ) == STATUS_BUFFER_TOO_SMALL)
199 {
200 if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size + len1 + len2 + sizeof(WCHAR) ))) goto done;
201 if (NtQueryValueKey( key, &pending_file_rename_operations, KeyValuePartialInformation, buffer, size, &size )) goto done;
202 info = (KEY_VALUE_PARTIAL_INFORMATION *)buffer;
203 if (info->Type != REG_MULTI_SZ) goto done;
204 if (size > sizeof(info)) size -= sizeof(WCHAR); /* remove terminating null (will be added back later) */
205 }
206 else
207 {
208 size = info_size;
209 if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size + len1 + len2 + sizeof(WCHAR) ))) goto done;
210 }
211
212 memcpy( buffer + size, source_name.Buffer, len1 );
213 size += len1;
214 p = (WCHAR *)(buffer + size);
215 if (dest)
216 {
217 if (flags & MOVEFILE_REPLACE_EXISTING) *p++ = '!';
218 memcpy( p, dest_name.Buffer, len2 );
219 size += len2;
220 }
221 else
222 {
223 *p = 0;
224 size += sizeof(WCHAR);
225 }
226
227 /* add final null */
228 p = (WCHAR *)(buffer + size);
229 *p = 0;
230 size += sizeof(WCHAR);
231 rc = !NtSetValueKey( key, &pending_file_rename_operations, 0, REG_MULTI_SZ, buffer + info_size, size - info_size );
232
233 done:
234 RtlFreeUnicodeString( &source_name );
235 RtlFreeUnicodeString( &dest_name );
236 if (key) NtClose(key);
237 HeapFree( GetProcessHeap(), 0, buffer );
238 return rc;
239 }
240
241
242 /***********************************************************************
243 * append_ext
244 */
245 static WCHAR *append_ext( const WCHAR *name, const WCHAR *ext )
246 {
247 const WCHAR *p;
248 WCHAR *ret;
249 DWORD len;
250
251 if (!ext) return NULL;
252 p = wcsrchr( name, '.' );
253 if (p && !wcschr( p, '/' ) && !wcschr( p, '\\' )) return NULL;
254
255 len = lstrlenW( name ) + lstrlenW( ext );
256 if ((ret = RtlAllocateHeap( GetProcessHeap(), 0, (len + 1) * sizeof(WCHAR) )))
257 {
258 lstrcpyW( ret, name );
259 lstrcatW( ret, ext );
260 }
261 return ret;
262 }
263
264
265 /***********************************************************************
266 * find_actctx_dllpath
267 *
268 * Find the path (if any) of the dll from the activation context.
269 * Returned path doesn't include a name.
270 */
271 static NTSTATUS find_actctx_dllpath( const WCHAR *name, WCHAR **path )
272 {
273 ACTIVATION_CONTEXT_ASSEMBLY_DETAILED_INFORMATION *info;
274 ACTCTX_SECTION_KEYED_DATA data;
275 UNICODE_STRING nameW;
276 NTSTATUS status;
277 SIZE_T needed, size = 1024;
278 WCHAR *p;
279
280 RtlInitUnicodeString( &nameW, name );
281 data.cbSize = sizeof(data);
282 status = RtlFindActivationContextSectionString( FIND_ACTCTX_SECTION_KEY_RETURN_HACTCTX, NULL,
283 ACTIVATION_CONTEXT_SECTION_DLL_REDIRECTION,
284 &nameW, &data );
285 if (status != STATUS_SUCCESS) return status;
286
287 for (;;)
288 {
289 if (!(info = RtlAllocateHeap( GetProcessHeap(), 0, size )))
290 {
291 status = STATUS_NO_MEMORY;
292 goto done;
293 }
294 status = RtlQueryInformationActivationContext( 0, data.hActCtx, &data.ulAssemblyRosterIndex,
295 AssemblyDetailedInformationInActivationContext,
296 info, size, &needed );
297 if (status == STATUS_SUCCESS) break;
298 if (status != STATUS_BUFFER_TOO_SMALL) goto done;
299 RtlFreeHeap( GetProcessHeap(), 0, info );
300 size = needed;
301 /* restart with larger buffer */
302 }
303
304 if (!info->lpAssemblyManifestPath)
305 {
306 status = STATUS_SXS_KEY_NOT_FOUND;
307 goto done;
308 }
309
310 if ((p = wcsrchr( info->lpAssemblyManifestPath, '\\' )))
311 {
312 DWORD dirlen = info->ulAssemblyDirectoryNameLength / sizeof(WCHAR);
313
314 p++;
315 if (!dirlen ||
316 CompareStringOrdinal( p, dirlen, info->lpAssemblyDirectoryName, dirlen, TRUE ) != CSTR_EQUAL ||
317 wcsicmp( p + dirlen, L".manifest" ))
318 {
319 /* manifest name does not match directory name, so it's not a global
320 * windows/winsxs manifest; use the manifest directory name instead */
321 dirlen = p - info->lpAssemblyManifestPath;
322 needed = (dirlen + 1) * sizeof(WCHAR);
323 if (!(*path = p = HeapAlloc( GetProcessHeap(), 0, needed )))
324 {
325 status = STATUS_NO_MEMORY;
326 goto done;
327 }
328 memcpy( p, info->lpAssemblyManifestPath, dirlen * sizeof(WCHAR) );
329 *(p + dirlen) = 0;
330 goto done;
331 }
332 }
333
334 if (!info->lpAssemblyDirectoryName)
335 {
336 status = STATUS_SXS_KEY_NOT_FOUND;
337 goto done;
338 }
339
340 needed = sizeof(L"C:\\windows\\winsxs\\") + info->ulAssemblyDirectoryNameLength + sizeof(WCHAR);
341
342 if (!(*path = p = RtlAllocateHeap( GetProcessHeap(), 0, needed )))
343 {
344 status = STATUS_NO_MEMORY;
345 goto done;
346 }
347 lstrcpyW( p, L"C:\\windows\\winsxs\\" );
348 p += lstrlenW(p);
349 memcpy( p, info->lpAssemblyDirectoryName, info->ulAssemblyDirectoryNameLength );
350 p += info->ulAssemblyDirectoryNameLength / sizeof(WCHAR);
351 *p++ = '\\';
352 *p = 0;
353 done:
354 RtlFreeHeap( GetProcessHeap(), 0, info );
355 RtlReleaseActivationContext( data.hActCtx );
356 return status;
357 }
358
359
360 /***********************************************************************
361 * copy_filename
362 */
363 static DWORD copy_filename( const WCHAR *name, WCHAR *buffer, DWORD len )
364 {
365 UINT ret = lstrlenW( name ) + 1;
366 if (buffer && len >= ret)
367 {
368 lstrcpyW( buffer, name );
369 ret--;
370 }
371 return ret;
372 }
373
374
375 /***********************************************************************
376 * copy_filename_WtoA
377 *
378 * copy a file name back to OEM/Ansi, but only if the buffer is large enough
379 */
380 static DWORD copy_filename_WtoA( LPCWSTR nameW, LPSTR buffer, DWORD len )
381 {
382 UNICODE_STRING strW;
383 DWORD ret;
384
385 RtlInitUnicodeString( &strW, nameW );
386
387 ret = oem_file_apis ? RtlUnicodeStringToOemSize( &strW ) : RtlUnicodeStringToAnsiSize( &strW );
388 if (buffer && ret <= len)
389 {
390 ANSI_STRING str;
391
392 str.Buffer = buffer;
393 str.MaximumLength = min( len, UNICODE_STRING_MAX_CHARS );
394 if (oem_file_apis)
395 RtlUnicodeStringToOemString( &str, &strW, FALSE );
396 else
397 RtlUnicodeStringToAnsiString( &str, &strW, FALSE );
398 ret = str.Length; /* length without terminating 0 */
399 }
400 return ret;
401 }
402
403
404 /***********************************************************************
405 * file_name_AtoW
406 *
407 * Convert a file name to Unicode, taking into account the OEM/Ansi API mode.
408 *
409 * If alloc is FALSE uses the TEB static buffer, so it can only be used when
410 * there is no possibility for the function to do that twice, taking into
411 * account any called function.
412 */
413 WCHAR *file_name_AtoW( LPCSTR name, BOOL alloc )
414 {
415 ANSI_STRING str;
416 UNICODE_STRING strW, *pstrW;
417 NTSTATUS status;
418
419 RtlInitAnsiString( &str, name );
420 pstrW = alloc ? &strW : &NtCurrentTeb()->StaticUnicodeString;
421 if (oem_file_apis)
422 status = RtlOemStringToUnicodeString( pstrW, &str, alloc );
423 else
424 status = RtlAnsiStringToUnicodeString( pstrW, &str, alloc );
425 if (status == STATUS_SUCCESS) return pstrW->Buffer;
426
427 if (status == STATUS_BUFFER_OVERFLOW)
428 SetLastError( ERROR_FILENAME_EXCED_RANGE );
429 else
430 SetLastError( RtlNtStatusToDosError(status) );
431 return NULL;
432 }
433
434
435 /***********************************************************************
436 * file_name_WtoA
437 *
438 * Convert a file name back to OEM/Ansi. Returns number of bytes copied.
439 */
440 DWORD file_name_WtoA( LPCWSTR src, INT srclen, LPSTR dest, INT destlen )
441 {
442 DWORD ret;
443
444 if (srclen < 0) srclen = lstrlenW( src ) + 1;
445 if (!destlen)
446 {
447 if (oem_file_apis)
448 {
449 UNICODE_STRING strW;
450 strW.Buffer = (WCHAR *)src;
451 strW.Length = srclen * sizeof(WCHAR);
452 ret = RtlUnicodeStringToOemSize( &strW ) - 1;
453 }
454 else
455 RtlUnicodeToMultiByteSize( &ret, src, srclen * sizeof(WCHAR) );
456 }
457 else
458 {
459 if (oem_file_apis)
460 RtlUnicodeToOemN( dest, destlen, &ret, src, srclen * sizeof(WCHAR) );
461 else
462 RtlUnicodeToMultiByteN( dest, destlen, &ret, src, srclen * sizeof(WCHAR) );
463 }
464 return ret;
465 }
466
467
468 /***********************************************************************
469 * is_same_file
470 */
471 static BOOL is_same_file( HANDLE h1, HANDLE h2 )
472 {
473 FILE_OBJECTID_BUFFER id1, id2;
474 IO_STATUS_BLOCK io;
475
476 return (!NtFsControlFile( h1, 0, NULL, NULL, &io, FSCTL_GET_OBJECT_ID, NULL, 0, &id1, sizeof(id1) ) &&
477 !NtFsControlFile( h2, 0, NULL, NULL, &io, FSCTL_GET_OBJECT_ID, NULL, 0, &id2, sizeof(id2) ) &&
478 !memcmp( &id1.ObjectId, &id2.ObjectId, sizeof(id1.ObjectId) ));
479 }
480
481
482 /******************************************************************************
483 * AreFileApisANSI (kernelbase.@)
484 */
485 BOOL WINAPI DECLSPEC_HOTPATCH AreFileApisANSI(void)
486 {
487 return !oem_file_apis;
488 }
489
490
491 /***********************************************************************
492 * CopyFileExW (kernelbase.@)
493 */
494 BOOL WINAPI CopyFileExW( const WCHAR *source, const WCHAR *dest, LPPROGRESS_ROUTINE progress,
495 void *param, BOOL *cancel_ptr, DWORD flags )
496 {
497 static const int buffer_size = 65536;
498 HANDLE h1, h2;
499 FILE_BASIC_INFORMATION info;
500 IO_STATUS_BLOCK io;
501 DWORD count;
502 BOOL ret = FALSE;
503 char *buffer;
504
505 if (!source || !dest)
506 {
507 SetLastError( ERROR_INVALID_PARAMETER );
508 return FALSE;
509 }
510 if (!(buffer = HeapAlloc( GetProcessHeap(), 0, buffer_size )))
511 {
512 SetLastError( ERROR_NOT_ENOUGH_MEMORY );
513 return FALSE;
514 }
515
516 TRACE("%s -> %s, %lx\n", debugstr_w(source), debugstr_w(dest), flags);
517
518 if (flags & COPY_FILE_RESTARTABLE)
519 FIXME("COPY_FILE_RESTARTABLE is not supported\n");
520 if (flags & COPY_FILE_COPY_SYMLINK)
521 FIXME("COPY_FILE_COPY_SYMLINK is not supported\n");
522 if (flags & COPY_FILE_OPEN_SOURCE_FOR_WRITE)
523 FIXME("COPY_FILE_OPEN_SOURCE_FOR_WRITE is not supported\n");
524
525 if ((h1 = CreateFileW( source, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
526 NULL, OPEN_EXISTING, 0, 0 )) == INVALID_HANDLE_VALUE)
527 {
528 WARN("Unable to open source %s\n", debugstr_w(source));
529 HeapFree( GetProcessHeap(), 0, buffer );
530 return FALSE;
531 }
532
533 if (!set_ntstatus( NtQueryInformationFile( h1, &io, &info, sizeof(info), FileBasicInformation )))
534 {
535 WARN("GetFileInformationByHandle returned error for %s\n", debugstr_w(source));
536 HeapFree( GetProcessHeap(), 0, buffer );
537 CloseHandle( h1 );
538 return FALSE;
539 }
540
541 if (!(flags & COPY_FILE_FAIL_IF_EXISTS))
542 {
543 BOOL same_file = FALSE;
544 h2 = CreateFileW( dest, 0, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, 0 );
545 if (h2 != INVALID_HANDLE_VALUE)
546 {
547 same_file = is_same_file( h1, h2 );
548 CloseHandle( h2 );
549 }
550 if (same_file)
551 {
552 HeapFree( GetProcessHeap(), 0, buffer );
553 CloseHandle( h1 );
554 SetLastError( ERROR_SHARING_VIOLATION );
555 return FALSE;
556 }
557 }
558
559 if ((h2 = CreateFileW( dest, GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
560 (flags & COPY_FILE_FAIL_IF_EXISTS) ? CREATE_NEW : CREATE_ALWAYS,
561 info.FileAttributes, h1 )) == INVALID_HANDLE_VALUE)
562 {
563 WARN("Unable to open dest %s\n", debugstr_w(dest));
564 HeapFree( GetProcessHeap(), 0, buffer );
565 CloseHandle( h1 );
566 return FALSE;
567 }
568
569 while (ReadFile( h1, buffer, buffer_size, &count, NULL ) && count)
570 {
571 char *p = buffer;
572 while (count != 0)
573 {
574 DWORD res;
575 if (!WriteFile( h2, p, count, &res, NULL ) || !res) goto done;
576 p += res;
577 count -= res;
578 }
579 }
580 ret = TRUE;
581 done:
582 /* Maintain the timestamp of source file to destination file */
583 info.FileAttributes = 0;
584 NtSetInformationFile( h2, &io, &info, sizeof(info), FileBasicInformation );
585 HeapFree( GetProcessHeap(), 0, buffer );
586 CloseHandle( h1 );
587 CloseHandle( h2 );
588 if (ret) SetLastError( 0 );
589 return ret;
590 }
591
592
593 /**************************************************************************
594 * CopyFileW (kernelbase.@)
595 */
596 BOOL WINAPI DECLSPEC_HOTPATCH CopyFileW( const WCHAR *source, const WCHAR *dest, BOOL fail_if_exists )
597 {
598 return CopyFileExW( source, dest, NULL, NULL, NULL, fail_if_exists ? COPY_FILE_FAIL_IF_EXISTS : 0 );
599 }
600
601
602 /***********************************************************************
603 * CreateDirectoryA (kernelbase.@)
604 */
605 BOOL WINAPI DECLSPEC_HOTPATCH CreateDirectoryA( LPCSTR path, LPSECURITY_ATTRIBUTES sa )
606 {
607 WCHAR *pathW;
608
609 if (!(pathW = file_name_AtoW( path, FALSE ))) return FALSE;
610 return CreateDirectoryW( pathW, sa );
611 }
612
613
614 /***********************************************************************
615 * CreateDirectoryW (kernelbase.@)
616 */
617 BOOL WINAPI DECLSPEC_HOTPATCH CreateDirectoryW( LPCWSTR path, LPSECURITY_ATTRIBUTES sa )
618 {
619 OBJECT_ATTRIBUTES attr;
620 UNICODE_STRING nt_name;
621 IO_STATUS_BLOCK io;
622 NTSTATUS status;
623 HANDLE handle;
624
625 TRACE( "%s\n", debugstr_w(path) );
626
627 if (!RtlDosPathNameToNtPathName_U( path, &nt_name, NULL, NULL ))
628 {
629 SetLastError( ERROR_PATH_NOT_FOUND );
630 return FALSE;
631 }
632 attr.Length = sizeof(attr);
633 attr.RootDirectory = 0;
634 attr.Attributes = OBJ_CASE_INSENSITIVE;
635 attr.ObjectName = &nt_name;
636 attr.SecurityDescriptor = sa ? sa->lpSecurityDescriptor : NULL;
637 attr.SecurityQualityOfService = NULL;
638
639 status = NtCreateFile( &handle, GENERIC_READ | SYNCHRONIZE, &attr, &io, NULL,
640 FILE_ATTRIBUTE_NORMAL, FILE_SHARE_READ, FILE_CREATE,
641 FILE_DIRECTORY_FILE | FILE_SYNCHRONOUS_IO_NONALERT, NULL, 0 );
642 if (status == STATUS_SUCCESS) NtClose( handle );
643
644 RtlFreeUnicodeString( &nt_name );
645 return set_ntstatus( status );
646 }
647
648
649 /***********************************************************************
650 * CreateDirectoryEx (kernelbase.@)
651 */
652 BOOL WINAPI DECLSPEC_HOTPATCH CreateDirectoryExW( LPCWSTR template, LPCWSTR path,
653 LPSECURITY_ATTRIBUTES sa )
654 {
655 return CreateDirectoryW( path, sa );
656 }
657
658
659 /*************************************************************************
660 * CreateFile2 (kernelbase.@)
661 */
662 HANDLE WINAPI DECLSPEC_HOTPATCH CreateFile2( LPCWSTR name, DWORD access, DWORD sharing, DWORD creation,
663 CREATEFILE2_EXTENDED_PARAMETERS *params )
664 {
665 static const DWORD attributes_mask = FILE_ATTRIBUTE_READONLY |
666 FILE_ATTRIBUTE_HIDDEN |
667 FILE_ATTRIBUTE_SYSTEM |
668 FILE_ATTRIBUTE_ARCHIVE |
669 FILE_ATTRIBUTE_NORMAL |
670 FILE_ATTRIBUTE_TEMPORARY |
671 FILE_ATTRIBUTE_OFFLINE |
672 FILE_ATTRIBUTE_ENCRYPTED |
673 FILE_ATTRIBUTE_INTEGRITY_STREAM;
674 static const DWORD flags_mask = FILE_FLAG_BACKUP_SEMANTICS |
675 FILE_FLAG_DELETE_ON_CLOSE |
676 FILE_FLAG_NO_BUFFERING |
677 FILE_FLAG_OPEN_NO_RECALL |
678 FILE_FLAG_OPEN_REPARSE_POINT |
679 FILE_FLAG_OVERLAPPED |
680 FILE_FLAG_POSIX_SEMANTICS |
681 FILE_FLAG_RANDOM_ACCESS |
682 FILE_FLAG_SEQUENTIAL_SCAN |
683 FILE_FLAG_WRITE_THROUGH;
684
685 LPSECURITY_ATTRIBUTES sa = params ? params->lpSecurityAttributes : NULL;
686 HANDLE template = params ? params->hTemplateFile : NULL;
687 DWORD attributes = params ? params->dwFileAttributes : 0;
688 DWORD flags = params ? params->dwFileFlags : 0;
689
690 FIXME( "(%s %lx %lx %lx %p), partial stub\n", debugstr_w(name), access, sharing, creation, params );
691
692 if (attributes & ~attributes_mask) FIXME( "unsupported attributes %#lx\n", attributes );
693 if (flags & ~flags_mask) FIXME( "unsupported flags %#lx\n", flags );
694 attributes &= attributes_mask;
695 flags &= flags_mask;
696
697 return CreateFileW( name, access, sharing, sa, creation, flags | attributes, template );
698 }
699
700
701 /*************************************************************************
702 * CreateFileA (kernelbase.@)
703 */
704 HANDLE WINAPI DECLSPEC_HOTPATCH CreateFileA( LPCSTR name, DWORD access, DWORD sharing,
705 LPSECURITY_ATTRIBUTES sa, DWORD creation,
706 DWORD attributes, HANDLE template)
707 {
708 WCHAR *nameW;
709
710 if ((GetVersion() & 0x80000000) && IsBadStringPtrA( name, -1 )) return INVALID_HANDLE_VALUE;
711 if (!(nameW = file_name_AtoW( name, FALSE ))) return INVALID_HANDLE_VALUE;
712 return CreateFileW( nameW, access, sharing, sa, creation, attributes, template );
713 }
714
715 static UINT get_nt_file_options( DWORD attributes )
716 {
717 UINT options = 0;
718
719 if (attributes & FILE_FLAG_BACKUP_SEMANTICS)
720 options |= FILE_OPEN_FOR_BACKUP_INTENT;
721 else
722 options |= FILE_NON_DIRECTORY_FILE;
723 if (attributes & FILE_FLAG_DELETE_ON_CLOSE)
724 options |= FILE_DELETE_ON_CLOSE;
725 if (attributes & FILE_FLAG_NO_BUFFERING)
726 options |= FILE_NO_INTERMEDIATE_BUFFERING;
727 if (!(attributes & FILE_FLAG_OVERLAPPED))
728 options |= FILE_SYNCHRONOUS_IO_NONALERT;
729 if (attributes & FILE_FLAG_RANDOM_ACCESS)
730 options |= FILE_RANDOM_ACCESS;
731 if (attributes & FILE_FLAG_SEQUENTIAL_SCAN)
732 options |= FILE_SEQUENTIAL_ONLY;
733 if (attributes & FILE_FLAG_WRITE_THROUGH)
734 options |= FILE_WRITE_THROUGH;
735 return options;
736 }
737
738 /*************************************************************************
739 * CreateFileW (kernelbase.@)
740 */
741 HANDLE WINAPI DECLSPEC_HOTPATCH CreateFileW( LPCWSTR filename, DWORD access, DWORD sharing,
742 LPSECURITY_ATTRIBUTES sa, DWORD creation,
743 DWORD attributes, HANDLE template )
744 {
745 NTSTATUS status;
746 OBJECT_ATTRIBUTES attr;
747 UNICODE_STRING nameW;
748 IO_STATUS_BLOCK io;
749 HANDLE ret;
750 const WCHAR *vxd_name = NULL;
751 SECURITY_QUALITY_OF_SERVICE qos;
752
753 static const UINT nt_disposition[5] =
754 {
755 FILE_CREATE, /* CREATE_NEW */
756 FILE_OVERWRITE_IF, /* CREATE_ALWAYS */
757 FILE_OPEN, /* OPEN_EXISTING */
758 FILE_OPEN_IF, /* OPEN_ALWAYS */
759 FILE_OVERWRITE /* TRUNCATE_EXISTING */
760 };
761
762
763 /* sanity checks */
764
765 if (!filename || !filename[0])
766 {
767 SetLastError( ERROR_PATH_NOT_FOUND );
768 return INVALID_HANDLE_VALUE;
769 }
770
771 TRACE( "%s %s%s%s%s%s%s%s creation %ld attributes 0x%lx\n", debugstr_w(filename),
772 (access & GENERIC_READ) ? "GENERIC_READ " : "",
773 (access & GENERIC_WRITE) ? "GENERIC_WRITE " : "",
774 (access & GENERIC_EXECUTE) ? "GENERIC_EXECUTE " : "",
775 !access ? "QUERY_ACCESS " : "",
776 (sharing & FILE_SHARE_READ) ? "FILE_SHARE_READ " : "",
777 (sharing & FILE_SHARE_WRITE) ? "FILE_SHARE_WRITE " : "",
778 (sharing & FILE_SHARE_DELETE) ? "FILE_SHARE_DELETE " : "",
779 creation, attributes);
780
781 if ((GetVersion() & 0x80000000) && !wcsncmp( filename, L"\\\\.\\", 4 ) &&
782 !RtlIsDosDeviceName_U( filename + 4 ) &&
783 wcsnicmp( filename + 4, L"PIPE\\", 5 ) &&
784 wcsnicmp( filename + 4, L"MAILSLOT\\", 9 ))
785 {
786 vxd_name = filename + 4;
787 if (!creation) creation = OPEN_EXISTING;
788 }
789
790 if (creation < CREATE_NEW || creation > TRUNCATE_EXISTING)
791 {
792 SetLastError( ERROR_INVALID_PARAMETER );
793 return INVALID_HANDLE_VALUE;
794 }
795
796 if (!RtlDosPathNameToNtPathName_U( filename, &nameW, NULL, NULL ))
797 {
798 SetLastError( ERROR_PATH_NOT_FOUND );
799 return INVALID_HANDLE_VALUE;
800 }
801
802 /* now call NtCreateFile */
803
804 if (attributes & FILE_FLAG_DELETE_ON_CLOSE)
805 access |= DELETE;
806
807 attr.Length = sizeof(attr);
808 attr.RootDirectory = 0;
809 attr.Attributes = OBJ_CASE_INSENSITIVE;
810 attr.ObjectName = &nameW;
811 attr.SecurityDescriptor = sa ? sa->lpSecurityDescriptor : NULL;
812 if (attributes & SECURITY_SQOS_PRESENT)
813 {
814 qos.Length = sizeof(qos);
815 qos.ImpersonationLevel = (attributes >> 16) & 0x3;
816 qos.ContextTrackingMode = attributes & SECURITY_CONTEXT_TRACKING ? SECURITY_DYNAMIC_TRACKING : SECURITY_STATIC_TRACKING;
817 qos.EffectiveOnly = (attributes & SECURITY_EFFECTIVE_ONLY) != 0;
818 attr.SecurityQualityOfService = &qos;
819 }
820 else
821 attr.SecurityQualityOfService = NULL;
822
823 if (sa && sa->bInheritHandle) attr.Attributes |= OBJ_INHERIT;
824
825 status = NtCreateFile( &ret, access | SYNCHRONIZE | FILE_READ_ATTRIBUTES, &attr, &io,
826 NULL, attributes & FILE_ATTRIBUTE_VALID_FLAGS, sharing,
827 nt_disposition[creation - CREATE_NEW],
828 get_nt_file_options( attributes ), NULL, 0 );
829 if (status)
830 {
831 if (vxd_name && vxd_name[0])
832 {
833 static HANDLE (*vxd_open)(LPCWSTR,DWORD,SECURITY_ATTRIBUTES*);
834 if (!vxd_open) vxd_open = (void *)GetProcAddress( GetModuleHandleW(L"krnl386.exe16"),
835 "__wine_vxd_open" );
836 if (vxd_open && (ret = vxd_open( vxd_name, access, sa ))) goto done;
837 }
838
839 WARN("Unable to create file %s (status %lx)\n", debugstr_w(filename), status);
840 ret = INVALID_HANDLE_VALUE;
841
842 /* In the case file creation was rejected due to CREATE_NEW flag
843 * was specified and file with that name already exists, correct
844 * last error is ERROR_FILE_EXISTS and not ERROR_ALREADY_EXISTS.
845 * Note: RtlNtStatusToDosError is not the subject to blame here.
846 */
847 if (status == STATUS_OBJECT_NAME_COLLISION)
848 SetLastError( ERROR_FILE_EXISTS );
849 else
850 SetLastError( RtlNtStatusToDosError(status) );
851 }
852 else
853 {
854 if ((creation == CREATE_ALWAYS && io.Information == FILE_OVERWRITTEN) ||
855 (creation == OPEN_ALWAYS && io.Information == FILE_OPENED))
856 SetLastError( ERROR_ALREADY_EXISTS );
857 else
858 SetLastError( 0 );
859 }
860 RtlFreeUnicodeString( &nameW );
861
862 done:
863 if (!ret) ret = INVALID_HANDLE_VALUE;
864 TRACE("returning %p\n", ret);
865 return ret;
866 }
867
868
869 /*************************************************************************
870 * CreateHardLinkA (kernelbase.@)
871 */
872 BOOL WINAPI DECLSPEC_HOTPATCH CreateHardLinkA( const char *dest, const char *source,
873 SECURITY_ATTRIBUTES *attr )
874 {
875 WCHAR *sourceW, *destW;
876 BOOL res;
877
878 if (!(sourceW = file_name_AtoW( source, TRUE ))) return FALSE;
879 if (!(destW = file_name_AtoW( dest, TRUE )))
880 {
881 HeapFree( GetProcessHeap(), 0, sourceW );
882 return FALSE;
883 }
884 res = CreateHardLinkW( destW, sourceW, attr );
885 HeapFree( GetProcessHeap(), 0, sourceW );
886 HeapFree( GetProcessHeap(), 0, destW );
887 return res;
888 }
889
890
891 /*************************************************************************
892 * CreateHardLinkW (kernelbase.@)
893 */
894 BOOL WINAPI CreateHardLinkW( LPCWSTR dest, LPCWSTR source, SECURITY_ATTRIBUTES *sec_attr )
895 {
896 UNICODE_STRING ntDest, ntSource;
897 FILE_LINK_INFORMATION *info = NULL;
898 OBJECT_ATTRIBUTES attr;
899 IO_STATUS_BLOCK io;
900 BOOL ret = FALSE;
901 HANDLE file;
902 ULONG size;
903
904 TRACE( "(%s, %s, %p)\n", debugstr_w(dest), debugstr_w(source), sec_attr );
905
906 ntDest.Buffer = ntSource.Buffer = NULL;
907 if (!RtlDosPathNameToNtPathName_U( dest, &ntDest, NULL, NULL ) ||
908 !RtlDosPathNameToNtPathName_U( source, &ntSource, NULL, NULL ))
909 {
910 SetLastError( ERROR_PATH_NOT_FOUND );
911 goto done;
912 }
913
914 size = offsetof( FILE_LINK_INFORMATION, FileName ) + ntDest.Length;
915 if (!(info = HeapAlloc( GetProcessHeap(), 0, size )))
916 {
917 SetLastError( ERROR_OUTOFMEMORY );
918 goto done;
919 }
920
921 InitializeObjectAttributes( &attr, &ntSource, OBJ_CASE_INSENSITIVE, 0, NULL );
922 if (!(ret = set_ntstatus( NtOpenFile( &file, SYNCHRONIZE, &attr, &io, FILE_SHARE_READ | FILE_SHARE_WRITE,
923 FILE_SYNCHRONOUS_IO_NONALERT ) )))
924 goto done;
925
926 info->ReplaceIfExists = FALSE;
927 info->RootDirectory = NULL;
928 info->FileNameLength = ntDest.Length;
929 memcpy( info->FileName, ntDest.Buffer, ntDest.Length );
930 ret = set_ntstatus( NtSetInformationFile( file, &io, info, size, FileLinkInformation ) );
931 NtClose( file );
932
933 done:
934 RtlFreeUnicodeString( &ntSource );
935 RtlFreeUnicodeString( &ntDest );
936 HeapFree( GetProcessHeap(), 0, info );
937 return ret;
938 }
939
940
941 /*************************************************************************
942 * CreateSymbolicLinkW (kernelbase.@)
943 */
944 BOOLEAN WINAPI /* DECLSPEC_HOTPATCH */ CreateSymbolicLinkW( LPCWSTR link, LPCWSTR target, DWORD flags )
945 {
946 FIXME( "(%s %s %ld): stub\n", debugstr_w(link), debugstr_w(target), flags );
947 return TRUE;
948 }
949
950
951 /***********************************************************************
952 * DeleteFileA (kernelbase.@)
953 */
954 BOOL WINAPI DECLSPEC_HOTPATCH DeleteFileA( LPCSTR path )
955 {
956 WCHAR *pathW;
957
958 if (!(pathW = file_name_AtoW( path, FALSE ))) return FALSE;
959 return DeleteFileW( pathW );
960 }
961
962
963 /***********************************************************************
964 * DeleteFileW (kernelbase.@)
965 */
966 BOOL WINAPI DECLSPEC_HOTPATCH DeleteFileW( LPCWSTR path )
967 {
968 UNICODE_STRING nameW;
969 OBJECT_ATTRIBUTES attr;
970 NTSTATUS status;
971 HANDLE hFile;
972 IO_STATUS_BLOCK io;
973
974 TRACE( "%s\n", debugstr_w(path) );
975
976 if (!RtlDosPathNameToNtPathName_U( path, &nameW, NULL, NULL ))
977 {
978 SetLastError( ERROR_PATH_NOT_FOUND );
979 return FALSE;
980 }
981
982 attr.Length = sizeof(attr);
983 attr.RootDirectory = 0;
984 attr.Attributes = OBJ_CASE_INSENSITIVE;
985 attr.ObjectName = &nameW;
986 attr.SecurityDescriptor = NULL;
987 attr.SecurityQualityOfService = NULL;
988
989 status = NtCreateFile(&hFile, SYNCHRONIZE | DELETE, &attr, &io, NULL, 0,
990 FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
991 FILE_OPEN, FILE_DELETE_ON_CLOSE | FILE_NON_DIRECTORY_FILE, NULL, 0);
992 if (status == STATUS_SUCCESS) status = NtClose(hFile);
993
994 RtlFreeUnicodeString( &nameW );
995 return set_ntstatus( status );
996 }
997
998
999 /****************************************************************************
1000 * FindCloseChangeNotification (kernelbase.@)
1001 */
1002 BOOL WINAPI DECLSPEC_HOTPATCH FindCloseChangeNotification( HANDLE handle )
1003 {
1004 return CloseHandle( handle );
1005 }
1006
1007
1008 /****************************************************************************
1009 * FindFirstChangeNotificationA (kernelbase.@)
1010 */
1011 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstChangeNotificationA( LPCSTR path, BOOL subtree, DWORD filter )
1012 {
1013 WCHAR *pathW;
1014
1015 if (!(pathW = file_name_AtoW( path, FALSE ))) return INVALID_HANDLE_VALUE;
1016 return FindFirstChangeNotificationW( pathW, subtree, filter );
1017 }
1018
1019
1020 /*
1021 * NtNotifyChangeDirectoryFile may write back to the IO_STATUS_BLOCK
1022 * asynchronously. We don't care about the contents, but it can't
1023 * be placed on the stack since it will go out of scope when we return.
1024 */
1025 static IO_STATUS_BLOCK dummy_iosb;
1026
1027 /****************************************************************************
1028 * FindFirstChangeNotificationW (kernelbase.@)
1029 */
1030 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstChangeNotificationW( LPCWSTR path, BOOL subtree, DWORD filter )
1031 {
1032 UNICODE_STRING nt_name;
1033 OBJECT_ATTRIBUTES attr;
1034 NTSTATUS status;
1035 HANDLE handle = INVALID_HANDLE_VALUE;
1036
1037 TRACE( "%s %d %lx\n", debugstr_w(path), subtree, filter );
1038
1039 if (!RtlDosPathNameToNtPathName_U( path, &nt_name, NULL, NULL ))
1040 {
1041 SetLastError( ERROR_PATH_NOT_FOUND );
1042 return handle;
1043 }
1044
1045 attr.Length = sizeof(attr);
1046 attr.RootDirectory = 0;
1047 attr.Attributes = OBJ_CASE_INSENSITIVE;
1048 attr.ObjectName = &nt_name;
1049 attr.SecurityDescriptor = NULL;
1050 attr.SecurityQualityOfService = NULL;
1051
1052 status = NtOpenFile( &handle, FILE_LIST_DIRECTORY | SYNCHRONIZE, &attr, &dummy_iosb,
1053 FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
1054 FILE_DIRECTORY_FILE | FILE_SYNCHRONOUS_IO_NONALERT );
1055 RtlFreeUnicodeString( &nt_name );
1056
1057 if (!set_ntstatus( status )) return INVALID_HANDLE_VALUE;
1058
1059 status = NtNotifyChangeDirectoryFile( handle, NULL, NULL, NULL, &dummy_iosb, NULL, 0, filter, subtree );
1060 if (status != STATUS_PENDING)
1061 {
1062 NtClose( handle );
1063 SetLastError( RtlNtStatusToDosError(status) );
1064 return INVALID_HANDLE_VALUE;
1065 }
1066 return handle;
1067 }
1068
1069
1070 /****************************************************************************
1071 * FindNextChangeNotification (kernelbase.@)
1072 */
1073 BOOL WINAPI DECLSPEC_HOTPATCH FindNextChangeNotification( HANDLE handle )
1074 {
1075 NTSTATUS status = NtNotifyChangeDirectoryFile( handle, NULL, NULL, NULL, &dummy_iosb,
1076 NULL, 0, FILE_NOTIFY_CHANGE_SIZE, 0 );
1077 if (status == STATUS_PENDING) return TRUE;
1078 return set_ntstatus( status );
1079 }
1080
1081
1082 /******************************************************************************
1083 * FindFirstFileExA (kernelbase.@)
1084 */
1085 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstFileExA( const char *filename, FINDEX_INFO_LEVELS level,
1086 void *data, FINDEX_SEARCH_OPS search_op,
1087 void *filter, DWORD flags )
1088 {
1089 HANDLE handle;
1090 WIN32_FIND_DATAA *dataA = data;
1091 WIN32_FIND_DATAW dataW;
1092 WCHAR *nameW;
1093
1094 if (!(nameW = file_name_AtoW( filename, FALSE ))) return INVALID_HANDLE_VALUE;
1095
1096 handle = FindFirstFileExW( nameW, level, &dataW, search_op, filter, flags );
1097 if (handle == INVALID_HANDLE_VALUE) return handle;
1098
1099 dataA->dwFileAttributes = dataW.dwFileAttributes;
1100 dataA->ftCreationTime = dataW.ftCreationTime;
1101 dataA->ftLastAccessTime = dataW.ftLastAccessTime;
1102 dataA->ftLastWriteTime = dataW.ftLastWriteTime;
1103 dataA->nFileSizeHigh = dataW.nFileSizeHigh;
1104 dataA->nFileSizeLow = dataW.nFileSizeLow;
1105 file_name_WtoA( dataW.cFileName, -1, dataA->cFileName, sizeof(dataA->cFileName) );
1106 file_name_WtoA( dataW.cAlternateFileName, -1, dataA->cAlternateFileName,
1107 sizeof(dataA->cAlternateFileName) );
1108 return handle;
1109 }
1110
1111
1112 /******************************************************************************
1113 * FindFirstFileExW (kernelbase.@)
1114 */
1115 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstFileExW( LPCWSTR filename, FINDEX_INFO_LEVELS level,
1116 LPVOID data, FINDEX_SEARCH_OPS search_op,
1117 LPVOID filter, DWORD flags )
1118 {
1119 WCHAR *mask;
1120 BOOL has_wildcard = FALSE;
1121 FIND_FIRST_INFO *info = NULL;
1122 UNICODE_STRING nt_name;
1123 OBJECT_ATTRIBUTES attr;
1124 IO_STATUS_BLOCK io;
1125 NTSTATUS status;
1126 DWORD size, device = 0;
1127
1128 TRACE( "%s %d %p %d %p %lx\n", debugstr_w(filename), level, data, search_op, filter, flags );
1129
1130 if (flags & ~FIND_FIRST_EX_LARGE_FETCH)
1131 {
1132 FIXME("flags not implemented 0x%08lx\n", flags );
1133 }
1134 if (search_op != FindExSearchNameMatch && search_op != FindExSearchLimitToDirectories)
1135 {
1136 FIXME( "search_op not implemented 0x%08x\n", search_op );
1137 SetLastError( ERROR_INVALID_PARAMETER );
1138 return INVALID_HANDLE_VALUE;
1139 }
1140 if (level != FindExInfoStandard && level != FindExInfoBasic)
1141 {
1142 FIXME("info level %d not implemented\n", level );
1143 SetLastError( ERROR_INVALID_PARAMETER );
1144 return INVALID_HANDLE_VALUE;
1145 }
1146
1147 if (!RtlDosPathNameToNtPathName_U( filename, &nt_name, &mask, NULL ))
1148 {
1149 SetLastError( ERROR_PATH_NOT_FOUND );
1150 return INVALID_HANDLE_VALUE;
1151 }
1152
1153 if (!mask && (device = RtlIsDosDeviceName_U( filename )))
1154 {
1155 WCHAR *dir = NULL;
1156
1157 /* we still need to check that the directory can be opened */
1158
1159 if (HIWORD(device))
1160 {
1161 if (!(dir = HeapAlloc( GetProcessHeap(), 0, HIWORD(device) + sizeof(WCHAR) )))
1162 {
1163 SetLastError( ERROR_NOT_ENOUGH_MEMORY );
1164 goto error;
1165 }
1166 memcpy( dir, filename, HIWORD(device) );
1167 dir[HIWORD(device)/sizeof(WCHAR)] = 0;
1168 }
1169 RtlFreeUnicodeString( &nt_name );
1170 if (!RtlDosPathNameToNtPathName_U( dir ? dir : L".", &nt_name, &mask, NULL ))
1171 {
1172 HeapFree( GetProcessHeap(), 0, dir );
1173 SetLastError( ERROR_PATH_NOT_FOUND );
1174 goto error;
1175 }
1176 HeapFree( GetProcessHeap(), 0, dir );
1177 size = 0;
1178 }
1179 else if (!mask || !*mask)
1180 {
1181 SetLastError( ERROR_FILE_NOT_FOUND );
1182 goto error;
1183 }
1184 else
1185 {
1186 nt_name.Length = (mask - nt_name.Buffer) * sizeof(WCHAR);
1187 has_wildcard = wcspbrk( mask, L"*?" ) != NULL;
1188 size = has_wildcard ? 8192 : max_entry_size;
1189 }
1190
1191 if (!(info = HeapAlloc( GetProcessHeap(), 0, offsetof( FIND_FIRST_INFO, data[size] ))))
1192 {
1193 SetLastError( ERROR_NOT_ENOUGH_MEMORY );
1194 goto error;
1195 }
1196
1197 /* check if path is the root of the drive, skipping the \??\ prefix */
1198 info->is_root = FALSE;
1199 if (nt_name.Length >= 6 * sizeof(WCHAR) && nt_name.Buffer[5] == ':')
1200 {
1201 DWORD pos = 6;
1202 while (pos * sizeof(WCHAR) < nt_name.Length && nt_name.Buffer[pos] == '\\') pos++;
1203 info->is_root = (pos * sizeof(WCHAR) >= nt_name.Length);
1204 }
1205
1206 attr.Length = sizeof(attr);
1207 attr.RootDirectory = 0;
1208 attr.Attributes = OBJ_CASE_INSENSITIVE;
1209 attr.ObjectName = &nt_name;
1210 attr.SecurityDescriptor = NULL;
1211 attr.SecurityQualityOfService = NULL;
1212
1213 status = NtOpenFile( &info->handle, FILE_LIST_DIRECTORY | SYNCHRONIZE, &attr, &io,
1214 FILE_SHARE_READ | FILE_SHARE_WRITE,
1215 FILE_DIRECTORY_FILE | FILE_SYNCHRONOUS_IO_NONALERT | FILE_OPEN_FOR_BACKUP_INTENT );
1216 if (status != STATUS_SUCCESS)
1217 {
1218 if (status == STATUS_OBJECT_NAME_NOT_FOUND)
1219 SetLastError( ERROR_PATH_NOT_FOUND );
1220 else
1221 SetLastError( RtlNtStatusToDosError(status) );
1222 goto error;
1223 }
1224
1225 RtlInitializeCriticalSection( &info->cs );
1226 info->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": FIND_FIRST_INFO.cs");
1227 info->path = nt_name;
1228 info->magic = FIND_FIRST_MAGIC;
1229 info->wildcard = has_wildcard;
1230 info->data_pos = 0;
1231 info->data_len = 0;
1232 info->data_size = size;
1233 info->search_op = search_op;
1234 info->level = level;
1235
1236 if (device)
1237 {
1238 WIN32_FIND_DATAW *wfd = data;
1239
1240 memset( wfd, 0, sizeof(*wfd) );
1241 memcpy( wfd->cFileName, filename + HIWORD(device)/sizeof(WCHAR), LOWORD(device) );
1242 wfd->dwFileAttributes = FILE_ATTRIBUTE_ARCHIVE;
1243 CloseHandle( info->handle );
1244 info->handle = 0;
1245 }
1246 else
1247 {
1248 UNICODE_STRING mask_str;
1249
1250 RtlInitUnicodeString( &mask_str, mask );
1251 status = NtQueryDirectoryFile( info->handle, 0, NULL, NULL, &io, info->data, info->data_size,
1252 FileBothDirectoryInformation, FALSE, &mask_str, TRUE );
1253 if (status)
1254 {
1255 FindClose( info );
1256 SetLastError( RtlNtStatusToDosError( status ) );
1257 return INVALID_HANDLE_VALUE;
1258 }
1259
1260 info->data_len = io.Information;
1261 if (!has_wildcard) info->data_size = 0; /* we read everything */
1262
1263 if (!FindNextFileW( info, data ))
1264 {
1265 TRACE( "%s not found\n", debugstr_w(filename) );
1266 FindClose( info );
1267 SetLastError( ERROR_FILE_NOT_FOUND );
1268 return INVALID_HANDLE_VALUE;
1269 }
1270 if (!has_wildcard) /* we can't find two files with the same name */
1271 {
1272 CloseHandle( info->handle );
1273 info->handle = 0;
1274 }
1275 }
1276 return info;
1277
1278 error:
1279 HeapFree( GetProcessHeap(), 0, info );
1280 RtlFreeUnicodeString( &nt_name );
1281 return INVALID_HANDLE_VALUE;
1282 }
1283
1284
1285 /******************************************************************************
1286 * FindFirstFileA (kernelbase.@)
1287 */
1288 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstFileA( const char *filename, WIN32_FIND_DATAA *data )
1289 {
1290 return FindFirstFileExA( filename, FindExInfoStandard, data, FindExSearchNameMatch, NULL, 0 );
1291 }
1292
1293
1294 /******************************************************************************
1295 * FindFirstFileW (kernelbase.@)
1296 */
1297 HANDLE WINAPI DECLSPEC_HOTPATCH FindFirstFileW( const WCHAR *filename, WIN32_FIND_DATAW *data )
1298 {
1299 return FindFirstFileExW( filename, FindExInfoStandard, data, FindExSearchNameMatch, NULL, 0 );
1300 }
1301
1302
1303 /**************************************************************************
1304 * FindFirstStreamW (kernelbase.@)
1305 */
1306 HANDLE WINAPI FindFirstStreamW( const WCHAR *filename, STREAM_INFO_LEVELS level, void *data, DWORD flags )
1307 {
1308 FIXME("(%s, %d, %p, %lx): stub!\n", debugstr_w(filename), level, data, flags);
1309 SetLastError( ERROR_HANDLE_EOF );
1310 return INVALID_HANDLE_VALUE;
1311 }
1312
1313
1314 /******************************************************************************
1315 * FindNextFileA (kernelbase.@)
1316 */
1317 BOOL WINAPI DECLSPEC_HOTPATCH FindNextFileA( HANDLE handle, WIN32_FIND_DATAA *data )
1318 {
1319 WIN32_FIND_DATAW dataW;
1320
1321 if (!FindNextFileW( handle, &dataW )) return FALSE;
1322 data->dwFileAttributes = dataW.dwFileAttributes;
1323 data->ftCreationTime = dataW.ftCreationTime;
1324 data->ftLastAccessTime = dataW.ftLastAccessTime;
1325 data->ftLastWriteTime = dataW.ftLastWriteTime;
1326 data->nFileSizeHigh = dataW.nFileSizeHigh;
1327 data->nFileSizeLow = dataW.nFileSizeLow;
1328 file_name_WtoA( dataW.cFileName, -1, data->cFileName, sizeof(data->cFileName) );
1329 file_name_WtoA( dataW.cAlternateFileName, -1, data->cAlternateFileName,
1330 sizeof(data->cAlternateFileName) );
1331 return TRUE;
1332 }
1333
1334
1335 /******************************************************************************
1336 * FindNextFileW (kernelbase.@)
1337 */
1338 BOOL WINAPI DECLSPEC_HOTPATCH FindNextFileW( HANDLE handle, WIN32_FIND_DATAW *data )
1339 {
1340 FIND_FIRST_INFO *info = handle;
1341 FILE_BOTH_DIR_INFORMATION *dir_info;
1342 BOOL ret = FALSE;
1343 NTSTATUS status;
1344
1345 TRACE( "%p %p\n", handle, data );
1346
1347 if (!handle || handle == INVALID_HANDLE_VALUE || info->magic != FIND_FIRST_MAGIC)
1348 {
1349 SetLastError( ERROR_INVALID_HANDLE );
1350 return ret;
1351 }
1352
1353 RtlEnterCriticalSection( &info->cs );
1354
1355 if (!info->handle) SetLastError( ERROR_NO_MORE_FILES );
1356 else for (;;)
1357 {
1358 if (info->data_pos >= info->data_len) /* need to read some more data */
1359 {
1360 IO_STATUS_BLOCK io;
1361
1362 if (info->data_size)
1363 status = NtQueryDirectoryFile( info->handle, 0, NULL, NULL, &io, info->data, info->data_size,
1364 FileBothDirectoryInformation, FALSE, NULL, FALSE );
1365 else
1366 status = STATUS_NO_MORE_FILES;
1367
1368 if (!set_ntstatus( status ))
1369 {
1370 if (status == STATUS_NO_MORE_FILES)
1371 {
1372 CloseHandle( info->handle );
1373 info->handle = 0;
1374 }
1375 break;
1376 }
1377 info->data_len = io.Information;
1378 info->data_pos = 0;
1379 }
1380
1381 dir_info = (FILE_BOTH_DIR_INFORMATION *)(info->data + info->data_pos);
1382
1383 if (dir_info->NextEntryOffset) info->data_pos += dir_info->NextEntryOffset;
1384 else info->data_pos = info->data_len;
1385
1386 /* don't return '.' and '..' in the root of the drive */
1387 if (info->is_root)
1388 {
1389 if (dir_info->FileNameLength == sizeof(WCHAR) && dir_info->FileName[0] == '.') continue;
1390 if (dir_info->FileNameLength == 2 * sizeof(WCHAR) &&
1391 dir_info->FileName[0] == '.' && dir_info->FileName[1] == '.') continue;
1392 }
1393
1394 data->dwFileAttributes = dir_info->FileAttributes;
1395 data->ftCreationTime = *(FILETIME *)&dir_info->CreationTime;
1396 data->ftLastAccessTime = *(FILETIME *)&dir_info->LastAccessTime;
1397 data->ftLastWriteTime = *(FILETIME *)&dir_info->LastWriteTime;
1398 data->nFileSizeHigh = dir_info->EndOfFile.QuadPart >> 32;
1399 data->nFileSizeLow = (DWORD)dir_info->EndOfFile.QuadPart;
1400 data->dwReserved0 = 0;
1401 data->dwReserved1 = 0;
1402
1403 memcpy( data->cFileName, dir_info->FileName, dir_info->FileNameLength );
1404 data->cFileName[dir_info->FileNameLength/sizeof(WCHAR)] = 0;
1405
1406 if (info->level != FindExInfoBasic)
1407 {
1408 memcpy( data->cAlternateFileName, dir_info->ShortName, dir_info->ShortNameLength );
1409 data->cAlternateFileName[dir_info->ShortNameLength/sizeof(WCHAR)] = 0;
1410 }
1411 else
1412 data->cAlternateFileName[0] = 0;
1413
1414 TRACE( "returning %s (%s)\n",
1415 debugstr_w(data->cFileName), debugstr_w(data->cAlternateFileName) );
1416
1417 ret = TRUE;
1418 break;
1419 }
1420
1421 RtlLeaveCriticalSection( &info->cs );
1422 return ret;
1423 }
1424
1425
1426 /**************************************************************************
1427 * FindNextStreamW (kernelbase.@)
1428 */
1429 BOOL WINAPI FindNextStreamW( HANDLE handle, void *data )
1430 {
1431 FIXME( "(%p, %p): stub!\n", handle, data );
1432 SetLastError( ERROR_HANDLE_EOF );
1433 return FALSE;
1434 }
1435
1436
1437 /******************************************************************************
1438 * FindClose (kernelbase.@)
1439 */
1440 BOOL WINAPI DECLSPEC_HOTPATCH FindClose( HANDLE handle )
1441 {
1442 FIND_FIRST_INFO *info = handle;
1443
1444 if (!handle || handle == INVALID_HANDLE_VALUE)
1445 {
1446 SetLastError( ERROR_INVALID_HANDLE );
1447 return FALSE;
1448 }
1449
1450 __TRY
1451 {
1452 if (info->magic == FIND_FIRST_MAGIC)
1453 {
1454 RtlEnterCriticalSection( &info->cs );
1455 if (info->magic == FIND_FIRST_MAGIC) /* in case someone else freed it in the meantime */
1456 {
1457 info->magic = 0;
1458 if (info->handle) CloseHandle( info->handle );
1459 info->handle = 0;
1460 RtlFreeUnicodeString( &info->path );
1461 info->data_pos = 0;
1462 info->data_len = 0;
1463 RtlLeaveCriticalSection( &info->cs );
1464 info->cs.DebugInfo->Spare[0] = 0;
1465 RtlDeleteCriticalSection( &info->cs );
1466 HeapFree( GetProcessHeap(), 0, info );
1467 }
1468 }
1469 }
1470 __EXCEPT_PAGE_FAULT
1471 {
1472 WARN( "illegal handle %p\n", handle );
1473 SetLastError( ERROR_INVALID_HANDLE );
1474 return FALSE;
1475 }
1476 __ENDTRY
1477
1478 return TRUE;
1479 }
1480
1481
1482 /******************************************************************************
1483 * GetCompressedFileSizeA (kernelbase.@)
1484 */
1485 DWORD WINAPI DECLSPEC_HOTPATCH GetCompressedFileSizeA( LPCSTR name, LPDWORD size_high )
1486 {
1487 WCHAR *nameW;
1488
1489 if (!(nameW = file_name_AtoW( name, FALSE ))) return INVALID_FILE_SIZE;
1490 return GetCompressedFileSizeW( nameW, size_high );
1491 }
1492
1493
1494 /******************************************************************************
1495 * GetCompressedFileSizeW (kernelbase.@)
1496 */
1497 DWORD WINAPI DECLSPEC_HOTPATCH GetCompressedFileSizeW( LPCWSTR name, LPDWORD size_high )
1498 {
1499 UNICODE_STRING nt_name;
1500 OBJECT_ATTRIBUTES attr;
1501 IO_STATUS_BLOCK io;
1502 NTSTATUS status;
1503 HANDLE handle;
1504 DWORD ret;
1505
1506 TRACE("%s %p\n", debugstr_w(name), size_high);
1507
1508 if (!RtlDosPathNameToNtPathName_U( name, &nt_name, NULL, NULL ))
1509 {
1510 SetLastError( ERROR_PATH_NOT_FOUND );
1511 return INVALID_FILE_SIZE;
1512 }
1513
1514 attr.Length = sizeof(attr);
1515 attr.RootDirectory = 0;
1516 attr.Attributes = OBJ_CASE_INSENSITIVE;
1517 attr.ObjectName = &nt_name;
1518 attr.SecurityDescriptor = NULL;
1519 attr.SecurityQualityOfService = NULL;
1520
1521 status = NtOpenFile( &handle, SYNCHRONIZE, &attr, &io, 0, FILE_SYNCHRONOUS_IO_NONALERT );
1522 RtlFreeUnicodeString( &nt_name );
1523 if (!set_ntstatus( status )) return INVALID_FILE_SIZE;
1524
1525 /* we don't support compressed files, simply return the file size */
1526 ret = GetFileSize( handle, size_high );
1527 NtClose( handle );
1528 return ret;
1529 }
1530
1531
1532 /***********************************************************************
1533 * GetCurrentDirectoryA (kernelbase.@)
1534 */
1535 UINT WINAPI DECLSPEC_HOTPATCH GetCurrentDirectoryA( UINT buflen, LPSTR buf )
1536 {
1537 WCHAR bufferW[MAX_PATH];
1538 DWORD ret;
1539
1540 if (buflen && buf && ((ULONG_PTR)buf >> 16) == 0)
1541 {
1542 /* Win9x catches access violations here, returning zero.
1543 * This behaviour resulted in some people not noticing
1544 * that they got the argument order wrong. So let's be
1545 * nice and fail gracefully if buf is invalid and looks
1546 * more like a buflen. */
1547 SetLastError( ERROR_INVALID_PARAMETER );
1548 return 0;
1549 }
1550
1551 ret = RtlGetCurrentDirectory_U( sizeof(bufferW), bufferW );
1552 if (!ret) return 0;
1553 if (ret > sizeof(bufferW))
1554 {
1555 SetLastError( ERROR_FILENAME_EXCED_RANGE );
1556 return 0;
1557 }
1558 return copy_filename_WtoA( bufferW, buf, buflen );
1559 }
1560
1561
1562 /***********************************************************************
1563 * GetCurrentDirectoryW (kernelbase.@)
1564 */
1565 UINT WINAPI DECLSPEC_HOTPATCH GetCurrentDirectoryW( UINT buflen, LPWSTR buf )
1566 {
1567 return RtlGetCurrentDirectory_U( buflen * sizeof(WCHAR), buf ) / sizeof(WCHAR);
1568 }
1569
1570
1571 /**************************************************************************
1572 * GetFileAttributesA (kernelbase.@)
1573 */
1574 DWORD WINAPI DECLSPEC_HOTPATCH GetFileAttributesA( LPCSTR name )
1575 {
1576 WCHAR *nameW;
1577
1578 if (!(nameW = file_name_AtoW( name, FALSE ))) return INVALID_FILE_ATTRIBUTES;
1579 return GetFileAttributesW( nameW );
1580 }
1581
1582
1583 /**************************************************************************
1584 * GetFileAttributesW (kernelbase.@)
1585 */
1586 DWORD WINAPI DECLSPEC_HOTPATCH GetFileAttributesW( LPCWSTR name )
1587 {
1588 FILE_BASIC_INFORMATION info;
1589 UNICODE_STRING nt_name;
1590 OBJECT_ATTRIBUTES attr;
1591 NTSTATUS status;
1592
1593 TRACE( "%s\n", debugstr_w(name) );
1594
1595 if (!RtlDosPathNameToNtPathName_U( name, &nt_name, NULL, NULL ))
1596 {
1597 SetLastError( ERROR_PATH_NOT_FOUND );
1598 return INVALID_FILE_ATTRIBUTES;
1599 }
1600
1601 attr.Length = sizeof(attr);
1602 attr.RootDirectory = 0;
1603 attr.Attributes = OBJ_CASE_INSENSITIVE;
1604 attr.ObjectName = &nt_name;
1605 attr.SecurityDescriptor = NULL;
1606 attr.SecurityQualityOfService = NULL;
1607
1608 status = NtQueryAttributesFile( &attr, &info );
1609 RtlFreeUnicodeString( &nt_name );
1610
1611 if (status == STATUS_SUCCESS) return info.FileAttributes;
1612
1613 /* NtQueryAttributesFile fails on devices, but GetFileAttributesW succeeds */
1614 if (RtlIsDosDeviceName_U( name )) return FILE_ATTRIBUTE_ARCHIVE;
1615
1616 SetLastError( RtlNtStatusToDosError(status) );
1617 return INVALID_FILE_ATTRIBUTES;
1618 }
1619
1620
1621 /**************************************************************************
1622 * GetFileAttributesExA (kernelbase.@)
1623 */
1624 BOOL WINAPI DECLSPEC_HOTPATCH GetFileAttributesExA( LPCSTR name, GET_FILEEX_INFO_LEVELS level, void *ptr )
1625 {
1626 WCHAR *nameW;
1627
1628 if (!(nameW = file_name_AtoW( name, FALSE ))) return FALSE;
1629 return GetFileAttributesExW( nameW, level, ptr );
1630 }
1631
1632
1633 /**************************************************************************
1634 * GetFileAttributesExW (kernelbase.@)
1635 */
1636 BOOL WINAPI DECLSPEC_HOTPATCH GetFileAttributesExW( LPCWSTR name, GET_FILEEX_INFO_LEVELS level, void *ptr )
1637 {
1638 FILE_NETWORK_OPEN_INFORMATION info;
1639 WIN32_FILE_ATTRIBUTE_DATA *data = ptr;
1640 UNICODE_STRING nt_name;
1641 OBJECT_ATTRIBUTES attr;
1642 NTSTATUS status;
1643
1644 TRACE("%s %d %p\n", debugstr_w(name), level, ptr);
1645
1646 if (level != GetFileExInfoStandard)
1647 {
1648 SetLastError( ERROR_INVALID_PARAMETER );
1649 return FALSE;
1650 }
1651
1652 if (!RtlDosPathNameToNtPathName_U( name, &nt_name, NULL, NULL ))
1653 {
1654 SetLastError( ERROR_PATH_NOT_FOUND );
1655 return FALSE;
1656 }
1657
1658 attr.Length = sizeof(attr);
1659 attr.RootDirectory = 0;
1660 attr.Attributes = OBJ_CASE_INSENSITIVE;
1661 attr.ObjectName = &nt_name;
1662 attr.SecurityDescriptor = NULL;
1663 attr.SecurityQualityOfService = NULL;
1664
1665 status = NtQueryFullAttributesFile( &attr, &info );
1666 RtlFreeUnicodeString( &nt_name );
1667 if (!set_ntstatus( status )) return FALSE;
1668
1669 data->dwFileAttributes = info.FileAttributes;
1670 data->ftCreationTime.dwLowDateTime = info.CreationTime.u.LowPart;
1671 data->ftCreationTime.dwHighDateTime = info.CreationTime.u.HighPart;
1672 data->ftLastAccessTime.dwLowDateTime = info.LastAccessTime.u.LowPart;
1673 data->ftLastAccessTime.dwHighDateTime = info.LastAccessTime.u.HighPart;
1674 data->ftLastWriteTime.dwLowDateTime = info.LastWriteTime.u.LowPart;
1675 data->ftLastWriteTime.dwHighDateTime = info.LastWriteTime.u.HighPart;
1676 data->nFileSizeLow = info.EndOfFile.u.LowPart;
1677 data->nFileSizeHigh = info.EndOfFile.u.HighPart;
1678 return TRUE;
1679 }
1680
1681
1682 /***********************************************************************
1683 * GetFinalPathNameByHandleA (kernelbase.@)
1684 */
1685 DWORD WINAPI DECLSPEC_HOTPATCH GetFinalPathNameByHandleA( HANDLE file, LPSTR path,
1686 DWORD count, DWORD flags )
1687 {
1688 WCHAR *str;
1689 DWORD result, len;
1690
1691 TRACE( "(%p,%p,%ld,%lx)\n", file, path, count, flags);
1692
1693 len = GetFinalPathNameByHandleW(file, NULL, 0, flags);
1694 if (len == 0) return 0;
1695
1696 str = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1697 if (!str)
1698 {
1699 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1700 return 0;
1701 }
1702
1703 result = GetFinalPathNameByHandleW(file, str, len, flags);
1704 if (result != len - 1)
1705 {
1706 HeapFree(GetProcessHeap(), 0, str);
1707 return 0;
1708 }
1709
1710 len = file_name_WtoA( str, -1, NULL, 0 );
1711 if (count < len)
1712 {
1713 HeapFree(GetProcessHeap(), 0, str);
1714 return len - 1;
1715 }
1716 file_name_WtoA( str, -1, path, count );
1717 HeapFree(GetProcessHeap(), 0, str);
1718 return len - 1;
1719 }
1720
1721
1722 /***********************************************************************
1723 * GetFinalPathNameByHandleW (kernelbase.@)
1724 */
1725 DWORD WINAPI DECLSPEC_HOTPATCH GetFinalPathNameByHandleW( HANDLE file, LPWSTR path,
1726 DWORD count, DWORD flags )
1727 {
1728 WCHAR buffer[sizeof(OBJECT_NAME_INFORMATION) + MAX_PATH + 1];
1729 OBJECT_NAME_INFORMATION *info = (OBJECT_NAME_INFORMATION*)&buffer;
1730 WCHAR drive_part[MAX_PATH];
1731 DWORD drive_part_len = 0;
1732 NTSTATUS status;
1733 DWORD result = 0;
1734 ULONG dummy;
1735 WCHAR *ptr;
1736
1737 TRACE( "(%p,%p,%ld,%lx)\n", file, path, count, flags );
1738
1739 if (flags & ~(FILE_NAME_OPENED | VOLUME_NAME_GUID | VOLUME_NAME_NONE | VOLUME_NAME_NT))
1740 {
1741 WARN("Unknown flags: %lx\n", flags);
1742 SetLastError( ERROR_INVALID_PARAMETER );
1743 return 0;
1744 }
1745
1746 /* get object name */
1747 status = NtQueryObject( file, ObjectNameInformation, &buffer, sizeof(buffer) - sizeof(WCHAR), &dummy );
1748 if (!set_ntstatus( status )) return 0;
1749
1750 if (!info->Name.Buffer)
1751 {
1752 SetLastError( ERROR_INVALID_HANDLE );
1753 return 0;
1754 }
1755 if (info->Name.Length < 4 * sizeof(WCHAR) || info->Name.Buffer[0] != '\\' ||
1756 info->Name.Buffer[1] != '?' || info->Name.Buffer[2] != '?' || info->Name.Buffer[3] != '\\' )
1757 {
1758 FIXME("Unexpected object name: %s\n", debugstr_wn(info->Name.Buffer, info->Name.Length / sizeof(WCHAR)));
1759 SetLastError( ERROR_GEN_FAILURE );
1760 return 0;
1761 }
1762
1763 /* add terminating null character, remove "\\??\\" */
1764 info->Name.Buffer[info->Name.Length / sizeof(WCHAR)] = 0;
1765 info->Name.Length -= 4 * sizeof(WCHAR);
1766 info->Name.Buffer += 4;
1767
1768 /* FILE_NAME_OPENED is not supported yet, and would require Wineserver changes */
1769 if (flags & FILE_NAME_OPENED)
1770 {
1771 FIXME("FILE_NAME_OPENED not supported\n");
1772 flags &= ~FILE_NAME_OPENED;
1773 }
1774
1775 /* Get information required for VOLUME_NAME_NONE, VOLUME_NAME_GUID and VOLUME_NAME_NT */
1776 if (flags == VOLUME_NAME_NONE || flags == VOLUME_NAME_GUID || flags == VOLUME_NAME_NT)
1777 {
1778 if (!GetVolumePathNameW( info->Name.Buffer, drive_part, MAX_PATH )) return 0;
1779 drive_part_len = lstrlenW(drive_part);
1780 if (!drive_part_len || drive_part_len > lstrlenW(info->Name.Buffer) ||
1781 drive_part[drive_part_len-1] != '\\' ||
1782 CompareStringOrdinal( info->Name.Buffer, drive_part_len, drive_part, drive_part_len, TRUE ) != CSTR_EQUAL)
1783 {
1784 FIXME( "Path %s returned by GetVolumePathNameW does not match file path %s\n",
1785 debugstr_w(drive_part), debugstr_w(info->Name.Buffer) );
1786 SetLastError( ERROR_GEN_FAILURE );
1787 return 0;
1788 }
1789 }
1790
1791 if (flags == VOLUME_NAME_NONE)
1792 {
1793 ptr = info->Name.Buffer + drive_part_len - 1;
1794 result = lstrlenW(ptr);
1795 if (result < count) memcpy(path, ptr, (result + 1) * sizeof(WCHAR));
1796 else result++;
1797 }
1798 else if (flags == VOLUME_NAME_GUID)
1799 {
1800 WCHAR volume_prefix[51];
1801
1802 /* GetVolumeNameForVolumeMountPointW sets error code on failure */
1803 if (!GetVolumeNameForVolumeMountPointW( drive_part, volume_prefix, 50 )) return 0;
1804 ptr = info->Name.Buffer + drive_part_len;
1805 result = lstrlenW(volume_prefix) + lstrlenW(ptr);
1806 if (result < count)
1807 {
1808 lstrcpyW(path, volume_prefix);
1809 lstrcatW(path, ptr);
1810 }
1811 else
1812 {
1813 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1814 result++;
1815 }
1816 }
1817 else if (flags == VOLUME_NAME_NT)
1818 {
1819 WCHAR nt_prefix[MAX_PATH];
1820
1821 /* QueryDosDeviceW sets error code on failure */
1822 drive_part[drive_part_len - 1] = 0;
1823 if (!QueryDosDeviceW( drive_part, nt_prefix, MAX_PATH )) return 0;
1824 ptr = info->Name.Buffer + drive_part_len - 1;
1825 result = lstrlenW(nt_prefix) + lstrlenW(ptr);
1826 if (result < count)
1827 {
1828 lstrcpyW(path, nt_prefix);
1829 lstrcatW(path, ptr);
1830 }
1831 else
1832 {
1833 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1834 result++;
1835 }
1836 }
1837 else if (flags == VOLUME_NAME_DOS)
1838 {
1839 result = 4 + lstrlenW(info->Name.Buffer);
1840 if (result < count)
1841 {
1842 lstrcpyW(path, L"\\\\?\\");
1843 lstrcatW(path, info->Name.Buffer);
1844 }
1845 else
1846 {
1847 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1848 result++;
1849 }
1850 }
1851 else
1852 {
1853 /* Windows crashes here, but we prefer returning ERROR_INVALID_PARAMETER */
1854 WARN("Invalid combination of flags: %lx\n", flags);
1855 SetLastError( ERROR_INVALID_PARAMETER );
1856 }
1857 return result;
1858 }
1859
1860
1861 /***********************************************************************
1862 * GetFullPathNameA (kernelbase.@)
1863 */
1864 DWORD WINAPI DECLSPEC_HOTPATCH GetFullPathNameA( LPCSTR name, DWORD len, LPSTR buffer, LPSTR *lastpart )
1865 {
1866 WCHAR *nameW;
1867 WCHAR bufferW[MAX_PATH], *lastpartW = NULL;
1868 DWORD ret;
1869
1870 if (!(nameW = file_name_AtoW( name, FALSE ))) return 0;
1871
1872 ret = GetFullPathNameW( nameW, MAX_PATH, bufferW, &lastpartW );
1873
1874 if (!ret) return 0;
1875 if (ret > MAX_PATH)
1876 {
1877 SetLastError( ERROR_FILENAME_EXCED_RANGE );
1878 return 0;
1879 }
1880 ret = copy_filename_WtoA( bufferW, buffer, len );
1881 if (ret < len && lastpart)
1882 {
1883 if (lastpartW)
1884 *lastpart = buffer + file_name_WtoA( bufferW, lastpartW - bufferW, NULL, 0 );
1885 else
1886 *lastpart = NULL;
1887 }
1888 return ret;
1889 }
1890
1891
1892 /***********************************************************************
1893 * GetFullPathNameW (kernelbase.@)
1894 */
1895 DWORD WINAPI DECLSPEC_HOTPATCH GetFullPathNameW( LPCWSTR name, DWORD len, LPWSTR buffer, LPWSTR *lastpart )
1896 {
1897 return RtlGetFullPathName_U( name, len * sizeof(WCHAR), buffer, lastpart ) / sizeof(WCHAR);
1898 }
1899
1900
1901 /***********************************************************************
1902 * GetLongPathNameA (kernelbase.@)
1903 */
1904 DWORD WINAPI DECLSPEC_HOTPATCH GetLongPathNameA( LPCSTR shortpath, LPSTR longpath, DWORD longlen )
1905 {
1906 WCHAR *shortpathW;
1907 WCHAR longpathW[MAX_PATH];
1908 DWORD ret;
1909
1910 TRACE( "%s\n", debugstr_a( shortpath ));
1911
1912 if (!(shortpathW = file_name_AtoW( shortpath, FALSE ))) return 0;
1913
1914 ret = GetLongPathNameW( shortpathW, longpathW, MAX_PATH );
1915
1916 if (!ret) return 0;
1917 if (ret > MAX_PATH)
1918 {
1919 SetLastError( ERROR_FILENAME_EXCED_RANGE );
1920 return 0;
1921 }
1922 return copy_filename_WtoA( longpathW, longpath, longlen );
1923 }
1924
1925
1926 /***********************************************************************
1927 * GetLongPathNameW (kernelbase.@)
1928 */
1929 DWORD WINAPI DECLSPEC_HOTPATCH GetLongPathNameW( LPCWSTR shortpath, LPWSTR longpath, DWORD longlen )
1930 {
1931 WCHAR tmplongpath[1024];
1932 DWORD sp = 0, lp = 0, tmplen;
1933 WIN32_FIND_DATAW wfd;
1934 UNICODE_STRING nameW;
1935 LPCWSTR p;
1936 HANDLE handle;
1937
1938 TRACE("%s,%p,%lu\n", debugstr_w(shortpath), longpath, longlen);
1939
1940 if (!shortpath)
1941 {
1942 SetLastError( ERROR_INVALID_PARAMETER );
1943 return 0;
1944 }
1945 if (!shortpath[0])
1946 {
1947 SetLastError( ERROR_PATH_NOT_FOUND );
1948 return 0;
1949 }
1950
1951 if (shortpath[0] == '\\' && shortpath[1] == '\\')
1952 {
1953 FIXME( "UNC pathname %s\n", debugstr_w(shortpath) );
1954 tmplen = lstrlenW( shortpath );
1955 if (tmplen < longlen)
1956 {
1957 if (longpath != shortpath) lstrcpyW( longpath, shortpath );
1958 return tmplen;
1959 }
1960 return tmplen + 1;
1961 }
1962
1963 /* check for drive letter */
1964 if (shortpath[0] != '/' && shortpath[1] == ':' )
1965 {
1966 tmplongpath[0] = shortpath[0];
1967 tmplongpath[1] = ':';
1968 lp = sp = 2;
1969 }
1970
1971 if (wcspbrk( shortpath + sp, L"*?" ))
1972 {
1973 SetLastError( ERROR_INVALID_NAME );
1974 return 0;
1975 }
1976
1977 while (shortpath[sp])
1978 {
1979 /* check for path delimiters and reproduce them */
1980 if (shortpath[sp] == '\\' || shortpath[sp] == '/')
1981 {
1982 tmplongpath[lp++] = shortpath[sp++];
1983 tmplongpath[lp] = 0; /* terminate string */
1984 continue;
1985 }
1986
1987 for (p = shortpath + sp; *p && *p != '/' && *p != '\\'; p++);
1988 tmplen = p - (shortpath + sp);
1989 lstrcpynW( tmplongpath + lp, shortpath + sp, tmplen + 1 );
1990
1991 if (tmplongpath[lp] == '.')
1992 {
1993 if (tmplen == 1 || (tmplen == 2 && tmplongpath[lp + 1] == '.'))
1994 {
1995 lp += tmplen;
1996 sp += tmplen;
1997 continue;
1998 }
1999 }
2000
2001 /* Check if the file exists */
2002 handle = FindFirstFileW( tmplongpath, &wfd );
2003 if (handle == INVALID_HANDLE_VALUE)
2004 {
2005 TRACE( "not found %s\n", debugstr_w( tmplongpath ));
2006 SetLastError ( ERROR_FILE_NOT_FOUND );
2007 return 0;
2008 }
2009 FindClose( handle );
2010
2011 /* Use the existing file name if it's a short name */
2012 RtlInitUnicodeString( &nameW, tmplongpath + lp );
2013 if (RtlIsNameLegalDOS8Dot3( &nameW, NULL, NULL )) lstrcpyW( tmplongpath + lp, wfd.cFileName );
2014 lp += lstrlenW( tmplongpath + lp );
2015 sp += tmplen;
2016 }
2017 tmplen = lstrlenW( shortpath ) - 1;
2018 if ((shortpath[tmplen] == '/' || shortpath[tmplen] == '\\') &&
2019 (tmplongpath[lp - 1] != '/' && tmplongpath[lp - 1] != '\\'))
2020 tmplongpath[lp++] = shortpath[tmplen];
2021 tmplongpath[lp] = 0;
2022
2023 tmplen = lstrlenW( tmplongpath ) + 1;
2024 if (tmplen <= longlen)
2025 {
2026 lstrcpyW( longpath, tmplongpath );
2027 TRACE("returning %s\n", debugstr_w( longpath ));
2028 tmplen--; /* length without 0 */
2029 }
2030 return tmplen;
2031 }
2032
2033
2034 /***********************************************************************
2035 * GetShortPathNameW (kernelbase.@)
2036 */
2037 DWORD WINAPI DECLSPEC_HOTPATCH GetShortPathNameW( LPCWSTR longpath, LPWSTR shortpath, DWORD shortlen )
2038 {
2039 WIN32_FIND_DATAW wfd;
2040 WCHAR *tmpshortpath;
2041 HANDLE handle;
2042 LPCWSTR p;
2043 DWORD sp = 0, lp = 0, tmplen, buf_len;
2044
2045 TRACE( "%s,%p,%lu\n", debugstr_w(longpath), shortpath, shortlen );
2046
2047 if (!longpath)
2048 {
2049 SetLastError( ERROR_INVALID_PARAMETER );
2050 return 0;
2051 }
2052 if (!longpath[0])
2053 {
2054 SetLastError( ERROR_BAD_PATHNAME );
2055 return 0;
2056 }
2057
2058 /* code below only removes characters from string, never adds, so this is
2059 * the largest buffer that tmpshortpath will need to have */
2060 buf_len = lstrlenW(longpath) + 1;
2061 tmpshortpath = HeapAlloc( GetProcessHeap(), 0, buf_len * sizeof(WCHAR) );
2062 if (!tmpshortpath)
2063 {
2064 SetLastError( ERROR_OUTOFMEMORY );
2065 return 0;
2066 }
2067
2068 if (longpath[0] == '\\' && longpath[1] == '\\' && longpath[2] == '?' && longpath[3] == '\\')
2069 {
2070 memcpy( tmpshortpath, longpath, 4 * sizeof(WCHAR) );
2071 sp = lp = 4;
2072 }
2073
2074 if (wcspbrk( longpath + lp, L"*?" ))
2075 {
2076 HeapFree( GetProcessHeap(), 0, tmpshortpath );
2077 SetLastError( ERROR_INVALID_NAME );
2078 return 0;
2079 }
2080
2081 /* check for drive letter */
2082 if (longpath[lp] != '/' && longpath[lp + 1] == ':' )
2083 {
2084 tmpshortpath[sp] = longpath[lp];
2085 tmpshortpath[sp + 1] = ':';
2086 sp += 2;
2087 lp += 2;
2088 }
2089
2090 while (longpath[lp])
2091 {
2092 /* check for path delimiters and reproduce them */
2093 if (longpath[lp] == '\\' || longpath[lp] == '/')
2094 {
2095 tmpshortpath[sp++] = longpath[lp++];
2096 tmpshortpath[sp] = 0; /* terminate string */
2097 continue;
2098 }
2099
2100 p = longpath + lp;
2101 for (; *p && *p != '/' && *p != '\\'; p++);
2102 tmplen = p - (longpath + lp);
2103 lstrcpynW( tmpshortpath + sp, longpath + lp, tmplen + 1 );
2104
2105 if (tmpshortpath[sp] == '.')
2106 {
2107 if (tmplen == 1 || (tmplen == 2 && tmpshortpath[sp + 1] == '.'))
2108 {
2109 sp += tmplen;
2110 lp += tmplen;
2111 continue;
2112 }
2113 }
2114
2115 /* Check if the file exists and use the existing short file name */
2116 handle = FindFirstFileW( tmpshortpath, &wfd );
2117 if (handle == INVALID_HANDLE_VALUE) goto notfound;
2118 FindClose( handle );
2119
2120 /* In rare cases (like "a.abcd") short path may be longer than original path.
2121 * Make sure we have enough space in temp buffer. */
2122 if (wfd.cAlternateFileName[0] && tmplen < lstrlenW(wfd.cAlternateFileName))
2123 {
2124 WCHAR *new_buf;
2125 buf_len += lstrlenW( wfd.cAlternateFileName ) - tmplen;
2126 new_buf = HeapReAlloc( GetProcessHeap(), 0, tmpshortpath, buf_len * sizeof(WCHAR) );
2127 if(!new_buf)
2128 {
2129 HeapFree( GetProcessHeap(), 0, tmpshortpath );
2130 SetLastError( ERROR_OUTOFMEMORY );
2131 return 0;
2132 }
2133 tmpshortpath = new_buf;
2134 }
2135
2136 lstrcpyW( tmpshortpath + sp, wfd.cAlternateFileName[0] ? wfd.cAlternateFileName : wfd.cFileName );
2137 sp += lstrlenW( tmpshortpath + sp );
2138 lp += tmplen;
2139 }
2140 tmpshortpath[sp] = 0;
2141
2142 tmplen = lstrlenW( tmpshortpath ) + 1;
2143 if (tmplen <= shortlen)
2144 {
2145 lstrcpyW( shortpath, tmpshortpath );
2146 TRACE( "returning %s\n", debugstr_w( shortpath ));
2147 tmplen--; /* length without 0 */
2148 }
2149
2150 HeapFree( GetProcessHeap(), 0, tmpshortpath );
2151 return tmplen;
2152
2153 notfound:
2154 HeapFree( GetProcessHeap(), 0, tmpshortpath );
2155 TRACE( "not found\n" );
2156 SetLastError( ERROR_FILE_NOT_FOUND );
2157 return 0;
2158 }
2159
2160
2161 /***********************************************************************
2162 * GetSystemDirectoryA (kernelbase.@)
2163 */
2164 UINT WINAPI DECLSPEC_HOTPATCH GetSystemDirectoryA( LPSTR path, UINT count )
2165 {
2166 return copy_filename_WtoA( system_dir, path, count );
2167 }
2168
2169
2170 /***********************************************************************
2171 * GetSystemDirectoryW (kernelbase.@)
2172 */
2173 UINT WINAPI DECLSPEC_HOTPATCH GetSystemDirectoryW( LPWSTR path, UINT count )
2174 {
2175 return copy_filename( system_dir, path, count );
2176 }
2177
2178
2179 /***********************************************************************
2180 * GetSystemWindowsDirectoryA (kernelbase.@)
2181 */
2182 UINT WINAPI DECLSPEC_HOTPATCH GetSystemWindowsDirectoryA( LPSTR path, UINT count )
2183 {
2184 return GetWindowsDirectoryA( path, count );
2185 }
2186
2187
2188 /***********************************************************************
2189 * GetSystemWindowsDirectoryW (kernelbase.@)
2190 */
2191 UINT WINAPI DECLSPEC_HOTPATCH GetSystemWindowsDirectoryW( LPWSTR path, UINT count )
2192 {
2193 return GetWindowsDirectoryW( path, count );
2194 }
2195
2196
2197 /***********************************************************************
2198 * GetSystemWow64DirectoryA (kernelbase.@)
2199 */
2200 UINT WINAPI /* DECLSPEC_HOTPATCH */ GetSystemWow64DirectoryA( LPSTR path, UINT count )
2201 {
2202 if (!is_win64 && !is_wow64)
2203 {
2204 SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
2205 return 0;
2206 }
2207 return copy_filename_WtoA( get_machine_wow64_dir( IMAGE_FILE_MACHINE_I386 ), path, count );
2208 }
2209
2210
2211 /***********************************************************************
2212 * GetSystemWow64DirectoryW (kernelbase.@)
2213 */
2214 UINT WINAPI /* DECLSPEC_HOTPATCH */ GetSystemWow64DirectoryW( LPWSTR path, UINT count )
2215 {
2216 if (!is_win64 && !is_wow64)
2217 {
2218 SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
2219 return 0;
2220 }
2221 return copy_filename( get_machine_wow64_dir( IMAGE_FILE_MACHINE_I386 ), path, count );
2222 }
2223
2224
2225 /***********************************************************************
2226 * GetSystemWow64Directory2A (kernelbase.@)
2227 */
2228 UINT WINAPI DECLSPEC_HOTPATCH GetSystemWow64Directory2A( LPSTR path, UINT count, WORD machine )
2229 {
2230 const WCHAR *dir = get_machine_wow64_dir( machine );
2231
2232 return dir ? copy_filename_WtoA( dir, path, count ) : 0;
2233 }
2234
2235
2236 /***********************************************************************
2237 * GetSystemWow64Directory2W (kernelbase.@)
2238 */
2239 UINT WINAPI DECLSPEC_HOTPATCH GetSystemWow64Directory2W( LPWSTR path, UINT count, WORD machine )
2240 {
2241 const WCHAR *dir = get_machine_wow64_dir( machine );
2242
2243 return dir ? copy_filename( dir, path, count ) : 0;
2244 }
2245
2246
2247 /***********************************************************************
2248 * GetTempFileNameA (kernelbase.@)
2249 */
2250 UINT WINAPI DECLSPEC_HOTPATCH GetTempFileNameA( LPCSTR path, LPCSTR prefix, UINT unique, LPSTR buffer )
2251 {
2252 WCHAR *pathW, *prefixW = NULL;
2253 WCHAR bufferW[MAX_PATH];
2254 UINT ret;
2255
2256 if (!(pathW = file_name_AtoW( path, FALSE ))) return 0;
2257 if (prefix && !(prefixW = file_name_AtoW( prefix, TRUE ))) return 0;
2258
2259 ret = GetTempFileNameW( pathW, prefixW, unique, bufferW );
2260 if (ret) file_name_WtoA( bufferW, -1, buffer, MAX_PATH );
2261
2262 HeapFree( GetProcessHeap(), 0, prefixW );
2263 return ret;
2264 }
2265
2266
2267 /***********************************************************************
2268 * GetTempFileNameW (kernelbase.@)
2269 */
2270 UINT WINAPI DECLSPEC_HOTPATCH GetTempFileNameW( LPCWSTR path, LPCWSTR prefix, UINT unique, LPWSTR buffer )
2271 {
2272 int i;
2273 LPWSTR p;
2274 DWORD attr;
2275
2276 if (!path || !buffer)
2277 {
2278 SetLastError( ERROR_INVALID_PARAMETER );
2279 return 0;
2280 }
2281
2282 /* ensure that the provided directory exists */
2283 attr = GetFileAttributesW( path );
2284 if (attr == INVALID_FILE_ATTRIBUTES || !(attr & FILE_ATTRIBUTE_DIRECTORY))
2285 {
2286 TRACE( "path not found %s\n", debugstr_w( path ));
2287 SetLastError( ERROR_DIRECTORY );
2288 return 0;
2289 }
2290
2291 lstrcpyW( buffer, path );
2292 p = buffer + lstrlenW(buffer);
2293
2294 /* add a \, if there isn't one */
2295 if ((p == buffer) || (p[-1] != '\\')) *p++ = '\\';
2296
2297 if (prefix) for (i = 3; (i > 0) && (*prefix); i--) *p++ = *prefix++;
2298
2299 unique &= 0xffff;
2300 if (unique) swprintf( p, MAX_PATH - (p - buffer), L"%x.tmp", unique );
2301 else
2302 {
2303 /* get a "random" unique number and try to create the file */
2304 HANDLE handle;
2305 UINT num = NtGetTickCount() & 0xffff;
2306 static UINT last;
2307
2308 /* avoid using the same name twice in a short interval */
2309 if (last - num < 10) num = last + 1;
2310 if (!num) num = 1;
2311 unique = num;
2312 do
2313 {
2314 swprintf( p, MAX_PATH - (p - buffer), L"%x.tmp", unique );
2315 handle = CreateFileW( buffer, GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, 0 );
2316 if (handle != INVALID_HANDLE_VALUE)
2317 { /* We created it */
2318 CloseHandle( handle );
2319 last = unique;
2320 break;
2321 }
2322 if (GetLastError() != ERROR_FILE_EXISTS && GetLastError() != ERROR_SHARING_VIOLATION)
2323 break; /* No need to go on */
2324 if (!(++unique & 0xffff)) unique = 1;
2325 } while (unique != num);
2326 }
2327 TRACE( "returning %s\n", debugstr_w( buffer ));
2328 return unique;
2329 }
2330
2331
2332 /***********************************************************************
2333 * GetTempPathA (kernelbase.@)
2334 */
2335 DWORD WINAPI DECLSPEC_HOTPATCH GetTempPathA( DWORD count, LPSTR path )
2336 {
2337 WCHAR pathW[MAX_PATH];
2338 UINT ret;
2339
2340 if (!(ret = GetTempPathW( MAX_PATH, pathW ))) return 0;
2341 if (ret > MAX_PATH)
2342 {
2343 SetLastError( ERROR_FILENAME_EXCED_RANGE );
2344 return 0;
2345 }
2346 return copy_filename_WtoA( pathW, path, count );
2347 }
2348
2349
2350 /***********************************************************************
2351 * GetTempPathW (kernelbase.@)
2352 */
2353 DWORD WINAPI DECLSPEC_HOTPATCH GetTempPathW( DWORD count, LPWSTR path )
2354 {
2355 WCHAR tmp_path[MAX_PATH];
2356 UINT ret;
2357
2358 if (!(ret = GetEnvironmentVariableW( L"TMP", tmp_path, MAX_PATH )) &&
2359 !(ret = GetEnvironmentVariableW( L"TEMP", tmp_path, MAX_PATH )) &&
2360 !(ret = GetEnvironmentVariableW( L"USERPROFILE", tmp_path, MAX_PATH )) &&
2361 !(ret = GetWindowsDirectoryW( tmp_path, MAX_PATH )))
2362 return 0;
2363
2364 if (ret > MAX_PATH)
2365 {
2366 SetLastError( ERROR_FILENAME_EXCED_RANGE );
2367 return 0;
2368 }
2369 ret = GetFullPathNameW( tmp_path, MAX_PATH, tmp_path, NULL );
2370 if (!ret) return 0;
2371
2372 if (ret > MAX_PATH - 2)
2373 {
2374 SetLastError( ERROR_FILENAME_EXCED_RANGE );
2375 return 0;
2376 }
2377 if (tmp_path[ret-1] != '\\')
2378 {
2379 tmp_path[ret++] = '\\';
2380 tmp_path[ret] = '\0';
2381 }
2382
2383 ret++; /* add space for terminating 0 */
2384 if (count >= ret)
2385 {
2386 lstrcpynW( path, tmp_path, count );
2387 /* the remaining buffer must be zeroed up to 32766 bytes in XP or 32767
2388 * bytes after it, we will assume the > XP behavior for now */
2389 memset( path + ret, 0, (min(count, 32767) - ret) * sizeof(WCHAR) );
2390 ret--; /* return length without 0 */
2391 }
2392 else if (count)
2393 {
2394 /* the buffer must be cleared if contents will not fit */
2395 memset( path, 0, count * sizeof(WCHAR) );
2396 }
2397
2398 TRACE( "returning %u, %s\n", ret, debugstr_w( path ));
2399 return ret;
2400 }
2401
2402
2403 /***********************************************************************
2404 * GetWindowsDirectoryA (kernelbase.@)
2405 */
2406 UINT WINAPI DECLSPEC_HOTPATCH GetWindowsDirectoryA( LPSTR path, UINT count )
2407 {
2408 return copy_filename_WtoA( windows_dir, path, count );
2409 }
2410
2411
2412 /***********************************************************************
2413 * GetWindowsDirectoryW (kernelbase.@)
2414 */
2415 UINT WINAPI DECLSPEC_HOTPATCH GetWindowsDirectoryW( LPWSTR path, UINT count )
2416 {
2417 return copy_filename( windows_dir, path, count );
2418 }
2419
2420
2421 /**************************************************************************
2422 * MoveFileExW (kernelbase.@)
2423 */
2424 BOOL WINAPI MoveFileExW( const WCHAR *source, const WCHAR *dest, DWORD flag )
2425 {
2426 return MoveFileWithProgressW( source, dest, NULL, NULL, flag );
2427 }
2428
2429
2430 /**************************************************************************
2431 * MoveFileWithProgressW (kernelbase.@)
2432 */
2433 BOOL WINAPI DECLSPEC_HOTPATCH MoveFileWithProgressW( const WCHAR *source, const WCHAR *dest,
2434 LPPROGRESS_ROUTINE progress,
2435 void *param, DWORD flag )
2436 {
2437 FILE_RENAME_INFORMATION *rename_info;
2438 FILE_BASIC_INFORMATION info;
2439 UNICODE_STRING nt_name;
2440 OBJECT_ATTRIBUTES attr;
2441 IO_STATUS_BLOCK io;
2442 NTSTATUS status;
2443 HANDLE source_handle = 0;
2444 ULONG size;
2445
2446 TRACE( "(%s,%s,%p,%p,%04lx)\n", debugstr_w(source), debugstr_w(dest), progress, param, flag );
2447
2448 if (flag & MOVEFILE_DELAY_UNTIL_REBOOT) return add_boot_rename_entry( source, dest, flag );
2449
2450 if (!dest) return DeleteFileW( source );
2451
2452 /* check if we are allowed to rename the source */
2453
2454 if (!RtlDosPathNameToNtPathName_U( source, &nt_name, NULL, NULL ))
2455 {
2456 SetLastError( ERROR_PATH_NOT_FOUND );
2457 return FALSE;
2458 }
2459 attr.Length = sizeof(attr);
2460 attr.RootDirectory = 0;
2461 attr.Attributes = OBJ_CASE_INSENSITIVE;
2462 attr.ObjectName = &nt_name;
2463 attr.SecurityDescriptor = NULL;
2464 attr.SecurityQualityOfService = NULL;
2465
2466 status = NtOpenFile( &source_handle, DELETE | SYNCHRONIZE, &attr, &io,
2467 FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
2468 FILE_SYNCHRONOUS_IO_NONALERT );
2469 RtlFreeUnicodeString( &nt_name );
2470 if (!set_ntstatus( status )) goto error;
2471
2472 status = NtQueryInformationFile( source_handle, &io, &info, sizeof(info), FileBasicInformation );
2473 if (!set_ntstatus( status )) goto error;
2474
2475 if (!RtlDosPathNameToNtPathName_U( dest, &nt_name, NULL, NULL ))
2476 {
2477 SetLastError( ERROR_PATH_NOT_FOUND );
2478 goto error;
2479 }
2480
2481 size = offsetof( FILE_RENAME_INFORMATION, FileName ) + nt_name.Length;
2482 if (!(rename_info = HeapAlloc( GetProcessHeap(), 0, size ))) goto error;
2483
2484 rename_info->ReplaceIfExists = !!(flag & MOVEFILE_REPLACE_EXISTING);
2485 rename_info->RootDirectory = NULL;
2486 rename_info->FileNameLength = nt_name.Length;
2487 memcpy( rename_info->FileName, nt_name.Buffer, nt_name.Length );
2488 RtlFreeUnicodeString( &nt_name );
2489 status = NtSetInformationFile( source_handle, &io, rename_info, size, FileRenameInformation );
2490 HeapFree( GetProcessHeap(), 0, rename_info );
2491 if (status == STATUS_NOT_SAME_DEVICE && (flag & MOVEFILE_COPY_ALLOWED))
2492 {
2493 NtClose( source_handle );
2494 if (!CopyFileExW( source, dest, progress, param, NULL,
2495 flag & MOVEFILE_REPLACE_EXISTING ? 0 : COPY_FILE_FAIL_IF_EXISTS ))
2496 return FALSE;
2497 return DeleteFileW( source );
2498 }
2499
2500 NtClose( source_handle );
2501 return set_ntstatus( status );
2502
2503 error:
2504 if (source_handle) NtClose( source_handle );
2505 return FALSE;
2506 }
2507
2508
2509 /***********************************************************************
2510 * NeedCurrentDirectoryForExePathA (kernelbase.@)
2511 */
2512 BOOL WINAPI DECLSPEC_HOTPATCH NeedCurrentDirectoryForExePathA( LPCSTR name )
2513 {
2514 WCHAR *nameW;
2515
2516 if (!(nameW = file_name_AtoW( name, FALSE ))) return TRUE;
2517 return NeedCurrentDirectoryForExePathW( nameW );
2518 }
2519
2520
2521 /***********************************************************************
2522 * NeedCurrentDirectoryForExePathW (kernelbase.@)
2523 */
2524 BOOL WINAPI DECLSPEC_HOTPATCH NeedCurrentDirectoryForExePathW( LPCWSTR name )
2525 {
2526 WCHAR env_val;
2527
2528 if (wcschr( name, '\\' )) return TRUE;
2529 /* check the existence of the variable, not value */
2530 return !GetEnvironmentVariableW( L"NoDefaultCurrentDirectoryInExePath", &env_val, 1 );
2531 }
2532
2533
2534 /***********************************************************************
2535 * ReplaceFileW (kernelbase.@)
2536 */
2537 BOOL WINAPI DECLSPEC_HOTPATCH ReplaceFileW( const WCHAR *replaced, const WCHAR *replacement,
2538 const WCHAR *backup, DWORD flags,
2539 void *exclude, void *reserved )
2540 {
2541 UNICODE_STRING nt_replaced_name, nt_replacement_name;
2542 HANDLE hReplacement = NULL;
2543 NTSTATUS status;
2544 IO_STATUS_BLOCK io;
2545 OBJECT_ATTRIBUTES attr;
2546 FILE_BASIC_INFORMATION info;
2547
2548 TRACE( "%s %s %s 0x%08lx %p %p\n", debugstr_w(replaced), debugstr_w(replacement), debugstr_w(backup),
2549 flags, exclude, reserved );
2550
2551 if (flags) FIXME("Ignoring flags %lx\n", flags);
2552
2553 /* First two arguments are mandatory */
2554 if (!replaced || !replacement)
2555 {
2556 SetLastError(ERROR_INVALID_PARAMETER);
2557 return FALSE;
2558 }
2559
2560 attr.Length = sizeof(attr);
2561 attr.RootDirectory = 0;
2562 attr.Attributes = OBJ_CASE_INSENSITIVE;
2563 attr.ObjectName = NULL;
2564 attr.SecurityDescriptor = NULL;
2565 attr.SecurityQualityOfService = NULL;
2566
2567 /* Open the "replaced" file for reading */
2568 if (!RtlDosPathNameToNtPathName_U( replaced, &nt_replaced_name, NULL, NULL ))
2569 {
2570 SetLastError( ERROR_PATH_NOT_FOUND );
2571 return FALSE;
2572 }
2573 attr.ObjectName = &nt_replaced_name;
2574
2575 /* Replacement should fail if replaced is READ_ONLY */
2576 status = NtQueryAttributesFile(&attr, &info);
2577 RtlFreeUnicodeString(&nt_replaced_name);
2578 if (!set_ntstatus( status )) return FALSE;
2579
2580 if (info.FileAttributes & FILE_ATTRIBUTE_READONLY)
2581 {
2582 SetLastError( ERROR_ACCESS_DENIED );
2583 return FALSE;
2584 }
2585
2586 /*
2587 * Open the replacement file for reading, writing, and deleting
2588 * (writing and deleting are needed when finished)
2589 */
2590 if (!RtlDosPathNameToNtPathName_U( replacement, &nt_replacement_name, NULL, NULL ))
2591 {
2592 SetLastError( ERROR_PATH_NOT_FOUND );
2593 return FALSE;
2594 }
2595 attr.ObjectName = &nt_replacement_name;
2596 status = NtOpenFile( &hReplacement, GENERIC_READ | GENERIC_WRITE | DELETE | WRITE_DAC | SYNCHRONIZE,
2597 &attr, &io, 0, FILE_SYNCHRONOUS_IO_NONALERT | FILE_NON_DIRECTORY_FILE );
2598 RtlFreeUnicodeString(&nt_replacement_name);
2599 if (!set_ntstatus( status )) return FALSE;
2600 NtClose( hReplacement );
2601
2602 /* If the user wants a backup then that needs to be performed first */
2603 if (backup)
2604 {
2605 if (!MoveFileExW( replaced, backup, MOVEFILE_REPLACE_EXISTING )) return FALSE;
2606 }
2607 else
2608 {
2609 /* ReplaceFile() can replace an open target. To do this, we need to move
2610 * it out of the way first. */
2611 WCHAR temp_path[MAX_PATH], temp_file[MAX_PATH];
2612
2613 lstrcpynW( temp_path, replaced, ARRAY_SIZE( temp_path ) );
2614 PathRemoveFileSpecW( temp_path );
2615 if (!GetTempFileNameW( temp_path, L"rf", 0, temp_file ) ||
2616 !MoveFileExW( replaced, temp_file, MOVEFILE_REPLACE_EXISTING ))
2617 return FALSE;
2618
2619 DeleteFileW( temp_file );
2620 }
2621
2622 /*
2623 * Now that the backup has been performed (if requested), copy the replacement
2624 * into place
2625 */
2626 if (!MoveFileExW( replacement, replaced, 0 ))
2627 {
2628 /* on failure we need to indicate whether a backup was made */
2629 if (!backup)
2630 SetLastError( ERROR_UNABLE_TO_MOVE_REPLACEMENT );
2631 else
2632 SetLastError( ERROR_UNABLE_TO_MOVE_REPLACEMENT_2 );
2633 return FALSE;
2634 }
2635 return TRUE;
2636 }
2637
2638
2639 /***********************************************************************
2640 * SearchPathA (kernelbase.@)
2641 */
2642 DWORD WINAPI DECLSPEC_HOTPATCH SearchPathA( LPCSTR path, LPCSTR name, LPCSTR ext,
2643 DWORD buflen, LPSTR buffer, LPSTR *lastpart )
2644 {
2645 WCHAR *pathW = NULL, *nameW, *extW = NULL;
2646 WCHAR bufferW[MAX_PATH];
2647 DWORD ret;
2648
2649 if (!name)
2650 {
2651 SetLastError( ERROR_INVALID_PARAMETER );
2652 return 0;
2653 }
2654
2655 if (!(nameW = file_name_AtoW( name, FALSE ))) return 0;
2656 if (path && !(pathW = file_name_AtoW( path, TRUE ))) return 0;
2657 if (ext && !(extW = file_name_AtoW( ext, TRUE )))
2658 {
2659 RtlFreeHeap( GetProcessHeap(), 0, pathW );
2660 return 0;
2661 }
2662
2663 ret = SearchPathW( pathW, nameW, extW, MAX_PATH, bufferW, NULL );
2664
2665 RtlFreeHeap( GetProcessHeap(), 0, pathW );
2666 RtlFreeHeap( GetProcessHeap(), 0, extW );
2667
2668 if (!ret) return 0;
2669 if (ret > MAX_PATH)
2670 {
2671 SetLastError( ERROR_FILENAME_EXCED_RANGE );
2672 return 0;
2673 }
2674 ret = copy_filename_WtoA( bufferW, buffer, buflen );
2675 if (buflen > ret && lastpart) *lastpart = strrchr(buffer, '\\') + 1;
2676 return ret;
2677 }
2678
2679
2680 /***********************************************************************
2681 * SearchPathW (kernelbase.@)
2682 */
2683 DWORD WINAPI DECLSPEC_HOTPATCH SearchPathW( LPCWSTR path, LPCWSTR name, LPCWSTR ext, DWORD buflen,
2684 LPWSTR buffer, LPWSTR *lastpart )
2685 {
2686 DWORD ret = 0;
2687 WCHAR *name_ext;
2688
2689 if (!name || !name[0])
2690 {
2691 SetLastError( ERROR_INVALID_PARAMETER );
2692 return 0;
2693 }
2694
2695 /* If the name contains an explicit path, ignore the path */
2696
2697 if (contains_path( name ))
2698 {
2699 /* try first without extension */
2700 if (RtlDoesFileExists_U( name )) return GetFullPathNameW( name, buflen, buffer, lastpart );
2701
2702 if ((name_ext = append_ext( name, ext )))
2703 {
2704 if (RtlDoesFileExists_U( name_ext ))
2705 ret = GetFullPathNameW( name_ext, buflen, buffer, lastpart );
2706 RtlFreeHeap( GetProcessHeap(), 0, name_ext );
2707 }
2708 }
2709 else if (path && path[0]) /* search in the specified path */
2710 {
2711 ret = RtlDosSearchPath_U( path, name, ext, buflen * sizeof(WCHAR),
2712 buffer, lastpart ) / sizeof(WCHAR);
2713 }
2714 else /* search in active context and default path */
2715 {
2716 WCHAR *dll_path = NULL, *name_ext = append_ext( name, ext );
2717
2718 if (name_ext) name = name_ext;
2719
2720 /* When file is found with activation context no attempt is made
2721 to check if it's really exist, path is returned only basing on context info. */
2722 if (find_actctx_dllpath( name, &dll_path ) == STATUS_SUCCESS)
2723 {
2724 ret = lstrlenW( dll_path ) + lstrlenW( name ) + 1;
2725
2726 /* count null termination char too */
2727 if (ret <= buflen)
2728 {
2729 lstrcpyW( buffer, dll_path );
2730 lstrcatW( buffer, name );
2731 if (lastpart) *lastpart = buffer + lstrlenW( dll_path );
2732 ret--;
2733 }
2734 else if (lastpart) *lastpart = NULL;
2735 RtlFreeHeap( GetProcessHeap(), 0, dll_path );
2736 }
2737 else if (!RtlGetSearchPath( &dll_path ))
2738 {
2739 ret = RtlDosSearchPath_U( dll_path, name, NULL, buflen * sizeof(WCHAR),
2740 buffer, lastpart ) / sizeof(WCHAR);
2741 RtlReleasePath( dll_path );
2742 }
2743 RtlFreeHeap( GetProcessHeap(), 0, name_ext );
2744 }
2745
2746 if (!ret) SetLastError( ERROR_FILE_NOT_FOUND );
2747 else TRACE( "found %s\n", debugstr_w(buffer) );
2748 return ret;
2749 }
2750
2751
2752 /***********************************************************************
2753 * SetCurrentDirectoryA (kernelbase.@)
2754 */
2755 BOOL WINAPI DECLSPEC_HOTPATCH SetCurrentDirectoryA( LPCSTR dir )
2756 {
2757 WCHAR *dirW;
2758 UNICODE_STRING strW;
2759
2760 if (!(dirW = file_name_AtoW( dir, FALSE ))) return FALSE;
2761 RtlInitUnicodeString( &strW, dirW );
2762 return set_ntstatus( RtlSetCurrentDirectory_U( &strW ));
2763 }
2764
2765
2766 /***********************************************************************
2767 * SetCurrentDirectoryW (kernelbase.@)
2768 */
2769 BOOL WINAPI DECLSPEC_HOTPATCH SetCurrentDirectoryW( LPCWSTR dir )
2770 {
2771 UNICODE_STRING dirW;
2772
2773 RtlInitUnicodeString( &dirW, dir );
2774 return set_ntstatus( RtlSetCurrentDirectory_U( &dirW ));
2775 }
2776
2777
2778 /**************************************************************************
2779 * SetFileApisToANSI (kernelbase.@)
2780 */
2781 void WINAPI DECLSPEC_HOTPATCH SetFileApisToANSI(void)
2782 {
2783 oem_file_apis = FALSE;
2784 }
2785
2786
2787 /**************************************************************************
2788 * SetFileApisToOEM (kernelbase.@)
2789 */
2790 void WINAPI DECLSPEC_HOTPATCH SetFileApisToOEM(void)
2791 {
2792 oem_file_apis = TRUE;
2793 }
2794
2795
2796 /**************************************************************************
2797 * SetFileAttributesA (kernelbase.@)
2798 */
2799 BOOL WINAPI DECLSPEC_HOTPATCH SetFileAttributesA( LPCSTR name, DWORD attributes )
2800 {
2801 WCHAR *nameW;
2802
2803 if (!(nameW = file_name_AtoW( name, FALSE ))) return FALSE;
2804 return SetFileAttributesW( nameW, attributes );
2805 }
2806
2807
2808 /**************************************************************************
2809 * SetFileAttributesW (kernelbase.@)
2810 */
2811 BOOL WINAPI DECLSPEC_HOTPATCH SetFileAttributesW( LPCWSTR name, DWORD attributes )
2812 {
2813 UNICODE_STRING nt_name;
2814 OBJECT_ATTRIBUTES attr;
2815 IO_STATUS_BLOCK io;
2816 NTSTATUS status;
2817 HANDLE handle;
2818
2819 TRACE( "%s %lx\n", debugstr_w(name), attributes );
2820
2821 if (!RtlDosPathNameToNtPathName_U( name, &nt_name, NULL, NULL ))
2822 {
2823 SetLastError( ERROR_PATH_NOT_FOUND );
2824 return FALSE;
2825 }
2826
2827 attr.Length = sizeof(attr);
2828 attr.RootDirectory = 0;
2829 attr.Attributes = OBJ_CASE_INSENSITIVE;
2830 attr.ObjectName = &nt_name;
2831 attr.SecurityDescriptor = NULL;
2832 attr.SecurityQualityOfService = NULL;
2833
2834 status = NtOpenFile( &handle, SYNCHRONIZE, &attr, &io, 0, FILE_SYNCHRONOUS_IO_NONALERT );
2835 RtlFreeUnicodeString( &nt_name );
2836
2837 if (status == STATUS_SUCCESS)
2838 {
2839 FILE_BASIC_INFORMATION info;
2840
2841 memset( &info, 0, sizeof(info) );
2842 info.FileAttributes = attributes | FILE_ATTRIBUTE_NORMAL; /* make sure it's not zero */
2843 status = NtSetInformationFile( handle, &io, &info, sizeof(info), FileBasicInformation );
2844 NtClose( handle );
2845 }
2846 return set_ntstatus( status );
2847 }
2848
2849
2850 /***********************************************************************
2851 * Wow64DisableWow64FsRedirection (kernelbase.@)
2852 */
2853 BOOL WINAPI DECLSPEC_HOTPATCH Wow64DisableWow64FsRedirection( PVOID *old_value )
2854 {
2855 return set_ntstatus( RtlWow64EnableFsRedirectionEx( TRUE, (ULONG *)old_value ));
2856 }
2857
2858
2859 /***********************************************************************
2860 * Wow64EnableWow64FsRedirection (kernelbase.@)
2861 *
2862 * Microsoft C++ Redistributable installers are depending on all %eax bits being set.
2863 */
2864 DWORD /*BOOLEAN*/ WINAPI kernelbase_Wow64EnableWow64FsRedirection( BOOLEAN enable )
2865 {
2866 return set_ntstatus( RtlWow64EnableFsRedirection( enable ));
2867 }
2868
2869
2870 /***********************************************************************
2871 * Wow64RevertWow64FsRedirection (kernelbase.@)
2872 */
2873 BOOL WINAPI DECLSPEC_HOTPATCH Wow64RevertWow64FsRedirection( PVOID old_value )
2874 {
2875 return set_ntstatus( RtlWow64EnableFsRedirection( !old_value ));
2876 }
2877
2878
2879 /***********************************************************************
2880 * Operations on file handles
2881 ***********************************************************************/
2882
2883
2884 /***********************************************************************
2885 * CancelIo (kernelbase.@)
2886 */
2887 BOOL WINAPI DECLSPEC_HOTPATCH CancelIo( HANDLE handle )
2888 {
2889 IO_STATUS_BLOCK io;
2890
2891 return set_ntstatus( NtCancelIoFile( handle, &io ) );
2892 }
2893
2894
2895 /***********************************************************************
2896 * CancelIoEx (kernelbase.@)
2897 */
2898 BOOL WINAPI DECLSPEC_HOTPATCH CancelIoEx( HANDLE handle, LPOVERLAPPED overlapped )
2899 {
2900 IO_STATUS_BLOCK io;
2901
2902 return set_ntstatus( NtCancelIoFileEx( handle, (PIO_STATUS_BLOCK)overlapped, &io ) );
2903 }
2904
2905
2906 /***********************************************************************
2907 * CancelSynchronousIo (kernelbase.@)
2908 */
2909 BOOL WINAPI DECLSPEC_HOTPATCH CancelSynchronousIo( HANDLE thread )
2910 {
2911 IO_STATUS_BLOCK io;
2912
2913 return set_ntstatus( NtCancelSynchronousIoFile( thread, NULL, &io ));
2914 }
2915
2916
2917 /***********************************************************************
2918 * FlushFileBuffers (kernelbase.@)
2919 */
2920 BOOL WINAPI DECLSPEC_HOTPATCH FlushFileBuffers( HANDLE file )
2921 {
2922 IO_STATUS_BLOCK iosb;
2923
2924 return set_ntstatus( NtFlushBuffersFile( file, &iosb ));
2925 }
2926
2927
2928 /***********************************************************************
2929 * GetFileInformationByHandle (kernelbase.@)
2930 */
2931 BOOL WINAPI DECLSPEC_HOTPATCH GetFileInformationByHandle( HANDLE file, BY_HANDLE_FILE_INFORMATION *info )
2932 {
2933 FILE_FS_VOLUME_INFORMATION volume_info;
2934 FILE_ALL_INFORMATION all_info;
2935 IO_STATUS_BLOCK io;
2936 NTSTATUS status;
2937
2938 status = NtQueryInformationFile( file, &io, &all_info, sizeof(all_info), FileAllInformation );
2939 if (status == STATUS_BUFFER_OVERFLOW) status = STATUS_SUCCESS;
2940 if (!set_ntstatus( status )) return FALSE;
2941
2942 info->dwFileAttributes = all_info.BasicInformation.FileAttributes;
2943 info->ftCreationTime.dwHighDateTime = all_info.BasicInformation.CreationTime.u.HighPart;
2944 info->ftCreationTime.dwLowDateTime = all_info.BasicInformation.CreationTime.u.LowPart;
2945 info->ftLastAccessTime.dwHighDateTime = all_info.BasicInformation.LastAccessTime.u.HighPart;
2946 info->ftLastAccessTime.dwLowDateTime = all_info.BasicInformation.LastAccessTime.u.LowPart;
2947 info->ftLastWriteTime.dwHighDateTime = all_info.BasicInformation.LastWriteTime.u.HighPart;
2948 info->ftLastWriteTime.dwLowDateTime = all_info.BasicInformation.LastWriteTime.u.LowPart;
2949 info->dwVolumeSerialNumber = 0;
2950 info->nFileSizeHigh = all_info.StandardInformation.EndOfFile.u.HighPart;
2951 info->nFileSizeLow = all_info.StandardInformation.EndOfFile.u.LowPart;
2952 info->nNumberOfLinks = all_info.StandardInformation.NumberOfLinks;
2953 info->nFileIndexHigh = all_info.InternalInformation.IndexNumber.u.HighPart;
2954 info->nFileIndexLow = all_info.InternalInformation.IndexNumber.u.LowPart;
2955
2956 status = NtQueryVolumeInformationFile( file, &io, &volume_info, sizeof(volume_info), FileFsVolumeInformation );
2957 if (status == STATUS_SUCCESS || status == STATUS_BUFFER_OVERFLOW)
2958 info->dwVolumeSerialNumber = volume_info.VolumeSerialNumber;
2959
2960 return TRUE;
2961 }
2962
2963
2964 /***********************************************************************
2965 * GetFileInformationByHandleEx (kernelbase.@)
2966 */
2967 BOOL WINAPI DECLSPEC_HOTPATCH GetFileInformationByHandleEx( HANDLE handle, FILE_INFO_BY_HANDLE_CLASS class,
2968 LPVOID info, DWORD size )
2969 {
2970 NTSTATUS status;
2971 IO_STATUS_BLOCK io;
2972
2973 switch (class)
2974 {
2975 case FileRemoteProtocolInfo:
2976 case FileStorageInfo:
2977 case FileDispositionInfoEx:
2978 case FileRenameInfoEx:
2979 case FileCaseSensitiveInfo:
2980 case FileNormalizedNameInfo:
2981 FIXME( "%p, %u, %p, %lu\n", handle, class, info, size );
2982 SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
2983 return FALSE;
2984
2985 case FileStreamInfo:
2986 status = NtQueryInformationFile( handle, &io, info, size, FileStreamInformation );
2987 break;
2988
2989 case FileCompressionInfo:
2990 status = NtQueryInformationFile( handle, &io, info, size, FileCompressionInformation );
2991 break;
2992
2993 case FileAlignmentInfo:
2994 status = NtQueryInformationFile( handle, &io, info, size, FileAlignmentInformation );
2995 break;
2996
2997 case FileAttributeTagInfo:
2998 status = NtQueryInformationFile( handle, &io, info, size, FileAttributeTagInformation );
2999 break;
3000
3001 case FileBasicInfo:
3002 status = NtQueryInformationFile( handle, &io, info, size, FileBasicInformation );
3003 break;
3004
3005 case FileStandardInfo:
3006 status = NtQueryInformationFile( handle, &io, info, size, FileStandardInformation );
3007 break;
3008
3009 case FileNameInfo:
3010 status = NtQueryInformationFile( handle, &io, info, size, FileNameInformation );
3011 break;
3012
3013 case FileIdInfo:
3014 status = NtQueryInformationFile( handle, &io, info, size, FileIdInformation );
3015 break;
3016
3017 case FileIdBothDirectoryRestartInfo:
3018 case FileIdBothDirectoryInfo:
3019 status = NtQueryDirectoryFile( handle, NULL, NULL, NULL, &io, info, size,
3020 FileIdBothDirectoryInformation, FALSE, NULL,
3021 (class == FileIdBothDirectoryRestartInfo) );
3022 break;
3023
3024 case FileFullDirectoryInfo:
3025 case FileFullDirectoryRestartInfo:
3026 status = NtQueryDirectoryFile( handle, NULL, NULL, NULL, &io, info, size,
3027 FileFullDirectoryInformation, FALSE, NULL,
3028 (class == FileFullDirectoryRestartInfo) );
3029 break;
3030
3031 case FileIdExtdDirectoryInfo:
3032 case FileIdExtdDirectoryRestartInfo:
3033 status = NtQueryDirectoryFile( handle, NULL, NULL, NULL, &io, info, size,
3034 FileIdExtdDirectoryInformation, FALSE, NULL,
3035 (class == FileIdExtdDirectoryRestartInfo) );
3036 break;
3037
3038 case FileRenameInfo:
3039 case FileDispositionInfo:
3040 case FileAllocationInfo:
3041 case FileIoPriorityHintInfo:
3042 case FileEndOfFileInfo:
3043 default:
3044 SetLastError( ERROR_INVALID_PARAMETER );
3045 return FALSE;
3046 }
3047 return set_ntstatus( status );
3048 }
3049
3050
3051 /***********************************************************************
3052 * GetFileSize (kernelbase.@)
3053 */
3054 DWORD WINAPI DECLSPEC_HOTPATCH GetFileSize( HANDLE file, LPDWORD size_high )
3055 {
3056 LARGE_INTEGER size;
3057
3058 if (!GetFileSizeEx( file, &size )) return INVALID_FILE_SIZE;
3059 if (size_high) *size_high = size.u.HighPart;
3060 if (size.u.LowPart == INVALID_FILE_SIZE) SetLastError( 0 );
3061 return size.u.LowPart;
3062 }
3063
3064
3065 /***********************************************************************
3066 * GetFileSizeEx (kernelbase.@)
3067 */
3068 BOOL WINAPI DECLSPEC_HOTPATCH GetFileSizeEx( HANDLE file, PLARGE_INTEGER size )
3069 {
3070 FILE_STANDARD_INFORMATION info;
3071 IO_STATUS_BLOCK io;
3072
3073 if (!set_ntstatus( NtQueryInformationFile( file, &io, &info, sizeof(info), FileStandardInformation )))
3074 return FALSE;
3075
3076 *size = info.EndOfFile;
3077 return TRUE;
3078 }
3079
3080
3081 /***********************************************************************
3082 * GetFileTime (kernelbase.@)
3083 */
3084 BOOL WINAPI DECLSPEC_HOTPATCH GetFileTime( HANDLE file, FILETIME *creation,
3085 FILETIME *access, FILETIME *write )
3086 {
3087 FILE_BASIC_INFORMATION info;
3088 IO_STATUS_BLOCK io;
3089
3090 if (!set_ntstatus( NtQueryInformationFile( file, &io, &info, sizeof(info), FileBasicInformation )))
3091 return FALSE;
3092
3093 if (creation)
3094 {
3095 creation->dwHighDateTime = info.CreationTime.u.HighPart;
3096 creation->dwLowDateTime = info.CreationTime.u.LowPart;
3097 }
3098 if (access)
3099 {
3100 access->dwHighDateTime = info.LastAccessTime.u.HighPart;
3101 access->dwLowDateTime = info.LastAccessTime.u.LowPart;
3102 }
3103 if (write)
3104 {
3105 write->dwHighDateTime = info.LastWriteTime.u.HighPart;
3106 write->dwLowDateTime = info.LastWriteTime.u.LowPart;
3107 }
3108 return TRUE;
3109 }
3110
3111
3112 /***********************************************************************
3113 * GetFileType (kernelbase.@)
3114 */
3115 DWORD WINAPI DECLSPEC_HOTPATCH GetFileType( HANDLE file )
3116 {
3117 FILE_FS_DEVICE_INFORMATION info;
3118 IO_STATUS_BLOCK io;
3119
3120 if (file == (HANDLE)STD_INPUT_HANDLE ||
3121 file == (HANDLE)STD_OUTPUT_HANDLE ||
3122 file == (HANDLE)STD_ERROR_HANDLE)
3123 file = GetStdHandle( (DWORD_PTR)file );
3124
3125 if (!set_ntstatus( NtQueryVolumeInformationFile( file, &io, &info, sizeof(info),
3126 FileFsDeviceInformation )))
3127 return FILE_TYPE_UNKNOWN;
3128
3129 switch (info.DeviceType)
3130 {
3131 case FILE_DEVICE_NULL:
3132 case FILE_DEVICE_CONSOLE:
3133 case FILE_DEVICE_SERIAL_PORT:
3134 case FILE_DEVICE_PARALLEL_PORT:
3135 case FILE_DEVICE_TAPE:
3136 case FILE_DEVICE_UNKNOWN:
3137 return FILE_TYPE_CHAR;
3138 case FILE_DEVICE_NAMED_PIPE:
3139 return FILE_TYPE_PIPE;
3140 default:
3141 return FILE_TYPE_DISK;
3142 }
3143 }
3144
3145
3146 /***********************************************************************
3147 * GetOverlappedResult (kernelbase.@)
3148 */
3149 BOOL WINAPI DECLSPEC_HOTPATCH GetOverlappedResult( HANDLE file, LPOVERLAPPED overlapped,
3150 LPDWORD result, BOOL wait )
3151 {
3152 return GetOverlappedResultEx( file, overlapped, result, wait ? INFINITE : 0, FALSE );
3153 }
3154
3155
3156 /***********************************************************************
3157 * GetOverlappedResultEx (kernelbase.@)
3158 */
3159 BOOL WINAPI DECLSPEC_HOTPATCH GetOverlappedResultEx( HANDLE file, OVERLAPPED *overlapped,
3160 DWORD *result, DWORD timeout, BOOL alertable )
3161 {
3162 NTSTATUS status;
3163 DWORD ret;
3164
3165 TRACE( "(%p %p %p %lu %d)\n", file, overlapped, result, timeout, alertable );
3166
3167 /* Paired with the write-release in set_async_iosb() in ntdll; see the
3168 * latter for details. */
3169 status = ReadAcquire( (LONG *)&overlapped->Internal );
3170 if (status == STATUS_PENDING)
3171 {
3172 if (!timeout)
3173 {
3174 SetLastError( ERROR_IO_INCOMPLETE );
3175 return FALSE;
3176 }
3177 ret = WaitForSingleObjectEx( overlapped->hEvent ? overlapped->hEvent : file, timeout, alertable );
3178 if (ret == WAIT_FAILED)
3179 return FALSE;
3180 else if (ret)
3181 {
3182 SetLastError( ret );
3183 return FALSE;
3184 }
3185
3186 /* We don't need to give this load acquire semantics; the wait above
3187 * already guarantees that the IOSB and output buffer are filled. */
3188 status = overlapped->Internal;
3189 if (status == STATUS_PENDING) status = STATUS_SUCCESS;
3190 }
3191
3192 *result = overlapped->InternalHigh;
3193 return set_ntstatus( status );
3194 }
3195
3196
3197 /**************************************************************************
3198 * LockFile (kernelbase.@)
3199 */
3200 BOOL WINAPI DECLSPEC_HOTPATCH LockFile( HANDLE file, DWORD offset_low, DWORD offset_high,
3201 DWORD count_low, DWORD count_high )
3202 {
3203 LARGE_INTEGER count, offset;
3204
3205 TRACE( "%p %lx%08lx %lx%08lx\n", file, offset_high, offset_low, count_high, count_low );
3206
3207 count.u.LowPart = count_low;
3208 count.u.HighPart = count_high;
3209 offset.u.LowPart = offset_low;
3210 offset.u.HighPart = offset_high;
3211 return set_ntstatus( NtLockFile( file, 0, NULL, NULL, NULL, &offset, &count, NULL, TRUE, TRUE ));
3212 }
3213
3214
3215 /**************************************************************************
3216 * LockFileEx (kernelbase.@)
3217 */
3218 BOOL WINAPI DECLSPEC_HOTPATCH LockFileEx( HANDLE file, DWORD flags, DWORD reserved,
3219 DWORD count_low, DWORD count_high, LPOVERLAPPED overlapped )
3220 {
3221 LARGE_INTEGER count, offset;
3222 LPVOID cvalue = NULL;
3223
3224 if (reserved)
3225 {
3226 SetLastError( ERROR_INVALID_PARAMETER );
3227 return FALSE;
3228 }
3229
3230 TRACE( "%p %lx%08lx %lx%08lx flags %lx\n",
3231 file, overlapped->OffsetHigh, overlapped->Offset, count_high, count_low, flags );
3232
3233 count.u.LowPart = count_low;
3234 count.u.HighPart = count_high;
3235 offset.u.LowPart = overlapped->Offset;
3236 offset.u.HighPart = overlapped->OffsetHigh;
3237
3238 if (((ULONG_PTR)overlapped->hEvent & 1) == 0) cvalue = overlapped;
3239
3240 return set_ntstatus( NtLockFile( file, overlapped->hEvent, NULL, cvalue,
3241 NULL, &offset, &count, NULL,
3242 flags & LOCKFILE_FAIL_IMMEDIATELY,
3243 flags & LOCKFILE_EXCLUSIVE_LOCK ));
3244 }
3245
3246
3247 /***********************************************************************
3248 * OpenFileById (kernelbase.@)
3249 */
3250 HANDLE WINAPI DECLSPEC_HOTPATCH OpenFileById( HANDLE handle, LPFILE_ID_DESCRIPTOR id, DWORD access,
3251 DWORD share, LPSECURITY_ATTRIBUTES sec_attr, DWORD flags )
3252 {
3253 UINT options;
3254 HANDLE result;
3255 OBJECT_ATTRIBUTES attr;
3256 IO_STATUS_BLOCK io;
3257 UNICODE_STRING objectName;
3258
3259 if (!id)
3260 {
3261 SetLastError( ERROR_INVALID_PARAMETER );
3262 return INVALID_HANDLE_VALUE;
3263 }
3264
3265 options = FILE_OPEN_BY_FILE_ID;
3266 if (flags & FILE_FLAG_BACKUP_SEMANTICS)
3267 options |= FILE_OPEN_FOR_BACKUP_INTENT;
3268 else
3269 options |= FILE_NON_DIRECTORY_FILE;
3270 if (flags & FILE_FLAG_NO_BUFFERING) options |= FILE_NO_INTERMEDIATE_BUFFERING;
3271 if (!(flags & FILE_FLAG_OVERLAPPED)) options |= FILE_SYNCHRONOUS_IO_NONALERT;
3272 if (flags & FILE_FLAG_RANDOM_ACCESS) options |= FILE_RANDOM_ACCESS;
3273 if (flags & FILE_FLAG_SEQUENTIAL_SCAN) options |= FILE_SEQUENTIAL_ONLY;
3274 flags &= FILE_ATTRIBUTE_VALID_FLAGS;
3275
3276 objectName.Length = sizeof(ULONGLONG);
3277 objectName.Buffer = (WCHAR *)&id->FileId;
3278 attr.Length = sizeof(attr);
3279 attr.RootDirectory = handle;
3280 attr.Attributes = 0;
3281 attr.ObjectName = &objectName;
3282 attr.SecurityDescriptor = sec_attr ? sec_attr->lpSecurityDescriptor : NULL;
3283 attr.SecurityQualityOfService = NULL;
3284 if (sec_attr && sec_attr->bInheritHandle) attr.Attributes |= OBJ_INHERIT;
3285
3286 if (!set_ntstatus( NtCreateFile( &result, access | SYNCHRONIZE, &attr, &io, NULL, flags,
3287 share, OPEN_EXISTING, options, NULL, 0 )))
3288 return INVALID_HANDLE_VALUE;
3289 return result;
3290 }
3291
3292
3293 /***********************************************************************
3294 * ReOpenFile (kernelbase.@)
3295 */
3296 HANDLE WINAPI DECLSPEC_HOTPATCH ReOpenFile( HANDLE handle, DWORD access, DWORD sharing, DWORD attributes )
3297 {
3298 SECURITY_QUALITY_OF_SERVICE qos;
3299 OBJECT_ATTRIBUTES attr;
3300 UNICODE_STRING empty = { 0 };
3301 IO_STATUS_BLOCK io;
3302 NTSTATUS status;
3303 HANDLE file;
3304
3305 TRACE("handle %p, access %#lx, sharing %#lx, attributes %#lx.\n", handle, access, sharing, attributes);
3306
3307 if (attributes & 0x7ffff) /* FILE_ATTRIBUTE_* flags are invalid */
3308 {
3309 SetLastError(ERROR_INVALID_PARAMETER);
3310 return INVALID_HANDLE_VALUE;
3311 }
3312
3313 if (attributes & FILE_FLAG_DELETE_ON_CLOSE)
3314 access |= DELETE;
3315
3316 InitializeObjectAttributes( &attr, &empty, OBJ_CASE_INSENSITIVE, handle, NULL );
3317 if (attributes & SECURITY_SQOS_PRESENT)
3318 {
3319 qos.Length = sizeof(qos);
3320 qos.ImpersonationLevel = (attributes >> 16) & 0x3;
3321 qos.ContextTrackingMode = attributes & SECURITY_CONTEXT_TRACKING ? SECURITY_DYNAMIC_TRACKING : SECURITY_STATIC_TRACKING;
3322 qos.EffectiveOnly = (attributes & SECURITY_EFFECTIVE_ONLY) != 0;
3323 attr.SecurityQualityOfService = &qos;
3324 }
3325
3326 status = NtCreateFile( &file, access | SYNCHRONIZE | FILE_READ_ATTRIBUTES, &attr, &io, NULL,
3327 0, sharing, FILE_OPEN, get_nt_file_options( attributes ), NULL, 0 );
3328 if (!set_ntstatus( status ))
3329 return INVALID_HANDLE_VALUE;
3330 return file;
3331 }
3332
3333
3334 static void WINAPI invoke_completion( void *context, IO_STATUS_BLOCK *io, ULONG res )
3335 {
3336 LPOVERLAPPED_COMPLETION_ROUTINE completion = context;
3337 completion( RtlNtStatusToDosError( io->Status ), io->Information, (LPOVERLAPPED)io );
3338 }
3339
3340 /****************************************************************************
3341 * ReadDirectoryChangesW (kernelbase.@)
3342 */
3343 BOOL WINAPI DECLSPEC_HOTPATCH ReadDirectoryChangesW( HANDLE handle, LPVOID buffer, DWORD len,
3344 BOOL subtree, DWORD filter, LPDWORD returned,
3345 LPOVERLAPPED overlapped,
3346 LPOVERLAPPED_COMPLETION_ROUTINE completion )
3347 {
3348 OVERLAPPED ov, *pov;
3349 IO_STATUS_BLOCK *ios;
3350 NTSTATUS status;
3351 LPVOID cvalue = NULL;
3352
3353 TRACE( "%p %p %08lx %d %08lx %p %p %p\n",
3354 handle, buffer, len, subtree, filter, returned, overlapped, completion );
3355
3356 if (!overlapped)
3357 {
3358 memset( &ov, 0, sizeof ov );
3359 ov.hEvent = CreateEventW( NULL, 0, 0, NULL );
3360 pov = &ov;
3361 }
3362 else
3363 {
3364 pov = overlapped;
3365 if (completion) cvalue = completion;
3366 else if (((ULONG_PTR)overlapped->hEvent & 1) == 0) cvalue = overlapped;
3367 }
3368
3369 ios = (PIO_STATUS_BLOCK)pov;
3370 ios->Status = STATUS_PENDING;
3371
3372 status = NtNotifyChangeDirectoryFile( handle, completion && overlapped ? NULL : pov->hEvent,
3373 completion && overlapped ? invoke_completion : NULL,
3374 cvalue, ios, buffer, len, filter, subtree );
3375 if (status == STATUS_PENDING)
3376 {
3377 if (overlapped) return TRUE;
3378 WaitForSingleObjectEx( ov.hEvent, INFINITE, TRUE );
3379 if (returned) *returned = ios->Information;
3380 status = ios->Status;
3381 }
3382 if (!overlapped) CloseHandle( ov.hEvent );
3383 return set_ntstatus( status );
3384 }
3385
3386
3387 /***********************************************************************
3388 * ReadFile (kernelbase.@)
3389 */
3390 BOOL WINAPI DECLSPEC_HOTPATCH ReadFile( HANDLE file, LPVOID buffer, DWORD count,
3391 LPDWORD result, LPOVERLAPPED overlapped )
3392 {
3393 LARGE_INTEGER offset;
3394 PLARGE_INTEGER poffset = NULL;
3395 IO_STATUS_BLOCK iosb;
3396 PIO_STATUS_BLOCK io_status = &iosb;
3397 HANDLE event = 0;
3398 NTSTATUS status;
3399 LPVOID cvalue = NULL;
3400
3401 TRACE( "%p %p %ld %p %p\n", file, buffer, count, result, overlapped );
3402
3403 if (result) *result = 0;
3404
3405 if (overlapped)
3406 {
3407 offset.u.LowPart = overlapped->Offset;
3408 offset.u.HighPart = overlapped->OffsetHigh;
3409 poffset = &offset;
3410 event = overlapped->hEvent;
3411 io_status = (PIO_STATUS_BLOCK)overlapped;
3412 if (((ULONG_PTR)event & 1) == 0) cvalue = overlapped;
3413 }
3414 else io_status->Information = 0;
3415 io_status->Status = STATUS_PENDING;
3416
3417 status = NtReadFile( file, event, NULL, cvalue, io_status, buffer, count, poffset, NULL);
3418
3419 if (status == STATUS_PENDING && !overlapped)
3420 {
3421 WaitForSingleObject( file, INFINITE );
3422 status = io_status->Status;
3423 }
3424
3425 if (result) *result = overlapped && status ? 0 : io_status->Information;
3426
3427 if (status == STATUS_END_OF_FILE)
3428 {
3429 if (overlapped != NULL)
3430 {
3431 SetLastError( RtlNtStatusToDosError(status) );
3432 return FALSE;
3433 }
3434 }
3435 else if (status && status != STATUS_TIMEOUT)
3436 {
3437 SetLastError( RtlNtStatusToDosError(status) );
3438 return FALSE;
3439 }
3440 return TRUE;
3441 }
3442
3443
3444 /***********************************************************************
3445 * ReadFileEx (kernelbase.@)
3446 */
3447 BOOL WINAPI DECLSPEC_HOTPATCH ReadFileEx( HANDLE file, LPVOID buffer, DWORD count, LPOVERLAPPED overlapped,
3448 LPOVERLAPPED_COMPLETION_ROUTINE completion )
3449 {
3450 PIO_STATUS_BLOCK io;
3451 LARGE_INTEGER offset;
3452 NTSTATUS status;
3453
3454 TRACE( "(file=%p, buffer=%p, bytes=%lu, ovl=%p, ovl_fn=%p)\n",
3455 file, buffer, count, overlapped, completion );
3456
3457 if (!overlapped)
3458 {
3459 SetLastError( ERROR_INVALID_PARAMETER );
3460 return FALSE;
3461 }
3462 offset.u.LowPart = overlapped->Offset;
3463 offset.u.HighPart = overlapped->OffsetHigh;
3464 io = (PIO_STATUS_BLOCK)overlapped;
3465 io->Status = STATUS_PENDING;
3466 io->Information = 0;
3467
3468 status = NtReadFile( file, NULL, read_write_apc, completion, io, buffer, count, &offset, NULL);
3469 if (status == STATUS_PENDING) return TRUE;
3470 return set_ntstatus( status );
3471 }
3472
3473
3474 /***********************************************************************
3475 * ReadFileScatter (kernelbase.@)
3476 */
3477 BOOL WINAPI DECLSPEC_HOTPATCH ReadFileScatter( HANDLE file, FILE_SEGMENT_ELEMENT *segments, DWORD count,
3478 LPDWORD reserved, LPOVERLAPPED overlapped )
3479 {
3480 PIO_STATUS_BLOCK io;
3481 LARGE_INTEGER offset;
3482 void *cvalue = NULL;
3483
3484 TRACE( "(%p %p %lu %p)\n", file, segments, count, overlapped );
3485
3486 offset.u.LowPart = overlapped->Offset;
3487 offset.u.HighPart = overlapped->OffsetHigh;
3488 if (!((ULONG_PTR)overlapped->hEvent & 1)) cvalue = overlapped;
3489 io = (PIO_STATUS_BLOCK)overlapped;
3490 io->Status = STATUS_PENDING;
3491 io->Information = 0;
3492
3493 return set_ntstatus( NtReadFileScatter( file, overlapped->hEvent, NULL, cvalue, io,
3494 segments, count, &offset, NULL ));
3495 }
3496
3497
3498 /***********************************************************************
3499 * RemoveDirectoryA (kernelbase.@)
3500 */
3501 BOOL WINAPI DECLSPEC_HOTPATCH RemoveDirectoryA( LPCSTR path )
3502 {
3503 WCHAR *pathW;
3504
3505 if (!(pathW = file_name_AtoW( path, FALSE ))) return FALSE;
3506 return RemoveDirectoryW( pathW );
3507 }
3508
3509
3510 /***********************************************************************
3511 * RemoveDirectoryW (kernelbase.@)
3512 */
3513 BOOL WINAPI DECLSPEC_HOTPATCH RemoveDirectoryW( LPCWSTR path )
3514 {
3515 OBJECT_ATTRIBUTES attr;
3516 UNICODE_STRING nt_name;
3517 IO_STATUS_BLOCK io;
3518 NTSTATUS status;
3519 HANDLE handle;
3520
3521 TRACE( "%s\n", debugstr_w(path) );
3522
3523 status = RtlDosPathNameToNtPathName_U_WithStatus( path, &nt_name, NULL, NULL );
3524 if (!set_ntstatus( status )) return FALSE;
3525
3526 InitializeObjectAttributes( &attr, &nt_name, OBJ_CASE_INSENSITIVE, 0, NULL );
3527 status = NtOpenFile( &handle, DELETE | SYNCHRONIZE, &attr, &io,
3528 FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
3529 FILE_DIRECTORY_FILE | FILE_SYNCHRONOUS_IO_NONALERT );
3530 RtlFreeUnicodeString( &nt_name );
3531
3532 if (!status)
3533 {
3534 FILE_DISPOSITION_INFORMATION info = { TRUE };
3535 status = NtSetInformationFile( handle, &io, &info, sizeof(info), FileDispositionInformation );
3536 NtClose( handle );
3537 }
3538 return set_ntstatus( status );
3539 }
3540
3541
3542 /**************************************************************************
3543 * SetEndOfFile (kernelbase.@)
3544 */
3545 BOOL WINAPI DECLSPEC_HOTPATCH SetEndOfFile( HANDLE file )
3546 {
3547 FILE_POSITION_INFORMATION pos;
3548 FILE_END_OF_FILE_INFORMATION eof;
3549 IO_STATUS_BLOCK io;
3550 NTSTATUS status;
3551
3552 if (!(status = NtQueryInformationFile( file, &io, &pos, sizeof(pos), FilePositionInformation )))
3553 {
3554 eof.EndOfFile = pos.CurrentByteOffset;
3555 status = NtSetInformationFile( file, &io, &eof, sizeof(eof), FileEndOfFileInformation );
3556 }
3557 return set_ntstatus( status );
3558 }
3559
3560
3561 /***********************************************************************
3562 * SetFileInformationByHandle (kernelbase.@)
3563 */
3564 BOOL WINAPI DECLSPEC_HOTPATCH SetFileInformationByHandle( HANDLE file, FILE_INFO_BY_HANDLE_CLASS class,
3565 void *info, DWORD size )
3566 {
3567 NTSTATUS status;
3568 IO_STATUS_BLOCK io;
3569
3570 TRACE( "%p %u %p %lu\n", file, class, info, size );
3571
3572 switch (class)
3573 {
3574 case FileNameInfo:
3575 case FileAllocationInfo:
3576 case FileStreamInfo:
3577 case FileIdBothDirectoryInfo:
3578 case FileIdBothDirectoryRestartInfo:
3579 case FileFullDirectoryInfo:
3580 case FileFullDirectoryRestartInfo:
3581 case FileStorageInfo:
3582 case FileAlignmentInfo:
3583 case FileIdInfo:
3584 case FileIdExtdDirectoryInfo:
3585 case FileIdExtdDirectoryRestartInfo:
3586 FIXME( "%p, %u, %p, %lu\n", file, class, info, size );
3587 SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
3588 return FALSE;
3589
3590 case FileEndOfFileInfo:
3591 status = NtSetInformationFile( file, &io, info, size, FileEndOfFileInformation );
3592 break;
3593 case FileBasicInfo:
3594 status = NtSetInformationFile( file, &io, info, size, FileBasicInformation );
3595 break;
3596 case FileDispositionInfo:
3597 status = NtSetInformationFile( file, &io, info, size, FileDispositionInformation );
3598 break;
3599 case FileIoPriorityHintInfo:
3600 status = NtSetInformationFile( file, &io, info, size, FileIoPriorityHintInformation );
3601 break;
3602 case FileRenameInfo:
3603 {
3604 FILE_RENAME_INFORMATION *rename_info;
3605 UNICODE_STRING nt_name;
3606 ULONG size;
3607
3608 if ((status = RtlDosPathNameToNtPathName_U_WithStatus( ((FILE_RENAME_INFORMATION *)info)->FileName,
3609 &nt_name, NULL, NULL )))
3610 break;
3611
3612 size = sizeof(*rename_info) + nt_name.Length;
3613 if ((rename_info = HeapAlloc( GetProcessHeap(), 0, size )))
3614 {
3615 memcpy( rename_info, info, sizeof(*rename_info) );
3616 memcpy( rename_info->FileName, nt_name.Buffer, nt_name.Length + sizeof(WCHAR) );
3617 rename_info->FileNameLength = nt_name.Length;
3618 status = NtSetInformationFile( file, &io, rename_info, size, FileRenameInformation );
3619 HeapFree( GetProcessHeap(), 0, rename_info );
3620 }
3621 RtlFreeUnicodeString( &nt_name );
3622 break;
3623 }
3624 case FileStandardInfo:
3625 case FileCompressionInfo:
3626 case FileAttributeTagInfo:
3627 case FileRemoteProtocolInfo:
3628 default:
3629 SetLastError( ERROR_INVALID_PARAMETER );
3630 return FALSE;
3631 }
3632 return set_ntstatus( status );
3633 }
3634
3635
3636 /***********************************************************************
3637 * SetFilePointer (kernelbase.@)
3638 */
3639 DWORD WINAPI DECLSPEC_HOTPATCH SetFilePointer( HANDLE file, LONG distance, LONG *highword, DWORD method )
3640 {
3641 LARGE_INTEGER dist, newpos;
3642
3643 if (highword)
3644 {
3645 dist.u.LowPart = distance;
3646 dist.u.HighPart = *highword;
3647 }
3648 else dist.QuadPart = distance;
3649
3650 if (!SetFilePointerEx( file, dist, &newpos, method )) return INVALID_SET_FILE_POINTER;
3651
3652 if (highword) *highword = newpos.u.HighPart;
3653 if (newpos.u.LowPart == INVALID_SET_FILE_POINTER) SetLastError( 0 );
3654 return newpos.u.LowPart;
3655 }
3656
3657
3658 /***********************************************************************
3659 * SetFilePointerEx (kernelbase.@)
3660 */
3661 BOOL WINAPI DECLSPEC_HOTPATCH SetFilePointerEx( HANDLE file, LARGE_INTEGER distance,
3662 LARGE_INTEGER *newpos, DWORD method )
3663 {
3664 LONGLONG pos;
3665 IO_STATUS_BLOCK io;
3666 FILE_POSITION_INFORMATION info;
3667 FILE_STANDARD_INFORMATION eof;
3668
3669 switch(method)
3670 {
3671 case FILE_BEGIN:
3672 pos = distance.QuadPart;
3673 break;
3674 case FILE_CURRENT:
3675 if (NtQueryInformationFile( file, &io, &info, sizeof(info), FilePositionInformation ))
3676 goto error;
3677 pos = info.CurrentByteOffset.QuadPart + distance.QuadPart;
3678 break;
3679 case FILE_END:
3680 if (NtQueryInformationFile( file, &io, &eof, sizeof(eof), FileStandardInformation ))
3681 goto error;
3682 pos = eof.EndOfFile.QuadPart + distance.QuadPart;
3683 break;
3684 default:
3685 SetLastError( ERROR_INVALID_PARAMETER );
3686 return FALSE;
3687 }
3688
3689 if (pos < 0)
3690 {
3691 SetLastError( ERROR_NEGATIVE_SEEK );
3692 return FALSE;
3693 }
3694
3695 info.CurrentByteOffset.QuadPart = pos;
3696 if (!NtSetInformationFile( file, &io, &info, sizeof(info), FilePositionInformation ))
3697 {
3698 if (newpos) newpos->QuadPart = pos;
3699 return TRUE;
3700 }
3701
3702 error:
3703 return set_ntstatus( io.Status );
3704 }
3705
3706
3707 /***********************************************************************
3708 * SetFileTime (kernelbase.@)
3709 */
3710 BOOL WINAPI DECLSPEC_HOTPATCH SetFileTime( HANDLE file, const FILETIME *ctime,
3711 const FILETIME *atime, const FILETIME *mtime )
3712 {
3713 FILE_BASIC_INFORMATION info;
3714 IO_STATUS_BLOCK io;
3715
3716 memset( &info, 0, sizeof(info) );
3717 if (ctime)
3718 {
3719 info.CreationTime.u.HighPart = ctime->dwHighDateTime;
3720 info.CreationTime.u.LowPart = ctime->dwLowDateTime;
3721 }
3722 if (atime)
3723 {
3724 info.LastAccessTime.u.HighPart = atime->dwHighDateTime;
3725 info.LastAccessTime.u.LowPart = atime->dwLowDateTime;
3726 }
3727 if (mtime)
3728 {
3729 info.LastWriteTime.u.HighPart = mtime->dwHighDateTime;
3730 info.LastWriteTime.u.LowPart = mtime->dwLowDateTime;
3731 }
3732
3733 return set_ntstatus( NtSetInformationFile( file, &io, &info, sizeof(info), FileBasicInformation ));
3734 }
3735
3736
3737 /***********************************************************************
3738 * SetFileValidData (kernelbase.@)
3739 */
3740 BOOL WINAPI DECLSPEC_HOTPATCH SetFileValidData( HANDLE file, LONGLONG length )
3741 {
3742 FILE_VALID_DATA_LENGTH_INFORMATION info;
3743 IO_STATUS_BLOCK io;
3744
3745 info.ValidDataLength.QuadPart = length;
3746 return set_ntstatus( NtSetInformationFile( file, &io, &info, sizeof(info),
3747 FileValidDataLengthInformation ));
3748 }
3749
3750
3751 /**************************************************************************
3752 * UnlockFile (kernelbase.@)
3753 */
3754 BOOL WINAPI DECLSPEC_HOTPATCH UnlockFile( HANDLE file, DWORD offset_low, DWORD offset_high,
3755 DWORD count_low, DWORD count_high )
3756 {
3757 LARGE_INTEGER count, offset;
3758
3759 count.u.LowPart = count_low;
3760 count.u.HighPart = count_high;
3761 offset.u.LowPart = offset_low;
3762 offset.u.HighPart = offset_high;
3763 return set_ntstatus( NtUnlockFile( file, NULL, &offset, &count, NULL ));
3764 }
3765
3766
3767 /**************************************************************************
3768 * UnlockFileEx (kernelbase.@)
3769 */
3770 BOOL WINAPI DECLSPEC_HOTPATCH UnlockFileEx( HANDLE file, DWORD reserved,
3771 DWORD count_low, DWORD count_high, LPOVERLAPPED overlapped )
3772 {
3773 if (reserved)
3774 {
3775 SetLastError( ERROR_INVALID_PARAMETER );
3776 return FALSE;
3777 }
3778 if (overlapped->hEvent) FIXME("Unimplemented overlapped operation\n");
3779
3780 return UnlockFile( file, overlapped->Offset, overlapped->OffsetHigh, count_low, count_high );
3781 }
3782
3783
3784 /***********************************************************************
3785 * WriteFile (kernelbase.@)
3786 */
3787 BOOL WINAPI DECLSPEC_HOTPATCH WriteFile( HANDLE file, LPCVOID buffer, DWORD count,
3788 LPDWORD result, LPOVERLAPPED overlapped )
3789 {
3790 HANDLE event = NULL;
3791 LARGE_INTEGER offset;
3792 PLARGE_INTEGER poffset = NULL;
3793 NTSTATUS status;
3794 IO_STATUS_BLOCK iosb;
3795 PIO_STATUS_BLOCK piosb = &iosb;
3796 LPVOID cvalue = NULL;
3797
3798 TRACE( "%p %p %ld %p %p\n", file, buffer, count, result, overlapped );
3799
3800 if (overlapped)
3801 {
3802 offset.u.LowPart = overlapped->Offset;
3803 offset.u.HighPart = overlapped->OffsetHigh;
3804 poffset = &offset;
3805 event = overlapped->hEvent;
3806 piosb = (PIO_STATUS_BLOCK)overlapped;
3807 if (((ULONG_PTR)event & 1) == 0) cvalue = overlapped;
3808 }
3809 else piosb->Information = 0;
3810 piosb->Status = STATUS_PENDING;
3811
3812 status = NtWriteFile( file, event, NULL, cvalue, piosb, buffer, count, poffset, NULL );
3813
3814 if (status == STATUS_PENDING && !overlapped)
3815 {
3816 WaitForSingleObject( file, INFINITE );
3817 status = piosb->Status;
3818 }
3819
3820 if (result) *result = overlapped && status ? 0 : piosb->Information;
3821
3822 if (status && status != STATUS_TIMEOUT)
3823 {
3824 SetLastError( RtlNtStatusToDosError(status) );
3825 return FALSE;
3826 }
3827 return TRUE;
3828 }
3829
3830
3831 /***********************************************************************
3832 * WriteFileEx (kernelbase.@)
3833 */
3834 BOOL WINAPI DECLSPEC_HOTPATCH WriteFileEx( HANDLE file, LPCVOID buffer,
3835 DWORD count, LPOVERLAPPED overlapped,
3836 LPOVERLAPPED_COMPLETION_ROUTINE completion )
3837 {
3838 LARGE_INTEGER offset;
3839 NTSTATUS status;
3840 PIO_STATUS_BLOCK io;
3841
3842 TRACE( "%p %p %ld %p %p\n", file, buffer, count, overlapped, completion );
3843
3844 if (!overlapped)
3845 {
3846 SetLastError( ERROR_INVALID_PARAMETER );
3847 return FALSE;
3848 }
3849 offset.u.LowPart = overlapped->Offset;
3850 offset.u.HighPart = overlapped->OffsetHigh;
3851
3852 io = (PIO_STATUS_BLOCK)overlapped;
3853 io->Status = STATUS_PENDING;
3854 io->Information = 0;
3855
3856 status = NtWriteFile( file, NULL, read_write_apc, completion, io, buffer, count, &offset, NULL );
3857 if (status == STATUS_PENDING) return TRUE;
3858 return set_ntstatus( status );
3859 }
3860
3861
3862 /***********************************************************************
3863 * WriteFileGather (kernelbase.@)
3864 */
3865 BOOL WINAPI DECLSPEC_HOTPATCH WriteFileGather( HANDLE file, FILE_SEGMENT_ELEMENT *segments, DWORD count,
3866 LPDWORD reserved, LPOVERLAPPED overlapped )
3867 {
3868 PIO_STATUS_BLOCK io;
3869 LARGE_INTEGER offset;
3870 void *cvalue = NULL;
3871
3872 TRACE( "%p %p %lu %p\n", file, segments, count, overlapped );
3873
3874 offset.u.LowPart = overlapped->Offset;
3875 offset.u.HighPart = overlapped->OffsetHigh;
3876 if (!((ULONG_PTR)overlapped->hEvent & 1)) cvalue = overlapped;
3877 io = (PIO_STATUS_BLOCK)overlapped;
3878 io->Status = STATUS_PENDING;
3879 io->Information = 0;
3880
3881 return set_ntstatus( NtWriteFileGather( file, overlapped->hEvent, NULL, cvalue,
3882 io, segments, count, &offset, NULL ));
3883 }
3884
3885
3886 /***********************************************************************
3887 * Operations on file times
3888 ***********************************************************************/
3889
3890
3891 /*********************************************************************
3892 * CompareFileTime (kernelbase.@)
3893 */
3894 INT WINAPI DECLSPEC_HOTPATCH CompareFileTime( const FILETIME *x, const FILETIME *y )
3895 {
3896 if (!x || !y) return -1;
3897 if (x->dwHighDateTime > y->dwHighDateTime) return 1;
3898 if (x->dwHighDateTime < y->dwHighDateTime) return -1;
3899 if (x->dwLowDateTime > y->dwLowDateTime) return 1;
3900 if (x->dwLowDateTime < y->dwLowDateTime) return -1;
3901 return 0;
3902 }
3903
3904
3905 /*********************************************************************
3906 * FileTimeToLocalFileTime (kernelbase.@)
3907 */
3908 BOOL WINAPI DECLSPEC_HOTPATCH FileTimeToLocalFileTime( const FILETIME *utc, FILETIME *local )
3909 {
3910 return set_ntstatus( RtlSystemTimeToLocalTime( (const LARGE_INTEGER *)utc, (LARGE_INTEGER *)local ));
3911 }
3912
3913
3914 /*********************************************************************
3915 * FileTimeToSystemTime (kernelbase.@)
3916 */
3917 BOOL WINAPI DECLSPEC_HOTPATCH FileTimeToSystemTime( const FILETIME *ft, SYSTEMTIME *systime )
3918 {
3919 TIME_FIELDS tf;
3920 const LARGE_INTEGER *li = (const LARGE_INTEGER *)ft;
3921
3922 if (li->QuadPart < 0)
3923 {
3924 SetLastError( ERROR_INVALID_PARAMETER );
3925 return FALSE;
3926 }
3927 RtlTimeToTimeFields( li, &tf );
3928 systime->wYear = tf.Year;
3929 systime->wMonth = tf.Month;
3930 systime->wDay = tf.Day;
3931 systime->wHour = tf.Hour;
3932 systime->wMinute = tf.Minute;
3933 systime->wSecond = tf.Second;
3934 systime->wMilliseconds = tf.Milliseconds;
3935 systime->wDayOfWeek = tf.Weekday;
3936 return TRUE;
3937 }
3938
3939
3940 /*********************************************************************
3941 * GetLocalTime (kernelbase.@)
3942 */
3943 void WINAPI DECLSPEC_HOTPATCH GetLocalTime( SYSTEMTIME *systime )
3944 {
3945 LARGE_INTEGER ft, ft2;
3946
3947 NtQuerySystemTime( &ft );
3948 RtlSystemTimeToLocalTime( &ft, &ft2 );
3949 FileTimeToSystemTime( (FILETIME *)&ft2, systime );
3950 }
3951
3952
3953 /*********************************************************************
3954 * GetSystemTime (kernelbase.@)
3955 */
3956 void WINAPI DECLSPEC_HOTPATCH GetSystemTime( SYSTEMTIME *systime )
3957 {
3958 LARGE_INTEGER ft;
3959
3960 NtQuerySystemTime( &ft );
3961 FileTimeToSystemTime( (FILETIME *)&ft, systime );
3962 }
3963
3964
3965 /***********************************************************************
3966 * GetSystemTimeAdjustment (kernelbase.@)
3967 */
3968 BOOL WINAPI DECLSPEC_HOTPATCH GetSystemTimeAdjustment( DWORD *adjust, DWORD *increment, BOOL *disabled )
3969 {
3970 SYSTEM_TIME_ADJUSTMENT_QUERY st;
3971 ULONG len;
3972
3973 if (!set_ntstatus( NtQuerySystemInformation( SystemTimeAdjustmentInformation, &st, sizeof(st), &len )))
3974 return FALSE;
3975 *adjust = st.TimeAdjustment;
3976 *increment = st.TimeIncrement;
3977 *disabled = st.TimeAdjustmentDisabled;
3978 return TRUE;
3979 }
3980
3981
3982 /***********************************************************************
3983 * GetSystemTimeAsFileTime (kernelbase.@)
3984 */
3985 void WINAPI DECLSPEC_HOTPATCH GetSystemTimeAsFileTime( FILETIME *time )
3986 {
3987 NtQuerySystemTime( (LARGE_INTEGER *)time );
3988 }
3989
3990
3991 /***********************************************************************
3992 * GetSystemTimePreciseAsFileTime (kernelbase.@)
3993 */
3994 void WINAPI DECLSPEC_HOTPATCH GetSystemTimePreciseAsFileTime( FILETIME *time )
3995 {
3996 LARGE_INTEGER t;
3997
3998 t.QuadPart = RtlGetSystemTimePrecise();
3999 time->dwLowDateTime = t.u.LowPart;
4000 time->dwHighDateTime = t.u.HighPart;
4001 }
4002
4003
4004 /*********************************************************************
4005 * LocalFileTimeToFileTime (kernelbase.@)
4006 */
4007 BOOL WINAPI DECLSPEC_HOTPATCH LocalFileTimeToFileTime( const FILETIME *local, FILETIME *utc )
4008 {
4009 return set_ntstatus( RtlLocalTimeToSystemTime( (const LARGE_INTEGER *)local, (LARGE_INTEGER *)utc ));
4010 }
4011
4012
4013 /***********************************************************************
4014 * SetLocalTime (kernelbase.@)
4015 */
4016 BOOL WINAPI DECLSPEC_HOTPATCH SetLocalTime( const SYSTEMTIME *systime )
4017 {
4018 FILETIME ft;
4019 LARGE_INTEGER st;
4020
4021 if (!SystemTimeToFileTime( systime, &ft )) return FALSE;
4022 RtlLocalTimeToSystemTime( (LARGE_INTEGER *)&ft, &st );
4023 return set_ntstatus( NtSetSystemTime( &st, NULL ));
4024 }
4025
4026
4027 /***********************************************************************
4028 * SetSystemTime (kernelbase.@)
4029 */
4030 BOOL WINAPI DECLSPEC_HOTPATCH SetSystemTime( const SYSTEMTIME *systime )
4031 {
4032 FILETIME ft;
4033
4034 if (!SystemTimeToFileTime( systime, &ft )) return FALSE;
4035 return set_ntstatus( NtSetSystemTime( (LARGE_INTEGER *)&ft, NULL ));
4036 }
4037
4038
4039 /***********************************************************************
4040 * SetSystemTimeAdjustment (kernelbase.@)
4041 */
4042 BOOL WINAPI DECLSPEC_HOTPATCH SetSystemTimeAdjustment( DWORD adjust, BOOL disabled )
4043 {
4044 SYSTEM_TIME_ADJUSTMENT st;
4045
4046 st.TimeAdjustment = adjust;
4047 st.TimeAdjustmentDisabled = disabled;
4048 return set_ntstatus( NtSetSystemInformation( SystemTimeAdjustmentInformation, &st, sizeof(st) ));
4049 }
4050
4051
4052 /*********************************************************************
4053 * SystemTimeToFileTime (kernelbase.@)
4054 */
4055 BOOL WINAPI DECLSPEC_HOTPATCH SystemTimeToFileTime( const SYSTEMTIME *systime, FILETIME *ft )
4056 {
4057 TIME_FIELDS tf;
4058
4059 tf.Year = systime->wYear;
4060 tf.Month = systime->wMonth;
4061 tf.Day = systime->wDay;
4062 tf.Hour = systime->wHour;
4063 tf.Minute = systime->wMinute;
4064 tf.Second = systime->wSecond;
4065 tf.Milliseconds = systime->wMilliseconds;
4066 if (RtlTimeFieldsToTime( &tf, (LARGE_INTEGER *)ft )) return TRUE;
4067 SetLastError( ERROR_INVALID_PARAMETER );
4068 return FALSE;
4069 }
4070
4071
4072 /***********************************************************************
4073 * I/O controls
4074 ***********************************************************************/
4075
4076
4077 static void dump_dcb( const DCB *dcb )
4078 {
4079 TRACE( "size=%d rate=%ld fParity=%d Parity=%d stopbits=%d %sIXON %sIXOFF CTS=%d RTS=%d DSR=%d DTR=%d %sCRTSCTS\n",
4080 dcb->ByteSize, dcb->BaudRate, dcb->fParity, dcb->Parity,
4081 (dcb->StopBits == ONESTOPBIT) ? 1 : (dcb->StopBits == TWOSTOPBITS) ? 2 : 0,
4082 dcb->fOutX ? "" : "~", dcb->fInX ? "" : "~",
4083 dcb->fOutxCtsFlow, dcb->fRtsControl, dcb->fOutxDsrFlow, dcb->fDtrControl,
4084 (dcb->fOutxCtsFlow || dcb->fRtsControl == RTS_CONTROL_HANDSHAKE) ? "" : "~" );
4085 }
4086
4087 /*****************************************************************************
4088 * ClearCommBreak (kernelbase.@)
4089 */
4090 BOOL WINAPI DECLSPEC_HOTPATCH ClearCommBreak( HANDLE handle )
4091 {
4092 return EscapeCommFunction( handle, CLRBREAK );
4093 }
4094
4095
4096 /*****************************************************************************
4097 * ClearCommError (kernelbase.@)
4098 */
4099 BOOL WINAPI DECLSPEC_HOTPATCH ClearCommError( HANDLE handle, DWORD *errors, COMSTAT *stat )
4100 {
4101 SERIAL_STATUS ss;
4102
4103 if (!DeviceIoControl( handle, IOCTL_SERIAL_GET_COMMSTATUS, NULL, 0, &ss, sizeof(ss), NULL, NULL ))
4104 return FALSE;
4105
4106 TRACE( "status %#lx,%#lx, in %lu, out %lu, eof %d, wait %d\n", ss.Errors, ss.HoldReasons,
4107 ss.AmountInInQueue, ss.AmountInOutQueue, ss.EofReceived, ss.WaitForImmediate );
4108
4109 if (errors)
4110 {
4111 *errors = 0;
4112 if (ss.Errors & SERIAL_ERROR_BREAK) *errors |= CE_BREAK;
4113 if (ss.Errors & SERIAL_ERROR_FRAMING) *errors |= CE_FRAME;
4114 if (ss.Errors & SERIAL_ERROR_OVERRUN) *errors |= CE_OVERRUN;
4115 if (ss.Errors & SERIAL_ERROR_QUEUEOVERRUN) *errors |= CE_RXOVER;
4116 if (ss.Errors & SERIAL_ERROR_PARITY) *errors |= CE_RXPARITY;
4117 }
4118 if (stat)
4119 {
4120 stat->fCtsHold = !!(ss.HoldReasons & SERIAL_TX_WAITING_FOR_CTS);
4121 stat->fDsrHold = !!(ss.HoldReasons & SERIAL_TX_WAITING_FOR_DSR);
4122 stat->fRlsdHold = !!(ss.HoldReasons & SERIAL_TX_WAITING_FOR_DCD);
4123 stat->fXoffHold = !!(ss.HoldReasons & SERIAL_TX_WAITING_FOR_XON);
4124 stat->fXoffSent = !!(ss.HoldReasons & SERIAL_TX_WAITING_XOFF_SENT);
4125 stat->fEof = !!ss.EofReceived;
4126 stat->fTxim = !!ss.WaitForImmediate;
4127 stat->cbInQue = ss.AmountInInQueue;
4128 stat->cbOutQue = ss.AmountInOutQueue;
4129 }
4130 return TRUE;
4131 }
4132
4133
4134 /****************************************************************************
4135 * DeviceIoControl (kernelbase.@)
4136 */
4137 BOOL WINAPI DECLSPEC_HOTPATCH DeviceIoControl( HANDLE handle, DWORD code, void *in_buff, DWORD in_count,
4138 void *out_buff, DWORD out_count, DWORD *returned,
4139 OVERLAPPED *overlapped )
4140 {
4141 IO_STATUS_BLOCK iosb, *piosb = &iosb;
4142 void *cvalue = NULL;
4143 HANDLE event = 0;
4144 NTSTATUS status;
4145
4146 TRACE( "(%p,%lx,%p,%ld,%p,%ld,%p,%p)\n",
4147 handle, code, in_buff, in_count, out_buff, out_count, returned, overlapped );
4148
4149 if (overlapped)
4150 {
4151 piosb = (IO_STATUS_BLOCK *)overlapped;
4152 if (!((ULONG_PTR)overlapped->hEvent & 1)) cvalue = overlapped;
4153 event = overlapped->hEvent;
4154 overlapped->Internal = STATUS_PENDING;
4155 overlapped->InternalHigh = 0;
4156 }
4157
4158 if (HIWORD(code) == FILE_DEVICE_FILE_SYSTEM)
4159 status = NtFsControlFile( handle, event, NULL, cvalue, piosb, code,
4160 in_buff, in_count, out_buff, out_count );
4161 else
4162 status = NtDeviceIoControlFile( handle, event, NULL, cvalue, piosb, code,
4163 in_buff, in_count, out_buff, out_count );
4164
4165 if (returned && !NT_ERROR(status)) *returned = piosb->Information;
4166 if (status == STATUS_PENDING || !NT_SUCCESS( status )) return set_ntstatus( status );
4167 return TRUE;
4168 }
4169
4170
4171 /*****************************************************************************
4172 * EscapeCommFunction (kernelbase.@)
4173 */
4174 BOOL WINAPI DECLSPEC_HOTPATCH EscapeCommFunction( HANDLE handle, DWORD func )
4175 {
4176 static const DWORD ioctls[] =
4177 {
4178 0,
4179 IOCTL_SERIAL_SET_XOFF, /* SETXOFF */
4180 IOCTL_SERIAL_SET_XON, /* SETXON */
4181 IOCTL_SERIAL_SET_RTS, /* SETRTS */
4182 IOCTL_SERIAL_CLR_RTS, /* CLRRTS */
4183 IOCTL_SERIAL_SET_DTR, /* SETDTR */
4184 IOCTL_SERIAL_CLR_DTR, /* CLRDTR */
4185 IOCTL_SERIAL_RESET_DEVICE, /* RESETDEV */
4186 IOCTL_SERIAL_SET_BREAK_ON, /* SETBREAK */
4187 IOCTL_SERIAL_SET_BREAK_OFF /* CLRBREAK */
4188 };
4189
4190 if (func >= ARRAY_SIZE(ioctls) || !ioctls[func])
4191 {
4192 SetLastError( ERROR_INVALID_PARAMETER );
4193 return FALSE;
4194 }
4195 return DeviceIoControl( handle, ioctls[func], NULL, 0, NULL, 0, NULL, NULL );
4196 }
4197
4198
4199 /***********************************************************************
4200 * GetCommConfig (kernelbase.@)
4201 */
4202 BOOL WINAPI DECLSPEC_HOTPATCH GetCommConfig( HANDLE handle, COMMCONFIG *config, DWORD *size )
4203 {
4204 if (!config) return FALSE;
4205
4206 TRACE( "(%p, %p, %p %lu)\n", handle, config, size, *size );
4207
4208 if (*size < sizeof(COMMCONFIG))
4209 {
4210 *size = sizeof(COMMCONFIG);
4211 return FALSE;
4212 }
4213 *size = sizeof(COMMCONFIG);
4214 config->dwSize = sizeof(COMMCONFIG);
4215 config->wVersion = 1;
4216 config->wReserved = 0;
4217 config->dwProviderSubType = PST_RS232;
4218 config->dwProviderOffset = 0;
4219 config->dwProviderSize = 0;
4220 return GetCommState( handle, &config->dcb );
4221 }
4222
4223
4224 /*****************************************************************************
4225 * GetCommMask (kernelbase.@)
4226 */
4227 BOOL WINAPI DECLSPEC_HOTPATCH GetCommMask( HANDLE handle, DWORD *mask )
4228 {
4229 return DeviceIoControl( handle, IOCTL_SERIAL_GET_WAIT_MASK, NULL, 0, mask, sizeof(*mask),
4230 NULL, NULL );
4231 }
4232
4233
4234 /***********************************************************************
4235 * GetCommModemStatus (kernelbase.@)
4236 */
4237 BOOL WINAPI DECLSPEC_HOTPATCH GetCommModemStatus( HANDLE handle, DWORD *status )
4238 {
4239 return DeviceIoControl( handle, IOCTL_SERIAL_GET_MODEMSTATUS, NULL, 0, status, sizeof(*status),
4240 NULL, NULL );
4241 }
4242
4243
4244 /***********************************************************************
4245 * GetCommProperties (kernelbase.@)
4246 */
4247 BOOL WINAPI DECLSPEC_HOTPATCH GetCommProperties( HANDLE handle, COMMPROP *prop )
4248 {
4249 return DeviceIoControl( handle, IOCTL_SERIAL_GET_PROPERTIES, NULL, 0, prop, sizeof(*prop), NULL, NULL );
4250 }
4251
4252
4253 /*****************************************************************************
4254 * GetCommState (kernelbase.@)
4255 */
4256 BOOL WINAPI DECLSPEC_HOTPATCH GetCommState( HANDLE handle, DCB *dcb )
4257 {
4258 SERIAL_BAUD_RATE sbr;
4259 SERIAL_LINE_CONTROL slc;
4260 SERIAL_HANDFLOW shf;
4261 SERIAL_CHARS sc;
4262
4263 if (!dcb)
4264 {
4265 SetLastError( ERROR_INVALID_PARAMETER );
4266 return FALSE;
4267 }
4268 if (!DeviceIoControl(handle, IOCTL_SERIAL_GET_BAUD_RATE, NULL, 0, &sbr, sizeof(sbr), NULL, NULL) ||
4269 !DeviceIoControl(handle, IOCTL_SERIAL_GET_LINE_CONTROL, NULL, 0, &slc, sizeof(slc), NULL, NULL) ||
4270 !DeviceIoControl(handle, IOCTL_SERIAL_GET_HANDFLOW, NULL, 0, &shf, sizeof(shf), NULL, NULL) ||
4271 !DeviceIoControl(handle, IOCTL_SERIAL_GET_CHARS, NULL, 0, &sc, sizeof(sc), NULL, NULL))
4272 return FALSE;
4273
4274 dcb->DCBlength = sizeof(*dcb);
4275 dcb->BaudRate = sbr.BaudRate;
4276 /* yes, they seem no never be (re)set on NT */
4277 dcb->fBinary = 1;
4278 dcb->fParity = 0;
4279 dcb->fOutxCtsFlow = !!(shf.ControlHandShake & SERIAL_CTS_HANDSHAKE);
4280 dcb->fOutxDsrFlow = !!(shf.ControlHandShake & SERIAL_DSR_HANDSHAKE);
4281 dcb->fDsrSensitivity = !!(shf.ControlHandShake & SERIAL_DSR_SENSITIVITY);
4282 dcb->fTXContinueOnXoff = !!(shf.FlowReplace & SERIAL_XOFF_CONTINUE);
4283 dcb->fOutX = !!(shf.FlowReplace & SERIAL_AUTO_TRANSMIT);
4284 dcb->fInX = !!(shf.FlowReplace & SERIAL_AUTO_RECEIVE);
4285 dcb->fErrorChar = !!(shf.FlowReplace & SERIAL_ERROR_CHAR);
4286 dcb->fNull = !!(shf.FlowReplace & SERIAL_NULL_STRIPPING);
4287 dcb->fAbortOnError = !!(shf.ControlHandShake & SERIAL_ERROR_ABORT);
4288 dcb->XonLim = shf.XonLimit;
4289 dcb->XoffLim = shf.XoffLimit;
4290 dcb->ByteSize = slc.WordLength;
4291 dcb->Parity = slc.Parity;
4292 dcb->StopBits = slc.StopBits;
4293 dcb->XonChar = sc.XonChar;
4294 dcb->XoffChar = sc.XoffChar;
4295 dcb->ErrorChar = sc.ErrorChar;
4296 dcb->EofChar = sc.EofChar;
4297 dcb->EvtChar = sc.EventChar;
4298
4299 switch (shf.ControlHandShake & (SERIAL_DTR_CONTROL | SERIAL_DTR_HANDSHAKE))
4300 {
4301 case SERIAL_DTR_CONTROL: dcb->fDtrControl = DTR_CONTROL_ENABLE; break;
4302 case SERIAL_DTR_HANDSHAKE: dcb->fDtrControl = DTR_CONTROL_HANDSHAKE; break;
4303 default: dcb->fDtrControl = DTR_CONTROL_DISABLE; break;
4304 }
4305 switch (shf.FlowReplace & (SERIAL_RTS_CONTROL | SERIAL_RTS_HANDSHAKE))
4306 {
4307 case SERIAL_RTS_CONTROL: dcb->fRtsControl = RTS_CONTROL_ENABLE; break;
4308 case SERIAL_RTS_HANDSHAKE: dcb->fRtsControl = RTS_CONTROL_HANDSHAKE; break;
4309 case SERIAL_RTS_CONTROL | SERIAL_RTS_HANDSHAKE:
4310 dcb->fRtsControl = RTS_CONTROL_TOGGLE; break;
4311 default: dcb->fRtsControl = RTS_CONTROL_DISABLE; break;
4312 }
4313 dump_dcb( dcb );
4314 return TRUE;
4315 }
4316
4317
4318 /*****************************************************************************
4319 * GetCommTimeouts (kernelbase.@)
4320 */
4321 BOOL WINAPI DECLSPEC_HOTPATCH GetCommTimeouts( HANDLE handle, COMMTIMEOUTS *timeouts )
4322 {
4323 if (!timeouts)
4324 {
4325 SetLastError( ERROR_INVALID_PARAMETER );
4326 return FALSE;
4327 }
4328 return DeviceIoControl( handle, IOCTL_SERIAL_GET_TIMEOUTS, NULL, 0, timeouts, sizeof(*timeouts),
4329 NULL, NULL );
4330 }
4331
4332 /********************************************************************
4333 * PurgeComm (kernelbase.@)
4334 */
4335 BOOL WINAPI DECLSPEC_HOTPATCH PurgeComm(HANDLE handle, DWORD flags)
4336 {
4337 return DeviceIoControl( handle, IOCTL_SERIAL_PURGE, &flags, sizeof(flags),
4338 NULL, 0, NULL, NULL );
4339 }
4340
4341
4342 /*****************************************************************************
4343 * SetCommBreak (kernelbase.@)
4344 */
4345 BOOL WINAPI DECLSPEC_HOTPATCH SetCommBreak( HANDLE handle )
4346 {
4347 return EscapeCommFunction( handle, SETBREAK );
4348 }
4349
4350
4351 /***********************************************************************
4352 * SetCommConfig (kernelbase.@)
4353 */
4354 BOOL WINAPI DECLSPEC_HOTPATCH SetCommConfig( HANDLE handle, COMMCONFIG *config, DWORD size )
4355 {
4356 TRACE( "(%p, %p, %lu)\n", handle, config, size );
4357 return SetCommState( handle, &config->dcb );
4358 }
4359
4360
4361 /*****************************************************************************
4362 * SetCommMask (kernelbase.@)
4363 */
4364 BOOL WINAPI DECLSPEC_HOTPATCH SetCommMask( HANDLE handle, DWORD mask )
4365 {
4366 return DeviceIoControl( handle, IOCTL_SERIAL_SET_WAIT_MASK, &mask, sizeof(mask),
4367 NULL, 0, NULL, NULL );
4368 }
4369
4370
4371 /*****************************************************************************
4372 * SetCommState (kernelbase.@)
4373 */
4374 BOOL WINAPI DECLSPEC_HOTPATCH SetCommState( HANDLE handle, DCB *dcb )
4375 {
4376 SERIAL_BAUD_RATE sbr;
4377 SERIAL_LINE_CONTROL slc;
4378 SERIAL_HANDFLOW shf;
4379 SERIAL_CHARS sc;
4380
4381 if (!dcb)
4382 {
4383 SetLastError( ERROR_INVALID_PARAMETER );
4384 return FALSE;
4385 }
4386 dump_dcb( dcb );
4387
4388 sbr.BaudRate = dcb->BaudRate;
4389 slc.StopBits = dcb->StopBits;
4390 slc.Parity = dcb->Parity;
4391 slc.WordLength = dcb->ByteSize;
4392 shf.ControlHandShake = 0;
4393 shf.FlowReplace = 0;
4394 if (dcb->fOutxCtsFlow) shf.ControlHandShake |= SERIAL_CTS_HANDSHAKE;
4395 if (dcb->fOutxDsrFlow) shf.ControlHandShake |= SERIAL_DSR_HANDSHAKE;
4396 switch (dcb->fDtrControl)
4397 {
4398 case DTR_CONTROL_DISABLE: break;
4399 case DTR_CONTROL_ENABLE: shf.ControlHandShake |= SERIAL_DTR_CONTROL; break;
4400 case DTR_CONTROL_HANDSHAKE: shf.ControlHandShake |= SERIAL_DTR_HANDSHAKE; break;
4401 default:
4402 SetLastError( ERROR_INVALID_PARAMETER );
4403 return FALSE;
4404 }
4405 switch (dcb->fRtsControl)
4406 {
4407 case RTS_CONTROL_DISABLE: break;
4408 case RTS_CONTROL_ENABLE: shf.FlowReplace |= SERIAL_RTS_CONTROL; break;
4409 case RTS_CONTROL_HANDSHAKE: shf.FlowReplace |= SERIAL_RTS_HANDSHAKE; break;
4410 case RTS_CONTROL_TOGGLE: shf.FlowReplace |= SERIAL_RTS_CONTROL | SERIAL_RTS_HANDSHAKE; break;
4411 default:
4412 SetLastError( ERROR_INVALID_PARAMETER );
4413 return FALSE;
4414 }
4415 if (dcb->fDsrSensitivity) shf.ControlHandShake |= SERIAL_DSR_SENSITIVITY;
4416 if (dcb->fAbortOnError) shf.ControlHandShake |= SERIAL_ERROR_ABORT;
4417 if (dcb->fErrorChar) shf.FlowReplace |= SERIAL_ERROR_CHAR;
4418 if (dcb->fNull) shf.FlowReplace |= SERIAL_NULL_STRIPPING;
4419 if (dcb->fTXContinueOnXoff) shf.FlowReplace |= SERIAL_XOFF_CONTINUE;
4420 if (dcb->fOutX) shf.FlowReplace |= SERIAL_AUTO_TRANSMIT;
4421 if (dcb->fInX) shf.FlowReplace |= SERIAL_AUTO_RECEIVE;
4422 shf.XonLimit = dcb->XonLim;
4423 shf.XoffLimit = dcb->XoffLim;
4424 sc.EofChar = dcb->EofChar;
4425 sc.ErrorChar = dcb->ErrorChar;
4426 sc.BreakChar = 0;
4427 sc.EventChar = dcb->EvtChar;
4428 sc.XonChar = dcb->XonChar;
4429 sc.XoffChar = dcb->XoffChar;
4430
4431 /* note: change DTR/RTS lines after setting the comm attributes,
4432 * so flow control does not interfere.
4433 */
4434 return (DeviceIoControl( handle, IOCTL_SERIAL_SET_BAUD_RATE, &sbr, sizeof(sbr), NULL, 0, NULL, NULL ) &&
4435 DeviceIoControl( handle, IOCTL_SERIAL_SET_LINE_CONTROL, &slc, sizeof(slc), NULL, 0, NULL, NULL ) &&
4436 DeviceIoControl( handle, IOCTL_SERIAL_SET_HANDFLOW, &shf, sizeof(shf), NULL, 0, NULL, NULL ) &&
4437 DeviceIoControl( handle, IOCTL_SERIAL_SET_CHARS, &sc, sizeof(sc), NULL, 0, NULL, NULL ));
4438 }
4439
4440
4441 /*****************************************************************************
4442 * SetCommTimeouts (kernelbase.@)
4443 */
4444 BOOL WINAPI DECLSPEC_HOTPATCH SetCommTimeouts( HANDLE handle, COMMTIMEOUTS *timeouts )
4445 {
4446 if (!timeouts)
4447 {
4448 SetLastError( ERROR_INVALID_PARAMETER );
4449 return FALSE;
4450 }
4451 return DeviceIoControl( handle, IOCTL_SERIAL_SET_TIMEOUTS, timeouts, sizeof(*timeouts),
4452 NULL, 0, NULL, NULL );
4453 }
4454
4455
4456 /*****************************************************************************
4457 * SetupComm (kernelbase.@)
4458 */
4459 BOOL WINAPI DECLSPEC_HOTPATCH SetupComm( HANDLE handle, DWORD in_size, DWORD out_size )
4460 {
4461 SERIAL_QUEUE_SIZE sqs;
4462
4463 sqs.InSize = in_size;
4464 sqs.OutSize = out_size;
4465 return DeviceIoControl( handle, IOCTL_SERIAL_SET_QUEUE_SIZE, &sqs, sizeof(sqs), NULL, 0, NULL, NULL );
4466 }
4467
4468
4469 /*****************************************************************************
4470 * TransmitCommChar (kernelbase.@)
4471 */
4472 BOOL WINAPI DECLSPEC_HOTPATCH TransmitCommChar( HANDLE handle, CHAR ch )
4473 {
4474 return DeviceIoControl( handle, IOCTL_SERIAL_IMMEDIATE_CHAR, &ch, sizeof(ch), NULL, 0, NULL, NULL );
4475 }
4476
4477
4478 /***********************************************************************
4479 * WaitCommEvent (kernelbase.@)
4480 */
4481 BOOL WINAPI DECLSPEC_HOTPATCH WaitCommEvent( HANDLE handle, DWORD *events, OVERLAPPED *overlapped )
4482 {
4483 return DeviceIoControl( handle, IOCTL_SERIAL_WAIT_ON_MASK, NULL, 0, events, sizeof(*events),
4484 NULL, overlapped );
4485 }
Windows API implementation