Mon, 02 Jul 2012 13:11:28 -0400
Merge
duke@435 | 1 | /* |
coleenp@3865 | 2 | * Copyright (c) 2003, 2012, Oracle and/or its affiliates. All rights reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
trims@1907 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
trims@1907 | 20 | * or visit www.oracle.com if you need additional information or have any |
trims@1907 | 21 | * questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
stefank@2314 | 25 | #include "precompiled.hpp" |
stefank@2314 | 26 | #include "memory/allocation.inline.hpp" |
coleenp@3875 | 27 | #include "memory/filemap.hpp" |
stefank@2314 | 28 | #include "memory/resourceArea.hpp" |
stefank@2314 | 29 | #include "oops/oop.inline.hpp" |
stefank@2314 | 30 | #include "runtime/safepoint.hpp" |
stefank@2314 | 31 | #include "utilities/dtrace.hpp" |
stefank@2314 | 32 | #include "utilities/hashtable.hpp" |
stefank@2314 | 33 | #include "utilities/hashtable.inline.hpp" |
duke@435 | 34 | |
coleenp@2497 | 35 | |
duke@435 | 36 | // This is a generic hashtable, designed to be used for the symbol |
duke@435 | 37 | // and string tables. |
duke@435 | 38 | // |
duke@435 | 39 | // It is implemented as an open hash table with a fixed number of buckets. |
duke@435 | 40 | // |
duke@435 | 41 | // %note: |
duke@435 | 42 | // - HashtableEntrys are allocated in blocks to reduce the space overhead. |
duke@435 | 43 | |
zgu@3900 | 44 | template <MEMFLAGS F> BasicHashtableEntry<F>* BasicHashtable<F>::new_entry(unsigned int hashValue) { |
zgu@3900 | 45 | BasicHashtableEntry<F>* entry; |
duke@435 | 46 | |
duke@435 | 47 | if (_free_list) { |
duke@435 | 48 | entry = _free_list; |
duke@435 | 49 | _free_list = _free_list->next(); |
duke@435 | 50 | } else { |
jrose@867 | 51 | if (_first_free_entry + _entry_size >= _end_block) { |
jrose@867 | 52 | int block_size = MIN2(512, MAX2((int)_table_size / 2, (int)_number_of_entries)); |
duke@435 | 53 | int len = _entry_size * block_size; |
jrose@867 | 54 | len = 1 << log2_intptr(len); // round down to power of 2 |
jrose@867 | 55 | assert(len >= _entry_size, ""); |
zgu@3900 | 56 | _first_free_entry = NEW_C_HEAP_ARRAY2(char, len, F, CURRENT_PC); |
duke@435 | 57 | _end_block = _first_free_entry + len; |
duke@435 | 58 | } |
zgu@3900 | 59 | entry = (BasicHashtableEntry<F>*)_first_free_entry; |
duke@435 | 60 | _first_free_entry += _entry_size; |
duke@435 | 61 | } |
duke@435 | 62 | |
jrose@867 | 63 | assert(_entry_size % HeapWordSize == 0, ""); |
duke@435 | 64 | entry->set_hash(hashValue); |
duke@435 | 65 | return entry; |
duke@435 | 66 | } |
duke@435 | 67 | |
duke@435 | 68 | |
zgu@3900 | 69 | template <class T, MEMFLAGS F> HashtableEntry<T, F>* Hashtable<T, F>::new_entry(unsigned int hashValue, T obj) { |
zgu@3900 | 70 | HashtableEntry<T, F>* entry; |
duke@435 | 71 | |
zgu@3900 | 72 | entry = (HashtableEntry<T, F>*)BasicHashtable<F>::new_entry(hashValue); |
coleenp@2497 | 73 | entry->set_literal(obj); |
duke@435 | 74 | return entry; |
duke@435 | 75 | } |
duke@435 | 76 | |
coleenp@3865 | 77 | // Check to see if the hashtable is unbalanced. The caller set a flag to |
coleenp@3865 | 78 | // rehash at the next safepoint. If this bucket is 60 times greater than the |
coleenp@3865 | 79 | // expected average bucket length, it's an unbalanced hashtable. |
coleenp@3865 | 80 | // This is somewhat an arbitrary heuristic but if one bucket gets to |
coleenp@3865 | 81 | // rehash_count which is currently 100, there's probably something wrong. |
coleenp@3865 | 82 | |
zgu@3900 | 83 | template <MEMFLAGS F> bool BasicHashtable<F>::check_rehash_table(int count) { |
coleenp@3865 | 84 | assert(table_size() != 0, "underflow"); |
coleenp@3865 | 85 | if (count > (((double)number_of_entries()/(double)table_size())*rehash_multiple)) { |
coleenp@3865 | 86 | // Set a flag for the next safepoint, which should be at some guaranteed |
coleenp@3865 | 87 | // safepoint interval. |
coleenp@3865 | 88 | return true; |
coleenp@3865 | 89 | } |
coleenp@3865 | 90 | return false; |
coleenp@3865 | 91 | } |
coleenp@3865 | 92 | |
coleenp@3865 | 93 | // Create a new table and using alternate hash code, populate the new table |
coleenp@3865 | 94 | // with the existing elements. This can be used to change the hash code |
coleenp@3865 | 95 | // and could in the future change the size of the table. |
coleenp@3865 | 96 | |
zgu@3900 | 97 | template <class T, MEMFLAGS F> void Hashtable<T, F>::move_to(Hashtable<T, F>* new_table) { |
zgu@3900 | 98 | int saved_entry_count = BasicHashtable<F>::number_of_entries(); |
coleenp@3865 | 99 | |
coleenp@3865 | 100 | // Iterate through the table and create a new entry for the new table |
coleenp@3865 | 101 | for (int i = 0; i < new_table->table_size(); ++i) { |
zgu@3900 | 102 | for (HashtableEntry<T, F>* p = bucket(i); p != NULL; ) { |
zgu@3900 | 103 | HashtableEntry<T, F>* next = p->next(); |
coleenp@3865 | 104 | T string = p->literal(); |
coleenp@3865 | 105 | // Use alternate hashing algorithm on the symbol in the first table |
coleenp@3865 | 106 | unsigned int hashValue = new_hash(string); |
coleenp@3865 | 107 | // Get a new index relative to the new table (can also change size) |
coleenp@3865 | 108 | int index = new_table->hash_to_index(hashValue); |
coleenp@3865 | 109 | p->set_hash(hashValue); |
coleenp@3875 | 110 | // Keep the shared bit in the Hashtable entry to indicate that this entry |
coleenp@3875 | 111 | // can't be deleted. The shared bit is the LSB in the _next field so |
coleenp@3875 | 112 | // walking the hashtable past these entries requires |
coleenp@3875 | 113 | // BasicHashtableEntry::make_ptr() call. |
coleenp@3875 | 114 | bool keep_shared = p->is_shared(); |
coleenp@3865 | 115 | unlink_entry(p); |
coleenp@3865 | 116 | new_table->add_entry(index, p); |
coleenp@3875 | 117 | if (keep_shared) { |
coleenp@3875 | 118 | p->set_shared(); |
coleenp@3875 | 119 | } |
coleenp@3865 | 120 | p = next; |
coleenp@3865 | 121 | } |
coleenp@3865 | 122 | } |
coleenp@3865 | 123 | // give the new table the free list as well |
coleenp@3865 | 124 | new_table->copy_freelist(this); |
coleenp@3865 | 125 | assert(new_table->number_of_entries() == saved_entry_count, "lost entry on dictionary copy?"); |
coleenp@3865 | 126 | |
coleenp@3865 | 127 | // Destroy memory used by the buckets in the hashtable. The memory |
coleenp@3865 | 128 | // for the elements has been used in a new table and is not |
coleenp@3865 | 129 | // destroyed. The memory reuse will benefit resizing the SystemDictionary |
coleenp@3865 | 130 | // to avoid a memory allocation spike at safepoint. |
zgu@3900 | 131 | BasicHashtable<F>::free_buckets(); |
coleenp@3865 | 132 | } |
coleenp@3865 | 133 | |
zgu@3900 | 134 | template <MEMFLAGS F> void BasicHashtable<F>::free_buckets() { |
coleenp@3875 | 135 | if (NULL != _buckets) { |
coleenp@3875 | 136 | // Don't delete the buckets in the shared space. They aren't |
coleenp@3875 | 137 | // allocated by os::malloc |
coleenp@3875 | 138 | if (!UseSharedSpaces || |
coleenp@3875 | 139 | !FileMapInfo::current_info()->is_in_shared_space(_buckets)) { |
zgu@3900 | 140 | FREE_C_HEAP_ARRAY(HashtableBucket, _buckets, F); |
coleenp@3875 | 141 | } |
coleenp@3875 | 142 | _buckets = NULL; |
coleenp@3875 | 143 | } |
coleenp@3875 | 144 | } |
coleenp@3875 | 145 | |
coleenp@3875 | 146 | |
duke@435 | 147 | // Reverse the order of elements in the hash buckets. |
duke@435 | 148 | |
zgu@3900 | 149 | template <MEMFLAGS F> void BasicHashtable<F>::reverse() { |
duke@435 | 150 | |
duke@435 | 151 | for (int i = 0; i < _table_size; ++i) { |
zgu@3900 | 152 | BasicHashtableEntry<F>* new_list = NULL; |
zgu@3900 | 153 | BasicHashtableEntry<F>* p = bucket(i); |
duke@435 | 154 | while (p != NULL) { |
zgu@3900 | 155 | BasicHashtableEntry<F>* next = p->next(); |
duke@435 | 156 | p->set_next(new_list); |
duke@435 | 157 | new_list = p; |
duke@435 | 158 | p = next; |
duke@435 | 159 | } |
duke@435 | 160 | *bucket_addr(i) = new_list; |
duke@435 | 161 | } |
duke@435 | 162 | } |
duke@435 | 163 | |
duke@435 | 164 | |
duke@435 | 165 | // Copy the table to the shared space. |
duke@435 | 166 | |
zgu@3900 | 167 | template <MEMFLAGS F> void BasicHashtable<F>::copy_table(char** top, char* end) { |
duke@435 | 168 | |
duke@435 | 169 | // Dump the hash table entries. |
duke@435 | 170 | |
duke@435 | 171 | intptr_t *plen = (intptr_t*)(*top); |
duke@435 | 172 | *top += sizeof(*plen); |
duke@435 | 173 | |
duke@435 | 174 | int i; |
duke@435 | 175 | for (i = 0; i < _table_size; ++i) { |
zgu@3900 | 176 | for (BasicHashtableEntry<F>** p = _buckets[i].entry_addr(); |
duke@435 | 177 | *p != NULL; |
duke@435 | 178 | p = (*p)->next_addr()) { |
duke@435 | 179 | if (*top + entry_size() > end) { |
coleenp@2497 | 180 | report_out_of_shared_space(SharedMiscData); |
duke@435 | 181 | } |
zgu@3900 | 182 | *p = (BasicHashtableEntry<F>*)memcpy(*top, *p, entry_size()); |
duke@435 | 183 | *top += entry_size(); |
duke@435 | 184 | } |
duke@435 | 185 | } |
duke@435 | 186 | *plen = (char*)(*top) - (char*)plen - sizeof(*plen); |
duke@435 | 187 | |
duke@435 | 188 | // Set the shared bit. |
duke@435 | 189 | |
duke@435 | 190 | for (i = 0; i < _table_size; ++i) { |
zgu@3900 | 191 | for (BasicHashtableEntry<F>* p = bucket(i); p != NULL; p = p->next()) { |
duke@435 | 192 | p->set_shared(); |
duke@435 | 193 | } |
duke@435 | 194 | } |
duke@435 | 195 | } |
duke@435 | 196 | |
duke@435 | 197 | |
duke@435 | 198 | |
duke@435 | 199 | // Reverse the order of elements in the hash buckets. |
duke@435 | 200 | |
zgu@3900 | 201 | template <class T, MEMFLAGS F> void Hashtable<T, F>::reverse(void* boundary) { |
duke@435 | 202 | |
zgu@3900 | 203 | for (int i = 0; i < this->table_size(); ++i) { |
zgu@3900 | 204 | HashtableEntry<T, F>* high_list = NULL; |
zgu@3900 | 205 | HashtableEntry<T, F>* low_list = NULL; |
zgu@3900 | 206 | HashtableEntry<T, F>* last_low_entry = NULL; |
zgu@3900 | 207 | HashtableEntry<T, F>* p = bucket(i); |
duke@435 | 208 | while (p != NULL) { |
zgu@3900 | 209 | HashtableEntry<T, F>* next = p->next(); |
duke@435 | 210 | if ((void*)p->literal() >= boundary) { |
duke@435 | 211 | p->set_next(high_list); |
duke@435 | 212 | high_list = p; |
duke@435 | 213 | } else { |
duke@435 | 214 | p->set_next(low_list); |
duke@435 | 215 | low_list = p; |
duke@435 | 216 | if (last_low_entry == NULL) { |
duke@435 | 217 | last_low_entry = p; |
duke@435 | 218 | } |
duke@435 | 219 | } |
duke@435 | 220 | p = next; |
duke@435 | 221 | } |
duke@435 | 222 | if (low_list != NULL) { |
duke@435 | 223 | *bucket_addr(i) = low_list; |
duke@435 | 224 | last_low_entry->set_next(high_list); |
duke@435 | 225 | } else { |
duke@435 | 226 | *bucket_addr(i) = high_list; |
duke@435 | 227 | } |
duke@435 | 228 | } |
duke@435 | 229 | } |
duke@435 | 230 | |
duke@435 | 231 | |
duke@435 | 232 | // Dump the hash table buckets. |
duke@435 | 233 | |
zgu@3900 | 234 | template <MEMFLAGS F> void BasicHashtable<F>::copy_buckets(char** top, char* end) { |
zgu@3900 | 235 | intptr_t len = _table_size * sizeof(HashtableBucket<F>); |
duke@435 | 236 | *(intptr_t*)(*top) = len; |
duke@435 | 237 | *top += sizeof(intptr_t); |
duke@435 | 238 | |
duke@435 | 239 | *(intptr_t*)(*top) = _number_of_entries; |
duke@435 | 240 | *top += sizeof(intptr_t); |
duke@435 | 241 | |
duke@435 | 242 | if (*top + len > end) { |
coleenp@2497 | 243 | report_out_of_shared_space(SharedMiscData); |
duke@435 | 244 | } |
zgu@3900 | 245 | _buckets = (HashtableBucket<F>*)memcpy(*top, _buckets, len); |
duke@435 | 246 | *top += len; |
duke@435 | 247 | } |
duke@435 | 248 | |
duke@435 | 249 | |
duke@435 | 250 | #ifndef PRODUCT |
duke@435 | 251 | |
zgu@3900 | 252 | template <class T, MEMFLAGS F> void Hashtable<T, F>::print() { |
duke@435 | 253 | ResourceMark rm; |
duke@435 | 254 | |
zgu@3900 | 255 | for (int i = 0; i < BasicHashtable<F>::table_size(); i++) { |
zgu@3900 | 256 | HashtableEntry<T, F>* entry = bucket(i); |
duke@435 | 257 | while(entry != NULL) { |
duke@435 | 258 | tty->print("%d : ", i); |
duke@435 | 259 | entry->literal()->print(); |
duke@435 | 260 | tty->cr(); |
duke@435 | 261 | entry = entry->next(); |
duke@435 | 262 | } |
duke@435 | 263 | } |
duke@435 | 264 | } |
duke@435 | 265 | |
duke@435 | 266 | |
zgu@3900 | 267 | template <MEMFLAGS F> void BasicHashtable<F>::verify() { |
duke@435 | 268 | int count = 0; |
duke@435 | 269 | for (int i = 0; i < table_size(); i++) { |
zgu@3900 | 270 | for (BasicHashtableEntry<F>* p = bucket(i); p != NULL; p = p->next()) { |
duke@435 | 271 | ++count; |
duke@435 | 272 | } |
duke@435 | 273 | } |
duke@435 | 274 | assert(count == number_of_entries(), "number of hashtable entries incorrect"); |
duke@435 | 275 | } |
duke@435 | 276 | |
duke@435 | 277 | |
duke@435 | 278 | #endif // PRODUCT |
duke@435 | 279 | |
duke@435 | 280 | |
duke@435 | 281 | #ifdef ASSERT |
duke@435 | 282 | |
zgu@3900 | 283 | template <MEMFLAGS F> void BasicHashtable<F>::verify_lookup_length(double load) { |
duke@435 | 284 | if ((double)_lookup_length / (double)_lookup_count > load * 2.0) { |
duke@435 | 285 | warning("Performance bug: SystemDictionary lookup_count=%d " |
duke@435 | 286 | "lookup_length=%d average=%lf load=%f", |
duke@435 | 287 | _lookup_count, _lookup_length, |
duke@435 | 288 | (double) _lookup_length / _lookup_count, load); |
duke@435 | 289 | } |
duke@435 | 290 | } |
duke@435 | 291 | |
duke@435 | 292 | #endif |
coleenp@2497 | 293 | // Explicitly instantiate these types |
zgu@3900 | 294 | template class Hashtable<constantPoolOop, mtClass>; |
zgu@3900 | 295 | template class Hashtable<Symbol*, mtSymbol>; |
zgu@3900 | 296 | template class Hashtable<klassOop, mtClass>; |
zgu@3900 | 297 | template class Hashtable<oop, mtClass>; |
zgu@3900 | 298 | #ifdef SOLARIS |
zgu@3900 | 299 | template class Hashtable<oop, mtSymbol>; |
zgu@3900 | 300 | #endif |
zgu@3900 | 301 | template class Hashtable<oopDesc*, mtSymbol>; |
zgu@3900 | 302 | template class Hashtable<Symbol*, mtClass>; |
zgu@3900 | 303 | template class HashtableEntry<Symbol*, mtSymbol>; |
zgu@3900 | 304 | template class HashtableEntry<Symbol*, mtClass>; |
zgu@3900 | 305 | template class HashtableEntry<oop, mtSymbol>; |
zgu@3900 | 306 | template class BasicHashtableEntry<mtSymbol>; |
zgu@3900 | 307 | template class BasicHashtableEntry<mtCode>; |
zgu@3900 | 308 | template class BasicHashtable<mtClass>; |
zgu@3900 | 309 | template class BasicHashtable<mtSymbol>; |
zgu@3900 | 310 | template class BasicHashtable<mtCode>; |
zgu@3900 | 311 | template class BasicHashtable<mtInternal>; |