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 memset( view
->prot
, vprot
, size
);
221 /* Duplicate the mapping handle */
223 if ((view
->mapping
!= -1) &&
224 !DuplicateHandle( GetCurrentProcess(), view
->mapping
,
225 GetCurrentProcess(), &view
->mapping
,
226 0, FALSE
, DUPLICATE_SAME_ACCESS
))
232 /* Insert it in the linked list */
234 if (!VIRTUAL_FirstView
|| (VIRTUAL_FirstView
->base
> base
))
236 view
->next
= VIRTUAL_FirstView
;
238 if (view
->next
) view
->next
->prev
= view
;
239 VIRTUAL_FirstView
= view
;
243 prev
= VIRTUAL_FirstView
;
244 while (prev
->next
&& (prev
->next
->base
< base
)) prev
= prev
->next
;
245 view
->next
= prev
->next
;
247 if (view
->next
) view
->next
->prev
= view
;
250 VIRTUAL_DEBUG_DUMP_VIEW( view
);
255 /***********************************************************************
262 static void VIRTUAL_DeleteView(
263 FILE_VIEW
*view
/* [in] View */
265 FILE_munmap( (void *)view
->base
, 0, view
->size
);
266 if (view
->next
) view
->next
->prev
= view
->prev
;
267 if (view
->prev
) view
->prev
->next
= view
->next
;
268 else VIRTUAL_FirstView
= view
->next
;
269 if (view
->mapping
) CloseHandle( view
->mapping
);
274 /***********************************************************************
275 * VIRTUAL_GetUnixProt
277 * Convert page protections to protection for mmap/mprotect.
279 static int VIRTUAL_GetUnixProt( BYTE vprot
)
282 if ((vprot
& VPROT_COMMITTED
) && !(vprot
& VPROT_GUARD
))
284 if (vprot
& VPROT_READ
) prot
|= PROT_READ
;
285 if (vprot
& VPROT_WRITE
) prot
|= PROT_WRITE
;
286 if (vprot
& VPROT_EXEC
) prot
|= PROT_EXEC
;
292 /***********************************************************************
293 * VIRTUAL_GetWin32Prot
295 * Convert page protections to Win32 flags.
300 static void VIRTUAL_GetWin32Prot(
301 BYTE vprot
, /* [in] Page protection flags */
302 DWORD
*protect
, /* [out] Location to store Win32 protection flags */
303 DWORD
*state
/* [out] Location to store mem state flag */
306 *protect
= VIRTUAL_Win32Flags
[vprot
& 0x0f];
307 /* if (vprot & VPROT_GUARD) *protect |= PAGE_GUARD;*/
308 if (vprot
& VPROT_NOCACHE
) *protect
|= PAGE_NOCACHE
;
310 if (vprot
& VPROT_GUARD
) *protect
= PAGE_NOACCESS
;
313 if (state
) *state
= (vprot
& VPROT_COMMITTED
) ? MEM_COMMIT
: MEM_RESERVE
;
317 /***********************************************************************
320 * Build page protections from Win32 flags.
323 * Value of page protection flags
325 static BYTE
VIRTUAL_GetProt(
326 DWORD protect
/* [in] Win32 protection flags */
330 switch(protect
& 0xff)
336 vprot
= VPROT_READ
| VPROT_WRITE
;
339 vprot
= VPROT_READ
| VPROT_WRITE
| VPROT_WRITECOPY
;
344 case PAGE_EXECUTE_READ
:
345 vprot
= VPROT_EXEC
| VPROT_READ
;
347 case PAGE_EXECUTE_READWRITE
:
348 vprot
= VPROT_EXEC
| VPROT_READ
| VPROT_WRITE
| VPROT_WRITECOPY
;
350 case PAGE_EXECUTE_WRITECOPY
:
351 vprot
= VPROT_EXEC
| VPROT_READ
| VPROT_WRITE
;
358 if (protect
& PAGE_GUARD
) vprot
|= VPROT_GUARD
;
359 if (protect
& PAGE_NOCACHE
) vprot
|= VPROT_NOCACHE
;
364 /***********************************************************************
367 * Change the protection of a range of pages.
373 static BOOL32
VIRTUAL_SetProt(
374 FILE_VIEW
*view
, /* [in] Pointer to view */
375 UINT32 base
, /* [in] Starting address */
376 UINT32 size
, /* [in] Size in bytes */
377 BYTE vprot
/* [in] Protections to use */
379 TRACE(virtual, "%08x-%08x %s\n",
380 base
, base
+ size
- 1, VIRTUAL_GetProtStr( vprot
) );
382 if (mprotect( (void *)base
, size
, VIRTUAL_GetUnixProt(vprot
) ))
383 return FALSE
; /* FIXME: last error */
385 memset( view
->prot
+ ((base
- view
->base
) >> page_shift
),
386 vprot
, size
>> page_shift
);
387 VIRTUAL_DEBUG_DUMP_VIEW( view
);
392 /***********************************************************************
395 * Check that all pages in a range have the given flags.
401 static BOOL32
VIRTUAL_CheckFlags(
402 UINT32 base
, /* [in] Starting address */
403 UINT32 size
, /* [in] Size in bytes */
404 BYTE flags
/* [in] Flags to check for */
409 if (!size
) return TRUE
;
410 if (!(view
= VIRTUAL_FindView( base
))) return FALSE
;
411 if (view
->base
+ view
->size
< base
+ size
) return FALSE
;
412 page
= (base
- view
->base
) >> page_shift
;
413 size
= ROUND_SIZE( base
, size
) >> page_shift
;
414 while (size
--) if ((view
->prot
[page
++] & flags
) != flags
) return FALSE
;
419 /***********************************************************************
422 BOOL32
VIRTUAL_Init(void)
427 # ifdef HAVE_GETPAGESIZE
428 page_size
= getpagesize();
431 page_size
= sysconf(_SC_PAGESIZE
);
433 # error Cannot get the page size on this platform
436 page_mask
= page_size
- 1;
437 granularity_mask
= 0xffff; /* hard-coded for now */
438 /* Make sure we have a power of 2 */
439 assert( !(page_size
& page_mask
) );
441 while ((1 << page_shift
) != page_size
) page_shift
++;
442 #endif /* !__i386__ */
446 /* Do not use stdio here since it may temporarily change the size
447 * of some segments (ie libc6 adds 0x1000 per open FILE)
449 int fd
= open ("/proc/self/maps", O_RDONLY
);
452 char buffer
[512]; /* line might be rather long in 2.1 */
456 int start
, end
, offset
;
458 BYTE vprot
= VPROT_COMMITTED
;
461 int count
= sizeof(buffer
);
462 while (1 == read(fd
, ptr
, 1) && *ptr
!= '\n' && --count
> 0)
465 if (*ptr
!= '\n') break;
468 sscanf( buffer
, "%x-%x %c%c%c%c %x",
469 &start
, &end
, &r
, &w
, &x
, &p
, &offset
);
470 if (r
== 'r') vprot
|= VPROT_READ
;
471 if (w
== 'w') vprot
|= VPROT_WRITE
;
472 if (x
== 'x') vprot
|= VPROT_EXEC
;
473 if (p
== 'p') vprot
|= VPROT_WRITECOPY
;
474 VIRTUAL_CreateView( start
, end
- start
, 0,
475 VFLAG_SYSTEM
, vprot
, -1 );
485 /***********************************************************************
486 * VIRTUAL_GetPageSize
488 DWORD
VIRTUAL_GetPageSize(void)
490 return 1 << page_shift
;
494 /***********************************************************************
495 * VIRTUAL_GetGranularity
497 DWORD
VIRTUAL_GetGranularity(void)
499 return granularity_mask
+ 1;
503 /***********************************************************************
504 * VIRTUAL_SetFaultHandler
506 BOOL32
VIRTUAL_SetFaultHandler( LPVOID addr
, HANDLERPROC proc
, LPVOID arg
)
510 if (!(view
= VIRTUAL_FindView((UINT32
)addr
))) return FALSE
;
511 view
->handlerProc
= proc
;
512 view
->handlerArg
= arg
;
516 /***********************************************************************
517 * VIRTUAL_HandleFault
519 BOOL32
VIRTUAL_HandleFault(LPVOID addr
)
521 FILE_VIEW
*view
= VIRTUAL_FindView((UINT32
)addr
);
523 if (view
&& view
->handlerProc
)
524 return view
->handlerProc(view
->handlerArg
, addr
);
529 /***********************************************************************
530 * VirtualAlloc (KERNEL32.548)
531 * Reserves or commits a region of pages in virtual address space
534 * Base address of allocated region of pages
537 LPVOID WINAPI
VirtualAlloc(
538 LPVOID addr
, /* [in] Address of region to reserve or commit */
539 DWORD size
, /* [in] Size of region */
540 DWORD type
, /* [in] Type of allocation */
541 DWORD protect
/* [in] Type of access protection */
544 UINT32 base
, ptr
, view_size
;
547 TRACE(virtual, "%08x %08lx %lx %08lx\n",
548 (UINT32
)addr
, size
, type
, protect
);
550 /* Round parameters to a page boundary */
552 if (size
> 0x7fc00000) /* 2Gb - 4Mb */
554 SetLastError( ERROR_OUTOFMEMORY
);
559 if (type
& MEM_RESERVE
) /* Round down to 64k boundary */
560 base
= ((UINT32
)addr
+ granularity_mask
) & ~granularity_mask
;
562 base
= ROUND_ADDR( addr
);
563 size
= (((UINT32
)addr
+ size
+ page_mask
) & ~page_mask
) - base
;
564 if (base
+ size
< base
) /* Disallow wrap-around */
566 SetLastError( ERROR_INVALID_PARAMETER
);
573 size
= (size
+ page_mask
) & ~page_mask
;
576 if (type
& MEM_TOP_DOWN
) {
577 /* FIXME: MEM_TOP_DOWN allocates the largest possible address.
578 * Is there _ANY_ way to do it with UNIX mmap()?
580 WARN(virtual,"MEM_TOP_DOWN ignored\n");
581 type
&= ~MEM_TOP_DOWN
;
583 /* Compute the protection flags */
585 if (!(type
& (MEM_COMMIT
| MEM_RESERVE
)) ||
586 (type
& ~(MEM_COMMIT
| MEM_RESERVE
)))
588 SetLastError( ERROR_INVALID_PARAMETER
);
591 if (type
& MEM_COMMIT
)
592 vprot
= VIRTUAL_GetProt( protect
) | VPROT_COMMITTED
;
595 /* Reserve the memory */
597 if ((type
& MEM_RESERVE
) || !base
)
599 view_size
= size
+ (base
? 0 : granularity_mask
+ 1);
600 ptr
= (UINT32
)FILE_dommap( -1, (LPVOID
)base
, 0, view_size
, 0, 0,
601 VIRTUAL_GetUnixProt( vprot
), MAP_PRIVATE
);
602 if (ptr
== (UINT32
)-1)
604 SetLastError( ERROR_OUTOFMEMORY
);
609 /* Release the extra memory while keeping the range */
610 /* starting on a 64k boundary. */
612 if (ptr
& granularity_mask
)
614 UINT32 extra
= granularity_mask
+ 1 - (ptr
& granularity_mask
);
615 FILE_munmap( (void *)ptr
, 0, extra
);
619 if (view_size
> size
)
620 FILE_munmap( (void *)(ptr
+ size
), 0, view_size
- size
);
622 else if (ptr
!= base
)
624 /* We couldn't get the address we wanted */
625 FILE_munmap( (void *)ptr
, 0, view_size
);
626 SetLastError( ERROR_INVALID_ADDRESS
);
629 if (!(view
= VIRTUAL_CreateView( ptr
, size
, 0, 0, vprot
, -1 )))
631 FILE_munmap( (void *)ptr
, 0, size
);
632 SetLastError( ERROR_OUTOFMEMORY
);
635 VIRTUAL_DEBUG_DUMP_VIEW( view
);
639 /* Commit the pages */
641 if (!(view
= VIRTUAL_FindView( base
)) ||
642 (base
+ size
> view
->base
+ view
->size
))
644 SetLastError( ERROR_INVALID_PARAMETER
);
648 if (!VIRTUAL_SetProt( view
, base
, size
, vprot
)) return NULL
;
653 /***********************************************************************
654 * VirtualFree (KERNEL32.550)
655 * Release or decommits a region of pages in virtual address space.
661 BOOL32 WINAPI
VirtualFree(
662 LPVOID addr
, /* [in] Address of region of committed pages */
663 DWORD size
, /* [in] Size of region */
664 DWORD type
/* [in] Type of operation */
669 TRACE(virtual, "%08x %08lx %lx\n",
670 (UINT32
)addr
, size
, type
);
672 /* Fix the parameters */
674 size
= ROUND_SIZE( addr
, size
);
675 base
= ROUND_ADDR( addr
);
677 if (!(view
= VIRTUAL_FindView( base
)) ||
678 (base
+ size
> view
->base
+ view
->size
))
680 SetLastError( ERROR_INVALID_PARAMETER
);
684 /* Compute the protection flags */
686 if ((type
!= MEM_DECOMMIT
) && (type
!= MEM_RELEASE
))
688 SetLastError( ERROR_INVALID_PARAMETER
);
694 if (type
== MEM_RELEASE
)
696 if (size
|| (base
!= view
->base
))
698 SetLastError( ERROR_INVALID_PARAMETER
);
701 VIRTUAL_DeleteView( view
);
705 /* Decommit the pages */
706 return VIRTUAL_SetProt( view
, base
, size
, 0 );
710 /***********************************************************************
711 * VirtualLock (KERNEL32.551)
712 * Locks the specified region of virtual address space
715 * Always returns TRUE
721 BOOL32 WINAPI
VirtualLock(
722 LPVOID addr
, /* [in] Address of first byte of range to lock */
723 DWORD size
/* [in] Number of bytes in range to lock */
729 /***********************************************************************
730 * VirtualUnlock (KERNEL32.556)
731 * Unlocks a range of pages in the virtual address space
734 * Always returns TRUE
740 BOOL32 WINAPI
VirtualUnlock(
741 LPVOID addr
, /* [in] Address of first byte of range */
742 DWORD size
/* [in] Number of bytes in range */
748 /***********************************************************************
749 * VirtualProtect (KERNEL32.552)
750 * Changes the access protection on a region of committed pages
756 BOOL32 WINAPI
VirtualProtect(
757 LPVOID addr
, /* [in] Address of region of committed pages */
758 DWORD size
, /* [in] Size of region */
759 DWORD new_prot
, /* [in] Desired access protection */
760 LPDWORD old_prot
/* [out] Address of variable to get old protection */
766 TRACE(virtual, "%08x %08lx %08lx\n",
767 (UINT32
)addr
, size
, new_prot
);
769 /* Fix the parameters */
771 size
= ROUND_SIZE( addr
, size
);
772 base
= ROUND_ADDR( addr
);
774 if (!(view
= VIRTUAL_FindView( base
)) ||
775 (base
+ size
> view
->base
+ view
->size
))
777 SetLastError( ERROR_INVALID_PARAMETER
);
781 /* Make sure all the pages are committed */
783 p
= view
->prot
+ ((base
- view
->base
) >> page_shift
);
784 for (i
= size
>> page_shift
; i
; i
--, p
++)
786 if (!(*p
& VPROT_COMMITTED
))
788 SetLastError( ERROR_INVALID_PARAMETER
);
793 VIRTUAL_GetWin32Prot( view
->prot
[0], old_prot
, NULL
);
794 vprot
= VIRTUAL_GetProt( new_prot
) | VPROT_COMMITTED
;
795 return VIRTUAL_SetProt( view
, base
, size
, vprot
);
799 /***********************************************************************
800 * VirtualProtectEx (KERNEL32.553)
801 * Changes the access protection on a region of committed pages in the
802 * virtual address space of a specified process
808 BOOL32 WINAPI
VirtualProtectEx(
809 HANDLE32 handle
, /* [in] Handle of process */
810 LPVOID addr
, /* [in] Address of region of committed pages */
811 DWORD size
, /* [in] Size of region */
812 DWORD new_prot
, /* [in] Desired access protection */
813 LPDWORD old_prot
/* [out] Address of variable to get old protection */ )
815 if (PROCESS_IsCurrent( handle
))
816 return VirtualProtect( addr
, size
, new_prot
, old_prot
);
817 ERR(virtual,"Unsupported on other process\n");
822 /***********************************************************************
823 * VirtualQuery (KERNEL32.554)
824 * Provides info about a range of pages in virtual address space
827 * Number of bytes returned in information buffer
829 DWORD WINAPI
VirtualQuery(
830 LPCVOID addr
, /* [in] Address of region */
831 LPMEMORY_BASIC_INFORMATION info
, /* [out] Address of info buffer */
832 DWORD len
/* [in] Size of buffer */
834 FILE_VIEW
*view
= VIRTUAL_FirstView
;
835 UINT32 base
= ROUND_ADDR( addr
);
836 UINT32 alloc_base
= 0;
839 /* Find the view containing the address */
845 size
= 0xffff0000 - alloc_base
;
848 if (view
->base
> base
)
850 size
= view
->base
- alloc_base
;
854 if (view
->base
+ view
->size
> base
)
856 alloc_base
= view
->base
;
860 alloc_base
= view
->base
+ view
->size
;
864 /* Fill the info structure */
868 info
->State
= MEM_FREE
;
870 info
->AllocationProtect
= 0;
875 BYTE vprot
= view
->prot
[(base
- alloc_base
) >> page_shift
];
876 VIRTUAL_GetWin32Prot( vprot
, &info
->Protect
, &info
->State
);
877 for (size
= base
- alloc_base
; size
< view
->size
; size
+= page_mask
+1)
878 if (view
->prot
[size
>> page_shift
] != vprot
) break;
879 info
->AllocationProtect
= view
->protect
;
880 info
->Type
= MEM_PRIVATE
; /* FIXME */
883 info
->BaseAddress
= (LPVOID
)base
;
884 info
->AllocationBase
= (LPVOID
)alloc_base
;
885 info
->RegionSize
= size
- (base
- alloc_base
);
886 return sizeof(*info
);
890 /***********************************************************************
891 * VirtualQueryEx (KERNEL32.555)
892 * Provides info about a range of pages in virtual address space of a
896 * Number of bytes returned in information buffer
898 DWORD WINAPI
VirtualQueryEx(
899 HANDLE32 handle
, /* [in] Handle of process */
900 LPCVOID addr
, /* [in] Address of region */
901 LPMEMORY_BASIC_INFORMATION info
, /* [out] Address of info buffer */
902 DWORD len
/* [in] Size of buffer */ )
904 if (PROCESS_IsCurrent( handle
))
905 return VirtualQuery( addr
, info
, len
);
906 ERR(virtual,"Unsupported on other process\n");
911 /***********************************************************************
912 * IsBadReadPtr32 (KERNEL32.354)
915 * FALSE: Process has read access to entire block
918 BOOL32 WINAPI
IsBadReadPtr32(
919 LPCVOID ptr
, /* Address of memory block */
920 UINT32 size
/* Size of block */
922 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, size
,
923 VPROT_READ
| VPROT_COMMITTED
);
927 /***********************************************************************
928 * IsBadWritePtr32 (KERNEL32.357)
931 * FALSE: Process has write access to entire block
934 BOOL32 WINAPI
IsBadWritePtr32(
935 LPVOID ptr
, /* [in] Address of memory block */
936 UINT32 size
/* [in] Size of block in bytes */
938 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, size
,
939 VPROT_WRITE
| VPROT_COMMITTED
);
943 /***********************************************************************
944 * IsBadHugeReadPtr32 (KERNEL32.352)
946 * FALSE: Process has read access to entire block
949 BOOL32 WINAPI
IsBadHugeReadPtr32(
950 LPCVOID ptr
, /* [in] Address of memory block */
951 UINT32 size
/* [in] Size of block */
953 return IsBadReadPtr32( ptr
, size
);
957 /***********************************************************************
958 * IsBadHugeWritePtr32 (KERNEL32.353)
960 * FALSE: Process has write access to entire block
963 BOOL32 WINAPI
IsBadHugeWritePtr32(
964 LPVOID ptr
, /* [in] Address of memory block */
965 UINT32 size
/* [in] Size of block */
967 return IsBadWritePtr32( ptr
, size
);
971 /***********************************************************************
972 * IsBadCodePtr32 (KERNEL32.351)
975 * FALSE: Process has read access to specified memory
978 BOOL32 WINAPI
IsBadCodePtr32(
979 FARPROC32 ptr
/* [in] Address of function */
981 return !VIRTUAL_CheckFlags( (UINT32
)ptr
, 1, VPROT_EXEC
| VPROT_COMMITTED
);
985 /***********************************************************************
986 * IsBadStringPtr32A (KERNEL32.355)
989 * FALSE: Read access to all bytes in string
992 BOOL32 WINAPI
IsBadStringPtr32A(
993 LPCSTR str
, /* [in] Address of string */
994 UINT32 max
/* [in] Maximum size of string */
999 if (!max
) return FALSE
;
1000 if (!(view
= VIRTUAL_FindView( (UINT32
)str
))) return TRUE
;
1001 page
= ((UINT32
)str
- view
->base
) >> page_shift
;
1002 count
= page_mask
+ 1 - ((UINT32
)str
& page_mask
);
1006 if ((view
->prot
[page
] & (VPROT_READ
| VPROT_COMMITTED
)) !=
1007 (VPROT_READ
| VPROT_COMMITTED
))
1009 if (count
> max
) count
= max
;
1011 while (count
--) if (!*str
++) return FALSE
;
1012 if (++page
>= view
->size
>> page_shift
) return TRUE
;
1013 count
= page_mask
+ 1;
1019 /***********************************************************************
1020 * IsBadStringPtr32W (KERNEL32.356)
1021 * See IsBadStringPtr32A
1023 BOOL32 WINAPI
IsBadStringPtr32W( LPCWSTR str
, UINT32 max
)
1028 if (!max
) return FALSE
;
1029 if (!(view
= VIRTUAL_FindView( (UINT32
)str
))) return TRUE
;
1030 page
= ((UINT32
)str
- view
->base
) >> page_shift
;
1031 count
= (page_mask
+ 1 - ((UINT32
)str
& page_mask
)) / sizeof(WCHAR
);
1035 if ((view
->prot
[page
] & (VPROT_READ
| VPROT_COMMITTED
)) !=
1036 (VPROT_READ
| VPROT_COMMITTED
))
1038 if (count
> max
) count
= max
;
1040 while (count
--) if (!*str
++) return FALSE
;
1041 if (++page
>= view
->size
>> page_shift
) return TRUE
;
1042 count
= (page_mask
+ 1) / sizeof(WCHAR
);
1048 /***********************************************************************
1049 * CreateFileMapping32A (KERNEL32.46)
1050 * Creates a named or unnamed file-mapping object for the specified file
1054 * 0: Mapping object does not exist
1057 HANDLE32 WINAPI
CreateFileMapping32A(
1058 HFILE32 hFile
, /* [in] Handle of file to map */
1059 SECURITY_ATTRIBUTES
*sa
, /* [in] Optional security attributes*/
1060 DWORD protect
, /* [in] Protection for mapping object */
1061 DWORD size_high
, /* [in] High-order 32 bits of object size */
1062 DWORD size_low
, /* [in] Low-order 32 bits of object size */
1063 LPCSTR name
/* [in] Name of file-mapping object */ )
1065 FILE_MAPPING
*mapping
= NULL
;
1067 struct create_mapping_request req
;
1068 struct create_mapping_reply reply
= { -1 };
1071 BOOL32 inherit
= (sa
&& (sa
->nLength
>=sizeof(*sa
)) && sa
->bInheritHandle
);
1073 /* First search for an object with the same name */
1075 K32OBJ
*obj
= K32OBJ_FindName( name
);
1079 if (obj
->type
== K32OBJ_MEM_MAPPED_FILE
)
1082 CLIENT_SendRequest( REQ_CREATE_MAPPING
, -1, 2,
1084 name
, name
? strlen(name
) + 1 : 0 );
1085 CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
);
1086 if (reply
.handle
== -1) return 0;
1087 if (GetLastError() != ERROR_ALREADY_EXISTS
)
1088 return 0; /* not supposed to happen */
1089 handle
= HANDLE_Alloc( PROCESS_Current(), obj
,
1090 FILE_MAP_ALL_ACCESS
/*FIXME*/, inherit
, reply
.handle
);
1094 SetLastError( ERROR_DUP_NAME
);
1097 K32OBJ_DecCount( obj
);
1101 /* Check parameters */
1103 TRACE(virtual,"(%x,%p,%08lx,%08lx%08lx,%s)\n",
1104 hFile
, sa
, protect
, size_high
, size_low
, debugstr_a(name
) );
1106 vprot
= VIRTUAL_GetProt( protect
);
1107 if (protect
& SEC_RESERVE
)
1109 if (hFile
!= INVALID_HANDLE_VALUE32
)
1111 SetLastError( ERROR_INVALID_PARAMETER
);
1115 else vprot
|= VPROT_COMMITTED
;
1116 if (protect
& SEC_NOCACHE
) vprot
|= VPROT_NOCACHE
;
1118 /* Compute the size and extend the file if necessary */
1120 if (hFile
== INVALID_HANDLE_VALUE32
)
1122 if (!size_high
&& !size_low
)
1124 SetLastError( ERROR_INVALID_PARAMETER
);
1132 GetTempPath32A(260,buf
);
1133 GetTempFileName32A(buf
,"wine",0,buf
);
1134 hFile
= CreateFile32A(
1136 GENERIC_READ
|GENERIC_WRITE
,
1137 FILE_SHARE_READ
|FILE_SHARE_WRITE
,/* so we can reuse the tmpfn */
1143 /* FIXME: bad hack to avoid lots of leftover tempfiles */
1145 if (hFile
== INVALID_HANDLE_VALUE32
)
1146 FIXME(virtual,"could not create temp. file for anon shared mapping: reason was 0x%08lx\n",GetLastError());
1149 if (hFile
!= INVALID_HANDLE_VALUE32
) /* We have a file */
1151 BY_HANDLE_FILE_INFORMATION info
;
1152 DWORD access
= GENERIC_READ
;
1154 if (((protect
& 0xff) == PAGE_READWRITE
) ||
1155 ((protect
& 0xff) == PAGE_WRITECOPY
) ||
1156 ((protect
& 0xff) == PAGE_EXECUTE_READWRITE
) ||
1157 ((protect
& 0xff) == PAGE_EXECUTE_WRITECOPY
))
1158 access
|= GENERIC_WRITE
;
1160 if (!(file
= HANDLE_GetObjPtr( PROCESS_Current(), hFile
, K32OBJ_FILE
,
1161 access
, &req
.handle
))) goto error
;
1162 if (!GetFileInformationByHandle( hFile
, &info
)) goto error
;
1163 if (!size_high
&& !size_low
)
1165 size_high
= info
.nFileSizeHigh
;
1166 size_low
= info
.nFileSizeLow
;
1168 else if ((size_high
> info
.nFileSizeHigh
) ||
1169 ((size_high
== info
.nFileSizeHigh
) &&
1170 (size_low
> info
.nFileSizeLow
)))
1172 /* We have to grow the file */
1173 if (SetFilePointer( hFile
, size_low
, &size_high
,
1174 FILE_BEGIN
) == 0xffffffff) goto error
;
1175 if (!SetEndOfFile( hFile
)) goto error
;
1178 else req
.handle
= -1;
1180 /* Create the server object */
1182 req
.size_high
= size_high
;
1183 req
.size_low
= ROUND_SIZE( 0, size_low
);
1184 req
.protect
= vprot
;
1185 CLIENT_SendRequest( REQ_CREATE_MAPPING
, -1, 2,
1187 name
, name
? strlen(name
) + 1 : 0 );
1188 if (CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
))
1191 /* Allocate the mapping object */
1193 if (!(mapping
= HeapAlloc( SystemHeap
, 0, sizeof(*mapping
) ))) goto error
;
1194 mapping
->header
.type
= K32OBJ_MEM_MAPPED_FILE
;
1195 mapping
->header
.refcount
= 1;
1196 mapping
->file
= file
;
1198 if (!K32OBJ_AddName( &mapping
->header
, name
)) handle
= 0;
1199 else handle
= HANDLE_Alloc( PROCESS_Current(), &mapping
->header
,
1200 FILE_MAP_ALL_ACCESS
/*FIXME*/, inherit
, reply
.handle
);
1201 K32OBJ_DecCount( &mapping
->header
);
1202 SetLastError(0); /* Last error value is relevant. (see the start of fun) */
1206 if (reply
.handle
!= -1) CLIENT_CloseHandle( reply
.handle
);
1207 if (file
) K32OBJ_DecCount( file
);
1208 if (mapping
) HeapFree( SystemHeap
, 0, mapping
);
1213 /***********************************************************************
1214 * CreateFileMapping32W (KERNEL32.47)
1215 * See CreateFileMapping32A
1217 HANDLE32 WINAPI
CreateFileMapping32W( HFILE32 hFile
, LPSECURITY_ATTRIBUTES attr
,
1218 DWORD protect
, DWORD size_high
,
1219 DWORD size_low
, LPCWSTR name
)
1221 LPSTR nameA
= HEAP_strdupWtoA( GetProcessHeap(), 0, name
);
1222 HANDLE32 ret
= CreateFileMapping32A( hFile
, attr
, protect
,
1223 size_high
, size_low
, nameA
);
1224 HeapFree( GetProcessHeap(), 0, nameA
);
1229 /***********************************************************************
1230 * OpenFileMapping32A (KERNEL32.397)
1231 * Opens a named file-mapping object.
1237 HANDLE32 WINAPI
OpenFileMapping32A(
1238 DWORD access
, /* [in] Access mode */
1239 BOOL32 inherit
, /* [in] Inherit flag */
1240 LPCSTR name
) /* [in] Name of file-mapping object */
1242 HANDLE32 handle
= 0;
1244 struct open_named_obj_request req
;
1245 struct open_named_obj_reply reply
;
1246 int len
= name
? strlen(name
) + 1 : 0;
1248 req
.type
= OPEN_MAPPING
;
1249 req
.access
= access
;
1250 req
.inherit
= inherit
;
1251 CLIENT_SendRequest( REQ_OPEN_NAMED_OBJ
, -1, 2, &req
, sizeof(req
), name
, len
);
1252 CLIENT_WaitSimpleReply( &reply
, sizeof(reply
), NULL
);
1254 if (reply
.handle
!= -1)
1257 if ((obj
= K32OBJ_FindNameType( name
, K32OBJ_MEM_MAPPED_FILE
)))
1259 handle
= HANDLE_Alloc( PROCESS_Current(), obj
, access
, inherit
, reply
.handle
);
1260 K32OBJ_DecCount( obj
);
1261 if (handle
== INVALID_HANDLE_VALUE32
)
1262 handle
= 0; /* must return 0 on failure, not -1 */
1264 else CLIENT_CloseHandle( reply
.handle
);
1271 /***********************************************************************
1272 * OpenFileMapping32W (KERNEL32.398)
1273 * See OpenFileMapping32A
1275 HANDLE32 WINAPI
OpenFileMapping32W( DWORD access
, BOOL32 inherit
, LPCWSTR name
)
1277 LPSTR nameA
= HEAP_strdupWtoA( GetProcessHeap(), 0, name
);
1278 HANDLE32 ret
= OpenFileMapping32A( access
, inherit
, nameA
);
1279 HeapFree( GetProcessHeap(), 0, nameA
);
1284 /***********************************************************************
1285 * VIRTUAL_DestroyMapping
1287 * Destroy a FILE_MAPPING object.
1289 static void VIRTUAL_DestroyMapping( K32OBJ
*ptr
)
1291 FILE_MAPPING
*mapping
= (FILE_MAPPING
*)ptr
;
1292 assert( ptr
->type
== K32OBJ_MEM_MAPPED_FILE
);
1294 if (mapping
->file
) K32OBJ_DecCount( mapping
->file
);
1295 ptr
->type
= K32OBJ_UNKNOWN
;
1296 HeapFree( SystemHeap
, 0, mapping
);
1300 /***********************************************************************
1301 * MapViewOfFile (KERNEL32.385)
1302 * Maps a view of a file into the address space
1305 * Starting address of mapped view
1308 LPVOID WINAPI
MapViewOfFile(
1309 HANDLE32 mapping
, /* [in] File-mapping object to map */
1310 DWORD access
, /* [in] Access mode */
1311 DWORD offset_high
, /* [in] High-order 32 bits of file offset */
1312 DWORD offset_low
, /* [in] Low-order 32 bits of file offset */
1313 DWORD count
/* [in] Number of bytes to map */
1315 return MapViewOfFileEx( mapping
, access
, offset_high
,
1316 offset_low
, count
, NULL
);
1320 /***********************************************************************
1321 * MapViewOfFileEx (KERNEL32.386)
1322 * Maps a view of a file into the address space
1325 * Starting address of mapped view
1328 LPVOID WINAPI
MapViewOfFileEx(
1329 HANDLE32 handle
, /* [in] File-mapping object to map */
1330 DWORD access
, /* [in] Access mode */
1331 DWORD offset_high
, /* [in] High-order 32 bits of file offset */
1332 DWORD offset_low
, /* [in] Low-order 32 bits of file offset */
1333 DWORD count
, /* [in] Number of bytes to map */
1334 LPVOID addr
/* [in] Suggested starting address for mapped view */
1337 UINT32 ptr
= (UINT32
)-1, size
= 0;
1338 int flags
= MAP_PRIVATE
;
1339 int unix_handle
= -1;
1340 struct get_mapping_info_request req
;
1341 struct get_mapping_info_reply info
;
1343 /* Check parameters */
1345 if ((offset_low
& granularity_mask
) ||
1346 (addr
&& ((UINT32
)addr
& granularity_mask
)))
1348 SetLastError( ERROR_INVALID_PARAMETER
);
1352 req
.handle
= HANDLE_GetServerHandle( PROCESS_Current(), handle
,
1353 K32OBJ_MEM_MAPPED_FILE
, 0 /* FIXME */ );
1354 CLIENT_SendRequest( REQ_GET_MAPPING_INFO
, -1, 1, &req
, sizeof(req
) );
1355 if (CLIENT_WaitSimpleReply( &info
, sizeof(info
), &unix_handle
))
1358 if (info
.size_high
|| offset_high
)
1359 ERR(virtual, "Offsets larger than 4Gb not supported\n");
1361 if ((offset_low
>= info
.size_low
) ||
1362 (count
> info
.size_low
- offset_low
))
1364 SetLastError( ERROR_INVALID_PARAMETER
);
1367 if (count
) size
= ROUND_SIZE( offset_low
, count
);
1368 else size
= info
.size_low
- offset_low
;
1372 case FILE_MAP_ALL_ACCESS
:
1373 case FILE_MAP_WRITE
:
1374 case FILE_MAP_WRITE
| FILE_MAP_READ
:
1375 if (!(info
.protect
& VPROT_WRITE
))
1377 SetLastError( ERROR_INVALID_PARAMETER
);
1384 case FILE_MAP_COPY
| FILE_MAP_READ
:
1385 if (info
.protect
& VPROT_READ
) break;
1388 SetLastError( ERROR_INVALID_PARAMETER
);
1394 TRACE(virtual, "handle=%x size=%x offset=%lx\n",
1395 handle
, size
, offset_low
);
1397 ptr
= (UINT32
)FILE_dommap( unix_handle
,
1398 addr
, 0, size
, 0, offset_low
,
1399 VIRTUAL_GetUnixProt( info
.protect
),
1401 if (ptr
== (UINT32
)-1) {
1402 /* KB: Q125713, 25-SEP-1995, "Common File Mapping Problems and
1403 * Platform Differences":
1404 * Windows NT: ERROR_INVALID_PARAMETER
1405 * Windows 95: ERROR_INVALID_ADDRESS.
1406 * FIXME: So should we add a module dependend check here? -MM
1409 SetLastError( ERROR_OUTOFMEMORY
);
1411 SetLastError( ERROR_INVALID_PARAMETER
);
1415 if (!(view
= VIRTUAL_CreateView( ptr
, size
, offset_low
, 0,
1416 info
.protect
, handle
)))
1418 SetLastError( ERROR_OUTOFMEMORY
);
1421 if (unix_handle
!= -1) close( unix_handle
);
1425 if (unix_handle
!= -1) close( unix_handle
);
1426 if (ptr
!= (UINT32
)-1) FILE_munmap( (void *)ptr
, 0, size
);
1431 /***********************************************************************
1432 * FlushViewOfFile (KERNEL32.262)
1433 * Writes to the disk a byte range within a mapped view of a file
1439 BOOL32 WINAPI
FlushViewOfFile(
1440 LPCVOID base
, /* [in] Start address of byte range to flush */
1441 DWORD cbFlush
/* [in] Number of bytes in range */
1444 UINT32 addr
= ROUND_ADDR( base
);
1446 TRACE(virtual, "FlushViewOfFile at %p for %ld bytes\n",
1449 if (!(view
= VIRTUAL_FindView( addr
)))
1451 SetLastError( ERROR_INVALID_PARAMETER
);
1454 if (!cbFlush
) cbFlush
= view
->size
;
1455 if (!msync( (void *)addr
, cbFlush
, MS_SYNC
)) return TRUE
;
1456 SetLastError( ERROR_INVALID_PARAMETER
);
1461 /***********************************************************************
1462 * UnmapViewOfFile (KERNEL32.540)
1463 * Unmaps a mapped view of a file.
1466 * Should addr be an LPCVOID?
1472 BOOL32 WINAPI
UnmapViewOfFile(
1473 LPVOID addr
/* [in] Address where mapped view begins */
1476 UINT32 base
= ROUND_ADDR( addr
);
1477 if (!(view
= VIRTUAL_FindView( base
)) || (base
!= view
->base
))
1479 SetLastError( ERROR_INVALID_PARAMETER
);
1482 VIRTUAL_DeleteView( view
);
1486 /***********************************************************************
1489 * Helper function to map a file to memory:
1491 * [RETURN] ptr - pointer to mapped file
1493 LPVOID
VIRTUAL_MapFileW( LPCWSTR name
)
1495 HANDLE32 hFile
, hMapping
;
1498 hFile
= CreateFile32W( name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
1499 OPEN_EXISTING
, FILE_FLAG_RANDOM_ACCESS
, 0);
1500 if (hFile
!= INVALID_HANDLE_VALUE32
)
1502 hMapping
= CreateFileMapping32A( hFile
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
1503 CloseHandle( hFile
);
1506 ptr
= MapViewOfFile( hMapping
, FILE_MAP_READ
, 0, 0, 0 );
1507 CloseHandle( hMapping
);