2 Copyright (C) 1998-99 Paul Barton-Davis
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 #include "pbd/error.h"
32 Pool::Pool (string n, unsigned long item_size, unsigned long nitems)
38 /* since some overloaded ::operator new() might use this,
39 its important that we use a "lower level" allocator to
43 block = malloc (nitems * item_size);
45 void **ptrlist = (void **) malloc (sizeof (void *) * nitems);
47 for (unsigned long i = 0; i < nitems; i++) {
48 ptrlist[i] = static_cast<void *> (static_cast<char*>(block) + (i * item_size));
51 free_list.write (ptrlist, nitems);
65 // cerr << _name << " pool " << " alloc, thread = " << pthread_name() << " space = " << free_list->read_space() << endl;
67 if (free_list.read (&ptr, 1) < 1) {
68 fatal << "CRITICAL: " << _name << " POOL OUT OF MEMORY - RECOMPILE WITH LARGER SIZE!!" << endmsg;
77 Pool::release (void *ptr)
79 free_list.write (&ptr, 1);
80 // cerr << _name << ": release, now has " << free_list->read_space() << endl;
83 /*---------------------------------------------*/
85 MultiAllocSingleReleasePool::MultiAllocSingleReleasePool (string n, unsigned long isize, unsigned long nitems)
86 : Pool (n, isize, nitems),
91 MultiAllocSingleReleasePool::~MultiAllocSingleReleasePool ()
96 SingleAllocMultiReleasePool::SingleAllocMultiReleasePool (string n, unsigned long isize, unsigned long nitems)
97 : Pool (n, isize, nitems),
102 SingleAllocMultiReleasePool::~SingleAllocMultiReleasePool ()
108 MultiAllocSingleReleasePool::alloc ()
112 m_lock = new Glib::Mutex();
113 // umm, I'm not sure that this doesn't also allocate memory.
114 if(!m_lock) error << "cannot create Glib::Mutex in pool.cc" << endmsg;
117 Glib::Mutex::Lock guard(*m_lock);
118 ptr = Pool::alloc ();
123 MultiAllocSingleReleasePool::release (void* ptr)
129 SingleAllocMultiReleasePool::alloc ()
131 return Pool::alloc ();
135 SingleAllocMultiReleasePool::release (void* ptr)
138 m_lock = new Glib::Mutex();
139 // umm, I'm not sure that this doesn't also allocate memory.
140 if(!m_lock) error << "cannot create Glib::Mutex in pool.cc" << endmsg;
142 Glib::Mutex::Lock guard(*m_lock);
146 /*-------------------------------------------------------*/
149 free_per_thread_pool (void* ptr)
151 Pool* pptr = static_cast<Pool*>(ptr);
155 PerThreadPool::PerThreadPool ()
158 /* for some reason this appears necessary to get glib's thread private stuff to work */
160 key = g_private_new (NULL);
163 _key = g_private_new (free_per_thread_pool);
167 PerThreadPool::create_per_thread_pool (string n, unsigned long isize, unsigned long nitems)
169 Pool* p = new CrossThreadPool (n, isize, nitems);
170 g_private_set (_key, p);
174 PerThreadPool::per_thread_pool ()
176 CrossThreadPool* p = static_cast<CrossThreadPool*> (g_private_get (_key));
178 fatal << "programming error: no per-thread pool \"" << _name << "\" for thread " << pthread_self() << endmsg;
184 CrossThreadPool::CrossThreadPool (string n, unsigned long isize, unsigned long nitems)
185 : Pool (n, isize, nitems)
192 CrossThreadPool::alloc ()
195 while (pending.read (&ptr, 1) == 1) {
196 free_list.write (&ptr, 1);
198 return Pool::alloc ();
202 CrossThreadPool::push (void* t)
204 pending.write (&t, 1);