1 /*
2 * Copyright (c) 1997, 2018, Oracle and/or its affiliates. All rights reserved.
3 * Copyright (c) 2015-2018, Azul Systems, Inc. All rights reserved.
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
6 * This code is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 only, as
8 * published by the Free Software Foundation.
9 *
10 * This code is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * version 2 for more details (a copy is included in the LICENSE file that
14 * accompanied this code).
15 *
16 * You should have received a copy of the GNU General Public License version
17 * 2 along with this work; if not, write to the Free Software Foundation,
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 *
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 * or visit www.oracle.com if you need additional information or have any
22 * questions.
23 *
24 */
25
26 #include "precompiled.hpp"
27 #include "interpreter/interpreter.hpp"
28 #include "interpreter/interpreterRuntime.hpp"
29 #include "interpreter/interp_masm.hpp"
30 #include "interpreter/templateInterpreter.hpp"
31 #include "interpreter/templateInterpreterGenerator.hpp"
32 #include "interpreter/templateTable.hpp"
33 #include "oops/methodData.hpp"
34
35 #ifndef CC_INTERP
36
37 # define __ _masm->
38
39 TemplateInterpreterGenerator::TemplateInterpreterGenerator(StubQueue* _code): AbstractInterpreterGenerator(_code) {
40 _unimplemented_bytecode = NULL;
41 _illegal_bytecode_sequence = NULL;
42 generate_all();
43 }
44
45 static const BasicType types[Interpreter::number_of_result_handlers] = {
46 T_BOOLEAN,
47 T_CHAR ,
48 T_BYTE ,
49 T_SHORT ,
50 T_INT ,
51 T_LONG ,
52 T_VOID ,
53 T_FLOAT ,
54 T_DOUBLE ,
55 T_OBJECT
56 };
57
58 void TemplateInterpreterGenerator::generate_all() {
59 { CodeletMark cm(_masm, "slow signature handler");
60 AbstractInterpreter::_slow_signature_handler = generate_slow_signature_handler();
61 }
62
63 { CodeletMark cm(_masm, "error exits");
64 _unimplemented_bytecode = generate_error_exit("unimplemented bytecode");
65 _illegal_bytecode_sequence = generate_error_exit("illegal bytecode sequence - method not verified");
66 }
67
68 #ifndef PRODUCT
69 if (TraceBytecodes) {
70 CodeletMark cm(_masm, "bytecode tracing support");
71 Interpreter::_trace_code =
72 EntryPoint(
73 generate_trace_code(btos),
74 generate_trace_code(ztos),
75 generate_trace_code(ctos),
76 generate_trace_code(stos),
77 generate_trace_code(atos),
78 generate_trace_code(itos),
79 generate_trace_code(ltos),
80 generate_trace_code(ftos),
81 generate_trace_code(dtos),
82 generate_trace_code(vtos)
83 );
84 }
85 #endif // !PRODUCT
86
87 { CodeletMark cm(_masm, "return entry points");
88 const int index_size = sizeof(u2);
89 Interpreter::_return_entry[0] = EntryPoint();
90 for (int i = 1; i < Interpreter::number_of_return_entries; i++) {
91 address return_itos = generate_return_entry_for(itos, i, index_size);
92 Interpreter::_return_entry[i] =
93 EntryPoint(
94 return_itos,
95 return_itos,
96 return_itos,
97 return_itos,
98 generate_return_entry_for(atos, i, index_size),
99 return_itos,
100 generate_return_entry_for(ltos, i, index_size),
101 generate_return_entry_for(ftos, i, index_size),
102 generate_return_entry_for(dtos, i, index_size),
103 generate_return_entry_for(vtos, i, index_size)
104 );
105 }
106 }
107
108 { CodeletMark cm(_masm, "invoke return entry points");
109 // These states are in order specified in TosState, except btos/ztos/ctos/stos are
110 // really the same as itos since there is no top of stack optimization for these types
111 const TosState states[] = {itos, itos, itos, itos, itos, ltos, ftos, dtos, atos, vtos, ilgl};
112 const int invoke_length = Bytecodes::length_for(Bytecodes::_invokestatic);
113 const int invokeinterface_length = Bytecodes::length_for(Bytecodes::_invokeinterface);
114 const int invokedynamic_length = Bytecodes::length_for(Bytecodes::_invokedynamic);
115
116 for (int i = 0; i < Interpreter::number_of_return_addrs; i++) {
117 TosState state = states[i];
118 assert(state != ilgl, "states array is wrong above");
119 Interpreter::_invoke_return_entry[i] = generate_return_entry_for(state, invoke_length, sizeof(u2));
120 Interpreter::_invokeinterface_return_entry[i] = generate_return_entry_for(state, invokeinterface_length, sizeof(u2));
121 Interpreter::_invokedynamic_return_entry[i] = generate_return_entry_for(state, invokedynamic_length, sizeof(u4));
122 }
123 }
124
125 { CodeletMark cm(_masm, "earlyret entry points");
126 Interpreter::_earlyret_entry =
127 EntryPoint(
128 generate_earlyret_entry_for(btos),
129 generate_earlyret_entry_for(ztos),
130 generate_earlyret_entry_for(ctos),
131 generate_earlyret_entry_for(stos),
132 generate_earlyret_entry_for(atos),
133 generate_earlyret_entry_for(itos),
134 generate_earlyret_entry_for(ltos),
135 generate_earlyret_entry_for(ftos),
136 generate_earlyret_entry_for(dtos),
137 generate_earlyret_entry_for(vtos)
138 );
139 }
140
141 { CodeletMark cm(_masm, "result handlers for native calls");
142 // The various result converter stublets.
143 int is_generated[Interpreter::number_of_result_handlers];
144 memset(is_generated, 0, sizeof(is_generated));
145
146 for (int i = 0; i < Interpreter::number_of_result_handlers; i++) {
147 BasicType type = types[i];
148 if (!is_generated[Interpreter::BasicType_as_index(type)]++) {
149 Interpreter::_native_abi_to_tosca[Interpreter::BasicType_as_index(type)] = generate_result_handler_for(type);
150 }
151 }
152 }
153
154
155 { CodeletMark cm(_masm, "safepoint entry points");
156 Interpreter::_safept_entry =
157 EntryPoint(
158 generate_safept_entry_for(btos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
159 generate_safept_entry_for(ztos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
160 generate_safept_entry_for(ctos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
161 generate_safept_entry_for(stos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
162 generate_safept_entry_for(atos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
163 generate_safept_entry_for(itos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
164 generate_safept_entry_for(ltos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
165 generate_safept_entry_for(ftos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
166 generate_safept_entry_for(dtos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint)),
167 generate_safept_entry_for(vtos, CAST_FROM_FN_PTR(address, InterpreterRuntime::at_safepoint))
168 );
169 }
170
171 { CodeletMark cm(_masm, "exception handling");
172 // (Note: this is not safepoint safe because thread may return to compiled code)
173 generate_throw_exception();
174 }
175
176 { CodeletMark cm(_masm, "throw exception entrypoints");
177 Interpreter::_throw_ArrayIndexOutOfBoundsException_entry = generate_ArrayIndexOutOfBounds_handler();
178 Interpreter::_throw_ArrayStoreException_entry = generate_klass_exception_handler("java/lang/ArrayStoreException");
179 Interpreter::_throw_ArithmeticException_entry = generate_exception_handler("java/lang/ArithmeticException", "/ by zero");
180 Interpreter::_throw_ClassCastException_entry = generate_ClassCastException_handler();
181 Interpreter::_throw_NullPointerException_entry = generate_exception_handler("java/lang/NullPointerException", NULL);
182 Interpreter::_throw_StackOverflowError_entry = generate_StackOverflowError_handler();
183 }
184
185
186
187 #define method_entry(kind) \
188 { CodeletMark cm(_masm, "method entry point (kind = " #kind ")"); \
189 Interpreter::_entry_table[Interpreter::kind] = generate_method_entry(Interpreter::kind); \
190 Interpreter::update_cds_entry_table(Interpreter::kind); \
191 }
192
193 // all non-native method kinds
194 method_entry(zerolocals)
195 method_entry(zerolocals_synchronized)
196 method_entry(empty)
197 method_entry(accessor)
198 method_entry(abstract)
199 method_entry(java_lang_math_sin )
200 method_entry(java_lang_math_cos )
201 method_entry(java_lang_math_tan )
202 method_entry(java_lang_math_abs )
203 method_entry(java_lang_math_sqrt )
204 method_entry(java_lang_math_log )
205 method_entry(java_lang_math_log10)
206 method_entry(java_lang_math_exp )
207 method_entry(java_lang_math_pow )
208 method_entry(java_lang_math_fmaF )
209 method_entry(java_lang_math_fmaD )
210 method_entry(java_lang_ref_reference_get)
211
212 AbstractInterpreter::initialize_method_handle_entries();
213
214 // all native method kinds (must be one contiguous block)
215 Interpreter::_native_entry_begin = Interpreter::code()->code_end();
216 method_entry(native)
217 method_entry(native_synchronized)
218 Interpreter::_native_entry_end = Interpreter::code()->code_end();
219
220 method_entry(java_util_zip_CRC32_update)
221 method_entry(java_util_zip_CRC32_updateBytes)
222 method_entry(java_util_zip_CRC32_updateByteBuffer)
223 method_entry(java_util_zip_CRC32C_updateBytes)
224 method_entry(java_util_zip_CRC32C_updateDirectByteBuffer)
225
226 method_entry(java_lang_Float_intBitsToFloat);
227 method_entry(java_lang_Float_floatToRawIntBits);
228 method_entry(java_lang_Double_longBitsToDouble);
229 method_entry(java_lang_Double_doubleToRawLongBits);
230
231 #ifdef AARCH32
232 if (UseAESIntrinsics) {
233 method_entry(com_sun_crypto_provider_AESCrypt_encryptBlock)
234 method_entry(com_sun_crypto_provider_AESCrypt_decryptBlock)
235 if (StubRoutines::cipherBlockChaining_encryptAESCrypt_special()) {
236 method_entry(com_sun_crypto_provider_CipherBlockChaining_encrypt)
237 }
238 if (StubRoutines::cipherBlockChaining_decryptAESCrypt_special()) {
239 method_entry(com_sun_crypto_provider_CipherBlockChaining_decrypt)
240 }
241 }
242
243 if (UseSHA1Intrinsics) {
244 method_entry(sun_security_provider_SHA_implCompress)
245 }
246 if (UseSHA256Intrinsics) {
247 method_entry(sun_security_provider_SHA2_implCompress)
248 }
249 if (UseSHA512Intrinsics) {
250 method_entry(sun_security_provider_SHA5_implCompress)
251 }
252 #endif
253
254 #undef method_entry
255
256 // Bytecodes
257 set_entry_points_for_all_bytes();
258
259 // installation of code in other places in the runtime
260 // (ExcutableCodeManager calls not needed to copy the entries)
261 set_safepoints_for_all_bytes();
262
263 { CodeletMark cm(_masm, "deoptimization entry points");
264 Interpreter::_deopt_entry[0] = EntryPoint();
265 Interpreter::_deopt_entry[0].set_entry(vtos, generate_deopt_entry_for(vtos, 0));
266 for (int i = 1; i < Interpreter::number_of_deopt_entries; i++) {
267 address deopt_itos = generate_deopt_entry_for(itos, i);
268 Interpreter::_deopt_entry[i] =
269 EntryPoint(
270 deopt_itos, /* btos */
271 deopt_itos, /* ztos */
272 deopt_itos, /* ctos */
273 deopt_itos, /* stos */
274 generate_deopt_entry_for(atos, i),
275 deopt_itos, /* itos */
276 generate_deopt_entry_for(ltos, i),
277 generate_deopt_entry_for(ftos, i),
278 generate_deopt_entry_for(dtos, i),
279 generate_deopt_entry_for(vtos, i)
280 );
281 }
282 address return_continuation = Interpreter::_normal_table.entry(Bytecodes::_return).entry(vtos);
283 vmassert(return_continuation != NULL, "return entry not generated yet");
284 Interpreter::_deopt_reexecute_return_entry = generate_deopt_entry_for(vtos, 0, return_continuation);
285 }
286
287 }
288
289 //------------------------------------------------------------------------------------------------------------------------
290
291 address TemplateInterpreterGenerator::generate_error_exit(const char* msg) {
292 address entry = __ pc();
293 __ stop(msg);
294 return entry;
295 }
296
297
298 //------------------------------------------------------------------------------------------------------------------------
299
300 void TemplateInterpreterGenerator::set_entry_points_for_all_bytes() {
301 for (int i = 0; i < DispatchTable::length; i++) {
302 Bytecodes::Code code = (Bytecodes::Code)i;
303 if (Bytecodes::is_defined(code)) {
304 set_entry_points(code);
305 } else {
306 set_unimplemented(i);
307 }
308 }
309 }
310
311
312 void TemplateInterpreterGenerator::set_safepoints_for_all_bytes() {
313 for (int i = 0; i < DispatchTable::length; i++) {
314 Bytecodes::Code code = (Bytecodes::Code)i;
315 if (Bytecodes::is_defined(code)) Interpreter::_safept_table.set_entry(code, Interpreter::_safept_entry);
316 }
317 }
318
319
320 void TemplateInterpreterGenerator::set_unimplemented(int i) {
321 address e = _unimplemented_bytecode;
322 EntryPoint entry(e, e, e, e, e, e, e, e, e, e);
323 Interpreter::_normal_table.set_entry(i, entry);
324 Interpreter::_wentry_point[i] = _unimplemented_bytecode;
325 }
326
327
328 void TemplateInterpreterGenerator::set_entry_points(Bytecodes::Code code) {
329 CodeletMark cm(_masm, Bytecodes::name(code), code);
330 // initialize entry points
331 assert(_unimplemented_bytecode != NULL, "should have been generated before");
332 assert(_illegal_bytecode_sequence != NULL, "should have been generated before");
333 address bep = _illegal_bytecode_sequence;
334 address zep = _illegal_bytecode_sequence;
335 address cep = _illegal_bytecode_sequence;
336 address sep = _illegal_bytecode_sequence;
337 address aep = _illegal_bytecode_sequence;
338 address iep = _illegal_bytecode_sequence;
339 address lep = _illegal_bytecode_sequence;
340 address fep = _illegal_bytecode_sequence;
341 address dep = _illegal_bytecode_sequence;
342 address vep = _unimplemented_bytecode;
343 address wep = _unimplemented_bytecode;
344 // code for short & wide version of bytecode
345 if (Bytecodes::is_defined(code)) {
346 Template* t = TemplateTable::template_for(code);
347 assert(t->is_valid(), "just checking");
348 set_short_entry_points(t, bep, cep, sep, aep, iep, lep, fep, dep, vep);
349 }
350 if (Bytecodes::wide_is_defined(code)) {
351 Template* t = TemplateTable::template_for_wide(code);
352 assert(t->is_valid(), "just checking");
353 set_wide_entry_point(t, wep);
354 }
355 // set entry points
356 EntryPoint entry(bep, zep, cep, sep, aep, iep, lep, fep, dep, vep);
357 Interpreter::_normal_table.set_entry(code, entry);
358 Interpreter::_wentry_point[code] = wep;
359 }
360
361
362 void TemplateInterpreterGenerator::set_wide_entry_point(Template* t, address& wep) {
363 assert(t->is_valid(), "template must exist");
364 assert(t->tos_in() == vtos, "only vtos tos_in supported for wide instructions");
365 wep = __ pc(); generate_and_dispatch(t);
366 }
367
368
369 void TemplateInterpreterGenerator::set_short_entry_points(Template* t, address& bep, address& cep, address& sep, address& aep, address& iep, address& lep, address& fep, address& dep, address& vep) {
370 assert(t->is_valid(), "template must exist");
371 switch (t->tos_in()) {
372 case btos:
373 case ztos:
374 case ctos:
375 case stos:
376 ShouldNotReachHere(); // btos/ctos/stos should use itos.
377 break;
378 case atos: vep = __ pc(); __ pop(atos); aep = __ pc(); generate_and_dispatch(t); break;
379 case itos: vep = __ pc(); __ pop(itos); iep = __ pc(); generate_and_dispatch(t); break;
380 case ltos: vep = __ pc(); __ pop(ltos); lep = __ pc(); generate_and_dispatch(t); break;
381 case ftos: vep = __ pc(); __ pop(ftos); fep = __ pc(); generate_and_dispatch(t); break;
382 case dtos: vep = __ pc(); __ pop(dtos); dep = __ pc(); generate_and_dispatch(t); break;
383 case vtos: set_vtos_entry_points(t, bep, cep, sep, aep, iep, lep, fep, dep, vep); break;
384 default : ShouldNotReachHere(); break;
385 }
386 }
387
388
389 //------------------------------------------------------------------------------------------------------------------------
390
391 void TemplateInterpreterGenerator::generate_and_dispatch(Template* t, TosState tos_out) {
392 if (PrintBytecodeHistogram) histogram_bytecode(t);
393 #ifndef PRODUCT
394 // debugging code
395 if (CountBytecodes || TraceBytecodes || StopInterpreterAt > 0) count_bytecode();
396 if (PrintBytecodePairHistogram) histogram_bytecode_pair(t);
397 if (TraceBytecodes) trace_bytecode(t);
398 if (StopInterpreterAt > 0) stop_interpreter_at();
399 __ verify_FPU(1, t->tos_in());
400 #endif // !PRODUCT
401 int step = 0;
402 if (!t->does_dispatch()) {
403 step = t->is_wide() ? Bytecodes::wide_length_for(t->bytecode()) : Bytecodes::length_for(t->bytecode());
404 if (tos_out == ilgl) tos_out = t->tos_out();
405 // compute bytecode size
406 assert(step > 0, "just checkin'");
407 // setup stuff for dispatching next bytecode
408 if (ProfileInterpreter && VerifyDataPointer
409 && MethodData::bytecode_has_profile(t->bytecode())) {
410 __ verify_method_data_pointer();
411 }
412 __ dispatch_prolog(tos_out, step);
413 }
414 // generate template
415 t->generate(_masm);
416 // advance
417 if (t->does_dispatch()) {
418 #ifdef ASSERT
419 // make sure execution doesn't go beyond this point if code is broken
420 __ should_not_reach_here();
421 #endif // ASSERT
422 } else {
423 // dispatch to next bytecode
424 __ dispatch_epilog(tos_out, step);
425 }
426 }
427
428 // Generate method entries
429 address TemplateInterpreterGenerator::generate_method_entry(
430 AbstractInterpreter::MethodKind kind) {
431 // determine code generation flags
432 bool native = false;
433 bool synchronized = false;
434 address entry_point = NULL;
435
436 switch (kind) {
437 case Interpreter::zerolocals : break;
438 case Interpreter::zerolocals_synchronized: synchronized = true; break;
439 case Interpreter::native : native = true; break;
440 case Interpreter::native_synchronized : native = true; synchronized = true; break;
441 case Interpreter::empty : break;
442 case Interpreter::accessor : break;
443 case Interpreter::abstract : entry_point = generate_abstract_entry(); break;
444
445 case Interpreter::java_lang_math_sin : // fall thru
446 case Interpreter::java_lang_math_cos : // fall thru
447 case Interpreter::java_lang_math_tan : // fall thru
448 case Interpreter::java_lang_math_abs : // fall thru
449 case Interpreter::java_lang_math_log : // fall thru
450 case Interpreter::java_lang_math_log10 : // fall thru
451 case Interpreter::java_lang_math_sqrt : // fall thru
452 case Interpreter::java_lang_math_pow : // fall thru
453 case Interpreter::java_lang_math_exp : // fall thru
454 case Interpreter::java_lang_math_fmaD : // fall thru
455 case Interpreter::java_lang_math_fmaF : entry_point = generate_math_entry(kind); break;
456 case Interpreter::java_lang_ref_reference_get
457 : entry_point = generate_Reference_get_entry(); break;
458 case Interpreter::java_util_zip_CRC32_update
459 : native = true; entry_point = generate_CRC32_update_entry(); break;
460 case Interpreter::java_util_zip_CRC32_updateBytes
461 : // fall thru
462 case Interpreter::java_util_zip_CRC32_updateByteBuffer
463 : native = true; entry_point = generate_CRC32_updateBytes_entry(kind); break;
464 case Interpreter::java_util_zip_CRC32C_updateBytes
465 : // fall thru
466 case Interpreter::java_util_zip_CRC32C_updateDirectByteBuffer
467 : entry_point = generate_CRC32C_updateBytes_entry(kind); break;
468 #ifdef IA32
469 // On x86_32 platforms, a special entry is generated for the following four methods.
470 // On other platforms the normal entry is used to enter these methods.
471 case Interpreter::java_lang_Float_intBitsToFloat
472 : native = true; entry_point = generate_Float_intBitsToFloat_entry(); break;
473 case Interpreter::java_lang_Float_floatToRawIntBits
474 : native = true; entry_point = generate_Float_floatToRawIntBits_entry(); break;
475 case Interpreter::java_lang_Double_longBitsToDouble
476 : native = true; entry_point = generate_Double_longBitsToDouble_entry(); break;
477 case Interpreter::java_lang_Double_doubleToRawLongBits
478 : native = true; entry_point = generate_Double_doubleToRawLongBits_entry(); break;
479 #else
480 case Interpreter::java_lang_Float_intBitsToFloat:
481 case Interpreter::java_lang_Float_floatToRawIntBits:
482 case Interpreter::java_lang_Double_longBitsToDouble:
483 case Interpreter::java_lang_Double_doubleToRawLongBits:
484 native = true;
485 break;
486 #endif // !IA32
487 #ifdef AARCH32
488 case Interpreter::com_sun_crypto_provider_AESCrypt_encryptBlock:
489 case Interpreter::com_sun_crypto_provider_AESCrypt_decryptBlock:
490 entry_point = generate_aescrypt_block_entry(kind);
491 break;
492 case Interpreter::com_sun_crypto_provider_CipherBlockChaining_encrypt:
493 case Interpreter::com_sun_crypto_provider_CipherBlockChaining_decrypt:
494 // don't use AES CBC intrinsic in interpreter
495 break;
496 case Interpreter::sun_security_provider_SHA_implCompress:
497 case Interpreter::sun_security_provider_SHA2_implCompress:
498 case Interpreter::sun_security_provider_SHA5_implCompress:
499 entry_point = generate_SHA_implCompress_entry(kind);
500 break;
501 #endif
502 default:
503 fatal("unexpected method kind: %d", kind);
504 break;
505 }
506
507 if (entry_point) {
508 return entry_point;
509 }
510
511 // We expect the normal and native entry points to be generated first so we can reuse them.
512 if (native) {
513 entry_point = Interpreter::entry_for_kind(synchronized ? Interpreter::native_synchronized : Interpreter::native);
514 if (entry_point == NULL) {
515 entry_point = generate_native_entry(synchronized);
516 }
517 } else {
518 entry_point = Interpreter::entry_for_kind(synchronized ? Interpreter::zerolocals_synchronized : Interpreter::zerolocals);
519 if (entry_point == NULL) {
520 entry_point = generate_normal_entry(synchronized);
521 }
522 }
523
524 return entry_point;
525 }
526 #endif // !CC_INTERP