blob: 4d21752994383b68b08eeef4d3fa9e79c55665bc (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
/***
*heapwalk.c - walk the heap
*
* Copyright (c) 1989-1991, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Defines the _heapwalk() function
*
*Revision History:
* 07-05-89 JCR Module created.
* 11-13-89 GJF Added MTHREAD support, also fixed copyright.
* 11-14-89 JCR Fixed bug -- returned address was off by HDRSIZE
* 12-18-89 GJF Removed DEBUG286 stuff, also some tuning, cleaned up
* format a bit, changed header file name to heap.h, added
* explicit _cdecl to function definition
* 12-20-89 GJF Removed references to plastdesc
* 03-11-90 GJF Replaced _cdecl with _CALLTYPE1, added #include
* <cruntime.h> and removed #include <register.h>.
* 09-28-90 GJF New-style function declarator.
* 06-27-94 SRW Ported to Win32 Heap API
*
*******************************************************************************/
#include <cruntime.h>
#include <oscalls.h>
#include <malloc.h>
#include <os2dll.h>
#include <stddef.h>
#ifndef _POSIX_
/***
*int _heapwalk() - Walk the heap
*
*Purpose:
* Walk the heap returning information on one entry at a time.
*
*Entry:
* struct _heapinfo {
* int * _pentry; heap entry pointer
* size_t size; size of heap entry
* int _useflag; free/inuse flag
* } *entry;
*
*Exit:
* Returns one of the following values:
*
* _HEAPOK - completed okay
* _HEAPEMPTY - heap not initialized
* _HEAPBADPTR - _pentry pointer is bogus
* _HEAPBADBEGIN - can't find initial header info
* _HEAPBADNODE - malformed node somewhere
* _HEAPEND - end of heap successfully reached
*
*Uses:
*
*Exceptions:
*
*******************************************************************************/
int _CALLTYPE1 _heapwalk (
struct _heapinfo *_entry
)
{
PROCESS_HEAP_ENTRY Entry;
int retval = _HEAPOK;
Entry.wFlags = 0;
Entry.iRegionIndex = 0;
if ((Entry.lpData = _entry->_pentry) == NULL) {
if (!HeapWalk( GetProcessHeap(), &Entry )) {
return _HEAPBADBEGIN;
}
}
else {
if (_entry->_useflag == _USEDENTRY) {
Entry.wFlags = PROCESS_HEAP_ENTRY_BUSY;
}
nextBlock:
if (!HeapWalk( GetProcessHeap(), &Entry )) {
return _HEAPBADNODE;
}
}
if (Entry.wFlags & (PROCESS_HEAP_REGION | PROCESS_HEAP_UNCOMMITTED_RANGE)) {
goto nextBlock;
}
_entry->_pentry = Entry.lpData;
_entry->_size = Entry.cbData;
if (Entry.wFlags & PROCESS_HEAP_ENTRY_BUSY) {
_entry->_useflag = _USEDENTRY;
}
else {
_entry->_useflag = _FREEENTRY;
}
return(retval);
}
#endif /* !_POSIX_ */
|
