mapping.c 24.8 KB
Newer Older
1 2 3 4
/*
 * Server-side file mapping management
 *
 * Copyright (C) 1999 Alexandre Julliard
5 6 7 8 9 10 11 12 13 14 15 16 17
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
18
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 20
 */

21
#include "config.h"
22
#include "wine/port.h"
23

24
#include <assert.h>
25
#include <stdarg.h>
26 27
#include <stdio.h>
#include <stdlib.h>
28
#include <sys/stat.h>
29 30 31
#ifdef HAVE_SYS_MMAN_H
# include <sys/mman.h>
#endif
32 33
#include <unistd.h>

34 35
#include "ntstatus.h"
#define WIN32_NO_STATUS
36
#include "windef.h"
37
#include "winternl.h"
38

39
#include "file.h"
40 41
#include "handle.h"
#include "thread.h"
42
#include "request.h"
43
#include "security.h"
44

45 46 47 48 49 50 51 52 53 54 55 56
/* list of memory ranges, used to store committed info */
struct ranges
{
    unsigned int count;
    unsigned int max;
    struct range
    {
        file_pos_t  start;
        file_pos_t  end;
    } ranges[1];
};

57 58
struct mapping
{
59
    struct object   obj;             /* object header */
60
    mem_size_t      size;            /* mapping size */
61
    int             protect;         /* protection flags */
62
    struct fd      *fd;              /* fd for mapped file */
63
    int             header_size;     /* size of headers (for PE image mapping) */
64
    client_ptr_t    base;            /* default base addr (for PE image mapping) */
65
    struct ranges  *committed;       /* list of committed ranges in this mapping */
66
    struct file    *shared_file;     /* temp file for shared PE mapping */
67
    struct list     shared_entry;    /* entry in global shared PE mappings list */
68 69 70
};

static void mapping_dump( struct object *obj, int verbose );
71
static struct object_type *mapping_get_type( struct object *obj );
72
static struct fd *mapping_get_fd( struct object *obj );
73
static unsigned int mapping_map_access( struct object *obj, unsigned int access );
74
static void mapping_destroy( struct object *obj );
75
static enum server_fd_type mapping_get_fd_type( struct fd *fd );
76 77 78

static const struct object_ops mapping_ops =
{
79 80
    sizeof(struct mapping),      /* size */
    mapping_dump,                /* dump */
81
    mapping_get_type,            /* get_type */
82 83 84 85
    no_add_queue,                /* add_queue */
    NULL,                        /* remove_queue */
    NULL,                        /* signaled */
    NULL,                        /* satisfied */
86
    no_signal,                   /* signal */
87
    mapping_get_fd,              /* get_fd */
88
    mapping_map_access,          /* map_access */
89 90
    default_get_sd,              /* get_sd */
    default_set_sd,              /* set_sd */
91
    no_lookup_name,              /* lookup_name */
92
    no_open_file,                /* open_file */
93
    fd_close_handle,             /* close_handle */
94
    mapping_destroy              /* destroy */
95 96
};

97 98 99 100 101 102 103 104 105 106 107 108
static const struct fd_ops mapping_fd_ops =
{
    default_fd_get_poll_events,   /* get_poll_events */
    default_poll_event,           /* poll_event */
    no_flush,                     /* flush */
    mapping_get_fd_type,          /* get_fd_type */
    no_fd_ioctl,                  /* ioctl */
    no_fd_queue_async,            /* queue_async */
    default_fd_reselect_async,    /* reselect_async */
    default_fd_cancel_async       /* cancel_async */
};

109
static struct list shared_list = LIST_INIT(shared_list);
110

111 112 113 114 115
#ifdef __i386__

/* These are always the same on an i386, and it will be faster this way */
# define page_mask  0xfff
# define page_shift 12
116
# define init_page_size() do { /* nothing */ } while(0)
117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141

#else  /* __i386__ */

static int page_shift, page_mask;

