setGetHashTable.c

Go to the documentation of this file.

/*------------------------------------------------------------------------*/
/* file: setGetHashTable.h                                                */
/* Copyright INRIA 2006                                                   */
/* Authors : Jean-Baptiste Silvy                                          */
/* desc : define two hash table to be used in sci_set and sci_get         */
/*        These hash table are based on the Scilab hashTable              */
/*------------------------------------------------------------------------*/

#include <string.h>

#include "setGetHashTable.h"
#include "MALLOC.h"

/*-----------------------------------------------------------------------------------*/
/* see http://www.cse.yorku.ca/~oz/hash.html */
/* like in hashtable_localization by Allan Cornet */
/* I choose djb2 algo. for strings */
static unsigned int setGetHashTableHash( void * key )
{
  unsigned long hash = 5381;
  int c ;
  char * str = key ;

  while ( (c = *str++) )
  {
    hash = ((hash << 5) + hash) + c ; /* hash * 33 + c */
  }

  return hash;

}
/*-----------------------------------------------------------------------------------*/
static int setGetHashTableEqualKeys( void * k1, void * k2 )
{
  if ( strcmp( (char *)k1, (char *)k2 ) == 0 )
  {
    return 1 ;
  }
  return 0 ;
}
/*-----------------------------------------------------------------------------------*/
GetPropertyHashTable * createGetHashTable( void )
{
  return create_hashtable(16, setGetHashTableHash, setGetHashTableEqualKeys ) ;
}
/*-----------------------------------------------------------------------------------*/
void destroyGetHashTable( GetPropertyHashTable * hashTable )
{
  /* we just store pointers */
  hashtable_destroy( hashTable, 0 ) ;
}
/*-----------------------------------------------------------------------------------*/
getPropertyFunc searchGetHashtable( GetPropertyHashTable * hashTable, char * key )
{
  return (getPropertyFunc) hashtable_search( hashTable, key ) ;
}
/*-----------------------------------------------------------------------------------*/
int insertGetHashtable( GetPropertyHashTable * hashTable, char * key, getPropertyFunc value )
{
  /* allocate a new key because the hashtable claims ownership */
  /* and will free it when destroyed */
  char * copyKey   = NULL ;
  int    keyLength = strlen( key ) + 1 ;

  copyKey = MALLOC( keyLength * sizeof(char) ) ;
  if ( copyKey == NULL ) { return 0 ; }
  strcpy( copyKey, key ) ;

  return hashtable_insert( hashTable, copyKey, value ) ;
}
/*-----------------------------------------------------------------------------------*/
SetPropertyHashTable * createSetHashTable( void )
{
  return create_hashtable(16, setGetHashTableHash, setGetHashTableEqualKeys ) ;
}
/*-----------------------------------------------------------------------------------*/
void destroySetHashTable( SetPropertyHashTable * hashTable )
{
  /* we just store pointers */
  hashtable_destroy( hashTable, 0 ) ;
}
/*-----------------------------------------------------------------------------------*/
setPropertyFunc searchSetHashtable( SetPropertyHashTable * hashTable, char * key )
{
  return (setPropertyFunc) hashtable_search( hashTable, key ) ;
}
/*-----------------------------------------------------------------------------------*/
int insertSetHashtable( SetPropertyHashTable * hashTable, char * key, setPropertyFunc value )
{
  /* allocate a new key because the hashtable claims ownership */
  /* and will free it when destroyed */
  char * copyKey   = NULL ;
  int    keyLength = strlen( key ) + 1 ;

  copyKey = MALLOC( keyLength * sizeof(char) ) ;
  strcpy( copyKey, key ) ;

  return hashtable_insert( hashTable, copyKey, value ) ;
}
/*-----------------------------------------------------------------------------------*/

---