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
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/mman.h>
#ifdef L_calloc_dbg
void *calloc_dbg(size_t num, size_t size, char *function, char *file,
int line)
{
void *ptr;
fprintf(stderr, "calloc of %d bytes at %s @%s:%d = ", num * size,
function, file, line);
ptr = calloc(num, size);
fprintf(stderr, "%p\n", ptr);
return ptr;
}
#endif
#ifdef L_malloc_dbg
void *malloc_dbg(size_t len, char *function, char *file, int line)
{
void *result;
fprintf(stderr, "malloc of %d bytes at %s @%s:%d = ", len, function,
file, line);
result = malloc(len);
fprintf(stderr, "%p\n", result);
return result;
}
#endif
#ifdef L_free_dbg
void free_dbg(void *ptr, char *function, char *file, int line)
{
fprintf(stderr, "free of %p at %s @%s:%d\n", ptr, function, file,
line);
free(ptr);
}
#endif
#ifdef L_calloc
void *calloc(size_t num, size_t size)
{
void *ptr = malloc(num * size);
if (ptr)
memset(ptr, 0, num * size);
return ptr;
}
#endif
#ifdef L_malloc
void *malloc(size_t len)
{
void *result = mmap((void *) 0, len, PROT_READ | PROT_WRITE,
#ifdef __HAS_NO_MMU__
MAP_SHARED | MAP_ANONYMOUS, 0, 0
#else
MAP_PRIVATE | MAP_ANONYMOUS, 0, 0
#endif
);
if (result == (void *) -1)
return 0;
return result;
}
#endif
#ifdef L_free
void free(void *ptr)
{
munmap(ptr, 0);
}
#endif
#ifdef L_realloc
void *realloc(void *ptr, size_t size)
{
void *newptr = NULL;
if (size > 0) {
newptr = malloc(size);
if (newptr && ptr)
memcpy(newptr, ptr, size);
}
if (ptr)
free(ptr);
return newptr;
}
#endif
|
