]>
Commit | Line | Data |
---|---|---|
0508ba2a | 1 | ///////////////////////////////////////////////////////////////////////////// |
df69528b | 2 | // Name: src/common/hashmap.cpp |
0508ba2a MB |
3 | // Purpose: wxHashMap implementation |
4 | // Author: Mattia Barbon | |
376e1129 | 5 | // Modified by: |
0508ba2a MB |
6 | // Created: 29/01/2002 |
7 | // RCS-ID: $Id$ | |
8 | // Copyright: (c) Mattia Barbon | |
65571936 | 9 | // Licence: wxWindows licence |
0508ba2a MB |
10 | ///////////////////////////////////////////////////////////////////////////// |
11 | ||
0508ba2a MB |
12 | // For compilers that support precompilation, includes "wx.h". |
13 | #include "wx/wxprec.h" | |
14 | ||
15 | #ifdef __BORLANDC__ | |
df69528b | 16 | #pragma hdrstop |
0508ba2a MB |
17 | #endif |
18 | ||
19 | #include "wx/hashmap.h" | |
20 | ||
0508ba2a MB |
21 | /* FYI: This is the "One-at-a-Time" algorithm by Bob Jenkins */ |
22 | /* from requirements by Colin Plumb. */ | |
23 | /* (http://burtleburtle.net/bob/hash/doobs.html) */ | |
24 | /* adapted from Perl sources ( hv.h ) */ | |
25 | unsigned long wxStringHash::wxCharStringHash( const wxChar* k ) | |
26 | { | |
27 | unsigned long hash = 0; | |
28 | ||
29 | while( *k ) | |
30 | { | |
31 | hash += *k++; | |
32 | hash += (hash << 10); | |
33 | hash ^= (hash >> 6); | |
34 | } | |
35 | hash += (hash << 3); | |
36 | hash ^= (hash >> 11); | |
e05c8fa7 | 37 | |
0508ba2a MB |
38 | return hash + (hash << 15); |
39 | } | |
40 | ||
41 | #if wxUSE_UNICODE | |
42 | unsigned long wxStringHash::charStringHash( const char* k ) | |
43 | { | |
44 | unsigned long hash = 0; | |
45 | ||
46 | while( *k ) | |
47 | { | |
48 | hash += *k++; | |
49 | hash += (hash << 10); | |
50 | hash ^= (hash >> 6); | |
51 | } | |
52 | hash += (hash << 3); | |
53 | hash ^= (hash >> 11); | |
e05c8fa7 | 54 | |
0508ba2a MB |
55 | return hash + (hash << 15); |
56 | } | |
57 | #endif | |
58 | ||
bdcade0a MB |
59 | #if !wxUSE_STL || !defined(HAVE_STL_HASH_MAP) |
60 | ||
0508ba2a | 61 | /* from SGI STL */ |
376e1129 | 62 | const unsigned long _wxHashTableBase2::ms_primes[prime_count] = |
0508ba2a MB |
63 | { |
64 | 7ul, 13ul, 29ul, | |
65 | 53ul, 97ul, 193ul, 389ul, 769ul, | |
66 | 1543ul, 3079ul, 6151ul, 12289ul, 24593ul, | |
67 | 49157ul, 98317ul, 196613ul, 393241ul, 786433ul, | |
68 | 1572869ul, 3145739ul, 6291469ul, 12582917ul, 25165843ul, | |
e05c8fa7 | 69 | 50331653ul, 100663319ul, 201326611ul, 402653189ul, 805306457ul, |
0508ba2a MB |
70 | 1610612741ul, 3221225473ul, 4294967291ul |
71 | }; | |
72 | ||
73 | unsigned long _wxHashTableBase2::GetNextPrime( unsigned long n ) | |
74 | { | |
376e1129 | 75 | const unsigned long* ptr = &ms_primes[0]; |
0508ba2a MB |
76 | for( size_t i = 0; i < prime_count; ++i, ++ptr ) |
77 | { | |
78 | if( n < *ptr ) | |
79 | return *ptr; | |
80 | } | |
81 | ||
82 | /* someone might try to alloc a 2^32-element hash table */ | |
376e1129 VZ |
83 | wxFAIL_MSG( _T("hash table too big?") ); |
84 | ||
0508ba2a MB |
85 | /* quiet warning */ |
86 | return 0; | |
87 | } | |
88 | ||
89 | unsigned long _wxHashTableBase2::GetPreviousPrime( unsigned long n ) | |
90 | { | |
376e1129 | 91 | const unsigned long* ptr = &ms_primes[prime_count - 1]; |
0508ba2a MB |
92 | |
93 | for( size_t i = 0; i < prime_count; ++i, --ptr ) | |
94 | { | |
95 | if( n > *ptr ) | |
96 | return *ptr; | |
97 | } | |
98 | ||
99 | /* quiet warning */ | |
100 | return 1; | |
101 | } | |
102 | ||
103 | void _wxHashTableBase2::DeleteNodes( size_t buckets, | |
104 | _wxHashTable_NodeBase** table, | |
105 | NodeDtor dtor ) | |
106 | { | |
107 | size_t i; | |
108 | ||
109 | for( i = 0; i < buckets; ++i ) | |
110 | { | |
111 | _wxHashTable_NodeBase* node = table[i]; | |
112 | _wxHashTable_NodeBase* tmp; | |
113 | ||
114 | while( node ) | |
115 | { | |
116 | tmp = node->m_nxt; | |
117 | dtor( node ); | |
118 | node = tmp; | |
119 | } | |
120 | } | |
121 | ||
122 | memset( table, 0, buckets * sizeof(void*) ); | |
123 | } | |
124 | ||
125 | void _wxHashTableBase2::CopyHashTable( _wxHashTable_NodeBase** srcTable, | |
126 | size_t srcBuckets, | |
127 | _wxHashTableBase2* dst, | |
128 | _wxHashTable_NodeBase** dstTable, | |
129 | BucketFromNode func, ProcessNode proc ) | |
130 | { | |
1a6d9c76 | 131 | for( size_t i = 0; i < srcBuckets; ++i ) |
0508ba2a MB |
132 | { |
133 | _wxHashTable_NodeBase* nextnode; | |
e05c8fa7 | 134 | |
0508ba2a MB |
135 | for( _wxHashTable_NodeBase* node = srcTable[i]; node; node = nextnode ) |
136 | { | |
137 | size_t bucket = func( dst, node ); | |
138 | ||
139 | nextnode = node->m_nxt; | |
140 | _wxHashTable_NodeBase* newnode = proc( node ); | |
1a6d9c76 MB |
141 | newnode->m_nxt = dstTable[bucket]; |
142 | dstTable[bucket] = newnode; | |
0508ba2a MB |
143 | } |
144 | } | |
145 | } | |
146 | ||
147 | _wxHashTable_NodeBase* _wxHashTableBase2::DummyProcessNode(_wxHashTable_NodeBase* node) | |
148 | { | |
149 | return node; | |
150 | } | |
151 | ||
bdcade0a | 152 | #endif // !wxUSE_STL || !defined(HAVE_STL_HASH_MAP) |