#ifndef _VLC_ARRAYS_H_
#define _VLC_ARRAYS_H_
+#include <assert.h>
+
/**
* Simple dynamic array handling. Array is realloced at each insert/removal
*/
} \
} while(0)
-/************************************************************************
- * Dictionaries
- ************************************************************************/
-
-/* This function is not intended to be crypto-secure, we only want it to be
- * fast and not suck too much. This one is pretty fast and did 0 collisions
- * in wenglish's dictionary.
- */
-static inline uint64_t DictHash( const char *psz_string, int i_int )
-{
- uint64_t i_hash = 0;
- if( psz_string )
- {
- while( *psz_string )
- {
- i_hash += *psz_string++;
- i_hash += i_hash << 10;
- i_hash ^= i_hash >> 8;
- }
- }
- return i_hash + ( (uint64_t)i_int << 32 );
-}
-
-#define DICT_TYPE(name,type) \
- typedef struct dict_entry_##name##_t { \
- int i_int; \
- char *psz_string; \
- uint64_t i_hash; \
- type data; \
- } dict_entry_##name##_t; \
- typedef struct dict_##name##_t { \
- dict_entry_##name##_t *p_entries; \
- int i_entries; \
- } dict_##name##_t;
-
-#define DICT_NEW( p_dict ) { \
- p_dict = malloc( sizeof(int)+sizeof(void*) ); \
- p_dict->i_entries = 0; \
- p_dict->p_entries = NULL; \
-}
-
-#define DICT_CLEAR( zdict ) { \
- int _i_dict = 0; \
- for ( _i_dict = 0; _i_dict < zdict->i_entries; _i_dict++ ) \
- { \
- FREE( zdict->p_entries[_i_dict].psz_string ); \
- } \
- FREE( zdict->p_entries ); \
- free( zdict ); \
-}
-
-#define DICT_INSERT( zdict, zint, zstring, zdata ) { \
- uint64_t i_hash = DictHash( (zstring), (zint) ); \
- int i_new; \
- /* Find a free slot */ \
- if( zdict->i_entries == 0 || i_hash <= zdict->p_entries[0].i_hash ) \
- i_new = 0; \
- else if( i_hash >= zdict->p_entries[zdict->i_entries-1].i_hash ) \
- i_new = zdict->i_entries;\
- else \
- { \
- int i_low = 0, i_high = zdict->i_entries - 1; \
- while( i_high - i_low > 1 ) \
- { \
- int i_mid = (i_low + i_high)/2; \
- fprintf(stderr, "Low %i, high %i\n", i_low, i_high); \
- if( zdict->p_entries[i_mid].i_hash < i_hash ) { \
- i_low = i_mid; \
- } else if( zdict->p_entries[i_mid].i_hash > i_hash ) { \
- i_high = i_mid; \
- } \
- } \
- if( zdict->p_entries[i_low].i_hash < i_hash ) \
- i_new = i_high; \
- else \
- i_new = i_low; \
- } \
- zdict->p_entries = realloc( zdict->p_entries, (zdict->i_entries + 1) * \
- ( sizeof(zdata) + sizeof(int) + sizeof(void*) + sizeof(uint64_t) ) ); \
- zdict->i_entries++; \
- if( i_new != zdict->i_entries -1 ) \
- memmove( &zdict->p_entries[i_new+1], &zdict->p_entries[i_new], \
- ( zdict->i_entries - i_new - 1 ) * \
- ( sizeof(zdata) + sizeof(int) + sizeof(void*) + sizeof(uint64_t) ) );\
- \
- zdict->p_entries[i_new].i_hash = i_hash; \
- zdict->p_entries[i_new].i_int = (zint); \
- if( (zstring) ) { \
- zdict->p_entries[i_new].psz_string = strdup( (zstring) ); \
- } else { \
- zdict->p_entries[i_new].psz_string = NULL; \
- } \
- zdict->p_entries[i_new].data = zdata; \
-}
-
-#define DICT_LOOKUP( zdict, zint, zstring, answer ) do { \
- uint64_t i_hash; \
- int i, i_pos; \
- vlc_bool_t b_found = VLC_FALSE; \
- if( zdict->i_entries == 0 ) { \
- answer = -1; \
- break; \
- } \
- \
- i_hash = DictHash( (zstring), (zint) ); \
- BSEARCH( zdict->p_entries, zdict->i_entries, .i_hash, uint64_t, \
- i_hash, i_pos ); \
- if( i_pos == -1 ) { \
- answer = -1; \
- break; \
- } \
- \
- /* Hash found, let's check it looks like the entry */ \
- if( !strcmp( (zstring), zdict->p_entries[i_pos].psz_string ) ) { \
- answer = i_pos; \
- break; \
- } \
- \
- /* Hash collision! This should be very rare, but we cannot guarantee \
- * it will never happen. Just do an exhaustive search amongst all \
- * entries with the same hash. */ \
- for( i = i_pos - 1 ; i > 0 && i_hash == zdict->p_entries[i].i_hash ; i-- )\
- { \
- if( !strcmp( (zstring), zdict->p_entries[i].psz_string ) && \
- zdict->p_entries[i].i_int == (zint) ) { \
- b_found = VLC_TRUE; \
- answer = i; \
- break; \
- } \
- } \
- if( b_found == VLC_TRUE ) \
- break; \
- for( i = i_pos + 1 ; i < zdict->i_entries && \
- i_hash == zdict->p_entries[i].i_hash ; i++ ) \
- { \
- if( !strcmp( (zstring), zdict->p_entries[i].psz_string ) && \
- zdict->p_entries[i].i_int == (zint) ) { \
- b_found = VLC_TRUE; \
- answer = i; \
- break; \
- } \
- } \
- /* Hash found, but entry not found (quite strange !) */ \
- assert( 0 ); \
-} while(0)
-
-#define DICT_GET( zdict, i_int, psz_string, answer ) { \
- int int_answer; \
- DICT_LOOKUP( zdict, i_int, psz_string, int_answer ); \
- if( int_answer >= 0 ) \
- answer = zdict->p_entries[int_answer].data; \
-}
/************************************************************************
* Dynamic arrays with progressive allocation
#define FOREACH_END() } }
+/************************************************************************
+ * Dictionaries
+ ************************************************************************/
+
+/* This function is not intended to be crypto-secure, we only want it to be
+ * fast and not suck too much. This one is pretty fast and did 0 collisions
+ * in wenglish's dictionary.
+ */
+static inline uint64_t DictHash( const char *psz_string, int hashsize )
+{
+ uint64_t i_hash = 0;
+ if( psz_string )
+ {
+ while( *psz_string )
+ {
+ i_hash += *psz_string++;
+ i_hash += i_hash << 10;
+ i_hash ^= i_hash >> 8;
+ }
+ }
+ return i_hash % hashsize;
+}
+
+struct vlc_dictionary_entry_t
+{
+ char * psz_key;
+ void * p_value;
+ struct vlc_dictionary_entry_t * p_next;
+};
+
+typedef struct vlc_dictionary_t
+{
+ int i_size;
+ struct vlc_dictionary_entry_t ** p_entries;
+} vlc_dictionary_t;
+
+static void * const kVLCDictionaryNotFound = NULL;
+
+static inline void vlc_dictionary_init( vlc_dictionary_t * p_dict, int i_size )
+{
+ if( i_size > 0 )
+ {
+ p_dict->p_entries = (struct vlc_dictionary_entry_t **)malloc(sizeof(struct vlc_dictionary_entry_t *) * i_size);
+ assert( p_dict->p_entries );
+ memset( p_dict->p_entries, 0, sizeof(struct vlc_dictionary_entry_t *) * i_size );
+ }
+ else
+ p_dict->p_entries = NULL;
+ p_dict->i_size = i_size;
+}
+
+static inline void vlc_dictionary_clear( vlc_dictionary_t * p_dict )
+{
+ int i;
+ struct vlc_dictionary_entry_t * p_current, * p_next;
+ for( i = 0; i < p_dict->i_size; i++ )
+ {
+ p_current = p_dict->p_entries[i];
+ while( p_current )
+ {
+ p_next = p_dict->p_entries[i]->p_next;
+ free( p_dict->p_entries[i]->psz_key );
+ free( p_current );
+ p_current = p_next;
+ }
+ }
+ free( p_dict->p_entries );
+ p_dict->i_size = 0;
+}
+
+
+
+static inline void *
+vlc_dictionary_value_for_key( const vlc_dictionary_t * p_dict, const char * psz_key )
+{
+ if( !p_dict->p_entries )
+ return kVLCDictionaryNotFound;
+
+ int i_pos = DictHash( psz_key, p_dict->i_size );
+ struct vlc_dictionary_entry_t * p_entry = p_dict->p_entries[i_pos];
+
+ if( p_entry && !p_entry->p_next )
+ return p_entry->p_value;
+
+ if( !p_entry )
+ return kVLCDictionaryNotFound;
+
+ /* Hash collision */
+ do {
+ if( !strcmp( psz_key, p_entry->psz_key ) )
+ return p_entry->p_value;
+ p_entry = p_entry->p_next;
+ } while( p_entry );
+
+ return kVLCDictionaryNotFound;
+}
+
+static inline int
+vlc_dictionary_keys_count( const vlc_dictionary_t * p_dict )
+{
+ struct vlc_dictionary_entry_t * p_entry;
+ int i, count = 0;
+ for( i = 0; i < p_dict->i_size; i++ )
+ {
+ for( p_entry = p_dict->p_entries[i]; p_entry; p_entry = p_entry->p_next ) count++;
+ }
+ return count;
+}
+
+static inline char **
+vlc_dictionary_all_keys( const vlc_dictionary_t * p_dict )
+{
+ struct vlc_dictionary_entry_t * p_entry;
+ char ** ppsz_ret;
+ int i, count = vlc_dictionary_keys_count( p_dict );
+
+ ppsz_ret = (char**)malloc(sizeof(char *) * (count + 1));
+ assert( ppsz_ret );
+
+ count = 0;
+ for( i = 0; i < p_dict->i_size; i++ )
+ {
+ for( p_entry = p_dict->p_entries[i]; p_entry; p_entry = p_entry->p_next )
+ {
+ ppsz_ret[count++] = strdup( p_entry->psz_key );
+ assert( ppsz_ret );
+ }
+ }
+ ppsz_ret[count] = NULL;
+ return ppsz_ret;
+}
+
+static inline void
+__vlc_dictionary_insert( vlc_dictionary_t * p_dict, const char * psz_key,
+ void * p_value, vlc_bool_t rebuild )
+{
+ if( !p_dict->p_entries )
+ vlc_dictionary_init( p_dict, 1 );
+
+ int i_pos = DictHash( psz_key, p_dict->i_size );
+ struct vlc_dictionary_entry_t * p_entry = p_dict->p_entries[i_pos];
+
+ if( !p_entry )
+ {
+ p_entry = p_dict->p_entries[i_pos] = (struct vlc_dictionary_entry_t *)malloc(
+ sizeof(struct vlc_dictionary_entry_t));
+ assert( p_entry );
+
+ p_entry->psz_key = strdup( psz_key );
+ assert( p_entry->psz_key );
+ p_entry->p_value = p_value;
+ p_dict->p_entries[i_pos]->p_next = NULL;
+ return;
+ }
+ if( p_entry->p_value == kVLCDictionaryNotFound )
+ {
+ /* This one is fine, just high jack */
+ p_entry->psz_key = strdup( psz_key );
+ p_entry->p_value = p_value;
+ return;
+ }
+
+ /* Hash collision here */
+ p_entry = (struct vlc_dictionary_entry_t *)malloc(sizeof(struct vlc_dictionary_entry_t));
+ assert( p_entry );
+ p_entry->psz_key = strdup( psz_key );
+ p_entry->p_value = p_value;
+ p_entry->p_next = p_dict->p_entries[i_pos];
+ p_dict->p_entries[i_pos] = p_entry;
+
+ if( rebuild )
+ {
+ /* Count how many items there was */
+ int count;
+ for( count = 1; p_entry->p_next; count++ ) p_entry = p_entry->p_next;
+ if( count > 3 ) /* XXX: this need tuning */
+ {
+ /* Here it starts to be not good, rebuild a bigger dictionary */
+ struct vlc_dictionary_t new_dict;
+ int i_new_size = ( (p_dict->i_size+2) * 3) / 2; /* XXX: this need tuning */
+ int i;
+
+ vlc_dictionary_init( &new_dict, i_new_size );
+ for( i = 0; i < p_dict->i_size; i++ )
+ {
+ p_entry = p_dict->p_entries[i];
+ while( p_entry );
+ {
+ __vlc_dictionary_insert( &new_dict, p_entry->psz_key,
+ p_entry->p_value,
+ 0 /* To avoid multiple rebuild loop */);
+ p_entry = p_entry->p_next;
+ }
+ }
+ vlc_dictionary_clear( p_dict );
+ p_dict->i_size = new_dict.i_size;
+ p_dict->p_entries= new_dict.p_entries;
+ }
+ }
+}
+
+static inline void
+vlc_dictionary_insert( vlc_dictionary_t * p_dict, const char * psz_key, void * p_value )
+{
+ __vlc_dictionary_insert( p_dict, psz_key, p_value, 1 );
+}
+
+static inline void
+vlc_dictionary_remove_value_for_key( const vlc_dictionary_t * p_dict, const char * psz_key )
+{
+ if( !p_dict->p_entries )
+ return;
+
+ int i_pos = DictHash( psz_key, p_dict->i_size );
+ struct vlc_dictionary_entry_t * p_entry = p_dict->p_entries[i_pos];
+ struct vlc_dictionary_entry_t * p_prev;
+
+ if( !p_entry )
+ return; /* Not found, nothing to do */
+
+ if( !p_entry->p_next )
+ {
+ free( p_entry->psz_key );
+ free( p_entry );
+ p_dict->p_entries[i_pos] = NULL;
+ return;
+ }
+
+ /* Hash collision */
+ p_prev = NULL;
+ do {
+ if( !strcmp( psz_key, p_entry->psz_key ) )
+ {
+ if( !p_prev )
+ p_dict->p_entries[i_pos] = p_entry->p_next;
+ else
+ p_prev->p_next = p_entry->p_next;
+ free( p_entry->psz_key );
+ free( p_entry );
+ return;
+ }
+ p_prev = p_entry;
+ p_entry = p_entry->p_next;
+ } while( p_entry );
+
+ /* No key was found */
+}
+
#endif
projects / vlc / blobdiff