/[jscoverage]/trunk/js/jsarena.h
ViewVC logotype

Contents of /trunk/js/jsarena.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 332 - (show annotations)
Thu Oct 23 19:03:33 2008 UTC (10 years, 9 months ago) by siliconforks
File MIME type: text/plain
File size: 13728 byte(s)
Add SpiderMonkey from Firefox 3.1b1.

The following directories and files were removed:
correct/, correct.js
liveconnect/
nanojit/
t/
v8/
vprof/
xpconnect/
all JavaScript files (Y.js, call.js, if.js, math-partial-sums.js, md5.js, perfect.js, trace-test.js, trace.js)


1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
2 *
3 * ***** BEGIN LICENSE BLOCK *****
4 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
5 *
6 * The contents of this file are subject to the Mozilla Public License Version
7 * 1.1 (the "License"); you may not use this file except in compliance with
8 * the License. You may obtain a copy of the License at
9 * http://www.mozilla.org/MPL/
10 *
11 * Software distributed under the License is distributed on an "AS IS" basis,
12 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
13 * for the specific language governing rights and limitations under the
14 * License.
15 *
16 * The Original Code is Mozilla Communicator client code, released
17 * March 31, 1998.
18 *
19 * The Initial Developer of the Original Code is
20 * Netscape Communications Corporation.
21 * Portions created by the Initial Developer are Copyright (C) 1998
22 * the Initial Developer. All Rights Reserved.
23 *
24 * Contributor(s):
25 *
26 * Alternatively, the contents of this file may be used under the terms of
27 * either of the GNU General Public License Version 2 or later (the "GPL"),
28 * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
29 * in which case the provisions of the GPL or the LGPL are applicable instead
30 * of those above. If you wish to allow use of your version of this file only
31 * under the terms of either the GPL or the LGPL, and not to allow others to
32 * use your version of this file under the terms of the MPL, indicate your
33 * decision by deleting the provisions above and replace them with the notice
34 * and other provisions required by the GPL or the LGPL. If you do not delete
35 * the provisions above, a recipient may use your version of this file under
36 * the terms of any one of the MPL, the GPL or the LGPL.
37 *
38 * ***** END LICENSE BLOCK ***** */
39
40 #ifndef jsarena_h___
41 #define jsarena_h___
42 /*
43 * Lifetime-based fast allocation, inspired by much prior art, including
44 * "Fast Allocation and Deallocation of Memory Based on Object Lifetimes"
45 * David R. Hanson, Software -- Practice and Experience, Vol. 20(1).
46 *
47 * Also supports LIFO allocation (JS_ARENA_MARK/JS_ARENA_RELEASE).
48 */
49 #include <stdlib.h>
50 #include "jstypes.h"
51 #include "jscompat.h"
52
53 JS_BEGIN_EXTERN_C
54
55 typedef struct JSArena JSArena;
56 typedef struct JSArenaPool JSArenaPool;
57
58 struct JSArena {
59 JSArena *next; /* next arena for this lifetime */
60 jsuword base; /* aligned base address, follows this header */
61 jsuword limit; /* one beyond last byte in arena */
62 jsuword avail; /* points to next available byte */
63 };
64
65 #ifdef JS_ARENAMETER
66 typedef struct JSArenaStats JSArenaStats;
67
68 struct JSArenaStats {
69 JSArenaStats *next; /* next in arenaStats list */
70 char *name; /* name for debugging */
71 uint32 narenas; /* number of arenas in pool */
72 uint32 nallocs; /* number of JS_ARENA_ALLOCATE() calls */
73 uint32 nmallocs; /* number of malloc() calls */
74 uint32 ndeallocs; /* number of lifetime deallocations */
75 uint32 ngrows; /* number of JS_ARENA_GROW() calls */
76 uint32 ninplace; /* number of in-place growths */
77 uint32 nreallocs; /* number of arena grow extending reallocs */
78 uint32 nreleases; /* number of JS_ARENA_RELEASE() calls */
79 uint32 nfastrels; /* number of "fast path" releases */
80 size_t nbytes; /* total bytes allocated */
81 size_t maxalloc; /* maximum allocation size in bytes */
82 double variance; /* size variance accumulator */
83 };
84 #endif
85
86 struct JSArenaPool {
87 JSArena first; /* first arena in pool list */
88 JSArena *current; /* arena from which to allocate space */
89 size_t arenasize; /* net exact size of a new arena */
90 jsuword mask; /* alignment mask (power-of-2 - 1) */
91 size_t *quotap; /* pointer to the quota on pool allocation
92 size or null if pool is unlimited */
93 #ifdef JS_ARENAMETER
94 JSArenaStats stats;
95 #endif
96 };
97
98 #ifdef JS_ARENAMETER
99 #define JS_INIT_NAMED_ARENA_POOL(pool, name, size, align, quotap) \
100 JS_InitArenaPool(pool, name, size, align, quotap)
101 #else
102 #define JS_INIT_NAMED_ARENA_POOL(pool, name, size, align, quotap) \
103 JS_InitArenaPool(pool, size, align, quotap)
104 #endif
105
106 /*
107 * If the including .c file uses only one power-of-2 alignment, it may define
108 * JS_ARENA_CONST_ALIGN_MASK to the alignment mask and save a few instructions
109 * per ALLOCATE and GROW.
110 */
111 #ifdef JS_ARENA_CONST_ALIGN_MASK
112 #define JS_ARENA_ALIGN(pool, n) (((jsuword)(n) + JS_ARENA_CONST_ALIGN_MASK) \
113 & ~(jsuword)JS_ARENA_CONST_ALIGN_MASK)
114
115 #define JS_INIT_ARENA_POOL(pool, name, size, quotap) \
116 JS_INIT_NAMED_ARENA_POOL(pool, name, size, JS_ARENA_CONST_ALIGN_MASK + 1, \
117 quotap)
118
119 #else
120 #define JS_ARENA_ALIGN(pool, n) (((jsuword)(n) + (pool)->mask) & ~(pool)->mask)
121
122 #define JS_INIT_ARENA_POOL(pool, name, size, align, quotap) \
123 JS_INIT_NAMED_ARENA_POOL(pool, name, size, align, quotap)
124
125 #endif
126
127 #define JS_ARENA_ALLOCATE(p, pool, nb) \
128 JS_ARENA_ALLOCATE_CAST(p, void *, pool, nb)
129
130 #define JS_ARENA_ALLOCATE_TYPE(p, type, pool) \
131 JS_ARENA_ALLOCATE_COMMON(p, type *, pool, sizeof(type), 0)
132
133 #define JS_ARENA_ALLOCATE_CAST(p, type, pool, nb) \
134 JS_ARENA_ALLOCATE_COMMON(p, type, pool, nb, _nb > _a->limit)
135
136 /*
137 * NB: In JS_ARENA_ALLOCATE_CAST and JS_ARENA_GROW_CAST, always subtract _nb
138 * from a->limit rather than adding _nb to _p, to avoid overflowing a 32-bit
139 * address space (possible when running a 32-bit program on a 64-bit system
140 * where the kernel maps the heap up against the top of the 32-bit address
141 * space).
142 *
143 * Thanks to Juergen Kreileder <jk@blackdown.de>, who brought this up in
144 * https://bugzilla.mozilla.org/show_bug.cgi?id=279273.
145 */
146 #define JS_ARENA_ALLOCATE_COMMON(p, type, pool, nb, guard) \
147 JS_BEGIN_MACRO \
148 JSArena *_a = (pool)->current; \
149 size_t _nb = JS_ARENA_ALIGN(pool, nb); \
150 jsuword _p = _a->avail; \
151 if ((guard) || _p > _a->limit - _nb) \
152 _p = (jsuword)JS_ArenaAllocate(pool, _nb); \
153 else \
154 _a->avail = _p + _nb; \
155 p = (type) _p; \
156 JS_ArenaCountAllocation(pool, nb); \
157 JS_END_MACRO
158
159 #define JS_ARENA_GROW(p, pool, size, incr) \
160 JS_ARENA_GROW_CAST(p, void *, pool, size, incr)
161
162 #define JS_ARENA_GROW_CAST(p, type, pool, size, incr) \
163 JS_BEGIN_MACRO \
164 JSArena *_a = (pool)->current; \
165 if (_a->avail == (jsuword)(p) + JS_ARENA_ALIGN(pool, size)) { \
166 size_t _nb = (size) + (incr); \
167 _nb = JS_ARENA_ALIGN(pool, _nb); \
168 if (_a->limit >= _nb && (jsuword)(p) <= _a->limit - _nb) { \
169 _a->avail = (jsuword)(p) + _nb; \
170 JS_ArenaCountInplaceGrowth(pool, size, incr); \
171 } else if ((jsuword)(p) == _a->base) { \
172 p = (type) JS_ArenaRealloc(pool, p, size, incr); \
173 } else { \
174 p = (type) JS_ArenaGrow(pool, p, size, incr); \
175 } \
176 } else { \
177 p = (type) JS_ArenaGrow(pool, p, size, incr); \
178 } \
179 JS_ArenaCountGrowth(pool, size, incr); \
180 JS_END_MACRO
181
182 #define JS_ARENA_MARK(pool) ((void *) (pool)->current->avail)
183 #define JS_UPTRDIFF(p,q) ((jsuword)(p) - (jsuword)(q))
184
185 /*
186 * Check if the mark is inside arena's allocated area.
187 */
188 #define JS_ARENA_MARK_MATCH(a, mark) \
189 (JS_UPTRDIFF(mark, (a)->base) <= JS_UPTRDIFF((a)->avail, (a)->base))
190
191 #ifdef DEBUG
192 #define JS_FREE_PATTERN 0xDA
193 #define JS_CLEAR_UNUSED(a) (JS_ASSERT((a)->avail <= (a)->limit), \
194 memset((void*)(a)->avail, JS_FREE_PATTERN, \
195 (a)->limit - (a)->avail))
196 #define JS_CLEAR_ARENA(a) memset((void*)(a), JS_FREE_PATTERN, \
197 (a)->limit - (jsuword)(a))
198 #else
199 #define JS_CLEAR_UNUSED(a) /* nothing */
200 #define JS_CLEAR_ARENA(a) /* nothing */
201 #endif
202
203 #define JS_ARENA_RELEASE(pool, mark) \
204 JS_BEGIN_MACRO \
205 char *_m = (char *)(mark); \
206 JSArena *_a = (pool)->current; \
207 if (_a != &(pool)->first && JS_ARENA_MARK_MATCH(_a, _m)) { \
208 _a->avail = (jsuword)JS_ARENA_ALIGN(pool, _m); \
209 JS_ASSERT(_a->avail <= _a->limit); \
210 JS_CLEAR_UNUSED(_a); \
211 JS_ArenaCountRetract(pool, _m); \
212 } else { \
213 JS_ArenaRelease(pool, _m); \
214 } \
215 JS_ArenaCountRelease(pool, _m); \
216 JS_END_MACRO
217
218 #ifdef JS_ARENAMETER
219 #define JS_COUNT_ARENA(pool,op) ((pool)->stats.narenas op)
220 #else
221 #define JS_COUNT_ARENA(pool,op)
222 #endif
223
224 #define JS_ARENA_DESTROY(pool, a, pnext) \
225 JS_BEGIN_MACRO \
226 JS_COUNT_ARENA(pool,--); \
227 if ((pool)->current == (a)) (pool)->current = &(pool)->first; \
228 *(pnext) = (a)->next; \
229 JS_CLEAR_ARENA(a); \
230 free(a); \
231 (a) = NULL; \
232 JS_END_MACRO
233
234 /*
235 * Initialize an arena pool with a minimum size per arena of size bytes.
236 * Always call JS_SET_ARENA_METER_NAME before calling this or use
237 * JS_INIT_ARENA_POOL macro to provide a name for for debugging and metering.
238 */
239 extern JS_PUBLIC_API(void)
240 JS_INIT_NAMED_ARENA_POOL(JSArenaPool *pool, const char *name, size_t size,
241 size_t align, size_t *quotap);
242
243 /*
244 * Free the arenas in pool. The user may continue to allocate from pool
245 * after calling this function. There is no need to call JS_InitArenaPool()
246 * again unless JS_FinishArenaPool(pool) has been called.
247 */
248 extern JS_PUBLIC_API(void)
249 JS_FreeArenaPool(JSArenaPool *pool);
250
251 /*
252 * Free the arenas in pool and finish using it altogether.
253 */
254 extern JS_PUBLIC_API(void)
255 JS_FinishArenaPool(JSArenaPool *pool);
256
257 /*
258 * Deprecated do-nothing function.
259 */
260 extern JS_PUBLIC_API(void)
261 JS_ArenaFinish(void);
262
263 /*
264 * Deprecated do-nothing function.
265 */
266 extern JS_PUBLIC_API(void)
267 JS_ArenaShutDown(void);
268
269 /*
270 * Friend functions used by the JS_ARENA_*() macros.
271 */
272 extern JS_PUBLIC_API(void *)
273 JS_ArenaAllocate(JSArenaPool *pool, size_t nb);
274
275 extern JS_PUBLIC_API(void *)
276 JS_ArenaRealloc(JSArenaPool *pool, void *p, size_t size, size_t incr);
277
278 extern JS_PUBLIC_API(void *)
279 JS_ArenaGrow(JSArenaPool *pool, void *p, size_t size, size_t incr);
280
281 extern JS_PUBLIC_API(void)
282 JS_ArenaRelease(JSArenaPool *pool, char *mark);
283
284 #ifdef JS_ARENAMETER
285
286 #include <stdio.h>
287
288 extern JS_PUBLIC_API(void)
289 JS_ArenaCountAllocation(JSArenaPool *pool, size_t nb);
290
291 extern JS_PUBLIC_API(void)
292 JS_ArenaCountInplaceGrowth(JSArenaPool *pool, size_t size, size_t incr);
293
294 extern JS_PUBLIC_API(void)
295 JS_ArenaCountGrowth(JSArenaPool *pool, size_t size, size_t incr);
296
297 extern JS_PUBLIC_API(void)
298 JS_ArenaCountRelease(JSArenaPool *pool, char *mark);
299
300 extern JS_PUBLIC_API(void)
301 JS_ArenaCountRetract(JSArenaPool *pool, char *mark);
302
303 extern JS_PUBLIC_API(void)
304 JS_DumpArenaStats(FILE *fp);
305
306 #else /* !JS_ARENAMETER */
307
308 #define JS_ArenaCountAllocation(ap, nb) /* nothing */
309 #define JS_ArenaCountInplaceGrowth(ap, size, incr) /* nothing */
310 #define JS_ArenaCountGrowth(ap, size, incr) /* nothing */
311 #define JS_ArenaCountRelease(ap, mark) /* nothing */
312 #define JS_ArenaCountRetract(ap, mark) /* nothing */
313
314 #endif /* !JS_ARENAMETER */
315
316 JS_END_EXTERN_C
317
318 #endif /* jsarena_h___ */

  ViewVC Help
Powered by ViewVC 1.1.24