annotate src/share/vm/code/codeBlob.cpp @ 8883:b9a918201d47

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