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