| /* |
| * Win32 heap functions |
| * |
| * Copyright 1996 Alexandre Julliard |
| * Copyright 1998 Ulrich Weigand |
| */ |
| |
| #include "config.h" |
| |
| #include <assert.h> |
| #include <stdlib.h> |
| #include <stdio.h> |
| #include <string.h> |
| |
| #include "winbase.h" |
| #include "wine/winbase16.h" |
| #include "winerror.h" |
| #include "winnt.h" |
| #include "ntddk.h" |
| #include "wine/unicode.h" |
| #include "selectors.h" |
| #include "global.h" |
| #include "thread.h" |
| #include "toolhelp.h" |
| #include "debugtools.h" |
| |
| DEFAULT_DEBUG_CHANNEL(heap); |
| |
| /* address where we try to map the system heap */ |
| #define SYSTEM_HEAP_BASE ((void*)0x65430000) |
| #define SYSTEM_HEAP_SIZE 0x100000 /* Default heap size = 1Mb */ |
| |
| |
| #define HTABLE_SIZE 0x10000 |
| #define HTABLE_PAGESIZE 0x1000 |
| #define HTABLE_NPAGES (HTABLE_SIZE / HTABLE_PAGESIZE) |
| |
| #include "pshpack1.h" |
| typedef struct _LOCAL32HEADER |
| { |
| WORD freeListFirst[HTABLE_NPAGES]; |
| WORD freeListSize[HTABLE_NPAGES]; |
| WORD freeListLast[HTABLE_NPAGES]; |
| |
| DWORD selectorTableOffset; |
| WORD selectorTableSize; |
| WORD selectorDelta; |
| |
| DWORD segment; |
| LPBYTE base; |
| |
| DWORD limit; |
| DWORD flags; |
| |
| DWORD magic; |
| HANDLE heap; |
| |
| } LOCAL32HEADER; |
| #include "poppack.h" |
| |
| #define LOCAL32_MAGIC ((DWORD)('L' | ('H'<<8) | ('3'<<16) | ('2'<<24))) |
| |
| static HANDLE systemHeap; /* globally shared heap */ |
| |
| /*********************************************************************** |
| * HEAP_CreateSystemHeap |
| * |
| * Create the system heap. |
| */ |
| inline static HANDLE HEAP_CreateSystemHeap(void) |
| { |
| int created; |
| void *base; |
| HANDLE map, event; |
| UNICODE_STRING event_name; |
| OBJECT_ATTRIBUTES event_attr; |
| |
| if (!(map = CreateFileMappingA( INVALID_HANDLE_VALUE, NULL, SEC_COMMIT | PAGE_READWRITE, |
| 0, SYSTEM_HEAP_SIZE, "__SystemHeap" ))) return 0; |
| created = (GetLastError() != ERROR_ALREADY_EXISTS); |
| |
| if (!(base = MapViewOfFileEx( map, FILE_MAP_ALL_ACCESS, 0, 0, 0, SYSTEM_HEAP_BASE ))) |
| { |
| /* pre-defined address not available */ |
| ERR( "system heap base address %p not available\n", SYSTEM_HEAP_BASE ); |
| return 0; |
| } |
| |
| /* create the system heap event */ |
| RtlCreateUnicodeStringFromAsciiz( &event_name, "__SystemHeapEvent" ); |
| event_attr.Length = sizeof(event_attr); |
| event_attr.RootDirectory = 0; |
| event_attr.ObjectName = &event_name; |
| event_attr.Attributes = 0; |
| event_attr.SecurityDescriptor = NULL; |
| event_attr.SecurityQualityOfService = NULL; |
| NtCreateEvent( &event, EVENT_ALL_ACCESS, &event_attr, TRUE, FALSE ); |
| |
| if (created) /* newly created heap */ |
| { |
| systemHeap = RtlCreateHeap( HEAP_SHARED, base, SYSTEM_HEAP_SIZE, |
| SYSTEM_HEAP_SIZE, NULL, NULL ); |
| NtSetEvent( event, NULL ); |
| } |
| else |
| { |
| /* wait for the heap to be initialized */ |
| WaitForSingleObject( event, INFINITE ); |
| systemHeap = (HANDLE)base; |
| } |
| CloseHandle( map ); |
| return systemHeap; |
| } |
| |
| |
| /*********************************************************************** |
| * HeapCreate (KERNEL32.@) |
| * RETURNS |
| * Handle of heap: Success |
| * NULL: Failure |
| */ |
| HANDLE WINAPI HeapCreate( |
| DWORD flags, /* [in] Heap allocation flag */ |
| DWORD initialSize, /* [in] Initial heap size */ |
| DWORD maxSize /* [in] Maximum heap size */ |
| ) { |
| HANDLE ret; |
| |
| if ( flags & HEAP_SHARED ) |
| { |
| if (!systemHeap) HEAP_CreateSystemHeap(); |
| else WARN( "Shared Heap requested, returning system heap.\n" ); |
| ret = systemHeap; |
| } |
| else |
| { |
| ret = RtlCreateHeap( flags, NULL, maxSize, initialSize, NULL, NULL ); |
| if (!ret) SetLastError( ERROR_NOT_ENOUGH_MEMORY ); |
| } |
| return ret; |
| } |
| |
| /*********************************************************************** |
| * HeapDestroy (KERNEL32.@) |
| * RETURNS |
| * TRUE: Success |
| * FALSE: Failure |
| */ |
| BOOL WINAPI HeapDestroy( HANDLE heap /* [in] Handle of heap */ ) |
| { |
| if (heap == systemHeap) |
| { |
| WARN( "attempt to destroy system heap, returning TRUE!\n" ); |
| return TRUE; |
| } |
| if (!RtlDestroyHeap( heap )) return TRUE; |
| SetLastError( ERROR_INVALID_HANDLE ); |
| return FALSE; |
| } |
| |
| |
| /*********************************************************************** |
| * HeapCompact (KERNEL32.@) |
| */ |
| DWORD WINAPI HeapCompact( HANDLE heap, DWORD flags ) |
| { |
| return RtlCompactHeap( heap, flags ); |
| } |
| |
| |
| /*********************************************************************** |
| * HeapLock (KERNEL32.@) |
| * Attempts to acquire the critical section object for a specified heap. |
| * |
| * RETURNS |
| * TRUE: Success |
| * FALSE: Failure |
| */ |
| BOOL WINAPI HeapLock( |
| HANDLE heap /* [in] Handle of heap to lock for exclusive access */ |
| ) { |
| return RtlLockHeap( heap ); |
| } |
| |
| |
| /*********************************************************************** |
| * HeapUnlock (KERNEL32.@) |
| * Releases ownership of the critical section object. |
| * |
| * RETURNS |
| * TRUE: Success |
| * FALSE: Failure |
| */ |
| BOOL WINAPI HeapUnlock( |
| HANDLE heap /* [in] Handle to the heap to unlock */ |
| ) { |
| return RtlUnlockHeap( heap ); |
| } |
| |
| |
| /*********************************************************************** |
| * HeapValidate (KERNEL32.@) |
| * Validates a specified heap. |
| * |
| * NOTES |
| * Flags is ignored. |
| * |
| * RETURNS |
| * TRUE: Success |
| * FALSE: Failure |
| */ |
| BOOL WINAPI HeapValidate( |
| HANDLE heap, /* [in] Handle to the heap */ |
| DWORD flags, /* [in] Bit flags that control access during operation */ |
| LPCVOID block /* [in] Optional pointer to memory block to validate */ |
| ) { |
| return RtlValidateHeap( heap, flags, block ); |
| } |
| |
| |
| /*********************************************************************** |
| * HeapWalk (KERNEL32.@) |
| * Enumerates the memory blocks in a specified heap. |
| * |
| * TODO |
| * - handling of PROCESS_HEAP_ENTRY_MOVEABLE and |
| * PROCESS_HEAP_ENTRY_DDESHARE (needs heap.c support) |
| * |
| * RETURNS |
| * TRUE: Success |
| * FALSE: Failure |
| */ |
| BOOL WINAPI HeapWalk( |
| HANDLE heap, /* [in] Handle to heap to enumerate */ |
| LPPROCESS_HEAP_ENTRY entry /* [out] Pointer to structure of enumeration info */ |
| ) { |
| NTSTATUS ret = RtlWalkHeap( heap, entry ); |
| if (ret) SetLastError( RtlNtStatusToDosError(ret) ); |
| return !ret; |
| } |
| |
| |
| /*********************************************************************** |
| * GetProcessHeap (KERNEL32.@) |
| */ |
| HANDLE WINAPI GetProcessHeap(void) |
| { |
| HANDLE *pdb = (HANDLE *)NtCurrentTeb()->process; |
| return pdb[0x18 / sizeof(HANDLE)]; /* get dword at offset 0x18 in pdb */ |
| } |
| |
| |
| /*********************************************************************** |
| * GetProcessHeaps (KERNEL32.@) |
| */ |
| DWORD WINAPI GetProcessHeaps( DWORD count, HANDLE *heaps ) |
| { |
| return RtlGetProcessHeaps( count, heaps ); |
| } |
| |
| |
| /*********************************************************************** |
| * 32-bit local heap functions (Win95; undocumented) |
| */ |
| |
| /*********************************************************************** |
| * K208 (KERNEL.208) |
| */ |
| HANDLE WINAPI Local32Init16( WORD segment, DWORD tableSize, |
| DWORD heapSize, DWORD flags ) |
| { |
| DWORD totSize, segSize = 0; |
| LPBYTE base; |
| LOCAL32HEADER *header; |
| HANDLE heap; |
| WORD *selectorTable; |
| WORD selectorEven, selectorOdd; |
| int i, nrBlocks; |
| |
| /* Determine new heap size */ |
| |
| if ( segment ) |
| { |
| if ( (segSize = GetSelectorLimit16( segment )) == 0 ) |
| return 0; |
| else |
| segSize++; |
| } |
| |
| if ( heapSize == -1L ) |
| heapSize = 1024L*1024L; /* FIXME */ |
| |
| heapSize = (heapSize + 0xffff) & 0xffff0000; |
| segSize = (segSize + 0x0fff) & 0xfffff000; |
| totSize = segSize + HTABLE_SIZE + heapSize; |
| |
| |
| /* Allocate memory and initialize heap */ |
| |
| if ( !(base = VirtualAlloc( NULL, totSize, MEM_RESERVE, PAGE_READWRITE )) ) |
| return 0; |
| |
| if ( !VirtualAlloc( base, segSize + HTABLE_PAGESIZE, |
| MEM_COMMIT, PAGE_READWRITE ) ) |
| { |
| VirtualFree( base, 0, MEM_RELEASE ); |
| return 0; |
| } |
| |
| if (!(heap = RtlCreateHeap( 0, base + segSize + HTABLE_SIZE, heapSize, 0x10000, NULL, NULL ))) |
| { |
| VirtualFree( base, 0, MEM_RELEASE ); |
| return 0; |
| } |
| |
| |
| /* Set up header and handle table */ |
| |
| header = (LOCAL32HEADER *)(base + segSize); |
| header->base = base; |
| header->limit = HTABLE_PAGESIZE-1; |
| header->flags = 0; |
| header->magic = LOCAL32_MAGIC; |
| header->heap = heap; |
| |
| header->freeListFirst[0] = sizeof(LOCAL32HEADER); |
| header->freeListLast[0] = HTABLE_PAGESIZE - 4; |
| header->freeListSize[0] = (HTABLE_PAGESIZE - sizeof(LOCAL32HEADER)) / 4; |
| |
| for (i = header->freeListFirst[0]; i < header->freeListLast[0]; i += 4) |
| *(DWORD *)((LPBYTE)header + i) = i+4; |
| |
| header->freeListFirst[1] = 0xffff; |
| |
| |
| /* Set up selector table */ |
| |
| nrBlocks = (totSize + 0x7fff) >> 15; |
| selectorTable = (LPWORD) HeapAlloc( header->heap, 0, nrBlocks * 2 ); |
| selectorEven = SELECTOR_AllocBlock( base, totSize, WINE_LDT_FLAGS_DATA ); |
| selectorOdd = SELECTOR_AllocBlock( base + 0x8000, totSize - 0x8000, WINE_LDT_FLAGS_DATA ); |
| if ( !selectorTable || !selectorEven || !selectorOdd ) |
| { |
| if ( selectorTable ) HeapFree( header->heap, 0, selectorTable ); |
| if ( selectorEven ) SELECTOR_FreeBlock( selectorEven ); |
| if ( selectorOdd ) SELECTOR_FreeBlock( selectorOdd ); |
| HeapDestroy( header->heap ); |
| VirtualFree( base, 0, MEM_RELEASE ); |
| return 0; |
| } |
| |
| header->selectorTableOffset = (LPBYTE)selectorTable - header->base; |
| header->selectorTableSize = nrBlocks * 4; /* ??? Win95 does it this way! */ |
| header->selectorDelta = selectorEven - selectorOdd; |
| header->segment = segment? segment : selectorEven; |
| |
| for (i = 0; i < nrBlocks; i++) |
| selectorTable[i] = (i & 1)? selectorOdd + ((i >> 1) << __AHSHIFT) |
| : selectorEven + ((i >> 1) << __AHSHIFT); |
| |
| /* Move old segment */ |
| |
| if ( segment ) |
| { |
| /* FIXME: This is somewhat ugly and relies on implementation |
| details about 16-bit global memory handles ... */ |
| |
| LPBYTE oldBase = (LPBYTE)GetSelectorBase( segment ); |
| memcpy( base, oldBase, segSize ); |
| GLOBAL_MoveBlock( segment, base, totSize ); |
| HeapFree( GetProcessHeap(), 0, oldBase ); |
| } |
| |
| return (HANDLE)header; |
| } |
| |
| /*********************************************************************** |
| * Local32_SearchHandle |
| */ |
| static LPDWORD Local32_SearchHandle( LOCAL32HEADER *header, DWORD addr ) |
| { |
| LPDWORD handle; |
| |
| for ( handle = (LPDWORD)((LPBYTE)header + sizeof(LOCAL32HEADER)); |
| handle < (LPDWORD)((LPBYTE)header + header->limit); |
| handle++) |
| { |
| if (*handle == addr) |
| return handle; |
| } |
| |
| return NULL; |
| } |
| |
| /*********************************************************************** |
| * Local32_ToHandle |
| */ |
| static VOID Local32_ToHandle( LOCAL32HEADER *header, INT16 type, |
| DWORD addr, LPDWORD *handle, LPBYTE *ptr ) |
| { |
| *handle = NULL; |
| *ptr = NULL; |
| |
| switch (type) |
| { |
| case -2: /* 16:16 pointer, no handles */ |
| *ptr = MapSL( addr ); |
| *handle = (LPDWORD)*ptr; |
| break; |
| |
| case -1: /* 32-bit offset, no handles */ |
| *ptr = header->base + addr; |
| *handle = (LPDWORD)*ptr; |
| break; |
| |
| case 0: /* handle */ |
| if ( addr >= sizeof(LOCAL32HEADER) |
| && addr < header->limit && !(addr & 3) |
| && *(LPDWORD)((LPBYTE)header + addr) >= HTABLE_SIZE ) |
| { |
| *handle = (LPDWORD)((LPBYTE)header + addr); |
| *ptr = header->base + **handle; |
| } |
| break; |
| |
| case 1: /* 16:16 pointer */ |
| *ptr = MapSL( addr ); |
| *handle = Local32_SearchHandle( header, *ptr - header->base ); |
| break; |
| |
| case 2: /* 32-bit offset */ |
| *ptr = header->base + addr; |
| *handle = Local32_SearchHandle( header, *ptr - header->base ); |
| break; |
| } |
| } |
| |
| /*********************************************************************** |
| * Local32_FromHandle |
| */ |
| static VOID Local32_FromHandle( LOCAL32HEADER *header, INT16 type, |
| DWORD *addr, LPDWORD handle, LPBYTE ptr ) |
| { |
| switch (type) |
| { |
| case -2: /* 16:16 pointer */ |
| case 1: |
| { |
| WORD *selTable = (LPWORD)(header->base + header->selectorTableOffset); |
| DWORD offset = (LPBYTE)ptr - header->base; |
| *addr = MAKELONG( offset & 0x7fff, selTable[offset >> 15] ); |
| } |
| break; |
| |
| case -1: /* 32-bit offset */ |
| case 2: |
| *addr = ptr - header->base; |
| break; |
| |
| case 0: /* handle */ |
| *addr = (LPBYTE)handle - (LPBYTE)header; |
| break; |
| } |
| } |
| |
| /*********************************************************************** |
| * K209 (KERNEL.209) |
| */ |
| DWORD WINAPI Local32Alloc16( HANDLE heap, DWORD size, INT16 type, DWORD flags ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| DWORD addr; |
| |
| /* Allocate memory */ |
| ptr = HeapAlloc( header->heap, |
| (flags & LMEM_MOVEABLE)? HEAP_ZERO_MEMORY : 0, size ); |
| if (!ptr) return 0; |
| |
| |
| /* Allocate handle if requested */ |
| if (type >= 0) |
| { |
| int page, i; |
| |
| /* Find first page of handle table with free slots */ |
| for (page = 0; page < HTABLE_NPAGES; page++) |
| if (header->freeListFirst[page] != 0) |
| break; |
| if (page == HTABLE_NPAGES) |
| { |
| WARN("Out of handles!\n" ); |
| HeapFree( header->heap, 0, ptr ); |
| return 0; |
| } |
| |
| /* If virgin page, initialize it */ |
| if (header->freeListFirst[page] == 0xffff) |
| { |
| if ( !VirtualAlloc( (LPBYTE)header + (page << 12), |
| 0x1000, MEM_COMMIT, PAGE_READWRITE ) ) |
| { |
| WARN("Cannot grow handle table!\n" ); |
| HeapFree( header->heap, 0, ptr ); |
| return 0; |
| } |
| |
| header->limit += HTABLE_PAGESIZE; |
| |
| header->freeListFirst[page] = 0; |
| header->freeListLast[page] = HTABLE_PAGESIZE - 4; |
| header->freeListSize[page] = HTABLE_PAGESIZE / 4; |
| |
| for (i = 0; i < HTABLE_PAGESIZE; i += 4) |
| *(DWORD *)((LPBYTE)header + i) = i+4; |
| |
| if (page < HTABLE_NPAGES-1) |
| header->freeListFirst[page+1] = 0xffff; |
| } |
| |
| /* Allocate handle slot from page */ |
| handle = (LPDWORD)((LPBYTE)header + header->freeListFirst[page]); |
| if (--header->freeListSize[page] == 0) |
| header->freeListFirst[page] = header->freeListLast[page] = 0; |
| else |
| header->freeListFirst[page] = *handle; |
| |
| /* Store 32-bit offset in handle slot */ |
| *handle = ptr - header->base; |
| } |
| else |
| { |
| handle = (LPDWORD)ptr; |
| header->flags |= 1; |
| } |
| |
| |
| /* Convert handle to requested output type */ |
| Local32_FromHandle( header, type, &addr, handle, ptr ); |
| return addr; |
| } |
| |
| /*********************************************************************** |
| * K210 (KERNEL.210) |
| */ |
| DWORD WINAPI Local32ReAlloc16( HANDLE heap, DWORD addr, INT16 type, |
| DWORD size, DWORD flags ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| |
| if (!addr) |
| return Local32Alloc16( heap, size, type, flags ); |
| |
| /* Retrieve handle and pointer */ |
| Local32_ToHandle( header, type, addr, &handle, &ptr ); |
| if (!handle) return FALSE; |
| |
| /* Reallocate memory block */ |
| ptr = HeapReAlloc( header->heap, |
| (flags & LMEM_MOVEABLE)? HEAP_ZERO_MEMORY : 0, |
| ptr, size ); |
| if (!ptr) return 0; |
| |
| /* Modify handle */ |
| if (type >= 0) |
| *handle = ptr - header->base; |
| else |
| handle = (LPDWORD)ptr; |
| |
| /* Convert handle to requested output type */ |
| Local32_FromHandle( header, type, &addr, handle, ptr ); |
| return addr; |
| } |
| |
| /*********************************************************************** |
| * K211 (KERNEL.211) |
| */ |
| BOOL WINAPI Local32Free16( HANDLE heap, DWORD addr, INT16 type ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| |
| /* Retrieve handle and pointer */ |
| Local32_ToHandle( header, type, addr, &handle, &ptr ); |
| if (!handle) return FALSE; |
| |
| /* Free handle if necessary */ |
| if (type >= 0) |
| { |
| int offset = (LPBYTE)handle - (LPBYTE)header; |
| int page = offset >> 12; |
| |
| /* Return handle slot to page free list */ |
| if (header->freeListSize[page]++ == 0) |
| header->freeListFirst[page] = header->freeListLast[page] = offset; |
| else |
| *(LPDWORD)((LPBYTE)header + header->freeListLast[page]) = offset, |
| header->freeListLast[page] = offset; |
| |
| *handle = 0; |
| |
| /* Shrink handle table when possible */ |
| while (page > 0 && header->freeListSize[page] == HTABLE_PAGESIZE / 4) |
| { |
| if ( VirtualFree( (LPBYTE)header + |
| (header->limit & ~(HTABLE_PAGESIZE-1)), |
| HTABLE_PAGESIZE, MEM_DECOMMIT ) ) |
| break; |
| |
| header->limit -= HTABLE_PAGESIZE; |
| header->freeListFirst[page] = 0xffff; |
| page--; |
| } |
| } |
| |
| /* Free memory */ |
| return HeapFree( header->heap, 0, ptr ); |
| } |
| |
| /*********************************************************************** |
| * K213 (KERNEL.213) |
| */ |
| DWORD WINAPI Local32Translate16( HANDLE heap, DWORD addr, INT16 type1, INT16 type2 ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| |
| Local32_ToHandle( header, type1, addr, &handle, &ptr ); |
| if (!handle) return 0; |
| |
| Local32_FromHandle( header, type2, &addr, handle, ptr ); |
| return addr; |
| } |
| |
| /*********************************************************************** |
| * K214 (KERNEL.214) |
| */ |
| DWORD WINAPI Local32Size16( HANDLE heap, DWORD addr, INT16 type ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| |
| Local32_ToHandle( header, type, addr, &handle, &ptr ); |
| if (!handle) return 0; |
| |
| return HeapSize( header->heap, 0, ptr ); |
| } |
| |
| /*********************************************************************** |
| * K215 (KERNEL.215) |
| */ |
| BOOL WINAPI Local32ValidHandle16( HANDLE heap, WORD addr ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| LPDWORD handle; |
| LPBYTE ptr; |
| |
| Local32_ToHandle( header, 0, addr, &handle, &ptr ); |
| return handle != NULL; |
| } |
| |
| /*********************************************************************** |
| * K229 (KERNEL.229) |
| */ |
| WORD WINAPI Local32GetSegment16( HANDLE heap ) |
| { |
| LOCAL32HEADER *header = (LOCAL32HEADER *)heap; |
| return header->segment; |
| } |
| |
| /*********************************************************************** |
| * Local32_GetHeap |
| */ |
| static LOCAL32HEADER *Local32_GetHeap( HGLOBAL16 handle ) |
| { |
| WORD selector = GlobalHandleToSel16( handle ); |
| DWORD base = GetSelectorBase( selector ); |
| DWORD limit = GetSelectorLimit16( selector ); |
| |
| /* Hmmm. This is a somewhat stupid heuristic, but Windows 95 does |
| it this way ... */ |
| |
| if ( limit > 0x10000 && ((LOCAL32HEADER *)base)->magic == LOCAL32_MAGIC ) |
| return (LOCAL32HEADER *)base; |
| |
| base += 0x10000; |
| limit -= 0x10000; |
| |
| if ( limit > 0x10000 && ((LOCAL32HEADER *)base)->magic == LOCAL32_MAGIC ) |
| return (LOCAL32HEADER *)base; |
| |
| return NULL; |
| } |
| |
| /*********************************************************************** |
| * Local32Info (KERNEL.444) |
| * Local32Info (TOOLHELP.84) |
| */ |
| BOOL16 WINAPI Local32Info16( LOCAL32INFO *pLocal32Info, HGLOBAL16 handle ) |
| { |
| PROCESS_HEAP_ENTRY entry; |
| int i; |
| |
| LOCAL32HEADER *header = Local32_GetHeap( handle ); |
| if ( !header ) return FALSE; |
| |
| if ( !pLocal32Info || pLocal32Info->dwSize < sizeof(LOCAL32INFO) ) |
| return FALSE; |
| |
| pLocal32Info->dwMemReserved = 0; |
| pLocal32Info->dwMemCommitted = 0; |
| pLocal32Info->dwTotalFree = 0; |
| pLocal32Info->dwLargestFreeBlock = 0; |
| |
| while (HeapWalk( header->heap, &entry )) |
| { |
| if (entry.wFlags & PROCESS_HEAP_REGION) |
| { |
| pLocal32Info->dwMemReserved += entry.u.Region.dwCommittedSize |
| + entry.u.Region.dwUnCommittedSize; |
| pLocal32Info->dwMemCommitted = entry.u.Region.dwCommittedSize; |
| } |
| else if (!(entry.wFlags & PROCESS_HEAP_ENTRY_BUSY)) |
| { |
| DWORD size = entry.cbData + entry.cbOverhead; |
| pLocal32Info->dwTotalFree += size; |
| if (size > pLocal32Info->dwLargestFreeBlock) pLocal32Info->dwLargestFreeBlock = size; |
| } |
| } |
| |
| pLocal32Info->dwcFreeHandles = 0; |
| for ( i = 0; i < HTABLE_NPAGES; i++ ) |
| { |
| if ( header->freeListFirst[i] == 0xffff ) break; |
| pLocal32Info->dwcFreeHandles += header->freeListSize[i]; |
| } |
| pLocal32Info->dwcFreeHandles += (HTABLE_NPAGES - i) * HTABLE_PAGESIZE/4; |
| |
| return TRUE; |
| } |
| |
| /*********************************************************************** |
| * Local32First (KERNEL.445) |
| * Local32First (TOOLHELP.85) |
| */ |
| BOOL16 WINAPI Local32First16( LOCAL32ENTRY *pLocal32Entry, HGLOBAL16 handle ) |
| { |
| FIXME("(%p, %04X): stub!\n", pLocal32Entry, handle ); |
| return FALSE; |
| } |
| |
| /*********************************************************************** |
| * Local32Next (KERNEL.446) |
| * Local32Next (TOOLHELP.86) |
| */ |
| BOOL16 WINAPI Local32Next16( LOCAL32ENTRY *pLocal32Entry ) |
| { |
| FIXME("(%p): stub!\n", pLocal32Entry ); |
| return FALSE; |
| } |
| |