static void init_page_size(void)
{
    int page_size;
# ifdef HAVE_GETPAGESIZE
    page_size = getpagesize();
# else
#  ifdef __svr4__
    page_size = sysconf(_SC_PAGESIZE);
#  else
#   error Cannot get the page size on this platform
#  endif
# endif
    page_mask = page_size - 1;
    /* Make sure we have a power of 2 */
    assert( !(page_size & page_mask) );
    page_shift = 0;
    while ((1 << page_shift) != page_size) page_shift++;
}
#endif  /* __i386__ */

142
#define ROUND_SIZE(size)  (((size) + page_mask) & ~page_mask)
143 144


145
/* extend a file beyond the current end of file */
146
static int grow_file( int unix_fd, file_pos_t new_size )
147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166
{
    static const char zero;
    off_t size = new_size;

    if (sizeof(new_size) > sizeof(size) && size != new_size)
    {
        set_error( STATUS_INVALID_PARAMETER );
        return 0;
    }
    /* extend the file one byte beyond the requested size and then truncate it */
    /* this should work around ftruncate implementations that can't extend files */
    if (pwrite( unix_fd, &zero, 1, size ) != -1)
    {
        ftruncate( unix_fd, size );
        return 1;
    }
    file_set_error();
    return 0;
}

167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185
/* check if the current directory allows exec mappings */
static int check_current_dir_for_exec(void)
{
    int fd;
    char tmpfn[] = "anonmap.XXXXXX";
    void *ret = MAP_FAILED;

    fd = mkstemps( tmpfn, 0 );
    if (fd == -1) return 0;
    if (grow_file( fd, 1 ))
    {
        ret = mmap( NULL, get_page_size(), PROT_READ | PROT_EXEC, MAP_PRIVATE, fd, 0 );
        if (ret != MAP_FAILED) munmap( ret, get_page_size() );
    }
    close( fd );
    unlink( tmpfn );
    return (ret != MAP_FAILED);
}

186
/* create a temp file for anonymous mappings */
187
static int create_temp_file( file_pos_t size )
188
{
189 190
    static int temp_dir_fd = -1;
    char tmpfn[] = "anonmap.XXXXXX";
191 192
    int fd;

193 194 195 196 197 198 199 200 201 202 203 204 205 206 207
    if (temp_dir_fd == -1)
    {
        temp_dir_fd = server_dir_fd;
        if (!check_current_dir_for_exec())
        {
            /* the server dir is noexec, try the config dir instead */
            fchdir( config_dir_fd );
            if (check_current_dir_for_exec())
                temp_dir_fd = config_dir_fd;
            else  /* neither works, fall back to server dir */
                fchdir( server_dir_fd );
        }
    }
    else if (temp_dir_fd != server_dir_fd) fchdir( temp_dir_fd );

208
    fd = mkstemps( tmpfn, 0 );
209
    if (fd != -1)
210
    {
211 212 213 214 215 216
        if (!grow_file( fd, size ))
        {
            close( fd );
            fd = -1;
        }
        unlink( tmpfn );
217
    }
218
    else file_set_error();
219 220

    if (temp_dir_fd != server_dir_fd) fchdir( server_dir_fd );
221
    return fd;
222 223
}

224 225 226 227 228
/* find the shared PE mapping for a given mapping */
static struct file *get_shared_file( struct mapping *mapping )
{
    struct mapping *ptr;

229
    LIST_FOR_EACH_ENTRY( ptr, &shared_list, struct mapping, shared_entry )
230
        if (is_same_file_fd( ptr->fd, mapping->fd ))
231 232 233 234
            return (struct file *)grab_object( ptr->shared_file );
    return NULL;
}

235 236 237
/* return the size of the memory mapping and file range of a given section */
static inline void get_section_sizes( const IMAGE_SECTION_HEADER *sec, size_t *map_size,
                                      off_t *file_start, size_t *file_size )
238
{
239
    static const unsigned int sector_align = 0x1ff;
240

241 242 243 244 245 246
    if (!sec->Misc.VirtualSize) *map_size = ROUND_SIZE( sec->SizeOfRawData );
    else *map_size = ROUND_SIZE( sec->Misc.VirtualSize );

    *file_start = sec->PointerToRawData & ~sector_align;
    *file_size = (sec->SizeOfRawData + (sec->PointerToRawData & sector_align) + sector_align) & ~sector_align;
    if (*file_size > *map_size) *file_size = *map_size;
247 248
}

