824 lines
22 KiB
C
824 lines
22 KiB
C
|
|
/*******************************************************************
|
|
*
|
|
* DESCRIPTION: mem3dc.c
|
|
*
|
|
* AUTHOR: Rob Rodger
|
|
*
|
|
* HISTORY: 23/12/96
|
|
*
|
|
*******************************************************************/
|
|
|
|
|
|
/* mem3dc.c simply keeps a record of all memory allocations called by */
|
|
/* AllocateMem() and checks if DeallocateMem() calls are legitimate */
|
|
/* i.e. the address freed has been allocated. This record */
|
|
/* includes the address, size, filename and line number for the associated */
|
|
/* AllocateMem() call. */
|
|
/* */
|
|
/* Also, fills in MALLOC_FILL_VALUE in memory malloced and FREE_FILL_VALUE */
|
|
/* in memory freed. */
|
|
/* */
|
|
/* A record is kept of the total amount of allocated memory outstanding in */
|
|
/* global TotalMemAllocated as well as the total number of outstanding mallocs */
|
|
/* in the global TotalMallocNum. Finally, a call to DumpMallocInfo(DUMPTOSCREEN) */
|
|
/* will give a textprint of each outstanding malloc record while */
|
|
/* while DumpMallocInfo(DUMPTOFILE) writes malloc records to a file with */
|
|
/* filename defined by MALLOCDUMPFILE define. Set APPEND_TO_DUMPFILE to 1 */
|
|
/* in define below if you wish to append malloc info to MALLOCDUMPFILE rather */
|
|
/* than over writing file each time. */
|
|
/* */
|
|
/* To use, define DBGMALLOC as 1 in "mem3dc.h". Obviously for final code */
|
|
/* set DBGMALLOC to 0. */
|
|
/* */
|
|
/* Note, must use AllocateMem() and DeallocateMem() in code - Do not */
|
|
/* make direct calls to AllocMem()/DeallocMem() contained in platform */
|
|
/* file our_mem.c */
|
|
|
|
#include "3dc.h"
|
|
|
|
#include <string.h>
|
|
#include "mem3dc.h" /* contains extern declarations for platform
|
|
specific memory allocation/deallocation.
|
|
Also contains DBGMALLOC define */
|
|
|
|
#if DBGMALLOC
|
|
|
|
#include "ourasert.h"
|
|
|
|
#if PSX || Saturn
|
|
#define MAXMALLOCS 600
|
|
#else
|
|
#define MAXMALLOCS 2500000
|
|
/* assertion fires if max exceeded */
|
|
/* changed to 1000000 by DHM 7/4/98; was 70001 */
|
|
#endif
|
|
|
|
#define MALLOC_FILL_VALUE 0x21
|
|
#define FREE_FILL_VALUE 0x89
|
|
#define MALLOCDUMPFILE "dbgdump.txt"
|
|
#define APPEND_TO_DUMPFILE 0 /* define as 0 if overwrite dbgdump.txt rather than append */
|
|
#define FREEING_MEMORY -1
|
|
|
|
#define AllowedToDeleteNULL Yes
|
|
/*
|
|
Option added 7/4/98 by DHM:
|
|
---------------------------
|
|
This option checks for NULL in record_free() and doesn't update the records.
|
|
|
|
According to 2nd and 3rd edition Stroustrup, it's legal to "delete NULL", and it
|
|
has no effect (see e.g. 3rd Edition Stroustrup, p128 paragraph 2).
|
|
According to Appendix B of K&R, free NULL has no effect.
|
|
*/
|
|
|
|
#if APPEND_TO_DUMPFILE
|
|
#define FILEPERM "a"
|
|
#else
|
|
#define FILEPERM "w"
|
|
#endif
|
|
|
|
#if SupportWindows95 && !defined(_MSC_VER) /* not required for MS C since MS C has CRT debugging available */
|
|
#define OVERRUN_SIZEMIN 2
|
|
#define OVERRUN_SIZEMAX 128
|
|
#define OVERRUN_SIZEFACTOR 2 /* this is a shift down */
|
|
|
|
#define OVERRUN_SIZE(sz) ((sz)>OVERRUN_SIZEMAX<<OVERRUN_SIZEFACTOR ? OVERRUN_SIZEMAX : (sz)<OVERRUN_SIZEMIN<<OVERRUN_SIZEFACTOR ? OVERRUN_SIZEMIN : (sz)>>OVERRUN_SIZEFACTOR)
|
|
/* I just selected these at random - the 0 term is necessary for wrap around */
|
|
static unsigned char const overrun_code [] = { 0xef, 0x94, 0x56, 0x27, 0xf6, 0x76, 0x23, 0x43, 0 };
|
|
|
|
#else
|
|
#undef OVERRUN_SIZE
|
|
#endif
|
|
|
|
|
|
|
|
typedef struct{
|
|
unsigned long addr;
|
|
unsigned long size;
|
|
#if COPY_FILENAME
|
|
char filename[40];
|
|
#else
|
|
char const * filename; /* JH 30/5/97 - since __FILE__ generates a string in the executable, to which we get passed a pointer, we don't need to make another copy unnecessarily wasting 720K of space on PC !! */
|
|
#endif
|
|
unsigned long linenum;
|
|
}MALLOC_RECORD;
|
|
|
|
/* globals */
|
|
MALLOC_RECORD MallocRecord[MAXMALLOCS];
|
|
unsigned long TotalMemAllocated = 0;
|
|
unsigned long TotalMallocNum = 0;
|
|
|
|
/* extern function declarations */
|
|
extern int textprint(const char* string, ...);
|
|
extern void ExitSystem(void);
|
|
extern void WaitForReturn(void);
|
|
|
|
/* textprint on psx impacts frame rate massively if not
|
|
used just for error messages, so it is often turned off.
|
|
Hence the use of textprint2 below */
|
|
|
|
#if PSX
|
|
#define textprint2 printf
|
|
#else
|
|
#define textprint2 textprint
|
|
#endif
|
|
|
|
/* function declarations */
|
|
#if COPY_FILENAME
|
|
void record_free(void *ptr, char string[], unsigned long lineno);
|
|
void *record_malloc(long size, char string[], unsigned long lineno);
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char string[], unsigned long lineno);
|
|
#else /* new prototypes to take just pointers - dunno if it's really necessary */
|
|
void record_free(void *ptr, char const * string, unsigned long lineno);
|
|
void *record_malloc(long size, char const * string, unsigned long lineno);
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char const * string, unsigned long lineno);
|
|
#endif
|
|
void DumpMallocInfo(int type);
|
|
static void InitMallocRecords(void);
|
|
|
|
/* function definitions */
|
|
|
|
#if COPY_FILENAME
|
|
void *record_malloc(long size, char string[], unsigned long lineno)
|
|
#else
|
|
void *record_malloc(long size, char const * string, unsigned long lineno)
|
|
#endif
|
|
{
|
|
#ifdef OVERRUN_SIZE
|
|
void *ptr = (void *)AllocMem((size_t) size + OVERRUN_SIZE(size));
|
|
#else
|
|
void *ptr = (void *)AllocMem((size_t) size);
|
|
#endif
|
|
if(ptr==NULL)
|
|
{
|
|
textprint2("\nMalloc Error! %d bytes attempted\n", size);
|
|
return((void *)NULL);
|
|
}
|
|
|
|
GLOBALASSERT(size>0); /* should be redundant cos picked up by above malloc attempt */
|
|
|
|
AdjustMallocRecord((long)ptr,size, string, lineno);
|
|
|
|
return(ptr);
|
|
}
|
|
|
|
#if COPY_FILENAME
|
|
void record_free(void *ptr, char string[], unsigned long lineno)
|
|
#else
|
|
void record_free(void *ptr, char const * string, unsigned long lineno)
|
|
#endif
|
|
{
|
|
if(AdjustMallocRecord((long)ptr,FREEING_MEMORY, string, lineno))
|
|
DeallocMem((void *)ptr); /* free previously malloced ptr */
|
|
return;
|
|
}
|
|
|
|
#if PSX || Saturn
|
|
|
|
#if COPY_FILENAME
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char string[], unsigned long lineno)
|
|
#else
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char const * string, unsigned long lineno)
|
|
#endif
|
|
|
|
{
|
|
|
|
int i=0;
|
|
char *ptr = (char *)addr;
|
|
static int no_record_init = 1;
|
|
MALLOC_RECORD *recordPtr = MallocRecord;
|
|
|
|
if(no_record_init)
|
|
{
|
|
InitMallocRecords();
|
|
no_record_init = 0;
|
|
}
|
|
|
|
|
|
if(size==FREEING_MEMORY) /* must be freeing memory */
|
|
{
|
|
GLOBALASSERT(addr); /* ensure not null addr */
|
|
|
|
while(i<MAXMALLOCS)
|
|
{
|
|
if(recordPtr->addr==addr)
|
|
{
|
|
TotalMallocNum--;
|
|
|
|
size = recordPtr->size;
|
|
|
|
while (size--)
|
|
{
|
|
*ptr++ = FREE_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
textprint2("\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
GLOBALASSERT(!"OUT OF BOUNDS detected in FREE");
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
|
|
recordPtr->addr = 0;
|
|
TotalMemAllocated -= recordPtr->size;
|
|
recordPtr->size = 0;
|
|
#if COPY_FILENAME
|
|
recordPtr->filename[0] = 0;
|
|
#else
|
|
recordPtr->filename = "";
|
|
#endif
|
|
recordPtr->linenum = 0;
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
|
|
if(i>=MAXMALLOCS)
|
|
{
|
|
textprint2("\n\n\n\nFree Error! %s, line %d\n", string, (int)lineno);
|
|
GLOBALASSERT(0);
|
|
return(0);
|
|
}
|
|
|
|
}
|
|
|
|
else /* must be mallocing memory */
|
|
{
|
|
TotalMallocNum++;
|
|
GLOBALASSERT(TotalMallocNum<MAXMALLOCS); /* just increase MAXMALLOCS define above if this fires */
|
|
|
|
|
|
// RWH chack to see that this address isn't already in use
|
|
i = 0;
|
|
recordPtr = MallocRecord;
|
|
while(i<MAXMALLOCS)
|
|
{
|
|
if(recordPtr->addr == addr)
|
|
{
|
|
GLOBALASSERT(0);
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
i = 0;
|
|
recordPtr = MallocRecord;
|
|
while(i<MAXMALLOCS)
|
|
{
|
|
if(recordPtr->addr==0)
|
|
{
|
|
recordPtr->addr = addr;
|
|
recordPtr->size = size;
|
|
TotalMemAllocated += size;
|
|
#if COPY_FILENAME
|
|
strcpy(recordPtr->filename, string);
|
|
#else
|
|
recordPtr->filename = string;
|
|
#endif
|
|
recordPtr->linenum = lineno;
|
|
while (size--)
|
|
{
|
|
*ptr++ = MALLOC_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcpy */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
*ptr++ = *overrun_ptr++;
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
|
|
GLOBALASSERT(i<MAXMALLOCS); /* This should never fire - oh well */
|
|
|
|
}
|
|
|
|
return(1);
|
|
|
|
}
|
|
#else
|
|
#if COPY_FILENAME
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char string[], unsigned long lineno)
|
|
#else
|
|
static int AdjustMallocRecord(unsigned long addr, long size, char const * string, unsigned long lineno)
|
|
#endif
|
|
{
|
|
|
|
int Starti=addr % MAXMALLOCS;
|
|
int i=Starti;
|
|
char *ptr = (char *)addr;
|
|
static int no_record_init = 1;
|
|
MALLOC_RECORD *recordPtr,*StartRecordPtr;
|
|
recordPtr=StartRecordPtr=&MallocRecord[Starti];
|
|
|
|
if(no_record_init)
|
|
{
|
|
InitMallocRecords();
|
|
no_record_init = 0;
|
|
}
|
|
|
|
|
|
if(size==FREEING_MEMORY) /* must be freeing memory */
|
|
{
|
|
#if AllowedToDeleteNULL
|
|
if (NULL == addr)
|
|
{
|
|
return 1;
|
|
/*
|
|
...so the record_free() function calls
|
|
DeallocMem(NULL), which ought to do nothing
|
|
(refer to citations in comment near the top of
|
|
this file)
|
|
*/
|
|
}
|
|
#endif
|
|
|
|
GLOBALASSERT(addr); /* ensure not null addr */
|
|
|
|
while(i<MAXMALLOCS)
|
|
{
|
|
if(recordPtr->addr==addr)
|
|
{
|
|
TotalMallocNum--;
|
|
|
|
size = recordPtr->size;
|
|
|
|
while (size--)
|
|
{
|
|
*ptr++ = FREE_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
textprint2("\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
GLOBALASSERT(!"OUT OF BOUNDS detected in FREE");
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
|
|
recordPtr->addr = 0;
|
|
TotalMemAllocated -= recordPtr->size;
|
|
recordPtr->size = 0;
|
|
#if COPY_FILENAME
|
|
recordPtr->filename[0] = 0;
|
|
#else
|
|
recordPtr->filename = "";
|
|
#endif
|
|
recordPtr->linenum = 0;
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
if(i==MAXMALLOCS)
|
|
{
|
|
i=0;
|
|
recordPtr=&MallocRecord[0];
|
|
|
|
while(i<Starti)
|
|
{
|
|
if(recordPtr->addr==addr)
|
|
{
|
|
TotalMallocNum--;
|
|
|
|
size = recordPtr->size;
|
|
|
|
while (size--)
|
|
{
|
|
*ptr++ = FREE_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
textprint2("\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
GLOBALASSERT(!"OUT OF BOUNDS detected in FREE");
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
|
|
recordPtr->addr = 0;
|
|
TotalMemAllocated -= recordPtr->size;
|
|
recordPtr->size = 0;
|
|
#if COPY_FILENAME
|
|
recordPtr->filename[0] = 0;
|
|
#else
|
|
recordPtr->filename = "";
|
|
#endif
|
|
recordPtr->linenum = 0;
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
if(i>=Starti)
|
|
{
|
|
textprint2("\n\n\n\nFree Error! %s, line %d\n", string, (int)lineno);
|
|
GLOBALASSERT(0);
|
|
return(0);
|
|
}
|
|
}
|
|
}
|
|
|
|
else /* must be mallocing memory */
|
|
{
|
|
TotalMallocNum++;
|
|
GLOBALASSERT(TotalMallocNum<MAXMALLOCS); /* just increase MAXMALLOCS define above if this fires */
|
|
|
|
|
|
// RWH chack to see that this address isn't already in use
|
|
while(i<MAXMALLOCS)
|
|
{
|
|
if(recordPtr->addr==0)
|
|
{
|
|
recordPtr->addr = addr;
|
|
recordPtr->size = size;
|
|
TotalMemAllocated += size;
|
|
#if COPY_FILENAME
|
|
strcpy(recordPtr->filename, string);
|
|
#else
|
|
recordPtr->filename = string;
|
|
#endif
|
|
recordPtr->linenum = lineno;
|
|
while (size--)
|
|
{
|
|
*ptr++ = MALLOC_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcpy */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
*ptr++ = *overrun_ptr++;
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
if(i>=MAXMALLOCS)
|
|
{
|
|
i=0;
|
|
recordPtr=&MallocRecord[0];
|
|
while(i<Starti)
|
|
{
|
|
if(recordPtr->addr==0)
|
|
{
|
|
recordPtr->addr = addr;
|
|
recordPtr->size = size;
|
|
TotalMemAllocated += size;
|
|
#if COPY_FILENAME
|
|
strcpy(recordPtr->filename, string);
|
|
#else
|
|
recordPtr->filename = string;
|
|
#endif
|
|
recordPtr->linenum = lineno;
|
|
while (size--)
|
|
{
|
|
*ptr++ = MALLOC_FILL_VALUE;
|
|
}
|
|
#ifdef OVERRUN_SIZE
|
|
{
|
|
char const * overrun_ptr = overrun_code;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcpy */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
*ptr++ = *overrun_ptr++;
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
#endif
|
|
break; /* exit while loop */
|
|
}
|
|
i++;
|
|
recordPtr++;
|
|
}
|
|
GLOBALASSERT(i<Starti); /* This should never fire - oh well */
|
|
}
|
|
}
|
|
return(1);
|
|
|
|
}
|
|
#endif
|
|
void DumpMallocInfo(int type)
|
|
{
|
|
int i;
|
|
|
|
if(type==DUMPTOSCREEN)
|
|
{
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
if (!(MallocRecord[i].linenum & CPPGLOBAL))
|
|
{
|
|
textprint2("\nmalloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)MallocRecord[i].linenum, MallocRecord[i].filename);
|
|
}
|
|
else
|
|
{
|
|
textprint2("\nC++ global construct malloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)(MallocRecord[i].linenum &~CPPGLOBAL), MallocRecord[i].filename);
|
|
}
|
|
}
|
|
}
|
|
textprint2("\n\n\n\nTotalMemAllocated: %d\nTotalMallocNum: %d",
|
|
(int)TotalMemAllocated, (int)TotalMallocNum);
|
|
WaitForReturn();
|
|
}
|
|
else if (type==DUMPTOFILE)
|
|
{
|
|
|
|
#if SupportWindows95
|
|
FILE *fp;
|
|
|
|
if( (fp = fopen(MALLOCDUMPFILE,FILEPERM))== (FILE *)NULL)
|
|
{
|
|
textprint2("\n\n\nfile open error %s", MALLOCDUMPFILE);
|
|
}
|
|
else
|
|
{
|
|
fprintf(fp,"\n\n\n\nOUTSTANDING MEMORY ALLOCATIONS\n\n");
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
if (!(MallocRecord[i].linenum & CPPGLOBAL))
|
|
{
|
|
fprintf(fp,"\nmalloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)MallocRecord[i].linenum, MallocRecord[i].filename);
|
|
}
|
|
else
|
|
{
|
|
fprintf(fp,"\nC++ global construct malloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)(MallocRecord[i].linenum &~CPPGLOBAL), MallocRecord[i].filename);
|
|
}
|
|
}
|
|
}
|
|
fprintf(fp,"\n\nTotalMemAllocated: %d\nTotalMallocNum: %d\n",
|
|
(int)TotalMemAllocated, (int)TotalMallocNum);
|
|
|
|
fclose(fp);
|
|
}
|
|
#endif
|
|
|
|
#if PSX
|
|
long fd;
|
|
|
|
fd = PCopen(MALLOCDUMPFILE,1,0);
|
|
if(fd<0)
|
|
{
|
|
fd = PCcreat(MALLOCDUMPFILE,0);
|
|
PCclose(fd);
|
|
fd = PCopen(MALLOCDUMPFILE,1,0);
|
|
}
|
|
|
|
if(fd<0)
|
|
{
|
|
textprint2("\n\n\nfile open error %s", MALLOCDUMPFILE);
|
|
}
|
|
else
|
|
{
|
|
char stringbuf[200];
|
|
sprintf(stringbuf,"\n\n\n\nOUTSTANDING MEMORY ALLOCATIONS\n\n");
|
|
#if APPEND_TO_DUMPFILE
|
|
PClseek(fd,0,2);
|
|
#endif
|
|
PCwrite(fd,stringbuf,strlen(stringbuf));
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
if (!(MallocRecord[i].linenum & CPPGLOBAL))
|
|
{
|
|
sprintf(stringbuf,"\nmalloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)MallocRecord[i].linenum, MallocRecord[i].filename);
|
|
}
|
|
else
|
|
{
|
|
sprintf(stringbuf,"\nC++ global construct malloc: %d bytes,line %d in %s",
|
|
(int)MallocRecord[i].size, (int)(MallocRecord[i].linenum &~CPPGLOBAL), MallocRecord[i].filename);
|
|
}
|
|
PCwrite(fd,stringbuf,strlen(stringbuf));
|
|
}
|
|
}
|
|
|
|
sprintf(stringbuf,"\n\nTotalMemAllocated: %d\nTotalMallocNum: %d\n",
|
|
(int)TotalMemAllocated, (int)TotalMallocNum);
|
|
|
|
PCwrite(fd,stringbuf,strlen(stringbuf));
|
|
|
|
PCclose(fd);
|
|
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
}
|
|
|
|
void DumpBoundsCheckInfo(int type)
|
|
{
|
|
#ifdef OVERRUN_SIZE
|
|
int i;
|
|
|
|
if(type==DUMPTOSCREEN)
|
|
{
|
|
int bc_errcnt = 0;
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
MALLOC_RECORD *recordPtr = &MallocRecord[i];
|
|
|
|
unsigned char const * overrun_ptr = overrun_code;
|
|
unsigned char const * ptr = (unsigned char const *)recordPtr->addr + recordPtr->size;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
textprint2("\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
++bc_errcnt;
|
|
break;
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
}
|
|
if (bc_errcnt)
|
|
WaitForReturn();
|
|
else
|
|
textprint2("No bounds errors detected\n");
|
|
|
|
}
|
|
else if (type==DUMPTOFILE)
|
|
{
|
|
|
|
#if SupportWindows95
|
|
FILE *fp;
|
|
|
|
if( (fp = fopen(MALLOCDUMPFILE,FILEPERM))== (FILE *)NULL)
|
|
{
|
|
textprint2("\n\n\nfile open error %s", MALLOCDUMPFILE);
|
|
}
|
|
else
|
|
{
|
|
fprintf(fp,"\n\n\n\nBOUNDS CHECK PROBLEMS\n\n");
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
MALLOC_RECORD *recordPtr = &MallocRecord[i];
|
|
|
|
unsigned char const * overrun_ptr = overrun_code;
|
|
unsigned char const * ptr = (unsigned char const *)recordPtr->addr + recordPtr->size;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
fprintf(fp,"\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
break;
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
}
|
|
fprintf(fp,"\n\nTotalMemAllocated: %d\nTotalMallocNum: %d\n",
|
|
(int)TotalMemAllocated, (int)TotalMallocNum);
|
|
|
|
fclose(fp);
|
|
}
|
|
#endif
|
|
|
|
#if PSX
|
|
long fd;
|
|
|
|
fd = PCopen(MALLOCDUMPFILE,1,0);
|
|
if(fd<0)
|
|
{
|
|
fd = PCcreat(MALLOCDUMPFILE,0);
|
|
PCclose(fd);
|
|
fd = PCopen(MALLOCDUMPFILE,1,0);
|
|
}
|
|
|
|
if(fd<0)
|
|
{
|
|
textprint2("\n\n\nfile open error %s", MALLOCDUMPFILE);
|
|
}
|
|
else
|
|
{
|
|
char stringbuf[200];
|
|
sprintf(stringbuf,"\n\n\n\nBOUNDS_CHECK_PROBLEMS\n\n");
|
|
#if APPEND_TO_DUMPFILE
|
|
PClseek(fd,0,2);
|
|
#endif
|
|
PCwrite(fd,stringbuf,strlen(stringbuf));
|
|
for (i=0;i<MAXMALLOCS;i++ )
|
|
{
|
|
if(MallocRecord[i].addr!=0)
|
|
{
|
|
MALLOC_RECORD *recordPtr = &MallocRecord[i];
|
|
|
|
unsigned char const * overrun_ptr = overrun_code;
|
|
unsigned char const * ptr = (unsigned char const *)recordPtr->addr + recordPtr->size;
|
|
int ov_cnt = OVERRUN_SIZE(recordPtr->size);
|
|
do /* a memcmp - dunno if its supported on all platforms */
|
|
{
|
|
if (!*overrun_ptr) overrun_ptr = overrun_code; /* repeat */
|
|
if (*overrun_ptr++ != *ptr++)
|
|
{
|
|
sprintf(stringbuf,"\nOut of Bounds!\n%lu bytes allocated to %p\nat %s, line %lu\n", recordPtr->size,(void *)recordPtr->addr,recordPtr->filename,recordPtr->linenum);
|
|
PCwrite(fd,stringbuf,strlen(stringbuf));
|
|
break;
|
|
}
|
|
}
|
|
while (--ov_cnt);
|
|
}
|
|
}
|
|
|
|
PCclose(fd);
|
|
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
#endif
|
|
}
|
|
|
|
void InitMallocRecords(void)
|
|
{
|
|
int i;
|
|
MALLOC_RECORD *recordPtr = MallocRecord;
|
|
|
|
for (i=0;i<MAXMALLOCS;i++,recordPtr++)
|
|
{
|
|
recordPtr->addr = 0;
|
|
recordPtr->size = 0;
|
|
#if COPY_FILENAME
|
|
recordPtr->filename[0] = 0;
|
|
#else
|
|
recordPtr->filename = "";
|
|
#endif
|
|
recordPtr->linenum = 0;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
#else
|
|
void DumpMallocInfo(int type);
|
|
void DumpMallocInfo(int type)
|
|
{
|
|
/* empty if not debugging */
|
|
}
|
|
void DumpBoundsCheckInfo(int type)
|
|
{}
|
|
#endif
|