isc-malloc.c 1.97 KB
Newer Older
Per Cederqvist's avatar
Per Cederqvist committed
1
/*
2
 * $Id: isc-malloc.c,v 1.9 1998/07/08 13:41:47 ceder Exp $
3
 * Copyright (C) 1991, 1992, 1993, 1994, 1995  Lysator Academic Computer Association.
Per Cederqvist's avatar
Per Cederqvist committed
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
 *
 * This file is part of the LysKOM server.
 * 
 * LysKOM 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; either version 1, or (at your option) 
 * any later version.
 * 
 * LysKOM 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 LysKOM; see the file COPYING.  If not, write to
 * Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN,
 * or the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, 
 * MA 02139, USA.
 *
 * Please mail bug reports to bug-lyskom@lysator.liu.se. 
 */
/*
 * Malloc wrappers for the isc package.
 *
 * These functions call smalloc and also counts
 * how many allocated blocks there are.
 */

32 33
static const char *
rcsid = "$Id: isc-malloc.c,v 1.9 1998/07/08 13:41:47 ceder Exp $";
34 35
#include "rcs.h"
USE(rcsid);
Per Cederqvist's avatar
Per Cederqvist committed
36

Per Cederqvist's avatar
Per Cederqvist committed
37
#include <sys/types.h>
Per Cederqvist's avatar
Per Cederqvist committed
38 39 40
#ifdef HAVE_STDDEF_H
#  include <stddef.h>
#endif
Per Cederqvist's avatar
Per Cederqvist committed
41 42
#include <stdio.h>

Per Cederqvist's avatar
Per Cederqvist committed
43 44
#include "exp.h"
#include "isc-malloc.h"
Per Cederqvist's avatar
Per Cederqvist committed
45
#include "server/smalloc.h"
Per Cederqvist's avatar
Per Cederqvist committed
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77

static int no_of_allocated_blocks = 0;

EXPORT  void *
isc_malloc_wrapper(size_t size)
{
   ++no_of_allocated_blocks;
   return smalloc (size);
}


EXPORT  void
isc_free_wrapper(void * ptr)
{
    --no_of_allocated_blocks;
    sfree(ptr);
}

EXPORT  void *
isc_realloc_wrapper (void * ptr,
		     size_t size)
{
    if ( ptr == NULL )
	return isc_malloc_wrapper (size);

    return srealloc (ptr, size);
}


EXPORT void
dump_isc_alloc_counts(FILE *stat_file)
{
Per Cederqvist's avatar
Per Cederqvist committed
78 79
    fprintf(stat_file, "---%s:\n\tAllocated blocks by isc: %d\n",
	    __FILE__, no_of_allocated_blocks);
Per Cederqvist's avatar
Per Cederqvist committed
80
}