2 * Win32 virtual memory functions
4 * Copyright 1997 Alexandre Julliard
14 #include <sys/types.h>
40 struct _FV
*next
; /* Next view */
41 struct _FV
*prev
; /* Prev view */
42 UINT32 base
; /* Base address */
43 UINT32 size
; /* Size in bytes */
44 UINT32 flags
; /* Allocation flags */
45 UINT32 offset
; /* Offset from start of mapped file */
46 HANDLE32 mapping
; /* Handle to the file mapping */
47 HANDLERPROC handlerProc
; /* Fault handler */
48 LPVOID handlerArg
; /* Fault handler argument */
49 BYTE protect
; /* Protection for all pages at allocation time */
50 BYTE prot
[1]; /* Protection byte for each page */
54 #define VFLAG_SYSTEM 0x01
56 /* Conversion from VPROT_* to Win32 flags */
57 static const BYTE VIRTUAL_Win32Flags
[16] =
59 PAGE_NOACCESS
, /* 0 */
60 PAGE_READONLY
, /* READ */
61 PAGE_READWRITE
, /* WRITE */
62 PAGE_READWRITE
, /* READ | WRITE */
63 PAGE_EXECUTE
, /* EXEC */
64 PAGE_EXECUTE_READ
, /* READ | EXEC */
65 PAGE_EXECUTE_READWRITE
, /* WRITE | EXEC */
66 PAGE_EXECUTE_READWRITE
, /* READ | WRITE | EXEC */
67 PAGE_WRITECOPY
, /* WRITECOPY */
68 PAGE_WRITECOPY
, /* READ | WRITECOPY */
69 PAGE_WRITECOPY
, /* WRITE | WRITECOPY */
70 PAGE_WRITECOPY
, /* READ | WRITE | WRITECOPY */
71 PAGE_EXECUTE_WRITECOPY
, /* EXEC | WRITECOPY */
72 PAGE_EXECUTE_WRITECOPY
, /* READ | EXEC | WRITECOPY */
73 PAGE_EXECUTE_WRITECOPY
, /* WRITE | EXEC | WRITECOPY */
74 PAGE_EXECUTE_WRITECOPY
/* READ | WRITE | EXEC | WRITECOPY */
78 static FILE_VIEW
*VIRTUAL_FirstView
;
81 /* These are always the same on an i386, and it will be faster this way */
82 # define page_mask 0xfff
83 # define page_shift 12
84 # define granularity_mask 0xffff
86 static UINT32 page_shift
;
87 static UINT32 page_mask
;
88 static UINT32 granularity_mask
; /* Allocation granularity (usually 64k) */
91 #define ROUND_ADDR(addr) \
92 ((UINT32)(addr) & ~page_mask)
94 #define ROUND_SIZE(addr,size) \
95 (((UINT32)(size) + ((UINT32)(addr) & page_mask) + page_mask) & ~page_mask)
97 static void VIRTUAL_DestroyMapping( K32OBJ
*obj
);
99 const K32OBJ_OPS MEM_MAPPED_FILE_Ops
=
101 VIRTUAL_DestroyMapping
/* destroy */
104 #define VIRTUAL_DEBUG_DUMP_VIEW(view) \
105 if (!TRACE_ON(virtual)); else VIRTUAL_DumpView(view)
107 /***********************************************************************
110 static const char *VIRTUAL_GetProtStr( BYTE prot
)
112 static char buffer
[6];
113 buffer
[0] = (prot
& VPROT_COMMITTED
) ? 'c' : '-';
114 buffer
[1] = (prot
& VPROT_GUARD
) ? 'g' : '-';
115 buffer
[2] = (prot
& VPROT_READ
) ? 'r' : '-';
116 buffer
[3] = (prot
& VPROT_WRITE
) ?
117 ((prot
& VPROT_WRITECOPY
) ? 'w' : 'W') : '-';
118 buffer
[4] = (prot
& VPROT_EXEC
) ? 'x' : '-';
124 /***********************************************************************
127 static void VIRTUAL_DumpView( FILE_VIEW
*view
)
130 UINT32 addr
= view
->base
;
131 BYTE prot
= view
->prot
[0];
133 DUMP( "View: %08x - %08x%s",
134 view
->base
, view
->base
+ view
->size
- 1,
135 (view
->flags
& VFLAG_SYSTEM
) ? " (system)" : "" );
137 DUMP( " %d @ %08x\n", view
->mapping
, view
->offset
);
139 DUMP( " (anonymous)\n");
141 for (count
= i
= 1; i
< view
->size
>> page_shift
; i
++, count
++)
143 if (view
->prot
[i
] == prot
) continue;
144 DUMP( " %08x - %08x %s\n",
145 addr
, addr
+ (count
<< page_shift
) - 1,
146 VIRTUAL_GetProtStr(prot
) );
147 addr
+= (count
<< page_shift
);
148 prot
= view
->prot
[i
];
152 DUMP( " %08x - %08x %s\n",
153 addr
, addr
+ (count
<< page_shift
) - 1,
154 VIRTUAL_GetProtStr(prot
) );
158 /***********************************************************************
161 void VIRTUAL_Dump(void)
163 FILE_VIEW
*view
= VIRTUAL_FirstView
;
164 DUMP( "\nDump of all virtual memory views:\n\n" );
167 VIRTUAL_DumpView( view
);
173 /***********************************************************************
176 * Find the view containing a given address.
182 static FILE_VIEW
*VIRTUAL_FindView(
183 UINT32 addr
/* [in] Address */
185 FILE_VIEW
*view
= VIRTUAL_FirstView
;
188 if (view
->base
> addr
) return NULL
;
189 if (view
->base
+ view
->size
> addr
) return view
;
196 /***********************************************************************
199 * Create a new view and add it in the linked list.
201 static FILE_VIEW
*VIRTUAL_CreateView( UINT32 base
, UINT32 size
, UINT32 offset
,
202 UINT32 flags
, BYTE vprot
,
205 FILE_VIEW
*view
, *prev
;
207 /* Create the view structure */
209 assert( !(base
& page_mask
) );
210 assert( !(size
& page_mask
) );
212 if (!(view
= (FILE_VIEW
*)malloc( sizeof(*view
) + size
- 1 ))) return NULL
;
214 view
->size
= size
<< page_shift
;
216 view
->offset
= offset
;
217 view
->mapping
= mapping
;
218 view
->protect
= vprot
;
219 view
->handlerProc
= NULL
;
220 memset( view
->prot
, vprot
, size
);
222 /* Duplicate the mapping handle */
224 if ((view
->mapping
!= -1) &&
225 !DuplicateHandle( GetCurrentProcess(), view
->mapping
,
226 GetCurrentProcess(), &view
->mapping
,
227 0, FALSE
, DUPLICATE_SAME_ACCESS
))
233 /* Insert it in the linked list */
235 if (!VIRTUAL_FirstView
|| (VIRTUAL_FirstView
->base
> base
))
237 view
->next
= VIRTUAL_FirstView
;
239 if (view
->next
) view
->next
->prev
= view
;
240 VIRTUAL_FirstView
= view
;
244 prev
= VIRTUAL_FirstView
;
245 while (prev
->next
&& (prev
->next
->base
< base
)) prev
= prev
->next
;
246 view
->next
= prev
->next
;
248 if (view
->next
) view
->next
->prev
= view
;
251 VIRTUAL_DEBUG_DUMP_VIEW( view
);
256 /***********************************************************************
263 static void VIRTUAL_DeleteView(
264 FILE_VIEW
*view
/* [in] View */
266 FILE_munmap( (void *)view
->base
, 0, view
->size
);
267 if (view
->next
) view
->next
->prev
= view
->prev
;
268 if (view
->prev
) view
->prev
->next
= view
->next
;
269 else VIRTUAL_FirstView
= view
->next
;
270 if (view
->mapping
) CloseHandle( view
->mapping
);
275 /***********************************************************************
276 * VIRTUAL_GetUnixProt
278 * Convert page protections to protection for mmap/mprotect.
280 static int VIRTUAL_GetUnixProt( BYTE vprot
)
283 if ((vprot
& VPROT_COMMITTED
) && !(vprot
& VPROT_GUARD
))
285 if (vprot
& VPROT_READ
) prot
|= PROT_READ
;
286 if (vprot
& VPROT_WRITE
) prot
|= PROT_WRITE
;
287 if (vprot
& VPROT_EXEC
) prot
|= PROT_EXEC
;
293 /***********************************************************************
294 * VIRTUAL_GetWin32Prot
296 * Convert page protections to Win32 flags.
301 static void VIRTUAL_GetWin32Prot(
302 BYTE vprot
, /* [in] Page protection flags */
303 DWORD
*protect
, /* [out] Location to store Win32 protection flags */
304 DWORD
*state
/* [out] Location to store mem state flag */
307 *protect
= VIRTUAL_Win32Flags
[vprot
& 0x0f];
308 /* if (vprot & VPROT_GUARD) *protect |= PAGE_GUARD;*/
309 if (vprot
& VPROT_NOCACHE
) *protect
|= PAGE_NOCACHE
;
311 if (vprot
& VPROT_GUARD
) *protect
= PAGE_NOACCESS
;
314 if (state
) *state
= (vprot
& VPROT_COMMITTED
) ? MEM_COMMIT
: MEM_RESERVE
;
318 /***********************************************************************
321 * Build page protections from Win32 flags.
324 * Value of page protection flags
326 static BYTE
VIRTUAL_GetProt(
327 DWORD protect
/* [in] Win32 protection flags */
331 switch(protect
& 0xff)
337 vprot
= VPROT_READ
| VPROT_WRITE
;
340 vprot
= VPROT_READ
| VPROT_WRITE
| VPROT_WRITECOPY
;
345 case PAGE_EXECUTE_READ
:
346 vprot
= VPROT_EXEC
| VPROT_READ
;
348 case PAGE_EXECUTE_READWRITE
:
349 vprot
= VPROT_EXEC
| VPROT_READ
| VPROT_WRITE
| VPROT_WRITECOPY
;
351 case PAGE_EXECUTE_WRITECOPY
:
352 vprot
= VPROT_EXEC
| VPROT_READ
| VPROT_WRITE
;
359 if (protect
& PAGE_GUARD
) vprot
|= VPROT_GUARD
;
360 if (protect
& PAGE_NOCACHE
) vprot
|= VPROT_NOCACHE
;
365 /***********************************************************************
368 * Change the protection of a range of pages.
374 static BOOL32
VIRTUAL_SetProt(
375 FILE_VIEW
*view
, /* [in] Pointer to view */
376 UINT32 base
, /* [in] Starting address */
377 UINT32 size
, /* [in] Size in bytes */
378 BYTE vprot
/* [in] Protections to use */
380 TRACE(virtual, "%08x-%08x %s\n",
381 base
, base
+ size
- 1, VIRTUAL_GetProtStr( vprot
) );
383 if (mprotect( (void *)base
, size
, VIRTUAL_GetUnixProt(vprot
) ))
384 return FALSE
; /* FIXME: last error */
386 memset( view
->prot
+ ((base
- view
->base
) >> page_shift
),
387 vprot
, size
>> page_shift
);
388 VIRTUAL_DEBUG_DUMP_VIEW( view
);
393 /***********************************************************************
396 * Check that all pages in a range have the given flags.
402 static BOOL32
VIRTUAL_CheckFlags(
403 UINT32 base
, /* [in] Starting address */
404 UINT32 size
, /* [in] Size in bytes */
405 BYTE flags
/* [in] Flags to check for */
410 if (!size
) return TRUE
;
411 if (!(view
= VIRTUAL_FindView( base
))) return FALSE
;
412 if (view
->base
+ view
->size
< base
+ size
) return FALSE
;
413 page
= (base
- view
->base
) >> page_shift
;
414 size
= ROUND_SIZE( base
, size
) >> page_shift
;
415 while (size
--) if ((view
->prot
[page
++] & flags
) != flags
) return FALSE
;
420 /***********************************************************************
423 BOOL32
VIRTUAL_Init(void)
428 # ifdef HAVE_GETPAGESIZE
429 page_size
= getpagesize();
432 page_size
= sysconf(_SC_PAGESIZE
);
434 # error Cannot get the page size on this platform
437 page_mask
= page_size
- 1;
438 granularity_mask
= 0xffff; /* hard-coded for now */
439 /* Make sure we have a power of 2 */
440 assert( !(page_size
& page_mask
) );
442 while ((1 << page_shift
) != page_size
) page_shift
++;
443 #endif /* !__i386__ */
447 /* Do not use stdio here since it may temporarily change the size
448 * of some segments (ie libc6 adds 0x1000 per open FILE)
450 int fd
= open ("/proc/self/maps", O_RDONLY
);
453 char buffer
[512]; /* line might be rather long in 2.1 */
457 int start
, end
, offset
;
459 BYTE vprot
= VPROT_COMMITTED
;
462 int count
= sizeof(buffer
);
463 while (1 == read(fd
, ptr
, 1) && *ptr
!= '\n' && --count
> 0)
466 if (*ptr
!= '\n') break;
469 sscanf( buffer
, "%x-%x %c%c%c%c %x",
470 &start
, &end
, &r
, &w
, &x
, &p
, &offset
);
471 if (r
== 'r') vprot
|= VPROT_READ
;
472 if (w
== 'w') vprot
|= VPROT_WRITE
;
473 if (x
== 'x') vprot
|= VPROT_EXEC
;
474 if (p
== 'p') vprot
|= VPROT_WRITECOPY
;
475 VIRTUAL_CreateView( start
, end
- start
, 0,
476 VFLAG_SYSTEM
, vprot
, -1 );
486 /***********************************************************************
487 * VIRTUAL_GetPageSize
489 DWORD
VIRTUAL_GetPageSize(void)
491 return 1 << page_shift
;
495 /***********************************************************************
496 * VIRTUAL_GetGranularity
498 DWORD
VIRTUAL_GetGranularity(void)
500 return granularity_mask
+ 1;
504 /***********************************************************************
505 * VIRTUAL_SetFaultHandler
507 BOOL32
VIRTUAL_SetFaultHandler( LPCVOID addr
, HANDLERPROC proc
, LPVOID arg
)
511 if (!(view
= VIRTUAL_FindView((UINT32
)addr
))) return FALSE
;
512 view
->handlerProc
= proc
;
513 view
->handlerArg
= arg
;
517 /***********************************************************************
518 * VIRTUAL_HandleFault
520 BOOL32
VIRTUAL_HandleFault( LPCVOID addr
)
522 FILE_VIEW
*view
= VIRTUAL_FindView((UINT32
)addr
);
524 if (view
&& view
->handlerProc
)
525 return view
->handlerProc(view
->handlerArg
, addr
);
530 /***********************************************************************
531 * VirtualAlloc (KERNEL32.548)
532 * Reserves or commits a region of pages in virtual address space
535 * Base address of allocated region of pages
538 LPVOID WINAPI
VirtualAlloc(
539 LPVOID addr
, /* [in] Address of region to reserve or commit */
540 DWORD size
, /* [in] Size of region */
541 DWORD type
, /* [in] Type of allocation */
542 DWORD protect
/* [in] Type of access protection */
545 UINT32 base
, ptr
, view_size
;
548 TRACE(virtual, "%08x %08lx %lx %08lx\n",
549 (UINT32
)addr
, size
, type
, protect
);
551 /* Round parameters to a page boundary */
553 if (size
> 0x7fc00000) /* 2Gb - 4Mb */
555 SetLastError( ERROR_OUTOFMEMORY
);
560 if (type
& MEM_RESERVE
) /* Round down to 64k boundary */
561 base
= ((UINT32
)addr
+ granularity_mask
) & ~granularity_mask
;
563 base
= ROUND_ADDR( addr
);
564 size
= (((UINT32
)addr
+ size
+ page_mask
) & ~page_mask
) - base
;
565 if (base
+ size
< base
) /* Disallow wrap-around */
567 SetLastError( ERROR_INVALID_PARAMETER
);
574 size
= (size
+ page_mask
) & ~page_mask
;
577 if (type
& MEM_TOP_DOWN
) {
578 /* FIXME: MEM_TOP_DOWN allocates the largest possible address.
579 * Is there _ANY_ way to do it with UNIX mmap()?
581 WARN(virtual,"MEM_TOP_DOWN ignored\n");
582 type
&= ~MEM_TOP_DOWN
;
584 /* Compute the protection flags */
586 if (!(type
& (MEM_COMMIT
| MEM_RESERVE
)) ||
587 (type
& ~(MEM_COMMIT
| MEM_RESERVE
)))
589 SetLastError( ERROR_INVALID_PARAMETER
);
592 if (type
& MEM_COMMIT
)
593 vprot
= VIRTUAL_GetProt( protect
) | VPROT_COMMITTED
;
596 /* Reserve the memory */
598 if ((type
& MEM_RESERVE
) || !base
)
600 view_size
= size
+ (base
? 0 : granularity_mask
+ 1);
601 ptr
= (UINT32
)FILE_dommap( -1, (LPVOID
)base
, 0, view_size
, 0, 0,
602 VIRTUAL_GetUnixProt( vprot
), MAP_PRIVATE
);
603 if (ptr
== (UINT32
)-1)
605 SetLastError( ERROR_OUTOFMEMORY
);
610 /* Release the extra memory while keeping the range */
611 /* starting on a 64k boundary. */
613 if (ptr
& granularity_mask
)
615 UINT32 extra
= granularity_mask
+ 1 - (ptr
& granularity_mask
);
616 FILE_munmap( (void *)ptr
, 0, extra
);
620 if (view_size
> size
)
621 FILE_munmap( (void *)(ptr
+ size
), 0, view_size
- size
);
623 else if (ptr
!= base
)
625 /* We couldn't get the address we wanted */
626 FILE_munmap( (void *)ptr
, 0, view_size
);
627 SetLastError( ERROR_INVALID_ADDRESS
);
630 if (!(view
= VIRTUAL_CreateView( ptr
, size
, 0, 0, vprot
, -1 )))
632 FILE_munmap( (void *)ptr
, 0, size
);
633 SetLastError( ERROR_OUTOFMEMORY
);
636 VIRTUAL_DEBUG_DUMP_VIEW( view
);
640 /* Commit the pages */
642 if (!(view
= VIRTUAL_FindView( base
)) ||
643 (base
+ size
> view
->base
+ view
->size
))
645 SetLastError( ERROR_INVALID_PARAMETER
);
649 if (!VIRTUAL_SetProt( view
, base
, size
, vprot
)) return NULL
;
654 /***********************************************************************
655 * VirtualFree (KERNEL32.550)
656 * Release or decommits a region of pages in virtual address space.
662 BOOL32 WINAPI
VirtualFree(
663 LPVOID addr
, /* [in] Address of region of committed pages */
664 DWORD size
, /* [in] Size of region */
665 DWORD type
/* [in] Type of operation */
670 TRACE(virtual, "%08x %08lx %lx\n",
671 (UINT32
)addr
, size
, type
);
673 /* Fix the parameters */
675 size
= ROUND_SIZE( addr
, size
);
676 base
= ROUND_ADDR( addr
);
678 if (!(view
= VIRTUAL_FindView( base
)) ||
679 (base
+ size
> view
->base
+ view
->size
))
681 SetLastError( ERROR_INVALID_PARAMETER
);
685 /* Compute the protection flags */
687 if ((type
!= MEM_DECOMMIT
) && (type
!= MEM_RELEASE
))
689 SetLastError( ERROR_INVALID_PARAMETER
);
695 if (type
== MEM_RELEASE
)
697 if (size
|| (base
!= view
->base
))
699 SetLastError( ERROR_INVALID_PARAMETER
);
702 VIRTUAL_DeleteView( view
);
706 /* Decommit the pages */
707 return VIRTUAL_SetProt( view
, base
, size
, 0 );
711 /***********************************************************************
712 * VirtualLock (KERNEL32.551)
713 * Locks the specified region of virtual address space
716 * Always returns TRUE
722 BOOL32 WINAPI
VirtualLock(
723 LPVOID addr
, /* [in] Address of first byte of range to lock */
724 DWORD size
/* [in] Number of bytes in range to lock */
730 /***********************************************************************
731 * VirtualUnlock (KERNEL32.556)
732 * Unlocks a range of pages in the virtual address space
735 * Always returns TRUE
741 BOOL32 WINAPI
VirtualUnlock(
742 LPVOID addr
, /* [in] Address of first byte of range */
743 DWORD size
/* [in] Number of bytes in range */
749 /***********************************************************************
750 * VirtualProtect (KERNEL32.552)
751 * Changes the access protection on a region of committed pages
757 BOOL32 WINAPI
VirtualProtect(
758 LPVOID addr
, /* [in] Address of region of committed pages */
759 DWORD size
, /* [in] Size of region */
760 DWORD new_prot
, /* [in] Desired access protection */
761 LPDWORD old_prot
/* [out] Address of variable to get old protection */
767 TRACE(virtual, "%08x %08lx %08lx\n",
768 (UINT32
)addr
, size
, new_prot
);
770 /* Fix the parameters */
772 size
= ROUND_SIZE( addr
, size
);
773 base
= ROUND_ADDR( addr
);
775 if (!(view
= VIRTUAL_FindView( base
)) ||
776 (base
+ size
> view
->base
+ view
->size
))
778 SetLastError( ERROR_INVALID_PARAMETER
);
782 /* Make sure all the pages are committed */
784 p
= view
->prot
+ ((base
- view
->base
) >> page_shift
);
785 for (i
= size
>> page_shift
; i
; i
--, p
++)
787 if (!(*p
& VPROT_COMMITTED
))
789 SetLastError( ERROR_INVALID_PARAMETER
);
794 VIRTUAL_GetWin32Prot( view
->prot
[0], old_prot
, NULL
);
795 vprot
= VIRTUAL_GetProt( new_prot
) | VPROT_COMMITTED
;
796 return VIRTUAL_SetProt( view
, base
, size
, vprot
);
800 /***********************************************************************
801 * VirtualProtectEx (KERNEL32.553)
802 * Changes the access protection on a region of committed pages in the
803 * virtual address space of a specified process
809 BOOL32 WINAPI
VirtualProtectEx(
810 HANDLE32 handle
, /* [in] Handle of process */
811 LPVOID addr
, /* [in] Address of region of committed pages */
812 DWORD size
, /* [in] Size of region */
813 DWORD new_prot
, /* [in] Desired access protection */
814 LPDWORD old_prot
/* [out] Address of variable to get old protection */ )
816 if (PROCESS_IsCurrent( handle
))
817 return VirtualProtect( addr
, size
, new_prot
, old_prot
);
818 ERR(virtual,"Unsupported on other process\n");
823 /***********************************************************************
824 * VirtualQuery (KERNEL32.554)
825 * Provides info about a range of pages in virtual address space
828 * Number of bytes returned in information buffer
830 DWORD WINAPI
VirtualQuery(
831 LPCVOID addr
, /* [in] Address of region */
832 LPMEMORY_BASIC_INFORMATION info
, /* [out] Address of info buffer */
833 DWORD len
/* [in] Size of buffer */
835 FILE_VIEW
*view
= VIRTUAL_FirstView
;
836 UINT32 base
= ROUND_ADDR( addr
);
837 UINT32 alloc_base
= 0;
840 /* Find the view containing the address */
846 size
= 0xffff0000 - alloc_base
;
849 if (view
->base
> base
)
851 size
= view
->base
- alloc_base
;
855 if (view
->base
+ view
->size
> base
)
857 alloc_base
= view
->base
;
861 alloc_base
= view
->base
+ view
->size
;
865 /* Fill the info structure */
869 info
->State
= MEM_FREE
;
871 info
->AllocationProtect
= 0;
876 BYTE vprot
= view
->prot
[(base
- alloc_base
) >> page_shift
];
877 VIRTUAL_GetWin32Prot( vprot
, &info
->Protect
, &info
->State
);
878 for (size
= base
- alloc_base
; size
< view
->size
; size
+= page_mask
+1)
879 if (view
->prot
[size
>> page_shift
] != vprot
) break;
880 info
->AllocationProtect
= view
->protect
;
881 info
->Type
= MEM_PRIVATE
; /* FIXME */
884 info
->BaseAddress
= (LPVOID
)base
;
885 info
->AllocationBase
= (LPVOID
)alloc_base
;
886 info
->RegionSize
= size
- (base
- alloc_base
);
887 return sizeof(*info
);
891 /***********************************************************************
892 * VirtualQueryEx (KERNEL32.555)
893 * Provides info about a range of pages in virtual address space of a
897 * Number of bytes returned in information buffer
899 DWORD WINAPI
VirtualQueryEx(
900 HANDLE32 handle
, /* [in] Handle of process */
901 LPCVOID addr
, /* [in] Address of region */
902 LPMEMORY_BASIC_INFORMATION info
, /* [out] Address of info buffer */
903 DWORD len
/* [in] Size of buffer */ )
905 if (PROCESS_IsCurrent( handle
))
906 return VirtualQuery( addr
, info
, len
);
907 ERR(virtual,"Unsupported on other process\n");
912 /***********************************************************************
913 * IsBadReadPtr32 (KERNEL32.354)
916 * FALSE: Process has read access to entire block
919 BOOL32 WINAPI
IsBadReadPtr32(
920 LPCVOID ptr
, /* Address of memory block */
921 UINT32 size
/* Size of block */
923 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, size
,
924 VPROT_READ
| VPROT_COMMITTED
);
928 /***********************************************************************
929 * IsBadWritePtr32 (KERNEL32.357)
932 * FALSE: Process has write access to entire block
935 BOOL32 WINAPI
IsBadWritePtr32(
936 LPVOID ptr
, /* [in] Address of memory block */
937 UINT32 size
/* [in] Size of block in bytes */
939 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, size
,
940 VPROT_WRITE
| VPROT_COMMITTED
);
944 /***********************************************************************
945 * IsBadHugeReadPtr32 (KERNEL32.352)
947 * FALSE: Process has read access to entire block
950 BOOL32 WINAPI
IsBadHugeReadPtr32(
951 LPCVOID ptr
, /* [in] Address of memory block */
952 UINT32 size
/* [in] Size of block */
954 return IsBadReadPtr32( ptr
, size
);
958 /***********************************************************************
959 * IsBadHugeWritePtr32 (KERNEL32.353)
961 * FALSE: Process has write access to entire block
964 BOOL32 WINAPI
IsBadHugeWritePtr32(
965 LPVOID ptr
, /* [in] Address of memory block */
966 UINT32 size
/* [in] Size of block */
968 return IsBadWritePtr32( ptr
, size
);
972 /***********************************************************************
973 * IsBadCodePtr32 (KERNEL32.351)
976 * FALSE: Process has read access to specified memory
979 BOOL32 WINAPI
IsBadCodePtr32(
980 FARPROC32 ptr
/* [in] Address of function */
982 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, 1, VPROT_EXEC
| VPROT_COMMITTED
);
986 /***********************************************************************
987 * IsBadStringPtr32A (KERNEL32.355)
990 * FALSE: Read access to all bytes in string
993 BOOL32 WINAPI
IsBadStringPtr32A(
994 LPCSTR str
, /* [in] Address of string */
995 UINT32 max
/* [in] Maximum size of string */
1000 if (!max
) return FALSE
;
1001 if (!(view
= VIRTUAL_FindView( (UINT32
)str
))) return TRUE
;
1002 page
= ((UINT32
)str
- view
->base
) >> page_shift
;
1003 count
= page_mask
+ 1 - ((UINT32
)str
& page_mask
);
1007 if ((view
->prot
[page
] & (VPROT_READ
| VPROT_COMMITTED
)) !=
1008 (VPROT_READ
| VPROT_COMMITTED
))
1010 if (count
> max
) count
= max
;
1012 while (count
--) if (!*str
++) return FALSE
;
1013 if (++page
>= view
->size
>> page_shift
) return TRUE
;
1014 count
= page_mask
+ 1;
1020 /***********************************************************************
1021 * IsBadStringPtr32W (KERNEL32.356)
1022 * See IsBadStringPtr32A
1024 BOOL32 WINAPI
IsBadStringPtr32W( LPCWSTR str
, UINT32 max
)
1029 if (!max
) return FALSE
;
1030 if (!(view
= VIRTUAL_FindView( (UINT32
)str
))) return TRUE
;
1031 page
= ((UINT32
)str
- view
->base
) >> page_shift
;
1032 count
= (page_mask
+ 1 - ((UINT32
)str
& page_mask
)) / sizeof(WCHAR
);
1036 if ((view
->prot
[page
] & (VPROT_READ
| VPROT_COMMITTED
)) !=
1037 (VPROT_READ
| VPROT_COMMITTED
))
1039 if (count
> max
) count
= max
;
1041 while (count
--) if (!*str
++) return FALSE
;
1042 if (++page
>= view
->size
>> page_shift
) return TRUE
;
1043 count
= (page_mask
+ 1) / sizeof(WCHAR
);
1049 /***********************************************************************
1050 * CreateFileMapping32A (KERNEL32.46)
1051 * Creates a named or unnamed file-mapping object for the specified file
1055 * 0: Mapping object does not exist
1058 HANDLE32 WINAPI
CreateFileMapping32A(
1059 HFILE32 hFile
, /* [in] Handle of file to map */
1060 SECURITY_ATTRIBUTES
*sa
, /* [in] Optional security attributes*/
1061 DWORD protect
, /* [in] Protection for mapping object */
1062 DWORD size_high
, /* [in] High-order 32 bits of object size */
1063 DWORD size_low
, /* [in] Low-order 32 bits of object size */
1064 LPCSTR name
/* [in] Name of file-mapping object */ )
1066 FILE_MAPPING
*mapping
= NULL
;
1068 struct create_mapping_request req
;
1069 struct create_mapping_reply reply
= { -1 };
1072 BOOL32 inherit
= (sa
&& (sa
->nLength
>=sizeof(*sa
)) && sa
->bInheritHandle
);
1074 /* First search for an object with the same name */
1076 K32OBJ
*obj
= K32OBJ_FindName( name
);
1080 if (obj
->type
== K32OBJ_MEM_MAPPED_FILE
)
1083 CLIENT_SendRequest( REQ_CREATE_MAPPING
, -1, 2,
1085 name
, name
? strlen(name
) + 1 : 0 );
1086 CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
);
1087 if (reply
.handle
== -1) return 0;
1088 if (GetLastError() != ERROR_ALREADY_EXISTS
)
1089 return 0; /* not supposed to happen */
1090 handle
= HANDLE_Alloc( PROCESS_Current(), obj
,
1091 FILE_MAP_ALL_ACCESS
/*FIXME*/, inherit
, reply
.handle
);
1095 SetLastError( ERROR_DUP_NAME
);
1098 K32OBJ_DecCount( obj
);
1102 /* Check parameters */
1104 TRACE(virtual,"(%x,%p,%08lx,%08lx%08lx,%s)\n",
1105 hFile
, sa
, protect
, size_high
, size_low
, debugstr_a(name
) );
1107 vprot
= VIRTUAL_GetProt( protect
);
1108 if (protect
& SEC_RESERVE
)
1110 if (hFile
!= INVALID_HANDLE_VALUE32
)
1112 SetLastError( ERROR_INVALID_PARAMETER
);
1116 else vprot
|= VPROT_COMMITTED
;
1117 if (protect
& SEC_NOCACHE
) vprot
|= VPROT_NOCACHE
;
1119 /* Compute the size and extend the file if necessary */
1121 if (hFile
== INVALID_HANDLE_VALUE32
)
1123 if (!size_high
&& !size_low
)
1125 SetLastError( ERROR_INVALID_PARAMETER
);
1133 GetTempPath32A(260,buf
);
1134 GetTempFileName32A(buf
,"wine",0,buf
);
1135 hFile
= CreateFile32A(
1137 GENERIC_READ
|GENERIC_WRITE
,
1138 FILE_SHARE_READ
|FILE_SHARE_WRITE
,/* so we can reuse the tmpfn */
1144 /* FIXME: bad hack to avoid lots of leftover tempfiles */
1146 if (hFile
== INVALID_HANDLE_VALUE32
)
1147 FIXME(virtual,"could not create temp. file for anon shared mapping: reason was 0x%08lx\n",GetLastError());
1150 if (hFile
!= INVALID_HANDLE_VALUE32
) /* We have a file */
1152 BY_HANDLE_FILE_INFORMATION info
;
1153 DWORD access
= GENERIC_READ
;
1155 if (((protect
& 0xff) == PAGE_READWRITE
) ||
1156 ((protect
& 0xff) == PAGE_WRITECOPY
) ||
1157 ((protect
& 0xff) == PAGE_EXECUTE_READWRITE
) ||
1158 ((protect
& 0xff) == PAGE_EXECUTE_WRITECOPY
))
1159 access
|= GENERIC_WRITE
;
1161 if (!(file
= HANDLE_GetObjPtr( PROCESS_Current(), hFile
, K32OBJ_FILE
,
1162 access
, &req
.handle
))) goto error
;
1163 if (!GetFileInformationByHandle( hFile
, &info
)) goto error
;
1164 if (!size_high
&& !size_low
)
1166 size_high
= info
.nFileSizeHigh
;
1167 size_low
= info
.nFileSizeLow
;
1169 else if ((size_high
> info
.nFileSizeHigh
) ||
1170 ((size_high
== info
.nFileSizeHigh
) &&
1171 (size_low
> info
.nFileSizeLow
)))
1173 /* We have to grow the file */
1174 if (SetFilePointer( hFile
, size_low
, &size_high
,
1175 FILE_BEGIN
) == 0xffffffff) goto error
;
1176 if (!SetEndOfFile( hFile
)) goto error
;
1179 else req
.handle
= -1;
1181 /* Create the server object */
1183 req
.size_high
= size_high
;
1184 req
.size_low
= ROUND_SIZE( 0, size_low
);
1185 req
.protect
= vprot
;
1186 CLIENT_SendRequest( REQ_CREATE_MAPPING
, -1, 2,
1188 name
, name
? strlen(name
) + 1 : 0 );
1189 if (CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
))
1192 /* Allocate the mapping object */
1194 if (!(mapping
= HeapAlloc( SystemHeap
, 0, sizeof(*mapping
) ))) goto error
;
1195 mapping
->header
.type
= K32OBJ_MEM_MAPPED_FILE
;
1196 mapping
->header
.refcount
= 1;
1197 mapping
->file
= file
;
1199 if (!K32OBJ_AddName( &mapping
->header
, name
)) handle
= 0;
1200 else handle
= HANDLE_Alloc( PROCESS_Current(), &mapping
->header
,
1201 FILE_MAP_ALL_ACCESS
/*FIXME*/, inherit
, reply
.handle
);
1202 K32OBJ_DecCount( &mapping
->header
);
1203 SetLastError(0); /* Last error value is relevant. (see the start of fun) */
1207 if (reply
.handle
!= -1) CLIENT_CloseHandle( reply
.handle
);
1208 if (file
) K32OBJ_DecCount( file
);
1209 if (mapping
) HeapFree( SystemHeap
, 0, mapping
);
1214 /***********************************************************************
1215 * CreateFileMapping32W (KERNEL32.47)
1216 * See CreateFileMapping32A
1218 HANDLE32 WINAPI
CreateFileMapping32W( HFILE32 hFile
, LPSECURITY_ATTRIBUTES attr
,
1219 DWORD protect
, DWORD size_high
,
1220 DWORD size_low
, LPCWSTR name
)
1222 LPSTR nameA
= HEAP_strdupWtoA( GetProcessHeap(), 0, name
);
1223 HANDLE32 ret
= CreateFileMapping32A( hFile
, attr
, protect
,
1224 size_high
, size_low
, nameA
);
1225 HeapFree( GetProcessHeap(), 0, nameA
);
1230 /***********************************************************************
1231 * OpenFileMapping32A (KERNEL32.397)
1232 * Opens a named file-mapping object.
1238 HANDLE32 WINAPI
OpenFileMapping32A(
1239 DWORD access
, /* [in] Access mode */
1240 BOOL32 inherit
, /* [in] Inherit flag */
1241 LPCSTR name
) /* [in] Name of file-mapping object */
1243 HANDLE32 handle
= 0;
1245 struct open_named_obj_request req
;
1246 struct open_named_obj_reply reply
;
1247 int len
= name
? strlen(name
) + 1 : 0;
1249 req
.type
= OPEN_MAPPING
;
1250 req
.access
= access
;
1251 req
.inherit
= inherit
;
1252 CLIENT_SendRequest( REQ_OPEN_NAMED_OBJ
, -1, 2, &req
, sizeof(req
), name
, len
);
1253 CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
);
1255 if (reply
.handle
!= -1)
1258 if ((obj
= K32OBJ_FindNameType( name
, K32OBJ_MEM_MAPPED_FILE
)))
1260 handle
= HANDLE_Alloc( PROCESS_Current(), obj
, access
, inherit
, reply
.handle
);
1261 K32OBJ_DecCount( obj
);
1262 if (handle
== INVALID_HANDLE_VALUE32
)
1263 handle
= 0; /* must return 0 on failure, not -1 */
1265 else CLIENT_CloseHandle( reply
.handle
);
1272 /***********************************************************************
1273 * OpenFileMapping32W (KERNEL32.398)
1274 * See OpenFileMapping32A
1276 HANDLE32 WINAPI
OpenFileMapping32W( DWORD access
, BOOL32 inherit
, LPCWSTR name
)
1278 LPSTR nameA
= HEAP_strdupWtoA( GetProcessHeap(), 0, name
);
1279 HANDLE32 ret
= OpenFileMapping32A( access
, inherit
, nameA
);
1280 HeapFree( GetProcessHeap(), 0, nameA
);
1285 /***********************************************************************
1286 * VIRTUAL_DestroyMapping
1288 * Destroy a FILE_MAPPING object.
1290 static void VIRTUAL_DestroyMapping( K32OBJ
*ptr
)
1292 FILE_MAPPING
*mapping
= (FILE_MAPPING
*)ptr
;
1293 assert( ptr
->type
== K32OBJ_MEM_MAPPED_FILE
);
1295 if (mapping
->file
) K32OBJ_DecCount( mapping
->file
);
1296 ptr
->type
= K32OBJ_UNKNOWN
;
1297 HeapFree( SystemHeap
, 0, mapping
);
1301 /***********************************************************************
1302 * MapViewOfFile (KERNEL32.385)
1303 * Maps a view of a file into the address space
1306 * Starting address of mapped view
1309 LPVOID WINAPI
MapViewOfFile(
1310 HANDLE32 mapping
, /* [in] File-mapping object to map */
1311 DWORD access
, /* [in] Access mode */
1312 DWORD offset_high
, /* [in] High-order 32 bits of file offset */
1313 DWORD offset_low
, /* [in] Low-order 32 bits of file offset */
1314 DWORD count
/* [in] Number of bytes to map */
1316 return MapViewOfFileEx( mapping
, access
, offset_high
,
1317 offset_low
, count
, NULL
);
1321 /***********************************************************************
1322 * MapViewOfFileEx (KERNEL32.386)
1323 * Maps a view of a file into the address space
1326 * Starting address of mapped view
1329 LPVOID WINAPI
MapViewOfFileEx(
1330 HANDLE32 handle
, /* [in] File-mapping object to map */
1331 DWORD access
, /* [in] Access mode */
1332 DWORD offset_high
, /* [in] High-order 32 bits of file offset */
1333 DWORD offset_low
, /* [in] Low-order 32 bits of file offset */
1334 DWORD count
, /* [in] Number of bytes to map */
1335 LPVOID addr
/* [in] Suggested starting address for mapped view */
1338 UINT32 ptr
= (UINT32
)-1, size
= 0;
1339 int flags
= MAP_PRIVATE
;
1340 int unix_handle
= -1;
1341 struct get_mapping_info_request req
;
1342 struct get_mapping_info_reply info
;
1344 /* Check parameters */
1346 if ((offset_low
& granularity_mask
) ||
1347 (addr
&& ((UINT32
)addr
& granularity_mask
)))
1349 SetLastError( ERROR_INVALID_PARAMETER
);
1353 req
.handle
= HANDLE_GetServerHandle( PROCESS_Current(), handle
,
1354 K32OBJ_MEM_MAPPED_FILE
, 0 /* FIXME */ );
1355 CLIENT_SendRequest( REQ_GET_MAPPING_INFO
, -1, 1, &req
, sizeof(req
) );
1356 if (CLIENT_WaitSimpleReply( &info
, sizeof(info
), &unix_handle
))
1359 if (info
.size_high
|| offset_high
)
1360 ERR(virtual, "Offsets larger than 4Gb not supported\n");
1362 if ((offset_low
>= info
.size_low
) ||
1363 (count
> info
.size_low
- offset_low
))
1365 SetLastError( ERROR_INVALID_PARAMETER
);
1368 if (count
) size
= ROUND_SIZE( offset_low
, count
);
1369 else size
= info
.size_low
- offset_low
;
1373 case FILE_MAP_ALL_ACCESS
:
1374 case FILE_MAP_WRITE
:
1375 case FILE_MAP_WRITE
| FILE_MAP_READ
:
1376 if (!(info
.protect
& VPROT_WRITE
))
1378 SetLastError( ERROR_INVALID_PARAMETER
);
1385 case FILE_MAP_COPY
| FILE_MAP_READ
:
1386 if (info
.protect
& VPROT_READ
) break;
1389 SetLastError( ERROR_INVALID_PARAMETER
);
1395 TRACE(virtual, "handle=%x size=%x offset=%lx\n",
1396 handle
, size
, offset_low
);
1398 ptr
= (UINT32
)FILE_dommap( unix_handle
,
1399 addr
, 0, size
, 0, offset_low
,
1400 VIRTUAL_GetUnixProt( info
.protect
),
1402 if (ptr
== (UINT32
)-1) {
1403 /* KB: Q125713, 25-SEP-1995, "Common File Mapping Problems and
1404 * Platform Differences":
1405 * Windows NT: ERROR_INVALID_PARAMETER
1406 * Windows 95: ERROR_INVALID_ADDRESS.
1407 * FIXME: So should we add a module dependend check here? -MM
1410 SetLastError( ERROR_OUTOFMEMORY
);
1412 SetLastError( ERROR_INVALID_PARAMETER
);
1416 if (!(view
= VIRTUAL_CreateView( ptr
, size
, offset_low
, 0,
1417 info
.protect
, handle
)))
1419 SetLastError( ERROR_OUTOFMEMORY
);
1422 if (unix_handle
!= -1) close( unix_handle
);
1426 if (unix_handle
!= -1) close( unix_handle
);
1427 if (ptr
!= (UINT32
)-1) FILE_munmap( (void *)ptr
, 0, size
);
1432 /***********************************************************************
1433 * FlushViewOfFile (KERNEL32.262)
1434 * Writes to the disk a byte range within a mapped view of a file
1440 BOOL32 WINAPI
FlushViewOfFile(
1441 LPCVOID base
, /* [in] Start address of byte range to flush */
1442 DWORD cbFlush
/* [in] Number of bytes in range */
1445 UINT32 addr
= ROUND_ADDR( base
);
1447 TRACE(virtual, "FlushViewOfFile at %p for %ld bytes\n",
1450 if (!(view
= VIRTUAL_FindView( addr
)))
1452 SetLastError( ERROR_INVALID_PARAMETER
);
1455 if (!cbFlush
) cbFlush
= view
->size
;
1456 if (!msync( (void *)addr
, cbFlush
, MS_SYNC
)) return TRUE
;
1457 SetLastError( ERROR_INVALID_PARAMETER
);
1462 /***********************************************************************
1463 * UnmapViewOfFile (KERNEL32.540)
1464 * Unmaps a mapped view of a file.
1467 * Should addr be an LPCVOID?
1473 BOOL32 WINAPI
UnmapViewOfFile(
1474 LPVOID addr
/* [in] Address where mapped view begins */
1477 UINT32 base
= ROUND_ADDR( addr
);
1478 if (!(view
= VIRTUAL_FindView( base
)) || (base
!= view
->base
))
1480 SetLastError( ERROR_INVALID_PARAMETER
);
1483 VIRTUAL_DeleteView( view
);
1487 /***********************************************************************
1490 * Helper function to map a file to memory:
1492 * [RETURN] ptr - pointer to mapped file
1494 LPVOID
VIRTUAL_MapFileW( LPCWSTR name
)
1496 HANDLE32 hFile
, hMapping
;
1499 hFile
= CreateFile32W( name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
1500 OPEN_EXISTING
, FILE_FLAG_RANDOM_ACCESS
, 0);
1501 if (hFile
!= INVALID_HANDLE_VALUE32
)
1503 hMapping
= CreateFileMapping32A( hFile
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
1504 CloseHandle( hFile
);
1507 ptr
= MapViewOfFile( hMapping
, FILE_MAP_READ
, 0, 0, 0 );
1508 CloseHandle( hMapping
);