1 /* 2 * Copyright (c) 1998, 2013, 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 "precompiled.hpp" 26 #include "code/codeBlob.hpp" 27 #include "code/codeCache.hpp" 28 #include "code/relocInfo.hpp" 29 #include "compiler/disassembler.hpp" 30 #include "interpreter/bytecode.hpp" 31 #include "memory/allocation.inline.hpp" 32 #include "memory/heap.hpp" 33 #include "oops/oop.inline.hpp" 34 #include "prims/forte.hpp" 35 #include "runtime/handles.inline.hpp" 36 #include "runtime/interfaceSupport.hpp" 37 #include "runtime/mutexLocker.hpp" 38 #include "runtime/safepoint.hpp" 39 #include "runtime/sharedRuntime.hpp" 40 #include "runtime/vframe.hpp" 41 #include "services/memoryService.hpp" 42 #ifdef TARGET_ARCH_x86 43 # include "nativeInst_x86.hpp" 44 #endif 45 #ifdef TARGET_ARCH_sparc 46 # include "nativeInst_sparc.hpp" 47 #endif 48 #ifdef TARGET_ARCH_zero 49 # include "nativeInst_zero.hpp" 50 #endif 51 #ifdef TARGET_ARCH_arm 52 # include "nativeInst_arm.hpp" 53 #endif 54 #ifdef TARGET_ARCH_ppc 55 # include "nativeInst_ppc.hpp" 56 #endif 57 #ifdef COMPILER1 58 #include "c1/c1_Runtime1.hpp" 59 #endif 60 61 unsigned int align_code_offset(int offset) { 62 // align the size to CodeEntryAlignment 63 return 64 ((offset + (int)CodeHeap::header_size() + (CodeEntryAlignment-1)) & ~(CodeEntryAlignment-1)) 65 - (int)CodeHeap::header_size(); 66 } 67 68 69 // This must be consistent with the CodeBlob constructor's layout actions. 70 unsigned int CodeBlob::allocation_size(CodeBuffer* cb, int header_size) { 71 unsigned int size = header_size; 72 size += round_to(cb->total_relocation_size(), oopSize); 73 // align the size to CodeEntryAlignment 74 size = align_code_offset(size); 75 size += round_to(cb->total_content_size(), oopSize); 76 size += round_to(cb->total_oop_size(), oopSize); 77 size += round_to(cb->total_metadata_size(), oopSize); 78 return size; 79 } 80 81 82 // Creates a simple CodeBlob. Sets up the size of the different regions. 83 CodeBlob::CodeBlob(const char* name, int header_size, int size, int frame_complete, int locs_size) { 84 assert(size == round_to(size, oopSize), "unaligned size"); 85 assert(locs_size == round_to(locs_size, oopSize), "unaligned size"); 86 assert(header_size == round_to(header_size, oopSize), "unaligned size"); 87 assert(!UseRelocIndex, "no space allocated for reloc index yet"); 88 89 // Note: If UseRelocIndex is enabled, there needs to be (at least) one 90 // extra word for the relocation information, containing the reloc 91 // index table length. Unfortunately, the reloc index table imple- 92 // mentation is not easily understandable and thus it is not clear 93 // what exactly the format is supposed to be. For now, we just turn 94 // off the use of this table (gri 7/6/2000). 95 96 _name = name; 97 _size = size; 98 _frame_complete_offset = frame_complete; 99 _header_size = header_size; 100 _relocation_size = locs_size; 101 _content_offset = align_code_offset(header_size + _relocation_size); 102 _code_offset = _content_offset; 103 _data_offset = size; 104 _frame_size = 0; 105 set_oop_maps(NULL); 106 } 107 108 109 // Creates a CodeBlob from a CodeBuffer. Sets up the size of the different regions, 110 // and copy code and relocation info. 111 CodeBlob::CodeBlob( 112 const char* name, 113 CodeBuffer* cb, 114 int header_size, 115 int size, 116 int frame_complete, 117 int frame_size, 118 OopMapSet* oop_maps 119 ) { 120 assert(size == round_to(size, oopSize), "unaligned size"); 121 assert(header_size == round_to(header_size, oopSize), "unaligned size"); 122 123 _name = name; 124 _size = size; 125 _frame_complete_offset = frame_complete; 126 _header_size = header_size; 127 _relocation_size = round_to(cb->total_relocation_size(), oopSize); 128 _content_offset = align_code_offset(header_size + _relocation_size); 129 _code_offset = _content_offset + cb->total_offset_of(cb->insts()); 130 _data_offset = _content_offset + round_to(cb->total_content_size(), oopSize); 131 assert(_data_offset <= size, "codeBlob is too small"); 132 133 cb->copy_code_and_locs_to(this); 134 set_oop_maps(oop_maps); 135 _frame_size = frame_size; 136 #ifdef COMPILER1 137 // probably wrong for tiered 138 assert(_frame_size >= -1, "must use frame size or -1 for runtime stubs"); 139 #endif // COMPILER1 140 } 141 142 143 void CodeBlob::set_oop_maps(OopMapSet* p) { 144 // Danger Will Robinson! This method allocates a big 145 // chunk of memory, its your job to free it. 146 if (p != NULL) { 147 // We need to allocate a chunk big enough to hold the OopMapSet and all of its OopMaps 148 _oop_maps = (OopMapSet* )NEW_C_HEAP_ARRAY(unsigned char, p->heap_size(), mtCode); 149 p->copy_to((address)_oop_maps); 150 } else { 151 _oop_maps = NULL; 152 } 153 } 154 155 156 void CodeBlob::trace_new_stub(CodeBlob* stub, const char* name1, const char* name2) { 157 // Do not hold the CodeCache lock during name formatting. 158 assert(!CodeCache_lock->owned_by_self(), "release CodeCache before registering the stub"); 159 160 if (stub != NULL) { 161 char stub_id[256]; 162 assert(strlen(name1) + strlen(name2) < sizeof(stub_id), ""); 163 jio_snprintf(stub_id, sizeof(stub_id), "%s%s", name1, name2); 164 if (PrintStubCode) { 165 ttyLocker ttyl; 166 tty->print_cr("Decoding %s " INTPTR_FORMAT, stub_id, (intptr_t) stub); 167 Disassembler::decode(stub->code_begin(), stub->code_end()); 168 tty->cr(); 169 } 170 Forte::register_stub(stub_id, stub->code_begin(), stub->code_end()); 171 172 if (JvmtiExport::should_post_dynamic_code_generated()) { 173 const char* stub_name = name2; 174 if (name2[0] == '\0') stub_name = name1; 175 JvmtiExport::post_dynamic_code_generated(stub_name, stub->code_begin(), stub->code_end()); 176 } 177 } 178 179 // Track memory usage statistic after releasing CodeCache_lock 180 MemoryService::track_code_cache_memory_usage(); 181 } 182 183 184 void CodeBlob::flush() { 185 if (_oop_maps) { 186 FREE_C_HEAP_ARRAY(unsigned char, _oop_maps, mtCode); 187 _oop_maps = NULL; 188 } 189 _strings.free(); 190 } 191 192 193 OopMap* CodeBlob::oop_map_for_return_address(address return_address) { 194 assert(oop_maps() != NULL, "nope"); 195 return oop_maps()->find_map_at_offset((intptr_t) return_address - (intptr_t) code_begin()); 196 } 197 198 199 //---------------------------------------------------------------------------------------------------- 200 // Implementation of BufferBlob 201 202 203 BufferBlob::BufferBlob(const char* name, int size) 204 : CodeBlob(name, sizeof(BufferBlob), size, CodeOffsets::frame_never_safe, /*locs_size:*/ 0) 205 {} 206 207 BufferBlob* BufferBlob::create(const char* name, int buffer_size) { 208 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 209 210 BufferBlob* blob = NULL; 211 unsigned int size = sizeof(BufferBlob); 212 // align the size to CodeEntryAlignment 213 size = align_code_offset(size); 214 size += round_to(buffer_size, oopSize); 215 assert(name != NULL, "must provide a name"); 216 { 217 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 218 blob = new (size) BufferBlob(name, size); 219 } 220 // Track memory usage statistic after releasing CodeCache_lock 221 MemoryService::track_code_cache_memory_usage(); 222 223 return blob; 224 } 225 226 227 BufferBlob::BufferBlob(const char* name, int size, CodeBuffer* cb) 228 : CodeBlob(name, cb, sizeof(BufferBlob), size, CodeOffsets::frame_never_safe, 0, NULL) 229 {} 230 231 BufferBlob* BufferBlob::create(const char* name, CodeBuffer* cb) { 232 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 233 234 BufferBlob* blob = NULL; 235 unsigned int size = allocation_size(cb, sizeof(BufferBlob)); 236 assert(name != NULL, "must provide a name"); 237 { 238 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 239 blob = new (size) BufferBlob(name, size, cb); 240 } 241 // Track memory usage statistic after releasing CodeCache_lock 242 MemoryService::track_code_cache_memory_usage(); 243 244 return blob; 245 } 246 247 248 void* BufferBlob::operator new(size_t s, unsigned size, bool is_critical) throw() { 249 void* p = CodeCache::allocate(size, is_critical); 250 return p; 251 } 252 253 254 void BufferBlob::free( BufferBlob *blob ) { 255 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 256 { 257 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 258 CodeCache::free((CodeBlob*)blob); 259 } 260 // Track memory usage statistic after releasing CodeCache_lock 261 MemoryService::track_code_cache_memory_usage(); 262 } 263 264 265 //---------------------------------------------------------------------------------------------------- 266 // Implementation of AdapterBlob 267 268 AdapterBlob::AdapterBlob(int size, CodeBuffer* cb) : 269 BufferBlob("I2C/C2I adapters", size, cb) { 270 CodeCache::commit(this); 271 } 272 273 AdapterBlob* AdapterBlob::create(CodeBuffer* cb) { 274 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 275 276 AdapterBlob* blob = NULL; 277 unsigned int size = allocation_size(cb, sizeof(AdapterBlob)); 278 { 279 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 280 // The parameter 'true' indicates a critical memory allocation. 281 // This means that CodeCacheMinimumFreeSpace is used, if necessary 282 blob = new (size, true) AdapterBlob(size, cb); 283 } 284 // Track memory usage statistic after releasing CodeCache_lock 285 MemoryService::track_code_cache_memory_usage(); 286 287 return blob; 288 } 289 290 291 //---------------------------------------------------------------------------------------------------- 292 // Implementation of MethodHandlesAdapterBlob 293 294 MethodHandlesAdapterBlob* MethodHandlesAdapterBlob::create(int buffer_size) { 295 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 296 297 MethodHandlesAdapterBlob* blob = NULL; 298 unsigned int size = sizeof(MethodHandlesAdapterBlob); 299 // align the size to CodeEntryAlignment 300 size = align_code_offset(size); 301 size += round_to(buffer_size, oopSize); 302 { 303 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 304 // The parameter 'true' indicates a critical memory allocation. 305 // This means that CodeCacheMinimumFreeSpace is used, if necessary 306 blob = new (size, true) MethodHandlesAdapterBlob(size); 307 } 308 // Track memory usage statistic after releasing CodeCache_lock 309 MemoryService::track_code_cache_memory_usage(); 310 311 return blob; 312 } 313 314 315 //---------------------------------------------------------------------------------------------------- 316 // Implementation of RuntimeStub 317 318 RuntimeStub::RuntimeStub( 319 const char* name, 320 CodeBuffer* cb, 321 int size, 322 int frame_complete, 323 int frame_size, 324 OopMapSet* oop_maps, 325 bool caller_must_gc_arguments 326 ) 327 : CodeBlob(name, cb, sizeof(RuntimeStub), size, frame_complete, frame_size, oop_maps) 328 { 329 _caller_must_gc_arguments = caller_must_gc_arguments; 330 } 331 332 333 RuntimeStub* RuntimeStub::new_runtime_stub(const char* stub_name, 334 CodeBuffer* cb, 335 int frame_complete, 336 int frame_size, 337 OopMapSet* oop_maps, 338 bool caller_must_gc_arguments) 339 { 340 RuntimeStub* stub = NULL; 341 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 342 { 343 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 344 unsigned int size = allocation_size(cb, sizeof(RuntimeStub)); 345 stub = new (size) RuntimeStub(stub_name, cb, size, frame_complete, frame_size, oop_maps, caller_must_gc_arguments); 346 } 347 348 trace_new_stub(stub, "RuntimeStub - ", stub_name); 349 350 return stub; 351 } 352 353 354 void* RuntimeStub::operator new(size_t s, unsigned size) throw() { 355 void* p = CodeCache::allocate(size, true); 356 if (!p) fatal("Initial size of CodeCache is too small"); 357 return p; 358 } 359 360 // operator new shared by all singletons: 361 void* SingletonBlob::operator new(size_t s, unsigned size) throw() { 362 void* p = CodeCache::allocate(size, true); 363 if (!p) fatal("Initial size of CodeCache is too small"); 364 return p; 365 } 366 367 368 //---------------------------------------------------------------------------------------------------- 369 // Implementation of DeoptimizationBlob 370 371 DeoptimizationBlob::DeoptimizationBlob( 372 CodeBuffer* cb, 373 int size, 374 OopMapSet* oop_maps, 375 int unpack_offset, 376 int unpack_with_exception_offset, 377 int unpack_with_reexecution_offset, 378 int frame_size 379 ) 380 : SingletonBlob("DeoptimizationBlob", cb, sizeof(DeoptimizationBlob), size, frame_size, oop_maps) 381 { 382 _unpack_offset = unpack_offset; 383 _unpack_with_exception = unpack_with_exception_offset; 384 _unpack_with_reexecution = unpack_with_reexecution_offset; 385 #ifdef COMPILER1 386 _unpack_with_exception_in_tls = -1; 387 #endif 388 } 389 390 391 DeoptimizationBlob* DeoptimizationBlob::create( 392 CodeBuffer* cb, 393 OopMapSet* oop_maps, 394 int unpack_offset, 395 int unpack_with_exception_offset, 396 int unpack_with_reexecution_offset, 397 int frame_size) 398 { 399 DeoptimizationBlob* blob = NULL; 400 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 401 { 402 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 403 unsigned int size = allocation_size(cb, sizeof(DeoptimizationBlob)); 404 blob = new (size) DeoptimizationBlob(cb, 405 size, 406 oop_maps, 407 unpack_offset, 408 unpack_with_exception_offset, 409 unpack_with_reexecution_offset, 410 frame_size); 411 } 412 413 trace_new_stub(blob, "DeoptimizationBlob"); 414 415 return blob; 416 } 417 418 419 //---------------------------------------------------------------------------------------------------- 420 // Implementation of UncommonTrapBlob 421 422 #ifdef COMPILER2 423 UncommonTrapBlob::UncommonTrapBlob( 424 CodeBuffer* cb, 425 int size, 426 OopMapSet* oop_maps, 427 int frame_size 428 ) 429 : SingletonBlob("UncommonTrapBlob", cb, sizeof(UncommonTrapBlob), size, frame_size, oop_maps) 430 {} 431 432 433 UncommonTrapBlob* UncommonTrapBlob::create( 434 CodeBuffer* cb, 435 OopMapSet* oop_maps, 436 int frame_size) 437 { 438 UncommonTrapBlob* blob = NULL; 439 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 440 { 441 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 442 unsigned int size = allocation_size(cb, sizeof(UncommonTrapBlob)); 443 blob = new (size) UncommonTrapBlob(cb, size, oop_maps, frame_size); 444 } 445 446 trace_new_stub(blob, "UncommonTrapBlob"); 447 448 return blob; 449 } 450 451 452 #endif // COMPILER2 453 454 455 //---------------------------------------------------------------------------------------------------- 456 // Implementation of ExceptionBlob 457 458 #ifdef COMPILER2 459 ExceptionBlob::ExceptionBlob( 460 CodeBuffer* cb, 461 int size, 462 OopMapSet* oop_maps, 463 int frame_size 464 ) 465 : SingletonBlob("ExceptionBlob", cb, sizeof(ExceptionBlob), size, frame_size, oop_maps) 466 {} 467 468 469 ExceptionBlob* ExceptionBlob::create( 470 CodeBuffer* cb, 471 OopMapSet* oop_maps, 472 int frame_size) 473 { 474 ExceptionBlob* blob = NULL; 475 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 476 { 477 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 478 unsigned int size = allocation_size(cb, sizeof(ExceptionBlob)); 479 blob = new (size) ExceptionBlob(cb, size, oop_maps, frame_size); 480 } 481 482 trace_new_stub(blob, "ExceptionBlob"); 483 484 return blob; 485 } 486 487 488 #endif // COMPILER2 489 490 491 //---------------------------------------------------------------------------------------------------- 492 // Implementation of SafepointBlob 493 494 SafepointBlob::SafepointBlob( 495 CodeBuffer* cb, 496 int size, 497 OopMapSet* oop_maps, 498 int frame_size 499 ) 500 : SingletonBlob("SafepointBlob", cb, sizeof(SafepointBlob), size, frame_size, oop_maps) 501 {} 502 503 504 SafepointBlob* SafepointBlob::create( 505 CodeBuffer* cb, 506 OopMapSet* oop_maps, 507 int frame_size) 508 { 509 SafepointBlob* blob = NULL; 510 ThreadInVMfromUnknown __tiv; // get to VM state in case we block on CodeCache_lock 511 { 512 MutexLockerEx mu(CodeCache_lock, Mutex::_no_safepoint_check_flag); 513 unsigned int size = allocation_size(cb, sizeof(SafepointBlob)); 514 blob = new (size) SafepointBlob(cb, size, oop_maps, frame_size); 515 } 516 517 trace_new_stub(blob, "SafepointBlob"); 518 519 return blob; 520 } 521 522 523 //---------------------------------------------------------------------------------------------------- 524 // Verification and printing 525 526 void CodeBlob::verify() { 527 ShouldNotReachHere(); 528 } 529 530 void CodeBlob::print_on(outputStream* st) const { 531 st->print_cr("[CodeBlob (" INTPTR_FORMAT ")]", this); 532 st->print_cr("Framesize: %d", _frame_size); 533 } 534 535 void CodeBlob::print_value_on(outputStream* st) const { 536 st->print_cr("[CodeBlob]"); 537 } 538 539 void BufferBlob::verify() { 540 // unimplemented 541 } 542 543 void BufferBlob::print_on(outputStream* st) const { 544 CodeBlob::print_on(st); 545 print_value_on(st); 546 } 547 548 void BufferBlob::print_value_on(outputStream* st) const { 549 st->print_cr("BufferBlob (" INTPTR_FORMAT ") used for %s", this, name()); 550 } 551 552 void RuntimeStub::verify() { 553 // unimplemented 554 } 555 556 void RuntimeStub::print_on(outputStream* st) const { 557 ttyLocker ttyl; 558 CodeBlob::print_on(st); 559 st->print("Runtime Stub (" INTPTR_FORMAT "): ", this); 560 st->print_cr(name()); 561 Disassembler::decode((CodeBlob*)this, st); 562 } 563 564 void RuntimeStub::print_value_on(outputStream* st) const { 565 st->print("RuntimeStub (" INTPTR_FORMAT "): ", this); st->print(name()); 566 } 567 568 void SingletonBlob::verify() { 569 // unimplemented 570 } 571 572 void SingletonBlob::print_on(outputStream* st) const { 573 ttyLocker ttyl; 574 CodeBlob::print_on(st); 575 st->print_cr(name()); 576 Disassembler::decode((CodeBlob*)this, st); 577 } 578 579 void SingletonBlob::print_value_on(outputStream* st) const { 580 st->print_cr(name()); 581 } 582 583 void DeoptimizationBlob::print_value_on(outputStream* st) const { 584 st->print_cr("Deoptimization (frame not available)"); 585 }