Ruby  1.9.3p484(2013-11-22revision43786)
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) 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  struct st_table_entry **bins;
96 };
97 
98 #define st_is_member(table,key) st_lookup((table),(key),(st_data_t *)0)
99 
101 
102 st_table *st_init_table(const struct st_hash_type *);
110 int st_delete(st_table *, st_data_t *, st_data_t *); /* returns 0:notfound 1:deleted */
112 int st_shift(st_table *, st_data_t *, st_data_t *); /* returns 0:notfound 1:deleted */
117 int st_foreach(st_table *, int (*)(ANYARGS), st_data_t);
118 int st_reverse_foreach(st_table *, int (*)(ANYARGS), st_data_t);
120 void st_free_table(st_table *);
122 void st_clear(st_table *);
126 int st_strcasecmp(const char *s1, const char *s2);
127 int st_strncasecmp(const char *s1, const char *s2, size_t n);
128 size_t st_memsize(const st_table *);
129 st_index_t st_hash(const void *ptr, size_t len, st_index_t h);
134 #define st_hash_start(h) ((st_index_t)(h))
135 
136 #if defined __GNUC__ && __GNUC__ >= 4
137 #pragma GCC visibility pop
138 #endif
139 
140 #if defined(__cplusplus)
141 #if 0
142 { /* satisfy cc-mode */
143 #endif
144 } /* extern "C" { */
145 #endif
146 
147 #endif /* RUBY_ST_H */
148