< prev index next >

src/hotspot/cpu/aarch64/c1_Runtime1_aarch64.cpp

Print this page
@@ -633,18 +633,21 @@
          oop_maps = generate_exception_throw(sasm, CAST_FROM_FN_PTR(address, throw_null_pointer_exception), false);
        }
        break;
  
      case new_instance_id:
+     case new_instance_no_inline_id:
      case fast_new_instance_id:
      case fast_new_instance_init_check_id:
        {
          Register klass = r3; // Incoming
          Register obj   = r0; // Result
  
          if (id == new_instance_id) {
            __ set_info("new_instance", dont_gc_arguments);
+         } else if (id == new_instance_no_inline_id) {
+           __ set_info("new_instance_no_inline", dont_gc_arguments);
          } else if (id == fast_new_instance_id) {
            __ set_info("fast new_instance", dont_gc_arguments);
          } else {
            assert(id == fast_new_instance_init_check_id, "bad StubID");
            __ set_info("fast new_instance init check", dont_gc_arguments);

@@ -700,11 +703,16 @@
            __ ldp(r19, zr, Address(__ post(sp, 2 * wordSize)));
          }
  
          __ enter();
          OopMap* map = save_live_registers(sasm);
-         int call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_instance), klass);
+         int call_offset;
+         if (id == new_instance_no_inline_id) {
+           call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_instance_no_inline), klass);
+         } else {
+           call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_instance), klass);
+         }
          oop_maps = new OopMapSet();
          oop_maps->add_gc_map(call_offset, map);
          restore_live_registers_except_r0(sasm);
          __ verify_oop(obj);
          __ leave();

@@ -733,35 +741,54 @@
        }
        break;
  
      case new_type_array_id:
      case new_object_array_id:
+     case new_flat_array_id:
        {
          Register length   = r19; // Incoming
          Register klass    = r3; // Incoming
          Register obj      = r0; // Result
  
          if (id == new_type_array_id) {
            __ set_info("new_type_array", dont_gc_arguments);
-         } else {
+         } else if (id == new_object_array_id) {
            __ set_info("new_object_array", dont_gc_arguments);
+         } else {
+           __ set_info("new_flat_array", dont_gc_arguments);
          }
  
  #ifdef ASSERT
          // assert object type is really an array of the proper kind
          {
            Label ok;
            Register t0 = obj;
            __ ldrw(t0, Address(klass, Klass::layout_helper_offset()));
            __ asrw(t0, t0, Klass::_lh_array_tag_shift);
-           int tag = ((id == new_type_array_id)
-                      ? Klass::_lh_array_tag_type_value
-                      : Klass::_lh_array_tag_obj_value);
-           __ mov(rscratch1, tag);
-           __ cmpw(t0, rscratch1);
-           __ br(Assembler::EQ, ok);
-           __ stop("assert(is an array klass)");
+           switch (id) {
+           case new_type_array_id:
+             __ cmpw(t0, Klass::_lh_array_tag_type_value);
+             __ br(Assembler::EQ, ok);
+             __ stop("assert(is a type array klass)");
+             break;
+           case new_object_array_id:
+             __ cmpw(t0, Klass::_lh_array_tag_obj_value); // new "[Ljava/lang/Object;"
+             __ br(Assembler::EQ, ok);
+             __ cmpw(t0, Klass::_lh_array_tag_vt_value);  // new "[LVT;"
+             __ br(Assembler::EQ, ok);
+             __ stop("assert(is an object or inline type array klass)");
+             break;
+           case new_flat_array_id:
+             // new "[QVT;"
+             __ cmpw(t0, Klass::_lh_array_tag_vt_value);  // the array can be flattened.
+             __ br(Assembler::EQ, ok);
+             __ cmpw(t0, Klass::_lh_array_tag_obj_value); // the array cannot be flattened (due to InlineArrayElementMaxFlatSize, etc)
+             __ br(Assembler::EQ, ok);
+             __ stop("assert(is an object or inline type array klass)");
+             break;
+           default:  ShouldNotReachHere();
+           }
            __ should_not_reach_here();
            __ bind(ok);
          }
  #endif // ASSERT
  

@@ -813,12 +840,15 @@
          __ enter();
          OopMap* map = save_live_registers(sasm);
          int call_offset;
          if (id == new_type_array_id) {
            call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_type_array), klass, length);
-         } else {
+         } else if (id == new_object_array_id) {
            call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_object_array), klass, length);
+         } else {
+           assert(id == new_flat_array_id, "must be");
+           call_offset = __ call_RT(obj, noreg, CAST_FROM_FN_PTR(address, new_flat_array), klass, length);
          }
  
          oop_maps = new OopMapSet();
          oop_maps->add_gc_map(call_offset, map);
          restore_live_registers_except_r0(sasm);

@@ -849,10 +879,92 @@
          // r0,: new multi array
          __ verify_oop(r0);
        }
        break;
  
