mirror of
https://github.com/php/php-src.git
synced 2024-09-22 18:37:25 +00:00
71 lines
1.6 KiB
C
71 lines
1.6 KiB
C
/* Copyright Abandoned 1996 TCX DataKonsult AB & Monty Program KB & Detron HB
|
|
This file is public domain and comes with NO WARRANTY of any kind */
|
|
|
|
#ifdef SAFEMALLOC /* We don't need SAFEMALLOC here */
|
|
#undef SAFEMALLOC
|
|
#endif
|
|
|
|
#include "mysys_priv.h"
|
|
#include "mysys_err.h"
|
|
#include <m_string.h>
|
|
|
|
/* My memory allocator */
|
|
|
|
gptr my_malloc(unsigned int Size, myf MyFlags)
|
|
{
|
|
gptr point;
|
|
DBUG_ENTER("my_malloc");
|
|
DBUG_PRINT("my",("Size: %u MyFlags: %d",Size, MyFlags));
|
|
|
|
if (!Size)
|
|
Size=1; /* Safety */
|
|
if ((point = malloc(Size)) == NULL)
|
|
{
|
|
my_errno=errno;
|
|
if (MyFlags & MY_FAE)
|
|
error_handler_hook=fatal_error_handler_hook;
|
|
if (MyFlags & (MY_FAE+MY_WME))
|
|
my_error(EE_OUTOFMEMORY, MYF(ME_BELL+ME_WAITTANG),Size);
|
|
if (MyFlags & MY_FAE)
|
|
exit(1);
|
|
}
|
|
else if (MyFlags & MY_ZEROFILL)
|
|
bzero(point,Size);
|
|
DBUG_PRINT("exit",("ptr: %lx",point));
|
|
DBUG_RETURN(point);
|
|
} /* my_malloc */
|
|
|
|
|
|
/* Free memory allocated with my_malloc */
|
|
/*ARGSUSED*/
|
|
|
|
void my_no_flags_free(gptr ptr)
|
|
{
|
|
DBUG_ENTER("my_free");
|
|
DBUG_PRINT("my",("ptr: %lx",ptr));
|
|
if (ptr)
|
|
free(ptr);
|
|
DBUG_VOID_RETURN;
|
|
} /* my_free */
|
|
|
|
|
|
/* malloc and copy */
|
|
|
|
gptr my_memdup(const byte *from, uint length, myf MyFlags)
|
|
{
|
|
gptr ptr;
|
|
if ((ptr=my_malloc(length,MyFlags)) != 0)
|
|
memcpy((byte*) ptr, (byte*) from,(size_t) length);
|
|
return(ptr);
|
|
}
|
|
|
|
|
|
my_string my_strdup(const char *from, myf MyFlags)
|
|
{
|
|
gptr ptr;
|
|
uint length=(uint) strlen(from)+1;
|
|
if ((ptr=my_malloc(length,MyFlags)) != 0)
|
|
memcpy((byte*) ptr, (byte*) from,(size_t) length);
|
|
return((my_string) ptr);
|
|
}
|