|
Packit Service |
a31ea6 |
/*
|
|
Packit Service |
a31ea6 |
* xmlmemory.c: libxml memory allocator wrapper.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* daniel@veillard.com
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define IN_LIBXML
|
|
Packit Service |
a31ea6 |
#include "libxml.h"
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#include <string.h>
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_SYS_TYPES_H
|
|
Packit Service |
a31ea6 |
#include <sys/types.h>
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_TIME_H
|
|
Packit Service |
a31ea6 |
#include <time.h>
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_STDLIB_H
|
|
Packit Service |
a31ea6 |
#include <stdlib.h>
|
|
Packit Service |
a31ea6 |
#else
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_MALLOC_H
|
|
Packit Service |
a31ea6 |
#include <malloc.h>
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_CTYPE_H
|
|
Packit Service |
a31ea6 |
#include <ctype.h>
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/* #define DEBUG_MEMORY */
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* MEM_LIST:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* keep track of all allocated blocks for error reporting
|
|
Packit Service |
a31ea6 |
* Always build the memory list !
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY_LOCATION
|
|
Packit Service |
a31ea6 |
#ifndef MEM_LIST
|
|
Packit Service |
a31ea6 |
#define MEM_LIST /* keep a list of all the allocated memory blocks */
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#include <libxml/globals.h> /* must come before xmlmemory.h */
|
|
Packit Service |
a31ea6 |
#include <libxml/xmlmemory.h>
|
|
Packit Service |
a31ea6 |
#include <libxml/xmlerror.h>
|
|
Packit Service |
a31ea6 |
#include <libxml/threads.h>
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static int xmlMemInitialized = 0;
|
|
Packit Service |
a31ea6 |
static unsigned long debugMemSize = 0;
|
|
Packit Service |
a31ea6 |
static unsigned long debugMemBlocks = 0;
|
|
Packit Service |
a31ea6 |
static unsigned long debugMaxMemSize = 0;
|
|
Packit Service |
a31ea6 |
static xmlMutexPtr xmlMemMutex = NULL;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void xmlMallocBreakpoint(void);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/************************************************************************
|
|
Packit Service |
a31ea6 |
* *
|
|
Packit Service |
a31ea6 |
* Macros, variables and associated types *
|
|
Packit Service |
a31ea6 |
* *
|
|
Packit Service |
a31ea6 |
************************************************************************/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#if !defined(LIBXML_THREAD_ENABLED) && !defined(LIBXML_THREAD_ALLOC_ENABLED)
|
|
Packit Service |
a31ea6 |
#ifdef xmlMalloc
|
|
Packit Service |
a31ea6 |
#undef xmlMalloc
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef xmlRealloc
|
|
Packit Service |
a31ea6 |
#undef xmlRealloc
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef xmlMemStrdup
|
|
Packit Service |
a31ea6 |
#undef xmlMemStrdup
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/*
|
|
Packit Service |
a31ea6 |
* Each of the blocks allocated begin with a header containing informations
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define MEMTAG 0x5aa5
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define MALLOC_TYPE 1
|
|
Packit Service |
a31ea6 |
#define REALLOC_TYPE 2
|
|
Packit Service |
a31ea6 |
#define STRDUP_TYPE 3
|
|
Packit Service |
a31ea6 |
#define MALLOC_ATOMIC_TYPE 4
|
|
Packit Service |
a31ea6 |
#define REALLOC_ATOMIC_TYPE 5
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
typedef struct memnod {
|
|
Packit Service |
a31ea6 |
unsigned int mh_tag;
|
|
Packit Service |
a31ea6 |
unsigned int mh_type;
|
|
Packit Service |
a31ea6 |
unsigned long mh_number;
|
|
Packit Service |
a31ea6 |
size_t mh_size;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
struct memnod *mh_next;
|
|
Packit Service |
a31ea6 |
struct memnod *mh_prev;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
const char *mh_file;
|
|
Packit Service |
a31ea6 |
unsigned int mh_line;
|
|
Packit Service |
a31ea6 |
} MEMHDR;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef SUN4
|
|
Packit Service |
a31ea6 |
#define ALIGN_SIZE 16
|
|
Packit Service |
a31ea6 |
#else
|
|
Packit Service |
a31ea6 |
#define ALIGN_SIZE sizeof(double)
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#define HDR_SIZE sizeof(MEMHDR)
|
|
Packit Service |
a31ea6 |
#define RESERVE_SIZE (((HDR_SIZE + (ALIGN_SIZE-1)) \
|
|
Packit Service |
a31ea6 |
/ ALIGN_SIZE ) * ALIGN_SIZE)
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define MAX_SIZE_T ((size_t)-1)
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define CLIENT_2_HDR(a) ((void *) (((char *) (a)) - RESERVE_SIZE))
|
|
Packit Service |
a31ea6 |
#define HDR_2_CLIENT(a) ((void *) (((char *) (a)) + RESERVE_SIZE))
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static unsigned int block=0;
|
|
Packit Service |
a31ea6 |
static unsigned int xmlMemStopAtBlock = 0;
|
|
Packit Service |
a31ea6 |
static void *xmlMemTraceBlockAt = NULL;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
static MEMHDR *memlist = NULL;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static void debugmem_tag_error(void *addr);
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
static void debugmem_list_add(MEMHDR *);
|
|
Packit Service |
a31ea6 |
static void debugmem_list_delete(MEMHDR *);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#define Mem_Tag_Err(a) debugmem_tag_error(a);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifndef TEST_POINT
|
|
Packit Service |
a31ea6 |
#define TEST_POINT
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMallocBreakpoint:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Breakpoint to use in conjunction with xmlMemStopAtBlock. When the block
|
|
Packit Service |
a31ea6 |
* number reaches the specified value this function is called. One need to add a breakpoint
|
|
Packit Service |
a31ea6 |
* to it to get the context in which the given block is allocated.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint(void) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMallocBreakpoint reached on block %d\n", xmlMemStopAtBlock);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMallocLoc:
|
|
Packit Service |
a31ea6 |
* @size: an int specifying the size in byte to allocate.
|
|
Packit Service |
a31ea6 |
* @file: the file name or NULL
|
|
Packit Service |
a31ea6 |
* @line: the line number
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a malloc() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the allocated area or NULL in case of lack of memory.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void *
|
|
Packit Service |
a31ea6 |
xmlMallocLoc(size_t size, const char * file, int line)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
void *ret;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!xmlMemInitialized) xmlInitMemory();
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Malloc(%d)\n",size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (size > (MAX_SIZE_T - RESERVE_SIZE)) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMallocLoc : Unsigned overflow\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
p = (MEMHDR *) malloc(RESERVE_SIZE+size);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!p) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMallocLoc : Out of free space\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p->mh_tag = MEMTAG;
|
|
Packit Service |
a31ea6 |
p->mh_size = size;
|
|
Packit Service |
a31ea6 |
p->mh_type = MALLOC_TYPE;
|
|
Packit Service |
a31ea6 |
p->mh_file = file;
|
|
Packit Service |
a31ea6 |
p->mh_line = line;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
p->mh_number = ++block;
|
|
Packit Service |
a31ea6 |
debugMemSize += size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks++;
|
|
Packit Service |
a31ea6 |
if (debugMemSize > debugMaxMemSize) debugMaxMemSize = debugMemSize;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_add(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Malloc(%d) Ok\n",size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemStopAtBlock == p->mh_number) xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
ret = HDR_2_CLIENT(p);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemTraceBlockAt == ret) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"%p : Malloc(%lu) Ok\n", xmlMemTraceBlockAt,
|
|
Packit Service |
a31ea6 |
(long unsigned)size);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
return(ret);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMallocAtomicLoc:
|
|
Packit Service |
a31ea6 |
* @size: an unsigned int specifying the size in byte to allocate.
|
|
Packit Service |
a31ea6 |
* @file: the file name or NULL
|
|
Packit Service |
a31ea6 |
* @line: the line number
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a malloc() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the allocated area or NULL in case of lack of memory.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void *
|
|
Packit Service |
a31ea6 |
xmlMallocAtomicLoc(size_t size, const char * file, int line)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
void *ret;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!xmlMemInitialized) xmlInitMemory();
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Malloc(%d)\n",size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (size > (MAX_SIZE_T - RESERVE_SIZE)) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMallocAtomicLoc : Unsigned overflow\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
p = (MEMHDR *) malloc(RESERVE_SIZE+size);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!p) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMallocAtomicLoc : Out of free space\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p->mh_tag = MEMTAG;
|
|
Packit Service |
a31ea6 |
p->mh_size = size;
|
|
Packit Service |
a31ea6 |
p->mh_type = MALLOC_ATOMIC_TYPE;
|
|
Packit Service |
a31ea6 |
p->mh_file = file;
|
|
Packit Service |
a31ea6 |
p->mh_line = line;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
p->mh_number = ++block;
|
|
Packit Service |
a31ea6 |
debugMemSize += size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks++;
|
|
Packit Service |
a31ea6 |
if (debugMemSize > debugMaxMemSize) debugMaxMemSize = debugMemSize;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_add(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Malloc(%d) Ok\n",size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemStopAtBlock == p->mh_number) xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
ret = HDR_2_CLIENT(p);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemTraceBlockAt == ret) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"%p : Malloc(%lu) Ok\n", xmlMemTraceBlockAt,
|
|
Packit Service |
a31ea6 |
(long unsigned)size);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
return(ret);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemMalloc:
|
|
Packit Service |
a31ea6 |
* @size: an int specifying the size in byte to allocate.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a malloc() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the allocated area or NULL in case of lack of memory.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void *
|
|
Packit Service |
a31ea6 |
xmlMemMalloc(size_t size)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
return(xmlMallocLoc(size, "none", 0));
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlReallocLoc:
|
|
Packit Service |
a31ea6 |
* @ptr: the initial memory block pointer
|
|
Packit Service |
a31ea6 |
* @size: an int specifying the size in byte to allocate.
|
|
Packit Service |
a31ea6 |
* @file: the file name or NULL
|
|
Packit Service |
a31ea6 |
* @line: the line number
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a realloc() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the allocated area or NULL in case of lack of memory.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void *
|
|
Packit Service |
a31ea6 |
xmlReallocLoc(void *ptr,size_t size, const char * file, int line)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
MEMHDR *p, *tmp;
|
|
Packit Service |
a31ea6 |
unsigned long number;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
size_t oldsize;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (ptr == NULL)
|
|
Packit Service |
a31ea6 |
return(xmlMallocLoc(size, file, line));
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!xmlMemInitialized) xmlInitMemory();
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
p = CLIENT_2_HDR(ptr);
|
|
Packit Service |
a31ea6 |
number = p->mh_number;
|
|
Packit Service |
a31ea6 |
if (xmlMemStopAtBlock == number) xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
if (p->mh_tag != MEMTAG) {
|
|
Packit Service |
a31ea6 |
Mem_Tag_Err(p);
|
|
Packit Service |
a31ea6 |
goto error;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p->mh_tag = ~MEMTAG;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
debugMemSize -= p->mh_size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks--;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
oldsize = p->mh_size;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_delete(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (size > (MAX_SIZE_T - RESERVE_SIZE)) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlReallocLoc : Unsigned overflow\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
tmp = (MEMHDR *) realloc(p,RESERVE_SIZE+size);
|
|
Packit Service |
a31ea6 |
if (!tmp) {
|
|
Packit Service |
a31ea6 |
free(p);
|
|
Packit Service |
a31ea6 |
goto error;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p = tmp;
|
|
Packit Service |
a31ea6 |
if (xmlMemTraceBlockAt == ptr) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"%p : Realloced(%lu -> %lu) Ok\n",
|
|
Packit Service |
a31ea6 |
xmlMemTraceBlockAt, (long unsigned)p->mh_size,
|
|
Packit Service |
a31ea6 |
(long unsigned)size);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p->mh_tag = MEMTAG;
|
|
Packit Service |
a31ea6 |
p->mh_number = number;
|
|
Packit Service |
a31ea6 |
p->mh_type = REALLOC_TYPE;
|
|
Packit Service |
a31ea6 |
p->mh_size = size;
|
|
Packit Service |
a31ea6 |
p->mh_file = file;
|
|
Packit Service |
a31ea6 |
p->mh_line = line;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
debugMemSize += size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks++;
|
|
Packit Service |
a31ea6 |
if (debugMemSize > debugMaxMemSize) debugMaxMemSize = debugMemSize;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_add(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Realloced(%d to %d) Ok\n", oldsize, size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
return(HDR_2_CLIENT(p));
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
error:
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemRealloc:
|
|
Packit Service |
a31ea6 |
* @ptr: the initial memory block pointer
|
|
Packit Service |
a31ea6 |
* @size: an int specifying the size in byte to allocate.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a realloc() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the allocated area or NULL in case of lack of memory.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void *
|
|
Packit Service |
a31ea6 |
xmlMemRealloc(void *ptr,size_t size) {
|
|
Packit Service |
a31ea6 |
return(xmlReallocLoc(ptr, size, "none", 0));
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemFree:
|
|
Packit Service |
a31ea6 |
* @ptr: the memory block pointer
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a free() equivalent, with error checking.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMemFree(void *ptr)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
char *target;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
size_t size;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (ptr == NULL)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (ptr == (void *) -1) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"trying to free pointer from freed area\n");
|
|
Packit Service |
a31ea6 |
goto error;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemTraceBlockAt == ptr) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"%p : Freed()\n", xmlMemTraceBlockAt);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
target = (char *) ptr;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
p = CLIENT_2_HDR(ptr);
|
|
Packit Service |
a31ea6 |
if (p->mh_tag != MEMTAG) {
|
|
Packit Service |
a31ea6 |
Mem_Tag_Err(p);
|
|
Packit Service |
a31ea6 |
goto error;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if (xmlMemStopAtBlock == p->mh_number) xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
p->mh_tag = ~MEMTAG;
|
|
Packit Service |
a31ea6 |
memset(target, -1, p->mh_size);
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
debugMemSize -= p->mh_size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks--;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
size = p->mh_size;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_delete(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
free(p);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Freed(%d) Ok\n", size);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
error:
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMemFree(%p) error\n", ptr);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemStrdupLoc:
|
|
Packit Service |
a31ea6 |
* @str: the initial string pointer
|
|
Packit Service |
a31ea6 |
* @file: the file name or NULL
|
|
Packit Service |
a31ea6 |
* @line: the line number
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a strdup() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the new string or NULL if allocation error occurred.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
char *
|
|
Packit Service |
a31ea6 |
xmlMemStrdupLoc(const char *str, const char *file, int line)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
char *s;
|
|
Packit Service |
a31ea6 |
size_t size = strlen(str) + 1;
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (!xmlMemInitialized) xmlInitMemory();
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (size > (MAX_SIZE_T - RESERVE_SIZE)) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMemStrdupLoc : Unsigned overflow\n");
|
|
Packit Service |
a31ea6 |
xmlMemoryDump();
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
p = (MEMHDR *) malloc(RESERVE_SIZE+size);
|
|
Packit Service |
a31ea6 |
if (!p) {
|
|
Packit Service |
a31ea6 |
goto error;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
p->mh_tag = MEMTAG;
|
|
Packit Service |
a31ea6 |
p->mh_size = size;
|
|
Packit Service |
a31ea6 |
p->mh_type = STRDUP_TYPE;
|
|
Packit Service |
a31ea6 |
p->mh_file = file;
|
|
Packit Service |
a31ea6 |
p->mh_line = line;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
p->mh_number = ++block;
|
|
Packit Service |
a31ea6 |
debugMemSize += size;
|
|
Packit Service |
a31ea6 |
debugMemBlocks++;
|
|
Packit Service |
a31ea6 |
if (debugMemSize > debugMaxMemSize) debugMaxMemSize = debugMemSize;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
debugmem_list_add(p);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
s = (char *) HDR_2_CLIENT(p);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemStopAtBlock == p->mh_number) xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
strcpy(s,str);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
TEST_POINT
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (xmlMemTraceBlockAt == s) {
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"%p : Strdup() Ok\n", xmlMemTraceBlockAt);
|
|
Packit Service |
a31ea6 |
xmlMallocBreakpoint();
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
return(s);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
error:
|
|
Packit Service |
a31ea6 |
return(NULL);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemoryStrdup:
|
|
Packit Service |
a31ea6 |
* @str: the initial string pointer
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* a strdup() equivalent, with logging of the allocation info.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns a pointer to the new string or NULL if allocation error occurred.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
char *
|
|
Packit Service |
a31ea6 |
xmlMemoryStrdup(const char *str) {
|
|
Packit Service |
a31ea6 |
return(xmlMemStrdupLoc(str, "none", 0));
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemUsed:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Provides the amount of memory currently allocated
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns an int representing the amount of memory allocated.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlMemUsed(void) {
|
|
Packit Service |
a31ea6 |
int res;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
res = debugMemSize;
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
return(res);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemBlocks:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Provides the number of memory areas currently allocated
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns an int representing the number of blocks
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlMemBlocks(void) {
|
|
Packit Service |
a31ea6 |
int res;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
res = debugMemBlocks;
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
return(res);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemContentShow:
|
|
Packit Service |
a31ea6 |
* @fp: a FILE descriptor used as the output file
|
|
Packit Service |
a31ea6 |
* @p: a memory block header
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* tries to show some content from the memory block
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static void
|
|
Packit Service |
a31ea6 |
xmlMemContentShow(FILE *fp, MEMHDR *p)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
int i,j,k,len;
|
|
Packit Service |
a31ea6 |
const char *buf;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (p == NULL) {
|
|
Packit Service |
a31ea6 |
fprintf(fp, " NULL");
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
len = p->mh_size;
|
|
Packit Service |
a31ea6 |
buf = (const char *) HDR_2_CLIENT(p);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
for (i = 0;i < len;i++) {
|
|
Packit Service |
a31ea6 |
if (buf[i] == 0) break;
|
|
Packit Service |
a31ea6 |
if (!isprint((unsigned char) buf[i])) break;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if ((i < 4) && ((buf[i] != 0) || (i == 0))) {
|
|
Packit Service |
a31ea6 |
if (len >= 4) {
|
|
Packit Service |
a31ea6 |
MEMHDR *q;
|
|
Packit Service |
a31ea6 |
void *cur;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
for (j = 0;(j < len -3) && (j < 40);j += 4) {
|
|
Packit Service |
a31ea6 |
cur = *((void **) &buf[j]);
|
|
Packit Service |
a31ea6 |
q = CLIENT_2_HDR(cur);
|
|
Packit Service |
a31ea6 |
p = memlist;
|
|
Packit Service |
a31ea6 |
k = 0;
|
|
Packit Service |
a31ea6 |
while (p != NULL) {
|
|
Packit Service |
a31ea6 |
if (p == q) break;
|
|
Packit Service |
a31ea6 |
p = p->mh_next;
|
|
Packit Service |
a31ea6 |
if (k++ > 100) break;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if ((p != NULL) && (p == q)) {
|
|
Packit Service |
a31ea6 |
fprintf(fp, " pointer to #%lu at index %d",
|
|
Packit Service |
a31ea6 |
p->mh_number, j);
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
} else if ((i == 0) && (buf[i] == 0)) {
|
|
Packit Service |
a31ea6 |
fprintf(fp," null");
|
|
Packit Service |
a31ea6 |
} else {
|
|
Packit Service |
a31ea6 |
if (buf[i] == 0) fprintf(fp," \"%.25s\"", buf);
|
|
Packit Service |
a31ea6 |
else {
|
|
Packit Service |
a31ea6 |
fprintf(fp," [");
|
|
Packit Service |
a31ea6 |
for (j = 0;j < i;j++)
|
|
Packit Service |
a31ea6 |
fprintf(fp,"%c", buf[j]);
|
|
Packit Service |
a31ea6 |
fprintf(fp,"]");
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemDisplayLast:
|
|
Packit Service |
a31ea6 |
* @fp: a FILE descriptor used as the output file, if NULL, the result is
|
|
Packit Service |
a31ea6 |
* written to the file .memorylist
|
|
Packit Service |
a31ea6 |
* @nbBytes: the amount of memory to dump
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* the last nbBytes of memory allocated and not freed, useful for dumping
|
|
Packit Service |
a31ea6 |
* the memory left allocated between two places at runtime.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMemDisplayLast(FILE *fp, long nbBytes)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
unsigned idx;
|
|
Packit Service |
a31ea6 |
int nb = 0;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
FILE *old_fp = fp;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (nbBytes <= 0)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (fp == NULL) {
|
|
Packit Service |
a31ea6 |
fp = fopen(".memorylist", "w");
|
|
Packit Service |
a31ea6 |
if (fp == NULL)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
fprintf(fp," Last %li MEMORY ALLOCATED : %lu, MAX was %lu\n",
|
|
Packit Service |
a31ea6 |
nbBytes, debugMemSize, debugMaxMemSize);
|
|
Packit Service |
a31ea6 |
fprintf(fp,"BLOCK NUMBER SIZE TYPE\n");
|
|
Packit Service |
a31ea6 |
idx = 0;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
p = memlist;
|
|
Packit Service |
a31ea6 |
while ((p) && (nbBytes > 0)) {
|
|
Packit Service |
a31ea6 |
fprintf(fp,"%-5u %6lu %6lu ",idx++,p->mh_number,
|
|
Packit Service |
a31ea6 |
(unsigned long)p->mh_size);
|
|
Packit Service |
a31ea6 |
switch (p->mh_type) {
|
|
Packit Service |
a31ea6 |
case STRDUP_TYPE:fprintf(fp,"strdup() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_TYPE:fprintf(fp,"malloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_TYPE:fprintf(fp,"realloc() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_ATOMIC_TYPE:fprintf(fp,"atomicmalloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_ATOMIC_TYPE:fprintf(fp,"atomicrealloc() in ");break;
|
|
Packit Service |
a31ea6 |
default:
|
|
Packit Service |
a31ea6 |
fprintf(fp,"Unknown memory block, may be corrupted");
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
if (old_fp == NULL)
|
|
Packit Service |
a31ea6 |
fclose(fp);
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if (p->mh_file != NULL) fprintf(fp,"%s(%u)", p->mh_file, p->mh_line);
|
|
Packit Service |
a31ea6 |
if (p->mh_tag != MEMTAG)
|
|
Packit Service |
a31ea6 |
fprintf(fp," INVALID");
|
|
Packit Service |
a31ea6 |
nb++;
|
|
Packit Service |
a31ea6 |
if (nb < 100)
|
|
Packit Service |
a31ea6 |
xmlMemContentShow(fp, p);
|
|
Packit Service |
a31ea6 |
else
|
|
Packit Service |
a31ea6 |
fprintf(fp," skip");
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
fprintf(fp,"\n");
|
|
Packit Service |
a31ea6 |
nbBytes -= (unsigned long)p->mh_size;
|
|
Packit Service |
a31ea6 |
p = p->mh_next;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
#else
|
|
Packit Service |
a31ea6 |
fprintf(fp,"Memory list not compiled (MEM_LIST not defined !)\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
if (old_fp == NULL)
|
|
Packit Service |
a31ea6 |
fclose(fp);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemDisplay:
|
|
Packit Service |
a31ea6 |
* @fp: a FILE descriptor used as the output file, if NULL, the result is
|
|
Packit Service |
a31ea6 |
* written to the file .memorylist
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* show in-extenso the memory blocks allocated
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMemDisplay(FILE *fp)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
unsigned idx;
|
|
Packit Service |
a31ea6 |
int nb = 0;
|
|
Packit Service |
a31ea6 |
#if defined(HAVE_LOCALTIME) && defined(HAVE_STRFTIME)
|
|
Packit Service |
a31ea6 |
time_t currentTime;
|
|
Packit Service |
a31ea6 |
char buf[500];
|
|
Packit Service |
a31ea6 |
struct tm * tstruct;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
FILE *old_fp = fp;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (fp == NULL) {
|
|
Packit Service |
a31ea6 |
fp = fopen(".memorylist", "w");
|
|
Packit Service |
a31ea6 |
if (fp == NULL)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
#if defined(HAVE_LOCALTIME) && defined(HAVE_STRFTIME)
|
|
Packit Service |
a31ea6 |
currentTime = time(NULL);
|
|
Packit Service |
a31ea6 |
tstruct = localtime(¤tTime);
|
|
Packit Service |
a31ea6 |
strftime(buf, sizeof(buf) - 1, "%I:%M:%S %p", tstruct);
|
|
Packit Service |
a31ea6 |
fprintf(fp," %s\n\n", buf);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
fprintf(fp," MEMORY ALLOCATED : %lu, MAX was %lu\n",
|
|
Packit Service |
a31ea6 |
debugMemSize, debugMaxMemSize);
|
|
Packit Service |
a31ea6 |
fprintf(fp,"BLOCK NUMBER SIZE TYPE\n");
|
|
Packit Service |
a31ea6 |
idx = 0;
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
p = memlist;
|
|
Packit Service |
a31ea6 |
while (p) {
|
|
Packit Service |
a31ea6 |
fprintf(fp,"%-5u %6lu %6lu ",idx++,p->mh_number,
|
|
Packit Service |
a31ea6 |
(unsigned long)p->mh_size);
|
|
Packit Service |
a31ea6 |
switch (p->mh_type) {
|
|
Packit Service |
a31ea6 |
case STRDUP_TYPE:fprintf(fp,"strdup() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_TYPE:fprintf(fp,"malloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_TYPE:fprintf(fp,"realloc() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_ATOMIC_TYPE:fprintf(fp,"atomicmalloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_ATOMIC_TYPE:fprintf(fp,"atomicrealloc() in ");break;
|
|
Packit Service |
a31ea6 |
default:
|
|
Packit Service |
a31ea6 |
fprintf(fp,"Unknown memory block, may be corrupted");
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
if (old_fp == NULL)
|
|
Packit Service |
a31ea6 |
fclose(fp);
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if (p->mh_file != NULL) fprintf(fp,"%s(%u)", p->mh_file, p->mh_line);
|
|
Packit Service |
a31ea6 |
if (p->mh_tag != MEMTAG)
|
|
Packit Service |
a31ea6 |
fprintf(fp," INVALID");
|
|
Packit Service |
a31ea6 |
nb++;
|
|
Packit Service |
a31ea6 |
if (nb < 100)
|
|
Packit Service |
a31ea6 |
xmlMemContentShow(fp, p);
|
|
Packit Service |
a31ea6 |
else
|
|
Packit Service |
a31ea6 |
fprintf(fp," skip");
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
fprintf(fp,"\n");
|
|
Packit Service |
a31ea6 |
p = p->mh_next;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
#else
|
|
Packit Service |
a31ea6 |
fprintf(fp,"Memory list not compiled (MEM_LIST not defined !)\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
if (old_fp == NULL)
|
|
Packit Service |
a31ea6 |
fclose(fp);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static void debugmem_list_add(MEMHDR *p)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
p->mh_next = memlist;
|
|
Packit Service |
a31ea6 |
p->mh_prev = NULL;
|
|
Packit Service |
a31ea6 |
if (memlist) memlist->mh_prev = p;
|
|
Packit Service |
a31ea6 |
memlist = p;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST_DEBUG
|
|
Packit Service |
a31ea6 |
if (stderr)
|
|
Packit Service |
a31ea6 |
Mem_Display(stderr);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static void debugmem_list_delete(MEMHDR *p)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
if (p->mh_next)
|
|
Packit Service |
a31ea6 |
p->mh_next->mh_prev = p->mh_prev;
|
|
Packit Service |
a31ea6 |
if (p->mh_prev)
|
|
Packit Service |
a31ea6 |
p->mh_prev->mh_next = p->mh_next;
|
|
Packit Service |
a31ea6 |
else memlist = p->mh_next;
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST_DEBUG
|
|
Packit Service |
a31ea6 |
if (stderr)
|
|
Packit Service |
a31ea6 |
Mem_Display(stderr);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/*
|
|
Packit Service |
a31ea6 |
* debugmem_tag_error:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* internal error function.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
static void debugmem_tag_error(void *p)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"Memory tag error occurs :%p \n\t bye\n", p);
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
if (stderr)
|
|
Packit Service |
a31ea6 |
xmlMemDisplay(stderr);
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
static FILE *xmlMemoryDumpFile = NULL;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemShow:
|
|
Packit Service |
a31ea6 |
* @fp: a FILE descriptor used as the output file
|
|
Packit Service |
a31ea6 |
* @nr: number of entries to dump
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* show a show display of the memory allocated, and dump
|
|
Packit Service |
a31ea6 |
* the @nr last allocated areas which were not freed
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMemShow(FILE *fp, int nr ATTRIBUTE_UNUSED)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
MEMHDR *p;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (fp != NULL)
|
|
Packit Service |
a31ea6 |
fprintf(fp," MEMORY ALLOCATED : %lu, MAX was %lu\n",
|
|
Packit Service |
a31ea6 |
debugMemSize, debugMaxMemSize);
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
xmlMutexLock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
if (nr > 0) {
|
|
Packit Service |
a31ea6 |
fprintf(fp,"NUMBER SIZE TYPE WHERE\n");
|
|
Packit Service |
a31ea6 |
p = memlist;
|
|
Packit Service |
a31ea6 |
while ((p) && nr > 0) {
|
|
Packit Service |
a31ea6 |
fprintf(fp,"%6lu %6lu ",p->mh_number,(unsigned long)p->mh_size);
|
|
Packit Service |
a31ea6 |
switch (p->mh_type) {
|
|
Packit Service |
a31ea6 |
case STRDUP_TYPE:fprintf(fp,"strdup() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_TYPE:fprintf(fp,"malloc() in ");break;
|
|
Packit Service |
a31ea6 |
case MALLOC_ATOMIC_TYPE:fprintf(fp,"atomicmalloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_TYPE:fprintf(fp,"realloc() in ");break;
|
|
Packit Service |
a31ea6 |
case REALLOC_ATOMIC_TYPE:fprintf(fp,"atomicrealloc() in ");break;
|
|
Packit Service |
a31ea6 |
default:fprintf(fp," ??? in ");break;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
if (p->mh_file != NULL)
|
|
Packit Service |
a31ea6 |
fprintf(fp,"%s(%u)", p->mh_file, p->mh_line);
|
|
Packit Service |
a31ea6 |
if (p->mh_tag != MEMTAG)
|
|
Packit Service |
a31ea6 |
fprintf(fp," INVALID");
|
|
Packit Service |
a31ea6 |
xmlMemContentShow(fp, p);
|
|
Packit Service |
a31ea6 |
fprintf(fp,"\n");
|
|
Packit Service |
a31ea6 |
nr--;
|
|
Packit Service |
a31ea6 |
p = p->mh_next;
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
xmlMutexUnlock(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
#endif /* MEM_LIST */
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemoryDump:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Dump in-extenso the memory blocks allocated to the file .memorylist
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlMemoryDump(void)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
#ifdef MEM_LIST
|
|
Packit Service |
a31ea6 |
FILE *dump;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (debugMaxMemSize == 0)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
dump = fopen(".memdump", "w");
|
|
Packit Service |
a31ea6 |
if (dump == NULL)
|
|
Packit Service |
a31ea6 |
xmlMemoryDumpFile = stderr;
|
|
Packit Service |
a31ea6 |
else xmlMemoryDumpFile = dump;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
xmlMemDisplay(xmlMemoryDumpFile);
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
if (dump != NULL) fclose(dump);
|
|
Packit Service |
a31ea6 |
#endif /* MEM_LIST */
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/****************************************************************
|
|
Packit Service |
a31ea6 |
* *
|
|
Packit Service |
a31ea6 |
* Initialization Routines *
|
|
Packit Service |
a31ea6 |
* *
|
|
Packit Service |
a31ea6 |
****************************************************************/
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlInitMemory:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Initialize the memory layer.
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns 0 on success
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlInitMemory(void)
|
|
Packit Service |
a31ea6 |
{
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_STDLIB_H
|
|
Packit Service |
a31ea6 |
char *breakpoint;
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlInitMemory()\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
/*
|
|
Packit Service |
a31ea6 |
This is really not good code (see Bug 130419). Suggestions for
|
|
Packit Service |
a31ea6 |
improvement will be welcome!
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
if (xmlMemInitialized) return(-1);
|
|
Packit Service |
a31ea6 |
xmlMemInitialized = 1;
|
|
Packit Service |
a31ea6 |
xmlMemMutex = xmlNewMutex();
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_STDLIB_H
|
|
Packit Service |
a31ea6 |
breakpoint = getenv("XML_MEM_BREAKPOINT");
|
|
Packit Service |
a31ea6 |
if (breakpoint != NULL) {
|
|
Packit Service |
a31ea6 |
sscanf(breakpoint, "%ud", &xmlMemStopAtBlock);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
#ifdef HAVE_STDLIB_H
|
|
Packit Service |
a31ea6 |
breakpoint = getenv("XML_MEM_TRACE");
|
|
Packit Service |
a31ea6 |
if (breakpoint != NULL) {
|
|
Packit Service |
a31ea6 |
sscanf(breakpoint, "%p", &xmlMemTraceBlockAt);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlInitMemory() Ok\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
return(0);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlCleanupMemory:
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Free up all the memory allocated by the library for its own
|
|
Packit Service |
a31ea6 |
* use. This should not be called by user level code.
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
void
|
|
Packit Service |
a31ea6 |
xmlCleanupMemory(void) {
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlCleanupMemory()\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
if (xmlMemInitialized == 0)
|
|
Packit Service |
a31ea6 |
return;
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
xmlFreeMutex(xmlMemMutex);
|
|
Packit Service |
a31ea6 |
xmlMemMutex = NULL;
|
|
Packit Service |
a31ea6 |
xmlMemInitialized = 0;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlCleanupMemory() Ok\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemSetup:
|
|
Packit Service |
a31ea6 |
* @freeFunc: the free() function to use
|
|
Packit Service |
a31ea6 |
* @mallocFunc: the malloc() function to use
|
|
Packit Service |
a31ea6 |
* @reallocFunc: the realloc() function to use
|
|
Packit Service |
a31ea6 |
* @strdupFunc: the strdup() function to use
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Override the default memory access functions with a new set
|
|
Packit Service |
a31ea6 |
* This has to be called before any other libxml routines !
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Should this be blocked if there was already some allocations
|
|
Packit Service |
a31ea6 |
* done ?
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns 0 on success
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlMemSetup(xmlFreeFunc freeFunc, xmlMallocFunc mallocFunc,
|
|
Packit Service |
a31ea6 |
xmlReallocFunc reallocFunc, xmlStrdupFunc strdupFunc) {
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMemSetup()\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
if (freeFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (mallocFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (reallocFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (strdupFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
xmlFree = freeFunc;
|
|
Packit Service |
a31ea6 |
xmlMalloc = mallocFunc;
|
|
Packit Service |
a31ea6 |
xmlMallocAtomic = mallocFunc;
|
|
Packit Service |
a31ea6 |
xmlRealloc = reallocFunc;
|
|
Packit Service |
a31ea6 |
xmlMemStrdup = strdupFunc;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlMemSetup() Ok\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
return(0);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlMemGet:
|
|
Packit Service |
a31ea6 |
* @freeFunc: place to save the free() function in use
|
|
Packit Service |
a31ea6 |
* @mallocFunc: place to save the malloc() function in use
|
|
Packit Service |
a31ea6 |
* @reallocFunc: place to save the realloc() function in use
|
|
Packit Service |
a31ea6 |
* @strdupFunc: place to save the strdup() function in use
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Provides the memory access functions set currently in use
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns 0 on success
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlMemGet(xmlFreeFunc *freeFunc, xmlMallocFunc *mallocFunc,
|
|
Packit Service |
a31ea6 |
xmlReallocFunc *reallocFunc, xmlStrdupFunc *strdupFunc) {
|
|
Packit Service |
a31ea6 |
if (freeFunc != NULL) *freeFunc = xmlFree;
|
|
Packit Service |
a31ea6 |
if (mallocFunc != NULL) *mallocFunc = xmlMalloc;
|
|
Packit Service |
a31ea6 |
if (reallocFunc != NULL) *reallocFunc = xmlRealloc;
|
|
Packit Service |
a31ea6 |
if (strdupFunc != NULL) *strdupFunc = xmlMemStrdup;
|
|
Packit Service |
a31ea6 |
return(0);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlGcMemSetup:
|
|
Packit Service |
a31ea6 |
* @freeFunc: the free() function to use
|
|
Packit Service |
a31ea6 |
* @mallocFunc: the malloc() function to use
|
|
Packit Service |
a31ea6 |
* @mallocAtomicFunc: the malloc() function to use for atomic allocations
|
|
Packit Service |
a31ea6 |
* @reallocFunc: the realloc() function to use
|
|
Packit Service |
a31ea6 |
* @strdupFunc: the strdup() function to use
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Override the default memory access functions with a new set
|
|
Packit Service |
a31ea6 |
* This has to be called before any other libxml routines !
|
|
Packit Service |
a31ea6 |
* The mallocAtomicFunc is specialized for atomic block
|
|
Packit Service |
a31ea6 |
* allocations (i.e. of areas useful for garbage collected memory allocators
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Should this be blocked if there was already some allocations
|
|
Packit Service |
a31ea6 |
* done ?
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns 0 on success
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlGcMemSetup(xmlFreeFunc freeFunc, xmlMallocFunc mallocFunc,
|
|
Packit Service |
a31ea6 |
xmlMallocFunc mallocAtomicFunc, xmlReallocFunc reallocFunc,
|
|
Packit Service |
a31ea6 |
xmlStrdupFunc strdupFunc) {
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlGcMemSetup()\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
if (freeFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (mallocFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (mallocAtomicFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (reallocFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
if (strdupFunc == NULL)
|
|
Packit Service |
a31ea6 |
return(-1);
|
|
Packit Service |
a31ea6 |
xmlFree = freeFunc;
|
|
Packit Service |
a31ea6 |
xmlMalloc = mallocFunc;
|
|
Packit Service |
a31ea6 |
xmlMallocAtomic = mallocAtomicFunc;
|
|
Packit Service |
a31ea6 |
xmlRealloc = reallocFunc;
|
|
Packit Service |
a31ea6 |
xmlMemStrdup = strdupFunc;
|
|
Packit Service |
a31ea6 |
#ifdef DEBUG_MEMORY
|
|
Packit Service |
a31ea6 |
xmlGenericError(xmlGenericErrorContext,
|
|
Packit Service |
a31ea6 |
"xmlGcMemSetup() Ok\n");
|
|
Packit Service |
a31ea6 |
#endif
|
|
Packit Service |
a31ea6 |
return(0);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
/**
|
|
Packit Service |
a31ea6 |
* xmlGcMemGet:
|
|
Packit Service |
a31ea6 |
* @freeFunc: place to save the free() function in use
|
|
Packit Service |
a31ea6 |
* @mallocFunc: place to save the malloc() function in use
|
|
Packit Service |
a31ea6 |
* @mallocAtomicFunc: place to save the atomic malloc() function in use
|
|
Packit Service |
a31ea6 |
* @reallocFunc: place to save the realloc() function in use
|
|
Packit Service |
a31ea6 |
* @strdupFunc: place to save the strdup() function in use
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Provides the memory access functions set currently in use
|
|
Packit Service |
a31ea6 |
* The mallocAtomicFunc is specialized for atomic block
|
|
Packit Service |
a31ea6 |
* allocations (i.e. of areas useful for garbage collected memory allocators
|
|
Packit Service |
a31ea6 |
*
|
|
Packit Service |
a31ea6 |
* Returns 0 on success
|
|
Packit Service |
a31ea6 |
*/
|
|
Packit Service |
a31ea6 |
int
|
|
Packit Service |
a31ea6 |
xmlGcMemGet(xmlFreeFunc *freeFunc, xmlMallocFunc *mallocFunc,
|
|
Packit Service |
a31ea6 |
xmlMallocFunc *mallocAtomicFunc, xmlReallocFunc *reallocFunc,
|
|
Packit Service |
a31ea6 |
xmlStrdupFunc *strdupFunc) {
|
|
Packit Service |
a31ea6 |
if (freeFunc != NULL) *freeFunc = xmlFree;
|
|
Packit Service |
a31ea6 |
if (mallocFunc != NULL) *mallocFunc = xmlMalloc;
|
|
Packit Service |
a31ea6 |
if (mallocAtomicFunc != NULL) *mallocAtomicFunc = xmlMallocAtomic;
|
|
Packit Service |
a31ea6 |
if (reallocFunc != NULL) *reallocFunc = xmlRealloc;
|
|
Packit Service |
a31ea6 |
if (strdupFunc != NULL) *strdupFunc = xmlMemStrdup;
|
|
Packit Service |
a31ea6 |
return(0);
|
|
Packit Service |
a31ea6 |
}
|
|
Packit Service |
a31ea6 |
|
|
Packit Service |
a31ea6 |
#define bottom_xmlmemory
|
|
Packit Service |
a31ea6 |
#include "elfgcchack.h"
|