* in \a xbt_mallocator_release() when the stack is full, and when
* the mallocator is freed.
* \param reset_f function to reinitialise an object of your datatype, called
- * when you extract an object from the mallocator
+ * when you extract an object from the mallocator (can be NULL)
*
* Create and initialize a new mallocator for a given datatype.
*
xbt_mallocator_t m;
xbt_assert(size > 0, "size must be positive");
- xbt_assert(new_f != NULL && free_f != NULL
- && reset_f != NULL, "invalid parameter");
+ xbt_assert(new_f != NULL && free_f != NULL, "invalid parameter");
m = xbt_new0(s_xbt_mallocator_t, 1);
XBT_VERB("Create mallocator %p", m);
m->objects = NULL;
m->max_size = 0;
}
-
+ m->mutex = xbt_os_mutex_init();
return m;
}
m->free_f(m->objects[i]);
}
xbt_free(m->objects);
+ xbt_os_mutex_destroy(m->mutex);
xbt_free(m);
}
* If the mallocator is empty, a new object is created,
* by calling the function new_f().
*
- * In both cases, the function reset_f() is called on the object.
+ * In both cases, the function reset_f() (if defined) is called on the object.
*
* \see xbt_mallocator_release()
*/
void *object;
if (MALLOCATOR_IS_ENABLED) {
+ xbt_os_mutex_acquire(m->mutex);
if (m->current_size <= 0) {
/* No object is ready yet. Create a bunch of them to try to group the
* mallocs on the same memory pages (to help the cache lines) */
/* XBT_DEBUG("Reuse an old object for mallocator %p (size:%d/%d)", */
/* m, m->current_size, m->max_size); */
object = m->objects[--m->current_size];
+ xbt_os_mutex_release(m->mutex);
} else {
object = m->new_f();
}
- m->reset_f(object);
+ if (m->reset_f)
+ m->reset_f(object);
return object;
}
*/
void xbt_mallocator_release(xbt_mallocator_t m, void *object)
{
+ xbt_os_mutex_acquire(m->mutex);
if (m->current_size < m->max_size) {
/* there is enough place to push the object */
/* XBT_DEBUG
m->current_size, m->max_size); */
m->free_f(object);
}
+ xbt_os_mutex_release(m->mutex);
}