Ruby  3.4.0dev (2023-12-25 revision f4d2fe5e0d22876a6df68b9b56fb00b25d7aa5d8)
st.h
1 /* This is a public domain general purpose hash table package
2  originally written by Peter Moore @ UCB.
3 
4  The hash table data structures were redesigned and the package was
5  rewritten by Vladimir Makarov <vmakarov@redhat.com>. */
6 
7 #ifndef RUBY_ST_H
8 #define RUBY_ST_H 1
9 
10 #if defined(__cplusplus)
11 extern "C" {
12 #if 0
13 } /* satisfy cc-mode */
14 #endif
15 #endif
16 
17 #include "ruby/defines.h"
18 
19 RUBY_SYMBOL_EXPORT_BEGIN
20 
21 #if SIZEOF_LONG == SIZEOF_VOIDP
22 typedef unsigned long st_data_t;
23 #elif SIZEOF_LONG_LONG == SIZEOF_VOIDP
24 typedef unsigned LONG_LONG st_data_t;
25 #else
26 # error ---->> st.c requires sizeof(void*) == sizeof(long) or sizeof(LONG_LONG) to be compiled. <<----
27 #endif
28 #define ST_DATA_T_DEFINED
29 
30 #ifndef CHAR_BIT
31 # ifdef HAVE_LIMITS_H
32 # include <limits.h>
33 # else
34 # define CHAR_BIT 8
35 # endif
36 #endif
37 #ifndef _
38 # define _(args) args
39 #endif
40 #ifndef ANYARGS
41 # ifdef __cplusplus
42 # define ANYARGS ...
43 # else
44 # define ANYARGS
45 # endif
46 #endif
47 
48 typedef struct st_table st_table;
49 
50 typedef st_data_t st_index_t;
51 
52 /* Maximal value of unsigned integer type st_index_t. */
53 #define MAX_ST_INDEX_VAL (~(st_index_t) 0)
54 
55 typedef int st_compare_func(st_data_t, st_data_t);
56 typedef st_index_t st_hash_func(st_data_t);
57 
58 typedef char st_check_for_sizeof_st_index_t[SIZEOF_VOIDP == (int)sizeof(st_index_t) ? 1 : -1];
59 #define SIZEOF_ST_INDEX_T SIZEOF_VOIDP
60 
61 struct st_hash_type {
62  int (*compare)(st_data_t, st_data_t); /* st_compare_func* */
63  st_index_t (*hash)(st_data_t); /* st_hash_func* */
64 };
65 
66 #define ST_INDEX_BITS (SIZEOF_ST_INDEX_T * CHAR_BIT)
67 
68 #if defined(HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR) && defined(HAVE_BUILTIN___BUILTIN_TYPES_COMPATIBLE_P)
69 # define ST_DATA_COMPATIBLE_P(type) \
70  __builtin_choose_expr(__builtin_types_compatible_p(type, st_data_t), 1, 0)
71 #else
72 # define ST_DATA_COMPATIBLE_P(type) 0
73 #endif
74 
75 typedef struct st_table_entry st_table_entry;
76 
77 struct st_table_entry; /* defined in st.c */
78 
79 struct st_table {
80  /* Cached features of the table -- see st.c for more details. */
81  unsigned char entry_power, bin_power, size_ind;
82  /* How many times the table was rebuilt. */
83  unsigned int rebuilds_num;
84  const struct st_hash_type *type;
85  /* Number of entries currently in the table. */
86  st_index_t num_entries;
87  /* Array of bins used for access by keys. */
88  st_index_t *bins;
89  /* Start and bound index of entries in array entries.
90  entries_starts and entries_bound are in interval
91  [0,allocated_entries]. */
92  st_index_t entries_start, entries_bound;
93  /* Array of size 2^entry_power. */
94  st_table_entry *entries;
95 };
96 
97 #define st_is_member(table,key) st_lookup((table),(key),(st_data_t *)0)
98 
99 enum st_retval {ST_CONTINUE, ST_STOP, ST_DELETE, ST_CHECK, ST_REPLACE};
100 
101 size_t rb_st_table_size(const struct st_table *tbl);
102 #define st_table_size rb_st_table_size
103 st_table *rb_st_init_table(const struct st_hash_type *);
104 #define st_init_table rb_st_init_table
105 st_table *rb_st_init_table_with_size(const struct st_hash_type *, st_index_t);
106 #define st_init_table_with_size rb_st_init_table_with_size
107 st_table *rb_st_init_existing_table_with_size(st_table *tab, const struct st_hash_type *type, st_index_t size);
108 #define st_init_existing_table_with_size rb_st_init_existing_table_with_size
109 st_table *rb_st_init_numtable(void);
110 #define st_init_numtable rb_st_init_numtable
111 st_table *rb_st_init_numtable_with_size(st_index_t);
112 #define st_init_numtable_with_size rb_st_init_numtable_with_size
113 st_table *rb_st_init_strtable(void);
114 #define st_init_strtable rb_st_init_strtable
115 st_table *rb_st_init_strtable_with_size(st_index_t);
116 #define st_init_strtable_with_size rb_st_init_strtable_with_size
117 st_table *rb_st_init_strcasetable(void);
118 #define st_init_strcasetable rb_st_init_strcasetable
119 st_table *rb_st_init_strcasetable_with_size(st_index_t);
120 #define st_init_strcasetable_with_size rb_st_init_strcasetable_with_size
121 int rb_st_delete(st_table *, st_data_t *, st_data_t *); /* returns 0:notfound 1:deleted */
122 #define st_delete rb_st_delete
123 int rb_st_delete_safe(st_table *, st_data_t *, st_data_t *, st_data_t);
124 #define st_delete_safe rb_st_delete_safe
125 int rb_st_shift(st_table *, st_data_t *, st_data_t *); /* returns 0:notfound 1:deleted */
126 #define st_shift rb_st_shift
127 int rb_st_insert(st_table *, st_data_t, st_data_t);
128 #define st_insert rb_st_insert
129 int rb_st_insert2(st_table *, st_data_t, st_data_t, st_data_t (*)(st_data_t));
130 #define st_insert2 rb_st_insert2
131 int rb_st_lookup(st_table *, st_data_t, st_data_t *);
132 #define st_lookup rb_st_lookup
133 int rb_st_get_key(st_table *, st_data_t, st_data_t *);
134 #define st_get_key rb_st_get_key
135 typedef int st_update_callback_func(st_data_t *key, st_data_t *value, st_data_t arg, int existing);
136 /* *key may be altered, but must equal to the old key, i.e., the
137  * results of hash() are same and compare() returns 0, otherwise the
138  * behavior is undefined */
139 int rb_st_update(st_table *table, st_data_t key, st_update_callback_func *func, st_data_t arg);
140 #define st_update rb_st_update
141 typedef int st_foreach_callback_func(st_data_t, st_data_t, st_data_t);
142 typedef int st_foreach_check_callback_func(st_data_t, st_data_t, st_data_t, int);
143 int rb_st_foreach_with_replace(st_table *tab, st_foreach_check_callback_func *func, st_update_callback_func *replace, st_data_t arg);
144 #define st_foreach_with_replace rb_st_foreach_with_replace
145 int rb_st_foreach(st_table *, st_foreach_callback_func *, st_data_t);
146 #define st_foreach rb_st_foreach
147 int rb_st_foreach_check(st_table *, st_foreach_check_callback_func *, st_data_t, st_data_t);
148 #define st_foreach_check rb_st_foreach_check
149 st_index_t rb_st_keys(st_table *table, st_data_t *keys, st_index_t size);
150 #define st_keys rb_st_keys
151 st_index_t rb_st_keys_check(st_table *table, st_data_t *keys, st_index_t size, st_data_t never);
152 #define st_keys_check rb_st_keys_check
153 st_index_t rb_st_values(st_table *table, st_data_t *values, st_index_t size);
154 #define st_values rb_st_values
155 st_index_t rb_st_values_check(st_table *table, st_data_t *values, st_index_t size, st_data_t never);
156 #define st_values_check rb_st_values_check
157 void rb_st_add_direct(st_table *, st_data_t, st_data_t);
158 #define st_add_direct rb_st_add_direct
159 void rb_st_free_table(st_table *);
160 #define st_free_table rb_st_free_table
161 void rb_st_cleanup_safe(st_table *, st_data_t);
162 #define st_cleanup_safe rb_st_cleanup_safe
163 void rb_st_clear(st_table *);
164 #define st_clear rb_st_clear
165 st_table *rb_st_replace(st_table *new_tab, st_table *old_tab);
166 #define st_replace rb_st_replace
167 st_table *rb_st_copy(st_table *);
168 #define st_copy rb_st_copy
169 CONSTFUNC(int rb_st_numcmp(st_data_t, st_data_t));
170 #define st_numcmp rb_st_numcmp
171 CONSTFUNC(st_index_t rb_st_numhash(st_data_t));
172 #define st_numhash rb_st_numhash
173 PUREFUNC(int rb_st_locale_insensitive_strcasecmp(const char *s1, const char *s2));
174 #define st_locale_insensitive_strcasecmp rb_st_locale_insensitive_strcasecmp
175 PUREFUNC(int rb_st_locale_insensitive_strncasecmp(const char *s1, const char *s2, size_t n));
176 #define st_locale_insensitive_strncasecmp rb_st_locale_insensitive_strncasecmp
177 #define st_strcasecmp rb_st_locale_insensitive_strcasecmp
178 #define st_strncasecmp rb_st_locale_insensitive_strncasecmp
179 PUREFUNC(size_t rb_st_memsize(const st_table *));
180 #define st_memsize rb_st_memsize
181 PUREFUNC(st_index_t rb_st_hash(const void *ptr, size_t len, st_index_t h));
182 #define st_hash rb_st_hash
183 CONSTFUNC(st_index_t rb_st_hash_uint32(st_index_t h, uint32_t i));
184 #define st_hash_uint32 rb_st_hash_uint32
185 CONSTFUNC(st_index_t rb_st_hash_uint(st_index_t h, st_index_t i));
186 #define st_hash_uint rb_st_hash_uint
187 CONSTFUNC(st_index_t rb_st_hash_end(st_index_t h));
188 #define st_hash_end rb_st_hash_end
189 CONSTFUNC(st_index_t rb_st_hash_start(st_index_t h));
190 #define st_hash_start(h) ((st_index_t)(h))
191 
192 void rb_hash_bulk_insert_into_st_table(long, const VALUE *, VALUE);
193 
194 RUBY_SYMBOL_EXPORT_END
195 
196 #if defined(__cplusplus)
197 #if 0
198 { /* satisfy cc-mode */
199 #endif
200 } /* extern "C" { */
201 #endif
202 
203 #endif /* RUBY_ST_H */
#define LONG_LONG
Definition: long_long.h:38
char * ptr
Pointer to the underlying memory region, of at least capa bytes.
Definition: io.h:2
int len
Length of the buffer.
Definition: io.h:8
VALUE type(ANYARGS)
ANYARGS-ed function type.
Definition: cxxanyargs.hpp:56
Definition: st.c:133
Definition: st.h:79
uintptr_t VALUE
Type that represents a Ruby object.
Definition: value.h:40