+     case buffer_inline_args_id:
+     case buffer_inline_args_no_receiver_id:
+       {
+         const char* name = (id == buffer_inline_args_id) ?
+           "buffer_inline_args" : "buffer_inline_args_no_receiver";
+         StubFrame f(sasm, name, dont_gc_arguments);
+         OopMap* map = save_live_registers(sasm);
+         Register method = r19;   // Incoming
+         address entry = (id == buffer_inline_args_id) ?
+           CAST_FROM_FN_PTR(address, buffer_inline_args) :
+           CAST_FROM_FN_PTR(address, buffer_inline_args_no_receiver);
+         // This is called from a C1 method's scalarized entry point
+         // where r0-r7 may be holding live argument values so we can't
+         // return the result in r0 as the other stubs do. LR is used as
+         // a temporay below to avoid the result being clobbered by
+         // restore_live_registers.
+         int call_offset = __ call_RT(lr, noreg, entry, method);
+         oop_maps = new OopMapSet();
+         oop_maps->add_gc_map(call_offset, map);
+         restore_live_registers(sasm);
+         __ mov(r20, lr);
+         __ verify_oop(r20);  // r20: an array of buffered value objects
+      }
+      break;
+ 
+     case load_flattened_array_id:
+       {
+         StubFrame f(sasm, "load_flattened_array", dont_gc_arguments);
+         OopMap* map = save_live_registers(sasm);
+ 
+         // Called with store_parameter and not C abi
+ 
+         f.load_argument(1, r0); // r0,: array
+         f.load_argument(0, r1); // r1,: index
+         int call_offset = __ call_RT(r0, noreg, CAST_FROM_FN_PTR(address, load_flattened_array), r0, r1);
+ 
+         oop_maps = new OopMapSet();
+         oop_maps->add_gc_map(call_offset, map);
+         restore_live_registers_except_r0(sasm);
+ 
+         // r0: loaded element at array[index]
+         __ verify_oop(r0);
+       }
+       break;
+ 
+     case store_flattened_array_id:
+       {
+         StubFrame f(sasm, "store_flattened_array", dont_gc_arguments);
+         OopMap* map = save_live_registers(sasm, 4);
+ 
+         // Called with store_parameter and not C abi
+ 
+         f.load_argument(2, r0); // r0: array
+         f.load_argument(1, r1); // r1: index
+         f.load_argument(0, r2); // r2: value
+         int call_offset = __ call_RT(noreg, noreg, CAST_FROM_FN_PTR(address, store_flattened_array), r0, r1, r2);
+ 
+         oop_maps = new OopMapSet();
+         oop_maps->add_gc_map(call_offset, map);
+         restore_live_registers_except_r0(sasm);
+       }
+       break;
+ 
+     case substitutability_check_id:
+       {
+         StubFrame f(sasm, "substitutability_check", dont_gc_arguments);
+         OopMap* map = save_live_registers(sasm);
+ 
+         // Called with store_parameter and not C abi
+ 
+         f.load_argument(1, r1); // r1,: left
+         f.load_argument(0, r2); // r2,: right
+         int call_offset = __ call_RT(noreg, noreg, CAST_FROM_FN_PTR(address, substitutability_check), r1, r2);
+ 
+         oop_maps = new OopMapSet();
+         oop_maps->add_gc_map(call_offset, map);
+         restore_live_registers_except_r0(sasm);
+ 
+         // r0,: are the two operands substitutable
+       }
+       break;
+ 
      case register_finalizer_id:
        {
          __ set_info("register_finalizer", dont_gc_arguments);
  
          // This is called via call_runtime so the arguments

@@ -888,15 +1000,21 @@
          oop_maps = generate_exception_throw(sasm, CAST_FROM_FN_PTR(address, throw_class_cast_exception), true);
        }
        break;
  
      case throw_incompatible_class_change_error_id:
-       { StubFrame f(sasm, "throw_incompatible_class_cast_exception", dont_gc_arguments, does_not_return);
+       { StubFrame f(sasm, "throw_incompatible_class_change_error", dont_gc_arguments, does_not_return);
          oop_maps = generate_exception_throw(sasm, CAST_FROM_FN_PTR(address, throw_incompatible_class_change_error), false);
        }
        break;
  
+     case throw_illegal_monitor_state_exception_id:
+       { StubFrame f(sasm, "throw_illegal_monitor_state_exception", dont_gc_arguments);
+         oop_maps = generate_exception_throw(sasm, CAST_FROM_FN_PTR(address, throw_illegal_monitor_state_exception), false);
+       }
+       break;
+ 
      case slow_subtype_check_id:
        {
          // Typical calling sequence:
          // __ push(klass_RInfo);  // object klass or other subclass
          // __ push(sup_k_RInfo);  // array element klass or other superclass

@@ -1096,17 +1214,21 @@
          restore_live_registers(sasm);
        }
        break;
  
      default:
+       // FIXME: For unhandled trap_id this code fails with assert during vm intialization
+       // rather than insert a call to unimplemented_entry
        { StubFrame f(sasm, "unimplemented entry", dont_gc_arguments, does_not_return);
          __ mov(r0, (int)id);
          __ call_RT(noreg, noreg, CAST_FROM_FN_PTR(address, unimplemented_entry), r0);
        }
        break;
      }
    }
+ 
+ 
    return oop_maps;
  }
  
  #undef __
  
< prev index next >