249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296
/* add a range to the committed list */
static void add_committed_range( struct mapping *mapping, file_pos_t start, file_pos_t end )
{
    unsigned int i, j;
    struct range *ranges;

    if (!mapping->committed) return;  /* everything committed already */

    for (i = 0, ranges = mapping->committed->ranges; i < mapping->committed->count; i++)
    {
        if (ranges[i].start > end) break;
        if (ranges[i].end < start) continue;
        if (ranges[i].start > start) ranges[i].start = start;   /* extend downwards */
        if (ranges[i].end < end)  /* extend upwards and maybe merge with next */
        {
            for (j = i + 1; j < mapping->committed->count; j++)
            {
                if (ranges[j].start > end) break;
                if (ranges[j].end > end) end = ranges[j].end;
            }
            if (j > i + 1)
            {
                memmove( &ranges[i + 1], &ranges[j], (mapping->committed->count - j) * sizeof(*ranges) );
                mapping->committed->count -= j - (i + 1);
            }
            ranges[i].end = end;
        }
        return;
    }

    /* now add a new range */

    if (mapping->committed->count == mapping->committed->max)
    {
        unsigned int new_size = mapping->committed->max * 2;
        struct ranges *new_ptr = realloc( mapping->committed, offsetof( struct ranges, ranges[new_size] ));
        if (!new_ptr) return;
        new_ptr->max = new_size;
        ranges = new_ptr->ranges;
        mapping->committed = new_ptr;
    }
    memmove( &ranges[i + 1], &ranges[i], (mapping->committed->count - i) * sizeof(*ranges) );
    ranges[i].start = start;
    ranges[i].end = end;
    mapping->committed->count++;
}

/* find the range containing start and return whether it's committed */
297
static int find_committed_range( struct mapping *mapping, file_pos_t start, mem_size_t *size )
298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323
{
    unsigned int i;
    struct range *ranges;

    if (!mapping->committed)  /* everything is committed */
    {
        *size = mapping->size - start;
        return 1;
    }
    for (i = 0, ranges = mapping->committed->ranges; i < mapping->committed->count; i++)
    {
        if (ranges[i].start > start)
        {
            *size = ranges[i].start - start;
            return 0;
        }
        if (ranges[i].end > start)
        {
            *size = ranges[i].end - start;
            return 1;
        }
    }
    *size = mapping->size - start;
    return 0;
}

324 325
/* allocate and fill the temp file for a shared PE image mapping */
static int build_shared_mapping( struct mapping *mapping, int fd,
326
                                 IMAGE_SECTION_HEADER *sec, unsigned int nb_sec )
327
{
328
    unsigned int i;
329
    mem_size_t total_size;
330
    size_t file_size, map_size, max_size;
331
    off_t shared_pos, read_pos, write_pos;
332 333
    char *buffer = NULL;
    int shared_fd;
334
    long toread;
335 336 337 338 339 340 341 342 343

    /* compute the total size of the shared mapping */

    total_size = max_size = 0;
    for (i = 0; i < nb_sec; i++)
    {
        if ((sec[i].Characteristics & IMAGE_SCN_MEM_SHARED) &&
            (sec[i].Characteristics & IMAGE_SCN_MEM_WRITE))
        {
344 345 346
            get_section_sizes( &sec[i], &map_size, &read_pos, &file_size );
            if (file_size > max_size) max_size = file_size;
            total_size += map_size;
347 348
        }
    }
349
    if (!total_size) return 1;  /* nothing to do */
350

351 352
    if ((mapping->shared_file = get_shared_file( mapping ))) return 1;

353 354
    /* create a temp file for the mapping */

355 356 357
    if ((shared_fd = create_temp_file( total_size )) == -1) return 0;
    if (!(mapping->shared_file = create_file_for_fd( shared_fd, FILE_GENERIC_READ|FILE_GENERIC_WRITE, 0 )))
        return 0;
358 359 360 361 362

    if (!(buffer = malloc( max_size ))) goto error;

    /* copy the shared sections data into the temp file */

363 364
    shared_pos = 0;
    for (i = 0; i < nb_sec; i++)
365 366 367
    {
        if (!(sec[i].Characteristics & IMAGE_SCN_MEM_SHARED)) continue;
        if (!(sec[i].Characteristics & IMAGE_SCN_MEM_WRITE)) continue;
368
        get_section_sizes( &sec[i], &map_size, &read_pos, &file_size );
369
        write_pos = shared_pos;
370 371 372
        shared_pos += map_size;
        if (!sec[i].PointerToRawData || !file_size) continue;
        toread = file_size;
373 374
        while (toread)
        {
375
            long res = pread( fd, buffer + file_size - toread, toread, read_pos );
376 377 378 379 380
            if (!res && toread < 0x200)  /* partial sector at EOF is not an error */
            {
                file_size -= toread;
                break;
            }
381 382
            if (res <= 0) goto error;
            toread -= res;
383
            read_pos += res;
384
        }
385
        if (pwrite( shared_fd, buffer, file_size, write_pos ) != file_size) goto error;
386 387 388 389 390
    }
    free( buffer );
    return 1;

 error:
391 392
    release_object( mapping->shared_file );
    mapping->shared_file = NULL;
393
    free( buffer );
394 395 396 397
    return 0;
}

/* retrieve the mapping parameters for an executable (PE) image */
398
static int get_image_params( struct mapping *mapping, int unix_fd )
399 400 401
{
    IMAGE_DOS_HEADER dos;
    IMAGE_SECTION_HEADER *sec = NULL;
402 403 404 405 406 407 408 409 410 411
    struct
    {
        DWORD Signature;
        IMAGE_FILE_HEADER FileHeader;
        union
        {
            IMAGE_OPTIONAL_HEADER32 hdr32;
            IMAGE_OPTIONAL_HEADER64 hdr64;
        } opt;
    } nt;
412
    off_t pos;
413
    int size;
414 415 416

    /* load the headers */

417
    if (pread( unix_fd, &dos, sizeof(dos), 0 ) != sizeof(dos)) goto error;
418
    if (dos.e_magic != IMAGE_DOS_SIGNATURE) goto error;
419
    pos = dos.e_lfanew;
420

421 422 423 424
    size = pread( unix_fd, &nt, sizeof(nt), pos );
    if (size < sizeof(nt.Signature) + sizeof(nt.FileHeader)) goto error;
    /* zero out Optional header in the case it's not present or partial */
    if (size < sizeof(nt)) memset( (char *)&nt + size, 0, sizeof(nt) - size );
425
    if (nt.Signature != IMAGE_NT_SIGNATURE) goto error;
426 427 428 429 430 431 432 433 434 435 436 437 438 439

    switch (nt.opt.hdr32.Magic)
    {
    case IMAGE_NT_OPTIONAL_HDR32_MAGIC:
        mapping->size        = ROUND_SIZE( nt.opt.hdr32.SizeOfImage );
        mapping->base        = nt.opt.hdr32.ImageBase;
        mapping->header_size = nt.opt.hdr32.SizeOfHeaders;
        break;
    case IMAGE_NT_OPTIONAL_HDR64_MAGIC:
        mapping->size        = ROUND_SIZE( nt.opt.hdr64.SizeOfImage );
        mapping->base        = nt.opt.hdr64.ImageBase;
        mapping->header_size = nt.opt.hdr64.SizeOfHeaders;
        break;
    default:
440
        goto error;
441
    }
442 443 444

    /* load the section headers */

445
    pos += sizeof(nt.Signature) + sizeof(nt.FileHeader) + nt.FileHeader.SizeOfOptionalHeader;
446
    size = sizeof(*sec) * nt.FileHeader.NumberOfSections;
447 448
    if (pos + size > mapping->size) goto error;
    if (pos + size > mapping->header_size) mapping->header_size = pos + size;
449
    if (!(sec = malloc( size ))) goto error;
450
    if (pread( unix_fd, sec, size, pos ) != size) goto error;
451

452
    if (!build_shared_mapping( mapping, unix_fd, sec, nt.FileHeader.NumberOfSections )) goto error;
453

454
    if (mapping->shared_file) list_add_head( &shared_list, &mapping->shared_entry );
455

456
    mapping->protect = VPROT_IMAGE;
457 458 459 460
    free( sec );
    return 1;

 error:
461
    free( sec );
462 463 464 465
    set_error( STATUS_INVALID_FILE_FOR_SECTION );
    return 0;
}

466
static struct object *create_mapping( struct directory *root, const struct unicode_str *name,
467
                                      unsigned int attr, mem_size_t size, int protect,
468
                                      obj_handle_t handle, const struct security_descriptor *sd )
469 470
{
    struct mapping *mapping;
471 472
    struct file *file;
    struct fd *fd;
473
    int access = 0;
474 475
    int unix_fd;
    struct stat st;
476 477

    if (!page_mask) init_page_size();
478

479
    if (!(mapping = create_named_object_dir( root, name, attr, &mapping_ops )))
480
        return NULL;
481
    if (get_error() == STATUS_OBJECT_NAME_EXISTS)
482 483
        return &mapping->obj;  /* Nothing else to do */

484 485 486 487
    if (sd) default_set_sd( &mapping->obj, sd, OWNER_SECURITY_INFORMATION|
                                               GROUP_SECURITY_INFORMATION|
                                               DACL_SECURITY_INFORMATION|
                                               SACL_SECURITY_INFORMATION );
488
    mapping->header_size = 0;
489
    mapping->base        = 0;
490
    mapping->fd          = NULL;
491
    mapping->shared_file = NULL;
492
    mapping->committed   = NULL;
493

494 495
    if (protect & VPROT_READ) access |= FILE_READ_DATA;
    if (protect & VPROT_WRITE) access |= FILE_WRITE_DATA;
496

497
    if (handle)
498
    {
499
        const unsigned int sharing = FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE;
500
        unsigned int mapping_access = FILE_MAPPING_ACCESS;
501

502 503 504 505 506
        if (!(protect & VPROT_COMMITTED))
        {
            set_error( STATUS_INVALID_PARAMETER );
            goto error;
        }
507 508
        if (!(file = get_file_obj( current->process, handle, access ))) goto error;
        fd = get_obj_fd( (struct object *)file );
509 510 511 512

        /* file sharing rules for mappings are different so we use magic the access rights */
        if (protect & VPROT_IMAGE) mapping_access |= FILE_MAPPING_IMAGE;
        else if (protect & VPROT_WRITE) mapping_access |= FILE_MAPPING_WRITE;
513 514 515 516 517 518

        if (!(mapping->fd = get_fd_object_for_mapping( fd, mapping_access, sharing )))
        {
            mapping->fd = dup_fd_object( fd, mapping_access, sharing, FILE_SYNCHRONOUS_IO_NONALERT );
            if (mapping->fd) set_fd_user( mapping->fd, &mapping_fd_ops, NULL );
        }
519 520 521 522
        release_object( file );
        release_object( fd );
        if (!mapping->fd) goto error;

523
        if ((unix_fd = get_unix_fd( mapping->fd )) == -1) goto error;
524 525
        if (protect & VPROT_IMAGE)
        {
526
            if (!get_image_params( mapping, unix_fd )) goto error;
527 528
            return &mapping->obj;
        }
529 530 531 532 533
        if (fstat( unix_fd, &st ) == -1)
        {
            file_set_error();
            goto error;
        }
534
        if (!size)
535
        {
536
            if (!(size = st.st_size))
537
            {
538
                set_error( STATUS_MAPPED_FILE_SIZE_ZERO );
539 540
                goto error;
            }
541
        }
542
        else if (st.st_size < size && !grow_file( unix_fd, size )) goto error;
543
    }
544 545
    else  /* Anonymous mapping (no associated file) */
    {
546
        if (!size || (protect & VPROT_IMAGE))
547
        {
548
            set_error( STATUS_INVALID_PARAMETER );
549 550
            goto error;
        }
551 552 553 554 555 556
        if (!(protect & VPROT_COMMITTED))
        {
            if (!(mapping->committed = mem_alloc( offsetof(struct ranges, ranges[8]) ))) goto error;
            mapping->committed->count = 0;
            mapping->committed->max   = 8;
        }
557 558 559
        if ((unix_fd = create_temp_file( size )) == -1) goto error;
        if (!(mapping->fd = create_anonymous_fd( &mapping_fd_ops, unix_fd, &mapping->obj,
                                                 FILE_SYNCHRONOUS_IO_NONALERT ))) goto error;
560
        allow_fd_caching( mapping->fd );
561
    }
562
    mapping->size    = (size + page_mask) & ~((mem_size_t)page_mask);
563
    mapping->protect = protect;
564
    return &mapping->obj;
565 566 567 568

 error:
    release_object( mapping );
    return NULL;
569 570
}

571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588
struct mapping *get_mapping_obj( struct process *process, obj_handle_t handle, unsigned int access )
{
    return (struct mapping *)get_handle_obj( process, handle, access, &mapping_ops );
}

/* open a new file handle to the file backing the mapping */
obj_handle_t open_mapping_file( struct process *process, struct mapping *mapping,
                                unsigned int access, unsigned int sharing )
{
    obj_handle_t handle;
    struct file *file = create_file_for_fd_obj( mapping->fd, access, sharing );

    if (!file) return 0;
    handle = alloc_handle( process, file, access, 0 );
    release_object( file );
    return handle;
}

589 590 591 592 593 594
struct mapping *grab_mapping_unless_removable( struct mapping *mapping )
{
    if (is_fd_removable( mapping->fd )) return NULL;
    return (struct mapping *)grab_object( mapping );
}

595 596 597 598
static void mapping_dump( struct object *obj, int verbose )
{
    struct mapping *mapping = (struct mapping *)obj;
    assert( obj->ops == &mapping_ops );
599
    fprintf( stderr, "Mapping size=%08x%08x prot=%08x fd=%p header_size=%08x base=%08lx "
600
             "shared_file=%p ",
601
             (unsigned int)(mapping->size >> 32), (unsigned int)mapping->size,
602
             mapping->protect, mapping->fd, mapping->header_size,
603
             (unsigned long)mapping->base, mapping->shared_file );
604 605
    dump_object_name( &mapping->obj );
    fputc( '\n', stderr );
606 607
}

608 609 610 611 612 613 614
static struct object_type *mapping_get_type( struct object *obj )
{
    static const WCHAR name[] = {'S','e','c','t','i','o','n'};
    static const struct unicode_str str = { name, sizeof(name) };
    return get_object_type( &str );
}

615 616 617
static struct fd *mapping_get_fd( struct object *obj )
{
    struct mapping *mapping = (struct mapping *)obj;
618
    return (struct fd *)grab_object( mapping->fd );
619 620
}

621 622 623 624 625 626 627 628 629
static unsigned int mapping_map_access( struct object *obj, unsigned int access )
{
    if (access & GENERIC_READ)    access |= STANDARD_RIGHTS_READ | SECTION_QUERY | SECTION_MAP_READ;
    if (access & GENERIC_WRITE)   access |= STANDARD_RIGHTS_WRITE | SECTION_MAP_WRITE;
    if (access & GENERIC_EXECUTE) access |= STANDARD_RIGHTS_EXECUTE | SECTION_MAP_EXECUTE;
    if (access & GENERIC_ALL)     access |= SECTION_ALL_ACCESS;
    return access & ~(GENERIC_READ | GENERIC_WRITE | GENERIC_EXECUTE | GENERIC_ALL);
}

630 631 632 633
static void mapping_destroy( struct object *obj )
{
    struct mapping *mapping = (struct mapping *)obj;
    assert( obj->ops == &mapping_ops );
634
    if (mapping->fd) release_object( mapping->fd );
635 636 637
    if (mapping->shared_file)
    {
        release_object( mapping->shared_file );
638
        list_remove( &mapping->shared_entry );
639
    }
640
    free( mapping->committed );
641
}
642

643 644 645 646 647
static enum server_fd_type mapping_get_fd_type( struct fd *fd )
{
    return FD_TYPE_FILE;
}

648 649 650 651 652 653
int get_page_size(void)
{
    if (!page_mask) init_page_size();
    return page_mask + 1;
}

