422 // Clone primitive array
423 bt = T_LONG;
424 }
425
426 Node* const ctrl = ac->in(TypeFunc::Control);
427 Node* const mem = ac->in(TypeFunc::Memory);
428 Node* const src = ac->in(ArrayCopyNode::Src);
429 Node* src_offset = ac->in(ArrayCopyNode::SrcPos);
430 Node* const dest = ac->in(ArrayCopyNode::Dest);
431 Node* dest_offset = ac->in(ArrayCopyNode::DestPos);
432 Node* length = ac->in(ArrayCopyNode::Length);
433
434 if (bt == T_OBJECT) {
435 // BarrierSetC2::clone sets the offsets via BarrierSetC2::arraycopy_payload_base_offset
436 // which 8-byte aligns them to allow for word size copies. Make sure the offsets point
437 // to the first element in the array when cloning object arrays. Otherwise, load
438 // barriers are applied to parts of the header. Also adjust the length accordingly.
439 assert(src_offset == dest_offset, "should be equal");
440 const jlong offset = src_offset->get_long();
441 if (offset != arrayOopDesc::base_offset_in_bytes(T_OBJECT)) {
442 assert(!UseCompressedClassPointers, "should only happen without compressed class pointers");
443 assert((arrayOopDesc::base_offset_in_bytes(T_OBJECT) - offset) == BytesPerLong, "unexpected offset");
444 length = phase->transform_later(new SubLNode(length, phase->longcon(1))); // Size is in longs
445 src_offset = phase->longcon(arrayOopDesc::base_offset_in_bytes(T_OBJECT));
446 dest_offset = src_offset;
447 }
448 }
449 Node* const payload_src = phase->basic_plus_adr(src, src_offset);
450 Node* const payload_dst = phase->basic_plus_adr(dest, dest_offset);
451
452 const char* copyfunc_name = "arraycopy";
453 const address copyfunc_addr = phase->basictype2arraycopy(bt, nullptr, nullptr, true, copyfunc_name, true);
454
455 const TypePtr* const raw_adr_type = TypeRawPtr::BOTTOM;
456 const TypeFunc* const call_type = OptoRuntime::fast_arraycopy_Type();
457
458 Node* const call = phase->make_leaf_call(ctrl, mem, call_type, copyfunc_addr, copyfunc_name, raw_adr_type, payload_src, payload_dst, length XTOP);
459 phase->transform_later(call);
460
461 phase->igvn().replace_node(ac, call);
462 return;
|
422 // Clone primitive array
423 bt = T_LONG;
424 }
425
426 Node* const ctrl = ac->in(TypeFunc::Control);
427 Node* const mem = ac->in(TypeFunc::Memory);
428 Node* const src = ac->in(ArrayCopyNode::Src);
429 Node* src_offset = ac->in(ArrayCopyNode::SrcPos);
430 Node* const dest = ac->in(ArrayCopyNode::Dest);
431 Node* dest_offset = ac->in(ArrayCopyNode::DestPos);
432 Node* length = ac->in(ArrayCopyNode::Length);
433
434 if (bt == T_OBJECT) {
435 // BarrierSetC2::clone sets the offsets via BarrierSetC2::arraycopy_payload_base_offset
436 // which 8-byte aligns them to allow for word size copies. Make sure the offsets point
437 // to the first element in the array when cloning object arrays. Otherwise, load
438 // barriers are applied to parts of the header. Also adjust the length accordingly.
439 assert(src_offset == dest_offset, "should be equal");
440 const jlong offset = src_offset->get_long();
441 if (offset != arrayOopDesc::base_offset_in_bytes(T_OBJECT)) {
442 assert(!UseCompressedClassPointers || UseCompactObjectHeaders, "should only happen without compressed class pointers");
443 assert((arrayOopDesc::base_offset_in_bytes(T_OBJECT) - offset) == BytesPerLong, "unexpected offset");
444 length = phase->transform_later(new SubLNode(length, phase->longcon(1))); // Size is in longs
445 src_offset = phase->longcon(arrayOopDesc::base_offset_in_bytes(T_OBJECT));
446 dest_offset = src_offset;
447 }
448 }
449 Node* const payload_src = phase->basic_plus_adr(src, src_offset);
450 Node* const payload_dst = phase->basic_plus_adr(dest, dest_offset);
451
452 const char* copyfunc_name = "arraycopy";
453 const address copyfunc_addr = phase->basictype2arraycopy(bt, nullptr, nullptr, true, copyfunc_name, true);
454
455 const TypePtr* const raw_adr_type = TypeRawPtr::BOTTOM;
456 const TypeFunc* const call_type = OptoRuntime::fast_arraycopy_Type();
457
458 Node* const call = phase->make_leaf_call(ctrl, mem, call_type, copyfunc_addr, copyfunc_name, raw_adr_type, payload_src, payload_dst, length XTOP);
459 phase->transform_later(call);
460
461 phase->igvn().replace_node(ac, call);
462 return;
|