D7net
Home
Console
Upload
information
Create File
Create Folder
About
Tools
:
/
opt
/
td-agent
/
embedded
/
lib
/
ruby
/
gems
/
2.1.0
/
gems
/
oj-2.18.1
/
ext
/
oj
/
Filename :
cache8.c
back
Copy
#include <stdlib.h> #include <errno.h> #include <stdio.h> #include <string.h> #include <stdarg.h> #include "ruby.h" #include "cache8.h" #define BITS 4 #define MASK 0x000000000000000FULL #define SLOT_CNT 16 #define DEPTH 16 typedef union { struct _Cache8 *child; slot_t value; } Bucket; struct _Cache8 { Bucket buckets[SLOT_CNT]; }; static void cache8_delete(Cache8 cache, int depth); static void slot_print(Cache8 cache, sid_t key, unsigned int depth); void oj_cache8_new(Cache8 *cache) { Bucket *b; int i; *cache = ALLOC(struct _Cache8); for (i = SLOT_CNT, b = (*cache)->buckets; 0 < i; i--, b++) { b->value = 0; } } void oj_cache8_delete(Cache8 cache) { cache8_delete(cache, 0); } static void cache8_delete(Cache8 cache, int depth) { Bucket *b; unsigned int i; for (i = 0, b = cache->buckets; i < SLOT_CNT; i++, b++) { if (0 != b->child) { if (DEPTH - 1 != depth) { cache8_delete(b->child, depth + 1); } } } xfree(cache); } slot_t oj_cache8_get(Cache8 cache, sid_t key, slot_t **slot) { Bucket *b; int i; sid_t k8 = (sid_t)key; sid_t k; for (i = 64 - BITS; 0 < i; i -= BITS) { k = (k8 >> i) & MASK; b = cache->buckets + k; if (0 == b->child) { oj_cache8_new(&b->child); } cache = b->child; } *slot = &(cache->buckets + (k8 & MASK))->value; return **slot; } void oj_cache8_print(Cache8 cache) { /*printf("-------------------------------------------\n"); */ slot_print(cache, 0, 0); } static void slot_print(Cache8 c, sid_t key, unsigned int depth) { Bucket *b; unsigned int i; sid_t k8 = (sid_t)key; sid_t k; for (i = 0, b = c->buckets; i < SLOT_CNT; i++, b++) { if (0 != b->child) { k = (k8 << BITS) | i; /*printf("*** key: 0x%016llx depth: %u i: %u\n", k, depth, i); */ if (DEPTH - 1 == depth) { #if IS_WINDOWS printf("0x%016lx: %4lu\n", (long unsigned int)k, (long unsigned int)b->value); #else printf("0x%016llx: %4llu\n", (long long unsigned int)k, (long long unsigned int)b->value); #endif } else { slot_print(b->child, k, depth + 1); } } } }