mapi32: Add stub of Extended MAPI wrapper for MAPISendMail.
[wine] / dlls / ntdll / file.c
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                 struct timeval tv[2];
1826
1827                 if (!info->LastAccessTime.QuadPart || !info->LastWriteTime.QuadPart)
1828                 {
1829
1830                     tv[0].tv_sec = tv[0].tv_usec = 0;
1831                     tv[1].tv_sec = tv[1].tv_usec = 0;
1832                     if (!fstat( fd, &st ))
1833                     {
1834                         tv[0].tv_sec = st.st_atime;
1835                         tv[1].tv_sec = st.st_mtime;
1836                     }
1837                 }
1838                 if (info->LastAccessTime.QuadPart)
1839                 {
1840                     ULONGLONG sec = info->LastAccessTime.QuadPart / 10000000;
1841                     UINT nsec = info->LastAccessTime.QuadPart % 10000000;
1842                     tv[0].tv_sec = sec - SECS_1601_TO_1970;
1843                     tv[0].tv_usec = nsec / 10;
1844                 }
1845                 if (info->LastWriteTime.QuadPart)
1846                 {
1847                     ULONGLONG sec = info->LastWriteTime.QuadPart / 10000000;
1848                     UINT nsec = info->LastWriteTime.QuadPart % 10000000;
1849                     tv[1].tv_sec = sec - SECS_1601_TO_1970;
1850                     tv[1].tv_usec = nsec / 10;
1851                 }
1852                 if (futimes( fd, tv ) == -1) io->u.Status = FILE_GetNtStatus();
1853             }
1854
1855             if (io->u.Status == STATUS_SUCCESS && info->FileAttributes)
1856             {
1857                 if (fstat( fd, &st ) == -1) io->u.Status = FILE_GetNtStatus();
1858                 else
1859                 {
1860                     if (info->FileAttributes & FILE_ATTRIBUTE_READONLY)
1861                     {
1862                         if (S_ISDIR( st.st_mode))
1863                             WARN("FILE_ATTRIBUTE_READONLY ignored for directory.\n");
1864                         else
1865                             st.st_mode &= ~0222; /* clear write permission bits */
1866                     }
1867                     else
1868                     {
1869                         /* add write permission only where we already have read permission */
1870                         st.st_mode |= (0600 | ((st.st_mode & 044) >> 1)) & (~FILE_umask);
1871                     }
1872                     if (fchmod( fd, st.st_mode ) == -1) io->u.Status = FILE_GetNtStatus();
1873                 }
1874             }
1875
1876             if (needs_close) close( fd );
1877         }
1878         else io->u.Status = STATUS_INVALID_PARAMETER_3;
1879         break;
1880
1881     case FilePositionInformation:
1882         if (len >= sizeof(FILE_POSITION_INFORMATION))
1883         {
1884             const FILE_POSITION_INFORMATION *info = ptr;
1885
1886             if ((io->u.Status = server_get_unix_fd( handle, 0, &fd, &needs_close, NULL, NULL )))
1887                 return io->u.Status;
1888
1889             if (lseek( fd, info->CurrentByteOffset.QuadPart, SEEK_SET ) == (off_t)-1)
1890                 io->u.Status = FILE_GetNtStatus();
1891
1892             if (needs_close) close( fd );
1893         }
1894         else io->u.Status = STATUS_INVALID_PARAMETER_3;
1895         break;
1896
1897     case FileEndOfFileInformation:
1898         if (len >= sizeof(FILE_END_OF_FILE_INFORMATION))
1899         {
1900             struct stat st;
1901             const FILE_END_OF_FILE_INFORMATION *info = ptr;
1902
1903             if ((io->u.Status = server_get_unix_fd( handle, 0, &fd, &needs_close, NULL, NULL )))
1904                 return io->u.Status;
1905
1906             /* first try normal truncate */
1907             if (ftruncate( fd, (off_t)info->EndOfFile.QuadPart ) != -1) break;
1908
1909             /* now check for the need to extend the file */
1910             if (fstat( fd, &st ) != -1 && (off_t)info->EndOfFile.QuadPart > st.st_size)
1911             {
1912                 static const char zero;
1913
1914                 /* extend the file one byte beyond the requested size and then truncate it */
1915                 /* this should work around ftruncate implementations that can't extend files */
1916                 if (pwrite( fd, &zero, 1, (off_t)info->EndOfFile.QuadPart ) != -1 &&
1917                     ftruncate( fd, (off_t)info->EndOfFile.QuadPart ) != -1) break;
1918             }
1919             io->u.Status = FILE_GetNtStatus();
1920
1921             if (needs_close) close( fd );
1922         }
1923         else io->u.Status = STATUS_INVALID_PARAMETER_3;
1924         break;
1925
1926     case FileMailslotSetInformation:
1927         {
1928             FILE_MAILSLOT_SET_INFORMATION *info = ptr;
1929
1930             SERVER_START_REQ( set_mailslot_info )
1931             {
1932                 req->handle = wine_server_obj_handle( handle );
1933                 req->flags = MAILSLOT_SET_READ_TIMEOUT;
1934                 req->read_timeout = info->ReadTimeout.QuadPart;
1935                 io->u.Status = wine_server_call( req );
1936             }
1937             SERVER_END_REQ;
1938         }
1939         break;
1940
1941     case FileCompletionInformation:
1942         if (len >= sizeof(FILE_COMPLETION_INFORMATION))
1943         {
1944             FILE_COMPLETION_INFORMATION *info = ptr;
1945
1946             SERVER_START_REQ( set_completion_info )
1947             {
1948                 req->handle   = wine_server_obj_handle( handle );
1949                 req->chandle  = wine_server_obj_handle( info->CompletionPort );
1950                 req->ckey     = info->CompletionKey;
1951                 io->u.Status  = wine_server_call( req );
1952             }
1953             SERVER_END_REQ;
1954         } else
1955             io->u.Status = STATUS_INVALID_PARAMETER_3;
1956         break;
1957
1958     default:
1959         FIXME("Unsupported class (%d)\n", class);
1960         io->u.Status = STATUS_NOT_IMPLEMENTED;
1961         break;
1962     }
1963     io->Information = 0;
1964     return io->u.Status;
1965 }
1966
1967
1968 /******************************************************************************
1969  *              FILE_QueryFullAttributesFile   (internal)
1970  */
1971 static NTSTATUS FILE_QueryFullAttributesFile( const OBJECT_ATTRIBUTES *attr,
1972                                               FILE_NETWORK_OPEN_INFORMATION *info )
1973 {
1974     ANSI_STRING unix_name;
1975     NTSTATUS status;
1976
1977     if (!(status = wine_nt_to_unix_file_name( attr->ObjectName, &unix_name, FILE_OPEN,
1978                                               !(attr->Attributes & OBJ_CASE_INSENSITIVE) )))
1979     {
1980         struct stat st;
1981
1982         if (stat( unix_name.Buffer, &st ) == -1)
1983             status = FILE_GetNtStatus();
1984         else if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
1985             status = STATUS_INVALID_INFO_CLASS;
1986         else
1987         {
1988             if (S_ISDIR(st.st_mode))
1989             {
1990                 info->FileAttributes          = FILE_ATTRIBUTE_DIRECTORY;
1991                 info->AllocationSize.QuadPart = 0;
1992                 info->EndOfFile.QuadPart      = 0;
1993             }
1994             else
1995             {
1996                 info->FileAttributes          = FILE_ATTRIBUTE_ARCHIVE;
1997                 info->AllocationSize.QuadPart = (ULONGLONG)st.st_blocks * 512;
1998                 info->EndOfFile.QuadPart      = st.st_size;
1999             }
2000             if (!(st.st_mode & (S_IWUSR | S_IWGRP | S_IWOTH)))
2001                 info->FileAttributes |= FILE_ATTRIBUTE_READONLY;
2002             RtlSecondsSince1970ToTime( st.st_mtime, &info->CreationTime );
2003             RtlSecondsSince1970ToTime( st.st_mtime, &info->LastWriteTime );
2004             RtlSecondsSince1970ToTime( st.st_ctime, &info->ChangeTime );
2005             RtlSecondsSince1970ToTime( st.st_atime, &info->LastAccessTime );
2006             if (DIR_is_hidden_file( attr->ObjectName ))
2007                 info->FileAttributes |= FILE_ATTRIBUTE_HIDDEN;
2008         }
2009         RtlFreeAnsiString( &unix_name );
2010     }
2011     else WARN("%s not found (%x)\n", debugstr_us(attr->ObjectName), status );
2012     return status;
2013 }
2014
2015 /******************************************************************************
2016  *              NtQueryFullAttributesFile   (NTDLL.@)
2017  */
2018 NTSTATUS WINAPI NtQueryFullAttributesFile( const OBJECT_ATTRIBUTES *attr,
2019                                            FILE_NETWORK_OPEN_INFORMATION *info )
2020 {
2021     return FILE_QueryFullAttributesFile( attr, info );
2022 }
2023
2024
2025 /******************************************************************************
2026  *              NtQueryAttributesFile   (NTDLL.@)
2027  *              ZwQueryAttributesFile   (NTDLL.@)
2028  */
2029 NTSTATUS WINAPI NtQueryAttributesFile( const OBJECT_ATTRIBUTES *attr, FILE_BASIC_INFORMATION *info )
2030 {
2031     FILE_NETWORK_OPEN_INFORMATION full_info;
2032     NTSTATUS status;
2033
2034     if (!(status = FILE_QueryFullAttributesFile( attr, &full_info )))
2035     {
2036         info->CreationTime.QuadPart   = full_info.CreationTime.QuadPart;
2037         info->LastAccessTime.QuadPart = full_info.LastAccessTime.QuadPart;
2038         info->LastWriteTime.QuadPart  = full_info.LastWriteTime.QuadPart;
2039         info->ChangeTime.QuadPart     = full_info.ChangeTime.QuadPart;
2040         info->FileAttributes          = full_info.FileAttributes;
2041     }
2042     return status;
2043 }
2044
2045
2046 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__APPLE__)
2047 /* helper for FILE_GetDeviceInfo to hide some platform differences in fstatfs */
2048 static inline void get_device_info_fstatfs( FILE_FS_DEVICE_INFORMATION *info, const char *fstypename,
2049                                             unsigned int flags )
2050 {
2051     if (!strcmp("cd9660", fstypename) || !strcmp("udf", fstypename))
2052     {
2053         info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
2054         /* Don't assume read-only, let the mount options set it below */
2055         info->Characteristics |= FILE_REMOVABLE_MEDIA;
2056     }
2057     else if (!strcmp("nfs", fstypename) || !strcmp("nwfs", fstypename) ||
2058              !strcmp("smbfs", fstypename) || !strcmp("afpfs", fstypename))
2059     {
2060         info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
2061         info->Characteristics |= FILE_REMOTE_DEVICE;
2062     }
2063     else if (!strcmp("procfs", fstypename))
2064         info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
2065     else
2066         info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2067
2068     if (flags & MNT_RDONLY)
2069         info->Characteristics |= FILE_READ_ONLY_DEVICE;
2070
2071     if (!(flags & MNT_LOCAL))
2072     {
2073         info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
2074         info->Characteristics |= FILE_REMOTE_DEVICE;
2075     }
2076 }
2077 #endif
2078
2079 static inline int is_device_placeholder( int fd )
2080 {
2081     static const char wine_placeholder[] = "Wine device placeholder";
2082     char buffer[sizeof(wine_placeholder)-1];
2083
2084     if (pread( fd, buffer, sizeof(wine_placeholder) - 1, 0 ) != sizeof(wine_placeholder) - 1)
2085         return 0;
2086     return !memcmp( buffer, wine_placeholder, sizeof(wine_placeholder) - 1 );
2087 }
2088
2089 /******************************************************************************
2090  *              get_device_info
2091  *
2092  * Implementation of the FileFsDeviceInformation query for NtQueryVolumeInformationFile.
2093  */
2094 static NTSTATUS get_device_info( int fd, FILE_FS_DEVICE_INFORMATION *info )
2095 {
2096     struct stat st;
2097
2098     info->Characteristics = 0;
2099     if (fstat( fd, &st ) < 0) return FILE_GetNtStatus();
2100     if (S_ISCHR( st.st_mode ))
2101     {
2102         info->DeviceType = FILE_DEVICE_UNKNOWN;
2103 #ifdef linux
2104         switch(major(st.st_rdev))
2105         {
2106         case MEM_MAJOR:
2107             info->DeviceType = FILE_DEVICE_NULL;
2108             break;
2109         case TTY_MAJOR:
2110             info->DeviceType = FILE_DEVICE_SERIAL_PORT;
2111             break;
2112         case LP_MAJOR:
2113             info->DeviceType = FILE_DEVICE_PARALLEL_PORT;
2114             break;
2115         case SCSI_TAPE_MAJOR:
2116             info->DeviceType = FILE_DEVICE_TAPE;
2117             break;
2118         }
2119 #endif
2120     }
2121     else if (S_ISBLK( st.st_mode ))
2122     {
2123         info->DeviceType = FILE_DEVICE_DISK;
2124     }
2125     else if (S_ISFIFO( st.st_mode ) || S_ISSOCK( st.st_mode ))
2126     {
2127         info->DeviceType = FILE_DEVICE_NAMED_PIPE;
2128     }
2129     else if (is_device_placeholder( fd ))
2130     {
2131         info->DeviceType = FILE_DEVICE_DISK;
2132     }
2133     else  /* regular file or directory */
2134     {
2135 #if defined(linux) && defined(HAVE_FSTATFS)
2136         struct statfs stfs;
2137
2138         /* check for floppy disk */
2139         if (major(st.st_dev) == FLOPPY_MAJOR)
2140             info->Characteristics |= FILE_REMOVABLE_MEDIA;
2141
2142         if (fstatfs( fd, &stfs ) < 0) stfs.f_type = 0;
2143         switch (stfs.f_type)
2144         {
2145         case 0x9660:      /* iso9660 */
2146         case 0x9fa1:      /* supermount */
2147         case 0x15013346:  /* udf */
2148             info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
2149             info->Characteristics |= FILE_REMOVABLE_MEDIA|FILE_READ_ONLY_DEVICE;
2150             break;
2151         case 0x6969:  /* nfs */
2152         case 0x517B:  /* smbfs */
2153         case 0x564c:  /* ncpfs */
2154             info->DeviceType = FILE_DEVICE_NETWORK_FILE_SYSTEM;
2155             info->Characteristics |= FILE_REMOTE_DEVICE;
2156             break;
2157         case 0x01021994:  /* tmpfs */
2158         case 0x28cd3d45:  /* cramfs */
2159         case 0x1373:      /* devfs */
2160         case 0x9fa0:      /* procfs */
2161             info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
2162             break;
2163         default:
2164             info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2165             break;
2166         }
2167 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__OpenBSD__) || defined(__APPLE__)
2168         struct statfs stfs;
2169
2170         if (fstatfs( fd, &stfs ) < 0)
2171             info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2172         else
2173             get_device_info_fstatfs( info, stfs.f_fstypename, stfs.f_flags );
2174 #elif defined(__NetBSD__)
2175         struct statvfs stfs;
2176
2177         if (fstatvfs( fd, &stfs) < 0)
2178             info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2179         else
2180             get_device_info_fstatfs( info, stfs.f_fstypename, stfs.f_flag );
2181 #elif defined(sun)
2182         /* Use dkio to work out device types */
2183         {
2184 # include <sys/dkio.h>
2185 # include <sys/vtoc.h>
2186             struct dk_cinfo dkinf;
2187             int retval = ioctl(fd, DKIOCINFO, &dkinf);
2188             if(retval==-1){
2189                 WARN("Unable to get disk device type information - assuming a disk like device\n");
2190                 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2191             }
2192             switch (dkinf.dki_ctype)
2193             {
2194             case DKC_CDROM:
2195                 info->DeviceType = FILE_DEVICE_CD_ROM_FILE_SYSTEM;
2196                 info->Characteristics |= FILE_REMOVABLE_MEDIA|FILE_READ_ONLY_DEVICE;
2197                 break;
2198             case DKC_NCRFLOPPY:
2199             case DKC_SMSFLOPPY:
2200             case DKC_INTEL82072:
2201             case DKC_INTEL82077:
2202                 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2203                 info->Characteristics |= FILE_REMOVABLE_MEDIA;
2204                 break;
2205             case DKC_MD:
2206                 info->DeviceType = FILE_DEVICE_VIRTUAL_DISK;
2207                 break;
2208             default:
2209                 info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2210             }
2211         }
2212 #else
2213         static int warned;
2214         if (!warned++) FIXME( "device info not properly supported on this platform\n" );
2215         info->DeviceType = FILE_DEVICE_DISK_FILE_SYSTEM;
2216 #endif
2217         info->Characteristics |= FILE_DEVICE_IS_MOUNTED;
2218     }
2219     return STATUS_SUCCESS;
2220 }
2221
2222
2223 /******************************************************************************
2224  *  NtQueryVolumeInformationFile                [NTDLL.@]
2225  *  ZwQueryVolumeInformationFile                [NTDLL.@]
2226  *
2227  * Get volume information for an open file handle.
2228  *
2229  * PARAMS
2230  *  handle      [I] Handle returned from ZwOpenFile() or ZwCreateFile()
2231  *  io          [O] Receives information about the operation on return
2232  *  buffer      [O] Destination for volume information
2233  *  length      [I] Size of FsInformation
2234  *  info_class  [I] Type of volume information to set
2235  *
2236  * RETURNS
2237  *  Success: 0. io and buffer are updated.
2238  *  Failure: An NTSTATUS error code describing the error.
2239  */
2240 NTSTATUS WINAPI NtQueryVolumeInformationFile( HANDLE handle, PIO_STATUS_BLOCK io,
2241                                               PVOID buffer, ULONG length,
2242                                               FS_INFORMATION_CLASS info_class )
2243 {
2244     int fd, needs_close;
2245     struct stat st;
2246     static int once;
2247
2248     if ((io->u.Status = server_get_unix_fd( handle, 0, &fd, &needs_close, NULL, NULL )) != STATUS_SUCCESS)
2249         return io->u.Status;
2250
2251     io->u.Status = STATUS_NOT_IMPLEMENTED;
2252     io->Information = 0;
2253
2254     switch( info_class )
2255     {
2256     case FileFsVolumeInformation:
2257         if (!once++) FIXME( "%p: volume info not supported\n", handle );
2258         break;
2259     case FileFsLabelInformation:
2260         FIXME( "%p: label info not supported\n", handle );
2261         break;
2262     case FileFsSizeInformation:
2263         if (length < sizeof(FILE_FS_SIZE_INFORMATION))
2264             io->u.Status = STATUS_BUFFER_TOO_SMALL;
2265         else
2266         {
2267             FILE_FS_SIZE_INFORMATION *info = buffer;
2268
2269             if (fstat( fd, &st ) < 0)
2270             {
2271                 io->u.Status = FILE_GetNtStatus();
2272                 break;
2273             }
2274             if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))
2275             {
2276                 io->u.Status = STATUS_INVALID_DEVICE_REQUEST;
2277             }
2278             else
2279             {
2280                 ULONGLONG bsize;
2281                 /* Linux's fstatvfs is buggy */
2282 #if !defined(linux) || !defined(HAVE_FSTATFS)
2283                 struct statvfs stfs;
2284
2285                 if (fstatvfs( fd, &stfs ) < 0)
2286                 {
2287                     io->u.Status = FILE_GetNtStatus();
2288                     break;
2289                 }
2290                 bsize = stfs.f_frsize;
2291 #else
2292                 struct statfs stfs;
2293                 if (fstatfs( fd, &stfs ) < 0)
2294                 {
2295                     io->u.Status = FILE_GetNtStatus();
2296                     break;
2297                 }
2298                 bsize = stfs.f_bsize;
2299 #endif
2300                 if (bsize == 2048)  /* assume CD-ROM */
2301                 {
2302                     info->BytesPerSector = 2048;
2303                     info->SectorsPerAllocationUnit = 1;
2304                 }
2305                 else
2306                 {
2307                     info->BytesPerSector = 512;
2308                     info->SectorsPerAllocationUnit = 8;
2309                 }
2310                 info->TotalAllocationUnits.QuadPart = bsize * stfs.f_blocks / (info->BytesPerSector * info->SectorsPerAllocationUnit);
2311                 info->AvailableAllocationUnits.QuadPart = bsize * stfs.f_bavail / (info->BytesPerSector * info->SectorsPerAllocationUnit);
2312                 io->Information = sizeof(*info);
2313                 io->u.Status = STATUS_SUCCESS;
2314             }
2315         }
2316         break;
2317     case FileFsDeviceInformation:
2318         if (length < sizeof(FILE_FS_DEVICE_INFORMATION))
2319             io->u.Status = STATUS_BUFFER_TOO_SMALL;
2320         else
2321         {
2322             FILE_FS_DEVICE_INFORMATION *info = buffer;
2323
2324             if ((io->u.Status = get_device_info( fd, info )) == STATUS_SUCCESS)
2325                 io->Information = sizeof(*info);
2326         }
2327         break;
2328     case FileFsAttributeInformation:
2329         FIXME( "%p: attribute info not supported\n", handle );
2330         break;
2331     case FileFsControlInformation:
2332         FIXME( "%p: control info not supported\n", handle );
2333         break;
2334     case FileFsFullSizeInformation:
2335         FIXME( "%p: full size info not supported\n", handle );
2336         break;
2337     case FileFsObjectIdInformation:
2338         FIXME( "%p: object id info not supported\n", handle );
2339         break;
2340     case FileFsMaximumInformation:
2341         FIXME( "%p: maximum info not supported\n", handle );
2342         break;
2343     default:
2344         io->u.Status = STATUS_INVALID_PARAMETER;
2345         break;
2346     }
2347     if (needs_close) close( fd );
2348     return io->u.Status;
2349 }
2350
2351
2352 /******************************************************************
2353  *              NtQueryEaFile  (NTDLL.@)
2354  *
2355  * Read extended attributes from NTFS files.
2356  *
2357  * PARAMS
2358  *  hFile         [I] File handle, must be opened with FILE_READ_EA access
2359  *  iosb          [O] Receives information about the operation on return
2360  *  buffer        [O] Output buffer
2361  *  length        [I] Length of output buffer
2362  *  single_entry  [I] Only read and return one entry
2363  *  ea_list       [I] Optional list with names of EAs to return
2364  *  ea_list_len   [I] Length of ea_list in bytes
2365  *  ea_index      [I] Optional pointer to 1-based index of attribute to return
2366  *  restart       [I] restart EA scan
2367  *
2368  * RETURNS
2369  *  Success: 0. Atrributes read into buffer
2370  *  Failure: An NTSTATUS error code describing the error.
2371  */
2372 NTSTATUS WINAPI NtQueryEaFile( HANDLE hFile, PIO_STATUS_BLOCK iosb, PVOID buffer, ULONG length,
2373                                BOOLEAN single_entry, PVOID ea_list, ULONG ea_list_len,
2374                                PULONG ea_index, BOOLEAN restart )
2375 {
2376     FIXME("(%p,%p,%p,%d,%d,%p,%d,%p,%d) stub\n",
2377             hFile, iosb, buffer, length, single_entry, ea_list,
2378             ea_list_len, ea_index, restart);
2379     return STATUS_ACCESS_DENIED;
2380 }
2381
2382
2383 /******************************************************************
2384  *              NtSetEaFile  (NTDLL.@)
2385  *
2386  * Update extended attributes for NTFS files.
2387  *
2388  * PARAMS
2389  *  hFile         [I] File handle, must be opened with FILE_READ_EA access
2390  *  iosb          [O] Receives information about the operation on return
2391  *  buffer        [I] Buffer with EA information
2392  *  length        [I] Length of buffer
2393  *
2394  * RETURNS
2395  *  Success: 0. Attributes are updated
2396  *  Failure: An NTSTATUS error code describing the error.
2397  */
2398 NTSTATUS WINAPI NtSetEaFile( HANDLE hFile, PIO_STATUS_BLOCK iosb, PVOID buffer, ULONG length )
2399 {
2400     FIXME("(%p,%p,%p,%d) stub\n", hFile, iosb, buffer, length);
2401     return STATUS_ACCESS_DENIED;
2402 }
2403
2404
2405 /******************************************************************
2406  *              NtFlushBuffersFile  (NTDLL.@)
2407  *
2408  * Flush any buffered data on an open file handle.
2409  *
2410  * PARAMS
2411  *  FileHandle         [I] Handle returned from ZwOpenFile() or ZwCreateFile()
2412  *  IoStatusBlock      [O] Receives information about the operation on return
2413  *
2414  * RETURNS
2415  *  Success: 0. IoStatusBlock is updated.
2416  *  Failure: An NTSTATUS error code describing the error.
2417  */
2418 NTSTATUS WINAPI NtFlushBuffersFile( HANDLE hFile, IO_STATUS_BLOCK* IoStatusBlock )
2419 {
2420     NTSTATUS ret;
2421     HANDLE hEvent = NULL;
2422
2423     SERVER_START_REQ( flush_file )
2424     {
2425         req->handle = wine_server_obj_handle( hFile );
2426         ret = wine_server_call( req );
2427         hEvent = wine_server_ptr_handle( reply->event );
2428     }
2429     SERVER_END_REQ;
2430     if (!ret && hEvent)
2431     {
2432         ret = NtWaitForSingleObject( hEvent, FALSE, NULL );
2433         NtClose( hEvent );
2434     }
2435     return ret;
2436 }
2437
2438 /******************************************************************
2439  *              NtLockFile       (NTDLL.@)
2440  *
2441  *
2442  */
2443 NTSTATUS WINAPI NtLockFile( HANDLE hFile, HANDLE lock_granted_event,
2444                             PIO_APC_ROUTINE apc, void* apc_user,
2445                             PIO_STATUS_BLOCK io_status, PLARGE_INTEGER offset,
2446                             PLARGE_INTEGER count, ULONG* key, BOOLEAN dont_wait,
2447                             BOOLEAN exclusive )
2448 {
2449     NTSTATUS    ret;
2450     HANDLE      handle;
2451     BOOLEAN     async;
2452     static BOOLEAN     warn = TRUE;
2453
2454     if (apc || io_status || key)
2455     {
2456         FIXME("Unimplemented yet parameter\n");
2457         return STATUS_NOT_IMPLEMENTED;
2458     }
2459
2460     if (apc_user && warn)
2461     {
2462         FIXME("I/O completion on lock not implemented yet\n");
2463         warn = FALSE;
2464     }
2465
2466     for (;;)
2467     {
2468         SERVER_START_REQ( lock_file )
2469         {
2470             req->handle      = wine_server_obj_handle( hFile );
2471             req->offset      = offset->QuadPart;
2472             req->count       = count->QuadPart;
2473             req->shared      = !exclusive;
2474             req->wait        = !dont_wait;
2475             ret = wine_server_call( req );
2476             handle = wine_server_ptr_handle( reply->handle );
2477             async  = reply->overlapped;
2478         }
2479         SERVER_END_REQ;
2480         if (ret != STATUS_PENDING)
2481         {
2482             if (!ret && lock_granted_event) NtSetEvent(lock_granted_event, NULL);
2483             return ret;
2484         }
2485
2486         if (async)
2487         {
2488             FIXME( "Async I/O lock wait not implemented, might deadlock\n" );
2489             if (handle) NtClose( handle );
2490             return STATUS_PENDING;
2491         }
2492         if (handle)
2493         {
2494             NtWaitForSingleObject( handle, FALSE, NULL );
2495             NtClose( handle );
2496         }
2497         else
2498         {
2499             LARGE_INTEGER time;
2500     
2501             /* Unix lock conflict, sleep a bit and retry */
2502             time.QuadPart = 100 * (ULONGLONG)10000;
2503             time.QuadPart = -time.QuadPart;
2504             NtDelayExecution( FALSE, &time );
2505         }
2506     }
2507 }
2508
2509
2510 /******************************************************************
2511  *              NtUnlockFile    (NTDLL.@)
2512  *
2513  *
2514  */
2515 NTSTATUS WINAPI NtUnlockFile( HANDLE hFile, PIO_STATUS_BLOCK io_status,
2516                               PLARGE_INTEGER offset, PLARGE_INTEGER count,
2517                               PULONG key )
2518 {
2519     NTSTATUS status;
2520
2521     TRACE( "%p %x%08x %x%08x\n",
2522            hFile, offset->u.HighPart, offset->u.LowPart, count->u.HighPart, count->u.LowPart );
2523
2524     if (io_status || key)
2525     {
2526         FIXME("Unimplemented yet parameter\n");
2527         return STATUS_NOT_IMPLEMENTED;
2528     }
2529
2530     SERVER_START_REQ( unlock_file )
2531     {
2532         req->handle = wine_server_obj_handle( hFile );
2533         req->offset = offset->QuadPart;
2534         req->count  = count->QuadPart;
2535         status = wine_server_call( req );
2536     }
2537     SERVER_END_REQ;
2538     return status;
2539 }
2540
2541 /******************************************************************
2542  *              NtCreateNamedPipeFile    (NTDLL.@)
2543  *
2544  *
2545  */
2546 NTSTATUS WINAPI NtCreateNamedPipeFile( PHANDLE handle, ULONG access,
2547                                        POBJECT_ATTRIBUTES attr, PIO_STATUS_BLOCK iosb,
2548                                        ULONG sharing, ULONG dispo, ULONG options,
2549                                        ULONG pipe_type, ULONG read_mode, 
2550                                        ULONG completion_mode, ULONG max_inst,
2551                                        ULONG inbound_quota, ULONG outbound_quota,
2552                                        PLARGE_INTEGER timeout)
2553 {
2554     NTSTATUS    status;
2555
2556     TRACE("(%p %x %s %p %x %d %x %d %d %d %d %d %d %p)\n",
2557           handle, access, debugstr_w(attr->ObjectName->Buffer), iosb, sharing, dispo,
2558           options, pipe_type, read_mode, completion_mode, max_inst, inbound_quota,
2559           outbound_quota, timeout);
2560
2561     /* assume we only get relative timeout */
2562     if (timeout->QuadPart > 0)
2563         FIXME("Wrong time %s\n", wine_dbgstr_longlong(timeout->QuadPart));
2564
2565     SERVER_START_REQ( create_named_pipe )
2566     {
2567         req->access  = access;
2568         req->attributes = attr->Attributes;
2569         req->rootdir = wine_server_obj_handle( attr->RootDirectory );
2570         req->options = options;
2571         req->flags = 
2572             (pipe_type) ? NAMED_PIPE_MESSAGE_STREAM_WRITE : 0 |
2573             (read_mode) ? NAMED_PIPE_MESSAGE_STREAM_READ  : 0 |
2574             (completion_mode) ? NAMED_PIPE_NONBLOCKING_MODE  : 0;
2575         req->maxinstances = max_inst;
2576         req->outsize = outbound_quota;
2577         req->insize  = inbound_quota;
2578         req->timeout = timeout->QuadPart;
2579         wine_server_add_data( req, attr->ObjectName->Buffer,
2580                               attr->ObjectName->Length );
2581         status = wine_server_call( req );
2582         if (!status) *handle = wine_server_ptr_handle( reply->handle );
2583     }
2584     SERVER_END_REQ;
2585     return status;
2586 }
2587
2588 /******************************************************************
2589  *              NtDeleteFile    (NTDLL.@)
2590  *
2591  *
2592  */
2593 NTSTATUS WINAPI NtDeleteFile( POBJECT_ATTRIBUTES ObjectAttributes )
2594 {
2595     NTSTATUS status;
2596     HANDLE hFile;
2597     IO_STATUS_BLOCK io;
2598
2599     TRACE("%p\n", ObjectAttributes);
2600     status = NtCreateFile( &hFile, GENERIC_READ | GENERIC_WRITE | DELETE,
2601                            ObjectAttributes, &io, NULL, 0,
2602                            FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, 
2603                            FILE_OPEN, FILE_DELETE_ON_CLOSE, NULL, 0 );
2604     if (status == STATUS_SUCCESS) status = NtClose(hFile);
2605     return status;
2606 }
2607
2608 /******************************************************************
2609  *              NtCancelIoFileEx    (NTDLL.@)
2610  *
2611  *
2612  */
2613 NTSTATUS WINAPI NtCancelIoFileEx( HANDLE hFile, PIO_STATUS_BLOCK iosb, PIO_STATUS_BLOCK io_status )
2614 {
2615     LARGE_INTEGER timeout;
2616
2617     TRACE("%p %p %p\n", hFile, iosb, io_status );
2618
2619     SERVER_START_REQ( cancel_async )
2620     {
2621         req->handle      = wine_server_obj_handle( hFile );
2622         req->iosb        = wine_server_client_ptr( iosb );
2623         req->only_thread = FALSE;
2624         io_status->u.Status = wine_server_call( req );
2625     }
2626     SERVER_END_REQ;
2627     if (io_status->u.Status)
2628         return io_status->u.Status;
2629
2630     /* Let some APC be run, so that we can run the remaining APCs on hFile
2631      * either the cancelation of the pending one, but also the execution
2632      * of the queued APC, but not yet run. This is needed to ensure proper
2633      * clean-up of allocated data.
2634      */
2635     timeout.u.LowPart = timeout.u.HighPart = 0;
2636     NtDelayExecution( TRUE, &timeout );
2637     return io_status->u.Status;
2638 }
2639
2640 /******************************************************************
2641  *              NtCancelIoFile    (NTDLL.@)
2642  *
2643  *
2644  */
2645 NTSTATUS WINAPI NtCancelIoFile( HANDLE hFile, PIO_STATUS_BLOCK io_status )
2646 {
2647     LARGE_INTEGER timeout;
2648
2649     TRACE("%p %p\n", hFile, io_status );
2650
2651     SERVER_START_REQ( cancel_async )
2652     {
2653         req->handle      = wine_server_obj_handle( hFile );
2654         req->iosb        = 0;
2655         req->only_thread = TRUE;
2656         io_status->u.Status = wine_server_call( req );
2657     }
2658     SERVER_END_REQ;
2659     if (io_status->u.Status)
2660         return io_status->u.Status;
2661
2662     /* Let some APC be run, so that we can run the remaining APCs on hFile
2663      * either the cancelation of the pending one, but also the execution
2664      * of the queued APC, but not yet run. This is needed to ensure proper
2665      * clean-up of allocated data.
2666      */
2667     timeout.u.LowPart = timeout.u.HighPart = 0;
2668     NtDelayExecution( TRUE, &timeout );
2669     return io_status->u.Status;
2670 }
2671
2672 /******************************************************************************
2673  *  NtCreateMailslotFile        [NTDLL.@]
2674  *  ZwCreateMailslotFile        [NTDLL.@]
2675  *
2676  * PARAMS
2677  *  pHandle          [O] pointer to receive the handle created
2678  *  DesiredAccess    [I] access mode (read, write, etc)
2679  *  ObjectAttributes [I] fully qualified NT path of the mailslot
2680  *  IoStatusBlock    [O] receives completion status and other info
2681  *  CreateOptions    [I]
2682  *  MailslotQuota    [I]
2683  *  MaxMessageSize   [I]
2684  *  TimeOut          [I]
2685  *
2686  * RETURNS
2687  *  An NT status code
2688  */
2689 NTSTATUS WINAPI NtCreateMailslotFile(PHANDLE pHandle, ULONG DesiredAccess,
2690      POBJECT_ATTRIBUTES attr, PIO_STATUS_BLOCK IoStatusBlock,
2691      ULONG CreateOptions, ULONG MailslotQuota, ULONG MaxMessageSize,
2692      PLARGE_INTEGER TimeOut)
2693 {
2694     LARGE_INTEGER timeout;
2695     NTSTATUS ret;
2696
2697     TRACE("%p %08x %p %p %08x %08x %08x %p\n",
2698               pHandle, DesiredAccess, attr, IoStatusBlock,
2699               CreateOptions, MailslotQuota, MaxMessageSize, TimeOut);
2700
2701     if (!pHandle) return STATUS_ACCESS_VIOLATION;
2702     if (!attr) return STATUS_INVALID_PARAMETER;
2703     if (!attr->ObjectName) return STATUS_OBJECT_PATH_SYNTAX_BAD;
2704
2705     /*
2706      *  For a NULL TimeOut pointer set the default timeout value
2707      */
2708     if  (!TimeOut)
2709         timeout.QuadPart = -1;
2710     else
2711         timeout.QuadPart = TimeOut->QuadPart;
2712
2713     SERVER_START_REQ( create_mailslot )
2714     {
2715         req->access = DesiredAccess;
2716         req->attributes = attr->Attributes;
2717         req->rootdir = wine_server_obj_handle( attr->RootDirectory );
2718         req->max_msgsize = MaxMessageSize;
2719         req->read_timeout = timeout.QuadPart;
2720         wine_server_add_data( req, attr->ObjectName->Buffer,
2721                               attr->ObjectName->Length );
2722         ret = wine_server_call( req );
2723         if( ret == STATUS_SUCCESS )
2724             *pHandle = wine_server_ptr_handle( reply->handle );
2725     }
2726     SERVER_END_REQ;
2727  
2728     return ret;
2729 }