OLD | NEW |
| (Empty) |
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */ | |
2 /* ***** BEGIN LICENSE BLOCK ***** | |
3 * Version: MPL 1.1/GPL 2.0/LGPL 2.1 | |
4 * | |
5 * The contents of this file are subject to the Mozilla Public License Version | |
6 * 1.1 (the "License"); you may not use this file except in compliance with | |
7 * the License. You may obtain a copy of the License at | |
8 * http://www.mozilla.org/MPL/ | |
9 * | |
10 * Software distributed under the License is distributed on an "AS IS" basis, | |
11 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License | |
12 * for the specific language governing rights and limitations under the | |
13 * License. | |
14 * | |
15 * The Original Code is the Netscape Portable Runtime (NSPR). | |
16 * | |
17 * The Initial Developer of the Original Code is Netscape | |
18 * Communications Corporation. Portions created by Netscape are | |
19 * Copyright (C) 1998-2000 Netscape Communications Corporation. All | |
20 * Rights Reserved. | |
21 * | |
22 * Contributor(s): | |
23 * | |
24 * Alternatively, the contents of this file may be used under the terms of | |
25 * either the GNU General Public License Version 2 or later (the "GPL"), or | |
26 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), | |
27 * in which case the provisions of the GPL or the LGPL are applicable instead | |
28 * of those above. If you wish to allow use of your version of this file only | |
29 * under the terms of either the GPL or the LGPL, and not to allow others to | |
30 * use your version of this file under the terms of the MPL, indicate your | |
31 * decision by deleting the provisions above and replace them with the notice | |
32 * and other provisions required by the GPL or the LGPL. If you do not delete | |
33 * the provisions above, a recipient may use your version of this file under | |
34 * the terms of any one of the MPL, the GPL or the LGPL. | |
35 * | |
36 * ***** END LICENSE BLOCK ***** | |
37 */ | |
38 | |
39 #ifndef plarena_h___ | |
40 #define plarena_h___ | |
41 /* | |
42 * Lifetime-based fast allocation, inspired by much prior art, including | |
43 * "Fast Allocation and Deallocation of Memory Based on Object Lifetimes" | |
44 * David R. Hanson, Software -- Practice and Experience, Vol. 20(1). | |
45 * | |
46 * Also supports LIFO allocation (PL_ARENA_MARK/PL_ARENA_RELEASE). | |
47 */ | |
48 #include "prtypes.h" | |
49 #include "plarenas.h" | |
50 | |
51 PR_BEGIN_EXTERN_C | |
52 | |
53 typedef struct PLArena PLArena; | |
54 | |
55 struct PLArena { | |
56 PLArena *next; /* next arena for this lifetime */ | |
57 PRUword base; /* aligned base address, follows this header */ | |
58 PRUword limit; /* one beyond last byte in arena */ | |
59 PRUword avail; /* points to next available byte */ | |
60 }; | |
61 | |
62 #ifdef PL_ARENAMETER | |
63 typedef struct PLArenaStats PLArenaStats; | |
64 | |
65 struct PLArenaStats { | |
66 PLArenaStats *next; /* next in arenaStats list */ | |
67 char *name; /* name for debugging */ | |
68 PRUint32 narenas; /* number of arenas in pool */ | |
69 PRUint32 nallocs; /* number of PL_ARENA_ALLOCATE() calls */ | |
70 PRUint32 nreclaims; /* number of reclaims from freeArenas */ | |
71 PRUint32 nmallocs; /* number of malloc() calls */ | |
72 PRUint32 ndeallocs; /* number of lifetime deallocations */ | |
73 PRUint32 ngrows; /* number of PL_ARENA_GROW() calls */ | |
74 PRUint32 ninplace; /* number of in-place growths */ | |
75 PRUint32 nreleases; /* number of PL_ARENA_RELEASE() calls */ | |
76 PRUint32 nfastrels; /* number of "fast path" releases */ | |
77 PRUint32 nbytes; /* total bytes allocated */ | |
78 PRUint32 maxalloc; /* maximum allocation size in bytes */ | |
79 PRFloat64 variance; /* size variance accumulator */ | |
80 }; | |
81 #endif | |
82 | |
83 struct PLArenaPool { | |
84 PLArena first; /* first arena in pool list */ | |
85 PLArena *current; /* arena from which to allocate space */ | |
86 PRUint32 arenasize; /* net exact size of a new arena */ | |
87 PRUword mask; /* alignment mask (power-of-2 - 1) */ | |
88 #ifdef PL_ARENAMETER | |
89 PLArenaStats stats; | |
90 #endif | |
91 }; | |
92 | |
93 /* | |
94 * If the including .c file uses only one power-of-2 alignment, it may define | |
95 * PL_ARENA_CONST_ALIGN_MASK to the alignment mask and save a few instructions | |
96 * per ALLOCATE and GROW. | |
97 */ | |
98 #ifdef PL_ARENA_CONST_ALIGN_MASK | |
99 #define PL_ARENA_ALIGN(pool, n) (((PRUword)(n) + PL_ARENA_CONST_ALIGN_MASK) \ | |
100 & ~PL_ARENA_CONST_ALIGN_MASK) | |
101 | |
102 #define PL_INIT_ARENA_POOL(pool, name, size) \ | |
103 PL_InitArenaPool(pool, name, size, PL_ARENA_CONST_ALIGN_MASK + 1) | |
104 #else | |
105 #define PL_ARENA_ALIGN(pool, n) (((PRUword)(n) + (pool)->mask) & ~(pool)->mask) | |
106 #endif | |
107 | |
108 #define PL_ARENA_ALLOCATE(p, pool, nb) \ | |
109 PR_BEGIN_MACRO \ | |
110 PLArena *_a = (pool)->current; \ | |
111 PRUint32 _nb = PL_ARENA_ALIGN(pool, nb); \ | |
112 PRUword _p = _a->avail; \ | |
113 PRUword _q = _p + _nb; \ | |
114 if (_q > _a->limit) \ | |
115 _p = (PRUword)PL_ArenaAllocate(pool, _nb); \ | |
116 else \ | |
117 _a->avail = _q; \ | |
118 p = (void *)_p; \ | |
119 PL_ArenaCountAllocation(pool, nb); \ | |
120 PR_END_MACRO | |
121 | |
122 #define PL_ARENA_GROW(p, pool, size, incr) \ | |
123 PR_BEGIN_MACRO \ | |
124 PLArena *_a = (pool)->current; \ | |
125 PRUint32 _incr = PL_ARENA_ALIGN(pool, incr); \ | |
126 PRUword _p = _a->avail; \ | |
127 PRUword _q = _p + _incr; \ | |
128 if (_p == (PRUword)(p) + PL_ARENA_ALIGN(pool, size) && \ | |
129 _q <= _a->limit) { \ | |
130 _a->avail = _q; \ | |
131 PL_ArenaCountInplaceGrowth(pool, size, incr); \ | |
132 } else { \ | |
133 p = PL_ArenaGrow(pool, p, size, incr); \ | |
134 } \ | |
135 PL_ArenaCountGrowth(pool, size, incr); \ | |
136 PR_END_MACRO | |
137 | |
138 #define PL_ARENA_MARK(pool) ((void *) (pool)->current->avail) | |
139 #define PR_UPTRDIFF(p,q) ((PRUword)(p) - (PRUword)(q)) | |
140 | |
141 #ifdef DEBUG | |
142 #define PL_FREE_PATTERN 0xDA | |
143 #define PL_CLEAR_UNUSED(a) (PR_ASSERT((a)->avail <= (a)->limit), \ | |
144 memset((void*)(a)->avail, PL_FREE_PATTERN, \ | |
145 (a)->limit - (a)->avail)) | |
146 #define PL_CLEAR_ARENA(a) memset((void*)(a), PL_FREE_PATTERN, \ | |
147 (a)->limit - (PRUword)(a)) | |
148 #else | |
149 #define PL_CLEAR_UNUSED(a) | |
150 #define PL_CLEAR_ARENA(a) | |
151 #endif | |
152 | |
153 #define PL_ARENA_RELEASE(pool, mark) \ | |
154 PR_BEGIN_MACRO \ | |
155 char *_m = (char *)(mark); \ | |
156 PLArena *_a = (pool)->current; \ | |
157 if (PR_UPTRDIFF(_m, _a->base) <= PR_UPTRDIFF(_a->avail, _a->base)) { \ | |
158 _a->avail = (PRUword)PL_ARENA_ALIGN(pool, _m); \ | |
159 PL_CLEAR_UNUSED(_a); \ | |
160 PL_ArenaCountRetract(pool, _m); \ | |
161 } else { \ | |
162 PL_ArenaRelease(pool, _m); \ | |
163 } \ | |
164 PL_ArenaCountRelease(pool, _m); \ | |
165 PR_END_MACRO | |
166 | |
167 #ifdef PL_ARENAMETER | |
168 #define PL_COUNT_ARENA(pool,op) ((pool)->stats.narenas op) | |
169 #else | |
170 #define PL_COUNT_ARENA(pool,op) | |
171 #endif | |
172 | |
173 #define PL_ARENA_DESTROY(pool, a, pnext) \ | |
174 PR_BEGIN_MACRO \ | |
175 PL_COUNT_ARENA(pool,--); \ | |
176 if ((pool)->current == (a)) (pool)->current = &(pool)->first; \ | |
177 *(pnext) = (a)->next; \ | |
178 PL_CLEAR_ARENA(a); \ | |
179 free(a); \ | |
180 (a) = 0; \ | |
181 PR_END_MACRO | |
182 | |
183 #ifdef PL_ARENAMETER | |
184 | |
185 #include <stdio.h> | |
186 | |
187 PR_EXTERN(void) PL_ArenaCountAllocation(PLArenaPool *pool, PRUint32 nb); | |
188 | |
189 PR_EXTERN(void) PL_ArenaCountInplaceGrowth( | |
190 PLArenaPool *pool, PRUint32 size, PRUint32 incr); | |
191 | |
192 PR_EXTERN(void) PL_ArenaCountGrowth( | |
193 PLArenaPool *pool, PRUint32 size, PRUint32 incr); | |
194 | |
195 PR_EXTERN(void) PL_ArenaCountRelease(PLArenaPool *pool, char *mark); | |
196 | |
197 PR_EXTERN(void) PL_ArenaCountRetract(PLArenaPool *pool, char *mark); | |
198 | |
199 PR_EXTERN(void) PL_DumpArenaStats(FILE *fp); | |
200 | |
201 #else /* !PL_ARENAMETER */ | |
202 | |
203 #define PL_ArenaCountAllocation(ap, nb) /* nothing */ | |
204 #define PL_ArenaCountInplaceGrowth(ap, size, incr) /* nothing */ | |
205 #define PL_ArenaCountGrowth(ap, size, incr) /* nothing */ | |
206 #define PL_ArenaCountRelease(ap, mark) /* nothing */ | |
207 #define PL_ArenaCountRetract(ap, mark) /* nothing */ | |
208 | |
209 #endif /* !PL_ARENAMETER */ | |
210 | |
211 PR_END_EXTERN_C | |
212 | |
213 #endif /* plarena_h___ */ | |
OLD | NEW |