Mercurial > hg > truffle
view graal/com.oracle.graal.lir.sparc/src/com/oracle/graal/lir/sparc/SPARCMove.java @ 15345:109d6c7c40b5
implement SPARC uncommon trap stub
author | twisti |
---|---|
date | Wed, 23 Apr 2014 15:12:41 -1000 |
parents | 96bb07a5d667 |
children | 3eedf7a653ea |
line wrap: on
line source
/* * Copyright (c) 2013, 2014, Oracle and/or its affiliates. All rights reserved. * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * * This code is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License version 2 only, as * published by the Free Software Foundation. * * This code is distributed in the hope that it will be useful, but WITHOUT * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * version 2 for more details (a copy is included in the LICENSE file that * accompanied this code). * * You should have received a copy of the GNU General Public License version * 2 along with this work; if not, write to the Free Software Foundation, * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. * * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA * or visit www.oracle.com if you need additional information or have any * questions. */ package com.oracle.graal.lir.sparc; import static com.oracle.graal.api.code.ValueUtil.*; import static com.oracle.graal.asm.sparc.SPARCMacroAssembler.*; import static com.oracle.graal.lir.LIRInstruction.OperandFlag.*; import static com.oracle.graal.sparc.SPARC.*; import com.oracle.graal.api.code.*; import com.oracle.graal.api.code.CompilationResult.*; import com.oracle.graal.api.meta.*; import com.oracle.graal.asm.sparc.*; import com.oracle.graal.compiler.common.*; import com.oracle.graal.lir.*; import com.oracle.graal.lir.StandardOp.ImplicitNullCheck; import com.oracle.graal.lir.StandardOp.MoveOp; import com.oracle.graal.lir.StandardOp.NullCheck; import com.oracle.graal.lir.asm.*; public class SPARCMove { @Opcode("MOVE") public static class MoveToRegOp extends SPARCLIRInstruction implements MoveOp { @Def({REG, HINT}) protected AllocatableValue result; @Use({REG, STACK, CONST}) protected Value input; public MoveToRegOp(AllocatableValue result, Value input) { this.result = result; this.input = input; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { move(crb, masm, getResult(), getInput()); } @Override public Value getInput() { return input; } @Override public AllocatableValue getResult() { return result; } } @Opcode("MOVE") public static class MoveFromRegOp extends SPARCLIRInstruction implements MoveOp { @Def({REG, STACK}) protected AllocatableValue result; @Use({REG, CONST, HINT}) protected Value input; public MoveFromRegOp(AllocatableValue result, Value input) { this.result = result; this.input = input; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { move(crb, masm, getResult(), getInput()); } @Override public Value getInput() { return input; } @Override public AllocatableValue getResult() { return result; } } public abstract static class MemOp extends SPARCLIRInstruction implements ImplicitNullCheck { protected final Kind kind; @Use({COMPOSITE}) protected SPARCAddressValue address; @State protected LIRFrameState state; public MemOp(Kind kind, SPARCAddressValue address, LIRFrameState state) { this.kind = kind; this.address = address; this.state = state; } protected abstract void emitMemAccess(SPARCMacroAssembler masm); @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { if (state != null) { crb.recordImplicitException(masm.position(), state); } emitMemAccess(masm); } public boolean makeNullCheckFor(Value value, LIRFrameState nullCheckState, int implicitNullCheckLimit) { if (state == null && value.equals(address.base) && address.index.equals(Value.ILLEGAL) && address.displacement >= 0 && address.displacement < implicitNullCheckLimit) { state = nullCheckState; return true; } return false; } } public static class LoadOp extends MemOp { @Def({REG}) protected AllocatableValue result; public LoadOp(Kind kind, AllocatableValue result, SPARCAddressValue address, LIRFrameState state) { super(kind, address, state); this.result = result; } @Override public void emitMemAccess(SPARCMacroAssembler masm) { final SPARCAddress addr = address.toAddress(); final Register dst = asRegister(result); switch (kind) { case Boolean: case Byte: new Ldsb(addr, dst).emit(masm); break; case Short: new Ldsh(addr, dst).emit(masm); break; case Char: new Lduh(addr, dst).emit(masm); break; case Int: new Ldsw(addr, dst).emit(masm); break; case Long: new Ldx(addr, dst).emit(masm); break; case Float: new Ldf(addr, dst).emit(masm); break; case Double: new Lddf(addr, dst).emit(masm); break; case Object: new Ldx(addr, dst).emit(masm); break; default: throw GraalInternalError.shouldNotReachHere(); } } } public static class LoadAddressOp extends SPARCLIRInstruction { @Def({REG}) protected AllocatableValue result; @Use({COMPOSITE, UNINITIALIZED}) protected SPARCAddressValue address; public LoadAddressOp(AllocatableValue result, SPARCAddressValue address) { this.result = result; this.address = address; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { SPARCAddress addr = address.toAddress(); if (addr.hasIndex()) { new Add(addr.getBase(), addr.getIndex(), asLongReg(result)).emit(masm); } else { new Add(addr.getBase(), addr.getDisplacement(), asLongReg(result)).emit(masm); } } } public static class LoadDataAddressOp extends SPARCLIRInstruction { @Def({REG}) protected AllocatableValue result; private final byte[] data; public LoadDataAddressOp(AllocatableValue result, byte[] data) { this.result = result; this.data = data; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { RawData rawData = new RawData(data, 16); SPARCAddress addr = (SPARCAddress) crb.recordDataReferenceInCode(rawData); assert addr == masm.getPlaceholder(); final boolean forceRelocatable = true; new Setx(0, asRegister(result), forceRelocatable).emit(masm); } } public static class MembarOp extends SPARCLIRInstruction { private final int barriers; public MembarOp(final int barriers) { this.barriers = barriers; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { new Membar(barriers).emit(masm); } } public static class NullCheckOp extends SPARCLIRInstruction implements NullCheck { @Use({REG}) protected AllocatableValue input; @State protected LIRFrameState state; public NullCheckOp(Variable input, LIRFrameState state) { this.input = input; this.state = state; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { crb.recordImplicitException(masm.position(), state); new Ldx(new SPARCAddress(asRegister(input), 0), r0).emit(masm); } public Value getCheckedValue() { return input; } public LIRFrameState getState() { return state; } } @Opcode("CAS") public static class CompareAndSwapOp extends SPARCLIRInstruction { // @Def protected AllocatableValue result; @Use protected AllocatableValue address; @Use protected AllocatableValue cmpValue; @Use protected AllocatableValue newValue; public CompareAndSwapOp(AllocatableValue address, AllocatableValue cmpValue, AllocatableValue newValue) { this.address = address; this.cmpValue = cmpValue; this.newValue = newValue; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { compareAndSwap(masm, address, cmpValue, newValue); } } public static class StackLoadAddressOp extends SPARCLIRInstruction { @Def({REG}) protected AllocatableValue result; @Use({STACK, UNINITIALIZED}) protected StackSlot slot; public StackLoadAddressOp(AllocatableValue result, StackSlot slot) { this.result = result; this.slot = slot; } @Override public void emitCode(CompilationResultBuilder crb, SPARCMacroAssembler masm) { SPARCAddress address = (SPARCAddress) crb.asAddress(slot); new Add(address.getBase(), address.getDisplacement(), asLongReg(result)).emit(masm); } } public static class StoreOp extends MemOp { @Use({REG}) protected AllocatableValue input; public StoreOp(Kind kind, SPARCAddressValue address, AllocatableValue input, LIRFrameState state) { super(kind, address, state); this.input = input; } @Override public void emitMemAccess(SPARCMacroAssembler masm) { assert isRegister(input); SPARCAddress addr = address.toAddress(); switch (kind) { case Boolean: case Byte: new Stb(asRegister(input), addr).emit(masm); break; case Short: case Char: new Sth(asRegister(input), addr).emit(masm); break; case Int: new Stw(asRegister(input), addr).emit(masm); break; case Long: new Stx(asRegister(input), addr).emit(masm); break; case Object: new Stx(asRegister(input), addr).emit(masm); break; case Float: case Double: default: throw GraalInternalError.shouldNotReachHere("missing: " + address.getKind()); } } } public static class StoreConstantOp extends MemOp { protected final Constant input; private final boolean compress; public StoreConstantOp(Kind kind, SPARCAddressValue address, Constant input, LIRFrameState state, boolean compress) { super(kind, address, state); this.input = input; this.compress = compress; if (!input.isDefaultForKind()) { throw GraalInternalError.shouldNotReachHere("Can only store null constants to memory"); } } @Override public void emitMemAccess(SPARCMacroAssembler masm) { switch (kind) { case Boolean: case Byte: new Stb(g0, address.toAddress()).emit(masm); break; case Short: case Char: new Sth(g0, address.toAddress()).emit(masm); break; case Int: new Stw(g0, address.toAddress()).emit(masm); break; case Long: case Object: if (compress) { new Stw(g0, address.toAddress()).emit(masm); } else { new Stx(g0, address.toAddress()).emit(masm); } break; case Float: case Double: throw GraalInternalError.shouldNotReachHere("Cannot store float constants to memory"); default: throw GraalInternalError.shouldNotReachHere(); } } } public static void move(CompilationResultBuilder crb, SPARCMacroAssembler masm, Value result, Value input) { if (isRegister(input)) { if (isRegister(result)) { reg2reg(masm, result, input); } else if (isStackSlot(result)) { reg2stack(crb, masm, result, input); } else { throw GraalInternalError.shouldNotReachHere(); } } else if (isStackSlot(input)) { if (isRegister(result)) { stack2reg(crb, masm, result, input); } else { throw GraalInternalError.shouldNotReachHere(); } } else if (isConstant(input)) { if (isRegister(result)) { const2reg(crb, masm, result, (Constant) input); } else { throw GraalInternalError.shouldNotReachHere(); } } else { throw GraalInternalError.shouldNotReachHere(); } } private static void reg2reg(SPARCAssembler masm, Value result, Value input) { final Register src = asRegister(input); final Register dst = asRegister(result); if (src.equals(dst)) { return; } switch (input.getKind()) { case Int: case Long: case Object: new Mov(src, dst).emit(masm); break; case Float: new Fmovs(src, dst).emit(masm); break; case Double: new Fmovd(src, dst).emit(masm); break; default: throw GraalInternalError.shouldNotReachHere(); } } private static void reg2stack(CompilationResultBuilder crb, SPARCMacroAssembler masm, Value result, Value input) { SPARCAddress dst = (SPARCAddress) crb.asAddress(result); Register src = asRegister(input); switch (input.getKind()) { case Int: new Stw(src, dst).emit(masm); break; case Long: case Object: new Stx(src, dst).emit(masm); break; case Float: new Stf(src, dst).emit(masm); break; case Double: new Stdf(src, dst).emit(masm); break; default: throw GraalInternalError.shouldNotReachHere(); } } private static void stack2reg(CompilationResultBuilder crb, SPARCMacroAssembler masm, Value result, Value input) { SPARCAddress src = (SPARCAddress) crb.asAddress(input); Register dst = asRegister(result); switch (input.getKind()) { case Int: new Ldsw(src, dst).emit(masm); break; case Long: case Object: new Ldx(src, dst).emit(masm); break; case Float: case Double: default: throw GraalInternalError.shouldNotReachHere(); } } private static void const2reg(CompilationResultBuilder crb, SPARCMacroAssembler masm, Value result, Constant input) { switch (input.getKind().getStackKind()) { case Int: if (crb.codeCache.needsDataPatch(input)) { crb.recordInlineDataInCode(input); new Setuw(input.asInt(), asRegister(result)).emit(masm); } else { if (input.isDefaultForKind()) { new Clr(asRegister(result)).emit(masm); } else { new Setuw(input.asInt(), asRegister(result)).emit(masm); } } break; case Long: if (crb.codeCache.needsDataPatch(input)) { crb.recordInlineDataInCode(input); new Setx(input.asLong(), asRegister(result), true).emit(masm); } else { if (input.isDefaultForKind()) { new Clr(asRegister(result)).emit(masm); } else { new Setx(input.asLong(), asRegister(result)).emit(masm); } } break; case Float: new Ldf((SPARCAddress) crb.asFloatConstRef(input), asFloatReg(result)).emit(masm); break; case Object: if (input.isNull()) { new Clr(asRegister(result)).emit(masm); } else if (crb.target.inlineObjects) { crb.recordInlineDataInCode(input); new Setx(0xDEADDEADDEADDEADL, asRegister(result), true).emit(masm); } else { Register dst = asRegister(result); new Rdpc(dst).emit(masm); crb.asObjectConstRef(input); new Ldx(new SPARCAddress(dst, 0), dst).emit(masm); throw GraalInternalError.shouldNotReachHere("the patched offset might be too big for the load"); } break; default: throw GraalInternalError.shouldNotReachHere("missing: " + input.getKind()); } } protected static void compareAndSwap(SPARCMacroAssembler masm, AllocatableValue address, AllocatableValue cmpValue, AllocatableValue newValue) { switch (cmpValue.getKind()) { case Int: new Cas(asRegister(address), asRegister(cmpValue), asRegister(newValue)).emit(masm); break; case Long: case Object: new Casx(asRegister(address), asRegister(cmpValue), asRegister(newValue)).emit(masm); break; default: throw GraalInternalError.shouldNotReachHere(); } } }