Ruby  2.0.0p598(2014-11-13revision48408)
st.h
Go to the documentation of this file.
1 /* This is a public domain general purpose hash table package written by Peter Moore @ UCB. */
2 
3 /* @(#) st.h 5.1 89/12/14 */
4 
5 #ifndef RUBY_ST_H
6 #define RUBY_ST_H 1
7 
8 #if defined(__cplusplus)
9 extern "C" {
10 #if 0
11 } /* satisfy cc-mode */
12 #endif
13 #endif
14 
15 #include "ruby/defines.h"
16 
17 #if defined STDC_HEADERS
18 #include <stddef.h>
19 #elif defined HAVE_STDLIB_H
20 #include <stdlib.h>
21 #endif
22 
23 #ifdef HAVE_STDINT_H
24 # include <stdint.h>
25 #endif
26 #ifdef HAVE_INTTYPES_H
27 # include <inttypes.h>
28 #endif
29 
30 #if defined __GNUC__ && __GNUC__ >= 4
31 #pragma GCC visibility push(default)
32 #endif
33 
34 #if SIZEOF_LONG == SIZEOF_VOIDP
35 typedef unsigned long st_data_t;
36 #elif SIZEOF_LONG_LONG == SIZEOF_VOIDP
37 typedef unsigned LONG_LONG st_data_t;
38 #else
39 # error ---->> st.c requires sizeof(void*) == sizeof(long) or sizeof(LONG_LONG) to be compiled. <<----
40 #endif
41 #define ST_DATA_T_DEFINED
42 
43 #ifndef CHAR_BIT
44 # ifdef HAVE_LIMITS_H
45 # include <limits.h>
46 # else
47 # define CHAR_BIT 8
48 # endif
49 #endif
50 #ifndef _
51 # define _(args) args
52 #endif
53 #ifndef ANYARGS
54 # ifdef __cplusplus
55 # define ANYARGS ...
56 # else
57 # define ANYARGS
58 # endif
59 #endif
60 
61 typedef struct st_table st_table;
62 
66 
67 typedef char st_check_for_sizeof_st_index_t[SIZEOF_VOIDP == (int)sizeof(st_index_t) ? 1 : -1];
68 #define SIZEOF_ST_INDEX_T SIZEOF_VOIDP
69 
70 struct st_hash_type {
71  int (*compare)(ANYARGS /*st_data_t, st_data_t*/); /* st_compare_func* */
72  st_index_t (*hash)(ANYARGS /*st_data_t*/); /* st_hash_func* */
73 };
74 
75 #define ST_INDEX_BITS (sizeof(st_index_t) * CHAR_BIT)
76 
77 struct st_table {
78  const struct st_hash_type *type;
80  unsigned int entries_packed : 1;
81 #ifdef __GNUC__
82  /*
83  * C spec says,
84  * A bit-field shall have a type that is a qualified or unqualified
85  * version of _Bool, signed int, unsigned int, or some other
86  * implementation-defined type. It is implementation-defined whether
87  * atomic types are permitted.
88  * In short, long and long long bit-field are implementation-defined
89  * feature. Therefore we want to supress a warning explicitly.
90  */
91  __extension__
92 #endif
94  union {
95  struct {
96  struct st_table_entry **bins;
97  struct st_table_entry *head, *tail;
98  } big;
99  struct {
100  struct st_packed_entry *entries;
102  } packed;
103  } as;
104 };
105 
106 #define st_is_member(table,key) st_lookup((table),(key),(st_data_t *)0)
107 
109 
110 st_table *st_init_table(const struct st_hash_type *);
118 int st_delete(st_table *, st_data_t *, st_data_t *); /* returns 0:notfound 1:deleted */
126 int st_foreach(st_table *, int (*)(ANYARGS), st_data_t);
128 int st_reverse_foreach(st_table *, int (*)(ANYARGS), st_data_t);
130 void st_free_table(st_table *);
132 void st_clear(st_table *);
136 int st_strcasecmp(const char *s1, const char *s2);
137 int st_strncasecmp(const char *s1, const char *s2, size_t n);
138 size_t st_memsize(const st_table *);
139 st_index_t st_hash(const void *ptr, size_t len, st_index_t h);
144 #define st_hash_start(h) ((st_index_t)(h))
145 
146 #if defined __GNUC__ && __GNUC__ >= 4
147 #pragma GCC visibility pop
148 #endif
149 
150 #if defined(__cplusplus)
151 #if 0
152 { /* satisfy cc-mode */
153 #endif
154 } /* extern "C" { */
155 #endif
156 
157 #endif /* RUBY_ST_H */
ssize_t n
Definition: bigdecimal.c:5676
VP_EXPORT int
Definition: bigdecimal.c:5071
st_table * st_init_table_with_size(const struct st_hash_type *, st_index_t)
Definition: st.c:229
#define st_hash_start(h)
int st_lookup(st_table *, st_data_t, st_data_t *)
void st_add_direct(st_table *, st_data_t, st_data_t)
Definition: st.c:629
st_table * st_init_numtable(void)
Definition: st.c:272
static int VALUE table
Definition: tcltklib.c:10137
SSL_METHOD *(* func)(void)
Definition: ossl_ssl.c:108
ssize_t i
Definition: bigdecimal.c:5676
st_index_t num_bins
Definition: ripper.y:79
struct st_packed_entry * entries
Definition: ripper.y:100
int st_update_callback_func(st_data_t *key, st_data_t *value, st_data_t arg, int existing)
Definition: ripper.y:124
int(* compare)(ANYARGS)
Definition: ripper.y:71
st_table * st_init_strcasetable(void)
Definition: st.c:296
int st_numcmp(st_data_t, st_data_t)
Definition: st.c:1575
int st_insert2(st_table *, st_data_t, st_data_t, st_data_t(*)(st_data_t))
struct st_hash_type * type
Definition: ripper.y:78
char st_check_for_sizeof_st_index_t[SIZEOF_VOIDP==(int) sizeof(st_index_t)?1:-1]
Definition: ripper.y:67
size_t st_memsize(const st_table *)
Definition: st.c:342
st_table * st_init_strtable(void)
Definition: st.c:284
struct st_table::@74::@75 big
#define ST_INDEX_BITS
Definition: st.h:75
st_index_t st_hash(const void *ptr, size_t len, st_index_t h)
Definition: st.c:1319
st_retval
Definition: ripper.y:108
unsigned int entries_packed
Definition: ripper.y:80
int st_strcasecmp(const char *s1, const char *s2)
Definition: st.c:1506
int st_update(st_table *table, st_data_t key, st_update_callback_func *func, st_data_t arg)
Definition: st.c:839
unsigned long st_data_t
Definition: ripper.y:35
int st_delete(st_table *, st_data_t *, st_data_t *)
st_index_t st_hash_func(st_data_t)
Definition: ripper.y:65
Definition: st.c:20
st_index_t st_numhash(st_data_t)
Definition: st.c:1581
int st_strncasecmp(const char *s1, const char *s2, size_t n)
Definition: st.c:1530
#define ANYARGS
struct st_table_entry * head
Definition: ripper.y:97
union st_table::@74 as
static int VALUE key
Definition: tkutil.c:265
int st_foreach(st_table *, int(*)(ANYARGS), st_data_t)
Definition: st.c:1006
volatile VALUE value
Definition: tcltklib.c:9441
st_index_t st_hash_uint(st_index_t h, st_index_t i)
Definition: st.c:1452
Definition: st.c:28
int st_get_key(st_table *, st_data_t, st_data_t *)
int st_compare_func(st_data_t, st_data_t)
Definition: ripper.y:64
st_table * st_init_strcasetable_with_size(st_index_t)
Definition: st.c:302
struct st_table_entry ** bins
Definition: ripper.y:96
return ptr
Definition: tcltklib.c:784
int st_reverse_foreach(st_table *, int(*)(ANYARGS), st_data_t)
unsigned int uint32_t
Definition: sha2.h:101
arg
Definition: ripper.y:1317
st_data_t st_index_t
Definition: ripper.y:63
st_index_t real_entries
Definition: ripper.y:101
int st_insert(st_table *, st_data_t, st_data_t)
int st_foreach_check(st_table *, int(*)(ANYARGS), st_data_t, st_data_t)
Definition: st.c:914
void st_clear(st_table *)
Definition: st.c:308
st_index_t(* hash)(ANYARGS)
Definition: ripper.y:72
st_table * st_init_table(const struct st_hash_type *)
Definition: st.c:266
st_index_t st_hash_uint32(st_index_t h, uint32_t i)
Definition: st.c:1446
st_table * st_copy(st_table *)
Definition: st.c:663
st_table * st_init_strtable_with_size(st_index_t)
Definition: st.c:290
st_table * st_init_numtable_with_size(st_index_t)
Definition: st.c:278
int st_delete_safe(st_table *, st_data_t *, st_data_t *, st_data_t)
st_index_t st_hash_end(st_index_t h)
Definition: st.c:1483
void st_cleanup_safe(st_table *, st_data_t)
Definition: st.c:802
struct st_table_entry * tail
Definition: ripper.y:97
st_index_t num_entries
Definition: ripper.y:93
struct st_table::@74::@76 packed
void st_free_table(st_table *)
Definition: st.c:334
size_t len
Definition: tcltklib.c:3567