1
2
3
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
/*
* Copyright (c) Medical Research Council 1994. All rights reserved.
*
* Permission to use, copy, modify and distribute this software and its
* documentation for any purpose is hereby granted without fee, provided that
* this copyright and notice appears in all copies.
*
* This file was written by James Bonfield, Simon Dear, Rodger Staden,
* as part of the Staden Package at the MRC Laboratory of Molecular
* Biology, Hills Road, Cambridge, CB2 2QH, United Kingdom.
*
* MRC disclaims all warranties with regard to this software.
*/
/*
* Our own memory alloc routines that output error messages as appropriate
* for us. Could also be done as macros, but hopefully there are no tight
* using malloc many times so efficiency shouldn't be a problem.
*
* This also allows for dropping in a debugging malloc as we're intercepting
* all alloc & free commands.
*/
/* Memory leak detection support for windows */
#ifdef _WIN32
#ifdef _DEBUG
#define CRTDBG_MAP_ALLOC
#include <stdlib.h>
#include <crtdbg.h>
#else
#include <stdlib.h>
#endif
#else
#include <stdlib.h>
#endif
#include <stdio.h>
#include <errno.h>
#include "error.h"
void *xmalloc(size_t size) {
void *c;
c = malloc(size);
if (NULL == c) {
errout("Not enough memory.\n");
return NULL;
}
return c;
}
void *xrealloc(void *ptr, size_t size) {
void *c;
/*
* realloc _should_ allocate memory for us when ptr is NULL.
* Unfortunately this is not the case with the non-ANSI conformant
* C library provided with SunOS4.1
*/
if (ptr)
c = realloc(ptr, size);
else
c = malloc(size);
if (NULL == c) {
errout("Not enough memory.\n");
return NULL;
}
return c;
}
void *xcalloc(size_t num, size_t size) {
void *c;
c = calloc(num, size);
if (NULL == c) {
errout("Not enough memory.\n");
return NULL;
}
return c;
}
void xfree(void *ptr) {
free(ptr);
}
|
