| 1 | /* An expandable hash tables datatype. | 
 
 
 
 
 | 2 | Copyright (C) 1999-2021 Free Software Foundation, Inc. | 
 
 
 
 
 | 3 | Contributed by Vladimir Makarov (vmakarov@cygnus.com). | 
 
 
 
 
 | 4 |  | 
 
 
 
 
 | 5 | This program is free software; you can redistribute it and/or modify | 
 
 
 
 
 | 6 | it under the terms of the GNU General Public License as published by | 
 
 
 
 
 | 7 | the Free Software Foundation; either version 2 of the License, or | 
 
 
 
 
 | 8 | (at your option) any later version. | 
 
 
 
 
 | 9 |  | 
 
 
 
 
 | 10 | This program is distributed in the hope that it will be useful, | 
 
 
 
 
 | 11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 
 
 
 
 
 | 12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
 
 
 
 
 | 13 | GNU General Public License for more details. | 
 
 
 
 
 | 14 |  | 
 
 
 
 
 | 15 | You should have received a copy of the GNU General Public License | 
 
 
 
 
 | 16 | along with this program; if not, write to the Free Software | 
 
 
 
 
 | 17 | Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */ | 
 
 
 
 
 | 18 |  | 
 
 
 
 
 | 19 | /* This package implements basic hash table functionality.  It is possible | 
 
 
 
 
 | 20 | to search for an entry, create an entry and destroy an entry. | 
 
 
 
 
 | 21 |  | 
 
 
 
 
 | 22 | Elements in the table are generic pointers. | 
 
 
 
 
 | 23 |  | 
 
 
 
 
 | 24 | The size of the table is not fixed; if the occupancy of the table | 
 
 
 
 
 | 25 | grows too high the hash table will be expanded. | 
 
 
 
 
 | 26 |  | 
 
 
 
 
 | 27 | The abstract data implementation is based on generalized Algorithm D | 
 
 
 
 
 | 28 | from Knuth's book "The art of computer programming".  Hash table is | 
 
 
 
 
 | 29 | expanded by creation of new hash table and transferring elements from | 
 
 
 
 
 | 30 | the old table to the new table.  */ | 
 
 
 
 
 | 31 |  | 
 
 
 
 
 | 32 | #ifndef __HASHTAB_H__ | 
 
 
 
 
 | 33 | #define __HASHTAB_H__ | 
 
 
 
 
 | 34 |  | 
 
 
 
 
 | 35 | #ifdef __cplusplus | 
 
 
 
 
 | 36 | extern "C" { | 
 
 
 
 
 | 37 | #endif /* __cplusplus */ | 
 
 
 
 
 | 38 |  | 
 
 
 
 
 | 39 | #include "ansidecl.h" | 
 
 
 
 
 | 40 |  | 
 
 
 
 
 | 41 | /* The type for a hash code.  */ | 
 
 
 
 
 | 42 | typedef unsigned int hashval_t; | 
 
 
 
 
 | 43 |  | 
 
 
 
 
 | 44 | /* Callback function pointer types.  */ | 
 
 
 
 
 | 45 |  | 
 
 
 
 
 | 46 | /* Calculate hash of a table entry.  */ | 
 
 
 
 
 | 47 | typedef hashval_t (*htab_hash) (const void *); | 
 
 
 
 
 | 48 |  | 
 
 
 
 
 | 49 | /* Compare a table entry with a possible entry.  The entry already in | 
 
 
 
 
 | 50 | the table always comes first, so the second element can be of a | 
 
 
 
 
 | 51 | different type (but in this case htab_find and htab_find_slot | 
 
 
 
 
 | 52 | cannot be used; instead the variants that accept a hash value | 
 
 
 
 
 | 53 | must be used).  */ | 
 
 
 
 
 | 54 | typedef int (*htab_eq) (const void *, const void *); | 
 
 
 
 
 | 55 |  | 
 
 
 
 
 | 56 | /* Cleanup function called whenever a live element is removed from | 
 
 
 
 
 | 57 | the hash table.  */ | 
 
 
 
 
 | 58 | typedef void (*htab_del) (void *); | 
 
 
 
 
 | 59 |  | 
 
 
 
 
 | 60 | /* Function called by htab_traverse for each live element.  The first | 
 
 
 
 
 | 61 | arg is the slot of the element (which can be passed to htab_clear_slot | 
 
 
 
 
 | 62 | if desired), the second arg is the auxiliary pointer handed to | 
 
 
 
 
 | 63 | htab_traverse.  Return 1 to continue scan, 0 to stop.  */ | 
 
 
 
 
 | 64 | typedef int (*htab_trav) (void **, void *); | 
 
 
 
 
 | 65 |  | 
 
 
 
 
 | 66 | /* Memory-allocation function, with the same functionality as calloc(). | 
 
 
 
 
 | 67 | Iff it returns NULL, the hash table implementation will pass an error | 
 
 
 
 
 | 68 | code back to the user, so if your code doesn't handle errors, | 
 
 
 
 
 | 69 | best if you use xcalloc instead.  */ | 
 
 
 
 
 | 70 | typedef void *(*htab_alloc) (size_t, size_t); | 
 
 
 
 
 | 71 |  | 
 
 
 
 
 | 72 | /* We also need a free() routine.  */ | 
 
 
 
 
 | 73 | typedef void (*htab_free) (void *); | 
 
 
 
 
 | 74 |  | 
 
 
 
 
 | 75 | /* Memory allocation and deallocation; variants which take an extra | 
 
 
 
 
 | 76 | argument.  */ | 
 
 
 
 
 | 77 | typedef void *(*htab_alloc_with_arg) (void *, size_t, size_t); | 
 
 
 
 
 | 78 | typedef void (*htab_free_with_arg) (void *, void *); | 
 
 
 
 
 | 79 |  | 
 
 
 
 
 | 80 | /* This macro defines reserved value for empty table entry.  */ | 
 
 
 
 
 | 81 |  | 
 
 
 
 
 | 82 | #define HTAB_EMPTY_ENTRY    ((PTR) 0) | 
 
 
 
 
 | 83 |  | 
 
 
 
 
 | 84 | /* This macro defines reserved value for table entry which contained | 
 
 
 
 
 | 85 | a deleted element. */ | 
 
 
 
 
 | 86 |  | 
 
 
 
 
 | 87 | #define HTAB_DELETED_ENTRY  ((PTR) 1) | 
 
 
 
 
 | 88 |  | 
 
 
 
 
 | 89 | /* Hash tables are of the following type.  The structure | 
 
 
 
 
 | 90 | (implementation) of this type is not needed for using the hash | 
 
 
 
 
 | 91 | tables.  All work with hash table should be executed only through | 
 
 
 
 
 | 92 | functions mentioned below.  The size of this structure is subject to | 
 
 
 
 
 | 93 | change.  */ | 
 
 
 
 
 | 94 |  | 
 
 
 
 
 | 95 | struct htab { | 
 
 
 
 
 | 96 | /* Pointer to hash function.  */ | 
 
 
 
 
 | 97 | htab_hash hash_f; | 
 
 
 
 
 | 98 |  | 
 
 
 
 
 | 99 | /* Pointer to comparison function.  */ | 
 
 
 
 
 | 100 | htab_eq eq_f; | 
 
 
 
 
 | 101 |  | 
 
 
 
 
 | 102 | /* Pointer to cleanup function.  */ | 
 
 
 
 
 | 103 | htab_del del_f; | 
 
 
 
 
 | 104 |  | 
 
 
 
 
 | 105 | /* Table itself.  */ | 
 
 
 
 
 | 106 | void **entries; | 
 
 
 
 
 | 107 |  | 
 
 
 
 
 | 108 | /* Current size (in entries) of the hash table.  */ | 
 
 
 
 
 | 109 | size_t size; | 
 
 
 
 
 | 110 |  | 
 
 
 
 
 | 111 | /* Current number of elements including also deleted elements.  */ | 
 
 
 
 
 | 112 | size_t n_elements; | 
 
 
 
 
 | 113 |  | 
 
 
 
 
 | 114 | /* Current number of deleted elements in the table.  */ | 
 
 
 
 
 | 115 | size_t n_deleted; | 
 
 
 
 
 | 116 |  | 
 
 
 
 
 | 117 | /* The following member is used for debugging. Its value is number | 
 
 
 
 
 | 118 | of all calls of `htab_find_slot' for the hash table. */ | 
 
 
 
 
 | 119 | unsigned int searches; | 
 
 
 
 
 | 120 |  | 
 
 
 
 
 | 121 | /* The following member is used for debugging.  Its value is number | 
 
 
 
 
 | 122 | of collisions fixed for time of work with the hash table. */ | 
 
 
 
 
 | 123 | unsigned int collisions; | 
 
 
 
 
 | 124 |  | 
 
 
 
 
 | 125 | /* Pointers to allocate/free functions.  */ | 
 
 
 
 
 | 126 | htab_alloc alloc_f; | 
 
 
 
 
 | 127 | htab_free free_f; | 
 
 
 
 
 | 128 |  | 
 
 
 
 
 | 129 | /* Alternate allocate/free functions, which take an extra argument.  */ | 
 
 
 
 
 | 130 | void *alloc_arg; | 
 
 
 
 
 | 131 | htab_alloc_with_arg alloc_with_arg_f; | 
 
 
 
 
 | 132 | htab_free_with_arg free_with_arg_f; | 
 
 
 
 
 | 133 |  | 
 
 
 
 
 | 134 | /* Current size (in entries) of the hash table, as an index into the | 
 
 
 
 
 | 135 | table of primes.  */ | 
 
 
 
 
 | 136 | unsigned int size_prime_index; | 
 
 
 
 
 | 137 | }; | 
 
 
 
 
 | 138 |  | 
 
 
 
 
 | 139 | typedef struct htab *htab_t; | 
 
 
 
 
 | 140 |  | 
 
 
 
 
 | 141 | /* An enum saying whether we insert into the hash table or not.  */ | 
 
 
 
 
 | 142 | enum insert_option {NO_INSERT, INSERT}; | 
 
 
 
 
 | 143 |  | 
 
 
 
 
 | 144 | /* The prototypes of the package functions. */ | 
 
 
 
 
 | 145 |  | 
 
 
 
 
 | 146 | extern htab_t   htab_create_alloc  (size_t, htab_hash, | 
 
 
 
 
 | 147 | htab_eq, htab_del, | 
 
 
 
 
 | 148 | htab_alloc, htab_free); | 
 
 
 
 
 | 149 |  | 
 
 
 
 
 | 150 | extern htab_t   htab_create_alloc_ex (size_t, htab_hash, | 
 
 
 
 
 | 151 | htab_eq, htab_del, | 
 
 
 
 
 | 152 | void *, htab_alloc_with_arg, | 
 
 
 
 
 | 153 | htab_free_with_arg); | 
 
 
 
 
 | 154 |  | 
 
 
 
 
 | 155 | extern htab_t  htab_create_typed_alloc (size_t, htab_hash, htab_eq, htab_del, | 
 
 
 
 
 | 156 | htab_alloc, htab_alloc, htab_free); | 
 
 
 
 
 | 157 |  | 
 
 
 
 
 | 158 | /* Backward-compatibility functions.  */ | 
 
 
 
 
 | 159 | extern htab_t htab_create (size_t, htab_hash, htab_eq, htab_del); | 
 
 
 
 
 | 160 | extern htab_t htab_try_create (size_t, htab_hash, htab_eq, htab_del); | 
 
 
 
 
 | 161 |  | 
 
 
 
 
 | 162 | extern void     htab_set_functions_ex (htab_t, htab_hash, | 
 
 
 
 
 | 163 | htab_eq, htab_del, | 
 
 
 
 
 | 164 | void *, htab_alloc_with_arg, | 
 
 
 
 
 | 165 | htab_free_with_arg); | 
 
 
 
 
 | 166 |  | 
 
 
 
 
 | 167 | extern void     htab_delete (htab_t); | 
 
 
 
 
 | 168 | extern void     htab_empty (htab_t); | 
 
 
 
 
 | 169 |  | 
 
 
 
 
 | 170 | extern void *   htab_find (htab_t, const void *); | 
 
 
 
 
 | 171 | extern void **  htab_find_slot (htab_t, const void *, enum insert_option); | 
 
 
 
 
 | 172 | extern void *   htab_find_with_hash (htab_t, const void *, hashval_t); | 
 
 
 
 
 | 173 | extern void **  htab_find_slot_with_hash (htab_t, const void *, | 
 
 
 
 
 | 174 | hashval_t, enum insert_option); | 
 
 
 
 
 | 175 | extern void     htab_clear_slot (htab_t, void **); | 
 
 
 
 
 | 176 | extern void     htab_remove_elt (htab_t, const void *); | 
 
 
 
 
 | 177 | extern void     htab_remove_elt_with_hash (htab_t, const void *, hashval_t); | 
 
 
 
 
 | 178 |  | 
 
 
 
 
 | 179 | extern void     htab_traverse (htab_t, htab_trav, void *); | 
 
 
 
 
 | 180 | extern void     htab_traverse_noresize (htab_t, htab_trav, void *); | 
 
 
 
 
 | 181 |  | 
 
 
 
 
 | 182 | extern size_t   htab_size (htab_t); | 
 
 
 
 
 | 183 | extern size_t   htab_elements (htab_t); | 
 
 
 
 
 | 184 | extern double   htab_collisions (htab_t); | 
 
 
 
 
 | 185 |  | 
 
 
 
 
 | 186 | /* A hash function for pointers.  */ | 
 
 
 
 
 | 187 | extern htab_hash htab_hash_pointer; | 
 
 
 
 
 | 188 |  | 
 
 
 
 
 | 189 | /* An equality function for pointers.  */ | 
 
 
 
 
 | 190 | extern htab_eq htab_eq_pointer; | 
 
 
 
 
 | 191 |  | 
 
 
 
 
 | 192 | /* A hash function for null-terminated strings.  */ | 
 
 
 
 
 | 193 | extern hashval_t htab_hash_string (const void *); | 
 
 
 
 
 | 194 |  | 
 
 
 
 
 | 195 | /* An equality function for null-terminated strings.  */ | 
 
 
 
 
 | 196 | extern int htab_eq_string (const void *, const void *); | 
 
 
 
 
 | 197 |  | 
 
 
 
 
 | 198 | /* An iterative hash function for arbitrary data.  */ | 
 
 
 
 
 | 199 | extern hashval_t iterative_hash (const void *, size_t, hashval_t); | 
 
 
 
 
 | 200 | /* Shorthand for hashing something with an intrinsic size.  */ | 
 
 
 
 
 | 201 | #define iterative_hash_object(OB,INIT) iterative_hash (&OB, sizeof (OB), INIT) | 
 
 
 
 
 | 202 |  | 
 
 
 
 
 | 203 | #ifdef __cplusplus | 
 
 
 
 
 | 204 | } | 
 
 
 
 
 | 205 | #endif /* __cplusplus */ | 
 
 
 
 
 | 206 |  | 
 
 
 
 
 | 207 | #endif /* __HASHTAB_H */ |