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