string-malloc.c 1.87 KB
Newer Older
Linus Tolke's avatar
Linus Tolke committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
/*
 * $Id: string-malloc.c,v 0.5 1991/09/15 10:28:55 linus Exp $
 * Copyright (C) 1991  Lysator Academic Computer Association.
 *
 * 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. 
 */
Per Cederqvist's avatar
Per Cederqvist committed
25
26
27
28
29
30
31
/*
 * Malloc wrappers for the string package.
 *
 * These functions call smalloc and also counts
 * how many allocated strings there are.
 */

Linus Tolke's avatar
Linus Tolke committed
32
static char *rcsid = "$Id: string-malloc.c,v 0.5 1991/09/15 10:28:55 linus Exp $";
Per Cederqvist's avatar
Per Cederqvist committed
33
34


Per Cederqvist's avatar
Per Cederqvist committed
35
#include <stdio.h>
Per Cederqvist's avatar
Per Cederqvist committed
36
#include <stddef.h>
37
#include <server/smalloc.h>
Per Cederqvist's avatar
Per Cederqvist committed
38
39
#include "log.h"
#include "exp.h"
Per Cederqvist's avatar
Per Cederqvist committed
40
#include "string-malloc.h"
Per Cederqvist's avatar
Per Cederqvist committed
41
42
43
44

static int no_of_allocated_blocks = 0;

EXPORT  void *
Per Cederqvist's avatar
Per Cederqvist committed
45
string_malloc(size_t size)
Per Cederqvist's avatar
Per Cederqvist committed
46
47
48
49
50
51
52
{
   ++no_of_allocated_blocks;
   return smalloc (size);
}


EXPORT  void
Per Cederqvist's avatar
Per Cederqvist committed
53
string_free(void * ptr)
Per Cederqvist's avatar
Per Cederqvist committed
54
55
56
57
58
59
{
    --no_of_allocated_blocks;
    sfree(ptr);
}

EXPORT  void *
Per Cederqvist's avatar
Per Cederqvist committed
60
string_realloc (void * ptr,
Per Cederqvist's avatar
Per Cederqvist committed
61
62
63
		size_t size)
{
    if ( ptr == NULL )
Per Cederqvist's avatar
Per Cederqvist committed
64
	return string_malloc (size);
Per Cederqvist's avatar
Per Cederqvist committed
65
66
67
68
69
70
71
72
73
74
75
76

    return srealloc (ptr, size);
}


EXPORT void
dump_string_alloc_counts(FILE *stat_file)
{
    fprintf(stat_file, "---" __FILE__ ":\n"
	    "\tAllocated strings:    %d\n",
	    no_of_allocated_blocks);
}