• file
• revisions
• annotate
• diff
• comparison
• raw

src/share/vm/prims/methodHandles.hpp@94ec88ca68e2 (annotated)

src/share/vm/prims/methodHandles.hpp

Wed, 11 Jan 2012 17:34:02 -0500

author

phh

date

Wed, 11 Jan 2012 17:34:02 -0500

changeset 3427

94ec88ca68e2

parent 3142

393f4b789fd0

child 3434

15d394228cfa

permissions

-rw-r--r--

7115199: Add event tracing hooks and Java Flight Recorder infrastructure
Summary: Added a nop tracing infrastructure, JFR makefile changes and other infrastructure used only by JFR.
Reviewed-by: acorn, sspitsyn
Contributed-by: markus.gronlund@oracle.com

jrose@1145	1	/*
twisti@2436	2	* Copyright (c) 2008, 2011, Oracle and/or its affiliates. All rights reserved.
jrose@1145	3	* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
jrose@1145	4	*
jrose@1145	5	* This code is free software; you can redistribute it and/or modify it
jrose@1145	6	* under the terms of the GNU General Public License version 2 only, as
jrose@1145	7	* published by the Free Software Foundation.
jrose@1145	8	*
jrose@1145	9	* This code is distributed in the hope that it will be useful, but WITHOUT
jrose@1145	10	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
jrose@1145	11	* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
jrose@1145	12	* version 2 for more details (a copy is included in the LICENSE file that
jrose@1145	13	* accompanied this code).
jrose@1145	14	*
jrose@1145	15	* You should have received a copy of the GNU General Public License version
jrose@1145	16	* 2 along with this work; if not, write to the Free Software Foundation,
jrose@1145	17	* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
jrose@1145	18	*
trims@1907	19	* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907	20	* or visit www.oracle.com if you need additional information or have any
trims@1907	21	* questions.
jrose@1145	22	*
jrose@1145	23	*/
jrose@1145	24
stefank@2314	25	#ifndef SHARE_VM_PRIMS_METHODHANDLES_HPP
stefank@2314	26	#define SHARE_VM_PRIMS_METHODHANDLES_HPP
stefank@2314	27
stefank@2314	28	#include "classfile/javaClasses.hpp"
stefank@2314	29	#include "classfile/vmSymbols.hpp"
stefank@2314	30	#include "runtime/frame.inline.hpp"
stefank@2314	31	#include "runtime/globals.hpp"
stefank@2314	32	#include "runtime/interfaceSupport.hpp"
stefank@2314	33
jrose@1145	34	class MacroAssembler;
jrose@1145	35	class Label;
jrose@1145	36	class MethodHandleEntry;
jrose@1145	37
jrose@1145	38	class MethodHandles: AllStatic {
jrose@1145	39	// JVM support for MethodHandle, MethodType, and related types
jrose@2639	40	// in java.lang.invoke and sun.invoke.
jrose@2639	41	// See also javaClasses for layouts java_lang_invoke_Method{Handle,Type,Type::Form}.
jrose@1145	42	public:
jrose@1145	43	enum EntryKind {
jrose@1474	44	_raise_exception, // stub for error generation from other stubs
jrose@1145	45	_invokestatic_mh, // how a MH emulates invokestatic
jrose@1145	46	_invokespecial_mh, // ditto for the other invokes...
jrose@1145	47	_invokevirtual_mh,
jrose@1145	48	_invokeinterface_mh,
jrose@1145	49	_bound_ref_mh, // reference argument is bound
jrose@1145	50	_bound_int_mh, // int argument is bound (via an Integer or Float)
jrose@1145	51	_bound_long_mh, // long argument is bound (via a Long or Double)
jrose@1145	52	_bound_ref_direct_mh, // same as above, with direct linkage to methodOop
jrose@1145	53	_bound_int_direct_mh,
jrose@1145	54	_bound_long_direct_mh,
jrose@1145	55
jrose@1145	56	_adapter_mh_first, // adapter sequence goes here...
jrose@2639	57	_adapter_retype_only = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_RETYPE_ONLY,
jrose@2639	58	_adapter_retype_raw = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_RETYPE_RAW,
jrose@2639	59	_adapter_check_cast = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_CHECK_CAST,
jrose@2639	60	_adapter_prim_to_prim = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_PRIM_TO_PRIM,
jrose@2639	61	_adapter_ref_to_prim = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_REF_TO_PRIM,
jrose@2639	62	_adapter_prim_to_ref = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_PRIM_TO_REF,
jrose@2639	63	_adapter_swap_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_SWAP_ARGS,
jrose@2639	64	_adapter_rot_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_ROT_ARGS,
jrose@2639	65	_adapter_dup_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_DUP_ARGS,
jrose@2639	66	_adapter_drop_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_DROP_ARGS,
jrose@2639	67	_adapter_collect_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_COLLECT_ARGS,
jrose@2639	68	_adapter_spread_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_SPREAD_ARGS,
never@2895	69	_adapter_fold_args = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::OP_FOLD_ARGS,
never@2895	70	_adapter_unused_13 = _adapter_mh_first + 13, //hole in the CONV_OP enumeration
jrose@2639	71	_adapter_mh_last = _adapter_mh_first + java_lang_invoke_AdapterMethodHandle::CONV_OP_LIMIT - 1,
jrose@1145	72
jrose@1145	73	// Optimized adapter types
jrose@1145	74
jrose@1145	75	// argument list reordering
jrose@1145	76	_adapter_opt_swap_1,
jrose@1145	77	_adapter_opt_swap_2,
jrose@1145	78	_adapter_opt_rot_1_up,
jrose@1145	79	_adapter_opt_rot_1_down,
jrose@1145	80	_adapter_opt_rot_2_up,
jrose@1145	81	_adapter_opt_rot_2_down,
jrose@1145	82	// primitive single to single:
jrose@1145	83	_adapter_opt_i2i, // i2c, i2z, i2b, i2s
jrose@1145	84	// primitive double to single:
jrose@1145	85	_adapter_opt_l2i,
jrose@1145	86	_adapter_opt_d2f,
jrose@1145	87	// primitive single to double:
jrose@1145	88	_adapter_opt_i2l,
jrose@1145	89	_adapter_opt_f2d,
jrose@1145	90	// conversion between floating point and integer type is handled by Java
jrose@1145	91
jrose@1145	92	// reference to primitive:
jrose@1145	93	_adapter_opt_unboxi,
jrose@1145	94	_adapter_opt_unboxl,
jrose@1145	95
never@2895	96	// %% Maybe tame the following with a VM_SYMBOLS_DO type macro?
never@2895	97
never@2895	98	// how a blocking adapter returns (platform-dependent)
never@2895	99	_adapter_opt_return_ref,
never@2895	100	_adapter_opt_return_int,
never@2895	101	_adapter_opt_return_long,
never@2895	102	_adapter_opt_return_float,
never@2895	103	_adapter_opt_return_double,
never@2895	104	_adapter_opt_return_void,
never@2895	105	_adapter_opt_return_S0_ref, // return ref to S=0 (last slot)
never@2895	106	_adapter_opt_return_S1_ref, // return ref to S=1 (2nd-to-last slot)
never@2895	107	_adapter_opt_return_S2_ref,
never@2895	108	_adapter_opt_return_S3_ref,
never@2895	109	_adapter_opt_return_S4_ref,
never@2895	110	_adapter_opt_return_S5_ref,
never@2895	111	_adapter_opt_return_any, // dynamically select r/i/l/f/d
never@2895	112	_adapter_opt_return_FIRST = _adapter_opt_return_ref,
never@2895	113	_adapter_opt_return_LAST = _adapter_opt_return_any,
never@2895	114
never@2895	115	// spreading (array length cases 0, 1, ...)
never@2895	116	_adapter_opt_spread_0, // spread empty array to N=0 arguments
never@2895	117	_adapter_opt_spread_1_ref, // spread Object[] to N=1 argument
never@2895	118	_adapter_opt_spread_2_ref, // spread Object[] to N=2 arguments
never@2895	119	_adapter_opt_spread_3_ref, // spread Object[] to N=3 arguments
never@2895	120	_adapter_opt_spread_4_ref, // spread Object[] to N=4 arguments
never@2895	121	_adapter_opt_spread_5_ref, // spread Object[] to N=5 arguments
never@2895	122	_adapter_opt_spread_ref, // spread Object[] to N arguments
never@2895	123	_adapter_opt_spread_byte, // spread byte[] or boolean[] to N arguments
never@2895	124	_adapter_opt_spread_char, // spread char[], etc., to N arguments
never@2895	125	_adapter_opt_spread_short, // spread short[], etc., to N arguments
never@2895	126	_adapter_opt_spread_int, // spread int[], short[], etc., to N arguments
never@2895	127	_adapter_opt_spread_long, // spread long[] to N arguments
never@2895	128	_adapter_opt_spread_float, // spread float[] to N arguments
never@2895	129	_adapter_opt_spread_double, // spread double[] to N arguments
never@2895	130	_adapter_opt_spread_FIRST = _adapter_opt_spread_0,
never@2895	131	_adapter_opt_spread_LAST = _adapter_opt_spread_double,
never@2895	132
never@2895	133	// blocking filter/collect conversions
never@2895	134	// These collect N arguments and replace them (at slot S) by a return value
never@2895	135	// which is passed to the final target, along with the unaffected arguments.
never@2895	136	// collect_{N}_{T} collects N arguments at any position into a T value
never@2895	137	// collect_{N}_S{S}_{T} collects N arguments at slot S into a T value
never@2895	138	// collect_{T} collects any number of arguments at any position
never@2895	139	// filter_S{S}_{T} is the same as collect_1_S{S}_{T} (a unary collection)
never@2895	140	// (collect_2 is also usable as a filter, with long or double arguments)
never@2895	141	_adapter_opt_collect_ref, // combine N arguments, replace with a reference
never@2895	142	_adapter_opt_collect_int, // combine N arguments, replace with an int, short, etc.
never@2895	143	_adapter_opt_collect_long, // combine N arguments, replace with a long
never@2895	144	_adapter_opt_collect_float, // combine N arguments, replace with a float
never@2895	145	_adapter_opt_collect_double, // combine N arguments, replace with a double
never@2895	146	_adapter_opt_collect_void, // combine N arguments, replace with nothing
never@2895	147	// if there is a small fixed number to push, do so without a loop:
never@2895	148	_adapter_opt_collect_0_ref, // collect N=0 arguments, insert a reference
never@2895	149	_adapter_opt_collect_1_ref, // collect N=1 argument, replace with a reference
never@2895	150	_adapter_opt_collect_2_ref, // combine N=2 arguments, replace with a reference
never@2895	151	_adapter_opt_collect_3_ref, // combine N=3 arguments, replace with a reference
never@2895	152	_adapter_opt_collect_4_ref, // combine N=4 arguments, replace with a reference
never@2895	153	_adapter_opt_collect_5_ref, // combine N=5 arguments, replace with a reference
never@2895	154	// filters are an important special case because they never move arguments:
never@2895	155	_adapter_opt_filter_S0_ref, // filter N=1 argument at S=0, replace with a reference
never@2895	156	_adapter_opt_filter_S1_ref, // filter N=1 argument at S=1, replace with a reference
never@2895	157	_adapter_opt_filter_S2_ref, // filter N=1 argument at S=2, replace with a reference
never@2895	158	_adapter_opt_filter_S3_ref, // filter N=1 argument at S=3, replace with a reference
never@2895	159	_adapter_opt_filter_S4_ref, // filter N=1 argument at S=4, replace with a reference
never@2895	160	_adapter_opt_filter_S5_ref, // filter N=1 argument at S=5, replace with a reference
never@2895	161	// these move arguments, but they are important for boxing
never@2895	162	_adapter_opt_collect_2_S0_ref, // combine last N=2 arguments, replace with a reference
never@2895	163	_adapter_opt_collect_2_S1_ref, // combine N=2 arguments at S=1, replace with a reference
never@2895	164	_adapter_opt_collect_2_S2_ref, // combine N=2 arguments at S=2, replace with a reference
never@2895	165	_adapter_opt_collect_2_S3_ref, // combine N=2 arguments at S=3, replace with a reference
never@2895	166	_adapter_opt_collect_2_S4_ref, // combine N=2 arguments at S=4, replace with a reference
never@2895	167	_adapter_opt_collect_2_S5_ref, // combine N=2 arguments at S=5, replace with a reference
never@2895	168	_adapter_opt_collect_FIRST = _adapter_opt_collect_ref,
never@2895	169	_adapter_opt_collect_LAST = _adapter_opt_collect_2_S5_ref,
never@2895	170
never@2895	171	// blocking folding conversions
never@2895	172	// these are like collects, but retain all the N arguments for the final target
never@2895	173	//_adapter_opt_fold_0_ref, // same as _adapter_opt_collect_0_ref
never@2895	174	// fold_{N}_{T} processes N arguments at any position into a T value, which it inserts
never@2895	175	// fold_{T} processes any number of arguments at any position
never@2895	176	_adapter_opt_fold_ref, // process N arguments, prepend a reference
never@2895	177	_adapter_opt_fold_int, // process N arguments, prepend an int, short, etc.
never@2895	178	_adapter_opt_fold_long, // process N arguments, prepend a long
never@2895	179	_adapter_opt_fold_float, // process N arguments, prepend a float
never@2895	180	_adapter_opt_fold_double, // process N arguments, prepend a double
never@2895	181	_adapter_opt_fold_void, // process N arguments, but leave the list unchanged
never@2895	182	_adapter_opt_fold_1_ref, // process N=1 argument, prepend a reference
never@2895	183	_adapter_opt_fold_2_ref, // process N=2 arguments, prepend a reference
never@2895	184	_adapter_opt_fold_3_ref, // process N=3 arguments, prepend a reference
never@2895	185	_adapter_opt_fold_4_ref, // process N=4 arguments, prepend a reference
never@2895	186	_adapter_opt_fold_5_ref, // process N=5 arguments, prepend a reference
never@2895	187	_adapter_opt_fold_FIRST = _adapter_opt_fold_ref,
never@2895	188	_adapter_opt_fold_LAST = _adapter_opt_fold_5_ref,
jrose@1145	189
never@3105	190	_adapter_opt_profiling,
never@3105	191
jrose@1145	192	_EK_LIMIT,
jrose@1145	193	_EK_FIRST = 0
jrose@1145	194	};
jrose@1145	195
jrose@1145	196	public:
jrose@1145	197	static bool enabled() { return _enabled; }
jrose@1145	198	static void set_enabled(bool z);
jrose@1145	199
jrose@1145	200	private:
jrose@2639	201	enum { // import java_lang_invoke_AdapterMethodHandle::CONV_OP_*
jrose@2639	202	CONV_OP_LIMIT = java_lang_invoke_AdapterMethodHandle::CONV_OP_LIMIT,
jrose@2639	203	CONV_OP_MASK = java_lang_invoke_AdapterMethodHandle::CONV_OP_MASK,
never@2895	204	CONV_TYPE_MASK = java_lang_invoke_AdapterMethodHandle::CONV_TYPE_MASK,
jrose@2639	205	CONV_VMINFO_MASK = java_lang_invoke_AdapterMethodHandle::CONV_VMINFO_MASK,
jrose@2639	206	CONV_VMINFO_SHIFT = java_lang_invoke_AdapterMethodHandle::CONV_VMINFO_SHIFT,
jrose@2639	207	CONV_OP_SHIFT = java_lang_invoke_AdapterMethodHandle::CONV_OP_SHIFT,
jrose@2639	208	CONV_DEST_TYPE_SHIFT = java_lang_invoke_AdapterMethodHandle::CONV_DEST_TYPE_SHIFT,
jrose@2639	209	CONV_SRC_TYPE_SHIFT = java_lang_invoke_AdapterMethodHandle::CONV_SRC_TYPE_SHIFT,
jrose@2639	210	CONV_STACK_MOVE_SHIFT = java_lang_invoke_AdapterMethodHandle::CONV_STACK_MOVE_SHIFT,
jrose@2639	211	CONV_STACK_MOVE_MASK = java_lang_invoke_AdapterMethodHandle::CONV_STACK_MOVE_MASK
jrose@1145	212	};
jrose@1145	213
jrose@1145	214	static bool _enabled;
jrose@1145	215	static MethodHandleEntry* _entries[_EK_LIMIT];
jrose@1145	216	static const char* _entry_names[_EK_LIMIT+1];
jrose@1474	217	static jobject _raise_exception_method;
never@2895	218	static address _adapter_return_handlers[CONV_TYPE_MASK+1];
jrose@1474	219
twisti@1734	220	// Adapters.
twisti@1734	221	static MethodHandlesAdapterBlob* _adapter_code;
twisti@1734	222
jrose@1145	223	static bool ek_valid(EntryKind ek) { return (uint)ek < (uint)_EK_LIMIT; }
jrose@1145	224	static bool conv_op_valid(int op) { return (uint)op < (uint)CONV_OP_LIMIT; }
jrose@1145	225
jrose@1145	226	public:
jrose@1145	227	static bool have_entry(EntryKind ek) { return ek_valid(ek) && _entries[ek] != NULL; }
jrose@1145	228	static MethodHandleEntry* entry(EntryKind ek) { assert(ek_valid(ek), "initialized");
jrose@1145	229	return _entries[ek]; }
jrose@1145	230	static const char* entry_name(EntryKind ek) { assert(ek_valid(ek), "oob");
jrose@1145	231	return _entry_names[ek]; }
jrose@1145	232	static EntryKind adapter_entry_kind(int op) { assert(conv_op_valid(op), "oob");
jrose@1145	233	return EntryKind(_adapter_mh_first + op); }
jrose@1145	234
jrose@1145	235	static void init_entry(EntryKind ek, MethodHandleEntry* me) {
jrose@1145	236	assert(ek_valid(ek), "oob");
jrose@1145	237	assert(_entries[ek] == NULL, "no double initialization");
jrose@1145	238	_entries[ek] = me;
jrose@1145	239	}
jrose@1145	240
twisti@1739	241	// Some adapter helper functions.
never@2895	242	static EntryKind ek_original_kind(EntryKind ek) {
never@2895	243	if (ek <= _adapter_mh_last) return ek;
twisti@1739	244	switch (ek) {
never@2895	245	case _adapter_opt_swap_1:
never@2895	246	case _adapter_opt_swap_2:
never@2895	247	return _adapter_swap_args;
never@2895	248	case _adapter_opt_rot_1_up:
never@2895	249	case _adapter_opt_rot_1_down:
never@2895	250	case _adapter_opt_rot_2_up:
never@2895	251	case _adapter_opt_rot_2_down:
never@2895	252	return _adapter_rot_args;
never@2895	253	case _adapter_opt_i2i:
never@2895	254	case _adapter_opt_l2i:
never@2895	255	case _adapter_opt_d2f:
never@2895	256	case _adapter_opt_i2l:
never@2895	257	case _adapter_opt_f2d:
never@2895	258	return _adapter_prim_to_prim;
never@2895	259	case _adapter_opt_unboxi:
never@2895	260	case _adapter_opt_unboxl:
never@2895	261	return _adapter_ref_to_prim;
twisti@1739	262	}
never@2895	263	if (ek >= _adapter_opt_spread_FIRST && ek <= _adapter_opt_spread_LAST)
never@2895	264	return _adapter_spread_args;
never@2895	265	if (ek >= _adapter_opt_collect_FIRST && ek <= _adapter_opt_collect_LAST)
never@2895	266	return _adapter_collect_args;
never@2895	267	if (ek >= _adapter_opt_fold_FIRST && ek <= _adapter_opt_fold_LAST)
never@2895	268	return _adapter_fold_args;
never@2895	269	if (ek >= _adapter_opt_return_FIRST && ek <= _adapter_opt_return_LAST)
never@2895	270	return _adapter_opt_return_any;
never@3105	271	if (ek == _adapter_opt_profiling)
never@3105	272	return _adapter_retype_only;
never@2895	273	assert(false, "oob");
never@2895	274	return _EK_LIMIT;
twisti@1739	275	}
twisti@1739	276
never@2895	277	static bool ek_supported(MethodHandles::EntryKind ek);
never@2895	278
never@2895	279	static BasicType ek_bound_mh_arg_type(EntryKind ek) {
twisti@1739	280	switch (ek) {
never@2895	281	case _bound_int_mh : // fall-thru
never@2895	282	case _bound_int_direct_mh : return T_INT;
never@2895	283	case _bound_long_mh : // fall-thru
never@2895	284	case _bound_long_direct_mh : return T_LONG;
never@2895	285	default : return T_OBJECT;
twisti@1739	286	}
twisti@1739	287	}
twisti@1739	288
never@2895	289	static int ek_adapter_opt_swap_slots(EntryKind ek) {
twisti@1739	290	switch (ek) {
never@2895	291	case _adapter_opt_swap_1 : return 1;
never@2895	292	case _adapter_opt_swap_2 : return 2;
never@2895	293	case _adapter_opt_rot_1_up : return 1;
never@2895	294	case _adapter_opt_rot_1_down : return 1;
never@2895	295	case _adapter_opt_rot_2_up : return 2;
never@2895	296	case _adapter_opt_rot_2_down : return 2;
never@2895	297	default : ShouldNotReachHere(); return -1;
never@2895	298	}
never@2895	299	}
never@2895	300
never@2895	301	static int ek_adapter_opt_swap_mode(EntryKind ek) {
never@2895	302	switch (ek) {
never@2895	303	case _adapter_opt_swap_1 : return 0;
never@2895	304	case _adapter_opt_swap_2 : return 0;
never@2895	305	case _adapter_opt_rot_1_up : return 1;
never@2895	306	case _adapter_opt_rot_1_down : return -1;
never@2895	307	case _adapter_opt_rot_2_up : return 1;
never@2895	308	case _adapter_opt_rot_2_down : return -1;
never@2895	309	default : ShouldNotReachHere(); return 0;
never@2895	310	}
never@2895	311	}
never@2895	312
never@2895	313	static int ek_adapter_opt_collect_count(EntryKind ek) {
never@2895	314	assert(ek >= _adapter_opt_collect_FIRST && ek <= _adapter_opt_collect_LAST ||
never@2895	315	ek >= _adapter_opt_fold_FIRST && ek <= _adapter_opt_fold_LAST, "");
never@2895	316	switch (ek) {
never@2895	317	case _adapter_opt_collect_0_ref : return 0;
never@2895	318	case _adapter_opt_filter_S0_ref :
never@2895	319	case _adapter_opt_filter_S1_ref :
never@2895	320	case _adapter_opt_filter_S2_ref :
never@2895	321	case _adapter_opt_filter_S3_ref :
never@2895	322	case _adapter_opt_filter_S4_ref :
never@2895	323	case _adapter_opt_filter_S5_ref :
never@2895	324	case _adapter_opt_fold_1_ref :
never@2895	325	case _adapter_opt_collect_1_ref : return 1;
never@2895	326	case _adapter_opt_collect_2_S0_ref :
never@2895	327	case _adapter_opt_collect_2_S1_ref :
never@2895	328	case _adapter_opt_collect_2_S2_ref :
never@2895	329	case _adapter_opt_collect_2_S3_ref :
never@2895	330	case _adapter_opt_collect_2_S4_ref :
never@2895	331	case _adapter_opt_collect_2_S5_ref :
never@2895	332	case _adapter_opt_fold_2_ref :
never@2895	333	case _adapter_opt_collect_2_ref : return 2;
never@2895	334	case _adapter_opt_fold_3_ref :
never@2895	335	case _adapter_opt_collect_3_ref : return 3;
never@2895	336	case _adapter_opt_fold_4_ref :
never@2895	337	case _adapter_opt_collect_4_ref : return 4;
never@2895	338	case _adapter_opt_fold_5_ref :
never@2895	339	case _adapter_opt_collect_5_ref : return 5;
never@2895	340	default : return -1; // sentinel value for "variable"
never@2895	341	}
never@2895	342	}
never@2895	343
never@2895	344	static int ek_adapter_opt_collect_slot(EntryKind ek) {
never@2895	345	assert(ek >= _adapter_opt_collect_FIRST && ek <= _adapter_opt_collect_LAST ||
never@2895	346	ek >= _adapter_opt_fold_FIRST && ek <= _adapter_opt_fold_LAST, "");
never@2895	347	switch (ek) {
never@2895	348	case _adapter_opt_collect_2_S0_ref :
never@2895	349	case _adapter_opt_filter_S0_ref : return 0;
never@2895	350	case _adapter_opt_collect_2_S1_ref :
never@2895	351	case _adapter_opt_filter_S1_ref : return 1;
never@2895	352	case _adapter_opt_collect_2_S2_ref :
never@2895	353	case _adapter_opt_filter_S2_ref : return 2;
never@2895	354	case _adapter_opt_collect_2_S3_ref :
never@2895	355	case _adapter_opt_filter_S3_ref : return 3;
never@2895	356	case _adapter_opt_collect_2_S4_ref :
never@2895	357	case _adapter_opt_filter_S4_ref : return 4;
never@2895	358	case _adapter_opt_collect_2_S5_ref :
never@2895	359	case _adapter_opt_filter_S5_ref : return 5;
never@2895	360	default : return -1; // sentinel value for "variable"
never@2895	361	}
never@2895	362	}
never@2895	363
never@2895	364	static BasicType ek_adapter_opt_collect_type(EntryKind ek) {
never@2895	365	assert(ek >= _adapter_opt_collect_FIRST && ek <= _adapter_opt_collect_LAST ||
never@2895	366	ek >= _adapter_opt_fold_FIRST && ek <= _adapter_opt_fold_LAST, "");
never@2895	367	switch (ek) {
never@2895	368	case _adapter_opt_fold_int :
never@2895	369	case _adapter_opt_collect_int : return T_INT;
never@2895	370	case _adapter_opt_fold_long :
never@2895	371	case _adapter_opt_collect_long : return T_LONG;
never@2895	372	case _adapter_opt_fold_float :
never@2895	373	case _adapter_opt_collect_float : return T_FLOAT;
never@2895	374	case _adapter_opt_fold_double :
never@2895	375	case _adapter_opt_collect_double : return T_DOUBLE;
never@2895	376	case _adapter_opt_fold_void :
never@2895	377	case _adapter_opt_collect_void : return T_VOID;
never@2895	378	default : return T_OBJECT;
never@2895	379	}
never@2895	380	}
never@2895	381
never@2895	382	static int ek_adapter_opt_return_slot(EntryKind ek) {
never@2895	383	assert(ek >= _adapter_opt_return_FIRST && ek <= _adapter_opt_return_LAST, "");
never@2895	384	switch (ek) {
never@2895	385	case _adapter_opt_return_S0_ref : return 0;
never@2895	386	case _adapter_opt_return_S1_ref : return 1;
never@2895	387	case _adapter_opt_return_S2_ref : return 2;
never@2895	388	case _adapter_opt_return_S3_ref : return 3;
never@2895	389	case _adapter_opt_return_S4_ref : return 4;
never@2895	390	case _adapter_opt_return_S5_ref : return 5;
never@2895	391	default : return -1; // sentinel value for "variable"
never@2895	392	}
never@2895	393	}
never@2895	394
never@2895	395	static BasicType ek_adapter_opt_return_type(EntryKind ek) {
never@2895	396	assert(ek >= _adapter_opt_return_FIRST && ek <= _adapter_opt_return_LAST, "");
never@2895	397	switch (ek) {
never@2895	398	case _adapter_opt_return_int : return T_INT;
never@2895	399	case _adapter_opt_return_long : return T_LONG;
never@2895	400	case _adapter_opt_return_float : return T_FLOAT;
never@2895	401	case _adapter_opt_return_double : return T_DOUBLE;
never@2895	402	case _adapter_opt_return_void : return T_VOID;
never@2895	403	case _adapter_opt_return_any : return T_CONFLICT; // sentinel value for "variable"
never@2895	404	default : return T_OBJECT;
never@2895	405	}
never@2895	406	}
never@2895	407
never@2895	408	static int ek_adapter_opt_spread_count(EntryKind ek) {
never@2895	409	assert(ek >= _adapter_opt_spread_FIRST && ek <= _adapter_opt_spread_LAST, "");
never@2895	410	switch (ek) {
never@2895	411	case _adapter_opt_spread_0 : return 0;
never@2895	412	case _adapter_opt_spread_1_ref : return 1;
never@2895	413	case _adapter_opt_spread_2_ref : return 2;
never@2895	414	case _adapter_opt_spread_3_ref : return 3;
never@2895	415	case _adapter_opt_spread_4_ref : return 4;
never@2895	416	case _adapter_opt_spread_5_ref : return 5;
never@2895	417	default : return -1; // sentinel value for "variable"
never@2895	418	}
never@2895	419	}
never@2895	420
never@2895	421	static BasicType ek_adapter_opt_spread_type(EntryKind ek) {
never@2895	422	assert(ek >= _adapter_opt_spread_FIRST && ek <= _adapter_opt_spread_LAST, "");
never@2895	423	switch (ek) {
never@2895	424	// (there is no _adapter_opt_spread_boolean; we use byte)
never@2895	425	case _adapter_opt_spread_byte : return T_BYTE;
never@2895	426	case _adapter_opt_spread_char : return T_CHAR;
never@2895	427	case _adapter_opt_spread_short : return T_SHORT;
never@2895	428	case _adapter_opt_spread_int : return T_INT;
never@2895	429	case _adapter_opt_spread_long : return T_LONG;
never@2895	430	case _adapter_opt_spread_float : return T_FLOAT;
never@2895	431	case _adapter_opt_spread_double : return T_DOUBLE;
never@2895	432	default : return T_OBJECT;
twisti@1739	433	}
twisti@1739	434	}
twisti@1739	435
jrose@1474	436	static methodOop raise_exception_method() {
jrose@1474	437	oop rem = JNIHandles::resolve(_raise_exception_method);
jrose@1474	438	assert(rem == NULL || rem->is_method(), "");
jrose@1474	439	return (methodOop) rem;
jrose@1474	440	}
jrose@1474	441	static void set_raise_exception_method(methodOop rem) {
jrose@1474	442	assert(_raise_exception_method == NULL, "");
jrose@1474	443	_raise_exception_method = JNIHandles::make_global(Handle(rem));
jrose@1474	444	}
jrose@2941	445	static methodOop resolve_raise_exception_method(TRAPS);
jrose@2941	446	// call raise_exception_method from C code:
jrose@2941	447	static void raise_exception(int code, oop actual, oop required, TRAPS);
jrose@1474	448
jrose@1145	449	static jint adapter_conversion(int conv_op, BasicType src, BasicType dest,
jrose@1145	450	int stack_move = 0, int vminfo = 0) {
jrose@1145	451	assert(conv_op_valid(conv_op), "oob");
jrose@1145	452	jint conv = ((conv_op << CONV_OP_SHIFT)
jrose@1145	453	| (src << CONV_SRC_TYPE_SHIFT)
jrose@1145	454	| (dest << CONV_DEST_TYPE_SHIFT)
jrose@1145	455	| (stack_move << CONV_STACK_MOVE_SHIFT)
jrose@1145	456	| (vminfo << CONV_VMINFO_SHIFT)
jrose@1145	457	);
jrose@1145	458	assert(adapter_conversion_op(conv) == conv_op, "decode conv_op");
jrose@1145	459	assert(adapter_conversion_src_type(conv) == src, "decode src");
jrose@1145	460	assert(adapter_conversion_dest_type(conv) == dest, "decode dest");
jrose@1145	461	assert(adapter_conversion_stack_move(conv) == stack_move, "decode stack_move");
jrose@1145	462	assert(adapter_conversion_vminfo(conv) == vminfo, "decode vminfo");
jrose@1145	463	return conv;
jrose@1145	464	}
jrose@1145	465	static int adapter_conversion_op(jint conv) {
jrose@1145	466	return ((conv >> CONV_OP_SHIFT) & 0xF);
jrose@1145	467	}
jrose@1145	468	static BasicType adapter_conversion_src_type(jint conv) {
jrose@1145	469	return (BasicType)((conv >> CONV_SRC_TYPE_SHIFT) & 0xF);
jrose@1145	470	}
jrose@1145	471	static BasicType adapter_conversion_dest_type(jint conv) {
jrose@1145	472	return (BasicType)((conv >> CONV_DEST_TYPE_SHIFT) & 0xF);
jrose@1145	473	}
jrose@1145	474	static int adapter_conversion_stack_move(jint conv) {
jrose@1145	475	return (conv >> CONV_STACK_MOVE_SHIFT);
jrose@1145	476	}
jrose@1145	477	static int adapter_conversion_vminfo(jint conv) {
jrose@1145	478	return (conv >> CONV_VMINFO_SHIFT) & CONV_VMINFO_MASK;
jrose@1145	479	}
jrose@1145	480
jrose@1862	481	// Bit mask of conversion_op values. May vary by platform.
jrose@1862	482	static int adapter_conversion_ops_supported_mask();
jrose@1862	483
never@2895	484	static bool conv_op_supported(int conv_op) {
never@2895	485	assert(conv_op_valid(conv_op), "");
never@2895	486	return ((adapter_conversion_ops_supported_mask() & nth_bit(conv_op)) != 0);
never@2895	487	}
never@2895	488
jrose@1145	489	// Offset in words that the interpreter stack pointer moves when an argument is pushed.
jrose@1145	490	// The stack_move value must always be a multiple of this.
jrose@1145	491	static int stack_move_unit() {
twisti@1861	492	return frame::interpreter_frame_expression_stack_direction() * Interpreter::stackElementWords;
jrose@1145	493	}
jrose@1145	494
never@2895	495	// Adapter frame traversal. (Implementation-specific.)
never@2895	496	static frame ricochet_frame_sender(const frame& fr, RegisterMap* reg_map);
never@2895	497	static void ricochet_frame_oops_do(const frame& fr, OopClosure* blk, const RegisterMap* reg_map);
never@2895	498
jrose@1145	499	enum { CONV_VMINFO_SIGN_FLAG = 0x80 };
twisti@2204	500	// Shift values for prim-to-prim conversions.
twisti@2204	501	static int adapter_prim_to_prim_subword_vminfo(BasicType dest) {
twisti@2204	502	if (dest == T_BOOLEAN) return (BitsPerInt - 1); // boolean is 1 bit
twisti@2204	503	if (dest == T_CHAR) return (BitsPerInt - BitsPerShort);
twisti@2204	504	if (dest == T_BYTE) return (BitsPerInt - BitsPerByte ) | CONV_VMINFO_SIGN_FLAG;
twisti@2204	505	if (dest == T_SHORT) return (BitsPerInt - BitsPerShort) | CONV_VMINFO_SIGN_FLAG;
twisti@2204	506	return 0; // case T_INT
twisti@2204	507	}
twisti@2204	508	// Shift values for unboxing a primitive.
twisti@2204	509	static int adapter_unbox_subword_vminfo(BasicType dest) {
twisti@2204	510	if (dest == T_BOOLEAN) return (BitsPerInt - BitsPerByte ); // implemented as 1 byte
twisti@2204	511	if (dest == T_CHAR) return (BitsPerInt - BitsPerShort);
twisti@2204	512	if (dest == T_BYTE) return (BitsPerInt - BitsPerByte ) | CONV_VMINFO_SIGN_FLAG;
twisti@2204	513	if (dest == T_SHORT) return (BitsPerInt - BitsPerShort) | CONV_VMINFO_SIGN_FLAG;
jrose@1145	514	return 0; // case T_INT
jrose@1145	515	}
jrose@1145	516	// Here is the transformation the i2i adapter must perform:
jrose@1145	517	static int truncate_subword_from_vminfo(jint value, int vminfo) {
bdelsart@3142	518	int shift = vminfo & ~CONV_VMINFO_SIGN_FLAG;
bdelsart@3142	519	jint tem = value << shift;
jrose@1145	520	if ((vminfo & CONV_VMINFO_SIGN_FLAG) != 0) {
bdelsart@3142	521	return (jint)tem >> shift;
jrose@1145	522	} else {
bdelsart@3142	523	return (juint)tem >> shift;
jrose@1145	524	}
jrose@1145	525	}
jrose@1145	526
jrose@1145	527	static inline address from_compiled_entry(EntryKind ek);
jrose@1145	528	static inline address from_interpreted_entry(EntryKind ek);
jrose@1145	529
jrose@1145	530	// helpers for decode_method.
twisti@2806	531	static methodOop decode_methodOop(methodOop m, int& decode_flags_result);
twisti@2806	532	static methodHandle decode_vmtarget(oop vmtarget, int vmindex, oop mtype, KlassHandle& receiver_limit_result, int& decode_flags_result);
twisti@2806	533	static methodHandle decode_MemberName(oop mname, KlassHandle& receiver_limit_result, int& decode_flags_result);
twisti@2806	534	static methodHandle decode_MethodHandle(oop mh, KlassHandle& receiver_limit_result, int& decode_flags_result);
twisti@2806	535	static methodHandle decode_DirectMethodHandle(oop mh, KlassHandle& receiver_limit_result, int& decode_flags_result);
twisti@2806	536	static methodHandle decode_BoundMethodHandle(oop mh, KlassHandle& receiver_limit_result, int& decode_flags_result);
twisti@2806	537	static methodHandle decode_AdapterMethodHandle(oop mh, KlassHandle& receiver_limit_result, int& decode_flags_result);
jrose@1145	538
jrose@1145	539	// Find out how many stack slots an mh pushes or pops.
jrose@1145	540	// The result is *not* reported as a multiple of stack_move_unit();
jrose@1145	541	// It is a signed net number of pushes (a difference in vmslots).
jrose@1145	542	// To compare with a stack_move value, first multiply by stack_move_unit().
jrose@1145	543	static int decode_MethodHandle_stack_pushes(oop mh);
jrose@1145	544
jrose@1145	545	public:
jrose@1145	546	// working with member names
jrose@1145	547	static void resolve_MemberName(Handle mname, TRAPS); // compute vmtarget/vmindex from name/type
jrose@1145	548	static void expand_MemberName(Handle mname, int suppress, TRAPS); // expand defc/name/type if missing
jrose@1862	549	static Handle new_MemberName(TRAPS); // must be followed by init_MemberName
jrose@1145	550	static void init_MemberName(oop mname_oop, oop target); // compute vmtarget/vmindex from target
jrose@1862	551	static void init_MemberName(oop mname_oop, methodOop m, bool do_dispatch = true);
jrose@1145	552	static void init_MemberName(oop mname_oop, klassOop field_holder, AccessFlags mods, int offset);
coleenp@2497	553	static int find_MemberNames(klassOop k, Symbol* name, Symbol* sig,
jrose@1145	554	int mflags, klassOop caller,
jrose@1145	555	int skip, objArrayOop results);
jrose@1145	556	// bit values for suppress argument to expand_MemberName:
jrose@1145	557	enum { _suppress_defc = 1, _suppress_name = 2, _suppress_type = 4 };
jrose@1145	558
twisti@1734	559	// Generate MethodHandles adapters.
twisti@2436	560	static void generate_adapters();
twisti@1734	561
twisti@1734	562	// Called from InterpreterGenerator and MethodHandlesAdapterGenerator.
jrose@1145	563	static address generate_method_handle_interpreter_entry(MacroAssembler* _masm);
twisti@2436	564	static void generate_method_handle_stub(MacroAssembler* _masm, EntryKind ek);
jrose@1145	565
jrose@1145	566	// argument list parsing
jrose@1145	567	static int argument_slot(oop method_type, int arg);
jrose@1145	568	static int argument_slot_count(oop method_type) { return argument_slot(method_type, -1); }
jrose@1145	569	static int argument_slot_to_argnum(oop method_type, int argslot);
jrose@1145	570
jrose@1145	571	// Runtime support
jrose@1145	572	enum { // bit-encoded flags from decode_method or decode_vmref
jrose@1145	573	_dmf_has_receiver = 0x01, // target method has leading reference argument
jrose@1145	574	_dmf_does_dispatch = 0x02, // method handle performs virtual or interface dispatch
jrose@1145	575	_dmf_from_interface = 0x04, // peforms interface dispatch
jrose@1145	576	_DMF_DIRECT_MASK = (_dmf_from_interface*2 - _dmf_has_receiver),
jrose@1145	577	_dmf_binds_method = 0x08,
jrose@1145	578	_dmf_binds_argument = 0x10,
jrose@1145	579	_DMF_BOUND_MASK = (_dmf_binds_argument*2 - _dmf_binds_method),
jrose@1145	580	_dmf_adapter_lsb = 0x20,
jrose@1145	581	_DMF_ADAPTER_MASK = (_dmf_adapter_lsb << CONV_OP_LIMIT) - _dmf_adapter_lsb
jrose@1145	582	};
twisti@2806	583	static methodHandle decode_method(oop x, KlassHandle& receiver_limit_result, int& decode_flags_result);
jrose@1145	584	enum {
jrose@1145	585	// format of query to getConstant:
jrose@1145	586	GC_JVM_PUSH_LIMIT = 0,
jrose@1474	587	GC_JVM_STACK_MOVE_UNIT = 1,
jrose@1862	588	GC_CONV_OP_IMPLEMENTED_MASK = 2,
never@2954	589	GC_OP_ROT_ARGS_DOWN_LIMIT_BIAS = 3,
never@3105	590	GC_COUNT_GWT = 4,
jrose@1145	591
jrose@1145	592	// format of result from getTarget / encode_target:
jrose@1145	593	ETF_HANDLE_OR_METHOD_NAME = 0, // all available data (immediate MH or method)
jrose@1145	594	ETF_DIRECT_HANDLE = 1, // ultimate method handle (will be a DMH, may be self)
jrose@1145	595	ETF_METHOD_NAME = 2, // ultimate method as MemberName
never@2954	596	ETF_REFLECT_METHOD = 3, // ultimate method as java.lang.reflect object (sans refClass)
jrose@2982	597	ETF_FORCE_DIRECT_HANDLE = 64,
jrose@2982	598	ETF_COMPILE_DIRECT_HANDLE = 65,
never@2954	599
never@2954	600	// ad hoc constants
never@2954	601	OP_ROT_ARGS_DOWN_LIMIT_BIAS = -1
jrose@1145	602	};
jrose@1145	603	static int get_named_constant(int which, Handle name_box, TRAPS);
jrose@1145	604	static oop encode_target(Handle mh, int format, TRAPS); // report vmtarget (to Java code)
jrose@1145	605	static bool class_cast_needed(klassOop src, klassOop dst);
jrose@1145	606
jrose@1862	607	static instanceKlassHandle resolve_instance_klass(oop java_mirror_oop, TRAPS);
jrose@1862	608	static instanceKlassHandle resolve_instance_klass(jclass java_mirror_jh, TRAPS) {
jrose@1862	609	return resolve_instance_klass(JNIHandles::resolve(java_mirror_jh), THREAD);
jrose@1862	610	}
jrose@1862	611
jrose@1145	612	private:
jrose@1145	613	// These checkers operate on a pair of whole MethodTypes:
jrose@1145	614	static const char* check_method_type_change(oop src_mtype, int src_beg, int src_end,
jrose@1145	615	int insert_argnum, oop insert_type,
jrose@1145	616	int change_argnum, oop change_type,
jrose@1145	617	int delete_argnum,
jrose@1474	618	oop dst_mtype, int dst_beg, int dst_end,
jrose@1474	619	bool raw = false);
jrose@1145	620	static const char* check_method_type_insertion(oop src_mtype,
jrose@1145	621	int insert_argnum, oop insert_type,
jrose@1145	622	oop dst_mtype) {
jrose@1145	623	oop no_ref = NULL;
jrose@1145	624	return check_method_type_change(src_mtype, 0, -1,
jrose@1145	625	insert_argnum, insert_type,
jrose@1145	626	-1, no_ref, -1, dst_mtype, 0, -1);
jrose@1145	627	}
jrose@1145	628	static const char* check_method_type_conversion(oop src_mtype,
jrose@1145	629	int change_argnum, oop change_type,
jrose@1145	630	oop dst_mtype) {
jrose@1145	631	oop no_ref = NULL;
jrose@1145	632	return check_method_type_change(src_mtype, 0, -1, -1, no_ref,
jrose@1145	633	change_argnum, change_type,
jrose@1145	634	-1, dst_mtype, 0, -1);
jrose@1145	635	}
jrose@1474	636	static const char* check_method_type_passthrough(oop src_mtype, oop dst_mtype, bool raw) {
jrose@1145	637	oop no_ref = NULL;
jrose@1145	638	return check_method_type_change(src_mtype, 0, -1,
jrose@1145	639	-1, no_ref, -1, no_ref, -1,
jrose@1474	640	dst_mtype, 0, -1, raw);
jrose@1145	641	}
jrose@1145	642
jrose@1145	643	// These checkers operate on pairs of argument or return types:
jrose@1145	644	static const char* check_argument_type_change(BasicType src_type, klassOop src_klass,
jrose@1145	645	BasicType dst_type, klassOop dst_klass,
jrose@1474	646	int argnum, bool raw = false);
jrose@1145	647
jrose@1145	648	static const char* check_argument_type_change(oop src_type, oop dst_type,
jrose@1474	649	int argnum, bool raw = false) {
jrose@1145	650	klassOop src_klass = NULL, dst_klass = NULL;
jrose@1145	651	BasicType src_bt = java_lang_Class::as_BasicType(src_type, &src_klass);
jrose@1145	652	BasicType dst_bt = java_lang_Class::as_BasicType(dst_type, &dst_klass);
jrose@1145	653	return check_argument_type_change(src_bt, src_klass,
jrose@1474	654	dst_bt, dst_klass, argnum, raw);
jrose@1145	655	}
jrose@1145	656
jrose@1474	657	static const char* check_return_type_change(oop src_type, oop dst_type, bool raw = false) {
jrose@1474	658	return check_argument_type_change(src_type, dst_type, -1, raw);
jrose@1145	659	}
jrose@1145	660
jrose@1145	661	static const char* check_return_type_change(BasicType src_type, klassOop src_klass,
jrose@1145	662	BasicType dst_type, klassOop dst_klass) {
jrose@1145	663	return check_argument_type_change(src_type, src_klass, dst_type, dst_klass, -1);
jrose@1145	664	}
jrose@1145	665
jrose@1145	666	static const char* check_method_receiver(methodOop m, klassOop passed_recv_type);
jrose@1145	667
jrose@1145	668	// These verifiers can block, and will throw an error if the checking fails:
jrose@1145	669	static void verify_vmslots(Handle mh, TRAPS);
jrose@1145	670	static void verify_vmargslot(Handle mh, int argnum, int argslot, TRAPS);
jrose@1145	671
jrose@1145	672	static void verify_method_type(methodHandle m, Handle mtype,
jrose@1145	673	bool has_bound_oop,
jrose@1145	674	KlassHandle bound_oop_type,
jrose@1145	675	TRAPS);
jrose@1145	676
jrose@1145	677	static void verify_method_signature(methodHandle m, Handle mtype,
jrose@1145	678	int first_ptype_pos,
jrose@1145	679	KlassHandle insert_ptype, TRAPS);
jrose@1145	680
jrose@1145	681	static void verify_DirectMethodHandle(Handle mh, methodHandle m, TRAPS);
jrose@1145	682	static void verify_BoundMethodHandle(Handle mh, Handle target, int argnum,
jrose@1145	683	bool direct_to_method, TRAPS);
jrose@1145	684	static void verify_BoundMethodHandle_with_receiver(Handle mh, methodHandle m, TRAPS);
jrose@1145	685	static void verify_AdapterMethodHandle(Handle mh, int argnum, TRAPS);
jrose@1145	686
jrose@1145	687	public:
jrose@1145	688
jrose@1145	689	// Fill in the fields of a DirectMethodHandle mh. (MH.type must be pre-filled.)
jrose@1145	690	static void init_DirectMethodHandle(Handle mh, methodHandle method, bool do_dispatch, TRAPS);
jrose@1145	691
jrose@1145	692	// Fill in the fields of a BoundMethodHandle mh. (MH.type, BMH.argument must be pre-filled.)
jrose@1145	693	static void init_BoundMethodHandle(Handle mh, Handle target, int argnum, TRAPS);
jrose@1145	694	static void init_BoundMethodHandle_with_receiver(Handle mh,
jrose@1145	695	methodHandle original_m,
jrose@1145	696	KlassHandle receiver_limit,
jrose@1145	697	int decode_flags,
jrose@1145	698	TRAPS);
jrose@1145	699
jrose@1145	700	// Fill in the fields of an AdapterMethodHandle mh. (MH.type must be pre-filled.)
jrose@1145	701	static void init_AdapterMethodHandle(Handle mh, Handle target, int argnum, TRAPS);
never@2895	702	static void ensure_vmlayout_field(Handle target, TRAPS);
jrose@1145	703
jrose@1145	704	#ifdef ASSERT
jrose@1145	705	static bool spot_check_entry_names();
jrose@1145	706	#endif
jrose@1145	707
jrose@1145	708	private:
jrose@1145	709	static methodHandle dispatch_decoded_method(methodHandle m,
jrose@1145	710	KlassHandle receiver_limit,
jrose@1145	711	int decode_flags,
jrose@1145	712	KlassHandle receiver_klass,
jrose@1145	713	TRAPS);
jrose@1145	714
twisti@2903	715	public:
twisti@2903	716	static bool is_float_fixed_reinterpretation_cast(BasicType src, BasicType dst);
jrose@1145	717	static bool same_basic_type_for_arguments(BasicType src, BasicType dst,
jrose@1474	718	bool raw = false,
jrose@1145	719	bool for_return = false);
jrose@1474	720	static bool same_basic_type_for_returns(BasicType src, BasicType dst, bool raw = false) {
jrose@1474	721	return same_basic_type_for_arguments(src, dst, raw, true);
jrose@1145	722	}
jrose@1145	723
never@2895	724	static Symbol* convert_to_signature(oop type_str, bool polymorphic, TRAPS);
never@2895	725
never@2895	726	#ifdef TARGET_ARCH_x86
never@2895	727	# include "methodHandles_x86.hpp"
never@2895	728	#endif
never@2895	729	#ifdef TARGET_ARCH_sparc
never@2950	730	# include "methodHandles_sparc.hpp"
never@2895	731	#endif
never@2895	732	#ifdef TARGET_ARCH_zero
never@2950	733	# include "methodHandles_zero.hpp"
never@2895	734	#endif
never@2895	735	#ifdef TARGET_ARCH_arm
bdelsart@2917	736	# include "methodHandles_arm.hpp"
never@2895	737	#endif
never@2895	738	#ifdef TARGET_ARCH_ppc
bdelsart@2917	739	# include "methodHandles_ppc.hpp"
never@2895	740	#endif
never@2895	741
never@2895	742	#ifdef TARGET_ARCH_NYI_6939861
never@2895	743	// Here are some backward compatible declarations until the 6939861 ports are updated.
never@2895	744	#define _adapter_flyby (_EK_LIMIT + 10)
never@2895	745	#define _adapter_ricochet (_EK_LIMIT + 11)
never@2895	746	#define _adapter_opt_spread_1 _adapter_opt_spread_1_ref
never@2895	747	#define _adapter_opt_spread_more _adapter_opt_spread_ref
never@2895	748	enum {
jrose@1145	749	_INSERT_NO_MASK = -1,
jrose@1145	750	_INSERT_REF_MASK = 0,
jrose@1145	751	_INSERT_INT_MASK = 1,
jrose@1145	752	_INSERT_LONG_MASK = 3
jrose@1145	753	};
never@2895	754	static void get_ek_bound_mh_info(EntryKind ek, BasicType& arg_type, int& arg_mask, int& arg_slots) {
never@2895	755	arg_type = ek_bound_mh_arg_type(ek);
never@2895	756	arg_mask = 0;
never@2895	757	arg_slots = type2size[arg_type];;
never@2895	758	}
never@2895	759	static void get_ek_adapter_opt_swap_rot_info(EntryKind ek, int& swap_bytes, int& rotate) {
never@2895	760	int swap_slots = ek_adapter_opt_swap_slots(ek);
never@2895	761	rotate = ek_adapter_opt_swap_mode(ek);
never@2895	762	swap_bytes = swap_slots * Interpreter::stackElementSize;
never@2895	763	}
never@2895	764	static int get_ek_adapter_opt_spread_info(EntryKind ek) {
never@2895	765	return ek_adapter_opt_spread_count(ek);
never@2895	766	}
never@2895	767
jrose@1145	768	static void insert_arg_slots(MacroAssembler* _masm,
jrose@1145	769	RegisterOrConstant arg_slots,
jrose@1145	770	int arg_mask,
twisti@1739	771	Register argslot_reg,
twisti@1858	772	Register temp_reg, Register temp2_reg, Register temp3_reg = noreg);
jrose@1145	773
jrose@1145	774	static void remove_arg_slots(MacroAssembler* _masm,
jrose@1145	775	RegisterOrConstant arg_slots,
twisti@1739	776	Register argslot_reg,
twisti@1858	777	Register temp_reg, Register temp2_reg, Register temp3_reg = noreg);
jrose@2148	778
jrose@2148	779	static void trace_method_handle(MacroAssembler* _masm, const char* adaptername) PRODUCT_RETURN;
never@2895	780	#endif //TARGET_ARCH_NYI_6939861
jrose@1145	781	};
jrose@1145	782
jrose@1145	783
jrose@2639	784	// Access methods for the "entry" field of a java.lang.invoke.MethodHandle.
jrose@1145	785	// The field is primarily a jump target for compiled calls.
jrose@1145	786	// However, we squirrel away some nice pointers for other uses,
jrose@1145	787	// just before the jump target.
jrose@1145	788	// Aspects of a method handle entry:
jrose@1145	789	// - from_compiled_entry - stub used when compiled code calls the MH
jrose@1145	790	// - from_interpreted_entry - stub used when the interpreter calls the MH
jrose@1145	791	// - type_checking_entry - stub for runtime casting between MHForm siblings (NYI)
jrose@1145	792	class MethodHandleEntry {
jrose@1145	793	public:
jrose@1145	794	class Data {
jrose@1145	795	friend class MethodHandleEntry;
jrose@1145	796	size_t _total_size; // size including Data and code stub
jrose@1145	797	MethodHandleEntry* _type_checking_entry;
jrose@1145	798	address _from_interpreted_entry;
jrose@1145	799	MethodHandleEntry* method_entry() { return (MethodHandleEntry*)(this + 1); }
jrose@1145	800	};
jrose@1145	801
jrose@1145	802	Data* data() { return (Data*)this - 1; }
jrose@1145	803
jrose@1145	804	address start_address() { return (address) data(); }
jrose@1145	805	address end_address() { return start_address() + data()->_total_size; }
jrose@1145	806
jrose@1145	807	address from_compiled_entry() { return (address) this; }
jrose@1145	808
jrose@1145	809	address from_interpreted_entry() { return data()->_from_interpreted_entry; }
jrose@1145	810	void set_from_interpreted_entry(address e) { data()->_from_interpreted_entry = e; }
jrose@1145	811
jrose@1145	812	MethodHandleEntry* type_checking_entry() { return data()->_type_checking_entry; }
jrose@1145	813	void set_type_checking_entry(MethodHandleEntry* e) { data()->_type_checking_entry = e; }
jrose@1145	814
jrose@1145	815	void set_end_address(address end_addr) {
jrose@1145	816	size_t total_size = end_addr - start_address();
jrose@1145	817	assert(total_size > 0 && total_size < 0x1000, "reasonable end address");
jrose@1145	818	data()->_total_size = total_size;
jrose@1145	819	}
jrose@1145	820
jrose@1145	821	// Compiler support:
jrose@1145	822	static int from_interpreted_entry_offset_in_bytes() {
jrose@1145	823	return (int)( offset_of(Data, _from_interpreted_entry) - sizeof(Data) );
jrose@1145	824	}
jrose@1145	825	static int type_checking_entry_offset_in_bytes() {
jrose@1145	826	return (int)( offset_of(Data, _from_interpreted_entry) - sizeof(Data) );
jrose@1145	827	}
jrose@1145	828
jrose@1145	829	static address start_compiled_entry(MacroAssembler* _masm,
jrose@1145	830	address interpreted_entry = NULL);
jrose@1145	831	static MethodHandleEntry* finish_compiled_entry(MacroAssembler* masm, address start_addr);
jrose@1145	832	};
jrose@1145	833
jrose@1145	834	address MethodHandles::from_compiled_entry(EntryKind ek) { return entry(ek)->from_compiled_entry(); }
jrose@1145	835	address MethodHandles::from_interpreted_entry(EntryKind ek) { return entry(ek)->from_interpreted_entry(); }
twisti@1734	836
twisti@1734	837
twisti@1734	838	//------------------------------------------------------------------------------
twisti@1734	839	// MethodHandlesAdapterGenerator
twisti@1734	840	//
twisti@1734	841	class MethodHandlesAdapterGenerator : public StubCodeGenerator {
twisti@1734	842	public:
never@2954	843	MethodHandlesAdapterGenerator(CodeBuffer* code) : StubCodeGenerator(code, PrintMethodHandleStubs) {}
twisti@1734	844
twisti@2436	845	void generate();
twisti@1734	846	};
stefank@2314	847
stefank@2314	848	#endif // SHARE_VM_PRIMS_METHODHANDLES_HPP