2 * Server-side file mapping management
4 * Copyright (C) 1999 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * 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
22 #include "wine/port.h"
29 #ifdef HAVE_SYS_MMAN_H
30 # include <sys/mman.h>
35 #define WIN32_NO_STATUS
46 /* list of memory ranges, used to store committed info */
49 struct object obj
; /* object header */
50 unsigned int count
; /* number of used ranges */
51 unsigned int max
; /* number of allocated ranges */
59 static void ranges_dump( struct object
*obj
, int verbose
);
60 static void ranges_destroy( struct object
*obj
);
62 static const struct object_ops ranges_ops
=
64 sizeof(struct ranges
), /* size */
65 ranges_dump
, /* dump */
66 no_get_type
, /* get_type */
67 no_add_queue
, /* add_queue */
68 NULL
, /* remove_queue */
71 no_signal
, /* signal */
72 no_get_fd
, /* get_fd */
73 no_map_access
, /* map_access */
74 default_get_sd
, /* get_sd */
75 default_set_sd
, /* set_sd */
76 no_lookup_name
, /* lookup_name */
77 no_link_name
, /* link_name */
78 NULL
, /* unlink_name */
79 no_open_file
, /* open_file */
80 no_close_handle
, /* close_handle */
81 ranges_destroy
/* destroy */
84 /* memory view mapped in client address space */
87 struct list entry
; /* entry in per-process view list */
88 struct fd
*fd
; /* fd for mapped file */
89 struct ranges
*committed
; /* list of committed ranges in this mapping */
90 unsigned int flags
; /* SEC_* flags */
91 client_ptr_t base
; /* view base address (in process addr space) */
92 mem_size_t size
; /* view size */
93 file_pos_t start
; /* start offset in mapping */
98 struct object obj
; /* object header */
99 mem_size_t size
; /* mapping size */
100 unsigned int flags
; /* SEC_* flags */
101 struct fd
*fd
; /* fd for mapped file */
102 enum cpu_type cpu
; /* client CPU (for PE image mapping) */
103 pe_image_info_t image
; /* image info (for PE image mapping) */
104 struct ranges
*committed
; /* list of committed ranges in this mapping */
105 struct file
*shared_file
; /* temp file for shared PE mapping */
106 struct list shared_entry
; /* entry in global shared PE mappings list */
109 static void mapping_dump( struct object
*obj
, int verbose
);
110 static struct object_type
*mapping_get_type( struct object
*obj
);
111 static struct fd
*mapping_get_fd( struct object
*obj
);
112 static unsigned int mapping_map_access( struct object
*obj
, unsigned int access
);
113 static void mapping_destroy( struct object
*obj
);
114 static enum server_fd_type
mapping_get_fd_type( struct fd
*fd
);
116 static const struct object_ops mapping_ops
=
118 sizeof(struct mapping
), /* size */
119 mapping_dump
, /* dump */
120 mapping_get_type
, /* get_type */
121 no_add_queue
, /* add_queue */
122 NULL
, /* remove_queue */
124 NULL
, /* satisfied */
125 no_signal
, /* signal */
126 mapping_get_fd
, /* get_fd */
127 mapping_map_access
, /* map_access */
128 default_get_sd
, /* get_sd */
129 default_set_sd
, /* set_sd */
130 no_lookup_name
, /* lookup_name */
131 directory_link_name
, /* link_name */
132 default_unlink_name
, /* unlink_name */
133 no_open_file
, /* open_file */
134 fd_close_handle
, /* close_handle */
135 mapping_destroy
/* destroy */
138 static const struct fd_ops mapping_fd_ops
=
140 default_fd_get_poll_events
, /* get_poll_events */
141 default_poll_event
, /* poll_event */
142 mapping_get_fd_type
, /* get_fd_type */
143 no_fd_read
, /* read */
144 no_fd_write
, /* write */
145 no_fd_flush
, /* flush */
146 no_fd_get_volume_info
, /* get_volume_info */
147 no_fd_ioctl
, /* ioctl */
148 no_fd_queue_async
, /* queue_async */
149 default_fd_reselect_async
/* reselect_async */
152 static struct list shared_list
= LIST_INIT(shared_list
);
154 static size_t page_mask
;
156 #define ROUND_SIZE(size) (((size) + page_mask) & ~page_mask)
159 static void ranges_dump( struct object
*obj
, int verbose
)
161 struct ranges
*ranges
= (struct ranges
*)obj
;
162 fprintf( stderr
, "Memory ranges count=%u\n", ranges
->count
);
165 static void ranges_destroy( struct object
*obj
)
167 struct ranges
*ranges
= (struct ranges
*)obj
;
168 free( ranges
->ranges
);
171 /* extend a file beyond the current end of file */
172 static int grow_file( int unix_fd
, file_pos_t new_size
)
174 static const char zero
;
175 off_t size
= new_size
;
177 if (sizeof(new_size
) > sizeof(size
) && size
!= new_size
)
179 set_error( STATUS_INVALID_PARAMETER
);
182 /* extend the file one byte beyond the requested size and then truncate it */
183 /* this should work around ftruncate implementations that can't extend files */
184 if (pwrite( unix_fd
, &zero
, 1, size
) != -1)
186 ftruncate( unix_fd
, size
);
193 /* check if the current directory allows exec mappings */
194 static int check_current_dir_for_exec(void)
197 char tmpfn
[] = "anonmap.XXXXXX";
198 void *ret
= MAP_FAILED
;
200 fd
= mkstemps( tmpfn
, 0 );
201 if (fd
== -1) return 0;
202 if (grow_file( fd
, 1 ))
204 ret
= mmap( NULL
, get_page_size(), PROT_READ
| PROT_EXEC
, MAP_PRIVATE
, fd
, 0 );
205 if (ret
!= MAP_FAILED
) munmap( ret
, get_page_size() );
209 return (ret
!= MAP_FAILED
);
212 /* create a temp file for anonymous mappings */
213 static int create_temp_file( file_pos_t size
)
215 static int temp_dir_fd
= -1;
216 char tmpfn
[] = "anonmap.XXXXXX";
219 if (temp_dir_fd
== -1)
221 temp_dir_fd
= server_dir_fd
;
222 if (!check_current_dir_for_exec())
224 /* the server dir is noexec, try the config dir instead */
225 fchdir( config_dir_fd
);
226 if (check_current_dir_for_exec())
227 temp_dir_fd
= config_dir_fd
;
228 else /* neither works, fall back to server dir */
229 fchdir( server_dir_fd
);
232 else if (temp_dir_fd
!= server_dir_fd
) fchdir( temp_dir_fd
);
234 fd
= mkstemps( tmpfn
, 0 );
237 if (!grow_file( fd
, size
))
244 else file_set_error();
246 if (temp_dir_fd
!= server_dir_fd
) fchdir( server_dir_fd
);
250 /* find a memory view from its base address */
251 static struct memory_view
*find_mapped_view( struct process
*process
, client_ptr_t base
)
253 struct memory_view
*view
;
255 LIST_FOR_EACH_ENTRY( view
, &process
->views
, struct memory_view
, entry
)
256 if (view
->base
== base
) return view
;
258 set_error( STATUS_NOT_MAPPED_VIEW
);
262 static void free_memory_view( struct memory_view
*view
)
264 if (view
->fd
) release_object( view
->fd
);
265 if (view
->committed
) release_object( view
->committed
);
266 list_remove( &view
->entry
);
270 /* free all mapped views at process exit */
271 void free_mapped_views( struct process
*process
)
275 while ((ptr
= list_head( &process
->views
)))
276 free_memory_view( LIST_ENTRY( ptr
, struct memory_view
, entry
));
279 /* find the shared PE mapping for a given mapping */
280 static struct file
*get_shared_file( struct mapping
*mapping
)
284 LIST_FOR_EACH_ENTRY( ptr
, &shared_list
, struct mapping
, shared_entry
)
285 if (is_same_file_fd( ptr
->fd
, mapping
->fd
))
286 return (struct file
*)grab_object( ptr
->shared_file
);
290 /* return the size of the memory mapping and file range of a given section */
291 static inline void get_section_sizes( const IMAGE_SECTION_HEADER
*sec
, size_t *map_size
,
292 off_t
*file_start
, size_t *file_size
)
294 static const unsigned int sector_align
= 0x1ff;
296 if (!sec
->Misc
.VirtualSize
) *map_size
= ROUND_SIZE( sec
->SizeOfRawData
);
297 else *map_size
= ROUND_SIZE( sec
->Misc
.VirtualSize
);
299 *file_start
= sec
->PointerToRawData
& ~sector_align
;
300 *file_size
= (sec
->SizeOfRawData
+ (sec
->PointerToRawData
& sector_align
) + sector_align
) & ~sector_align
;
301 if (*file_size
> *map_size
) *file_size
= *map_size
;
304 /* add a range to the committed list */
305 static void add_committed_range( struct memory_view
*view
, file_pos_t start
, file_pos_t end
)
308 struct ranges
*committed
= view
->committed
;
309 struct range
*ranges
;
311 if ((start
& page_mask
) || (end
& page_mask
) ||
312 start
>= view
->size
|| end
>= view
->size
||
315 set_error( STATUS_INVALID_PARAMETER
);
319 if (!committed
) return; /* everything committed already */
321 start
+= view
->start
;
324 for (i
= 0, ranges
= committed
->ranges
; i
< committed
->count
; i
++)
326 if (ranges
[i
].start
> end
) break;
327 if (ranges
[i
].end
< start
) continue;
328 if (ranges
[i
].start
> start
) ranges
[i
].start
= start
; /* extend downwards */
329 if (ranges
[i
].end
< end
) /* extend upwards and maybe merge with next */
331 for (j
= i
+ 1; j
< committed
->count
; j
++)
333 if (ranges
[j
].start
> end
) break;
334 if (ranges
[j
].end
> end
) end
= ranges
[j
].end
;
338 memmove( &ranges
[i
+ 1], &ranges
[j
], (committed
->count
- j
) * sizeof(*ranges
) );
339 committed
->count
-= j
- (i
+ 1);
346 /* now add a new range */
348 if (committed
->count
== committed
->max
)
350 unsigned int new_size
= committed
->max
* 2;
351 struct range
*new_ptr
= realloc( committed
->ranges
, new_size
* sizeof(*new_ptr
) );
352 if (!new_ptr
) return;
353 committed
->max
= new_size
;
354 committed
->ranges
= new_ptr
;
356 memmove( &ranges
[i
+ 1], &ranges
[i
], (committed
->count
- i
) * sizeof(*ranges
) );
357 ranges
[i
].start
= start
;
362 /* find the range containing start and return whether it's committed */
363 static int find_committed_range( struct memory_view
*view
, file_pos_t start
, mem_size_t
*size
)
366 struct ranges
*committed
= view
->committed
;
367 struct range
*ranges
;
369 if ((start
& page_mask
) || start
>= view
->size
)
371 set_error( STATUS_INVALID_PARAMETER
);
374 if (!committed
) /* everything is committed */
376 *size
= view
->size
- start
;
379 for (i
= 0, ranges
= committed
->ranges
; i
< committed
->count
; i
++)
381 if (ranges
[i
].start
> view
->start
+ start
)
383 *size
= min( ranges
[i
].start
, view
->start
+ view
->size
) - (view
->start
+ start
);
386 if (ranges
[i
].end
> view
->start
+ start
)
388 *size
= min( ranges
[i
].end
, view
->start
+ view
->size
) - (view
->start
+ start
);
392 *size
= view
->size
- start
;
396 /* allocate and fill the temp file for a shared PE image mapping */
397 static int build_shared_mapping( struct mapping
*mapping
, int fd
,
398 IMAGE_SECTION_HEADER
*sec
, unsigned int nb_sec
)
401 mem_size_t total_size
;
402 size_t file_size
, map_size
, max_size
;
403 off_t shared_pos
, read_pos
, write_pos
;
408 /* compute the total size of the shared mapping */
410 total_size
= max_size
= 0;
411 for (i
= 0; i
< nb_sec
; i
++)
413 if ((sec
[i
].Characteristics
& IMAGE_SCN_MEM_SHARED
) &&
414 (sec
[i
].Characteristics
& IMAGE_SCN_MEM_WRITE
))
416 get_section_sizes( &sec
[i
], &map_size
, &read_pos
, &file_size
);
417 if (file_size
> max_size
) max_size
= file_size
;
418 total_size
+= map_size
;
421 if (!total_size
) return 1; /* nothing to do */
423 if ((mapping
->shared_file
= get_shared_file( mapping
))) return 1;
425 /* create a temp file for the mapping */
427 if ((shared_fd
= create_temp_file( total_size
)) == -1) return 0;
428 if (!(mapping
->shared_file
= create_file_for_fd( shared_fd
, FILE_GENERIC_READ
|FILE_GENERIC_WRITE
, 0 )))
431 if (!(buffer
= malloc( max_size
))) goto error
;
433 /* copy the shared sections data into the temp file */
436 for (i
= 0; i
< nb_sec
; i
++)
438 if (!(sec
[i
].Characteristics
& IMAGE_SCN_MEM_SHARED
)) continue;
439 if (!(sec
[i
].Characteristics
& IMAGE_SCN_MEM_WRITE
)) continue;
440 get_section_sizes( &sec
[i
], &map_size
, &read_pos
, &file_size
);
441 write_pos
= shared_pos
;
442 shared_pos
+= map_size
;
443 if (!sec
[i
].PointerToRawData
|| !file_size
) continue;
447 long res
= pread( fd
, buffer
+ file_size
- toread
, toread
, read_pos
);
448 if (!res
&& toread
< 0x200) /* partial sector at EOF is not an error */
453 if (res
<= 0) goto error
;
457 if (pwrite( shared_fd
, buffer
, file_size
, write_pos
) != file_size
) goto error
;
463 release_object( mapping
->shared_file
);
464 mapping
->shared_file
= NULL
;
469 /* retrieve the mapping parameters for an executable (PE) image */
470 static unsigned int get_image_params( struct mapping
*mapping
, file_pos_t file_size
, int unix_fd
)
472 IMAGE_DOS_HEADER dos
;
473 IMAGE_SECTION_HEADER
*sec
= NULL
;
477 IMAGE_FILE_HEADER FileHeader
;
480 IMAGE_OPTIONAL_HEADER32 hdr32
;
481 IMAGE_OPTIONAL_HEADER64 hdr64
;
487 /* load the headers */
489 if (!file_size
) return STATUS_INVALID_FILE_FOR_SECTION
;
490 if (pread( unix_fd
, &dos
, sizeof(dos
), 0 ) != sizeof(dos
)) return STATUS_INVALID_IMAGE_NOT_MZ
;
491 if (dos
.e_magic
!= IMAGE_DOS_SIGNATURE
) return STATUS_INVALID_IMAGE_NOT_MZ
;
494 size
= pread( unix_fd
, &nt
, sizeof(nt
), pos
);
495 if (size
< sizeof(nt
.Signature
) + sizeof(nt
.FileHeader
)) return STATUS_INVALID_IMAGE_FORMAT
;
496 /* zero out Optional header in the case it's not present or partial */
497 size
= min( size
, sizeof(nt
.Signature
) + sizeof(nt
.FileHeader
) + nt
.FileHeader
.SizeOfOptionalHeader
);
498 if (size
< sizeof(nt
)) memset( (char *)&nt
+ size
, 0, sizeof(nt
) - size
);
499 if (nt
.Signature
!= IMAGE_NT_SIGNATURE
)
501 if (*(WORD
*)&nt
.Signature
== IMAGE_OS2_SIGNATURE
) return STATUS_INVALID_IMAGE_NE_FORMAT
;
502 return STATUS_INVALID_IMAGE_PROTECT
;
505 mapping
->cpu
= current
->process
->cpu
;
506 switch (mapping
->cpu
)
509 if (nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_I386
) return STATUS_INVALID_IMAGE_FORMAT
;
510 if (nt
.opt
.hdr32
.Magic
!= IMAGE_NT_OPTIONAL_HDR32_MAGIC
) return STATUS_INVALID_IMAGE_FORMAT
;
513 if (nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_AMD64
) return STATUS_INVALID_IMAGE_FORMAT
;
514 if (nt
.opt
.hdr64
.Magic
!= IMAGE_NT_OPTIONAL_HDR64_MAGIC
) return STATUS_INVALID_IMAGE_FORMAT
;
517 if (nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_POWERPC
) return STATUS_INVALID_IMAGE_FORMAT
;
518 if (nt
.opt
.hdr32
.Magic
!= IMAGE_NT_OPTIONAL_HDR32_MAGIC
) return STATUS_INVALID_IMAGE_FORMAT
;
521 if (nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_ARM
&&
522 nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_THUMB
&&
523 nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_ARMNT
) return STATUS_INVALID_IMAGE_FORMAT
;
524 if (nt
.opt
.hdr32
.Magic
!= IMAGE_NT_OPTIONAL_HDR32_MAGIC
) return STATUS_INVALID_IMAGE_FORMAT
;
527 if (nt
.FileHeader
.Machine
!= IMAGE_FILE_MACHINE_ARM64
) return STATUS_INVALID_IMAGE_FORMAT
;
528 if (nt
.opt
.hdr64
.Magic
!= IMAGE_NT_OPTIONAL_HDR64_MAGIC
) return STATUS_INVALID_IMAGE_FORMAT
;
531 return STATUS_INVALID_IMAGE_FORMAT
;
534 switch (nt
.opt
.hdr32
.Magic
)
536 case IMAGE_NT_OPTIONAL_HDR32_MAGIC
:
537 mapping
->image
.base
= nt
.opt
.hdr32
.ImageBase
;
538 mapping
->image
.entry_point
= nt
.opt
.hdr32
.ImageBase
+ nt
.opt
.hdr32
.AddressOfEntryPoint
;
539 mapping
->image
.map_size
= ROUND_SIZE( nt
.opt
.hdr32
.SizeOfImage
);
540 mapping
->image
.stack_size
= nt
.opt
.hdr32
.SizeOfStackReserve
;
541 mapping
->image
.stack_commit
= nt
.opt
.hdr32
.SizeOfStackCommit
;
542 mapping
->image
.subsystem
= nt
.opt
.hdr32
.Subsystem
;
543 mapping
->image
.subsystem_low
= nt
.opt
.hdr32
.MinorSubsystemVersion
;
544 mapping
->image
.subsystem_high
= nt
.opt
.hdr32
.MajorSubsystemVersion
;
545 mapping
->image
.dll_charact
= nt
.opt
.hdr32
.DllCharacteristics
;
546 mapping
->image
.loader_flags
= nt
.opt
.hdr32
.LoaderFlags
;
547 mapping
->image
.header_size
= nt
.opt
.hdr32
.SizeOfHeaders
;
548 mapping
->image
.checksum
= nt
.opt
.hdr32
.CheckSum
;
550 case IMAGE_NT_OPTIONAL_HDR64_MAGIC
:
551 mapping
->image
.base
= nt
.opt
.hdr64
.ImageBase
;
552 mapping
->image
.entry_point
= nt
.opt
.hdr64
.ImageBase
+ nt
.opt
.hdr64
.AddressOfEntryPoint
;
553 mapping
->image
.map_size
= ROUND_SIZE( nt
.opt
.hdr64
.SizeOfImage
);
554 mapping
->image
.stack_size
= nt
.opt
.hdr64
.SizeOfStackReserve
;
555 mapping
->image
.stack_commit
= nt
.opt
.hdr64
.SizeOfStackCommit
;
556 mapping
->image
.subsystem
= nt
.opt
.hdr64
.Subsystem
;
557 mapping
->image
.subsystem_low
= nt
.opt
.hdr64
.MinorSubsystemVersion
;
558 mapping
->image
.subsystem_high
= nt
.opt
.hdr64
.MajorSubsystemVersion
;
559 mapping
->image
.dll_charact
= nt
.opt
.hdr64
.DllCharacteristics
;
560 mapping
->image
.loader_flags
= nt
.opt
.hdr64
.LoaderFlags
;
561 mapping
->image
.header_size
= nt
.opt
.hdr64
.SizeOfHeaders
;
562 mapping
->image
.checksum
= nt
.opt
.hdr64
.CheckSum
;
565 mapping
->image
.image_charact
= nt
.FileHeader
.Characteristics
;
566 mapping
->image
.machine
= nt
.FileHeader
.Machine
;
567 mapping
->image
.zerobits
= 0; /* FIXME */
568 mapping
->image
.gp
= 0; /* FIXME */
569 mapping
->image
.contains_code
= 0; /* FIXME */
570 mapping
->image
.image_flags
= 0; /* FIXME */
571 mapping
->image
.file_size
= file_size
;
573 /* load the section headers */
575 pos
+= sizeof(nt
.Signature
) + sizeof(nt
.FileHeader
) + nt
.FileHeader
.SizeOfOptionalHeader
;
576 size
= sizeof(*sec
) * nt
.FileHeader
.NumberOfSections
;
577 if (!mapping
->size
) mapping
->size
= mapping
->image
.map_size
;
578 else if (mapping
->size
> mapping
->image
.map_size
) return STATUS_SECTION_TOO_BIG
;
579 if (pos
+ size
> mapping
->image
.map_size
) return STATUS_INVALID_FILE_FOR_SECTION
;
580 if (pos
+ size
> mapping
->image
.header_size
) mapping
->image
.header_size
= pos
+ size
;
581 if (!(sec
= malloc( size
))) goto error
;
582 if (pread( unix_fd
, sec
, size
, pos
) != size
) goto error
;
584 if (!build_shared_mapping( mapping
, unix_fd
, sec
, nt
.FileHeader
.NumberOfSections
)) goto error
;
586 if (mapping
->shared_file
) list_add_head( &shared_list
, &mapping
->shared_entry
);
593 return STATUS_INVALID_FILE_FOR_SECTION
;
596 static struct ranges
*create_ranges(void)
598 struct ranges
*ranges
= alloc_object( &ranges_ops
);
600 if (!ranges
) return NULL
;
603 if (!(ranges
->ranges
= mem_alloc( ranges
->max
* sizeof(*ranges
->ranges
) )))
605 release_object( ranges
);
611 static unsigned int get_mapping_flags( obj_handle_t handle
, unsigned int flags
)
613 switch (flags
& (SEC_IMAGE
| SEC_RESERVE
| SEC_COMMIT
| SEC_FILE
))
616 if (flags
& (SEC_WRITECOMBINE
| SEC_LARGE_PAGES
)) break;
617 if (handle
) return SEC_FILE
| SEC_IMAGE
;
618 set_error( STATUS_INVALID_FILE_FOR_SECTION
);
621 if (!handle
) return flags
;
624 if (flags
& SEC_LARGE_PAGES
) break;
625 if (handle
) return SEC_FILE
| (flags
& (SEC_NOCACHE
| SEC_WRITECOMBINE
));
628 set_error( STATUS_INVALID_PARAMETER
);
633 static struct object
*create_mapping( struct object
*root
, const struct unicode_str
*name
,
634 unsigned int attr
, mem_size_t size
, unsigned int flags
,
635 obj_handle_t handle
, unsigned int file_access
,
636 const struct security_descriptor
*sd
)
638 struct mapping
*mapping
;
644 if (!page_mask
) page_mask
= sysconf( _SC_PAGESIZE
) - 1;
646 if (!(mapping
= create_named_object( root
, &mapping_ops
, name
, attr
, sd
)))
648 if (get_error() == STATUS_OBJECT_NAME_EXISTS
)
649 return &mapping
->obj
; /* Nothing else to do */
651 mapping
->size
= size
;
653 mapping
->shared_file
= NULL
;
654 mapping
->committed
= NULL
;
656 if (!(mapping
->flags
= get_mapping_flags( handle
, flags
))) goto error
;
660 const unsigned int sharing
= FILE_SHARE_READ
| FILE_SHARE_WRITE
| FILE_SHARE_DELETE
;
661 unsigned int mapping_access
= FILE_MAPPING_ACCESS
;
663 if (!(file
= get_file_obj( current
->process
, handle
, file_access
))) goto error
;
664 fd
= get_obj_fd( (struct object
*)file
);
666 /* file sharing rules for mappings are different so we use magic the access rights */
667 if (flags
& SEC_IMAGE
) mapping_access
|= FILE_MAPPING_IMAGE
;
668 else if (file_access
& FILE_WRITE_DATA
) mapping_access
|= FILE_MAPPING_WRITE
;
670 if (!(mapping
->fd
= get_fd_object_for_mapping( fd
, mapping_access
, sharing
)))
672 mapping
->fd
= dup_fd_object( fd
, mapping_access
, sharing
, FILE_SYNCHRONOUS_IO_NONALERT
);
673 if (mapping
->fd
) set_fd_user( mapping
->fd
, &mapping_fd_ops
, NULL
);
675 release_object( file
);
676 release_object( fd
);
677 if (!mapping
->fd
) goto error
;
679 if ((unix_fd
= get_unix_fd( mapping
->fd
)) == -1) goto error
;
680 if (fstat( unix_fd
, &st
) == -1)
685 if (flags
& SEC_IMAGE
)
687 unsigned int err
= get_image_params( mapping
, st
.st_size
, unix_fd
);
688 if (!err
) return &mapping
->obj
;
694 if (!(mapping
->size
= st
.st_size
))
696 set_error( STATUS_MAPPED_FILE_SIZE_ZERO
);
700 else if (st
.st_size
< mapping
->size
)
702 if (!(file_access
& FILE_WRITE_DATA
))
704 set_error( STATUS_SECTION_TOO_BIG
);
707 if (!grow_file( unix_fd
, mapping
->size
)) goto error
;
710 else /* Anonymous mapping (no associated file) */
714 set_error( STATUS_INVALID_PARAMETER
);
717 if ((flags
& SEC_RESERVE
) && !(mapping
->committed
= create_ranges())) goto error
;
718 mapping
->size
= (mapping
->size
+ page_mask
) & ~((mem_size_t
)page_mask
);
719 if ((unix_fd
= create_temp_file( mapping
->size
)) == -1) goto error
;
720 if (!(mapping
->fd
= create_anonymous_fd( &mapping_fd_ops
, unix_fd
, &mapping
->obj
,
721 FILE_SYNCHRONOUS_IO_NONALERT
))) goto error
;
722 allow_fd_caching( mapping
->fd
);
724 return &mapping
->obj
;
727 release_object( mapping
);
731 struct mapping
*get_mapping_obj( struct process
*process
, obj_handle_t handle
, unsigned int access
)
733 return (struct mapping
*)get_handle_obj( process
, handle
, access
, &mapping_ops
);
736 /* open a new file for the file descriptor backing the mapping */
737 struct file
*get_mapping_file( struct process
*process
, client_ptr_t base
,
738 unsigned int access
, unsigned int sharing
)
740 struct memory_view
*view
= find_mapped_view( process
, base
);
742 if (!view
|| !view
->fd
) return NULL
;
743 return create_file_for_fd_obj( view
->fd
, access
, sharing
);
746 static void mapping_dump( struct object
*obj
, int verbose
)
748 struct mapping
*mapping
= (struct mapping
*)obj
;
749 assert( obj
->ops
== &mapping_ops
);
750 fprintf( stderr
, "Mapping size=%08x%08x flags=%08x fd=%p shared_file=%p\n",
751 (unsigned int)(mapping
->size
>> 32), (unsigned int)mapping
->size
,
752 mapping
->flags
, mapping
->fd
, mapping
->shared_file
);
755 static struct object_type
*mapping_get_type( struct object
*obj
)
757 static const WCHAR name
[] = {'S','e','c','t','i','o','n'};
758 static const struct unicode_str str
= { name
, sizeof(name
) };
759 return get_object_type( &str
);
762 static struct fd
*mapping_get_fd( struct object
*obj
)
764 struct mapping
*mapping
= (struct mapping
*)obj
;
765 return (struct fd
*)grab_object( mapping
->fd
);
768 static unsigned int mapping_map_access( struct object
*obj
, unsigned int access
)
770 if (access
& GENERIC_READ
) access
|= STANDARD_RIGHTS_READ
| SECTION_QUERY
| SECTION_MAP_READ
;
771 if (access
& GENERIC_WRITE
) access
|= STANDARD_RIGHTS_WRITE
| SECTION_MAP_WRITE
;
772 if (access
& GENERIC_EXECUTE
) access
|= STANDARD_RIGHTS_EXECUTE
| SECTION_MAP_EXECUTE
;
773 if (access
& GENERIC_ALL
) access
|= SECTION_ALL_ACCESS
;
774 return access
& ~(GENERIC_READ
| GENERIC_WRITE
| GENERIC_EXECUTE
| GENERIC_ALL
);
777 static void mapping_destroy( struct object
*obj
)
779 struct mapping
*mapping
= (struct mapping
*)obj
;
780 assert( obj
->ops
== &mapping_ops
);
781 if (mapping
->fd
) release_object( mapping
->fd
);
782 if (mapping
->committed
) release_object( mapping
->committed
);
783 if (mapping
->shared_file
)
785 release_object( mapping
->shared_file
);
786 list_remove( &mapping
->shared_entry
);
790 static enum server_fd_type
mapping_get_fd_type( struct fd
*fd
)
795 int get_page_size(void)
797 if (!page_mask
) page_mask
= sysconf( _SC_PAGESIZE
) - 1;
798 return page_mask
+ 1;
801 /* create a file mapping */
802 DECL_HANDLER(create_mapping
)
804 struct object
*root
, *obj
;
805 struct unicode_str name
;
806 const struct security_descriptor
*sd
;
807 const struct object_attributes
*objattr
= get_req_object_attributes( &sd
, &name
, &root
);
809 if (!objattr
) return;
811 if ((obj
= create_mapping( root
, &name
, objattr
->attributes
, req
->size
, req
->flags
,
812 req
->file_handle
, req
->file_access
, sd
)))
814 if (get_error() == STATUS_OBJECT_NAME_EXISTS
)
815 reply
->handle
= alloc_handle( current
->process
, obj
, req
->access
, objattr
->attributes
);
817 reply
->handle
= alloc_handle_no_access_check( current
->process
, obj
,
818 req
->access
, objattr
->attributes
);
819 release_object( obj
);
822 if (root
) release_object( root
);
825 /* open a handle to a mapping */
826 DECL_HANDLER(open_mapping
)
828 struct unicode_str name
= get_req_unicode_str();
830 reply
->handle
= open_object( current
->process
, req
->rootdir
, req
->access
,
831 &mapping_ops
, &name
, req
->attributes
);
834 /* get a mapping information */
835 DECL_HANDLER(get_mapping_info
)
837 struct mapping
*mapping
;
839 if (!(mapping
= get_mapping_obj( current
->process
, req
->handle
, req
->access
))) return;
841 reply
->size
= mapping
->size
;
842 reply
->flags
= mapping
->flags
;
844 if (mapping
->flags
& SEC_IMAGE
)
845 set_reply_data( &mapping
->image
, min( sizeof(mapping
->image
), get_reply_max_size() ));
847 if (!(req
->access
& (SECTION_MAP_READ
| SECTION_MAP_WRITE
))) /* query only */
849 release_object( mapping
);
853 if ((mapping
->flags
& SEC_IMAGE
) && mapping
->cpu
!= current
->process
->cpu
)
855 set_error( STATUS_INVALID_IMAGE_FORMAT
);
856 release_object( mapping
);
860 if (mapping
->shared_file
)
861 reply
->shared_file
= alloc_handle( current
->process
, mapping
->shared_file
,
862 GENERIC_READ
|GENERIC_WRITE
, 0 );
863 release_object( mapping
);
866 /* add a memory view in the current process */
867 DECL_HANDLER(map_view
)
869 struct mapping
*mapping
= NULL
;
870 struct memory_view
*view
;
872 if (!req
->size
|| (req
->base
& page_mask
) || req
->base
+ req
->size
< req
->base
) /* overflow */
874 set_error( STATUS_INVALID_PARAMETER
);
878 /* make sure we don't already have an overlapping view */
879 LIST_FOR_EACH_ENTRY( view
, ¤t
->process
->views
, struct memory_view
, entry
)
881 if (view
->base
+ view
->size
<= req
->base
) continue;
882 if (view
->base
>= req
->base
+ req
->size
) continue;
883 set_error( STATUS_INVALID_PARAMETER
);
887 if (!(mapping
= get_mapping_obj( current
->process
, req
->mapping
, req
->access
))) return;
889 if (mapping
->flags
& SEC_IMAGE
)
891 if (req
->start
|| req
->size
> mapping
->image
.map_size
)
893 set_error( STATUS_INVALID_PARAMETER
);
897 else if (req
->start
>= mapping
->size
||
898 req
->start
+ req
->size
< req
->start
||
899 req
->start
+ req
->size
> ((mapping
->size
+ page_mask
) & ~(mem_size_t
)page_mask
))
901 set_error( STATUS_INVALID_PARAMETER
);
905 if ((view
= mem_alloc( sizeof(*view
) )))
907 view
->base
= req
->base
;
908 view
->size
= req
->size
;
909 view
->start
= req
->start
;
910 view
->flags
= mapping
->flags
;
911 view
->fd
= !is_fd_removable( mapping
->fd
) ? (struct fd
*)grab_object( mapping
->fd
) : NULL
;
912 view
->committed
= mapping
->committed
? (struct ranges
*)grab_object( mapping
->committed
) : NULL
;
913 list_add_tail( ¤t
->process
->views
, &view
->entry
);
917 release_object( mapping
);
920 /* unmap a memory view from the current process */
921 DECL_HANDLER(unmap_view
)
923 struct memory_view
*view
= find_mapped_view( current
->process
, req
->base
);
925 if (view
) free_memory_view( view
);
928 /* get a range of committed pages in a file mapping */
929 DECL_HANDLER(get_mapping_committed_range
)
931 struct memory_view
*view
= find_mapped_view( current
->process
, req
->base
);
933 if (view
) reply
->committed
= find_committed_range( view
, req
->offset
, &reply
->size
);
936 /* add a range to the committed pages in a file mapping */
937 DECL_HANDLER(add_mapping_committed_range
)
939 struct memory_view
*view
= find_mapped_view( current
->process
, req
->base
);
941 if (view
) add_committed_range( view
, req
->offset
, req
->offset
+ req
->size
);
944 /* check if two memory maps are for the same file */
945 DECL_HANDLER(is_same_mapping
)
947 struct memory_view
*view1
= find_mapped_view( current
->process
, req
->base1
);
948 struct memory_view
*view2
= find_mapped_view( current
->process
, req
->base2
);
950 if (!view1
|| !view2
) return;
951 if (!view1
->fd
|| !view2
->fd
||
952 !(view1
->flags
& SEC_IMAGE
) || !(view2
->flags
& SEC_IMAGE
) ||
953 !is_same_file_fd( view1
->fd
, view2
->fd
))
954 set_error( STATUS_NOT_SAME_DEVICE
);