Fri, 13 Jul 2012 20:14:27 -0400
Merge
mgerdin@3619 | 1 | /* |
mgerdin@3619 | 2 | * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved. |
mgerdin@3619 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
mgerdin@3619 | 4 | * |
mgerdin@3619 | 5 | * This code is free software; you can redistribute it and/or modify it |
mgerdin@3619 | 6 | * under the terms of the GNU General Public License version 2 only, as |
mgerdin@3619 | 7 | * published by the Free Software Foundation. |
mgerdin@3619 | 8 | * |
mgerdin@3619 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
mgerdin@3619 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
mgerdin@3619 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
mgerdin@3619 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
mgerdin@3619 | 13 | * accompanied this code). |
mgerdin@3619 | 14 | * |
mgerdin@3619 | 15 | * You should have received a copy of the GNU General Public License version |
mgerdin@3619 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
mgerdin@3619 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
mgerdin@3619 | 18 | * |
mgerdin@3619 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
mgerdin@3619 | 20 | * or visit www.oracle.com if you need additional information or have any |
mgerdin@3619 | 21 | * questions. |
mgerdin@3619 | 22 | * |
mgerdin@3619 | 23 | */ |
mgerdin@3619 | 24 | |
mgerdin@3619 | 25 | #include "precompiled.hpp" |
mgerdin@3619 | 26 | |
mgerdin@3619 | 27 | #include "memory/universe.hpp" |
mgerdin@3619 | 28 | #include "oops/oop.inline.hpp" |
nloodin@3681 | 29 | |
nloodin@3681 | 30 | #include "classfile/symbolTable.hpp" |
nloodin@3681 | 31 | |
mgerdin@3619 | 32 | #include "prims/whitebox.hpp" |
nloodin@3681 | 33 | #include "prims/wbtestmethods/parserTests.hpp" |
nloodin@3681 | 34 | |
mgerdin@3619 | 35 | #include "runtime/interfaceSupport.hpp" |
mgerdin@3619 | 36 | #include "runtime/os.hpp" |
mgerdin@3619 | 37 | #include "utilities/debug.hpp" |
mgerdin@3619 | 38 | |
mgerdin@3619 | 39 | #ifndef SERIALGC |
mgerdin@3619 | 40 | #include "gc_implementation/g1/concurrentMark.hpp" |
mgerdin@3619 | 41 | #include "gc_implementation/g1/g1CollectedHeap.inline.hpp" |
mgerdin@3619 | 42 | #include "gc_implementation/g1/heapRegionRemSet.hpp" |
mgerdin@3619 | 43 | #endif // !SERIALGC |
mgerdin@3619 | 44 | |
mgerdin@3619 | 45 | bool WhiteBox::_used = false; |
mgerdin@3619 | 46 | |
mgerdin@3619 | 47 | WB_ENTRY(jlong, WB_GetObjectAddress(JNIEnv* env, jobject o, jobject obj)) |
mgerdin@3619 | 48 | return (jlong)(void*)JNIHandles::resolve(obj); |
mgerdin@3619 | 49 | WB_END |
mgerdin@3619 | 50 | |
mgerdin@3619 | 51 | WB_ENTRY(jint, WB_GetHeapOopSize(JNIEnv* env, jobject o)) |
mgerdin@3619 | 52 | return heapOopSize; |
mgerdin@3619 | 53 | WB_END |
mgerdin@3619 | 54 | |
mgerdin@3619 | 55 | #ifndef SERIALGC |
mgerdin@3619 | 56 | WB_ENTRY(jboolean, WB_G1IsHumongous(JNIEnv* env, jobject o, jobject obj)) |
mgerdin@3619 | 57 | G1CollectedHeap* g1 = G1CollectedHeap::heap(); |
mgerdin@3619 | 58 | oop result = JNIHandles::resolve(obj); |
mgerdin@3619 | 59 | const HeapRegion* hr = g1->heap_region_containing(result); |
mgerdin@3619 | 60 | return hr->isHumongous(); |
mgerdin@3619 | 61 | WB_END |
mgerdin@3619 | 62 | |
mgerdin@3619 | 63 | WB_ENTRY(jlong, WB_G1NumFreeRegions(JNIEnv* env, jobject o)) |
mgerdin@3619 | 64 | G1CollectedHeap* g1 = G1CollectedHeap::heap(); |
mgerdin@3619 | 65 | size_t nr = g1->free_regions(); |
mgerdin@3619 | 66 | return (jlong)nr; |
mgerdin@3619 | 67 | WB_END |
mgerdin@3619 | 68 | |
mgerdin@3619 | 69 | WB_ENTRY(jboolean, WB_G1InConcurrentMark(JNIEnv* env, jobject o)) |
mgerdin@3619 | 70 | G1CollectedHeap* g1 = G1CollectedHeap::heap(); |
mgerdin@3619 | 71 | ConcurrentMark* cm = g1->concurrent_mark(); |
mgerdin@3619 | 72 | return cm->concurrent_marking_in_progress(); |
mgerdin@3619 | 73 | WB_END |
mgerdin@3619 | 74 | |
mgerdin@3619 | 75 | WB_ENTRY(jint, WB_G1RegionSize(JNIEnv* env, jobject o)) |
mgerdin@3619 | 76 | return (jint)HeapRegion::GrainBytes; |
mgerdin@3619 | 77 | WB_END |
mgerdin@3619 | 78 | #endif // !SERIALGC |
mgerdin@3619 | 79 | |
nloodin@3681 | 80 | //Some convenience methods to deal with objects from java |
nloodin@3681 | 81 | int WhiteBox::offset_for_field(const char* field_name, oop object, |
nloodin@3681 | 82 | Symbol* signature_symbol) { |
nloodin@3681 | 83 | assert(field_name != NULL && strlen(field_name) > 0, "Field name not valid"); |
nloodin@3681 | 84 | Thread* THREAD = Thread::current(); |
nloodin@3681 | 85 | |
nloodin@3681 | 86 | //Get the class of our object |
nloodin@3681 | 87 | klassOop arg_klass = object->klass(); |
nloodin@3681 | 88 | //Turn it into an instance-klass |
nloodin@3681 | 89 | instanceKlass* ik = instanceKlass::cast(arg_klass); |
nloodin@3681 | 90 | |
nloodin@3681 | 91 | //Create symbols to look for in the class |
nloodin@3681 | 92 | TempNewSymbol name_symbol = SymbolTable::lookup(field_name, (int) strlen(field_name), |
nloodin@3681 | 93 | THREAD); |
nloodin@3681 | 94 | |
nloodin@3681 | 95 | //To be filled in with an offset of the field we're looking for |
nloodin@3681 | 96 | fieldDescriptor fd; |
nloodin@3681 | 97 | |
nloodin@3681 | 98 | klassOop res = ik->find_field(name_symbol, signature_symbol, &fd); |
nloodin@3681 | 99 | if (res == NULL) { |
nloodin@3681 | 100 | tty->print_cr("Invalid layout of %s at %s", ik->external_name(), |
nloodin@3681 | 101 | name_symbol->as_C_string()); |
nloodin@3681 | 102 | fatal("Invalid layout of preloaded class"); |
nloodin@3681 | 103 | } |
nloodin@3681 | 104 | |
nloodin@3681 | 105 | //fetch the field at the offset we've found |
nloodin@3681 | 106 | int dest_offset = fd.offset(); |
nloodin@3681 | 107 | |
nloodin@3681 | 108 | return dest_offset; |
nloodin@3681 | 109 | } |
nloodin@3681 | 110 | |
nloodin@3681 | 111 | |
nloodin@3681 | 112 | const char* WhiteBox::lookup_jstring(const char* field_name, oop object) { |
nloodin@3681 | 113 | int offset = offset_for_field(field_name, object, |
nloodin@3681 | 114 | vmSymbols::string_signature()); |
nloodin@3681 | 115 | oop string = object->obj_field(offset); |
sla@3905 | 116 | if (string == NULL) { |
sla@3905 | 117 | return NULL; |
sla@3905 | 118 | } |
nloodin@3681 | 119 | const char* ret = java_lang_String::as_utf8_string(string); |
nloodin@3681 | 120 | return ret; |
nloodin@3681 | 121 | } |
nloodin@3681 | 122 | |
nloodin@3681 | 123 | bool WhiteBox::lookup_bool(const char* field_name, oop object) { |
nloodin@3681 | 124 | int offset = |
nloodin@3681 | 125 | offset_for_field(field_name, object, vmSymbols::bool_signature()); |
nloodin@3681 | 126 | bool ret = (object->bool_field(offset) == JNI_TRUE); |
nloodin@3681 | 127 | return ret; |
nloodin@3681 | 128 | } |
nloodin@3681 | 129 | |
nloodin@3681 | 130 | |
mgerdin@3619 | 131 | #define CC (char*) |
mgerdin@3619 | 132 | |
mgerdin@3619 | 133 | static JNINativeMethod methods[] = { |
mgerdin@3619 | 134 | {CC"getObjectAddress", CC"(Ljava/lang/Object;)J", (void*)&WB_GetObjectAddress }, |
mgerdin@3619 | 135 | {CC"getHeapOopSize", CC"()I", (void*)&WB_GetHeapOopSize }, |
nloodin@3681 | 136 | {CC "parseCommandLine", |
nloodin@3681 | 137 | CC "(Ljava/lang/String;[Lsun/hotspot/parser/DiagnosticCommand;)[Ljava/lang/Object;", |
nloodin@3681 | 138 | (void*) &WB_ParseCommandLine |
nloodin@3681 | 139 | }, |
mgerdin@3619 | 140 | #ifndef SERIALGC |
mgerdin@3619 | 141 | {CC"g1InConcurrentMark", CC"()Z", (void*)&WB_G1InConcurrentMark}, |
mgerdin@3619 | 142 | {CC"g1IsHumongous", CC"(Ljava/lang/Object;)Z", (void*)&WB_G1IsHumongous }, |
mgerdin@3619 | 143 | {CC"g1NumFreeRegions", CC"()J", (void*)&WB_G1NumFreeRegions }, |
mgerdin@3619 | 144 | {CC"g1RegionSize", CC"()I", (void*)&WB_G1RegionSize }, |
mgerdin@3619 | 145 | #endif // !SERIALGC |
mgerdin@3619 | 146 | }; |
mgerdin@3619 | 147 | |
mgerdin@3619 | 148 | #undef CC |
mgerdin@3619 | 149 | |
mgerdin@3619 | 150 | JVM_ENTRY(void, JVM_RegisterWhiteBoxMethods(JNIEnv* env, jclass wbclass)) |
mgerdin@3619 | 151 | { |
mgerdin@3619 | 152 | if (WhiteBoxAPI) { |
mgerdin@3619 | 153 | // Make sure that wbclass is loaded by the null classloader |
mgerdin@3619 | 154 | instanceKlassHandle ikh = instanceKlassHandle(JNIHandles::resolve(wbclass)->klass()); |
mgerdin@3619 | 155 | Handle loader(ikh->class_loader()); |
mgerdin@3619 | 156 | if (loader.is_null()) { |
mgerdin@3619 | 157 | ThreadToNativeFromVM ttnfv(thread); // can't be in VM when we call JNI |
mgerdin@3619 | 158 | jint result = env->RegisterNatives(wbclass, methods, sizeof(methods)/sizeof(methods[0])); |
mgerdin@3619 | 159 | if (result == 0) { |
mgerdin@3619 | 160 | WhiteBox::set_used(); |
mgerdin@3619 | 161 | } |
mgerdin@3619 | 162 | } |
mgerdin@3619 | 163 | } |
mgerdin@3619 | 164 | } |
mgerdin@3619 | 165 | JVM_END |