1 // 2 // Copyright (c) 2018, Red Hat, Inc. All rights reserved. 3 // 4 // This code is free software; you can redistribute it and/or modify it 5 // under the terms of the GNU General Public License version 2 only, as 6 // published by the Free Software Foundation. 7 // 8 // This code is distributed in the hope that it will be useful, but WITHOUT 9 // ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 10 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 11 // version 2 for more details (a copy is included in the LICENSE file that 12 // accompanied this code). 13 // 14 // You should have received a copy of the GNU General Public License version 15 // 2 along with this work; if not, write to the Free Software Foundation, 16 // Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 17 // 18 // Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 19 // or visit www.oracle.com if you need additional information or have any 20 // questions. 21 // 22 // 23 24 source_hpp %{ 25 #include "gc/shenandoah/shenandoahBarrierSetAssembler.hpp" 26 #include "gc/shenandoah/c2/shenandoahSupport.hpp" 27 %} 28 29 instruct compareAndSwapP_shenandoah(rRegI res, 30 memory mem_ptr, 31 eRegP tmp1, eRegP tmp2, 32 eAXRegP oldval, eRegP newval, 33 eFlagsReg cr) 34 %{ 35 match(Set res (ShenandoahCompareAndSwapP mem_ptr (Binary oldval newval))); 36 match(Set res (ShenandoahWeakCompareAndSwapP mem_ptr (Binary oldval newval))); 37 effect(TEMP tmp1, TEMP tmp2, KILL cr, KILL oldval); 38 39 format %{ "shenandoah_cas_oop $mem_ptr,$newval" %} 40 41 ins_encode %{ 42 ShenandoahBarrierSet::assembler()->cmpxchg_oop(&_masm, 43 $res$$Register, $mem_ptr$$Address, $oldval$$Register, $newval$$Register, 44 false, // swap 45 $tmp1$$Register, $tmp2$$Register 46 ); 47 %} 48 ins_pipe( pipe_cmpxchg ); 49 %} 50 51 instruct compareAndExchangeP_shenandoah(memory mem_ptr, 52 eAXRegP oldval, eRegP newval, 53 eRegP tmp1, eRegP tmp2, 54 eFlagsReg cr) 55 %{ 56 match(Set oldval (ShenandoahCompareAndExchangeP mem_ptr (Binary oldval newval))); 57 effect(KILL cr, TEMP tmp1, TEMP tmp2); 58 ins_cost(1000); 59 60 format %{ "shenandoah_cas_oop $mem_ptr,$newval" %} 61 62 ins_encode %{ 63 ShenandoahBarrierSet::assembler()->cmpxchg_oop(&_masm, 64 NULL, $mem_ptr$$Address, $oldval$$Register, $newval$$Register, 65 true, // exchange 66 $tmp1$$Register, $tmp2$$Register 67 ); 68 %} 69 ins_pipe( pipe_cmpxchg ); 70 %}