43 lines
930 B
C
43 lines
930 B
C
|
#include <stdio.h>
|
||
|
|
#include <malloc.h>
|
||
|
|
|
||
|
|
void heap_dump()
|
||
|
|
{
|
||
|
|
struct _heapinfo h_info;
|
||
|
|
int heap_status;
|
||
|
|
|
||
|
|
h_info._pentry = NULL;
|
||
|
|
for(;;) {
|
||
|
|
heap_status = _heapwalk( &h_info );
|
||
|
|
if( heap_status != _HEAPOK ) break;
|
||
|
|
printf( " %s block at %Fp of size %4.4X\n",
|
||
|
|
(h_info._useflag == _USEDENTRY ? "USED" : "FREE"),
|
||
|
|
h_info._pentry, h_info._size );
|
||
|
|
}
|
||
|
|
|
||
|
|
switch( heap_status ) {
|
||
|
|
case _HEAPEND:
|
||
|
|
printf( "OK - end of heap\n" );
|
||
|
|
break;
|
||
|
|
case _HEAPEMPTY:
|
||
|
|
printf( "OK - heap is empty\n" );
|
||
|
|
break;
|
||
|
|
case _HEAPBADBEGIN:
|
||
|
|
printf( "ERROR - heap is damaged\n" );
|
||
|
|
break;
|
||
|
|
case _HEAPBADPTR:
|
||
|
|
printf( "ERROR - bad pointer to heap\n" );
|
||
|
|
break;
|
||
|
|
case _HEAPBADNODE:
|
||
|
|
printf( "ERROR - bad node in heap\n" );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
char *p;
|
||
|
|
heap_dump(); p = (char *) malloc( 80 );
|
||
|
|
heap_dump(); free( p );
|
||
|
|
heap_dump();
|
||
|
|
}
|