24 #ifndef _DTLS_UTHASH_H 
   25 #define _DTLS_UTHASH_H  
   35 #if _MSC_VER >= 1600 && defined(__cplusplus)   
   36 #define DECLTYPE(x) (decltype(x)) 
   42 #define DECLTYPE(x) (__typeof(x)) 
   46 #define DECLTYPE_ASSIGN(dst,src)                                                 \ 
   48   char **_da_dst = (char**)(&(dst));                                             \ 
   49   *_da_dst = (char*)(src);                                                       \ 
   52 #define DECLTYPE_ASSIGN(dst,src)                                                 \ 
   54   (dst) = DECLTYPE(dst)(src);                                                    \ 
   60 typedef unsigned int uint32_t;
 
   65 #define UTHASH_VERSION 1.9.3 
   67 #define uthash_fatal(msg) exit(-1)         
   68 #define uthash_malloc(sz) malloc(sz)       
   69 #define uthash_free(ptr,sz) free(ptr)      
   71 #define uthash_noexpand_fyi(tbl)           
   72 #define uthash_expand_fyi(tbl)             
   75 #define HASH_INITIAL_NUM_BUCKETS 32       
   76 #define HASH_INITIAL_NUM_BUCKETS_LOG2 5   
   77 #define HASH_BKT_CAPACITY_THRESH 10       
   80 #define ELMT_FROM_HH(tbl,hhp) ((void*)(((char*)(hhp)) - ((tbl)->hho))) 
   82 #define HASH_FIND(hh,head,keyptr,keylen,out)                                     \ 
   84   unsigned _hf_bkt,_hf_hashv;                                                    \ 
   87      HASH_FCN(keyptr,keylen, (head)->hh.tbl->num_buckets, _hf_hashv, _hf_bkt);   \ 
   88      if (HASH_BLOOM_TEST((head)->hh.tbl, _hf_hashv)) {                           \ 
   89        HASH_FIND_IN_BKT((head)->hh.tbl, hh, (head)->hh.tbl->buckets[ _hf_bkt ],  \ 
   96 #define HASH_BLOOM_BITLEN (1ULL << HASH_BLOOM) 
   97 #define HASH_BLOOM_BYTELEN (HASH_BLOOM_BITLEN/8) + ((HASH_BLOOM_BITLEN%8) ? 1:0) 
   98 #define HASH_BLOOM_MAKE(tbl)                                                     \ 
  100   (tbl)->bloom_nbits = HASH_BLOOM;                                               \ 
  101   (tbl)->bloom_bv = (uint8_t*)uthash_malloc(HASH_BLOOM_BYTELEN);                 \ 
  102   if (!((tbl)->bloom_bv))  { uthash_fatal( "out of memory"); }                   \ 
  103   memset((tbl)->bloom_bv, 0, HASH_BLOOM_BYTELEN);                                \ 
  104   (tbl)->bloom_sig = HASH_BLOOM_SIGNATURE;                                       \ 
  107 #define HASH_BLOOM_FREE(tbl)                                                     \ 
  109   uthash_free((tbl)->bloom_bv, HASH_BLOOM_BYTELEN);                              \ 
  112 #define HASH_BLOOM_BITSET(bv,idx) (bv[(idx)/8] |= (1U << ((idx)%8))) 
  113 #define HASH_BLOOM_BITTEST(bv,idx) (bv[(idx)/8] & (1U << ((idx)%8))) 
  115 #define HASH_BLOOM_ADD(tbl,hashv)                                                \ 
  116   HASH_BLOOM_BITSET((tbl)->bloom_bv, (hashv & (uint32_t)((1ULL << (tbl)->bloom_nbits) - 1))) 
  118 #define HASH_BLOOM_TEST(tbl,hashv)                                               \ 
  119   HASH_BLOOM_BITTEST((tbl)->bloom_bv, (hashv & (uint32_t)((1ULL << (tbl)->bloom_nbits) - 1))) 
  122 #define HASH_BLOOM_MAKE(tbl)  
  123 #define HASH_BLOOM_FREE(tbl)  
  124 #define HASH_BLOOM_ADD(tbl,hashv)  
  125 #define HASH_BLOOM_TEST(tbl,hashv) (1) 
  128 #define HASH_MAKE_TABLE(hh,head)                                                 \ 
  130   (head)->hh.tbl = (UT_hash_table*)uthash_malloc(                                \ 
  131                   sizeof(UT_hash_table));                                        \ 
  132   if (!((head)->hh.tbl))  { uthash_fatal( "out of memory"); }                    \ 
  133   memset((head)->hh.tbl, 0, sizeof(UT_hash_table));                              \ 
  134   (head)->hh.tbl->tail = &((head)->hh);                                          \ 
  135   (head)->hh.tbl->num_buckets = HASH_INITIAL_NUM_BUCKETS;                        \ 
  136   (head)->hh.tbl->log2_num_buckets = HASH_INITIAL_NUM_BUCKETS_LOG2;              \ 
  137   (head)->hh.tbl->hho = (char*)(&(head)->hh) - (char*)(head);                    \ 
  138   (head)->hh.tbl->buckets = (UT_hash_bucket*)uthash_malloc(                      \ 
  139           HASH_INITIAL_NUM_BUCKETS*sizeof(struct UT_hash_bucket));               \ 
  140   if (! (head)->hh.tbl->buckets) { uthash_fatal( "out of memory"); }             \ 
  141   memset((head)->hh.tbl->buckets, 0,                                             \ 
  142           HASH_INITIAL_NUM_BUCKETS*sizeof(struct UT_hash_bucket));               \ 
  143   HASH_BLOOM_MAKE((head)->hh.tbl);                                               \ 
  144   (head)->hh.tbl->signature = HASH_SIGNATURE;                                    \ 
  147 #define HASH_ADD(hh,head,fieldname,keylen_in,add)                                \ 
  148         HASH_ADD_KEYPTR(hh,head,&add->fieldname,keylen_in,add) 
  150 #define HASH_ADD_KEYPTR(hh,head,keyptr,keylen_in,add)                            \ 
  153  (add)->hh.next = NULL;                                                          \ 
  154  (add)->hh.key = (char*)keyptr;                                                  \ 
  155  (add)->hh.keylen = keylen_in;                                                   \ 
  158     (head)->hh.prev = NULL;                                                      \ 
  159     HASH_MAKE_TABLE(hh,head);                                                    \ 
  161     (head)->hh.tbl->tail->next = (add);                                          \ 
  162     (add)->hh.prev = ELMT_FROM_HH((head)->hh.tbl, (head)->hh.tbl->tail);         \ 
  163     (head)->hh.tbl->tail = &((add)->hh);                                         \ 
  165  (head)->hh.tbl->num_items++;                                                    \ 
  166  (add)->hh.tbl = (head)->hh.tbl;                                                 \ 
  167  HASH_FCN(keyptr,keylen_in, (head)->hh.tbl->num_buckets,                         \ 
  168          (add)->hh.hashv, _ha_bkt);                                              \ 
  169  HASH_ADD_TO_BKT((head)->hh.tbl->buckets[_ha_bkt],&(add)->hh);                   \ 
  170  HASH_BLOOM_ADD((head)->hh.tbl,(add)->hh.hashv);                                 \ 
  171  HASH_EMIT_KEY(hh,head,keyptr,keylen_in);                                        \ 
  172  HASH_FSCK(hh,head);                                                             \ 
  175 #define HASH_TO_BKT( hashv, num_bkts, bkt )                                      \ 
  177   bkt = ((hashv) & ((num_bkts) - 1));                                            \ 
  192 #define HASH_DELETE(hh,head,delptr)                                              \ 
  195     struct UT_hash_handle *_hd_hh_del;                                           \ 
  196     if ( ((delptr)->hh.prev == NULL) && ((delptr)->hh.next == NULL) )  {         \ 
  197         uthash_free((head)->hh.tbl->buckets,                                     \ 
  198                     (head)->hh.tbl->num_buckets*sizeof(struct UT_hash_bucket) ); \ 
  199         HASH_BLOOM_FREE((head)->hh.tbl);                                         \ 
  200         uthash_free((head)->hh.tbl, sizeof(UT_hash_table));                      \ 
  203         _hd_hh_del = &((delptr)->hh);                                            \ 
  204         if ((delptr) == ELMT_FROM_HH((head)->hh.tbl,(head)->hh.tbl->tail)) {     \ 
  205             (head)->hh.tbl->tail =                                               \ 
  206                 (UT_hash_handle*)((char*)((delptr)->hh.prev) +                   \ 
  207                 (head)->hh.tbl->hho);                                            \ 
  209         if ((delptr)->hh.prev) {                                                 \ 
  210             ((UT_hash_handle*)((char*)((delptr)->hh.prev) +                      \ 
  211                     (head)->hh.tbl->hho))->next = (delptr)->hh.next;             \ 
  213             DECLTYPE_ASSIGN(head,(delptr)->hh.next);                             \ 
  215         if (_hd_hh_del->next) {                                                  \ 
  216             ((UT_hash_handle*)((char*)_hd_hh_del->next +                         \ 
  217                     (head)->hh.tbl->hho))->prev =                                \ 
  220         HASH_TO_BKT( _hd_hh_del->hashv, (head)->hh.tbl->num_buckets, _hd_bkt);   \ 
  221         HASH_DEL_IN_BKT(hh,(head)->hh.tbl->buckets[_hd_bkt], _hd_hh_del);        \ 
  222         (head)->hh.tbl->num_items--;                                             \ 
  224     HASH_FSCK(hh,head);                                                          \ 
  229 #define HASH_FIND_STR(head,findstr,out)                                          \ 
  230     HASH_FIND(hh,head,findstr,strlen(findstr),out) 
  231 #define HASH_ADD_STR(head,strfield,add)                                          \ 
  232     HASH_ADD(hh,head,strfield,strlen(add->strfield),add) 
  233 #define HASH_FIND_INT(head,findint,out)                                          \ 
  234     HASH_FIND(hh,head,findint,sizeof(int),out) 
  235 #define HASH_ADD_INT(head,intfield,add)                                          \ 
  236     HASH_ADD(hh,head,intfield,sizeof(int),add) 
  237 #define HASH_FIND_PTR(head,findptr,out)                                          \ 
  238     HASH_FIND(hh,head,findptr,sizeof(void *),out) 
  239 #define HASH_ADD_PTR(head,ptrfield,add)                                          \ 
  240     HASH_ADD(hh,head,ptrfield,sizeof(void *),add) 
  241 #define HASH_DEL(head,delptr)                                                    \ 
  242     HASH_DELETE(hh,head,delptr) 
  248 #define HASH_OOPS(...) do { fprintf(stderr,__VA_ARGS__); exit(-1); } while (0) 
  249 #define HASH_FSCK(hh,head)                                                       \ 
  252     unsigned _count, _bkt_count;                                                 \ 
  254     struct UT_hash_handle *_thh;                                                 \ 
  257         for( _bkt_i = 0; _bkt_i < (head)->hh.tbl->num_buckets; _bkt_i++) {       \ 
  259             _thh = (head)->hh.tbl->buckets[_bkt_i].hh_head;                      \ 
  262                if (_prev != (char*)(_thh->hh_prev)) {                            \ 
  263                    HASH_OOPS("invalid hh_prev %p, actual %p\n",                  \ 
  264                     _thh->hh_prev, _prev );                                      \ 
  267                _prev = (char*)(_thh);                                            \ 
  268                _thh = _thh->hh_next;                                             \ 
  270             _count += _bkt_count;                                                \ 
  271             if ((head)->hh.tbl->buckets[_bkt_i].count !=  _bkt_count) {          \ 
  272                HASH_OOPS("invalid bucket count %d, actual %d\n",                 \ 
  273                 (head)->hh.tbl->buckets[_bkt_i].count, _bkt_count);              \ 
  276         if (_count != (head)->hh.tbl->num_items) {                               \ 
  277             HASH_OOPS("invalid hh item count %d, actual %d\n",                   \ 
  278                 (head)->hh.tbl->num_items, _count );                             \ 
  283         _thh =  &(head)->hh;                                                     \ 
  286            if (_prev !=(char*)(_thh->prev)) {                                    \ 
  287               HASH_OOPS("invalid prev %p, actual %p\n",                          \ 
  288                     _thh->prev, _prev );                                         \ 
  290            _prev = (char*)ELMT_FROM_HH((head)->hh.tbl, _thh);                    \ 
  291            _thh = ( _thh->next ?  (UT_hash_handle*)((char*)(_thh->next) +        \ 
  292                                   (head)->hh.tbl->hho) : NULL );                 \ 
  294         if (_count != (head)->hh.tbl->num_items) {                               \ 
  295             HASH_OOPS("invalid app item count %d, actual %d\n",                  \ 
  296                 (head)->hh.tbl->num_items, _count );                             \ 
  301 #define HASH_FSCK(hh,head)  
  307 #ifdef HASH_EMIT_KEYS 
  308 #define HASH_EMIT_KEY(hh,head,keyptr,fieldlen)                                   \ 
  310     unsigned _klen = fieldlen;                                                   \ 
  311     write(HASH_EMIT_KEYS, &_klen, sizeof(_klen));                                \ 
  312     write(HASH_EMIT_KEYS, keyptr, fieldlen);                                     \ 
  315 #define HASH_EMIT_KEY(hh,head,keyptr,fieldlen)                     
  320 #define HASH_FCN HASH_FUNCTION 
  322 #define HASH_FCN HASH_JEN 
  326 #define HASH_BER(key,keylen,num_bkts,hashv,bkt)                                  \ 
  328   unsigned _hb_keylen=keylen;                                                    \ 
  329   char *_hb_key=(char*)(key);                                                    \ 
  331   while (_hb_keylen--)  { (hashv) = ((hashv) * 33) + *_hb_key++; }               \ 
  332   bkt = (hashv) & (num_bkts-1);                                                  \ 
  338 #define HASH_SAX(key,keylen,num_bkts,hashv,bkt)                                  \ 
  341   char *_hs_key=(char*)(key);                                                    \ 
  343   for(_sx_i=0; _sx_i < keylen; _sx_i++)                                          \ 
  344       hashv ^= (hashv << 5) + (hashv >> 2) + _hs_key[_sx_i];                     \ 
  345   bkt = hashv & (num_bkts-1);                                                    \ 
  348 #define HASH_FNV(key,keylen,num_bkts,hashv,bkt)                                  \ 
  351   char *_hf_key=(char*)(key);                                                    \ 
  352   hashv = 2166136261UL;                                                          \ 
  353   for(_fn_i=0; _fn_i < keylen; _fn_i++)                                          \ 
  354       hashv = (hashv * 16777619) ^ _hf_key[_fn_i];                               \ 
  355   bkt = hashv & (num_bkts-1);                                                    \ 
  358 #define HASH_OAT(key,keylen,num_bkts,hashv,bkt)                                  \ 
  361   char *_ho_key=(char*)(key);                                                    \ 
  363   for(_ho_i=0; _ho_i < keylen; _ho_i++) {                                        \ 
  364       hashv += _ho_key[_ho_i];                                                   \ 
  365       hashv += (hashv << 10);                                                    \ 
  366       hashv ^= (hashv >> 6);                                                     \ 
  368   hashv += (hashv << 3);                                                         \ 
  369   hashv ^= (hashv >> 11);                                                        \ 
  370   hashv += (hashv << 15);                                                        \ 
  371   bkt = hashv & (num_bkts-1);                                                    \ 
  374 #define HASH_JEN_MIX(a,b,c)                                                      \ 
  376   a -= b; a -= c; a ^= ( c >> 13 );                                              \ 
  377   b -= c; b -= a; b ^= ( a << 8 );                                               \ 
  378   c -= a; c -= b; c ^= ( b >> 13 );                                              \ 
  379   a -= b; a -= c; a ^= ( c >> 12 );                                              \ 
  380   b -= c; b -= a; b ^= ( a << 16 );                                              \ 
  381   c -= a; c -= b; c ^= ( b >> 5 );                                               \ 
  382   a -= b; a -= c; a ^= ( c >> 3 );                                               \ 
  383   b -= c; b -= a; b ^= ( a << 10 );                                              \ 
  384   c -= a; c -= b; c ^= ( b >> 15 );                                              \ 
  387 #define HASH_JEN(key,keylen,num_bkts,hashv,bkt)                                  \ 
  389   unsigned _hj_i,_hj_j,_hj_k;                                                    \ 
  390   char *_hj_key=(char*)(key);                                                    \ 
  391   hashv = 0xfeedbeef;                                                            \ 
  392   _hj_i = _hj_j = 0x9e3779b9;                                                    \ 
  394   while (_hj_k >= 12) {                                                          \ 
  395     _hj_i +=    (_hj_key[0] + ( (unsigned)_hj_key[1] << 8 )                      \ 
  396         + ( (unsigned)_hj_key[2] << 16 )                                         \ 
  397         + ( (unsigned)_hj_key[3] << 24 ) );                                      \ 
  398     _hj_j +=    (_hj_key[4] + ( (unsigned)_hj_key[5] << 8 )                      \ 
  399         + ( (unsigned)_hj_key[6] << 16 )                                         \ 
  400         + ( (unsigned)_hj_key[7] << 24 ) );                                      \ 
  401     hashv += (_hj_key[8] + ( (unsigned)_hj_key[9] << 8 )                         \ 
  402         + ( (unsigned)_hj_key[10] << 16 )                                        \ 
  403         + ( (unsigned)_hj_key[11] << 24 ) );                                     \ 
  405      HASH_JEN_MIX(_hj_i, _hj_j, hashv);                                          \ 
  412      case 11: hashv += ( (unsigned)_hj_key[10] << 24 );                          \ 
  413      case 10: hashv += ( (unsigned)_hj_key[9] << 16 );                           \ 
  414      case 9:  hashv += ( (unsigned)_hj_key[8] << 8 );                            \ 
  415      case 8:  _hj_j += ( (unsigned)_hj_key[7] << 24 );                           \ 
  416      case 7:  _hj_j += ( (unsigned)_hj_key[6] << 16 );                           \ 
  417      case 6:  _hj_j += ( (unsigned)_hj_key[5] << 8 );                            \ 
  418      case 5:  _hj_j += _hj_key[4];                                               \ 
  419      case 4:  _hj_i += ( (unsigned)_hj_key[3] << 24 );                           \ 
  420      case 3:  _hj_i += ( (unsigned)_hj_key[2] << 16 );                           \ 
  421      case 2:  _hj_i += ( (unsigned)_hj_key[1] << 8 );                            \ 
  422      case 1:  _hj_i += _hj_key[0];                                               \ 
  424   HASH_JEN_MIX(_hj_i, _hj_j, hashv);                                             \ 
  425   bkt = hashv & (num_bkts-1);                                                    \ 
  430 #if (defined(__GNUC__) && defined(__i386__)) || defined(__WATCOMC__)             \ 
  431   || defined(_MSC_VER) || defined (__BORLANDC__) || defined (__TURBOC__) 
  432 #define get16bits(d) (*((const uint16_t *) (d))) 
  435 #if !defined (get16bits) 
  436 #define get16bits(d) ((((uint32_t)(((const uint8_t *)(d))[1])) << 8)             \ 
  437                        +(uint32_t)(((const uint8_t *)(d))[0]) ) 
  439 #define HASH_SFH(key,keylen,num_bkts,hashv,bkt)                                  \ 
  441   char *_sfh_key=(char*)(key);                                                   \ 
  442   uint32_t _sfh_tmp, _sfh_len = keylen;                                          \ 
  444   int _sfh_rem = _sfh_len & 3;                                                   \ 
  446   hashv = 0xcafebabe;                                                            \ 
  449   for (;_sfh_len > 0; _sfh_len--) {                                              \ 
  450     hashv    += get16bits (_sfh_key);                                            \ 
  451     _sfh_tmp       = (get16bits (_sfh_key+2) << 11) ^ hashv;                     \ 
  452     hashv     = (hashv << 16) ^ _sfh_tmp;                                        \ 
  453     _sfh_key += 2*sizeof (uint16_t);                                             \ 
  454     hashv    += hashv >> 11;                                                     \ 
  458   switch (_sfh_rem) {                                                            \ 
  459     case 3: hashv += get16bits (_sfh_key);                                       \ 
  460             hashv ^= hashv << 16;                                                \ 
  461             hashv ^= _sfh_key[sizeof (uint16_t)] << 18;                          \ 
  462             hashv += hashv >> 11;                                                \ 
  464     case 2: hashv += get16bits (_sfh_key);                                       \ 
  465             hashv ^= hashv << 11;                                                \ 
  466             hashv += hashv >> 17;                                                \ 
  468     case 1: hashv += *_sfh_key;                                                  \ 
  469             hashv ^= hashv << 10;                                                \ 
  470             hashv += hashv >> 1;                                                 \ 
  474     hashv ^= hashv << 3;                                                         \ 
  475     hashv += hashv >> 5;                                                         \ 
  476     hashv ^= hashv << 4;                                                         \ 
  477     hashv += hashv >> 17;                                                        \ 
  478     hashv ^= hashv << 25;                                                        \ 
  479     hashv += hashv >> 6;                                                         \ 
  480     bkt = hashv & (num_bkts-1);                                                  \ 
  483 #ifdef HASH_USING_NO_STRICT_ALIASING 
  494 #if (defined(__i386__) || defined(__x86_64__))  
  495 #define HASH_MUR HASH_MUR_UNALIGNED 
  497 #define HASH_MUR HASH_MUR_ALIGNED 
  501 #define HASH_MUR_UNALIGNED(key,keylen,num_bkts,hashv,bkt)                        \ 
  503   const unsigned int _mur_m = 0x5bd1e995;                                        \ 
  504   const int _mur_r = 24;                                                         \ 
  505   hashv = 0xcafebabe ^ keylen;                                                   \ 
  506   char *_mur_key = (char *)(key);                                                \ 
  507   uint32_t _mur_tmp, _mur_len = keylen;                                          \ 
  509   for (;_mur_len >= 4; _mur_len-=4) {                                            \ 
  510     _mur_tmp = *(uint32_t *)_mur_key;                                            \ 
  511     _mur_tmp *= _mur_m;                                                          \ 
  512     _mur_tmp ^= _mur_tmp >> _mur_r;                                              \ 
  513     _mur_tmp *= _mur_m;                                                          \ 
  521     case 3: hashv ^= _mur_key[2] << 16;                                          \ 
  522     case 2: hashv ^= _mur_key[1] << 8;                                           \ 
  523     case 1: hashv ^= _mur_key[0];                                                \ 
  527   hashv ^= hashv >> 13;                                                          \ 
  529   hashv ^= hashv >> 15;                                                          \ 
  531   bkt = hashv & (num_bkts-1);                                                    \ 
  535 #define HASH_MUR_ALIGNED(key,keylen,num_bkts,hashv,bkt)                          \ 
  537   const unsigned int _mur_m = 0x5bd1e995;                                        \ 
  538   const int _mur_r = 24;                                                         \ 
  539   hashv = 0xcafebabe ^ (keylen);                                                 \ 
  540   char *_mur_key = (char *)(key);                                                \ 
  541   uint32_t _mur_len = keylen;                                                    \ 
  542   int _mur_align = (int)_mur_key & 3;                                            \ 
  544   if (_mur_align && (_mur_len >= 4)) {                                           \ 
  545     unsigned _mur_t = 0, _mur_d = 0;                                             \ 
  546     switch(_mur_align) {                                                         \ 
  547       case 1: _mur_t |= _mur_key[2] << 16;                                       \ 
  548       case 2: _mur_t |= _mur_key[1] << 8;                                        \ 
  549       case 3: _mur_t |= _mur_key[0];                                             \ 
  551     _mur_t <<= (8 * _mur_align);                                                 \ 
  552     _mur_key += 4-_mur_align;                                                    \ 
  553     _mur_len -= 4-_mur_align;                                                    \ 
  554     int _mur_sl = 8 * (4-_mur_align);                                            \ 
  555     int _mur_sr = 8 * _mur_align;                                                \ 
  557     for (;_mur_len >= 4; _mur_len-=4) {                                          \ 
  558       _mur_d = *(unsigned *)_mur_key;                                            \ 
  559       _mur_t = (_mur_t >> _mur_sr) | (_mur_d << _mur_sl);                        \ 
  560       unsigned _mur_k = _mur_t;                                                  \ 
  562       _mur_k ^= _mur_k >> _mur_r;                                                \ 
  570     if(_mur_len >= _mur_align) {                                                 \ 
  571       switch(_mur_align) {                                                       \ 
  572         case 3: _mur_d |= _mur_key[2] << 16;                                     \ 
  573         case 2: _mur_d |= _mur_key[1] << 8;                                      \ 
  574         case 1: _mur_d |= _mur_key[0];                                           \ 
  576       unsigned _mur_k = (_mur_t >> _mur_sr) | (_mur_d << _mur_sl);               \ 
  578       _mur_k ^= _mur_k >> _mur_r;                                                \ 
  582       _mur_k += _mur_align;                                                      \ 
  583       _mur_len -= _mur_align;                                                    \ 
  587         case 3: hashv ^= _mur_key[2] << 16;                                      \ 
  588         case 2: hashv ^= _mur_key[1] << 8;                                       \ 
  589         case 1: hashv ^= _mur_key[0];                                            \ 
  595         case 3: _mur_d ^= _mur_key[2] << 16;                                     \ 
  596         case 2: _mur_d ^= _mur_key[1] << 8;                                      \ 
  597         case 1: _mur_d ^= _mur_key[0];                                           \ 
  598         case 0: hashv ^= (_mur_t >> _mur_sr) | (_mur_d << _mur_sl);              \ 
  603     hashv ^= hashv >> 13;                                                        \ 
  605     hashv ^= hashv >> 15;                                                        \ 
  607     for (;_mur_len >= 4; _mur_len-=4) {                                          \ 
  608       unsigned _mur_k = *(unsigned*)_mur_key;                                    \ 
  610       _mur_k ^= _mur_k >> _mur_r;                                                \ 
  618       case 3: hashv ^= _mur_key[2] << 16;                                        \ 
  619       case 2: hashv ^= _mur_key[1] << 8;                                         \ 
  620       case 1: hashv ^= _mur_key[0];                                              \ 
  624     hashv ^= hashv >> 13;                                                        \ 
  626     hashv ^= hashv >> 15;                                                        \ 
  628   bkt = hashv & (num_bkts-1);                                                    \ 
  633 #define HASH_KEYCMP(a,b,len) memcmp(a,b,len)  
  636 #define HASH_FIND_IN_BKT(tbl,hh,head,keyptr,keylen_in,out)                       \ 
  638  if (head.hh_head) DECLTYPE_ASSIGN(out,ELMT_FROM_HH(tbl,head.hh_head));          \ 
  641     if (out->hh.keylen == keylen_in) {                                           \ 
  642         if ((HASH_KEYCMP(out->hh.key,keyptr,keylen_in)) == 0) break;             \ 
  644     if (out->hh.hh_next) DECLTYPE_ASSIGN(out,ELMT_FROM_HH(tbl,out->hh.hh_next)); \ 
  650 #define HASH_ADD_TO_BKT(head,addhh)                                              \ 
  653  (addhh)->hh_next = head.hh_head;                                                \ 
  654  (addhh)->hh_prev = NULL;                                                        \ 
  655  if (head.hh_head) { (head).hh_head->hh_prev = (addhh); }                        \ 
  656  (head).hh_head=addhh;                                                           \ 
  657  if (head.count >= ((head.expand_mult+1) * HASH_BKT_CAPACITY_THRESH)             \ 
  658      && (addhh)->tbl->noexpand != 1) {                                           \ 
  659        HASH_EXPAND_BUCKETS((addhh)->tbl);                                        \ 
  664 #define HASH_DEL_IN_BKT(hh,head,hh_del)                                          \ 
  666     if ((head).hh_head == hh_del) {                                              \ 
  667       (head).hh_head = hh_del->hh_next;                                          \ 
  669     if (hh_del->hh_prev) {                                                       \ 
  670         hh_del->hh_prev->hh_next = hh_del->hh_next;                              \ 
  672     if (hh_del->hh_next) {                                                       \ 
  673         hh_del->hh_next->hh_prev = hh_del->hh_prev;                              \ 
  705 #define HASH_EXPAND_BUCKETS(tbl)                                                 \ 
  708     unsigned _he_bkt_i;                                                          \ 
  709     struct UT_hash_handle *_he_thh, *_he_hh_nxt;                                 \ 
  710     UT_hash_bucket *_he_new_buckets, *_he_newbkt;                                \ 
  711     _he_new_buckets = (UT_hash_bucket*)uthash_malloc(                            \ 
  712              2 * tbl->num_buckets * sizeof(struct UT_hash_bucket));              \ 
  713     if (!_he_new_buckets) { uthash_fatal( "out of memory"); }                    \ 
  714     memset(_he_new_buckets, 0,                                                   \ 
  715             2 * tbl->num_buckets * sizeof(struct UT_hash_bucket));               \ 
  716     tbl->ideal_chain_maxlen =                                                    \ 
  717        (tbl->num_items >> (tbl->log2_num_buckets+1)) +                           \ 
  718        ((tbl->num_items & ((tbl->num_buckets*2)-1)) ? 1 : 0);                    \ 
  719     tbl->nonideal_items = 0;                                                     \ 
  720     for(_he_bkt_i = 0; _he_bkt_i < tbl->num_buckets; _he_bkt_i++)                \ 
  722         _he_thh = tbl->buckets[ _he_bkt_i ].hh_head;                             \ 
  724            _he_hh_nxt = _he_thh->hh_next;                                        \ 
  725            HASH_TO_BKT( _he_thh->hashv, tbl->num_buckets*2, _he_bkt);            \ 
  726            _he_newbkt = &(_he_new_buckets[ _he_bkt ]);                           \ 
  727            if (++(_he_newbkt->count) > tbl->ideal_chain_maxlen) {                \ 
  728              tbl->nonideal_items++;                                              \ 
  729              _he_newbkt->expand_mult = _he_newbkt->count /                       \ 
  730                                         tbl->ideal_chain_maxlen;                 \ 
  732            _he_thh->hh_prev = NULL;                                              \ 
  733            _he_thh->hh_next = _he_newbkt->hh_head;                               \ 
  734            if (_he_newbkt->hh_head) _he_newbkt->hh_head->hh_prev =               \ 
  736            _he_newbkt->hh_head = _he_thh;                                        \ 
  737            _he_thh = _he_hh_nxt;                                                 \ 
  740     uthash_free( tbl->buckets, tbl->num_buckets*sizeof(struct UT_hash_bucket) ); \ 
  741     tbl->num_buckets *= 2;                                                       \ 
  742     tbl->log2_num_buckets++;                                                     \ 
  743     tbl->buckets = _he_new_buckets;                                              \ 
  744     tbl->ineff_expands = (tbl->nonideal_items > (tbl->num_items >> 1)) ?         \ 
  745         (tbl->ineff_expands+1) : 0;                                              \ 
  746     if (tbl->ineff_expands > 1) {                                                \ 
  748         uthash_noexpand_fyi(tbl);                                                \ 
  750     uthash_expand_fyi(tbl);                                                      \ 
  757 #define HASH_SORT(head,cmpfcn) HASH_SRT(hh,head,cmpfcn) 
  758 #define HASH_SRT(hh,head,cmpfcn)                                                 \ 
  761   unsigned _hs_looping,_hs_nmerges,_hs_insize,_hs_psize,_hs_qsize;               \ 
  762   struct UT_hash_handle *_hs_p, *_hs_q, *_hs_e, *_hs_list, *_hs_tail;            \ 
  766       _hs_list = &((head)->hh);                                                  \ 
  767       while (_hs_looping) {                                                      \ 
  776               for ( _hs_i = 0; _hs_i  < _hs_insize; _hs_i++ ) {                  \ 
  778                   _hs_q = (UT_hash_handle*)((_hs_q->next) ?                      \ 
  779                           ((void*)((char*)(_hs_q->next) +                        \ 
  780                           (head)->hh.tbl->hho)) : NULL);                         \ 
  781                   if (! (_hs_q) ) break;                                         \ 
  783               _hs_qsize = _hs_insize;                                            \ 
  784               while ((_hs_psize > 0) || ((_hs_qsize > 0) && _hs_q )) {           \ 
  785                   if (_hs_psize == 0) {                                          \ 
  787                       _hs_q = (UT_hash_handle*)((_hs_q->next) ?                  \ 
  788                               ((void*)((char*)(_hs_q->next) +                    \ 
  789                               (head)->hh.tbl->hho)) : NULL);                     \ 
  791                   } else if ( (_hs_qsize == 0) || !(_hs_q) ) {                   \ 
  793                       _hs_p = (UT_hash_handle*)((_hs_p->next) ?                  \ 
  794                               ((void*)((char*)(_hs_p->next) +                    \ 
  795                               (head)->hh.tbl->hho)) : NULL);                     \ 
  798                       cmpfcn(DECLTYPE(head)(ELMT_FROM_HH((head)->hh.tbl,_hs_p)), \ 
  799                              DECLTYPE(head)(ELMT_FROM_HH((head)->hh.tbl,_hs_q))) \ 
  802                       _hs_p = (UT_hash_handle*)((_hs_p->next) ?                  \ 
  803                               ((void*)((char*)(_hs_p->next) +                    \ 
  804                               (head)->hh.tbl->hho)) : NULL);                     \ 
  808                       _hs_q = (UT_hash_handle*)((_hs_q->next) ?                  \ 
  809                               ((void*)((char*)(_hs_q->next) +                    \ 
  810                               (head)->hh.tbl->hho)) : NULL);                     \ 
  814                       _hs_tail->next = ((_hs_e) ?                                \ 
  815                             ELMT_FROM_HH((head)->hh.tbl,_hs_e) : NULL);          \ 
  819                   _hs_e->prev = ((_hs_tail) ?                                    \ 
  820                      ELMT_FROM_HH((head)->hh.tbl,_hs_tail) : NULL);              \ 
  825           _hs_tail->next = NULL;                                                 \ 
  826           if ( _hs_nmerges <= 1 ) {                                              \ 
  828               (head)->hh.tbl->tail = _hs_tail;                                   \ 
  829               DECLTYPE_ASSIGN(head,ELMT_FROM_HH((head)->hh.tbl, _hs_list));      \ 
  833       HASH_FSCK(hh,head);                                                        \ 
  842 #define HASH_SELECT(hh_dst, dst, hh_src, src, cond)                              \ 
  844   unsigned _src_bkt, _dst_bkt;                                                   \ 
  845   void *_last_elt=NULL, *_elt;                                                   \ 
  846   UT_hash_handle *_src_hh, *_dst_hh, *_last_elt_hh=NULL;                         \ 
  847   ptrdiff_t _dst_hho = ((char*)(&(dst)->hh_dst) - (char*)(dst));                 \ 
  849     for(_src_bkt=0; _src_bkt < (src)->hh_src.tbl->num_buckets; _src_bkt++) {     \ 
  850       for(_src_hh = (src)->hh_src.tbl->buckets[_src_bkt].hh_head;                \ 
  852           _src_hh = _src_hh->hh_next) {                                          \ 
  853           _elt = ELMT_FROM_HH((src)->hh_src.tbl, _src_hh);                       \ 
  855             _dst_hh = (UT_hash_handle*)(((char*)_elt) + _dst_hho);               \ 
  856             _dst_hh->key = _src_hh->key;                                         \ 
  857             _dst_hh->keylen = _src_hh->keylen;                                   \ 
  858             _dst_hh->hashv = _src_hh->hashv;                                     \ 
  859             _dst_hh->prev = _last_elt;                                           \ 
  860             _dst_hh->next = NULL;                                                \ 
  861             if (_last_elt_hh) { _last_elt_hh->next = _elt; }                     \ 
  863               DECLTYPE_ASSIGN(dst,_elt);                                         \ 
  864               HASH_MAKE_TABLE(hh_dst,dst);                                       \ 
  866               _dst_hh->tbl = (dst)->hh_dst.tbl;                                  \ 
  868             HASH_TO_BKT(_dst_hh->hashv, _dst_hh->tbl->num_buckets, _dst_bkt);    \ 
  869             HASH_ADD_TO_BKT(_dst_hh->tbl->buckets[_dst_bkt],_dst_hh);            \ 
  870             (dst)->hh_dst.tbl->num_items++;                                      \ 
  872             _last_elt_hh = _dst_hh;                                              \ 
  877   HASH_FSCK(hh_dst,dst);                                                         \ 
  880 #define HASH_CLEAR(hh,head)                                                      \ 
  883     uthash_free((head)->hh.tbl->buckets,                                         \ 
  884                 (head)->hh.tbl->num_buckets*sizeof(struct UT_hash_bucket));      \ 
  885     uthash_free((head)->hh.tbl, sizeof(UT_hash_table));                          \ 
  891 #define HASH_ITER(hh,head,el,tmp)                                                \ 
  892 for((el)=(head), (*(char**)(&(tmp)))=(char*)((head)?(head)->hh.next:NULL);       \ 
  893   el; (el)=(tmp),(*(char**)(&(tmp)))=(char*)((tmp)?(tmp)->hh.next:NULL))  
  895 #define HASH_ITER(hh,head,el,tmp)                                                \ 
  896 for((el)=(head),(tmp)=DECLTYPE(el)((head)?(head)->hh.next:NULL);                 \ 
  897   el; (el)=(tmp),(tmp)=DECLTYPE(el)((tmp)?(tmp)->hh.next:NULL)) 
  901 #define HASH_COUNT(head) HASH_CNT(hh,head)  
  902 #define HASH_CNT(hh,head) ((head)?((head)->hh.tbl->num_items):0) 
  925 #define HASH_SIGNATURE 0xa0111fe1 
  926 #define HASH_BLOOM_SIGNATURE 0xb12220f2 
struct UT_hash_handle * tail
struct UT_hash_handle * hh_head
unsigned log2_num_buckets
struct UT_hash_handle * hh_next
struct UT_hash_bucket UT_hash_bucket
struct UT_hash_table * tbl
struct UT_hash_table UT_hash_table
unsigned ideal_chain_maxlen
struct UT_hash_handle UT_hash_handle
struct UT_hash_handle * hh_prev