One Level Up Top Level

runtime/kp_tab.h - ktap

Functions defined

Macros defined

Source code

  1. #ifndef __KTAP_TAB_H__
  2. ‌#define __KTAP_TAB_H__

  4. /* Hash constants. Tuned using a brute force search. */
  5. ‌#define HASH_BIAS       (-0x04c11db7)
  6. ‌#define HASH_ROT1       14
  7. ‌#define HASH_ROT2       5
  8. ‌#define HASH_ROT3       13

  10. /* Every half-decent C compiler transforms this into a rotate instruction. */
  11. ‌#define kp_rol(x, n)    (((x)<<(n)) | ((x)>>(-(int)(n)&(8*sizeof(x)-1))))
  12. ‌#define kp_ror(x, n)    (((x)<<(-(int)(n)&(8*sizeof(x)-1))) | ((x)>>(n)))

  14. /* Scramble the bits of numbers and pointers. */
  15. ‌static __always_inline uint32_t hashrot(uint32_t lo, uint32_t hi)
  16. {
  17.     /* Prefer variant that compiles well for a 2-operand CPU. */
  18.     lo ^= hi; hi = kp_rol(hi, HASH_ROT1);
  19.     lo -= hi; hi = kp_rol(hi, HASH_ROT2);
  20.     hi ^= lo; hi -= kp_rol(lo, HASH_ROT3);
  21.     return hi;
  22. }


  25. ‌#define FLS(x)       ((uint32_t)(__builtin_clz(x)^31))
  26. ‌#define hsize2hbits(s)  ((s) ? ((s)==1 ? 1 : 1+FLS((uint32_t)((s)-1))) : 0)

  28. ‌#define arrayslot(t, i)         (&(t)->array[(i)])

  30. void kp_tab_set(ktap_state_t *ks, ktap_tab_t *t, const ktap_val_t *key,
  31.         const ktap_val_t *val);
  32. void kp_tab_setstr(ktap_state_t *ks, ktap_tab_t *t,
  33.            const ktap_str_t *key, const ktap_val_t *val);
  34. void kp_tab_incrstr(ktap_state_t *ks, ktap_tab_t *t, const ktap_str_t *key,
  35.             ktap_number n);
  36. void kp_tab_get(ktap_state_t *ks, ktap_tab_t *t, const ktap_val_t *key,
  37.         ktap_val_t *val);
  38. void kp_tab_getstr(ktap_tab_t *t, ktap_str_t *key, ktap_val_t *val);

  40. void kp_tab_getint(ktap_tab_t *t, uint32_t key, ktap_val_t *val);
  41. void kp_tab_setint(ktap_state_t *ks, ktap_tab_t *t,
  42.            uint32_t key, const ktap_val_t *val);
  43. void kp_tab_incrint(ktap_state_t *ks, ktap_tab_t *t, uint32_t key,
  44.             ktap_number n);
  45. ktap_tab_t *kp_tab_new(ktap_state_t *ks, uint32_t asize, uint32_t hbits);
  46. ktap_tab_t *kp_tab_new_ah(ktap_state_t *ks, int32_t a, int32_t h);
  47. ktap_tab_t *kp_tab_dup(ktap_state_t *ks, const ktap_tab_t *kt);

  49. void kp_tab_free(ktap_state_t *ks, ktap_tab_t *t);
  50. int kp_tab_len(ktap_state_t *ks, ktap_tab_t *t);
  51. void kp_tab_dump(ktap_state_t *ks, ktap_tab_t *t);
  52. void kp_tab_clear(ktap_tab_t *t);
  53. void kp_tab_print_hist(ktap_state_t *ks, ktap_tab_t *t, int n);
  54. int kp_tab_next(ktap_state_t *ks, ktap_tab_t *t, StkId key);
  55. int kp_tab_sort_next(ktap_state_t *ks, ktap_tab_t *t, StkId key);
  56. void kp_tab_sort(ktap_state_t *ks, ktap_tab_t *t, ktap_func_t *cmp_func);
  57. void kp_tab_incr(ktap_state_t *ks, ktap_tab_t *t, ktap_val_t *key,
  58.         ktap_number n);
  59. #endif /* __KTAP_TAB_H__ */

One Level Up Top Level