Mon, 12 Aug 2019 18:30:40 +0300
8223147: JFR Backport
8199712: Flight Recorder
8203346: JFR: Inconsistent signature of jfr_add_string_constant
8195817: JFR.stop should require name of recording
8195818: JFR.start should increase autogenerated name by one
8195819: Remove recording=x from jcmd JFR.check output
8203921: JFR thread sampling is missing fixes from JDK-8194552
8203929: Limit amount of data for JFR.dump
8203664: JFR start failure after AppCDS archive created with JFR StartFlightRecording
8003209: JFR events for network utilization
8207392: [PPC64] Implement JFR profiling
8202835: jfr/event/os/TestSystemProcess.java fails on missing events
Summary: Backport JFR from JDK11. Initial integration
Reviewed-by: neugens
duke@435 | 1 | /* |
mikael@6198 | 2 | * Copyright (c) 1999, 2013, 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 "ci/ciInstanceKlass.hpp" |
stefank@2314 | 27 | #include "ci/ciObjArrayKlass.hpp" |
stefank@2314 | 28 | #include "ci/ciSymbol.hpp" |
stefank@2314 | 29 | #include "ci/ciUtilities.hpp" |
stefank@2314 | 30 | #include "oops/objArrayKlass.hpp" |
duke@435 | 31 | |
duke@435 | 32 | // ciObjArrayKlass |
duke@435 | 33 | // |
coleenp@4037 | 34 | // This class represents a Klass* in the HotSpot virtual machine |
coleenp@4142 | 35 | // whose Klass part is an ObjArrayKlass. |
duke@435 | 36 | |
duke@435 | 37 | // ------------------------------------------------------------------ |
duke@435 | 38 | // ciObjArrayKlass::ciObjArrayKlass |
duke@435 | 39 | // |
duke@435 | 40 | // Constructor for loaded object array klasses. |
duke@435 | 41 | ciObjArrayKlass::ciObjArrayKlass(KlassHandle h_k) : ciArrayKlass(h_k) { |
duke@435 | 42 | assert(get_Klass()->oop_is_objArray(), "wrong type"); |
coleenp@4142 | 43 | Klass* element_Klass = get_ObjArrayKlass()->bottom_klass(); |
coleenp@4037 | 44 | _base_element_klass = CURRENT_ENV->get_klass(element_Klass); |
duke@435 | 45 | assert(_base_element_klass->is_instance_klass() || |
duke@435 | 46 | _base_element_klass->is_type_array_klass(), "bad base klass"); |
duke@435 | 47 | if (dimension() == 1) { |
duke@435 | 48 | _element_klass = _base_element_klass; |
duke@435 | 49 | } else { |
duke@435 | 50 | _element_klass = NULL; |
duke@435 | 51 | } |
duke@435 | 52 | if (!ciObjectFactory::is_initialized()) { |
duke@435 | 53 | assert(_element_klass->is_java_lang_Object(), "only arrays of object are shared"); |
duke@435 | 54 | } |
duke@435 | 55 | } |
duke@435 | 56 | |
duke@435 | 57 | // ------------------------------------------------------------------ |
duke@435 | 58 | // ciObjArrayKlass::ciObjArrayKlass |
duke@435 | 59 | // |
duke@435 | 60 | // Constructor for unloaded object array klasses. |
duke@435 | 61 | ciObjArrayKlass::ciObjArrayKlass(ciSymbol* array_name, |
duke@435 | 62 | ciKlass* base_element_klass, |
duke@435 | 63 | int dimension) |
duke@435 | 64 | : ciArrayKlass(array_name, |
coleenp@4037 | 65 | dimension, T_OBJECT) { |
duke@435 | 66 | _base_element_klass = base_element_klass; |
duke@435 | 67 | assert(_base_element_klass->is_instance_klass() || |
duke@435 | 68 | _base_element_klass->is_type_array_klass(), "bad base klass"); |
duke@435 | 69 | if (dimension == 1) { |
duke@435 | 70 | _element_klass = base_element_klass; |
duke@435 | 71 | } else { |
duke@435 | 72 | _element_klass = NULL; |
duke@435 | 73 | } |
duke@435 | 74 | } |
duke@435 | 75 | |
duke@435 | 76 | // ------------------------------------------------------------------ |
duke@435 | 77 | // ciObjArrayKlass::element_klass |
duke@435 | 78 | // |
duke@435 | 79 | // What is the one-level element type of this array? |
duke@435 | 80 | ciKlass* ciObjArrayKlass::element_klass() { |
duke@435 | 81 | if (_element_klass == NULL) { |
duke@435 | 82 | assert(dimension() > 1, "_element_klass should not be NULL"); |
duke@435 | 83 | // Produce the element klass. |
duke@435 | 84 | if (is_loaded()) { |
duke@435 | 85 | VM_ENTRY_MARK; |
coleenp@4142 | 86 | Klass* element_Klass = get_ObjArrayKlass()->element_klass(); |
coleenp@4037 | 87 | _element_klass = CURRENT_THREAD_ENV->get_klass(element_Klass); |
duke@435 | 88 | } else { |
duke@435 | 89 | VM_ENTRY_MARK; |
duke@435 | 90 | // We are an unloaded array klass. Attempt to fetch our |
duke@435 | 91 | // element klass by name. |
duke@435 | 92 | _element_klass = CURRENT_THREAD_ENV->get_klass_by_name_impl( |
duke@435 | 93 | this, |
jrose@2982 | 94 | constantPoolHandle(), |
duke@435 | 95 | construct_array_name(base_element_klass()->name(), |
duke@435 | 96 | dimension() - 1), |
duke@435 | 97 | false); |
duke@435 | 98 | } |
duke@435 | 99 | } |
duke@435 | 100 | return _element_klass; |
duke@435 | 101 | } |
duke@435 | 102 | |
duke@435 | 103 | // ------------------------------------------------------------------ |
duke@435 | 104 | // ciObjArrayKlass::construct_array_name |
duke@435 | 105 | // |
duke@435 | 106 | // Build an array name from an element name and a dimension. |
duke@435 | 107 | ciSymbol* ciObjArrayKlass::construct_array_name(ciSymbol* element_name, |
duke@435 | 108 | int dimension) { |
duke@435 | 109 | EXCEPTION_CONTEXT; |
duke@435 | 110 | int element_len = element_name->utf8_length(); |
duke@435 | 111 | |
coleenp@2497 | 112 | Symbol* base_name_sym = element_name->get_symbol(); |
duke@435 | 113 | char* name; |
duke@435 | 114 | |
duke@435 | 115 | if (base_name_sym->byte_at(0) == '[' || |
duke@435 | 116 | (base_name_sym->byte_at(0) == 'L' && // watch package name 'Lxx' |
duke@435 | 117 | base_name_sym->byte_at(element_len-1) == ';')) { |
duke@435 | 118 | |
duke@435 | 119 | int new_len = element_len + dimension + 1; // for the ['s and '\0' |
duke@435 | 120 | name = CURRENT_THREAD_ENV->name_buffer(new_len); |
duke@435 | 121 | |
duke@435 | 122 | int pos = 0; |
duke@435 | 123 | for ( ; pos < dimension; pos++) { |
duke@435 | 124 | name[pos] = '['; |
duke@435 | 125 | } |
duke@435 | 126 | strncpy(name+pos, (char*)element_name->base(), element_len); |
duke@435 | 127 | name[new_len-1] = '\0'; |
duke@435 | 128 | } else { |
duke@435 | 129 | int new_len = 3 // for L, ;, and '\0' |
duke@435 | 130 | + dimension // for ['s |
duke@435 | 131 | + element_len; |
duke@435 | 132 | |
duke@435 | 133 | name = CURRENT_THREAD_ENV->name_buffer(new_len); |
duke@435 | 134 | int pos = 0; |
duke@435 | 135 | for ( ; pos < dimension; pos++) { |
duke@435 | 136 | name[pos] = '['; |
duke@435 | 137 | } |
duke@435 | 138 | name[pos++] = 'L'; |
duke@435 | 139 | strncpy(name+pos, (char*)element_name->base(), element_len); |
duke@435 | 140 | name[new_len-2] = ';'; |
duke@435 | 141 | name[new_len-1] = '\0'; |
duke@435 | 142 | } |
duke@435 | 143 | return ciSymbol::make(name); |
duke@435 | 144 | } |
duke@435 | 145 | |
duke@435 | 146 | // ------------------------------------------------------------------ |
duke@435 | 147 | // ciObjArrayKlass::make_impl |
duke@435 | 148 | // |
duke@435 | 149 | // Implementation of make. |
duke@435 | 150 | ciObjArrayKlass* ciObjArrayKlass::make_impl(ciKlass* element_klass) { |
duke@435 | 151 | |
duke@435 | 152 | if (element_klass->is_loaded()) { |
duke@435 | 153 | EXCEPTION_CONTEXT; |
duke@435 | 154 | // The element klass is loaded |
coleenp@4037 | 155 | Klass* array = element_klass->get_Klass()->array_klass(THREAD); |
duke@435 | 156 | if (HAS_PENDING_EXCEPTION) { |
duke@435 | 157 | CLEAR_PENDING_EXCEPTION; |
duke@435 | 158 | CURRENT_THREAD_ENV->record_out_of_memory_failure(); |
duke@435 | 159 | return ciEnv::unloaded_ciobjarrayklass(); |
duke@435 | 160 | } |
coleenp@4037 | 161 | return CURRENT_THREAD_ENV->get_obj_array_klass(array); |
duke@435 | 162 | } |
duke@435 | 163 | |
duke@435 | 164 | // The array klass was unable to be made or the element klass was |
duke@435 | 165 | // not loaded. |
duke@435 | 166 | ciSymbol* array_name = construct_array_name(element_klass->name(), 1); |
duke@435 | 167 | if (array_name == ciEnv::unloaded_cisymbol()) { |
duke@435 | 168 | return ciEnv::unloaded_ciobjarrayklass(); |
duke@435 | 169 | } |
duke@435 | 170 | return |
duke@435 | 171 | CURRENT_ENV->get_unloaded_klass(element_klass, array_name) |
duke@435 | 172 | ->as_obj_array_klass(); |
duke@435 | 173 | } |
duke@435 | 174 | |
duke@435 | 175 | // ------------------------------------------------------------------ |
duke@435 | 176 | // ciObjArrayKlass::make |
duke@435 | 177 | // |
duke@435 | 178 | // Make an array klass corresponding to the specified primitive type. |
duke@435 | 179 | ciObjArrayKlass* ciObjArrayKlass::make(ciKlass* element_klass) { |
duke@435 | 180 | GUARDED_VM_ENTRY(return make_impl(element_klass);) |
duke@435 | 181 | } |
roland@5914 | 182 | |
roland@5914 | 183 | ciKlass* ciObjArrayKlass::exact_klass() { |
roland@5914 | 184 | ciType* base = base_element_type(); |
roland@5914 | 185 | if (base->is_instance_klass()) { |
roland@5914 | 186 | ciInstanceKlass* ik = base->as_instance_klass(); |
roland@5914 | 187 | if (ik->exact_klass() != NULL) { |
roland@5914 | 188 | return this; |
roland@5914 | 189 | } |
roland@5914 | 190 | } else if (base->is_primitive_type()) { |
roland@5914 | 191 | return this; |
roland@5914 | 192 | } |
roland@5914 | 193 | return NULL; |
roland@5914 | 194 | } |