---

Memory.c

Go to the documentation of this file.

/*
 *    gui - [gega user interface] the flexible solution for user interface problems
 *    Copyright (C) 2002  Gergely Gati
 *
 *    This program is free software; you can redistribute it and/or modify
 *    it under the terms of the GNU General Public License as published by
 *    the Free Software Foundation; version 2 of the License.
 *
 *    This program is distributed in the hope that it will be useful,
 *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *    GNU General Public License for more details.
 *
 *    You should have received a copy of the GNU General Public License
 *    along with this program; if not, write to the Free Software
 *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *    Gergely Gati
 *      email:           g.gati@freemail.hu
 *      AIM screenname:  GatiGergely
 *      ICQ number:      93131690
 *
 */
#include <stdlib.h>

#include "debug.h"

#define INMEM
#include "Memory.h"
#if defined (MEM_OVER)
#include "types.h"
#endif


#define POSTALLOC     4*2
#define HEADER        4*3
#define PATTERN       (0xDEADBEEF)


#ifdef MEM_OVER
  static unsigned long counter=0;
  static unsigned long prevcounter=0;
#endif

#ifndef MEM_MACRO

void *mem_malloc(size_t size)
{
  void *ret=NULL;

  ret=malloc(size);

  return(ret);
}

void *mem_calloc(size_t nmemb, size_t size)
{
  void *ret=NULL;

  ret=calloc(nmemb,size);

  return(ret);
}

void *mem_realloc(void *ptr, size_t size)
{
  void *ret=NULL;

  ret=realloc(ptr,size);

  return(ret);
}

void mem_free(void *ptr)
{
  free(ptr);
}

#ifdef MEM_OVER

void *mem_malloc_over(size_t size, char *file, char *func, int line)
{
  u8 *pnt;
  void *ret;

  prevcounter=counter;
  pnt=malloc(size+HEADER+POSTALLOC);
  ret=pnt+HEADER;
  *((u32 *)pnt)=(u32)size;
  *((u32 *)(pnt+4))=(u32)counter;
  *((u32 *)(pnt+8))=(u32)PATTERN;
  pnt+=HEADER+size;
  *((u32 *)pnt)=PATTERN;
  *((u32 *)(pnt+4))=PATTERN;
#ifdef MEM_VERBOSE
  printf("MEM: A <%08lx> %s: %s line %d: $%p=malloc(%d)\n",counter,file,func,line,ret,size);
#endif
  counter++;
  if(counter<=prevcounter) printf("MEM: E INTERR counter small!!! %ld+1 ?= %ld\n",prevcounter,counter);
  return(ret);
}

void *mem_calloc_over(size_t nmemb, size_t size, char *file, char *func, int line)
{
  u8 *pnt;
  void *ret;

  prevcounter=counter;
  pnt=calloc((size*nmemb)+HEADER+POSTALLOC,1);
  ret=pnt+HEADER;
  *((u32 *)pnt)=(u32)(size*nmemb);
  *((u32 *)(pnt+4))=(u32)counter;
  *((u32 *)(pnt+8))=(u32)PATTERN;
  pnt+=HEADER+(size*nmemb);
  *((u32 *)pnt)=PATTERN;
  *((u32 *)(pnt+4))=PATTERN;
#ifdef MEM_VERBOSE
  printf("MEM: A <%08lx> %s: %s line %d: $%p=calloc(%d,%d)\n",counter,file,func,line,ret,nmemb,size);
#endif
  counter++;
  if(counter<=prevcounter) printf("MEM: E INTERR counter small!!! %ld+1 ?= %ld\n",prevcounter,counter);
  return(ret);
}

void mem_free_over(void *ptr, char *file, char *func, int line)
{
  u8 *pnt;
  int size,ok=0;
  u32 cnt;

  pnt=ptr;
  pnt-=HEADER;
  size=(int)(*((u32 *)pnt));
  cnt=(unsigned long)(*((u32 *)(pnt+4)));
  if(PATTERN!=(*((u32 *)(pnt+8))))
  {
    printf("MEM: E ERR %s: %s line %d: free($%p) size?=%d  cnt?=<%08lx>*** buffer underwritten!\n",file,func,line,ptr,size,cnt);
    ok=-1;
  }
  pnt+=HEADER+size;
  if(*((u32 *)pnt)!=PATTERN)
  {
    printf("MEM: E ERR %s: %s line %d: free($%p) orig_size=%d *** buffer overwritten!\n",file,func,line,ptr,size);
    ok=-1;
  }
#ifdef MEM_VERBOSE
  if(ok==0) printf("MEM: F %s: %s line %d: free($%p) <%08lx> orig_size=%d\n",file,func,line,ptr,cnt,size);
#endif
  pnt=ptr;
  pnt-=HEADER;
  free(pnt);
}

#endif /* MEM_OVER */


void mem_trace_report(void)
{
#ifdef MEM_OVER
  printf("MEMORY REPORT\n");
  printf("  counter: %ld\n",counter);
  fflush(stdout);
#endif /* MEM_OVER */
}

#endif /*MEM_MACRO*/

---