src/share/vm/prims/methodHandles.hpp

Sun, 11 Oct 2009 16:19:25 -0700

author
jcoomes
date
Sun, 11 Oct 2009 16:19:25 -0700
changeset 1844
cff162798819
parent 1739
76c1d7d13ec5
child 1858
c640000b7cc1
permissions
-rw-r--r--

6888953: some calls to function-like macros are missing semicolons
Reviewed-by: pbk, kvn

jrose@1145 1 /*
twisti@1739 2 * Copyright 2008-2010 Sun Microsystems, Inc. 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 *
jrose@1145 19 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
jrose@1145 20 * CA 95054 USA or visit www.sun.com if you need additional information or
jrose@1145 21 * have any questions.
jrose@1145 22 *
jrose@1145 23 */
jrose@1145 24
jrose@1145 25 class MacroAssembler;
jrose@1145 26 class Label;
jrose@1145 27 class MethodHandleEntry;
jrose@1145 28
jrose@1145 29 class MethodHandles: AllStatic {
jrose@1145 30 // JVM support for MethodHandle, MethodType, and related types
jrose@1145 31 // in java.dyn and java.dyn.hotspot.
jrose@1145 32 // See also javaClasses for layouts java_dyn_Method{Handle,Type,Type::Form}.
jrose@1145 33 public:
jrose@1145 34 enum EntryKind {
jrose@1474 35 _raise_exception, // stub for error generation from other stubs
jrose@1145 36 _invokestatic_mh, // how a MH emulates invokestatic
jrose@1145 37 _invokespecial_mh, // ditto for the other invokes...
jrose@1145 38 _invokevirtual_mh,
jrose@1145 39 _invokeinterface_mh,
jrose@1145 40 _bound_ref_mh, // reference argument is bound
jrose@1145 41 _bound_int_mh, // int argument is bound (via an Integer or Float)
jrose@1145 42 _bound_long_mh, // long argument is bound (via a Long or Double)
jrose@1145 43 _bound_ref_direct_mh, // same as above, with direct linkage to methodOop
jrose@1145 44 _bound_int_direct_mh,
jrose@1145 45 _bound_long_direct_mh,
jrose@1145 46
jrose@1145 47 _adapter_mh_first, // adapter sequence goes here...
jrose@1145 48 _adapter_retype_only = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_RETYPE_ONLY,
jrose@1474 49 _adapter_retype_raw = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_RETYPE_RAW,
jrose@1145 50 _adapter_check_cast = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_CHECK_CAST,
jrose@1145 51 _adapter_prim_to_prim = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_PRIM_TO_PRIM,
jrose@1145 52 _adapter_ref_to_prim = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_REF_TO_PRIM,
jrose@1145 53 _adapter_prim_to_ref = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_PRIM_TO_REF,
jrose@1145 54 _adapter_swap_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_SWAP_ARGS,
jrose@1145 55 _adapter_rot_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_ROT_ARGS,
jrose@1145 56 _adapter_dup_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_DUP_ARGS,
jrose@1145 57 _adapter_drop_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_DROP_ARGS,
jrose@1145 58 _adapter_collect_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_COLLECT_ARGS,
jrose@1145 59 _adapter_spread_args = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_SPREAD_ARGS,
jrose@1145 60 _adapter_flyby = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_FLYBY,
jrose@1145 61 _adapter_ricochet = _adapter_mh_first + sun_dyn_AdapterMethodHandle::OP_RICOCHET,
jrose@1145 62 _adapter_mh_last = _adapter_mh_first + sun_dyn_AdapterMethodHandle::CONV_OP_LIMIT - 1,
jrose@1145 63
jrose@1145 64 // Optimized adapter types
jrose@1145 65
jrose@1145 66 // argument list reordering
jrose@1145 67 _adapter_opt_swap_1,
jrose@1145 68 _adapter_opt_swap_2,
jrose@1145 69 _adapter_opt_rot_1_up,
jrose@1145 70 _adapter_opt_rot_1_down,
jrose@1145 71 _adapter_opt_rot_2_up,
jrose@1145 72 _adapter_opt_rot_2_down,
jrose@1145 73 // primitive single to single:
jrose@1145 74 _adapter_opt_i2i, // i2c, i2z, i2b, i2s
jrose@1145 75 // primitive double to single:
jrose@1145 76 _adapter_opt_l2i,
jrose@1145 77 _adapter_opt_d2f,
jrose@1145 78 // primitive single to double:
jrose@1145 79 _adapter_opt_i2l,
jrose@1145 80 _adapter_opt_f2d,
jrose@1145 81 // conversion between floating point and integer type is handled by Java
jrose@1145 82
jrose@1145 83 // reference to primitive:
jrose@1145 84 _adapter_opt_unboxi,
jrose@1145 85 _adapter_opt_unboxl,
jrose@1145 86
jrose@1145 87 // spreading (array length cases 0, 1, >=2)
jrose@1145 88 _adapter_opt_spread_0,
jrose@1145 89 _adapter_opt_spread_1,
jrose@1145 90 _adapter_opt_spread_more,
jrose@1145 91
jrose@1145 92 _EK_LIMIT,
jrose@1145 93 _EK_FIRST = 0
jrose@1145 94 };
jrose@1145 95
jrose@1145 96 public:
jrose@1145 97 static bool enabled() { return _enabled; }
jrose@1145 98 static void set_enabled(bool z);
jrose@1145 99
jrose@1145 100 private:
jrose@1145 101 enum { // import sun_dyn_AdapterMethodHandle::CONV_OP_*
jrose@1145 102 CONV_OP_LIMIT = sun_dyn_AdapterMethodHandle::CONV_OP_LIMIT,
jrose@1145 103 CONV_OP_MASK = sun_dyn_AdapterMethodHandle::CONV_OP_MASK,
jrose@1145 104 CONV_VMINFO_MASK = sun_dyn_AdapterMethodHandle::CONV_VMINFO_MASK,
jrose@1145 105 CONV_VMINFO_SHIFT = sun_dyn_AdapterMethodHandle::CONV_VMINFO_SHIFT,
jrose@1145 106 CONV_OP_SHIFT = sun_dyn_AdapterMethodHandle::CONV_OP_SHIFT,
jrose@1145 107 CONV_DEST_TYPE_SHIFT = sun_dyn_AdapterMethodHandle::CONV_DEST_TYPE_SHIFT,
jrose@1145 108 CONV_SRC_TYPE_SHIFT = sun_dyn_AdapterMethodHandle::CONV_SRC_TYPE_SHIFT,
jrose@1145 109 CONV_STACK_MOVE_SHIFT = sun_dyn_AdapterMethodHandle::CONV_STACK_MOVE_SHIFT,
jrose@1145 110 CONV_STACK_MOVE_MASK = sun_dyn_AdapterMethodHandle::CONV_STACK_MOVE_MASK
jrose@1145 111 };
jrose@1145 112
jrose@1145 113 static bool _enabled;
jrose@1145 114 static MethodHandleEntry* _entries[_EK_LIMIT];
jrose@1145 115 static const char* _entry_names[_EK_LIMIT+1];
jrose@1474 116 static jobject _raise_exception_method;
jrose@1474 117
twisti@1734 118 // Adapters.
twisti@1734 119 static MethodHandlesAdapterBlob* _adapter_code;
twisti@1734 120 static int _adapter_code_size;
twisti@1734 121
jrose@1145 122 static bool ek_valid(EntryKind ek) { return (uint)ek < (uint)_EK_LIMIT; }
jrose@1145 123 static bool conv_op_valid(int op) { return (uint)op < (uint)CONV_OP_LIMIT; }
jrose@1145 124
jrose@1145 125 public:
jrose@1145 126 static bool have_entry(EntryKind ek) { return ek_valid(ek) && _entries[ek] != NULL; }
jrose@1145 127 static MethodHandleEntry* entry(EntryKind ek) { assert(ek_valid(ek), "initialized");
jrose@1145 128 return _entries[ek]; }
jrose@1145 129 static const char* entry_name(EntryKind ek) { assert(ek_valid(ek), "oob");
jrose@1145 130 return _entry_names[ek]; }
jrose@1145 131 static EntryKind adapter_entry_kind(int op) { assert(conv_op_valid(op), "oob");
jrose@1145 132 return EntryKind(_adapter_mh_first + op); }
jrose@1145 133
jrose@1145 134 static void init_entry(EntryKind ek, MethodHandleEntry* me) {
jrose@1145 135 assert(ek_valid(ek), "oob");
jrose@1145 136 assert(_entries[ek] == NULL, "no double initialization");
jrose@1145 137 _entries[ek] = me;
jrose@1145 138 }
jrose@1145 139
twisti@1739 140 // Some adapter helper functions.
twisti@1739 141 static void get_ek_bound_mh_info(EntryKind ek, BasicType& arg_type, int& arg_mask, int& arg_slots) {
twisti@1739 142 switch (ek) {
twisti@1739 143 case _bound_int_mh : // fall-thru
twisti@1739 144 case _bound_int_direct_mh : arg_type = T_INT; arg_mask = _INSERT_INT_MASK; break;
twisti@1739 145 case _bound_long_mh : // fall-thru
twisti@1739 146 case _bound_long_direct_mh: arg_type = T_LONG; arg_mask = _INSERT_LONG_MASK; break;
twisti@1739 147 case _bound_ref_mh : // fall-thru
twisti@1739 148 case _bound_ref_direct_mh : arg_type = T_OBJECT; arg_mask = _INSERT_REF_MASK; break;
twisti@1739 149 default: ShouldNotReachHere();
twisti@1739 150 }
twisti@1739 151 arg_slots = type2size[arg_type];
twisti@1739 152 }
twisti@1739 153
twisti@1739 154 static void get_ek_adapter_opt_swap_rot_info(EntryKind ek, int& swap_bytes, int& rotate) {
twisti@1739 155 int swap_slots = 0;
twisti@1739 156 switch (ek) {
twisti@1739 157 case _adapter_opt_swap_1: swap_slots = 1; rotate = 0; break;
twisti@1739 158 case _adapter_opt_swap_2: swap_slots = 2; rotate = 0; break;
twisti@1739 159 case _adapter_opt_rot_1_up: swap_slots = 1; rotate = 1; break;
twisti@1739 160 case _adapter_opt_rot_1_down: swap_slots = 1; rotate = -1; break;
twisti@1739 161 case _adapter_opt_rot_2_up: swap_slots = 2; rotate = 1; break;
twisti@1739 162 case _adapter_opt_rot_2_down: swap_slots = 2; rotate = -1; break;
twisti@1739 163 default: ShouldNotReachHere();
twisti@1739 164 }
twisti@1739 165 // Return the size of the stack slots to move in bytes.
twisti@1739 166 swap_bytes = swap_slots * Interpreter::stackElementSize();
twisti@1739 167 }
twisti@1739 168
twisti@1739 169 static int get_ek_adapter_opt_spread_info(EntryKind ek) {
twisti@1739 170 switch (ek) {
twisti@1739 171 case _adapter_opt_spread_0: return 0;
twisti@1739 172 case _adapter_opt_spread_1: return 1;
twisti@1739 173 default : return -1;
twisti@1739 174 }
twisti@1739 175 }
twisti@1739 176
jrose@1474 177 static methodOop raise_exception_method() {
jrose@1474 178 oop rem = JNIHandles::resolve(_raise_exception_method);
jrose@1474 179 assert(rem == NULL || rem->is_method(), "");
jrose@1474 180 return (methodOop) rem;
jrose@1474 181 }
jrose@1474 182 static void set_raise_exception_method(methodOop rem) {
jrose@1474 183 assert(_raise_exception_method == NULL, "");
jrose@1474 184 _raise_exception_method = JNIHandles::make_global(Handle(rem));
jrose@1474 185 }
jrose@1474 186
jrose@1145 187 static jint adapter_conversion(int conv_op, BasicType src, BasicType dest,
jrose@1145 188 int stack_move = 0, int vminfo = 0) {
jrose@1145 189 assert(conv_op_valid(conv_op), "oob");
jrose@1145 190 jint conv = ((conv_op << CONV_OP_SHIFT)
jrose@1145 191 | (src << CONV_SRC_TYPE_SHIFT)
jrose@1145 192 | (dest << CONV_DEST_TYPE_SHIFT)
jrose@1145 193 | (stack_move << CONV_STACK_MOVE_SHIFT)
jrose@1145 194 | (vminfo << CONV_VMINFO_SHIFT)
jrose@1145 195 );
jrose@1145 196 assert(adapter_conversion_op(conv) == conv_op, "decode conv_op");
jrose@1145 197 assert(adapter_conversion_src_type(conv) == src, "decode src");
jrose@1145 198 assert(adapter_conversion_dest_type(conv) == dest, "decode dest");
jrose@1145 199 assert(adapter_conversion_stack_move(conv) == stack_move, "decode stack_move");
jrose@1145 200 assert(adapter_conversion_vminfo(conv) == vminfo, "decode vminfo");
jrose@1145 201 return conv;
jrose@1145 202 }
jrose@1145 203 static int adapter_conversion_op(jint conv) {
jrose@1145 204 return ((conv >> CONV_OP_SHIFT) & 0xF);
jrose@1145 205 }
jrose@1145 206 static BasicType adapter_conversion_src_type(jint conv) {
jrose@1145 207 return (BasicType)((conv >> CONV_SRC_TYPE_SHIFT) & 0xF);
jrose@1145 208 }
jrose@1145 209 static BasicType adapter_conversion_dest_type(jint conv) {
jrose@1145 210 return (BasicType)((conv >> CONV_DEST_TYPE_SHIFT) & 0xF);
jrose@1145 211 }
jrose@1145 212 static int adapter_conversion_stack_move(jint conv) {
jrose@1145 213 return (conv >> CONV_STACK_MOVE_SHIFT);
jrose@1145 214 }
jrose@1145 215 static int adapter_conversion_vminfo(jint conv) {
jrose@1145 216 return (conv >> CONV_VMINFO_SHIFT) & CONV_VMINFO_MASK;
jrose@1145 217 }
jrose@1145 218
jrose@1145 219 // Offset in words that the interpreter stack pointer moves when an argument is pushed.
jrose@1145 220 // The stack_move value must always be a multiple of this.
jrose@1145 221 static int stack_move_unit() {
jrose@1145 222 return frame::interpreter_frame_expression_stack_direction() * Interpreter::stackElementWords();
jrose@1145 223 }
jrose@1145 224
jrose@1145 225 enum { CONV_VMINFO_SIGN_FLAG = 0x80 };
jrose@1145 226 static int adapter_subword_vminfo(BasicType dest) {
jrose@1145 227 if (dest == T_BOOLEAN) return (BitsPerInt - 1);
jrose@1145 228 if (dest == T_CHAR) return (BitsPerInt - 16);
jrose@1145 229 if (dest == T_BYTE) return (BitsPerInt - 8) | CONV_VMINFO_SIGN_FLAG;
jrose@1145 230 if (dest == T_SHORT) return (BitsPerInt - 16) | CONV_VMINFO_SIGN_FLAG;
jrose@1145 231 return 0; // case T_INT
jrose@1145 232 }
jrose@1145 233 // Here is the transformation the i2i adapter must perform:
jrose@1145 234 static int truncate_subword_from_vminfo(jint value, int vminfo) {
jrose@1145 235 jint tem = value << vminfo;
jrose@1145 236 if ((vminfo & CONV_VMINFO_SIGN_FLAG) != 0) {
jrose@1145 237 return (jint)tem >> vminfo;
jrose@1145 238 } else {
jrose@1145 239 return (juint)tem >> vminfo;
jrose@1145 240 }
jrose@1145 241 }
jrose@1145 242
jrose@1145 243 static inline address from_compiled_entry(EntryKind ek);
jrose@1145 244 static inline address from_interpreted_entry(EntryKind ek);
jrose@1145 245
jrose@1145 246 // helpers for decode_method.
jrose@1145 247 static methodOop decode_methodOop(methodOop m, int& decode_flags_result);
jrose@1145 248 static methodOop decode_vmtarget(oop vmtarget, int vmindex, oop mtype, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 249 static methodOop decode_MemberName(oop mname, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 250 static methodOop decode_MethodHandle(oop mh, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 251 static methodOop decode_DirectMethodHandle(oop mh, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 252 static methodOop decode_BoundMethodHandle(oop mh, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 253 static methodOop decode_AdapterMethodHandle(oop mh, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 254
jrose@1145 255 // Find out how many stack slots an mh pushes or pops.
jrose@1145 256 // The result is *not* reported as a multiple of stack_move_unit();
jrose@1145 257 // It is a signed net number of pushes (a difference in vmslots).
jrose@1145 258 // To compare with a stack_move value, first multiply by stack_move_unit().
jrose@1145 259 static int decode_MethodHandle_stack_pushes(oop mh);
jrose@1145 260
jrose@1145 261 public:
jrose@1145 262 // working with member names
jrose@1145 263 static void resolve_MemberName(Handle mname, TRAPS); // compute vmtarget/vmindex from name/type
jrose@1145 264 static void expand_MemberName(Handle mname, int suppress, TRAPS); // expand defc/name/type if missing
jrose@1145 265 static void init_MemberName(oop mname_oop, oop target); // compute vmtarget/vmindex from target
jrose@1145 266 static void init_MemberName(oop mname_oop, methodOop m, bool do_dispatch);
jrose@1145 267 static void init_MemberName(oop mname_oop, klassOop field_holder, AccessFlags mods, int offset);
jrose@1145 268 static int find_MemberNames(klassOop k, symbolOop name, symbolOop sig,
jrose@1145 269 int mflags, klassOop caller,
jrose@1145 270 int skip, objArrayOop results);
jrose@1145 271 // bit values for suppress argument to expand_MemberName:
jrose@1145 272 enum { _suppress_defc = 1, _suppress_name = 2, _suppress_type = 4 };
jrose@1145 273
twisti@1734 274 // Generate MethodHandles adapters.
twisti@1734 275 static void generate_adapters();
twisti@1734 276
twisti@1734 277 // Called from InterpreterGenerator and MethodHandlesAdapterGenerator.
jrose@1145 278 static address generate_method_handle_interpreter_entry(MacroAssembler* _masm);
jrose@1145 279 static void generate_method_handle_stub(MacroAssembler* _masm, EntryKind ek);
jrose@1145 280
jrose@1145 281 // argument list parsing
jrose@1145 282 static int argument_slot(oop method_type, int arg);
jrose@1145 283 static int argument_slot_count(oop method_type) { return argument_slot(method_type, -1); }
jrose@1145 284 static int argument_slot_to_argnum(oop method_type, int argslot);
jrose@1145 285
jrose@1145 286 // Runtime support
jrose@1145 287 enum { // bit-encoded flags from decode_method or decode_vmref
jrose@1145 288 _dmf_has_receiver = 0x01, // target method has leading reference argument
jrose@1145 289 _dmf_does_dispatch = 0x02, // method handle performs virtual or interface dispatch
jrose@1145 290 _dmf_from_interface = 0x04, // peforms interface dispatch
jrose@1145 291 _DMF_DIRECT_MASK = (_dmf_from_interface*2 - _dmf_has_receiver),
jrose@1145 292 _dmf_binds_method = 0x08,
jrose@1145 293 _dmf_binds_argument = 0x10,
jrose@1145 294 _DMF_BOUND_MASK = (_dmf_binds_argument*2 - _dmf_binds_method),
jrose@1145 295 _dmf_adapter_lsb = 0x20,
jrose@1145 296 _DMF_ADAPTER_MASK = (_dmf_adapter_lsb << CONV_OP_LIMIT) - _dmf_adapter_lsb
jrose@1145 297 };
jrose@1145 298 static methodOop decode_method(oop x, klassOop& receiver_limit_result, int& decode_flags_result);
jrose@1145 299 enum {
jrose@1145 300 // format of query to getConstant:
jrose@1145 301 GC_JVM_PUSH_LIMIT = 0,
jrose@1474 302 GC_JVM_STACK_MOVE_UNIT = 1,
jrose@1145 303
jrose@1145 304 // format of result from getTarget / encode_target:
jrose@1145 305 ETF_HANDLE_OR_METHOD_NAME = 0, // all available data (immediate MH or method)
jrose@1145 306 ETF_DIRECT_HANDLE = 1, // ultimate method handle (will be a DMH, may be self)
jrose@1145 307 ETF_METHOD_NAME = 2, // ultimate method as MemberName
jrose@1145 308 ETF_REFLECT_METHOD = 3 // ultimate method as java.lang.reflect object (sans refClass)
jrose@1145 309 };
jrose@1145 310 static int get_named_constant(int which, Handle name_box, TRAPS);
jrose@1145 311 static oop encode_target(Handle mh, int format, TRAPS); // report vmtarget (to Java code)
jrose@1145 312 static bool class_cast_needed(klassOop src, klassOop dst);
jrose@1145 313
jrose@1145 314 private:
jrose@1145 315 // These checkers operate on a pair of whole MethodTypes:
jrose@1145 316 static const char* check_method_type_change(oop src_mtype, int src_beg, int src_end,
jrose@1145 317 int insert_argnum, oop insert_type,
jrose@1145 318 int change_argnum, oop change_type,
jrose@1145 319 int delete_argnum,
jrose@1474 320 oop dst_mtype, int dst_beg, int dst_end,
jrose@1474 321 bool raw = false);
jrose@1145 322 static const char* check_method_type_insertion(oop src_mtype,
jrose@1145 323 int insert_argnum, oop insert_type,
jrose@1145 324 oop dst_mtype) {
jrose@1145 325 oop no_ref = NULL;
jrose@1145 326 return check_method_type_change(src_mtype, 0, -1,
jrose@1145 327 insert_argnum, insert_type,
jrose@1145 328 -1, no_ref, -1, dst_mtype, 0, -1);
jrose@1145 329 }
jrose@1145 330 static const char* check_method_type_conversion(oop src_mtype,
jrose@1145 331 int change_argnum, oop change_type,
jrose@1145 332 oop dst_mtype) {
jrose@1145 333 oop no_ref = NULL;
jrose@1145 334 return check_method_type_change(src_mtype, 0, -1, -1, no_ref,
jrose@1145 335 change_argnum, change_type,
jrose@1145 336 -1, dst_mtype, 0, -1);
jrose@1145 337 }
jrose@1474 338 static const char* check_method_type_passthrough(oop src_mtype, oop dst_mtype, bool raw) {
jrose@1145 339 oop no_ref = NULL;
jrose@1145 340 return check_method_type_change(src_mtype, 0, -1,
jrose@1145 341 -1, no_ref, -1, no_ref, -1,
jrose@1474 342 dst_mtype, 0, -1, raw);
jrose@1145 343 }
jrose@1145 344
jrose@1145 345 // These checkers operate on pairs of argument or return types:
jrose@1145 346 static const char* check_argument_type_change(BasicType src_type, klassOop src_klass,
jrose@1145 347 BasicType dst_type, klassOop dst_klass,
jrose@1474 348 int argnum, bool raw = false);
jrose@1145 349
jrose@1145 350 static const char* check_argument_type_change(oop src_type, oop dst_type,
jrose@1474 351 int argnum, bool raw = false) {
jrose@1145 352 klassOop src_klass = NULL, dst_klass = NULL;
jrose@1145 353 BasicType src_bt = java_lang_Class::as_BasicType(src_type, &src_klass);
jrose@1145 354 BasicType dst_bt = java_lang_Class::as_BasicType(dst_type, &dst_klass);
jrose@1145 355 return check_argument_type_change(src_bt, src_klass,
jrose@1474 356 dst_bt, dst_klass, argnum, raw);
jrose@1145 357 }
jrose@1145 358
jrose@1474 359 static const char* check_return_type_change(oop src_type, oop dst_type, bool raw = false) {
jrose@1474 360 return check_argument_type_change(src_type, dst_type, -1, raw);
jrose@1145 361 }
jrose@1145 362
jrose@1145 363 static const char* check_return_type_change(BasicType src_type, klassOop src_klass,
jrose@1145 364 BasicType dst_type, klassOop dst_klass) {
jrose@1145 365 return check_argument_type_change(src_type, src_klass, dst_type, dst_klass, -1);
jrose@1145 366 }
jrose@1145 367
jrose@1145 368 static const char* check_method_receiver(methodOop m, klassOop passed_recv_type);
jrose@1145 369
jrose@1145 370 // These verifiers can block, and will throw an error if the checking fails:
jrose@1145 371 static void verify_vmslots(Handle mh, TRAPS);
jrose@1145 372 static void verify_vmargslot(Handle mh, int argnum, int argslot, TRAPS);
jrose@1145 373
jrose@1145 374 static void verify_method_type(methodHandle m, Handle mtype,
jrose@1145 375 bool has_bound_oop,
jrose@1145 376 KlassHandle bound_oop_type,
jrose@1145 377 TRAPS);
jrose@1145 378
jrose@1145 379 static void verify_method_signature(methodHandle m, Handle mtype,
jrose@1145 380 int first_ptype_pos,
jrose@1145 381 KlassHandle insert_ptype, TRAPS);
jrose@1145 382
jrose@1145 383 static void verify_DirectMethodHandle(Handle mh, methodHandle m, TRAPS);
jrose@1145 384 static void verify_BoundMethodHandle(Handle mh, Handle target, int argnum,
jrose@1145 385 bool direct_to_method, TRAPS);
jrose@1145 386 static void verify_BoundMethodHandle_with_receiver(Handle mh, methodHandle m, TRAPS);
jrose@1145 387 static void verify_AdapterMethodHandle(Handle mh, int argnum, TRAPS);
jrose@1145 388
jrose@1145 389 public:
jrose@1145 390
jrose@1145 391 // Fill in the fields of a DirectMethodHandle mh. (MH.type must be pre-filled.)
jrose@1145 392 static void init_DirectMethodHandle(Handle mh, methodHandle method, bool do_dispatch, TRAPS);
jrose@1145 393
jrose@1145 394 // Fill in the fields of a BoundMethodHandle mh. (MH.type, BMH.argument must be pre-filled.)
jrose@1145 395 static void init_BoundMethodHandle(Handle mh, Handle target, int argnum, TRAPS);
jrose@1145 396 static void init_BoundMethodHandle_with_receiver(Handle mh,
jrose@1145 397 methodHandle original_m,
jrose@1145 398 KlassHandle receiver_limit,
jrose@1145 399 int decode_flags,
jrose@1145 400 TRAPS);
jrose@1145 401
jrose@1145 402 // Fill in the fields of an AdapterMethodHandle mh. (MH.type must be pre-filled.)
jrose@1145 403 static void init_AdapterMethodHandle(Handle mh, Handle target, int argnum, TRAPS);
jrose@1145 404
jrose@1145 405 #ifdef ASSERT
jrose@1145 406 static bool spot_check_entry_names();
jrose@1145 407 #endif
jrose@1145 408
jrose@1145 409 private:
jrose@1145 410 static methodHandle dispatch_decoded_method(methodHandle m,
jrose@1145 411 KlassHandle receiver_limit,
jrose@1145 412 int decode_flags,
jrose@1145 413 KlassHandle receiver_klass,
jrose@1145 414 TRAPS);
jrose@1145 415
jrose@1145 416 static bool same_basic_type_for_arguments(BasicType src, BasicType dst,
jrose@1474 417 bool raw = false,
jrose@1145 418 bool for_return = false);
jrose@1474 419 static bool same_basic_type_for_returns(BasicType src, BasicType dst, bool raw = false) {
jrose@1474 420 return same_basic_type_for_arguments(src, dst, raw, true);
jrose@1145 421 }
jrose@1145 422
jrose@1145 423 enum { // arg_mask values
jrose@1145 424 _INSERT_NO_MASK = -1,
jrose@1145 425 _INSERT_REF_MASK = 0,
jrose@1145 426 _INSERT_INT_MASK = 1,
jrose@1145 427 _INSERT_LONG_MASK = 3
jrose@1145 428 };
jrose@1145 429 static void insert_arg_slots(MacroAssembler* _masm,
jrose@1145 430 RegisterOrConstant arg_slots,
jrose@1145 431 int arg_mask,
twisti@1739 432 Register argslot_reg,
twisti@1739 433 Register temp_reg, Register temp2_reg);
jrose@1145 434
jrose@1145 435 static void remove_arg_slots(MacroAssembler* _masm,
jrose@1145 436 RegisterOrConstant arg_slots,
twisti@1739 437 Register argslot_reg,
twisti@1739 438 Register temp_reg, Register temp2_reg);
jrose@1145 439 };
jrose@1145 440
jrose@1145 441
jrose@1145 442 // Access methods for the "entry" field of a java.dyn.MethodHandle.
jrose@1145 443 // The field is primarily a jump target for compiled calls.
jrose@1145 444 // However, we squirrel away some nice pointers for other uses,
jrose@1145 445 // just before the jump target.
jrose@1145 446 // Aspects of a method handle entry:
jrose@1145 447 // - from_compiled_entry - stub used when compiled code calls the MH
jrose@1145 448 // - from_interpreted_entry - stub used when the interpreter calls the MH
jrose@1145 449 // - type_checking_entry - stub for runtime casting between MHForm siblings (NYI)
jrose@1145 450 class MethodHandleEntry {
jrose@1145 451 public:
jrose@1145 452 class Data {
jrose@1145 453 friend class MethodHandleEntry;
jrose@1145 454 size_t _total_size; // size including Data and code stub
jrose@1145 455 MethodHandleEntry* _type_checking_entry;
jrose@1145 456 address _from_interpreted_entry;
jrose@1145 457 MethodHandleEntry* method_entry() { return (MethodHandleEntry*)(this + 1); }
jrose@1145 458 };
jrose@1145 459
jrose@1145 460 Data* data() { return (Data*)this - 1; }
jrose@1145 461
jrose@1145 462 address start_address() { return (address) data(); }
jrose@1145 463 address end_address() { return start_address() + data()->_total_size; }
jrose@1145 464
jrose@1145 465 address from_compiled_entry() { return (address) this; }
jrose@1145 466
jrose@1145 467 address from_interpreted_entry() { return data()->_from_interpreted_entry; }
jrose@1145 468 void set_from_interpreted_entry(address e) { data()->_from_interpreted_entry = e; }
jrose@1145 469
jrose@1145 470 MethodHandleEntry* type_checking_entry() { return data()->_type_checking_entry; }
jrose@1145 471 void set_type_checking_entry(MethodHandleEntry* e) { data()->_type_checking_entry = e; }
jrose@1145 472
jrose@1145 473 void set_end_address(address end_addr) {
jrose@1145 474 size_t total_size = end_addr - start_address();
jrose@1145 475 assert(total_size > 0 && total_size < 0x1000, "reasonable end address");
jrose@1145 476 data()->_total_size = total_size;
jrose@1145 477 }
jrose@1145 478
jrose@1145 479 // Compiler support:
jrose@1145 480 static int from_interpreted_entry_offset_in_bytes() {
jrose@1145 481 return (int)( offset_of(Data, _from_interpreted_entry) - sizeof(Data) );
jrose@1145 482 }
jrose@1145 483 static int type_checking_entry_offset_in_bytes() {
jrose@1145 484 return (int)( offset_of(Data, _from_interpreted_entry) - sizeof(Data) );
jrose@1145 485 }
jrose@1145 486
jrose@1145 487 static address start_compiled_entry(MacroAssembler* _masm,
jrose@1145 488 address interpreted_entry = NULL);
jrose@1145 489 static MethodHandleEntry* finish_compiled_entry(MacroAssembler* masm, address start_addr);
jrose@1145 490 };
jrose@1145 491
jrose@1145 492 address MethodHandles::from_compiled_entry(EntryKind ek) { return entry(ek)->from_compiled_entry(); }
jrose@1145 493 address MethodHandles::from_interpreted_entry(EntryKind ek) { return entry(ek)->from_interpreted_entry(); }
twisti@1734 494
twisti@1734 495
twisti@1734 496 //------------------------------------------------------------------------------
twisti@1734 497 // MethodHandlesAdapterGenerator
twisti@1734 498 //
twisti@1734 499 class MethodHandlesAdapterGenerator : public StubCodeGenerator {
twisti@1734 500 public:
twisti@1734 501 MethodHandlesAdapterGenerator(CodeBuffer* code) : StubCodeGenerator(code) {}
twisti@1734 502
twisti@1734 503 void generate();
twisti@1734 504 };

mercurial