654 655 656 657
/* create a file mapping */
DECL_HANDLER(create_mapping)
{
    struct object *obj;
658
    struct unicode_str name;
659
    struct directory *root = NULL;
660 661
    const struct object_attributes *objattr = get_req_data();
    const struct security_descriptor *sd;
662

663
    reply->handle = 0;
664 665 666 667 668

    if (!objattr_is_valid( objattr, get_req_data_size() ))
        return;

    sd = objattr->sd_len ? (const struct security_descriptor *)(objattr + 1) : NULL;
669
    objattr_get_name( objattr, &name );
670 671

    if (objattr->rootdir && !(root = get_directory_obj( current->process, objattr->rootdir, 0 )))
672 673
        return;

674
    if ((obj = create_mapping( root, &name, req->attributes, req->size, req->protect, req->file_handle, sd )))
675
    {
676 677 678 679
        if (get_error() == STATUS_OBJECT_NAME_EXISTS)
            reply->handle = alloc_handle( current->process, obj, req->access, req->attributes );
        else
            reply->handle = alloc_handle_no_access_check( current->process, obj, req->access, req->attributes );
680 681
        release_object( obj );
    }
682 683

    if (root) release_object( root );
684 685 686 687 688
}

/* open a handle to a mapping */
DECL_HANDLER(open_mapping)
{
689
    struct unicode_str name;
690
    struct directory *root = NULL;
691
    struct mapping *mapping;
692 693

    get_req_unicode_str( &name );
694 695 696
    if (req->rootdir && !(root = get_directory_obj( current->process, req->rootdir, 0 )))
        return;

697 698
    if ((mapping = open_object_dir( root, &name, req->attributes, &mapping_ops )))
    {
699
        reply->handle = alloc_handle( current->process, &mapping->obj, req->access, req->attributes );
700 701
        release_object( mapping );
    }
702 703

    if (root) release_object( root );
704 705 706 707 708
}

/* get a mapping information */
DECL_HANDLER(get_mapping_info)
{
709
    struct mapping *mapping;
710
    struct fd *fd;
711

712
    if ((mapping = get_mapping_obj( current->process, req->handle, req->access )))
713
    {
714
        reply->size        = mapping->size;
715 716 717 718
        reply->protect     = mapping->protect;
        reply->header_size = mapping->header_size;
        reply->base        = mapping->base;
        reply->shared_file = 0;
719 720 721 722 723 724
        if ((fd = get_obj_fd( &mapping->obj )))
        {
            if (!is_fd_removable(fd))
                reply->mapping = alloc_handle( current->process, mapping, 0, 0 );
            release_object( fd );
        }
725
        if (mapping->shared_file)
726 727 728 729 730 731 732
        {
            if (!(reply->shared_file = alloc_handle( current->process, mapping->shared_file,
                                                     GENERIC_READ|GENERIC_WRITE, 0 )))
            {
                if (reply->mapping) close_handle( current->process, reply->mapping );
            }
        }
733 734
        release_object( mapping );
    }
735
}
736 737 738 739 740 741

/* get a range of committed pages in a file mapping */
DECL_HANDLER(get_mapping_committed_range)
{
    struct mapping *mapping;

742
    if ((mapping = get_mapping_obj( current->process, req->handle, 0 )))
743 744 745 746 747 748 749 750 751 752 753 754 755 756 757
    {
        if (!(req->offset & page_mask) && req->offset < mapping->size)
            reply->committed = find_committed_range( mapping, req->offset, &reply->size );
        else
            set_error( STATUS_INVALID_PARAMETER );

        release_object( mapping );
    }
}

/* add a range to the committed pages in a file mapping */
DECL_HANDLER(add_mapping_committed_range)
{
    struct mapping *mapping;

758
    if ((mapping = get_mapping_obj( current->process, req->handle, 0 )))
759 760 761 762 763 764 765 766 767 768 769 770 771
    {
        if (!(req->size & page_mask) &&
            !(req->offset & page_mask) &&
            req->offset < mapping->size &&
            req->size > 0 &&
            req->size <= mapping->size - req->offset)
            add_committed_range( mapping, req->offset, req->offset + req->size );
        else
            set_error( STATUS_INVALID_PARAMETER );

        release_object( mapping );
    }
}