Annotation of parser3/src/main/pa_hash.C, revision 1.7

1.1       paf         1: /*
1.7     ! paf         2:   $Id: pa_hash.C,v 1.6 2001/01/29 12:16:08 paf Exp $
1.1       paf         3: */
                      4: 
                      5: /*
                      6:        The prime numbers used from zend_hash.c,
                      7:        the part of Zend scripting engine library,
                      8:        Copyrighted (C) 1999-2000    Zend Technologies Ltd.
                      9:        http://www.zend.com/license/0_92.txt
                     10:        For more information about Zend please visit http://www.zend.com/
                     11: */
                     12: 
                     13: #include "pa_pool.h"
1.4       paf        14: #include "pa_threads.h"
1.2       paf        15: 
                     16: void *Hash::Pair::operator new(size_t size, Pool *apool) {
                     17:        return apool->malloc(size);
                     18: }
                     19: 
1.1       paf        20: /* Zend comment: Generated on an Octa-ALPHA 300MHz CPU & 2.5GB RAM monster */
                     21: uint Hash::sizes[]={
                     22:        5, 11, 19, 53, 107, 223, 463, 983, 1979, 3907, 7963, 
                     23:        16229, 32531, 65407, 130987, 262237, 524521, 1048793, 
                     24:        2097397, 4194103, 8388857, 16777447, 33554201, 67108961, 
                     25:        134217487, 268435697, 536870683, 1073741621, 2147483399};
                     26: int Hash::sizes_count=
                     27:        sizeof(sizes)/sizeof(uint);
                     28: 
                     29: void *Hash::operator new(size_t size, Pool *apool) {
                     30:        return apool->malloc(size);
                     31: }
                     32: 
1.5       paf        33: Hash::Hash(Pool *apool, bool athread_safe) :
                     34:        pool(apool),
                     35:        thread_safe(athread_safe) {
1.1       paf        36:        
                     37:        size=sizes[size_index=0];
1.2       paf        38:        threshold=size*THRESHOLD_PERCENT/100;
1.1       paf        39:        used=0;
1.2       paf        40:        refs=static_cast<Pair **>(pool->calloc(sizeof(Pair *)*size));
1.1       paf        41: }
                     42: 
                     43: void Hash::expand() {
1.2       paf        44:        int old_size=size;
                     45:        Pair **old_refs=refs;
1.4       paf        46: 
1.2       paf        47:        // allocated bigger refs array
                     48:        size_index=size_index+1<sizes_count?size_index+1:sizes_count-1;
                     49:        size=sizes[size_index];
1.4       paf        50:        refs=static_cast<Pair **>(pool->calloc(sizeof(Pair *)*size));
1.1       paf        51: 
                     52:        // rehash
1.2       paf        53:        Pair **old_ref=old_refs;
                     54:        for(int old_index=0; old_index<old_size; old_index++)
                     55:                for(Pair *pair=*old_ref++; pair; ) {
                     56:                        Pair *linked_pair=pair->link;
                     57: 
                     58:                        uint new_index=pair->code%size;
                     59:                        Pair **new_ref=&refs[new_index];
                     60:                        pair->link=*new_ref;
                     61:                        *new_ref=pair;
1.1       paf        62: 
1.2       paf        63:                        pair=linked_pair;
                     64:                }
1.1       paf        65: }
                     66: 
                     67: uint Hash::generic_code(uint aresult, char *start, uint size) {
                     68:        uint result=aresult, g;
                     69:        char *end=start+size;
                     70: 
                     71:        while (start<end) {
                     72:                result=(result<<4)+*start++;
                     73:                if ((g=(result&0xF0000000))) {
                     74:                        result=result^(g>>24);
                     75:                        result=result^g;
                     76:                }
                     77:        }
                     78:        return result;
                     79: }
                     80: 
1.6       paf        81: void Hash::put(Key& key, Value *value) {  SYNCHRONIZED(thread_safe);
1.1       paf        82:        if(full()) 
                     83:                expand();
                     84: 
1.2       paf        85:        uint code=key.hash_code();
                     86:        uint index=code%size;
                     87:        Pair **ref=&refs[index];
                     88:        for(Pair *pair=*ref; pair; pair=pair->link)
                     89:                if(pair->code==code && pair->key==key) {
                     90:                        // found a pair with the same key
                     91:                        pair->value=value;
                     92:                        return;
1.1       paf        93:                }
1.2       paf        94:        
1.7     ! paf        95:        // proper pair not found -- create&link_in new pair
1.2       paf        96:        *ref=new(pool) Pair(code, key, value, *ref);
1.1       paf        97: }
                     98: 
1.6       paf        99: Hash::Value* Hash::get(Key& key) {  SYNCHRONIZED(thread_safe);
1.2       paf       100:        uint code=key.hash_code();
1.1       paf       101:        uint index=code%size;
1.2       paf       102:        for(Pair *pair=refs[index]; pair; pair=pair->link)
1.1       paf       103:                if(pair->code==code && pair->key==key)
                    104:                        return pair->value;
                    105:        
                    106:        return 0;
                    107: }

E-mail: