sources/liblfds/freelist/freelist_new.c

Go to the documentation of this file.

#include "freelist_internal.h"

#if defined(HLX_BUILD_WITH_PARALLEL_THREADING)

extern hlx_api gl_api;

/****************************************************************************/
int freelist_new( struct freelist_state **fs, atom_t number_elements, int (*user_data_init_function)(void **user_data, void *user_state), void *user_state )
{
  int
    rv = 0;

  atom_t
    element_count;

  /* TRD : number_elements can be any value in its range */
  /* TRD : user_data_init_function can be 0 */

  *fs = (struct freelist_state *) gl_api.aligned_malloc_entry( sizeof(struct freelist_state), ALIGN_DOUBLE_POINTER );

  if( (*fs) != 0 )
  {
    (*fs)->top[FREELIST_POINTER] = 0;
    (*fs)->top[FREELIST_COUNTER] = 0;
    (*fs)->user_data_init_function = user_data_init_function;
    (*fs)->user_state = user_state;
    (*fs)->aba_counter = 0;
    (*fs)->element_count = 0;

    element_count = freelist_new_elements( *fs, number_elements );

    if( element_count == number_elements )
      rv = 1;

    if( element_count != number_elements )
    {
      gl_api.aligned_free_entry( (*fs) );
      *fs = 0;
    }
  }

  return( rv );
}





/****************************************************************************/
atom_t freelist_new_elements( struct freelist_state *fs, atom_t number_elements )
{
  struct freelist_element
    *fe;

  atom_t
    loop,
    count = 0;

  /* TRD : number_elements can be any value in its range */
  /* TRD : user_data_init_function can be 0 */

  for( loop = 0 ; loop < number_elements ; loop++ )
    if( freelist_internal_new_element(fs, &fe) )
    {
      freelist_push( fs, fe );
      count++;
    }

  return( count );
}





/****************************************************************************/
atom_t freelist_internal_new_element( struct freelist_state *fs, struct freelist_element **fe )
{
  atom_t
    rv = 0;

  /* TRD : basically, does what you'd expect;

           allocates an element
           calls the user init function
           if anything fails, cleans up,
           sets *fe to 0
           and returns 0
  */

  *fe = (struct freelist_element *) gl_api.aligned_malloc_entry( sizeof(struct freelist_element), ALIGN_DOUBLE_POINTER );

  if( *fe != 0 )
  {
    if( fs->user_data_init_function == 0 )
    {
      (*fe)->user_data = 0;
      rv = 1;
    }

    if( fs->user_data_init_function != 0 )
    {
      rv = fs->user_data_init_function( &(*fe)->user_data, fs->user_state );

      if( rv == 0 )
      {
        gl_api.aligned_free_entry( *fe );
        *fe = 0;
      }
    }
  }

  if( rv == 1 )
  {
    gl_api.atomic_incr_entry( (atom_t *) &fs->element_count );
  }

  return( rv );
}

#endif /* !HLX_BUILD_WITH_PARALLEL_THREADING */