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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
|
#ifndef _VMALLOC_H
#define _VMALLOC_H 1
/* Public header file for the virtual malloc package.
**
** Written by Kiem-Phong Vo, kpv@research.att.com, 01/16/94.
*/
#define VMALLOC_VERSION 19990805L
#if _PACKAGE_ast
#include <ast_std.h>
#else
#include <ast_common.h>
#endif
typedef struct _vmalloc_s Vmalloc_t;
typedef struct _vmstat_s Vmstat_t;
typedef struct _vmdisc_s Vmdisc_t;
typedef struct _vmethod_s Vmethod_t;
typedef Void_t* (*Vmemory_f)_ARG_((Vmalloc_t*, Void_t*, size_t, size_t, Vmdisc_t*));
typedef int (*Vmexcept_f)_ARG_((Vmalloc_t*, int, Void_t*, Vmdisc_t*));
struct _vmstat_s
{ int n_busy; /* number of busy blocks */
int n_free; /* number of free blocks */
size_t s_busy; /* total amount of busy space */
size_t s_free; /* total amount of free space */
size_t m_busy; /* largest busy piece */
size_t m_free; /* largest free piece */
int n_seg; /* number of segments */
size_t extent; /* total size of region */
};
struct _vmdisc_s
{ Vmemory_f memoryf; /* memory manipulator */
Vmexcept_f exceptf; /* exception handler */
size_t round; /* rounding requirement */
};
struct _vmethod_s
{ Void_t* (*allocf)_ARG_((Vmalloc_t*,size_t));
Void_t* (*resizef)_ARG_((Vmalloc_t*,Void_t*,size_t,int));
int (*freef)_ARG_((Vmalloc_t*,Void_t*));
long (*addrf)_ARG_((Vmalloc_t*,Void_t*));
long (*sizef)_ARG_((Vmalloc_t*,Void_t*));
int (*compactf)_ARG_((Vmalloc_t*));
Void_t* (*alignf)_ARG_((Vmalloc_t*,size_t,size_t));
unsigned short meth;
};
struct _vmalloc_s
{ Vmethod_t meth; /* method for allocation */
char* file; /* file name */
int line; /* line number */
#ifdef _VM_PRIVATE_
_VM_PRIVATE_
#endif
};
#define VM_TRUST 0000001 /* forgo some security checks */
#define VM_TRACE 0000002 /* generate trace */
#define VM_DBCHECK 0000004 /* check for boundary overwrite */
#define VM_DBABORT 0000010 /* abort on any warning */
#define VM_FLAGS 0000017 /* user-settable flags */
#define VM_MTBEST 0000100 /* Vmbest method */
#define VM_MTPOOL 0000200 /* Vmpool method */
#define VM_MTLAST 0000400 /* Vmlast method */
#define VM_MTDEBUG 0001000 /* Vmdebug method */
#define VM_MTPROFILE 0002000 /* Vmdebug method */
#define VM_METHODS 0003700 /* available allocation methods */
#define VM_RSCOPY 0000001 /* copy old contents */
#define VM_RSMOVE 0000002 /* old contents is moveable */
#define VM_RSZERO 0000004 /* clear new space */
/* exception types */
#define VM_OPEN 0 /* region being opened */
#define VM_CLOSE 1 /* region being closed */
#define VM_NOMEM 2 /* can't obtain memory */
#define VM_BADADDR 3 /* bad addr in vmfree/vmresize */
#define VM_DISC 4 /* discipline being changed */
_BEGIN_EXTERNS_ /* public data */
#if _BLD_vmalloc && defined(__EXPORT__)
#define extern __EXPORT__
#endif
#if !_BLD_vmalloc && defined(__IMPORT__)
#define extern __IMPORT__
#endif
extern Vmethod_t* Vmbest; /* best allocation */
extern Vmethod_t* Vmlast; /* last-block allocation */
extern Vmethod_t* Vmpool; /* pool allocation */
extern Vmethod_t* Vmdebug; /* allocation with debugging */
extern Vmethod_t* Vmprofile; /* profiling memory usage */
extern Vmdisc_t* Vmdcheap; /* heap discipline */
extern Vmdisc_t* Vmdcsbrk; /* sbrk discipline */
extern Vmalloc_t* Vmheap; /* heap region */
extern Vmalloc_t* Vmregion; /* malloc region */
#undef extern
_END_EXTERNS_
_BEGIN_EXTERNS_ /* public functions */
#if _BLD_vmalloc && defined(__EXPORT__)
#define extern __EXPORT__
#endif
extern Vmalloc_t* vmopen _ARG_(( Vmdisc_t*, Vmethod_t*, int ));
extern int vmclose _ARG_(( Vmalloc_t* ));
extern int vmclear _ARG_(( Vmalloc_t* ));
extern int vmcompact _ARG_(( Vmalloc_t* ));
extern Vmdisc_t* vmdisc _ARG_(( Vmalloc_t*, Vmdisc_t* ));
extern Void_t* vmalloc _ARG_(( Vmalloc_t*, size_t ));
extern Void_t* vmalign _ARG_(( Vmalloc_t*, size_t, size_t ));
extern Void_t* vmresize _ARG_(( Vmalloc_t*, Void_t*, size_t, int ));
extern int vmfree _ARG_(( Vmalloc_t*, Void_t* ));
extern long vmaddr _ARG_(( Vmalloc_t*, Void_t* ));
extern long vmsize _ARG_(( Vmalloc_t*, Void_t* ));
extern Vmalloc_t* vmregion _ARG_(( Void_t* ));
extern Void_t* vmsegment _ARG_(( Vmalloc_t*, Void_t* ));
extern int vmset _ARG_(( Vmalloc_t*, int, int ));
extern Void_t* vmdbwatch _ARG_(( Void_t* ));
extern int vmdbcheck _ARG_(( Vmalloc_t* ));
extern int vmprofile _ARG_(( Vmalloc_t*, int ));
extern int vmtrace _ARG_(( int ));
extern int vmtrbusy _ARG_((Vmalloc_t*));
extern int vmstat _ARG_((Vmalloc_t*, Vmstat_t*));
extern int vmwalk _ARG_((Vmalloc_t*,
int(*)(Vmalloc_t*,Void_t*,size_t,Vmdisc_t*)));
extern char* vmstrdup _ARG_((Vmalloc_t*, const char*));
#if !defined(_AST_STD_H) && \
!defined(__stdlib_h) && !defined(__STDLIB_H) && \
!defined(_STDLIB_INCLUDED) && !defined(_INC_STDLIB)
extern Void_t* malloc _ARG_(( size_t ));
extern Void_t* realloc _ARG_(( Void_t*, size_t ));
extern void free _ARG_(( Void_t* ));
extern void cfree _ARG_(( Void_t* ));
extern Void_t* calloc _ARG_(( size_t, size_t ));
extern Void_t* memalign _ARG_(( size_t, size_t ));
extern Void_t* valloc _ARG_(( size_t ));
#endif
#undef extern
_END_EXTERNS_
/* to coerce any value to a Vmalloc_t*, make ANSI happy */
#define _VM_(vm) ((Vmalloc_t*)(vm))
/* enable recording of where a call originates from */
#if defined(VMFL) && defined(__FILE__) && defined(__LINE__)
#define _VMFL_(vm) (_VM_(vm)->file = __FILE__, _VM_(vm)->line = __LINE__)
#define vmalloc(vm,sz) (_VMFL_(vm), \
(*(_VM_(vm)->meth.allocf))((vm),(sz)) )
#define vmresize(vm,d,sz,type) (_VMFL_(vm), \
(*(_VM_(vm)->meth.resizef))\
((vm),(Void_t*)(d),(sz),(type)) )
#define vmfree(vm,d) (_VMFL_(vm), \
(*(_VM_(vm)->meth.freef))((vm),(Void_t*)(d)) )
#define vmalign(vm,sz,align) (_VMFL_(vm), \
(*(_VM_(vm)->meth.alignf))((vm),(sz),(align)) )
#if __STD_C || defined(__STDPP__) || defined(__GNUC__)
#define malloc(s) (_VMFL_(Vmregion), malloc((size_t)(s)) )
#define realloc(d,s) (_VMFL_(Vmregion), realloc((Void_t*)(d),(size_t)(s)) )
#define calloc(n,s) (_VMFL_(Vmregion), calloc((size_t)n, (size_t)(s)) )
#define free(d) (_VMFL_(Vmregion), free((Void_t*)(d)) )
#define memalign(a,s) (_VMFL_(Vmregion), memalign((size_t)(a),(size_t)(s)) )
#define valloc(s) (_VMFL_(Vmregion), valloc((size_t)(s) )
#else
#define _VMNM_(a,b,c,d,e,f) a/**/b/**/c/**/d/**/e/**/f
#define malloc(s) (_VMFL_(Vmregion), _VMNM_(mallo,/,*,*,/,c)\
((size_t)(s)) )
#define realloc(d,s) (_VMFL_(Vmregion), _VMNM_(reallo,/,*,*,/,c)\
((Void_t*)(d),(size_t)(s)) )
#define calloc(n,s) (_VMFL_(Vmregion), _VMNM_(callo,/,*,*,/,c)\
((size_t)n, (size_t)(s)) )
#define free(d) (_VMFL_(Vmregion), _VMNM_(fre,/,*,*,/,e)((Void_t*)(d)) )
#define memalign(a,s) (_VMFL_(Vmregion), _VMNM_(memalig,/,*,*,/,n)\
((size_t)(a),(size_t)(s)) )
#define valloc(s) (_VMFL_(Vmregion), _VMNM_(vallo,/,*,*,/,c)\
((size_t)(s) )
#endif /*__STD_C || defined(__STDPP__) || defined(__GNUC__)*/
#define cfree(d) free(d)
#endif /*defined(VMFL) && defined(__FILE__) && defined(__LINE__)*/
/* non-debugging/profiling allocation calls */
#ifndef vmalloc
#define vmalloc(vm,sz) (*(_VM_(vm)->meth.allocf))((vm),(sz))
#endif
#ifndef vmresize
#define vmresize(vm,d,sz,type) (*(_VM_(vm)->meth.resizef))\
((vm),(Void_t*)(d),(sz),(type))
#endif
#ifndef vmfree
#define vmfree(vm,d) (*(_VM_(vm)->meth.freef))((vm),(Void_t*)(d))
#endif
#ifndef vmalign
#define vmalign(vm,sz,align) (*(_VM_(vm)->meth.alignf))((vm),(sz),(align))
#endif
#define vmaddr(vm,addr) (*(_VM_(vm)->meth.addrf))((vm),(Void_t*)(addr))
#define vmsize(vm,addr) (*(_VM_(vm)->meth.sizef))((vm),(Void_t*)(addr))
#define vmcompact(vm) (*(_VM_(vm)->meth.compactf))((vm))
#define vmoldof(v,p,t,n,x) (t*)vmresize((v), (p), sizeof(t)*(n)+(x), \
(VM_RSMOVE) )
#define vmnewof(v,p,t,n,x) (t*)vmresize((v), (p), sizeof(t)*(n)+(x), \
(VM_RSMOVE|VM_RSCOPY|VM_RSZERO) )
#endif /* _VMALLOC_H */
|
