<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html><head><meta name="robots" content="noindex">
<meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
<title>pool.h Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
</head><body bgcolor="#ffffff">
<!-- Generated by Doxygen 1.2.5 on Mon Oct 14 14:16:38 2002 -->
<center>
<a class="qindex" href="index.html">Main Page</a> <a class="qindex" href="hierarchy.html">Class Hierarchy</a> <a class="qindex" href="annotated.html">Compound List</a> <a class="qindex" href="files.html">File List</a> <a class="qindex" href="functions.html">Compound Members</a> <a class="qindex" href="pages.html">Related Pages</a> </center>
<hr><h1>pool.h</h1><div class="fragment"><pre>00001 <font class="comment">//</font>
00002 <font class="comment">// pool.h</font>
00003 <font class="comment">//</font>
00004 <font class="comment">// Copyright (C) 1996 Limit Point Systems, Inc.</font>
00005 <font class="comment">//</font>
00006 <font class="comment">// Author: Curtis Janssen <cljanss@limitpt.com></font>
00007 <font class="comment">// Maintainer: LPS</font>
00008 <font class="comment">//</font>
00009 <font class="comment">// This file is part of the SC Toolkit.</font>
00010 <font class="comment">//</font>
00011 <font class="comment">// The SC Toolkit is free software; you can redistribute it and/or modify</font>
00012 <font class="comment">// it under the terms of the GNU Library General Public License as published by</font>
00013 <font class="comment">// the Free Software Foundation; either version 2, or (at your option)</font>
00014 <font class="comment">// any later version.</font>
00015 <font class="comment">//</font>
00016 <font class="comment">// The SC Toolkit is distributed in the hope that it will be useful,</font>
00017 <font class="comment">// but WITHOUT ANY WARRANTY; without even the implied warranty of</font>
00018 <font class="comment">// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</font>
00019 <font class="comment">// GNU Library General Public License for more details.</font>
00020 <font class="comment">//</font>
00021 <font class="comment">// You should have received a copy of the GNU Library General Public License</font>
00022 <font class="comment">// along with the SC Toolkit; see the file COPYING.LIB. If not, write to</font>
00023 <font class="comment">// the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.</font>
00024 <font class="comment">//</font>
00025 <font class="comment">// The U.S. Government is granted a limited license as per AL 91-7.</font>
00026 <font class="comment">//</font>
00027
00028 <font class="preprocessor">#ifdef __GNUC__</font>
00029 <font class="preprocessor"></font><font class="preprocessor">#pragma interface</font>
00030 <font class="preprocessor"></font><font class="preprocessor">#endif</font>
00031 <font class="preprocessor"></font>
00032 <font class="preprocessor">#ifndef _util_group_pool_h</font>
00033 <font class="preprocessor"></font><font class="preprocessor">#define _util_group_pool_h</font>
00034 <font class="preprocessor"></font>
00035 <font class="preprocessor">#include <stdlib.h></font>
00036 <font class="preprocessor">#include <new></font>
00037 <font class="preprocessor">#include <iostream></font>
00038
00039 <font class="preprocessor">#include <util/misc/exenv.h></font>
00040
00041 <font class="preprocessor">#undef DEBUG_POOL</font>
00042 <font class="preprocessor"></font>
00043 <font class="keyword">namespace </font>sc {
00044
00045 <font class="keyword">const</font> <font class="keywordtype">int</font> pool_data_alignment_bit = 3;
00046 <font class="comment">//const int pool_data_alignment_bit = 14;</font>
00047 <font class="keyword">const</font> size_t pool_data_alignment = 1<<pool_data_alignment_bit;
00048 <font class="keyword">inline</font> size_t
00049 align_pool_data(size_t size)<font class="keyword"></font>
00050 <font class="keyword"></font>{
00051 <font class="keywordflow">return</font> (size + pool_data_alignment - 1)
00052 & (~ (pool_data_alignment - 1));
00053 }
00054 <font class="keyword">inline</font> <font class="keywordtype">void</font>*
00055 align_pool_data(<font class="keywordtype">void</font>* ptr)<font class="keyword"></font>
00056 <font class="keyword"></font>{
00057 <font class="keywordflow">return</font> (<font class="keywordtype">void</font>*)( (<font class="keywordtype">unsigned</font> <font class="keywordtype">long</font>) ((<font class="keywordtype">char</font>*)ptr + pool_data_alignment - 1)
00058 & (~ (pool_data_alignment - 1)));
00059 }
00060 <font class="keyword">inline</font> size_t
00061 align_pool_data_downward(size_t size)<font class="keyword"></font>
00062 <font class="keyword"></font>{
00063 <font class="keywordflow">return</font> size & (~ (pool_data_alignment - 1));
00064 }
00065 <font class="keyword">inline</font> <font class="keywordtype">void</font>*
00066 align_pool_data_downward(<font class="keywordtype">void</font>* ptr)<font class="keyword"></font>
00067 <font class="keyword"></font>{
00068 <font class="keywordflow">return</font> (<font class="keywordtype">void</font>*) ( (<font class="keywordtype">unsigned</font> <font class="keywordtype">long</font>) ptr & (~ (pool_data_alignment - 1)));
00069 }
00070
00071 <font class="comment">// ////////////////////////////////////////////////////////////////////////////</font>
00072
00073 <font class="keyword">class </font>PoolData;
00074 <font class="keyword">struct </font>FreeData {
00075 PoolData* next_free_;
00076 PoolData* prev_free_;
00077 };
00078
00079 <font class="comment">// ////////////////////////////////////////////////////////////////////////////</font>
00080
00081 <font class="keyword">struct </font>UsedData {
00082 <font class="keywordtype">unsigned</font> <font class="keywordtype">int</font> flags;
00083 <font class="keywordtype">unsigned</font> <font class="keywordtype">int</font> held_:16;
00084 <font class="keywordtype">int</font> priority_:15;
00085 <font class="keywordtype">unsigned</font> <font class="keywordtype">int</font> fixed_:1;
00086 };
00087
00088 <font class="comment">// ////////////////////////////////////////////////////////////////////////////</font>
00089
00090 <font class="keyword">class </font>PoolData {
00091 <font class="keyword">public</font>:
00092 <font class="keyword">enum</font> {magic = 0x1f1d1e1c};
00093 <font class="keywordtype">int</font> magic_;
00094 size_t size_;
00095 <font class="keywordtype">unsigned</font> <font class="keywordtype">int</font> free_:1;
00096 <font class="keywordtype">unsigned</font> <font class="keywordtype">int</font> flags_:15;
00097 <font class="keyword">private</font>:
00098 PoolData* next_;
00099 PoolData* prev_;
00100 <font class="keyword">public</font>:
00101 <font class="keyword">union </font>{
00102 FreeData f;
00103 UsedData u;
00104 };
00105
00106 <font class="comment">// Allocates a chunk of free memory, only initializing the size.</font>
00107 PoolData(size_t size);
00108
00109 PoolData* next();
00110 PoolData* prev();
00111
00112 <font class="keywordtype">void</font> next(PoolData*);
00113 <font class="keywordtype">void</font> prev(PoolData*);
00114 <font class="keywordtype">void</font> prev_next(PoolData*,PoolData*);
00115
00116 PoolData* next_free();
00117 PoolData* prev_free();
00118
00119 <font class="keywordtype">void</font> next_free(PoolData*);
00120 <font class="keywordtype">void</font> prev_free(PoolData*);
00121 <font class="keywordtype">void</font> prev_next_free(PoolData*,PoolData*);
00122
00123 <font class="keywordtype">void</font> set_magic(<font class="keywordtype">int</font> = magic);
00124
00125 <font class="comment">// This new can only be called with aligned memory.</font>
00126 <font class="comment">//void* operator new(size_t size, void* placement);</font>
00127 <font class="keywordtype">void</font>* data();
00128
00129 <font class="keywordtype">void</font> check(<font class="keywordtype">void</font>*lower=(<font class="keywordtype">void</font>*)0x0,<font class="keywordtype">void</font>*upper=(<font class="keywordtype">void</font>*)0x7fffffffL);
00130 };
00131
00132 <font class="keyword">const</font> <font class="keywordtype">int</font> PoolData_aligned_size = (<font class="keyword">sizeof</font>(PoolData) + pool_data_alignment - 1)
00133 & (~ (pool_data_alignment - 1));
00134 <font class="keyword">inline</font> <font class="keywordtype">void</font>* PoolData::data()<font class="keyword"></font>
00135 <font class="keyword"></font>{
00136 <font class="keywordflow">return</font> (<font class="keywordtype">void</font>*)(((<font class="keywordtype">char</font>*)<font class="keyword">this</font>) + PoolData_aligned_size);
00137 }
00138
00139 <font class="keyword">inline</font> PoolData*
00140 PoolData::next()<font class="keyword"></font>
00141 <font class="keyword"></font>{
00142 <font class="keywordflow">return</font> next_;
00143 }
00144
00145 <font class="keyword">inline</font> PoolData*
00146 PoolData::prev()<font class="keyword"></font>
00147 <font class="keyword"></font>{
00148 <font class="keywordflow">return</font> prev_;
00149 }
00150
00151 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00152 PoolData::next(PoolData*p)<font class="keyword"></font>
00153 <font class="keyword"></font>{
00154 next_ = p;
00155 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00156 <font class="preprocessor"></font> <font class="keywordflow">if</font> (next_ && prev_ && (next_ < prev_)) {
00157 ExEnv::errn() << <font class="stringliteral">"PoolData::next(PoolData*): next < prev"</font> << endl;
00158 abort();
00159 }
00160 <font class="preprocessor">#endif</font>
00161 <font class="preprocessor"></font>}
00162
00163 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00164 PoolData::prev(PoolData*p)<font class="keyword"></font>
00165 <font class="keyword"></font>{
00166 prev_ = p;
00167 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00168 <font class="preprocessor"></font> <font class="keywordflow">if</font> (next_ && prev_ && (next_ < prev_)) {
00169 ExEnv::errn() << <font class="stringliteral">"PoolData::prev(PoolData*): next < prev"</font> << endl;
00170 abort();
00171 }
00172 <font class="preprocessor">#endif</font>
00173 <font class="preprocessor"></font>}
00174
00175 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00176 PoolData::prev_next(PoolData*p,PoolData*n)<font class="keyword"></font>
00177 <font class="keyword"></font>{
00178 prev_ = p;
00179 next_ = n;
00180 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00181 <font class="preprocessor"></font> <font class="keywordflow">if</font> (next_ && prev_ && (next_ < prev_)) {
00182 ExEnv::errn() << <font class="stringliteral">"PoolData::prev_next: next < prev"</font> << endl;
00183 abort();
00184 }
00185 <font class="preprocessor">#endif</font>
00186 <font class="preprocessor"></font>}
00187
00188 <font class="comment">// ////</font>
00189
00190 <font class="keyword">inline</font> PoolData*
00191 PoolData::next_free()<font class="keyword"></font>
00192 <font class="keyword"></font>{
00193 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00194 <font class="preprocessor"></font> <font class="keywordflow">if</font> (!free_) {
00195 ExEnv::errn() << <font class="stringliteral">"PoolData::next_free(): datum is not free"</font> << endl;
00196 abort();
00197 }
00198 <font class="preprocessor">#endif</font>
00199 <font class="preprocessor"></font> <font class="keywordflow">return</font> f.next_free_;
00200 }
00201
00202 <font class="keyword">inline</font> PoolData*
00203 PoolData::prev_free()<font class="keyword"></font>
00204 <font class="keyword"></font>{
00205 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00206 <font class="preprocessor"></font> <font class="keywordflow">if</font> (!free_) {
00207 ExEnv::errn() << <font class="stringliteral">"PoolData::prev_free(): datum is not free"</font> << endl;
00208 abort();
00209 }
00210 <font class="preprocessor">#endif</font>
00211 <font class="preprocessor"></font> <font class="keywordflow">return</font> f.prev_free_;
00212 }
00213
00214 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00215 PoolData::next_free(PoolData*p)<font class="keyword"></font>
00216 <font class="keyword"></font>{
00217 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00218 <font class="preprocessor"></font> <font class="keywordflow">if</font> (!free_) {
00219 ExEnv::errn() << <font class="stringliteral">"PoolData::next_free(PoolData*): datum is not free"</font> << endl;
00220 abort();
00221 }
00222 <font class="preprocessor">#endif</font>
00223 <font class="preprocessor"></font> f.next_free_ = p;
00224 }
00225
00226 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00227 PoolData::prev_free(PoolData*p)<font class="keyword"></font>
00228 <font class="keyword"></font>{
00229 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00230 <font class="preprocessor"></font> <font class="keywordflow">if</font> (!free_) {
00231 ExEnv::errn() << <font class="stringliteral">"PoolData::prev_free(PoolData*): datum is not free"</font> << endl;
00232 abort();
00233 }
00234 <font class="preprocessor">#endif</font>
00235 <font class="preprocessor"></font> f.prev_free_ = p;
00236 }
00237
00238 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00239 PoolData::prev_next_free(PoolData*p,PoolData*n)<font class="keyword"></font>
00240 <font class="keyword"></font>{
00241 <font class="preprocessor">#ifdef DEBUG_POOL</font>
00242 <font class="preprocessor"></font> <font class="keywordflow">if</font> (!free_) {
00243 ExEnv::errn() << <font class="stringliteral">"PoolData::prev_next_free: datum is not free"</font> << endl;
00244 abort();
00245 }
00246 <font class="preprocessor">#endif</font>
00247 <font class="preprocessor"></font> f.prev_free_ = p;
00248 f.next_free_ = n;
00249 }
00250
00251 <font class="keyword">inline</font>
00252 PoolData::PoolData(size_t size):
00253 magic_(magic),
00254 size_(size-PoolData_aligned_size)
00255 {
00256 }
00257
00258 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00259 PoolData::set_magic(<font class="keywordtype">int</font> magic_a)<font class="keyword"></font>
00260 <font class="keyword"></font>{
00261 magic_ = magic_a;
00262 }
00263
00264 <font class="comment">// ////////////////////////////////////////////////////////////////////////////</font>
00265
00266 <font class="keyword">class </font>Pool {
00267 <font class="keyword">protected</font>:
00268 <font class="keyword">enum</font> { freelist_size = <font class="keyword">sizeof</font>(size_t)*8 };
00269 PoolData* freelist_[freelist_size];
00270
00271 size_t size_;
00272
00273 PoolData* firstdatum_;
00274 PoolData* voidptr_to_pd(<font class="keywordtype">void</font>*d);
00275
00276 <font class="keywordtype">int</font> freelist_find_slot(size_t);
00277 <font class="keywordtype">void</font> freelist_add(PoolData*);
00278 <font class="keywordtype">void</font> freelist_del(PoolData*);
00279 <font class="keyword">public</font>:
00280 Pool(size_t);
00281 ~Pool();
00282
00283 <font class="comment">// void* operator new(size_t size, void* placement) { return placement; }</font>
00284
00285 <font class="comment">// Handle& allocate_handle(size_t size, int priority = 0);</font>
00286 <font class="comment">// void release(Handle&);</font>
00287
00288 <font class="keywordtype">void</font>* allocate(size_t size);
00289 <font class="keywordtype">void</font> release(<font class="keywordtype">void</font>*d);
00290 <font class="keywordtype">double</font>* allocate_double(size_t n);
00291 <font class="keywordtype">void</font> release(<font class="keywordtype">double</font>*d);
00292 <font class="keywordtype">int</font>* allocate_int(size_t n);
00293 <font class="keywordtype">void</font> release(<font class="keywordtype">int</font>*d);
00294 <font class="keywordtype">void</font> print(std::ostream&o=ExEnv::out0());
00295 <font class="keywordtype">void</font> check();
00296 };
00297
00298 <font class="keyword">inline</font> PoolData*
00299 Pool::voidptr_to_pd(<font class="keywordtype">void</font>*d)<font class="keyword"></font>
00300 <font class="keyword"></font>{
00301 <font class="keywordflow">return</font> (PoolData*)((<font class="keywordtype">char</font>*)d - PoolData_aligned_size);
00302 }
00303
00304 <font class="keyword">inline</font> <font class="keywordtype">double</font>*
00305 Pool::allocate_double(size_t n)<font class="keyword"></font>
00306 <font class="keyword"></font>{
00307 <font class="keywordflow">return</font> (<font class="keywordtype">double</font>*) allocate(n*<font class="keyword">sizeof</font>(<font class="keywordtype">double</font>));
00308 }
00309
00310 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00311 Pool::release(<font class="keywordtype">double</font>*d)<font class="keyword"></font>
00312 <font class="keyword"></font>{
00313 release((<font class="keywordtype">void</font>*)d);
00314 }
00315 <font class="keyword">inline</font> <font class="keywordtype">int</font>*
00316 Pool::allocate_int(size_t n)<font class="keyword"></font>
00317 <font class="keyword"></font>{
00318 <font class="keywordflow">return</font> (<font class="keywordtype">int</font>*) allocate(n*<font class="keyword">sizeof</font>(<font class="keywordtype">int</font>));
00319 }
00320 <font class="keyword">inline</font> <font class="keywordtype">void</font>
00321 Pool::release(<font class="keywordtype">int</font>*d)<font class="keyword"></font>
00322 <font class="keyword"></font>{
00323 release((<font class="keywordtype">void</font>*)d);
00324 }
00325
00326 }
00327
00328 <font class="preprocessor">#endif</font>
00329 <font class="preprocessor"></font>
00330
00331 <font class="comment">// Local Variables:</font>
00332 <font class="comment">// mode: c++</font>
00333 <font class="comment">// c-file-style: "CLJ"</font>
00334 <font class="comment">// End:</font>
</div></pre><hr>
<address>
<small>
Generated at Mon Oct 14 14:16:38 2002 for <a
href="http://aros.ca.sandia.gov/~cljanss/mpqc">MPQC</a>
2.1.2 using the documentation package <a
href="http://www.stack.nl/~dimitri/doxygen/index.html">Doxygen</a>
1.2.5.
</small>
</address>
</body>
</html>
distrib
>
Mandriva
>
9.1
>
ppc
>
media
>
contrib
>
by-pkgid
>
263386785cefb9ae5d63b926d214d809
>
files
>
1318
