1 /* 2 * Copyright (c) 1997, 2010, Oracle and/or its affiliates. All rights reserved. 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * This code is free software; you can redistribute it and/or modify it 6 * under the terms of the GNU General Public License version 2 only, as 7 * published by the Free Software Foundation. 8 * 9 * This code is distributed in the hope that it will be useful, but WITHOUT 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 12 * version 2 for more details (a copy is included in the LICENSE file that 13 * accompanied this code). 14 * 15 * You should have received a copy of the GNU General Public License version 16 * 2 along with this work; if not, write to the Free Software Foundation, 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 18 * 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 20 * or visit www.oracle.com if you need additional information or have any 21 * questions. 22 * 23 */ 24 25 # include "incls/_precompiled.incl" 26 # include "incls/_methodKlass.cpp.incl" 27 28 klassOop methodKlass::create_klass(TRAPS) { 29 methodKlass o; 30 KlassHandle h_this_klass(THREAD, Universe::klassKlassObj()); 31 KlassHandle k = base_create_klass(h_this_klass, header_size(), o.vtbl_value(), CHECK_NULL); 32 // Make sure size calculation is right 33 assert(k()->size() == align_object_size(header_size()), "wrong size for object"); 34 java_lang_Class::create_mirror(k, CHECK_NULL); // Allocate mirror 35 return k(); 36 } 37 38 39 int methodKlass::oop_size(oop obj) const { 40 assert(obj->is_method(), "must be method oop"); 41 return methodOop(obj)->object_size(); 42 } 43 44 45 bool methodKlass::oop_is_parsable(oop obj) const { 46 assert(obj->is_method(), "must be method oop"); 47 return methodOop(obj)->object_is_parsable(); 48 } 49 50 51 methodOop methodKlass::allocate(constMethodHandle xconst, 52 AccessFlags access_flags, TRAPS) { 53 int size = methodOopDesc::object_size(access_flags.is_native()); 54 KlassHandle h_k(THREAD, as_klassOop()); 55 assert(xconst()->is_parsable(), "possible publication protocol violation"); 56 methodOop m = (methodOop)CollectedHeap::permanent_obj_allocate(h_k, size, CHECK_NULL); 57 assert(!m->is_parsable(), "not expecting parsability yet."); 58 59 No_Safepoint_Verifier no_safepoint; // until m becomes parsable below 60 m->set_constMethod(xconst()); 61 m->set_access_flags(access_flags); 62 m->set_method_size(size); 63 m->set_name_index(0); 64 m->set_signature_index(0); 65 #ifdef CC_INTERP 66 m->set_result_index(T_VOID); 67 #endif 68 m->set_constants(NULL); 69 m->set_max_stack(0); 70 m->set_max_locals(0); 71 m->set_intrinsic_id(vmIntrinsics::_none); 72 m->set_method_data(NULL); 73 m->set_interpreter_throwout_count(0); 74 m->set_vtable_index(methodOopDesc::garbage_vtable_index); 75 76 // Fix and bury in methodOop 77 m->set_interpreter_entry(NULL); // sets i2i entry and from_int 78 m->set_adapter_entry(NULL); 79 m->clear_code(); // from_c/from_i get set to c2i/i2i 80 81 if (access_flags.is_native()) { 82 m->clear_native_function(); 83 m->set_signature_handler(NULL); 84 } 85 86 NOT_PRODUCT(m->set_compiled_invocation_count(0);) 87 m->set_interpreter_invocation_count(0); 88 m->invocation_counter()->init(); 89 m->backedge_counter()->init(); 90 m->clear_number_of_breakpoints(); 91 92 assert(m->is_parsable(), "must be parsable here."); 93 assert(m->size() == size, "wrong size for object"); 94 // We should not publish an uprasable object's reference 95 // into one that is parsable, since that presents problems 96 // for the concurrent parallel marking and precleaning phases 97 // of concurrent gc (CMS). 98 xconst->set_method(m); 99 return m; 100 } 101 102 103 void methodKlass::oop_follow_contents(oop obj) { 104 assert (obj->is_method(), "object must be method"); 105 methodOop m = methodOop(obj); 106 // Performance tweak: We skip iterating over the klass pointer since we 107 // know that Universe::methodKlassObj never moves. 108 MarkSweep::mark_and_push(m->adr_constMethod()); 109 MarkSweep::mark_and_push(m->adr_constants()); 110 if (m->method_data() != NULL) { 111 MarkSweep::mark_and_push(m->adr_method_data()); 112 } 113 } 114 115 #ifndef SERIALGC 116 void methodKlass::oop_follow_contents(ParCompactionManager* cm, 117 oop obj) { 118 assert (obj->is_method(), "object must be method"); 119 methodOop m = methodOop(obj); 120 // Performance tweak: We skip iterating over the klass pointer since we 121 // know that Universe::methodKlassObj never moves. 122 PSParallelCompact::mark_and_push(cm, m->adr_constMethod()); 123 PSParallelCompact::mark_and_push(cm, m->adr_constants()); 124 #ifdef COMPILER2 125 if (m->method_data() != NULL) { 126 PSParallelCompact::mark_and_push(cm, m->adr_method_data()); 127 } 128 #endif // COMPILER2 129 } 130 #endif // SERIALGC 131 132 int methodKlass::oop_oop_iterate(oop obj, OopClosure* blk) { 133 assert (obj->is_method(), "object must be method"); 134 methodOop m = methodOop(obj); 135 // Get size before changing pointers. 136 // Don't call size() or oop_size() since that is a virtual call. 137 int size = m->object_size(); 138 // Performance tweak: We skip iterating over the klass pointer since we 139 // know that Universe::methodKlassObj never moves 140 blk->do_oop(m->adr_constMethod()); 141 blk->do_oop(m->adr_constants()); 142 if (m->method_data() != NULL) { 143 blk->do_oop(m->adr_method_data()); 144 } 145 return size; 146 } 147 148 149 int methodKlass::oop_oop_iterate_m(oop obj, OopClosure* blk, MemRegion mr) { 150 assert (obj->is_method(), "object must be method"); 151 methodOop m = methodOop(obj); 152 // Get size before changing pointers. 153 // Don't call size() or oop_size() since that is a virtual call. 154 int size = m->object_size(); 155 // Performance tweak: We skip iterating over the klass pointer since we 156 // know that Universe::methodKlassObj never moves. 157 oop* adr; 158 adr = m->adr_constMethod(); 159 if (mr.contains(adr)) blk->do_oop(adr); 160 adr = m->adr_constants(); 161 if (mr.contains(adr)) blk->do_oop(adr); 162 if (m->method_data() != NULL) { 163 adr = m->adr_method_data(); 164 if (mr.contains(adr)) blk->do_oop(adr); 165 } 166 return size; 167 } 168 169 170 int methodKlass::oop_adjust_pointers(oop obj) { 171 assert(obj->is_method(), "should be method"); 172 methodOop m = methodOop(obj); 173 // Get size before changing pointers. 174 // Don't call size() or oop_size() since that is a virtual call. 175 int size = m->object_size(); 176 // Performance tweak: We skip iterating over the klass pointer since we 177 // know that Universe::methodKlassObj never moves. 178 MarkSweep::adjust_pointer(m->adr_constMethod()); 179 MarkSweep::adjust_pointer(m->adr_constants()); 180 if (m->method_data() != NULL) { 181 MarkSweep::adjust_pointer(m->adr_method_data()); 182 } 183 return size; 184 } 185 186 #ifndef SERIALGC 187 void methodKlass::oop_push_contents(PSPromotionManager* pm, oop obj) { 188 assert(obj->is_method(), "should be method"); 189 } 190 191 int methodKlass::oop_update_pointers(ParCompactionManager* cm, oop obj) { 192 assert(obj->is_method(), "should be method"); 193 methodOop m = methodOop(obj); 194 PSParallelCompact::adjust_pointer(m->adr_constMethod()); 195 PSParallelCompact::adjust_pointer(m->adr_constants()); 196 #ifdef COMPILER2 197 if (m->method_data() != NULL) { 198 PSParallelCompact::adjust_pointer(m->adr_method_data()); 199 } 200 #endif // COMPILER2 201 return m->object_size(); 202 } 203 204 int methodKlass::oop_update_pointers(ParCompactionManager* cm, oop obj, 205 HeapWord* beg_addr, HeapWord* end_addr) { 206 assert(obj->is_method(), "should be method"); 207 208 oop* p; 209 methodOop m = methodOop(obj); 210 211 p = m->adr_constMethod(); 212 PSParallelCompact::adjust_pointer(p, beg_addr, end_addr); 213 p = m->adr_constants(); 214 PSParallelCompact::adjust_pointer(p, beg_addr, end_addr); 215 216 #ifdef COMPILER2 217 if (m->method_data() != NULL) { 218 p = m->adr_method_data(); 219 PSParallelCompact::adjust_pointer(p, beg_addr, end_addr); 220 } 221 #endif // COMPILER2 222 return m->object_size(); 223 } 224 #endif // SERIALGC 225 226 #ifndef PRODUCT 227 228 // Printing 229 230 void methodKlass::oop_print_on(oop obj, outputStream* st) { 231 ResourceMark rm; 232 assert(obj->is_method(), "must be method"); 233 Klass::oop_print_on(obj, st); 234 methodOop m = methodOop(obj); 235 // get the effect of PrintOopAddress, always, for methods: 236 st->print_cr(" - this oop: "INTPTR_FORMAT, (intptr_t)m); 237 st->print (" - method holder: "); m->method_holder()->print_value_on(st); st->cr(); 238 st->print (" - constants: "INTPTR_FORMAT" ", (address)m->constants()); 239 m->constants()->print_value_on(st); st->cr(); 240 st->print (" - access: 0x%x ", m->access_flags().as_int()); m->access_flags().print_on(st); st->cr(); 241 st->print (" - name: "); m->name()->print_value_on(st); st->cr(); 242 st->print (" - signature: "); m->signature()->print_value_on(st); st->cr(); 243 st->print_cr(" - max stack: %d", m->max_stack()); 244 st->print_cr(" - max locals: %d", m->max_locals()); 245 st->print_cr(" - size of params: %d", m->size_of_parameters()); 246 st->print_cr(" - method size: %d", m->method_size()); 247 if (m->intrinsic_id() != vmIntrinsics::_none) 248 st->print_cr(" - intrinsic id: %d %s", m->intrinsic_id(), vmIntrinsics::name_at(m->intrinsic_id())); 249 if (m->highest_comp_level() != CompLevel_none) 250 st->print_cr(" - highest level: %d", m->highest_comp_level()); 251 st->print_cr(" - vtable index: %d", m->_vtable_index); 252 st->print_cr(" - i2i entry: " INTPTR_FORMAT, m->interpreter_entry()); 253 st->print_cr(" - adapter: " INTPTR_FORMAT, m->adapter()); 254 st->print_cr(" - compiled entry " INTPTR_FORMAT, m->from_compiled_entry()); 255 st->print_cr(" - code size: %d", m->code_size()); 256 if (m->code_size() != 0) { 257 st->print_cr(" - code start: " INTPTR_FORMAT, m->code_base()); 258 st->print_cr(" - code end (excl): " INTPTR_FORMAT, m->code_base() + m->code_size()); 259 } 260 if (m->method_data() != NULL) { 261 st->print_cr(" - method data: " INTPTR_FORMAT, (address)m->method_data()); 262 } 263 st->print_cr(" - checked ex length: %d", m->checked_exceptions_length()); 264 if (m->checked_exceptions_length() > 0) { 265 CheckedExceptionElement* table = m->checked_exceptions_start(); 266 st->print_cr(" - checked ex start: " INTPTR_FORMAT, table); 267 if (Verbose) { 268 for (int i = 0; i < m->checked_exceptions_length(); i++) { 269 st->print_cr(" - throws %s", m->constants()->printable_name_at(table[i].class_cp_index)); 270 } 271 } 272 } 273 if (m->has_linenumber_table()) { 274 u_char* table = m->compressed_linenumber_table(); 275 st->print_cr(" - linenumber start: " INTPTR_FORMAT, table); 276 if (Verbose) { 277 CompressedLineNumberReadStream stream(table); 278 while (stream.read_pair()) { 279 st->print_cr(" - line %d: %d", stream.line(), stream.bci()); 280 } 281 } 282 } 283 st->print_cr(" - localvar length: %d", m->localvariable_table_length()); 284 if (m->localvariable_table_length() > 0) { 285 LocalVariableTableElement* table = m->localvariable_table_start(); 286 st->print_cr(" - localvar start: " INTPTR_FORMAT, table); 287 if (Verbose) { 288 for (int i = 0; i < m->localvariable_table_length(); i++) { 289 int bci = table[i].start_bci; 290 int len = table[i].length; 291 const char* name = m->constants()->printable_name_at(table[i].name_cp_index); 292 const char* desc = m->constants()->printable_name_at(table[i].descriptor_cp_index); 293 int slot = table[i].slot; 294 st->print_cr(" - %s %s bci=%d len=%d slot=%d", desc, name, bci, len, slot); 295 } 296 } 297 } 298 if (m->code() != NULL) { 299 st->print (" - compiled code: "); 300 m->code()->print_value_on(st); 301 st->cr(); 302 } 303 if (m->is_method_handle_invoke()) { 304 st->print_cr(" - invoke method type: " INTPTR_FORMAT, (address) m->method_handle_type()); 305 // m is classified as native, but it does not have an interesting 306 // native_function or signature handler 307 } else if (m->is_native()) { 308 st->print_cr(" - native function: " INTPTR_FORMAT, m->native_function()); 309 st->print_cr(" - signature handler: " INTPTR_FORMAT, m->signature_handler()); 310 } 311 } 312 313 #endif //PRODUCT 314 315 void methodKlass::oop_print_value_on(oop obj, outputStream* st) { 316 assert(obj->is_method(), "must be method"); 317 Klass::oop_print_value_on(obj, st); 318 methodOop m = methodOop(obj); 319 st->print(" "); 320 m->name()->print_value_on(st); 321 st->print(" "); 322 m->signature()->print_value_on(st); 323 st->print(" in "); 324 m->method_holder()->print_value_on(st); 325 if (WizardMode) st->print("[%d,%d]", m->size_of_parameters(), m->max_locals()); 326 if (WizardMode && m->code() != NULL) st->print(" ((nmethod*)%p)", m->code()); 327 } 328 329 const char* methodKlass::internal_name() const { 330 return "{method}"; 331 } 332 333 334 // Verification 335 336 void methodKlass::oop_verify_on(oop obj, outputStream* st) { 337 Klass::oop_verify_on(obj, st); 338 guarantee(obj->is_method(), "object must be method"); 339 if (!obj->partially_loaded()) { 340 methodOop m = methodOop(obj); 341 guarantee(m->is_perm(), "should be in permspace"); 342 guarantee(m->name()->is_perm(), "should be in permspace"); 343 guarantee(m->name()->is_symbol(), "should be symbol"); 344 guarantee(m->signature()->is_perm(), "should be in permspace"); 345 guarantee(m->signature()->is_symbol(), "should be symbol"); 346 guarantee(m->constants()->is_perm(), "should be in permspace"); 347 guarantee(m->constants()->is_constantPool(), "should be constant pool"); 348 guarantee(m->constMethod()->is_constMethod(), "should be constMethodOop"); 349 guarantee(m->constMethod()->is_perm(), "should be in permspace"); 350 methodDataOop method_data = m->method_data(); 351 guarantee(method_data == NULL || 352 method_data->is_perm(), "should be in permspace"); 353 guarantee(method_data == NULL || 354 method_data->is_methodData(), "should be method data"); 355 } 356 } 357 358 bool methodKlass::oop_partially_loaded(oop obj) const { 359 assert(obj->is_method(), "object must be method"); 360 methodOop m = methodOop(obj); 361 constMethodOop xconst = m->constMethod(); 362 assert(xconst != NULL, "const method must be set"); 363 constMethodKlass* ck = constMethodKlass::cast(xconst->klass()); 364 return ck->oop_partially_loaded(xconst); 365 } 366 367 368 void methodKlass::oop_set_partially_loaded(oop obj) { 369 assert(obj->is_method(), "object must be method"); 370 methodOop m = methodOop(obj); 371 constMethodOop xconst = m->constMethod(); 372 assert(xconst != NULL, "const method must be set"); 373 constMethodKlass* ck = constMethodKlass::cast(xconst->klass()); 374 ck->oop_set_partially_loaded(xconst); 375 }