?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
save old text color during a call of DrawCaptionTempW
[wine/kumbayo.git] / dlls / ntdll / file.c
blobb9a763f40ad0286309033585f332fb867a75f7a2
1 /*
2 * Copyright 1999, 2000 Juergen Schmied
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 #include "config.h"
20 #include "wine/port.h"
21
22 #include <stdlib.h>
23 #include <string.h>
24 #include <stdio.h>
25 #include <errno.h>
26 #include <assert.h>
27 #ifdef HAVE_UNISTD_H
28 # include <unistd.h>
29 #endif
30 #ifdef HAVE_SYS_ERRNO_H
31 #include <sys/errno.h>
32 #endif
33 #ifdef HAVE_LINUX_MAJOR_H
34 # include <linux/major.h>
35 #endif
36 #ifdef HAVE_SYS_STATVFS_H
37 # include <sys/statvfs.h>
38 #endif
39 #ifdef HAVE_SYS_PARAM_H
40 # include <sys/param.h>
41 #endif
42 #ifdef HAVE_SYS_TIME_H
43 # include <sys/time.h>
44 #endif
45 #ifdef HAVE_SYS_IOCTL_H
46 #include <sys/ioctl.h>
47 #endif
48 #ifdef HAVE_POLL_H
49 #include <poll.h>
50 #endif
51 #ifdef HAVE_SYS_POLL_H
52 #include <sys/poll.h>
53 #endif
54 #ifdef HAVE_SYS_SOCKET_H
55 #include <sys/socket.h>
56 #endif
57 #ifdef HAVE_UTIME_H
58 # include <utime.h>
59 #endif
60 #ifdef HAVE_SYS_VFS_H
61 # include <sys/vfs.h>
62 #endif
63 #ifdef HAVE_SYS_MOUNT_H
64 # include <sys/mount.h>
65 #endif
66 #ifdef HAVE_SYS_STATFS_H
67 # include <sys/statfs.h>
68 #endif
69
70 #define NONAMELESSUNION
71 #define NONAMELESSSTRUCT
72 #include "ntstatus.h"
73 #define WIN32_NO_STATUS
74 #include "wine/unicode.h"
75 #include "wine/debug.h"
76 #include "thread.h"
77 #include "wine/server.h"
78 #include "ntdll_misc.h"
79
80 #include "winternl.h"
81 #include "winioctl.h"
82 #include "ddk/ntddser.h"
83
84 WINE_DEFAULT_DEBUG_CHANNEL(ntdll);
85
86 mode_t FILE_umask = 0;
87
88 #define SECSPERDAY 86400
89 #define SECS_1601_TO_1970 ((369 * 365 + 89) * (ULONGLONG)SECSPERDAY)
90
91 /**************************************************************************
92 * NtOpenFile [NTDLL.@]
93 * ZwOpenFile [NTDLL.@]
94 *
95 * Open a file.
96 *
97 * PARAMS
98 * handle [O] Variable that receives the file handle on return
99 * access [I] Access desired by the caller to the file
100 * attr [I] Structure describing the file to be opened
101 * io [O] Receives details about the result of the operation
102 * sharing [I] Type of shared access the caller requires
103 * options [I] Options for the file open
104 *
105 * RETURNS
106 * Success: 0. FileHandle and IoStatusBlock are updated.
107 * Failure: An NTSTATUS error code describing the error.
108 */
109 NTSTATUS WINAPI NtOpenFile( PHANDLE handle, ACCESS_MASK access,
110 POBJECT_ATTRIBUTES attr, PIO_STATUS_BLOCK io,
111 ULONG sharing, ULONG options )
112 {
113 return NtCreateFile( handle, access, attr, io, NULL, 0,
114 sharing, FILE_OPEN, options, NULL, 0 );
115 }
116
117 /**************************************************************************
118 * NtCreateFile [NTDLL.@]
119 * ZwCreateFile [NTDLL.@]
120 *
121 * Either create a new file or directory, or open an existing file, device,
122 * directory or volume.
123 *
124 * PARAMS
125 * handle [O] Points to a variable which receives the file handle on return
126 * access [I] Desired access to the file
127 * attr [I] Structure describing the file
128 * io [O] Receives information about the operation on return
129 * alloc_size [I] Initial size of the file in bytes
130 * attributes [I] Attributes to create the file with
131 * sharing [I] Type of shared access the caller would like to the file
132 * disposition [I] Specifies what to do, depending on whether the file already exists
133 * options [I] Options for creating a new file
134 * ea_buffer [I] Pointer to an extended attributes buffer
135 * ea_length [I] Length of ea_buffer
136 *
137 * RETURNS
138 * Success: 0. handle and io are updated.
139 * Failure: An NTSTATUS error code describing the error.
140 */
141 NTSTATUS WINAPI NtCreateFile( PHANDLE handle, ACCESS_MASK access, POBJECT_ATTRIBUTES attr,
142 PIO_STATUS_BLOCK io, PLARGE_INTEGER alloc_size,
143 ULONG attributes, ULONG sharing, ULONG disposition,
144 ULONG options, PVOID ea_buffer, ULONG ea_length )
145 {
146 ANSI_STRING unix_name;
147 int created = FALSE;
148
149 TRACE("handle=%p access=%08x name=%s objattr=%08x root=%p sec=%p io=%p alloc_size=%p\n"
150 "attr=%08x sharing=%08x disp=%d options=%08x ea=%p.0x%08x\n",
151 handle, access, debugstr_us(attr->ObjectName), attr->Attributes,
152 attr->RootDirectory, attr->SecurityDescriptor, io, alloc_size,
153 attributes, sharing, disposition, options, ea_buffer, ea_length );
154
155 if (!attr || !attr->ObjectName) return STATUS_INVALID_PARAMETER;
156
157 if (alloc_size) FIXME( "alloc_size not supported\n" );
158
159 if (attr->RootDirectory)
160 {
161 FIXME( "RootDirectory %p not supported\n", attr->RootDirectory );
162 return STATUS_OBJECT_NAME_NOT_FOUND;
163 }
164
165 io->u.Status = wine_nt_to_unix_file_name( attr->ObjectName, &unix_name, disposition,
166 !(attr->Attributes & OBJ_CASE_INSENSITIVE) );
167
168 if (io->u.Status == STATUS_BAD_DEVICE_TYPE)
169 {
170 SERVER_START_REQ( open_file_object )
171 {
172 req->access = access;
173 req->attributes = attr->Attributes;
174 req->rootdir = attr->RootDirectory;
175 req->sharing = sharing;
176 req->options = options;
177 wine_server_add_data( req, attr->ObjectName->Buffer, attr->ObjectName->Length );
178 io->u.Status = wine_server_call( req );
179 *handle = reply->handle;
180 }
181 SERVER_END_REQ;
182 return io->u.Status;
183 }
184
185 if (io->u.Status == STATUS_NO_SUCH_FILE &&
186 disposition != FILE_OPEN && disposition != FILE_OVERWRITE)
187 {
188 created = TRUE;
189 io->u.Status = STATUS_SUCCESS;
190 }
191
192 if (io->u.Status == STATUS_SUCCESS)
193 {
194 struct security_descriptor *sd = NULL;
195 struct object_attributes objattr;
196
197 objattr.rootdir = 0;
198 objattr.sd_len = 0;
199 objattr.name_len = 0;
200 if (attr)
201 {
202 io->u.Status = NTDLL_create_struct_sd( attr->SecurityDescriptor, &sd, &objattr.sd_len );
203 if (io->u.Status != STATUS_SUCCESS)
204 {
205 RtlFreeAnsiString( &unix_name );
206 return io->u.Status;
207 }
208 }
209
210 SERVER_START_REQ( create_file )
211 {
212 req->access = access;
213 req->attributes = attr->Attributes;
214 req->sharing = sharing;
215 req->create = disposition;
216 req->options = options;
217 req->attrs = attributes;
218 wine_server_add_data( req, &objattr, sizeof(objattr) );
219 if (objattr.sd_len) wine_server_add_data( req, sd, objattr.sd_len );
220 wine_server_add_data( req, unix_name.Buffer, unix_name.Length );
221 io->u.Status = wine_server_call( req );
222 *handle = reply->handle;
223 }
224 SERVER_END_REQ;
225 NTDLL_free_struct_sd( sd );
226 RtlFreeAnsiString( &unix_name );
227 }
228 else WARN("%s not found (%x)\n", debugstr_us(attr->ObjectName), io->u.Status );
229
230 if (io->u.Status == STATUS_SUCCESS)
231 {
232 if (created) io->Information = FILE_CREATED;
233 else switch(disposition)
234 {
235 case FILE_SUPERSEDE:
236 io->Information = FILE_SUPERSEDED;
237 break;
238 case FILE_CREATE:
239 io->Information = FILE_CREATED;
240 break;
241 case FILE_OPEN:
242 case FILE_OPEN_IF:
243 io->Information = FILE_OPENED;
244 break;
245 case FILE_OVERWRITE:
246 case FILE_OVERWRITE_IF:
247 io->Information = FILE_OVERWRITTEN;
248 break;
249 }
250 }
251
252 return io->u.Status;
253 }
254
255 /***********************************************************************
256 * Asynchronous file I/O *
257 */
258
259 struct async_fileio
260 {
261 HANDLE handle;
262 PIO_APC_ROUTINE apc;
263 void *apc_arg;
264 };
265
266 typedef struct
267 {
268 struct async_fileio io;
269 char* buffer;
270 unsigned int already;
271 unsigned int count;
272 BOOL avail_mode;
273 } async_fileio_read;
274
275 typedef struct
276 {
277 struct async_fileio io;
278 const char *buffer;
279 unsigned int already;
280 unsigned int count;
281 } async_fileio_write;
282
283
284 /* callback for file I/O user APC */
285 static void WINAPI fileio_apc( void *arg, IO_STATUS_BLOCK *io, ULONG reserved )
286 {
287 struct async_fileio *async = arg;
288 if (async->apc) async->apc( async->apc_arg, io, reserved );
289 RtlFreeHeap( GetProcessHeap(), 0, async );
290 }
291
292 /***********************************************************************
293 * FILE_GetNtStatus(void)
294 *
295 * Retrieve the Nt Status code from errno.
296 * Try to be consistent with FILE_SetDosError().
297 */
298 NTSTATUS FILE_GetNtStatus(void)
299 {
300 int err = errno;
301
302 TRACE( "errno = %d\n", errno );
303 switch (err)
304 {
305 case EAGAIN: return STATUS_SHARING_VIOLATION;
306 case EBADF: return STATUS_INVALID_HANDLE;
307 case EBUSY: return STATUS_DEVICE_BUSY;
308 case ENOSPC: return STATUS_DISK_FULL;
309 case EPERM:
310 case EROFS:
311 case EACCES: return STATUS_ACCESS_DENIED;
312 case ENOTDIR: return STATUS_OBJECT_PATH_NOT_FOUND;
313 case ENOENT: return STATUS_OBJECT_NAME_NOT_FOUND;
314 case EISDIR: return STATUS_FILE_IS_A_DIRECTORY;
315 case EMFILE:
316 case ENFILE: return STATUS_TOO_MANY_OPENED_FILES;
317 case EINVAL: return STATUS_INVALID_PARAMETER;
318 case ENOTEMPTY: return STATUS_DIRECTORY_NOT_EMPTY;
319 case EPIPE: return STATUS_PIPE_DISCONNECTED;
320 case EIO: return STATUS_DEVICE_NOT_READY;
321 #ifdef ENOMEDIUM
322 case ENOMEDIUM: return STATUS_NO_MEDIA_IN_DEVICE;
323 #endif
324 case ENXIO: return STATUS_NO_SUCH_DEVICE;
325 case ENOTTY:
326 case EOPNOTSUPP:return STATUS_NOT_SUPPORTED;
327 case ECONNRESET:return STATUS_PIPE_DISCONNECTED;
328 case EFAULT: return STATUS_ACCESS_VIOLATION;
329 case ESPIPE: return STATUS_ILLEGAL_FUNCTION;
330 case ENOEXEC: /* ?? */
331 case EEXIST: /* ?? */
332 default:
333 FIXME( "Converting errno %d to STATUS_UNSUCCESSFUL\n", err );
334 return STATUS_UNSUCCESSFUL;
335 }
336 }
337
338 /***********************************************************************
339 * FILE_AsyncReadService (INTERNAL)
340 */
341 static NTSTATUS FILE_AsyncReadService(void *user, PIO_STATUS_BLOCK iosb, NTSTATUS status, ULONG_PTR *total)
342 {
343 async_fileio_read *fileio = user;
344 int fd, needs_close, result;
345
346 switch (status)
347 {
348 case STATUS_ALERTED: /* got some new data */
349 /* check to see if the data is ready (non-blocking) */
350 if ((status = server_get_unix_fd( fileio->io.handle, FILE_READ_DATA, &fd,
351 &needs_close, NULL, NULL )))
352 break;
353
354 result = read(fd, &fileio->buffer[fileio->already], fileio->count - fileio->already);
355 if (needs_close) close( fd );
356
357 if (result < 0)
358 {
359 if (errno == EAGAIN || errno == EINTR)
360 status = STATUS_PENDING;
361 else /* check to see if the transfer is complete */
362 status = FILE_GetNtStatus();
363 }
364 else if (result == 0)
365 {
366 status = fileio->already ? STATUS_SUCCESS : STATUS_PIPE_BROKEN;
367 }
368 else
369 {
370 fileio->already += result;
371 if (fileio->already >= fileio->count || fileio->avail_mode)
372 status = STATUS_SUCCESS;
373 else
374 {
375 /* if we only have to read the available data, and none is available,
376 * simply cancel the request. If data was available, it has been read
377 * while in by previous call (NtDelayExecution)
378 */
379 status = (fileio->avail_mode) ? STATUS_SUCCESS : STATUS_PENDING;
380 }
381 }
382 break;
383
384 case STATUS_TIMEOUT:
385 case STATUS_IO_TIMEOUT:
386 if (fileio->already) status = STATUS_SUCCESS;
387 break;
388 }
389 if (status != STATUS_PENDING)
390 {
391 iosb->u.Status = status;
392 iosb->Information = *total = fileio->already;
393 }
394 return status;
395 }
396
397 struct io_timeouts
398 {
399 int interval; /* max interval between two bytes */
400 int total; /* total timeout for the whole operation */
401 int end_time; /* absolute time of end of operation */
402 };
403
404 /* retrieve the I/O timeouts to use for a given handle */
405 static NTSTATUS get_io_timeouts( HANDLE handle, enum server_fd_type type, ULONG count, BOOL is_read,
406 struct io_timeouts *timeouts )
407 {
408 NTSTATUS status = STATUS_SUCCESS;
409
410 timeouts->interval = timeouts->total = -1;
411
412 switch(type)
413 {
414 case FD_TYPE_SERIAL:
415 {
416 /* GetCommTimeouts */
417 SERIAL_TIMEOUTS st;
418 IO_STATUS_BLOCK io;
419
420 status = NtDeviceIoControlFile( handle, NULL, NULL, NULL, &io,
421 IOCTL_SERIAL_GET_TIMEOUTS, NULL, 0, &st, sizeof(st) );
422 if (status) break;
423
424 if (is_read)
425 {
426 if (st.ReadIntervalTimeout)
427 timeouts->interval = st.ReadIntervalTimeout;
428
429 if (st.ReadTotalTimeoutMultiplier || st.ReadTotalTimeoutConstant)
430 {
431 timeouts->total = st.ReadTotalTimeoutConstant;
432 if (st.ReadTotalTimeoutMultiplier != MAXDWORD)
433 timeouts->total += count * st.ReadTotalTimeoutMultiplier;
434 }
435 else if (st.ReadIntervalTimeout == MAXDWORD)
436 timeouts->interval = 0;
437 }
438 else /* write */
439 {
440 if (st.WriteTotalTimeoutMultiplier || st.WriteTotalTimeoutConstant)
441 {
442 timeouts->total = st.WriteTotalTimeoutConstant;
443 if (st.WriteTotalTimeoutMultiplier != MAXDWORD)
444 timeouts->total += count * st.WriteTotalTimeoutMultiplier;
445 }
446 }
447 }
448 break;
449 case FD_TYPE_MAILSLOT:
450 if (is_read)
451 {
452 timeouts->interval = 0; /* return as soon as we got something */
453 SERVER_START_REQ( set_mailslot_info )
454 {
455 req->handle = handle;
456 req->flags = 0;
457 if (!(status = wine_server_call( req )) &&
458 reply->read_timeout != TIMEOUT_INFINITE)
459 timeouts->total = reply->read_timeout / -10000;
460 }
461 SERVER_END_REQ;
462 }
463 break;
464 case FD_TYPE_SOCKET:
465 case FD_TYPE_PIPE:
466 case FD_TYPE_CHAR:
467 if (is_read) timeouts->interval = 0; /* return as soon as we got something */
468 break;
469 default:
470 break;
471 }
472 if (timeouts->total != -1) timeouts->end_time = NtGetTickCount() + timeouts->total;
473 return STATUS_SUCCESS;
474 }
475
476
477 /* retrieve the timeout for the next wait, in milliseconds */
478 static inline int get_next_io_timeout( const struct io_timeouts *timeouts, ULONG already )
479 {
480 int ret = -1;
481
482 if (timeouts->total != -1)
483 {
484 ret = timeouts->end_time - NtGetTickCount();
485 if (ret < 0) ret = 0;
486 }
487 if (already && timeouts->interval != -1)
488 {
489 if (ret == -1 || ret > timeouts->interval) ret = timeouts->interval;
490 }
491 return ret;
492 }
493
494
495 /* retrieve the avail_mode flag for async reads */
496 static NTSTATUS get_io_avail_mode( HANDLE handle, enum server_fd_type type, BOOL *avail_mode )
497 {
498 NTSTATUS status = STATUS_SUCCESS;
499
500 switch(type)
501 {
502 case FD_TYPE_SERIAL:
503 {
504 /* GetCommTimeouts */
505 SERIAL_TIMEOUTS st;
506 IO_STATUS_BLOCK io;
507
508 status = NtDeviceIoControlFile( handle, NULL, NULL, NULL, &io,
509 IOCTL_SERIAL_GET_TIMEOUTS, NULL, 0, &st, sizeof(st) );
510 if (status) break;
511 *avail_mode = (!st.ReadTotalTimeoutMultiplier &&
512 !st.ReadTotalTimeoutConstant &&
513 st.ReadIntervalTimeout == MAXDWORD);
514 }
515 break;
516 case FD_TYPE_MAILSLOT:
517 case FD_TYPE_SOCKET:
518 case FD_TYPE_PIPE:
519 case FD_TYPE_CHAR:
520 *avail_mode = TRUE;
521 break;
522 default:
523 *avail_mode = FALSE;
524 break;
525 }
526 return status;
527 }
528
529
530 /******************************************************************************
531 * NtReadFile [NTDLL.@]
532 * ZwReadFile [NTDLL.@]
533 *
534 * Read from an open file handle.
535 *
536 * PARAMS
537 * FileHandle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
538 * Event [I] Event to signal upon completion (or NULL)
539 * ApcRoutine [I] Callback to call upon completion (or NULL)
540 * ApcContext [I] Context for ApcRoutine (or NULL)
541 * IoStatusBlock [O] Receives information about the operation on return
542 * Buffer [O] Destination for the data read
543 * Length [I] Size of Buffer
544 * ByteOffset [O] Destination for the new file pointer position (or NULL)
545 * Key [O] Function unknown (may be NULL)
546 *
547 * RETURNS
548 * Success: 0. IoStatusBlock is updated, and the Information member contains
549 * The number of bytes read.
550 * Failure: An NTSTATUS error code describing the error.
551 */
552 NTSTATUS WINAPI NtReadFile(HANDLE hFile, HANDLE hEvent,
553 PIO_APC_ROUTINE apc, void* apc_user,
554 PIO_STATUS_BLOCK io_status, void* buffer, ULONG length,
555 PLARGE_INTEGER offset, PULONG key)
556 {
557 int result, unix_handle, needs_close, timeout_init_done = 0;
558 unsigned int options;
559 struct io_timeouts timeouts;
560 NTSTATUS status;
561 ULONG total = 0;
562 enum server_fd_type type;
563 ULONG_PTR cvalue = apc ? 0 : (ULONG_PTR)apc_user;
564
565 TRACE("(%p,%p,%p,%p,%p,%p,0x%08x,%p,%p),partial stub!\n",
566 hFile,hEvent,apc,apc_user,io_status,buffer,length,offset,key);
567
568 if (!io_status) return STATUS_ACCESS_VIOLATION;
569
570 status = server_get_unix_fd( hFile, FILE_READ_DATA, &unix_handle,
571 &needs_close, &type, &options );
572 if (status) return status;
573
574 if (type == FD_TYPE_FILE && offset && offset->QuadPart != (LONGLONG)-2 /* FILE_USE_FILE_POINTER_POSITION */ )
575 {
576 /* async I/O doesn't make sense on regular files */
577 while ((result = pread( unix_handle, buffer, length, offset->QuadPart )) == -1)
578 {
579 if (errno != EINTR)
580 {
581 status = FILE_GetNtStatus();
582 goto done;
583 }
584 }
585 if (options & (FILE_SYNCHRONOUS_IO_ALERT | FILE_SYNCHRONOUS_IO_NONALERT))
586 /* update file pointer position */
587 lseek( unix_handle, offset->QuadPart + result, SEEK_SET );
588
589 total = result;
590 status = total ? STATUS_SUCCESS : STATUS_END_OF_FILE;
591 goto done;
592 }
593
594 for (;;)
595 {
596 if ((result = read( unix_handle, (char *)buffer + total, length - total )) >= 0)
597 {
598 total += result;
599 if (!result || total == length)
600 {
601 if (total)
602 status = STATUS_SUCCESS;
603 else
604 status = (type == FD_TYPE_FILE || type == FD_TYPE_CHAR) ? STATUS_END_OF_FILE : STATUS_PIPE_BROKEN;
605 goto done;
606 }
607 }
608 else
609 {
610 if (errno == EINTR) continue;
611 if (errno != EAGAIN)
612 {
613 status = FILE_GetNtStatus();
614 goto done;
615 }
616 }
617
618 if (!(options & (FILE_SYNCHRONOUS_IO_ALERT | FILE_SYNCHRONOUS_IO_NONALERT)))
619 {
620 async_fileio_read *fileio;
621 BOOL avail_mode;
622
623 if ((status = get_io_avail_mode( hFile, type, &avail_mode )))
624 goto err;
625 if (total && avail_mode)
626 {
627 status = STATUS_SUCCESS;
628 goto done;
629 }
630
631 if (!(fileio = RtlAllocateHeap(GetProcessHeap(), 0, sizeof(*fileio))))
632 {
633 status = STATUS_NO_MEMORY;
634 goto err;
635 }
636 fileio->io.handle = hFile;
637 fileio->io.apc = apc;
638 fileio->io.apc_arg = apc_user;
639 fileio->already = total;
640 fileio->count = length;
641 fileio->buffer = buffer;
642 fileio->avail_mode = avail_mode;
643
644 SERVER_START_REQ( register_async )
645 {
646 req->handle = hFile;
647 req->type = ASYNC_TYPE_READ;
648 req->count = length;
649 req->async.callback = FILE_AsyncReadService;
650 req->async.iosb = io_status;
651 req->async.arg = fileio;
652 req->async.apc = fileio_apc;
653 req->async.event = hEvent;
654 req->async.cvalue = cvalue;
655 status = wine_server_call( req );
656 }
657 SERVER_END_REQ;
658
659 if (status != STATUS_PENDING) RtlFreeHeap( GetProcessHeap(), 0, fileio );
660 goto err;
661 }
662 else /* synchronous read, wait for the fd to become ready */
663 {
664 struct pollfd pfd;
665 int ret, timeout;
666
667 if (!timeout_init_done)
668 {
669 timeout_init_done = 1;
670 if ((status = get_io_timeouts( hFile, type, length, TRUE, &timeouts )))
671 goto err;
672 if (hEvent) NtResetEvent( hEvent, NULL );
673 }
674 timeout = get_next_io_timeout( &timeouts, total );
675
676 pfd.fd = unix_handle;
677 pfd.events = POLLIN;
678
679 if (!timeout || !(ret = poll( &pfd, 1, timeout )))
680 {
681 if (total) /* return with what we got so far */
682 status = STATUS_SUCCESS;
683 else
684 status = (type == FD_TYPE_MAILSLOT) ? STATUS_IO_TIMEOUT : STATUS_TIMEOUT;
685 goto done;
686 }
687 if (ret == -1 && errno != EINTR)
688 {
689 status = FILE_GetNtStatus();
690 goto done;
691 }
692 /* will now restart the read */
693 }
694 }
695
696 done:
697 if (cvalue) NTDLL_AddCompletion( hFile, cvalue, status, total );
698
699 err:
700 if (needs_close) close( unix_handle );
701 if (status == STATUS_SUCCESS)
702 {
703 io_status->u.Status = status;
704 io_status->Information = total;
705 TRACE("= SUCCESS (%u)\n", total);
706 if (hEvent) NtSetEvent( hEvent, NULL );
707 if (apc) NtQueueApcThread( GetCurrentThread(), (PNTAPCFUNC)apc,
708 (ULONG_PTR)apc_user, (ULONG_PTR)io_status, 0 );
709 }
710 else
711 {
712 TRACE("= 0x%08x\n", status);
713 if (status != STATUS_PENDING && hEvent) NtResetEvent( hEvent, NULL );
714 }
715 return status;
716 }
717
718 /***********************************************************************
719 * FILE_AsyncWriteService (INTERNAL)
720 */
721 static NTSTATUS FILE_AsyncWriteService(void *user, IO_STATUS_BLOCK *iosb, NTSTATUS status, ULONG_PTR *total)
722 {
723 async_fileio_write *fileio = user;
724 int result, fd, needs_close;
725 enum server_fd_type type;
726
727 switch (status)
728 {
729 case STATUS_ALERTED:
730 /* write some data (non-blocking) */
731 if ((status = server_get_unix_fd( fileio->io.handle, FILE_WRITE_DATA, &fd,
732 &needs_close, &type, NULL )))
733 break;
734
735 if (!fileio->count && (type == FD_TYPE_MAILSLOT || type == FD_TYPE_PIPE || type == FD_TYPE_SOCKET))
736 result = send( fd, fileio->buffer, 0, 0 );
737 else
738 result = write( fd, &fileio->buffer[fileio->already], fileio->count - fileio->already );
739
740 if (needs_close) close( fd );
741
742 if (result < 0)
743 {
744 if (errno == EAGAIN || errno == EINTR) status = STATUS_PENDING;
745 else status = FILE_GetNtStatus();
746 }
747 else
748 {
749 fileio->already += result;
750 status = (fileio->already < fileio->count) ? STATUS_PENDING : STATUS_SUCCESS;
751 }
752 break;
753
754 case STATUS_TIMEOUT:
755 case STATUS_IO_TIMEOUT:
756 if (fileio->already) status = STATUS_SUCCESS;
757 break;
758 }
759 if (status != STATUS_PENDING)
760 {
761 iosb->u.Status = status;
762 iosb->Information = *total = fileio->already;
763 }
764 return status;
765 }
766
767 /******************************************************************************
768 * NtWriteFile [NTDLL.@]
769 * ZwWriteFile [NTDLL.@]
770 *
771 * Write to an open file handle.
772 *
773 * PARAMS
774 * FileHandle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
775 * Event [I] Event to signal upon completion (or NULL)
776 * ApcRoutine [I] Callback to call upon completion (or NULL)
777 * ApcContext [I] Context for ApcRoutine (or NULL)
778 * IoStatusBlock [O] Receives information about the operation on return
779 * Buffer [I] Source for the data to write
780 * Length [I] Size of Buffer
781 * ByteOffset [O] Destination for the new file pointer position (or NULL)
782 * Key [O] Function unknown (may be NULL)
783 *
784 * RETURNS
785 * Success: 0. IoStatusBlock is updated, and the Information member contains
786 * The number of bytes written.
787 * Failure: An NTSTATUS error code describing the error.
788 */
789 NTSTATUS WINAPI NtWriteFile(HANDLE hFile, HANDLE hEvent,
790 PIO_APC_ROUTINE apc, void* apc_user,
791 PIO_STATUS_BLOCK io_status,
792 const void* buffer, ULONG length,
793 PLARGE_INTEGER offset, PULONG key)
794 {
795 int result, unix_handle, needs_close, timeout_init_done = 0;
796 unsigned int options;
797 struct io_timeouts timeouts;
798 NTSTATUS status;
799 ULONG total = 0;
800 enum server_fd_type type;
801 ULONG_PTR cvalue = apc ? 0 : (ULONG_PTR)apc_user;
802
803 TRACE("(%p,%p,%p,%p,%p,%p,0x%08x,%p,%p)!\n",
804 hFile,hEvent,apc,apc_user,io_status,buffer,length,offset,key);
805
806 if (!io_status) return STATUS_ACCESS_VIOLATION;
807
808 status = server_get_unix_fd( hFile, FILE_WRITE_DATA, &unix_handle,
809 &needs_close, &type, &options );
810 if (status) return status;
811
812 if (type == FD_TYPE_FILE && offset && offset->QuadPart != (LONGLONG)-2 /* FILE_USE_FILE_POINTER_POSITION */ )
813 {
814 /* async I/O doesn't make sense on regular files */
815 while ((result = pwrite( unix_handle, buffer, length, offset->QuadPart )) == -1)
816 {
817 if (errno != EINTR)
818 {
819 if (errno == EFAULT) status = STATUS_INVALID_USER_BUFFER;
820 else status = FILE_GetNtStatus();
821 goto done;
822 }
823 }
824
825 if (options & (FILE_SYNCHRONOUS_IO_ALERT | FILE_SYNCHRONOUS_IO_NONALERT))
826 /* update file pointer position */
827 lseek( unix_handle, offset->QuadPart + result, SEEK_SET );
828
829 total = result;
830 status = STATUS_SUCCESS;
831 goto done;
832 }
833
834 for (;;)
835 {
836 /* zero-length writes on sockets may not work with plain write(2) */
837 if (!length && (type == FD_TYPE_MAILSLOT || type == FD_TYPE_PIPE || type == FD_TYPE_SOCKET))
838 result = send( unix_handle, buffer, 0, 0 );
839 else
840 result = write( unix_handle, (const char *)buffer + total, length - total );
841
842 if (result >= 0)
843 {
844 total += result;
845 if (total == length)
846 {
847 status = STATUS_SUCCESS;
848 goto done;
849 }
850 }
851 else
852 {
853 if (errno == EINTR) continue;
854 if (errno != EAGAIN)
855 {
856 if (errno == EFAULT)
857 {
858 status = STATUS_INVALID_USER_BUFFER;
859 goto err;
860 }
861 status = FILE_GetNtStatus();
862 goto done;
863 }
864 }
865
866 if (!(options & (FILE_SYNCHRONOUS_IO_ALERT | FILE_SYNCHRONOUS_IO_NONALERT)))
867 {
868 async_fileio_write *fileio;
869
870 if (!(fileio = RtlAllocateHeap(GetProcessHeap(), 0, sizeof(*fileio))))
871 {
872 status = STATUS_NO_MEMORY;
873 goto err;
874 }
875 fileio->io.handle = hFile;
876 fileio->io.apc = apc;
877 fileio->io.apc_arg = apc_user;
878 fileio->already = total;
879 fileio->count = length;
880 fileio->buffer = buffer;
881
882 SERVER_START_REQ( register_async )
883 {
884 req->handle = hFile;
885 req->type = ASYNC_TYPE_WRITE;
886 req->count = length;
887 req->async.callback = FILE_AsyncWriteService;
888 req->async.iosb = io_status;
889 req->async.arg = fileio;
890 req->async.apc = fileio_apc;
891 req->async.event = hEvent;
892 req->async.cvalue = cvalue;
893 status = wine_server_call( req );
894 }
895 SERVER_END_REQ;
896
897 if (status != STATUS_PENDING) RtlFreeHeap( GetProcessHeap(), 0, fileio );
898 goto err;
899 }
900 else /* synchronous write, wait for the fd to become ready */
901 {
902 struct pollfd pfd;
903 int ret, timeout;
904
905 if (!timeout_init_done)
906 {
907 timeout_init_done = 1;
908 if ((status = get_io_timeouts( hFile, type, length, FALSE, &timeouts )))
909 goto err;
910 if (hEvent) NtResetEvent( hEvent, NULL );
911 }
912 timeout = get_next_io_timeout( &timeouts, total );
913
914 pfd.fd = unix_handle;
915 pfd.events = POLLOUT;
916
917 if (!timeout || !(ret = poll( &pfd, 1, timeout )))
918 {
919 /* return with what we got so far */
920 status = total ? STATUS_SUCCESS : STATUS_TIMEOUT;
921 goto done;
922 }
923 if (ret == -1 && errno != EINTR)
924 {
925 status = FILE_GetNtStatus();
926 goto done;
927 }
928 /* will now restart the write */
929 }
930 }
931
932 done:
933 if (cvalue) NTDLL_AddCompletion( hFile, cvalue, status, total );
934
935 err:
936 if (needs_close) close( unix_handle );
937 if (status == STATUS_SUCCESS)
938 {
939 io_status->u.Status = status;
940 io_status->Information = total;
941 TRACE("= SUCCESS (%u)\n", total);
942 if (hEvent) NtSetEvent( hEvent, NULL );
943 if (apc) NtQueueApcThread( GetCurrentThread(), (PNTAPCFUNC)apc,
944 (ULONG_PTR)apc_user, (ULONG_PTR)io_status, 0 );
945 }
946 else
947 {
948 TRACE("= 0x%08x\n", status);
949 if (status != STATUS_PENDING && hEvent) NtResetEvent( hEvent, NULL );
950 }
951 return status;
952 }
953
954
955 struct async_ioctl
956 {
957 HANDLE handle; /* handle to the device */
958 void *buffer; /* buffer for output */
959 ULONG size; /* size of buffer */
960 PIO_APC_ROUTINE apc; /* user apc params */
961 void *apc_arg;
962 };
963
964 /* callback for ioctl async I/O completion */
965 static NTSTATUS ioctl_completion( void *arg, IO_STATUS_BLOCK *io, NTSTATUS status )
966 {
967 struct async_ioctl *async = arg;
968
969 if (status == STATUS_ALERTED)
970 {
971 SERVER_START_REQ( get_ioctl_result )
972 {
973 req->handle = async->handle;
974 req->user_arg = async;
975 wine_server_set_reply( req, async->buffer, async->size );
976 if (!(status = wine_server_call( req )))
977 io->Information = wine_server_reply_size( reply );
978 }
979 SERVER_END_REQ;
980 }
981 if (status != STATUS_PENDING) io->u.Status = status;
982 return status;
983 }
984
985 /* callback for ioctl user APC */
986 static void WINAPI ioctl_apc( void *arg, IO_STATUS_BLOCK *io, ULONG reserved )
987 {
988 struct async_ioctl *async = arg;
989 if (async->apc) async->apc( async->apc_arg, io, reserved );
990 RtlFreeHeap( GetProcessHeap(), 0, async );
991 }
992
993 /* do a ioctl call through the server */
994 static NTSTATUS server_ioctl_file( HANDLE handle, HANDLE event,
995 PIO_APC_ROUTINE apc, PVOID apc_context,
996 IO_STATUS_BLOCK *io, ULONG code,
997 const void *in_buffer, ULONG in_size,
998 PVOID out_buffer, ULONG out_size )
999 {
1000 struct async_ioctl *async;
1001 NTSTATUS status;
1002 HANDLE wait_handle;
1003 ULONG options;
1004 ULONG_PTR cvalue = apc ? 0 : (ULONG_PTR)apc_context;
1005
1006 if (!(async = RtlAllocateHeap( GetProcessHeap(), 0, sizeof(*async) )))
1007 return STATUS_NO_MEMORY;
1008 async->handle = handle;
1009 async->buffer = out_buffer;
1010 async->size = out_size;
1011 async->apc = apc;
1012 async->apc_arg = apc_context;
1013
1014 SERVER_START_REQ( ioctl )
1015 {
1016 req->handle = handle;
1017 req->code = code;
1018 req->async.callback = ioctl_completion;
1019 req->async.iosb = io;
1020 req->async.arg = async;
1021 req->async.apc = (apc || event) ? ioctl_apc : NULL;
1022 req->async.event = event;
1023 req->async.cvalue = cvalue;
1024 wine_server_add_data( req, in_buffer, in_size );
1025 wine_server_set_reply( req, out_buffer, out_size );
1026 if (!(status = wine_server_call( req )))
1027 io->Information = wine_server_reply_size( reply );
1028 wait_handle = reply->wait;
1029 options = reply->options;
1030 }
1031 SERVER_END_REQ;
1032
1033 if (status == STATUS_NOT_SUPPORTED)
1034 FIXME("Unsupported ioctl %x (device=%x access=%x func=%x method=%x)\n",
1035 code, code >> 16, (code >> 14) & 3, (code >> 2) & 0xfff, code & 3);
1036
1037 if (status != STATUS_PENDING) RtlFreeHeap( GetProcessHeap(), 0, async );
1038
1039 if (wait_handle)
1040 {
1041 NtWaitForSingleObject( wait_handle, (options & FILE_SYNCHRONOUS_IO_ALERT), NULL );
1042 status = io->u.Status;
1043 NtClose( wait_handle );
1044 RtlFreeHeap( GetProcessHeap(), 0, async );
1045 }
1046
1047 return status;
1048 }
1049
1050
1051 /**************************************************************************
1052 * NtDeviceIoControlFile [NTDLL.@]
1053 * ZwDeviceIoControlFile [NTDLL.@]
1054 *
1055 * Perform an I/O control operation on an open file handle.
1056 *
1057 * PARAMS
1058 * handle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1059 * event [I] Event to signal upon completion (or NULL)
1060 * apc [I] Callback to call upon completion (or NULL)
1061 * apc_context [I] Context for ApcRoutine (or NULL)
1062 * io [O] Receives information about the operation on return
1063 * code [I] Control code for the operation to perform
1064 * in_buffer [I] Source for any input data required (or NULL)
1065 * in_size [I] Size of InputBuffer
1066 * out_buffer [O] Source for any output data returned (or NULL)
1067 * out_size [I] Size of OutputBuffer
1068 *
1069 * RETURNS
1070 * Success: 0. IoStatusBlock is updated.
1071 * Failure: An NTSTATUS error code describing the error.
1072 */
1073 NTSTATUS WINAPI NtDeviceIoControlFile(HANDLE handle, HANDLE event,
1074 PIO_APC_ROUTINE apc, PVOID apc_context,
1075 PIO_STATUS_BLOCK io, ULONG code,
1076 PVOID in_buffer, ULONG in_size,
1077 PVOID out_buffer, ULONG out_size)
1078 {
1079 ULONG device = (code >> 16);
1080 NTSTATUS status = STATUS_NOT_SUPPORTED;
1081
1082 TRACE("(%p,%p,%p,%p,%p,0x%08x,%p,0x%08x,%p,0x%08x)\n",
1083 handle, event, apc, apc_context, io, code,
1084 in_buffer, in_size, out_buffer, out_size);
1085
1086 switch(device)
1087 {
1088 case FILE_DEVICE_DISK:
1089 case FILE_DEVICE_CD_ROM:
1090 case FILE_DEVICE_DVD:
1091 case FILE_DEVICE_CONTROLLER:
1092 case FILE_DEVICE_MASS_STORAGE:
1093 status = CDROM_DeviceIoControl(handle, event, apc, apc_context, io, code,
1094 in_buffer, in_size, out_buffer, out_size);
1095 break;
1096 case FILE_DEVICE_SERIAL_PORT:
1097 status = COMM_DeviceIoControl(handle, event, apc, apc_context, io, code,
1098 in_buffer, in_size, out_buffer, out_size);
1099 break;
1100 case FILE_DEVICE_TAPE:
1101 status = TAPE_DeviceIoControl(handle, event, apc, apc_context, io, code,
1102 in_buffer, in_size, out_buffer, out_size);
1103 break;
1104 }
1105
1106 if (status == STATUS_NOT_SUPPORTED)
1107 status = server_ioctl_file( handle, event, apc, apc_context, io, code,
1108 in_buffer, in_size, out_buffer, out_size );
1109
1110 if (status != STATUS_PENDING) io->u.Status = status;
1111 return status;
1112 }
1113
1114
1115 /**************************************************************************
1116 * NtFsControlFile [NTDLL.@]
1117 * ZwFsControlFile [NTDLL.@]
1118 *
1119 * Perform a file system control operation on an open file handle.
1120 *
1121 * PARAMS
1122 * handle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1123 * event [I] Event to signal upon completion (or NULL)
1124 * apc [I] Callback to call upon completion (or NULL)
1125 * apc_context [I] Context for ApcRoutine (or NULL)
1126 * io [O] Receives information about the operation on return
1127 * code [I] Control code for the operation to perform
1128 * in_buffer [I] Source for any input data required (or NULL)
1129 * in_size [I] Size of InputBuffer
1130 * out_buffer [O] Source for any output data returned (or NULL)
1131 * out_size [I] Size of OutputBuffer
1132 *
1133 * RETURNS
1134 * Success: 0. IoStatusBlock is updated.
1135 * Failure: An NTSTATUS error code describing the error.
1136 */
1137 NTSTATUS WINAPI NtFsControlFile(HANDLE handle, HANDLE event, PIO_APC_ROUTINE apc,
1138 PVOID apc_context, PIO_STATUS_BLOCK io, ULONG code,
1139 PVOID in_buffer, ULONG in_size, PVOID out_buffer, ULONG out_size)
1140 {
1141 NTSTATUS status;
1142
1143 TRACE("(%p,%p,%p,%p,%p,0x%08x,%p,0x%08x,%p,0x%08x)\n",
1144 handle, event, apc, apc_context, io, code,
1145 in_buffer, in_size, out_buffer, out_size);
1146
1147 if (!io) return STATUS_INVALID_PARAMETER;
1148
1149 switch(code)
1150 {
1151 case FSCTL_DISMOUNT_VOLUME:
1152 status = server_ioctl_file( handle, event, apc, apc_context, io, code,
1153 in_buffer, in_size, out_buffer, out_size );
1154 if (!status) status = DIR_unmount_device( handle );
1155 break;
1156
1157 case FSCTL_PIPE_PEEK:
1158 {
1159 FILE_PIPE_PEEK_BUFFER *buffer = out_buffer;
1160 int avail = 0, fd, needs_close;
1161
1162 if (out_size < FIELD_OFFSET( FILE_PIPE_PEEK_BUFFER, Data ))
1163 {
1164 status = STATUS_INFO_LENGTH_MISMATCH;
1165 break;
1166 }
1167
1168 if ((status = server_get_unix_fd( handle, FILE_READ_DATA, &fd, &needs_close, NULL, NULL )))
1169 break;
1170
1171 #ifdef FIONREAD
1172 if (ioctl( fd, FIONREAD, &avail ) != 0)
1173 {
1174 TRACE("FIONREAD failed reason: %s\n",strerror(errno));
1175 if (needs_close) close( fd );
1176 status = FILE_GetNtStatus();
1177 break;
1178 }
1179 #endif
1180 if (!avail) /* check for closed pipe */
1181 {
1182 struct pollfd pollfd;
1183 int ret;
1184
1185 pollfd.fd = fd;
1186 pollfd.events = POLLIN;
1187 pollfd.revents = 0;
1188 ret = poll( &pollfd, 1, 0 );
1189 if (ret == -1 || (ret == 1 && (pollfd.revents & (POLLHUP|POLLERR))))
1190 {
1191 if (needs_close) close( fd );
1192 status = STATUS_PIPE_BROKEN;
1193 break;
1194 }
1195 }
1196 buffer->NamedPipeState = 0; /* FIXME */
1197 buffer->ReadDataAvailable = avail;
1198 buffer->NumberOfMessages = 0; /* FIXME */
1199 buffer->MessageLength = 0; /* FIXME */
1200 io->Information = FIELD_OFFSET( FILE_PIPE_PEEK_BUFFER, Data );
1201 status = STATUS_SUCCESS;
1202 if (avail)
1203 {
1204 ULONG data_size = out_size - FIELD_OFFSET( FILE_PIPE_PEEK_BUFFER, Data );
1205 if (data_size)
1206 {
1207 int res = recv( fd, buffer->Data, data_size, MSG_PEEK );
1208 if (res >= 0) io->Information += res;
1209 }
1210 }
1211 if (needs_close) close( fd );
1212 }
1213 break;
1214
1215 case FSCTL_PIPE_DISCONNECT:
1216 status = server_ioctl_file( handle, event, apc, apc_context, io, code,
1217 in_buffer, in_size, out_buffer, out_size );
1218 if (!status)
1219 {
1220 int fd = server_remove_fd_from_cache( handle );
1221 if (fd != -1) close( fd );
1222 }
1223 break;
1224
1225 case FSCTL_PIPE_IMPERSONATE:
1226 FIXME("FSCTL_PIPE_IMPERSONATE: impersonating self\n");
1227 status = RtlImpersonateSelf( SecurityImpersonation );
1228 break;
1229
1230 case FSCTL_LOCK_VOLUME:
1231 case FSCTL_UNLOCK_VOLUME:
1232 FIXME("stub! return success - Unsupported fsctl %x (device=%x access=%x func=%x method=%x)\n",
1233 code, code >> 16, (code >> 14) & 3, (code >> 2) & 0xfff, code & 3);
1234 status = STATUS_SUCCESS;
1235 break;
1236
1237 case FSCTL_PIPE_LISTEN:
1238 case FSCTL_PIPE_WAIT:
1239 default:
1240 status = server_ioctl_file( handle, event, apc, apc_context, io, code,
1241 in_buffer, in_size, out_buffer, out_size );
1242 break;
1243 }
1244
1245 if (status != STATUS_PENDING) io->u.Status = status;
1246 return status;
1247 }
1248
1249 /******************************************************************************
1250 * NtSetVolumeInformationFile [NTDLL.@]
1251 * ZwSetVolumeInformationFile [NTDLL.@]
1252 *
1253 * Set volume information for an open file handle.
1254 *
1255 * PARAMS
1256 * FileHandle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1257 * IoStatusBlock [O] Receives information about the operation on return
1258 * FsInformation [I] Source for volume information
1259 * Length [I] Size of FsInformation
1260 * FsInformationClass [I] Type of volume information to set
1261 *
1262 * RETURNS
1263 * Success: 0. IoStatusBlock is updated.
1264 * Failure: An NTSTATUS error code describing the error.
1265 */
1266 NTSTATUS WINAPI NtSetVolumeInformationFile(
1267 IN HANDLE FileHandle,
1268 PIO_STATUS_BLOCK IoStatusBlock,
1269 PVOID FsInformation,
1270 ULONG Length,
1271 FS_INFORMATION_CLASS FsInformationClass)
1272 {
1273 FIXME("(%p,%p,%p,0x%08x,0x%08x) stub\n",
1274 FileHandle,IoStatusBlock,FsInformation,Length,FsInformationClass);
1275 return 0;
1276 }
1277
1278 /******************************************************************************
1279 * NtQueryInformationFile [NTDLL.@]
1280 * ZwQueryInformationFile [NTDLL.@]
1281 *
1282 * Get information about an open file handle.
1283 *
1284 * PARAMS
1285 * hFile [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1286 * io [O] Receives information about the operation on return
1287 * ptr [O] Destination for file information
1288 * len [I] Size of FileInformation
1289 * class [I] Type of file information to get
1290 *
1291 * RETURNS
1292 * Success: 0. IoStatusBlock and FileInformation are updated.
1293 * Failure: An NTSTATUS error code describing the error.
1294 */
1295 NTSTATUS WINAPI NtQueryInformationFile( HANDLE hFile, PIO_STATUS_BLOCK io,
1296 PVOID ptr, LONG len, FILE_INFORMATION_CLASS class )
1297 {
1298 static const size_t info_sizes[] =
1299 {
1300 0,
1301 sizeof(FILE_DIRECTORY_INFORMATION), /* FileDirectoryInformation */
1302 sizeof(FILE_FULL_DIRECTORY_INFORMATION), /* FileFullDirectoryInformation */
1303 sizeof(FILE_BOTH_DIRECTORY_INFORMATION), /* FileBothDirectoryInformation */
1304 sizeof(FILE_BASIC_INFORMATION), /* FileBasicInformation */
1305 sizeof(FILE_STANDARD_INFORMATION), /* FileStandardInformation */
1306 sizeof(FILE_INTERNAL_INFORMATION), /* FileInternalInformation */
1307 sizeof(FILE_EA_INFORMATION), /* FileEaInformation */
1308 sizeof(FILE_ACCESS_INFORMATION), /* FileAccessInformation */
1309 sizeof(FILE_NAME_INFORMATION)-sizeof(WCHAR), /* FileNameInformation */
1310 sizeof(FILE_RENAME_INFORMATION)-sizeof(WCHAR), /* FileRenameInformation */
1311 0, /* FileLinkInformation */
1312 sizeof(FILE_NAMES_INFORMATION)-sizeof(WCHAR), /* FileNamesInformation */
1313 sizeof(FILE_DISPOSITION_INFORMATION), /* FileDispositionInformation */
1314 sizeof(FILE_POSITION_INFORMATION), /* FilePositionInformation */
1315 sizeof(FILE_FULL_EA_INFORMATION), /* FileFullEaInformation */
1316 sizeof(FILE_MODE_INFORMATION), /* FileModeInformation */
1317 sizeof(FILE_ALIGNMENT_INFORMATION), /* FileAlignmentInformation */
1318 sizeof(FILE_ALL_INFORMATION)-sizeof(WCHAR), /* FileAllInformation */
1319 sizeof(FILE_ALLOCATION_INFORMATION), /* FileAllocationInformation */
1320 sizeof(FILE_END_OF_FILE_INFORMATION), /* FileEndOfFileInformation */
1321 0, /* FileAlternateNameInformation */
1322 sizeof(FILE_STREAM_INFORMATION)-sizeof(WCHAR), /* FileStreamInformation */
1323 0, /* FilePipeInformation */
1324 sizeof(FILE_PIPE_LOCAL_INFORMATION), /* FilePipeLocalInformation */
1325 0, /* FilePipeRemoteInformation */
1326 sizeof(FILE_MAILSLOT_QUERY_INFORMATION), /* FileMailslotQueryInformation */
1327 0, /* FileMailslotSetInformation */
1328 0, /* FileCompressionInformation */
1329 0, /* FileObjectIdInformation */
1330 0, /* FileCompletionInformation */
1331 0, /* FileMoveClusterInformation */
1332 0, /* FileQuotaInformation */
1333 0, /* FileReparsePointInformation */
1334 0, /* FileNetworkOpenInformation */
1335 0, /* FileAttributeTagInformation */
1336 0 /* FileTrackingInformation */
1337 };
1338
1339 struct stat st;
1340 int fd, needs_close = FALSE;
1341
1342 TRACE("(%p,%p,%p,0x%08x,0x%08x)\n", hFile, io, ptr, len, class);
1343
1344 io->Information = 0;
1345
1346 if (class <= 0 || class >= FileMaximumInformation)
1347 return io->u.Status = STATUS_INVALID_INFO_CLASS;
1348 if (!info_sizes[class])
1349 {
1350 FIXME("Unsupported class (%d)\n", class);
1351 return io->u.Status = STATUS_NOT_IMPLEMENTED;
1352 }
1353 if (len < info_sizes[class])
1354 return io->u.Status = STATUS_INFO_LENGTH_MISMATCH;
1355
1356 if (class != FilePipeLocalInformation)
1357 {
1358 if ((io->u.Status = server_get_unix_fd( hFile, 0, &fd, &needs_close, NULL, NULL )))
1359 return io->u.Status;
1360 }
1361
1362 switch (class)
1363 {
1364 case FileBasicInformation:
1365 {
1366 FILE_BASIC_INFORMATION *info = ptr;
1367
1368 if (fstat( fd, &st ) == -1)
1369 io->u.Status = FILE_GetNtStatus();
1370 else if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
1371 io->u.Status = STATUS_INVALID_INFO_CLASS;
1372 else
1373 {
1374 if (S_ISDIR(st.st_mode)) info->FileAttributes = FILE_ATTRIBUTE_DIRECTORY;
1375 else info->FileAttributes = FILE_ATTRIBUTE_ARCHIVE;
1376 if (!(st.st_mode & (S_IWUSR | S_IWGRP | S_IWOTH)))
1377 info->FileAttributes |= FILE_ATTRIBUTE_READONLY;
1378 RtlSecondsSince1970ToTime( st.st_mtime, &info->CreationTime);
1379 RtlSecondsSince1970ToTime( st.st_mtime, &info->LastWriteTime);
1380 RtlSecondsSince1970ToTime( st.st_ctime, &info->ChangeTime);
1381 RtlSecondsSince1970ToTime( st.st_atime, &info->LastAccessTime);
1382 }
1383 }
1384 break;
1385 case FileStandardInformation:
1386 {
1387 FILE_STANDARD_INFORMATION *info = ptr;
1388
1389 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1390 else
1391 {
1392 if ((info->Directory = S_ISDIR(st.st_mode)))
1393 {
1394 info->AllocationSize.QuadPart = 0;
1395 info->EndOfFile.QuadPart = 0;
1396 info->NumberOfLinks = 1;
1397 info->DeletePending = FALSE;
1398 }
1399 else
1400 {
1401 info->AllocationSize.QuadPart = (ULONGLONG)st.st_blocks * 512;
1402 info->EndOfFile.QuadPart = st.st_size;
1403 info->NumberOfLinks = st.st_nlink;
1404 info->DeletePending = FALSE; /* FIXME */
1405 }
1406 }
1407 }
1408 break;
1409 case FilePositionInformation:
1410 {
1411 FILE_POSITION_INFORMATION *info = ptr;
1412 off_t res = lseek( fd, 0, SEEK_CUR );
1413 if (res == (off_t)-1) io->u.Status = FILE_GetNtStatus();
1414 else info->CurrentByteOffset.QuadPart = res;
1415 }
1416 break;
1417 case FileInternalInformation:
1418 {
1419 FILE_INTERNAL_INFORMATION *info = ptr;
1420
1421 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1422 else info->IndexNumber.QuadPart = st.st_ino;
1423 }
1424 break;
1425 case FileEaInformation:
1426 {
1427 FILE_EA_INFORMATION *info = ptr;
1428 info->EaSize = 0;
1429 }
1430 break;
1431 case FileEndOfFileInformation:
1432 {
1433 FILE_END_OF_FILE_INFORMATION *info = ptr;
1434
1435 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1436 else info->EndOfFile.QuadPart = S_ISDIR(st.st_mode) ? 0 : st.st_size;
1437 }
1438 break;
1439 case FileAllInformation:
1440 {
1441 FILE_ALL_INFORMATION *info = ptr;
1442
1443 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1444 else if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
1445 io->u.Status = STATUS_INVALID_INFO_CLASS;
1446 else
1447 {
1448 if ((info->StandardInformation.Directory = S_ISDIR(st.st_mode)))
1449 {
1450 info->BasicInformation.FileAttributes = FILE_ATTRIBUTE_DIRECTORY;
1451 info->StandardInformation.AllocationSize.QuadPart = 0;
1452 info->StandardInformation.EndOfFile.QuadPart = 0;
1453 info->StandardInformation.NumberOfLinks = 1;
1454 info->StandardInformation.DeletePending = FALSE;
1455 }
1456 else
1457 {
1458 info->BasicInformation.FileAttributes = FILE_ATTRIBUTE_ARCHIVE;
1459 info->StandardInformation.AllocationSize.QuadPart = (ULONGLONG)st.st_blocks * 512;
1460 info->StandardInformation.EndOfFile.QuadPart = st.st_size;
1461 info->StandardInformation.NumberOfLinks = st.st_nlink;
1462 info->StandardInformation.DeletePending = FALSE; /* FIXME */
1463 }
1464 if (!(st.st_mode & (S_IWUSR | S_IWGRP | S_IWOTH)))
1465 info->BasicInformation.FileAttributes |= FILE_ATTRIBUTE_READONLY;
1466 RtlSecondsSince1970ToTime( st.st_mtime, &info->BasicInformation.CreationTime);
1467 RtlSecondsSince1970ToTime( st.st_mtime, &info->BasicInformation.LastWriteTime);
1468 RtlSecondsSince1970ToTime( st.st_ctime, &info->BasicInformation.ChangeTime);
1469 RtlSecondsSince1970ToTime( st.st_atime, &info->BasicInformation.LastAccessTime);
1470 info->InternalInformation.IndexNumber.QuadPart = st.st_ino;
1471 info->EaInformation.EaSize = 0;
1472 info->AccessInformation.AccessFlags = 0; /* FIXME */
1473 info->PositionInformation.CurrentByteOffset.QuadPart = lseek( fd, 0, SEEK_CUR );
1474 info->ModeInformation.Mode = 0; /* FIXME */
1475 info->AlignmentInformation.AlignmentRequirement = 1; /* FIXME */
1476 info->NameInformation.FileNameLength = 0;
1477 io->Information = sizeof(*info) - sizeof(WCHAR);
1478 }
1479 }
1480 break;
1481 case FileMailslotQueryInformation:
1482 {
1483 FILE_MAILSLOT_QUERY_INFORMATION *info = ptr;
1484
1485 SERVER_START_REQ( set_mailslot_info )
1486 {
1487 req->handle = hFile;
1488 req->flags = 0;
1489 io->u.Status = wine_server_call( req );
1490 if( io->u.Status == STATUS_SUCCESS )
1491 {
1492 info->MaximumMessageSize = reply->max_msgsize;
1493 info->MailslotQuota = 0;
1494 info->NextMessageSize = 0;
1495 info->MessagesAvailable = 0;
1496 info->ReadTimeout.QuadPart = reply->read_timeout;
1497 }
1498 }
1499 SERVER_END_REQ;
1500 if (!io->u.Status)
1501 {
1502 char *tmpbuf;
1503 ULONG size = info->MaximumMessageSize ? info->MaximumMessageSize : 0x10000;
1504 if (size > 0x10000) size = 0x10000;
1505 if ((tmpbuf = RtlAllocateHeap( GetProcessHeap(), 0, size )))
1506 {
1507 int fd, needs_close;
1508 if (!server_get_unix_fd( hFile, FILE_READ_DATA, &fd, &needs_close, NULL, NULL ))
1509 {
1510 int res = recv( fd, tmpbuf, size, MSG_PEEK );
1511 info->MessagesAvailable = (res > 0);
1512 info->NextMessageSize = (res >= 0) ? res : MAILSLOT_NO_MESSAGE;
1513 if (needs_close) close( fd );
1514 }
1515 RtlFreeHeap( GetProcessHeap(), 0, tmpbuf );
1516 }
1517 }
1518 }
1519 break;
1520 case FilePipeLocalInformation:
1521 {
1522 FILE_PIPE_LOCAL_INFORMATION* pli = ptr;
1523
1524 SERVER_START_REQ( get_named_pipe_info )
1525 {
1526 req->handle = hFile;
1527 if (!(io->u.Status = wine_server_call( req )))
1528 {
1529 pli->NamedPipeType = (reply->flags & NAMED_PIPE_MESSAGE_STREAM_WRITE) ?
1530 FILE_PIPE_TYPE_MESSAGE : FILE_PIPE_TYPE_BYTE;
1531 pli->NamedPipeConfiguration = 0; /* FIXME */
1532 pli->MaximumInstances = reply->maxinstances;
1533 pli->CurrentInstances = reply->instances;
1534 pli->InboundQuota = reply->insize;
1535 pli->ReadDataAvailable = 0; /* FIXME */
1536 pli->OutboundQuota = reply->outsize;
1537 pli->WriteQuotaAvailable = 0; /* FIXME */
1538 pli->NamedPipeState = 0; /* FIXME */
1539 pli->NamedPipeEnd = (reply->flags & NAMED_PIPE_SERVER_END) ?
1540 FILE_PIPE_SERVER_END : FILE_PIPE_CLIENT_END;
1541 }
1542 }
1543 SERVER_END_REQ;
1544 }
1545 break;
1546 default:
1547 FIXME("Unsupported class (%d)\n", class);
1548 io->u.Status = STATUS_NOT_IMPLEMENTED;
1549 break;
1550 }
1551 if (needs_close) close( fd );
1552 if (io->u.Status == STATUS_SUCCESS && !io->Information) io->Information = info_sizes[class];
1553 return io->u.Status;
1554 }
1555
1556 /******************************************************************************
1557 * NtSetInformationFile [NTDLL.@]
1558 * ZwSetInformationFile [NTDLL.@]
1559 *
1560 * Set information about an open file handle.
1561 *
1562 * PARAMS
1563 * handle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1564 * io [O] Receives information about the operation on return
1565 * ptr [I] Source for file information
1566 * len [I] Size of FileInformation
1567 * class [I] Type of file information to set
1568 *
1569 * RETURNS
1570 * Success: 0. io is updated.
1571 * Failure: An NTSTATUS error code describing the error.
1572 */
1573 NTSTATUS WINAPI NtSetInformationFile(HANDLE handle, PIO_STATUS_BLOCK io,
1574 PVOID ptr, ULONG len, FILE_INFORMATION_CLASS class)
1575 {
1576 int fd, needs_close;
1577
1578 TRACE("(%p,%p,%p,0x%08x,0x%08x)\n", handle, io, ptr, len, class);
1579
1580 if ((io->u.Status = server_get_unix_fd( handle, 0, &fd, &needs_close, NULL, NULL )))
1581 return io->u.Status;
1582
1583 io->u.Status = STATUS_SUCCESS;
1584 switch (class)
1585 {
1586 case FileBasicInformation:
1587 if (len >= sizeof(FILE_BASIC_INFORMATION))
1588 {
1589 struct stat st;
1590 const FILE_BASIC_INFORMATION *info = ptr;
1591
1592 if (info->LastAccessTime.QuadPart || info->LastWriteTime.QuadPart)
1593 {
1594 ULONGLONG sec, nsec;
1595 struct timeval tv[2];
1596
1597 if (!info->LastAccessTime.QuadPart || !info->LastWriteTime.QuadPart)
1598 {
1599
1600 tv[0].tv_sec = tv[0].tv_usec = 0;
1601 tv[1].tv_sec = tv[1].tv_usec = 0;
1602 if (!fstat( fd, &st ))
1603 {
1604 tv[0].tv_sec = st.st_atime;
1605 tv[1].tv_sec = st.st_mtime;
1606 }
1607 }
1608 if (info->LastAccessTime.QuadPart)
1609 {
1610 sec = RtlLargeIntegerDivide( info->LastAccessTime.QuadPart, 10000000, &nsec );
1611 tv[0].tv_sec = sec - SECS_1601_TO_1970;
1612 tv[0].tv_usec = (UINT)nsec / 10;
1613 }
1614 if (info->LastWriteTime.QuadPart)
1615 {
1616 sec = RtlLargeIntegerDivide( info->LastWriteTime.QuadPart, 10000000, &nsec );
1617 tv[1].tv_sec = sec - SECS_1601_TO_1970;
1618 tv[1].tv_usec = (UINT)nsec / 10;
1619 }
1620 if (futimes( fd, tv ) == -1) io->u.Status = FILE_GetNtStatus();
1621 }
1622
1623 if (io->u.Status == STATUS_SUCCESS && info->FileAttributes)
1624 {
1625 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1626 else
1627 {
1628 if (info->FileAttributes & FILE_ATTRIBUTE_READONLY)
1629 {
1630 if (S_ISDIR( st.st_mode))
1631 WARN("FILE_ATTRIBUTE_READONLY ignored for directory.\n");
1632 else
1633 st.st_mode &= ~0222; /* clear write permission bits */
1634 }
1635 else
1636 {
1637 /* add write permission only where we already have read permission */
1638 st.st_mode |= (0600 | ((st.st_mode & 044) >> 1)) & (~FILE_umask);
1639 }
1640 if (fchmod( fd, st.st_mode ) == -1) io->u.Status = FILE_GetNtStatus();
1641 }
1642 }
1643 }
1644 else io->u.Status = STATUS_INVALID_PARAMETER_3;
1645 break;
1646
1647 case FilePositionInformation:
1648 if (len >= sizeof(FILE_POSITION_INFORMATION))
1649 {
1650 const FILE_POSITION_INFORMATION *info = ptr;
1651
1652 if (lseek( fd, info->CurrentByteOffset.QuadPart, SEEK_SET ) == (off_t)-1)
1653 io->u.Status = FILE_GetNtStatus();
1654 }
1655 else io->u.Status = STATUS_INVALID_PARAMETER_3;
1656 break;
1657
1658 case FileEndOfFileInformation:
1659 if (len >= sizeof(FILE_END_OF_FILE_INFORMATION))
1660 {
1661 struct stat st;
1662 const FILE_END_OF_FILE_INFORMATION *info = ptr;
1663
1664 /* first try normal truncate */
1665 if (ftruncate( fd, (off_t)info->EndOfFile.QuadPart ) != -1) break;
1666
1667 /* now check for the need to extend the file */
1668 if (fstat( fd, &st ) != -1 && (off_t)info->EndOfFile.QuadPart > st.st_size)
1669 {
1670 static const char zero;
1671
1672 /* extend the file one byte beyond the requested size and then truncate it */
1673 /* this should work around ftruncate implementations that can't extend files */
1674 if (pwrite( fd, &zero, 1, (off_t)info->EndOfFile.QuadPart ) != -1 &&
1675 ftruncate( fd, (off_t)info->EndOfFile.QuadPart ) != -1) break;
1676 }
1677 io->u.Status = FILE_GetNtStatus();
1678 }
1679 else io->u.Status = STATUS_INVALID_PARAMETER_3;
1680 break;
1681
1682 case FileMailslotSetInformation:
1683 {
1684 FILE_MAILSLOT_SET_INFORMATION *info = ptr;
1685
1686 SERVER_START_REQ( set_mailslot_info )
1687 {
1688 req->handle = handle;
1689 req->flags = MAILSLOT_SET_READ_TIMEOUT;
1690 req->read_timeout = info->ReadTimeout.QuadPart;
1691 io->u.Status = wine_server_call( req );
1692 }
1693 SERVER_END_REQ;
1694 }
1695 break;
1696
1697 case FileCompletionInformation:
1698 if (len >= sizeof(FILE_COMPLETION_INFORMATION))
1699 {
1700 FILE_COMPLETION_INFORMATION *info = (FILE_COMPLETION_INFORMATION *)ptr;
1701
1702 SERVER_START_REQ( set_completion_info )
1703 {
1704 req->handle = handle;
1705 req->chandle = info->CompletionPort;
1706 req->ckey = info->CompletionKey;
1707 io->u.Status = wine_server_call( req );
1708 }
1709 SERVER_END_REQ;
1710 } else
1711 io->u.Status = STATUS_INVALID_PARAMETER_3;
1712 break;
1713
1714 default:
1715 FIXME("Unsupported class (%d)\n", class);
1716 io->u.Status = STATUS_NOT_IMPLEMENTED;
1717 break;
1718 }
1719 if (needs_close) close( fd );
1720 io->Information = 0;
1721 return io->u.Status;
1722 }
1723
1724
1725 /******************************************************************************
1726 * NtQueryFullAttributesFile (NTDLL.@)
1727 */
1728 NTSTATUS WINAPI NtQueryFullAttributesFile( const OBJECT_ATTRIBUTES *attr,
1729 FILE_NETWORK_OPEN_INFORMATION *info )
1730 {
1731 ANSI_STRING unix_name;
1732 NTSTATUS status;
1733
1734 if (!(status = wine_nt_to_unix_file_name( attr->ObjectName, &unix_name, FILE_OPEN,
1735 !(attr->Attributes & OBJ_CASE_INSENSITIVE) )))
1736 {
1737 struct stat st;
1738
1739 if (stat( unix_name.Buffer, &st ) == -1)
1740 status = FILE_GetNtStatus();
1741 else if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
1742 status = STATUS_INVALID_INFO_CLASS;
1743 else
1744 {
1745 if (S_ISDIR(st.st_mode))
1746 {
1747 info->FileAttributes = FILE_ATTRIBUTE_DIRECTORY;
1748 info->AllocationSize.QuadPart = 0;
1749 info->EndOfFile.QuadPart = 0;
1750 }
1751 else
1752 {
1753 info->FileAttributes = FILE_ATTRIBUTE_ARCHIVE;
1754 info->AllocationSize.QuadPart = (ULONGLONG)st.st_blocks * 512;
1755 info->EndOfFile.QuadPart = st.st_size;
1756 }
1757 if (!(st.st_mode & (S_IWUSR | S_IWGRP | S_IWOTH)))
1758 info->FileAttributes |= FILE_ATTRIBUTE_READONLY;
1759 RtlSecondsSince1970ToTime( st.st_mtime, &info->CreationTime );
1760 RtlSecondsSince1970ToTime( st.st_mtime, &info->LastWriteTime );
1761 RtlSecondsSince1970ToTime( st.st_ctime, &info->ChangeTime );
1762 RtlSecondsSince1970ToTime( st.st_atime, &info->LastAccessTime );
1763 if (DIR_is_hidden_file( attr->ObjectName ))
1764 info->FileAttributes |= FILE_ATTRIBUTE_HIDDEN;
1765 }
1766 RtlFreeAnsiString( &unix_name );
1767 }
1768 else WARN("%s not found (%x)\n", debugstr_us(attr->ObjectName), status );
1769 return status;
1770 }
1771
1772
1773 /******************************************************************************
1774 * NtQueryAttributesFile (NTDLL.@)
1775 * ZwQueryAttributesFile (NTDLL.@)
1776 */
1777 NTSTATUS WINAPI NtQueryAttributesFile( const OBJECT_ATTRIBUTES *attr, FILE_BASIC_INFORMATION *info )
1778 {
1779 FILE_NETWORK_OPEN_INFORMATION full_info;
1780 NTSTATUS status;
1781
1782 if (!(status = NtQueryFullAttributesFile( attr, &full_info )))
1783 {
1784 info->CreationTime.QuadPart = full_info.CreationTime.QuadPart;
1785 info->LastAccessTime.QuadPart = full_info.LastAccessTime.QuadPart;
1786 info->LastWriteTime.QuadPart = full_info.LastWriteTime.QuadPart;
1787 info->ChangeTime.QuadPart = full_info.ChangeTime.QuadPart;
1788 info->FileAttributes = full_info.FileAttributes;
1789 }
1790 return status;
1791 }
1792
1793
1794 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__NetBSD__) || defined(__APPLE__)
1795 /* helper for FILE_GetDeviceInfo to hide some platform differences in fstatfs */
1796 static inline void get_device_info_fstatfs( FILE_FS_DEVICE_INFORMATION *info, const char *fstypename,
1797 unsigned int flags )
1798 {
1799 if (!strcmp("cd9660", fstypename) || !strcmp("udf", fstypename))
1800 {
1801 info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
1802 /* Don't assume read-only, let the mount options set it below */
1803 info->Characteristics |= FILE_REMOVABLE_MEDIA;
1804 }
1805 else if (!strcmp("nfs", fstypename) || !strcmp("nwfs", fstypename) ||
1806 !strcmp("smbfs", fstypename) || !strcmp("afpfs", fstypename))
1807 {
1808 info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
1809 info->Characteristics |= FILE_REMOTE_DEVICE;
1810 }
1811 else if (!strcmp("procfs", fstypename))
1812 info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
1813 else
1814 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1815
1816 if (flags & MNT_RDONLY)
1817 info->Characteristics |= FILE_READ_ONLY_DEVICE;
1818
1819 if (!(flags & MNT_LOCAL))
1820 {
1821 info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
1822 info->Characteristics |= FILE_REMOTE_DEVICE;
1823 }
1824 }
1825 #endif
1826
1827 static inline int is_device_placeholder( int fd )
1828 {
1829 static const char wine_placeholder[] = "Wine device placeholder";
1830 char buffer[sizeof(wine_placeholder)-1];
1831
1832 if (pread( fd, buffer, sizeof(wine_placeholder) - 1, 0 ) != sizeof(wine_placeholder) - 1)
1833 return 0;
1834 return !memcmp( buffer, wine_placeholder, sizeof(wine_placeholder) - 1 );
1835 }
1836
1837 /******************************************************************************
1838 * get_device_info
1839 *
1840 * Implementation of the FileFsDeviceInformation query for NtQueryVolumeInformationFile.
1841 */
1842 static NTSTATUS get_device_info( int fd, FILE_FS_DEVICE_INFORMATION *info )
1843 {
1844 struct stat st;
1845
1846 info->Characteristics = 0;
1847 if (fstat( fd, &st ) < 0) return FILE_GetNtStatus();
1848 if (S_ISCHR( st.st_mode ))
1849 {
1850 info->DeviceType = FILE_DEVICE_UNKNOWN;
1851 #ifdef linux
1852 switch(major(st.st_rdev))
1853 {
1854 case MEM_MAJOR:
1855 info->DeviceType = FILE_DEVICE_NULL;
1856 break;
1857 case TTY_MAJOR:
1858 info->DeviceType = FILE_DEVICE_SERIAL_PORT;
1859 break;
1860 case LP_MAJOR:
1861 info->DeviceType = FILE_DEVICE_PARALLEL_PORT;
1862 break;
1863 case SCSI_TAPE_MAJOR:
1864 info->DeviceType = FILE_DEVICE_TAPE;
1865 break;
1866 }
1867 #endif
1868 }
1869 else if (S_ISBLK( st.st_mode ))
1870 {
1871 info->DeviceType = FILE_DEVICE_DISK;
1872 }
1873 else if (S_ISFIFO( st.st_mode ) || S_ISSOCK( st.st_mode ))
1874 {
1875 info->DeviceType = FILE_DEVICE_NAMED_PIPE;
1876 }
1877 else if (is_device_placeholder( fd ))
1878 {
1879 info->DeviceType = FILE_DEVICE_DISK;
1880 }
1881 else /* regular file or directory */
1882 {
1883 #if defined(linux) && defined(HAVE_FSTATFS)
1884 struct statfs stfs;
1885
1886 /* check for floppy disk */
1887 if (major(st.st_dev) == FLOPPY_MAJOR)
1888 info->Characteristics |= FILE_REMOVABLE_MEDIA;
1889
1890 if (fstatfs( fd, &stfs ) < 0) stfs.f_type = 0;
1891 switch (stfs.f_type)
1892 {
1893 case 0x9660: /* iso9660 */
1894 case 0x9fa1: /* supermount */
1895 case 0x15013346: /* udf */
1896 info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
1897 info->Characteristics |= FILE_REMOVABLE_MEDIA|FILE_READ_ONLY_DEVICE;
1898 break;
1899 case 0x6969: /* nfs */
1900 case 0x517B: /* smbfs */
1901 case 0x564c: /* ncpfs */
1902 info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
1903 info->Characteristics |= FILE_REMOTE_DEVICE;
1904 break;
1905 case 0x01021994: /* tmpfs */
1906 case 0x28cd3d45: /* cramfs */
1907 case 0x1373: /* devfs */
1908 case 0x9fa0: /* procfs */
1909 info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
1910 break;
1911 default:
1912 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1913 break;
1914 }
1915 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__APPLE__)
1916 struct statfs stfs;
1917
1918 if (fstatfs( fd, &stfs ) < 0)
1919 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1920 else
1921 get_device_info_fstatfs( info, stfs.f_fstypename, stfs.f_flags );
1922 #elif defined(__NetBSD__)
1923 struct statvfs stfs;
1924
1925 if (fstatvfs( fd, &stfs) < 0)
1926 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1927 else
1928 get_device_info_fstatfs( info, stfs.f_fstypename, stfs.f_flag );
1929 #elif defined(sun)
1930 /* Use dkio to work out device types */
1931 {
1932 # include <sys/dkio.h>
1933 # include <sys/vtoc.h>
1934 struct dk_cinfo dkinf;
1935 int retval = ioctl(fd, DKIOCINFO, &dkinf);
1936 if(retval==-1){
1937 WARN("Unable to get disk device type information - assuming a disk like device\n");
1938 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1939 }
1940 switch (dkinf.dki_ctype)
1941 {
1942 case DKC_CDROM:
1943 info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
1944 info->Characteristics |= FILE_REMOVABLE_MEDIA|FILE_READ_ONLY_DEVICE;
1945 break;
1946 case DKC_NCRFLOPPY:
1947 case DKC_SMSFLOPPY:
1948 case DKC_INTEL82072:
1949 case DKC_INTEL82077:
1950 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1951 info->Characteristics |= FILE_REMOVABLE_MEDIA;
1952 break;
1953 case DKC_MD:
1954 info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
1955 break;
1956 default:
1957 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1958 }
1959 }
1960 #else
1961 static int warned;
1962 if (!warned++) FIXME( "device info not properly supported on this platform\n" );
1963 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
1964 #endif
1965 info->Characteristics |= FILE_DEVICE_IS_MOUNTED;
1966 }
1967 return STATUS_SUCCESS;
1968 }
1969
1970
1971 /******************************************************************************
1972 * NtQueryVolumeInformationFile [NTDLL.@]
1973 * ZwQueryVolumeInformationFile [NTDLL.@]
1974 *
1975 * Get volume information for an open file handle.
1976 *
1977 * PARAMS
1978 * handle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
1979 * io [O] Receives information about the operation on return
1980 * buffer [O] Destination for volume information
1981 * length [I] Size of FsInformation
1982 * info_class [I] Type of volume information to set
1983 *
1984 * RETURNS
1985 * Success: 0. io and buffer are updated.
1986 * Failure: An NTSTATUS error code describing the error.
1987 */
1988 NTSTATUS WINAPI NtQueryVolumeInformationFile( HANDLE handle, PIO_STATUS_BLOCK io,
1989 PVOID buffer, ULONG length,
1990 FS_INFORMATION_CLASS info_class )
1991 {
1992 int fd, needs_close;
1993 struct stat st;
1994
1995 if ((io->u.Status = server_get_unix_fd( handle, 0, &fd, &needs_close, NULL, NULL )) != STATUS_SUCCESS)
1996 return io->u.Status;
1997
1998 io->u.Status = STATUS_NOT_IMPLEMENTED;
1999 io->Information = 0;
2000
2001 switch( info_class )
2002 {
2003 case FileFsVolumeInformation:
2004 FIXME( "%p: volume info not supported\n", handle );
2005 break;
2006 case FileFsLabelInformation:
2007 FIXME( "%p: label info not supported\n", handle );
2008 break;
2009 case FileFsSizeInformation:
2010 if (length < sizeof(FILE_FS_SIZE_INFORMATION))
2011 io->u.Status = STATUS_BUFFER_TOO_SMALL;
2012 else
2013 {
2014 FILE_FS_SIZE_INFORMATION *info = buffer;
2015
2016 if (fstat( fd, &st ) < 0)
2017 {
2018 io->u.Status = FILE_GetNtStatus();
2019 break;
2020 }
2021 if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
2022 {
2023 io->u.Status = STATUS_INVALID_DEVICE_REQUEST;
2024 }
2025 else
2026 {
2027 /* Linux's fstatvfs is buggy */
2028 #if !defined(linux) || !defined(HAVE_FSTATFS)
2029 struct statvfs stfs;
2030
2031 if (fstatvfs( fd, &stfs ) < 0)
2032 {
2033 io->u.Status = FILE_GetNtStatus();
2034 break;
2035 }
2036 info->BytesPerSector = stfs.f_frsize;
2037 #else
2038 struct statfs stfs;
2039 if (fstatfs( fd, &stfs ) < 0)
2040 {
2041 io->u.Status = FILE_GetNtStatus();
2042 break;
2043 }
2044 info->BytesPerSector = stfs.f_bsize;
2045 #endif
2046 info->TotalAllocationUnits.QuadPart = stfs.f_blocks;
2047 info->AvailableAllocationUnits.QuadPart = stfs.f_bavail;
2048 info->SectorsPerAllocationUnit = 1;
2049 io->Information = sizeof(*info);
2050 io->u.Status = STATUS_SUCCESS;
2051 }
2052 }
2053 break;
2054 case FileFsDeviceInformation:
2055 if (length < sizeof(FILE_FS_DEVICE_INFORMATION))
2056 io->u.Status = STATUS_BUFFER_TOO_SMALL;
2057 else
2058 {
2059 FILE_FS_DEVICE_INFORMATION *info = buffer;
2060
2061 if ((io->u.Status = get_device_info( fd, info )) == STATUS_SUCCESS)
2062 io->Information = sizeof(*info);
2063 }
2064 break;
2065 case FileFsAttributeInformation:
2066 FIXME( "%p: attribute info not supported\n", handle );
2067 break;
2068 case FileFsControlInformation:
2069 FIXME( "%p: control info not supported\n", handle );
2070 break;
2071 case FileFsFullSizeInformation:
2072 FIXME( "%p: full size info not supported\n", handle );
2073 break;
2074 case FileFsObjectIdInformation:
2075 FIXME( "%p: object id info not supported\n", handle );
2076 break;
2077 case FileFsMaximumInformation:
2078 FIXME( "%p: maximum info not supported\n", handle );
2079 break;
2080 default:
2081 io->u.Status = STATUS_INVALID_PARAMETER;
2082 break;
2083 }
2084 if (needs_close) close( fd );
2085 return io->u.Status;
2086 }
2087
2088
2089 /******************************************************************
2090 * NtFlushBuffersFile (NTDLL.@)
2091 *
2092 * Flush any buffered data on an open file handle.
2093 *
2094 * PARAMS
2095 * FileHandle [I] Handle returned from ZwOpenFile() or ZwCreateFile()
2096 * IoStatusBlock [O] Receives information about the operation on return
2097 *
2098 * RETURNS
2099 * Success: 0. IoStatusBlock is updated.
2100 * Failure: An NTSTATUS error code describing the error.
2101 */
2102 NTSTATUS WINAPI NtFlushBuffersFile( HANDLE hFile, IO_STATUS_BLOCK* IoStatusBlock )
2103 {
2104 NTSTATUS ret;
2105 HANDLE hEvent = NULL;
2106
2107 SERVER_START_REQ( flush_file )
2108 {
2109 req->handle = hFile;
2110 ret = wine_server_call( req );
2111 hEvent = reply->event;
2112 }
2113 SERVER_END_REQ;
2114 if (!ret && hEvent)
2115 {
2116 ret = NtWaitForSingleObject( hEvent, FALSE, NULL );
2117 NtClose( hEvent );
2118 }
2119 return ret;
2120 }
2121
2122 /******************************************************************
2123 * NtLockFile (NTDLL.@)
2124 *
2125 *
2126 */
2127 NTSTATUS WINAPI NtLockFile( HANDLE hFile, HANDLE lock_granted_event,
2128 PIO_APC_ROUTINE apc, void* apc_user,
2129 PIO_STATUS_BLOCK io_status, PLARGE_INTEGER offset,
2130 PLARGE_INTEGER count, ULONG* key, BOOLEAN dont_wait,
2131 BOOLEAN exclusive )
2132 {
2133 NTSTATUS ret;
2134 HANDLE handle;
2135 BOOLEAN async;
2136
2137 if (apc || io_status || key)
2138 {
2139 FIXME("Unimplemented yet parameter\n");
2140 return STATUS_NOT_IMPLEMENTED;
2141 }
2142
2143 if (apc_user) FIXME("I/O completion on lock not implemented yet\n");
2144
2145 for (;;)
2146 {
2147 SERVER_START_REQ( lock_file )
2148 {
2149 req->handle = hFile;
2150 req->offset = offset->QuadPart;
2151 req->count = count->QuadPart;
2152 req->shared = !exclusive;
2153 req->wait = !dont_wait;
2154 ret = wine_server_call( req );
2155 handle = reply->handle;
2156 async = reply->overlapped;
2157 }
2158 SERVER_END_REQ;
2159 if (ret != STATUS_PENDING)
2160 {
2161 if (!ret && lock_granted_event) NtSetEvent(lock_granted_event, NULL);
2162 return ret;
2163 }
2164
2165 if (async)
2166 {
2167 FIXME( "Async I/O lock wait not implemented, might deadlock\n" );
2168 if (handle) NtClose( handle );
2169 return STATUS_PENDING;
2170 }
2171 if (handle)
2172 {
2173 NtWaitForSingleObject( handle, FALSE, NULL );
2174 NtClose( handle );
2175 }
2176 else
2177 {
2178 LARGE_INTEGER time;
2179
2180 /* Unix lock conflict, sleep a bit and retry */
2181 time.QuadPart = 100 * (ULONGLONG)10000;
2182 time.QuadPart = -time.QuadPart;
2183 NtDelayExecution( FALSE, &time );
2184 }
2185 }
2186 }
2187
2188
2189 /******************************************************************
2190 * NtUnlockFile (NTDLL.@)
2191 *
2192 *
2193 */
2194 NTSTATUS WINAPI NtUnlockFile( HANDLE hFile, PIO_STATUS_BLOCK io_status,
2195 PLARGE_INTEGER offset, PLARGE_INTEGER count,
2196 PULONG key )
2197 {
2198 NTSTATUS status;
2199
2200 TRACE( "%p %x%08x %x%08x\n",
2201 hFile, offset->u.HighPart, offset->u.LowPart, count->u.HighPart, count->u.LowPart );
2202
2203 if (io_status || key)
2204 {
2205 FIXME("Unimplemented yet parameter\n");
2206 return STATUS_NOT_IMPLEMENTED;
2207 }
2208
2209 SERVER_START_REQ( unlock_file )
2210 {
2211 req->handle = hFile;
2212 req->offset = offset->QuadPart;
2213 req->count = count->QuadPart;
2214 status = wine_server_call( req );
2215 }
2216 SERVER_END_REQ;
2217 return status;
2218 }
2219
2220 /******************************************************************
2221 * NtCreateNamedPipeFile (NTDLL.@)
2222 *
2223 *
2224 */
2225 NTSTATUS WINAPI NtCreateNamedPipeFile( PHANDLE handle, ULONG access,
2226 POBJECT_ATTRIBUTES attr, PIO_STATUS_BLOCK iosb,
2227 ULONG sharing, ULONG dispo, ULONG options,
2228 ULONG pipe_type, ULONG read_mode,
2229 ULONG completion_mode, ULONG max_inst,
2230 ULONG inbound_quota, ULONG outbound_quota,
2231 PLARGE_INTEGER timeout)
2232 {
2233 NTSTATUS status;
2234
2235 TRACE("(%p %x %s %p %x %d %x %d %d %d %d %d %d %p)\n",
2236 handle, access, debugstr_w(attr->ObjectName->Buffer), iosb, sharing, dispo,
2237 options, pipe_type, read_mode, completion_mode, max_inst, inbound_quota,
2238 outbound_quota, timeout);
2239
2240 /* assume we only get relative timeout */
2241 if (timeout->QuadPart > 0)
2242 FIXME("Wrong time %s\n", wine_dbgstr_longlong(timeout->QuadPart));
2243
2244 SERVER_START_REQ( create_named_pipe )
2245 {
2246 req->access = access;
2247 req->attributes = attr->Attributes;
2248 req->rootdir = attr->RootDirectory;
2249 req->options = options;
2250 req->flags =
2251 (pipe_type) ? NAMED_PIPE_MESSAGE_STREAM_WRITE : 0 |
2252 (read_mode) ? NAMED_PIPE_MESSAGE_STREAM_READ : 0 |
2253 (completion_mode) ? NAMED_PIPE_NONBLOCKING_MODE : 0;
2254 req->maxinstances = max_inst;
2255 req->outsize = outbound_quota;
2256 req->insize = inbound_quota;
2257 req->timeout = timeout->QuadPart;
2258 wine_server_add_data( req, attr->ObjectName->Buffer,
2259 attr->ObjectName->Length );
2260 status = wine_server_call( req );
2261 if (!status) *handle = reply->handle;
2262 }
2263 SERVER_END_REQ;
2264 return status;
2265 }
2266
2267 /******************************************************************
2268 * NtDeleteFile (NTDLL.@)
2269 *
2270 *
2271 */
2272 NTSTATUS WINAPI NtDeleteFile( POBJECT_ATTRIBUTES ObjectAttributes )
2273 {
2274 NTSTATUS status;
2275 HANDLE hFile;
2276 IO_STATUS_BLOCK io;
2277
2278 TRACE("%p\n", ObjectAttributes);
2279 status = NtCreateFile( &hFile, GENERIC_READ | GENERIC_WRITE | DELETE,
2280 ObjectAttributes, &io, NULL, 0,
2281 FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE,
2282 FILE_OPEN, FILE_DELETE_ON_CLOSE, NULL, 0 );
2283 if (status == STATUS_SUCCESS) status = NtClose(hFile);
2284 return status;
2285 }
2286
2287 /******************************************************************
2288 * NtCancelIoFile (NTDLL.@)
2289 *
2290 *
2291 */
2292 NTSTATUS WINAPI NtCancelIoFile( HANDLE hFile, PIO_STATUS_BLOCK io_status )
2293 {
2294 LARGE_INTEGER timeout;
2295
2296 TRACE("%p %p\n", hFile, io_status );
2297
2298 SERVER_START_REQ( cancel_async )
2299 {
2300 req->handle = hFile;
2301 wine_server_call( req );
2302 }
2303 SERVER_END_REQ;
2304 /* Let some APC be run, so that we can run the remaining APCs on hFile
2305 * either the cancelation of the pending one, but also the execution
2306 * of the queued APC, but not yet run. This is needed to ensure proper
2307 * clean-up of allocated data.
2308 */
2309 timeout.u.LowPart = timeout.u.HighPart = 0;
2310 return io_status->u.Status = NtDelayExecution( TRUE, &timeout );
2311 }
2312
2313 /******************************************************************************
2314 * NtCreateMailslotFile [NTDLL.@]
2315 * ZwCreateMailslotFile [NTDLL.@]
2316 *
2317 * PARAMS
2318 * pHandle [O] pointer to receive the handle created
2319 * DesiredAccess [I] access mode (read, write, etc)
2320 * ObjectAttributes [I] fully qualified NT path of the mailslot
2321 * IoStatusBlock [O] receives completion status and other info
2322 * CreateOptions [I]
2323 * MailslotQuota [I]
2324 * MaxMessageSize [I]
2325 * TimeOut [I]
2326 *
2327 * RETURNS
2328 * An NT status code
2329 */
2330 NTSTATUS WINAPI NtCreateMailslotFile(PHANDLE pHandle, ULONG DesiredAccess,
2331 POBJECT_ATTRIBUTES attr, PIO_STATUS_BLOCK IoStatusBlock,
2332 ULONG CreateOptions, ULONG MailslotQuota, ULONG MaxMessageSize,
2333 PLARGE_INTEGER TimeOut)
2334 {
2335 LARGE_INTEGER timeout;
2336 NTSTATUS ret;
2337
2338 TRACE("%p %08x %p %p %08x %08x %08x %p\n",
2339 pHandle, DesiredAccess, attr, IoStatusBlock,
2340 CreateOptions, MailslotQuota, MaxMessageSize, TimeOut);
2341
2342 if (!pHandle) return STATUS_ACCESS_VIOLATION;
2343 if (!attr) return STATUS_INVALID_PARAMETER;
2344 if (!attr->ObjectName) return STATUS_OBJECT_PATH_SYNTAX_BAD;
2345
2346 /*
2347 * For a NULL TimeOut pointer set the default timeout value
2348 */
2349 if (!TimeOut)
2350 timeout.QuadPart = -1;
2351 else
2352 timeout.QuadPart = TimeOut->QuadPart;
2353
2354 SERVER_START_REQ( create_mailslot )
2355 {
2356 req->access = DesiredAccess;
2357 req->attributes = attr->Attributes;
2358 req->rootdir = attr->RootDirectory;
2359 req->max_msgsize = MaxMessageSize;
2360 req->read_timeout = timeout.QuadPart;
2361 wine_server_add_data( req, attr->ObjectName->Buffer,
2362 attr->ObjectName->Length );
2363 ret = wine_server_call( req );
2364 if( ret == STATUS_SUCCESS )
2365 *pHandle = reply->handle;
2366 }
2367 SERVER_END_REQ;
2368
2369 return ret;
2370 }
various (hopefully) useful wine hacks