/*
* xmalloc.c
* Copyright (C) 1998-2005 A.J. van Os
*
* Description:
* Extended malloc and friends
*/

#include <stdlib.h>
#include <string.h>
#include "antiword.h"

static char *szMessage =
       "Memory allocation failed, unable to continue";
#if defined(__dos) && !defined(__DJGPP__)
static char *szDosMessage =
       "DOS can't allocate this kind of memory, unable to continue";
#endif /* __dos && !__DJGPP__ */


/*
* xmalloc - Allocates dynamic memory
*
* See malloc(3), but unlike malloc(3) xmalloc does not return in case
* of error.
*/
void *
xmalloc(size_t tSize)
{
       void    *pvTmp;

       TRACE_MSG("xmalloc");

       if (tSize == 0) {
               tSize = 1;
       }
       pvTmp = malloc(tSize);
       if (pvTmp == NULL) {
               DBG_MSG("xmalloc returned NULL");
               DBG_DEC(tSize);
               werr(1, szMessage);
       }
       return pvTmp;
} /* end of xmalloc */

/*
* xcalloc - Allocates and zeros dynamic memory
*
* See calloc(3), but unlike calloc(3) xcalloc does not return in case of error
*/
void *
xcalloc(size_t tNmemb, size_t tSize)
{
       void    *pvTmp;

       TRACE_MSG("xcalloc");

#if defined(__dos) && !defined(__DJGPP__)
       if ((ULONG)tNmemb * (ULONG)tSize > 0xffffUL) {
               DBG_DEC((ULONG)tNmemb * (ULONG)tSize);
               werr(1, szDosMessage);
       }
#endif /* __dos && !__DJGPP__ */

       if (tNmemb == 0 || tSize == 0) {
               tNmemb = 1;
               tSize = 1;
       }
       pvTmp = calloc(tNmemb, tSize);
       if (pvTmp == NULL) {
               DBG_MSG("xcalloc returned NULL");
               werr(1, szMessage);
       }
       return pvTmp;
} /* end of xcalloc */

/*
* xrealloc - Changes the size of a memory object
*
* See realloc(3), but unlike realloc(3) xrealloc does not return in case
* of error.
*/
void *
xrealloc(void *pvArg, size_t tSize)
{
       void    *pvTmp;

       TRACE_MSG("xrealloc");

       pvTmp = realloc(pvArg, tSize);
       if (pvTmp == NULL) {
               DBG_MSG("realloc returned NULL");
               werr(1, szMessage);
       }
       return pvTmp;
} /* end of xrealloc */

/*
* xstrdup - Duplicate a string
*
* See strdup(3), but unlike strdup(3) xstrdup does not return in case
* of error.
*
* NOTE:
* Does not use strdup(3), because some systems don't have it.
*/
char *
xstrdup(const char *szArg)
{
       char    *szTmp;

       TRACE_MSG("xstrdup");

       szTmp = xmalloc(strlen(szArg) + 1);
       strcpy(szTmp, szArg);
       return szTmp;
} /* end of xstrdup */

/*
* xfree - Deallocates dynamic memory
*
* See free(3).
*
* returns NULL;
* This makes p=xfree(p) possible, free memory and overwrite the pointer to it.
*/
void *
xfree(void *pvArg)
{
       TRACE_MSG("xfree");

       if (pvArg != NULL) {
               free(pvArg);
       }
       return NULL;
} /* end of xfree */