mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-12-29 10:32:47 +00:00
47b92f3d83
"With this patch we can now generate runnable Mips code through LLVM direct object emission. We have run numerous simple programs, both C and C++ and with -O0 and -O3 from the output. The code is not production ready, but quite useful for experimentation." Patch and message by Jack Carter git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@144414 91177308-0d34-0410-b5e6-96231b3b80d8
353 lines
13 KiB
C++
353 lines
13 KiB
C++
//=======- MipsFrameLowering.cpp - Mips Frame Information ------*- C++ -*-====//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file contains the Mips implementation of TargetFrameLowering class.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "MipsFrameLowering.h"
|
|
#include "MipsInstrInfo.h"
|
|
#include "MipsMachineFunction.h"
|
|
#include "MCTargetDesc/MipsBaseInfo.h"
|
|
#include "llvm/Function.h"
|
|
#include "llvm/CodeGen/MachineFrameInfo.h"
|
|
#include "llvm/CodeGen/MachineFunction.h"
|
|
#include "llvm/CodeGen/MachineInstrBuilder.h"
|
|
#include "llvm/CodeGen/MachineModuleInfo.h"
|
|
#include "llvm/CodeGen/MachineRegisterInfo.h"
|
|
#include "llvm/Target/TargetData.h"
|
|
#include "llvm/Target/TargetOptions.h"
|
|
#include "llvm/Support/CommandLine.h"
|
|
|
|
using namespace llvm;
|
|
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// Stack Frame Processing methods
|
|
// +----------------------------+
|
|
//
|
|
// The stack is allocated decrementing the stack pointer on
|
|
// the first instruction of a function prologue. Once decremented,
|
|
// all stack references are done thought a positive offset
|
|
// from the stack/frame pointer, so the stack is considering
|
|
// to grow up! Otherwise terrible hacks would have to be made
|
|
// to get this stack ABI compliant :)
|
|
//
|
|
// The stack frame required by the ABI (after call):
|
|
// Offset
|
|
//
|
|
// 0 ----------
|
|
// 4 Args to pass
|
|
// . saved $GP (used in PIC)
|
|
// . Alloca allocations
|
|
// . Local Area
|
|
// . CPU "Callee Saved" Registers
|
|
// . saved FP
|
|
// . saved RA
|
|
// . FPU "Callee Saved" Registers
|
|
// StackSize -----------
|
|
//
|
|
// Offset - offset from sp after stack allocation on function prologue
|
|
//
|
|
// The sp is the stack pointer subtracted/added from the stack size
|
|
// at the Prologue/Epilogue
|
|
//
|
|
// References to the previous stack (to obtain arguments) are done
|
|
// with offsets that exceeds the stack size: (stacksize+(4*(num_arg-1))
|
|
//
|
|
// Examples:
|
|
// - reference to the actual stack frame
|
|
// for any local area var there is smt like : FI >= 0, StackOffset: 4
|
|
// sw REGX, 4(SP)
|
|
//
|
|
// - reference to previous stack frame
|
|
// suppose there's a load to the 5th arguments : FI < 0, StackOffset: 16.
|
|
// The emitted instruction will be something like:
|
|
// lw REGX, 16+StackSize(SP)
|
|
//
|
|
// Since the total stack size is unknown on LowerFormalArguments, all
|
|
// stack references (ObjectOffset) created to reference the function
|
|
// arguments, are negative numbers. This way, on eliminateFrameIndex it's
|
|
// possible to detect those references and the offsets are adjusted to
|
|
// their real location.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// hasFP - Return true if the specified function should have a dedicated frame
|
|
// pointer register. This is true if the function has variable sized allocas or
|
|
// if frame pointer elimination is disabled.
|
|
bool MipsFrameLowering::hasFP(const MachineFunction &MF) const {
|
|
const MachineFrameInfo *MFI = MF.getFrameInfo();
|
|
return DisableFramePointerElim(MF) || MFI->hasVarSizedObjects()
|
|
|| MFI->isFrameAddressTaken();
|
|
}
|
|
|
|
bool MipsFrameLowering::targetHandlesStackFrameRounding() const {
|
|
return true;
|
|
}
|
|
|
|
static unsigned AlignOffset(unsigned Offset, unsigned Align) {
|
|
return (Offset + Align - 1) / Align * Align;
|
|
}
|
|
|
|
// expand pair of register and immediate if the immediate doesn't fit in the
|
|
// 16-bit offset field.
|
|
// e.g.
|
|
// if OrigImm = 0x10000, OrigReg = $sp:
|
|
// generate the following sequence of instrs:
|
|
// lui $at, hi(0x10000)
|
|
// addu $at, $sp, $at
|
|
//
|
|
// (NewReg, NewImm) = ($at, lo(Ox10000))
|
|
// return true
|
|
static bool expandRegLargeImmPair(unsigned OrigReg, int OrigImm,
|
|
unsigned& NewReg, int& NewImm,
|
|
MachineBasicBlock& MBB,
|
|
MachineBasicBlock::iterator I) {
|
|
// OrigImm fits in the 16-bit field
|
|
if (OrigImm < 0x8000 && OrigImm >= -0x8000) {
|
|
NewReg = OrigReg;
|
|
NewImm = OrigImm;
|
|
return false;
|
|
}
|
|
|
|
MachineFunction* MF = MBB.getParent();
|
|
const TargetInstrInfo *TII = MF->getTarget().getInstrInfo();
|
|
DebugLoc DL = I->getDebugLoc();
|
|
int ImmLo = (short)(OrigImm & 0xffff);
|
|
int ImmHi = (((unsigned)OrigImm & 0xffff0000) >> 16) +
|
|
((OrigImm & 0x8000) != 0);
|
|
|
|
// FIXME: change this when mips goes MC".
|
|
BuildMI(MBB, I, DL, TII->get(Mips::NOAT));
|
|
BuildMI(MBB, I, DL, TII->get(Mips::LUi), Mips::AT).addImm(ImmHi);
|
|
BuildMI(MBB, I, DL, TII->get(Mips::ADDu), Mips::AT).addReg(OrigReg)
|
|
.addReg(Mips::AT);
|
|
NewReg = Mips::AT;
|
|
NewImm = ImmLo;
|
|
|
|
return true;
|
|
}
|
|
|
|
void MipsFrameLowering::emitPrologue(MachineFunction &MF) const {
|
|
MachineBasicBlock &MBB = MF.front();
|
|
MachineFrameInfo *MFI = MF.getFrameInfo();
|
|
MipsFunctionInfo *MipsFI = MF.getInfo<MipsFunctionInfo>();
|
|
const MipsRegisterInfo *RegInfo =
|
|
static_cast<const MipsRegisterInfo*>(MF.getTarget().getRegisterInfo());
|
|
const MipsInstrInfo &TII =
|
|
*static_cast<const MipsInstrInfo*>(MF.getTarget().getInstrInfo());
|
|
MachineBasicBlock::iterator MBBI = MBB.begin();
|
|
DebugLoc dl = MBBI != MBB.end() ? MBBI->getDebugLoc() : DebugLoc();
|
|
bool isPIC = (MF.getTarget().getRelocationModel() == Reloc::PIC_);
|
|
unsigned NewReg = 0;
|
|
int NewImm = 0;
|
|
bool ATUsed;
|
|
unsigned GP = STI.isABI_N64() ? Mips::GP_64 : Mips::GP;
|
|
unsigned T9 = STI.isABI_N64() ? Mips::T9_64 : Mips::T9;
|
|
unsigned ADDu = STI.isABI_N64() ? Mips::DADDu : Mips::ADDu;
|
|
unsigned ADDiu = STI.isABI_N64() ? Mips::DADDiu : Mips::ADDiu;
|
|
unsigned LUi = STI.isABI_N64() ? Mips::LUi64 : Mips::LUi;
|
|
|
|
// First, compute final stack size.
|
|
unsigned RegSize = STI.isGP32bit() ? 4 : 8;
|
|
unsigned StackAlign = getStackAlignment();
|
|
unsigned LocalVarAreaOffset = MipsFI->needGPSaveRestore() ?
|
|
(MFI->getObjectOffset(MipsFI->getGPFI()) + RegSize) :
|
|
MipsFI->getMaxCallFrameSize();
|
|
unsigned StackSize = AlignOffset(LocalVarAreaOffset, StackAlign) +
|
|
AlignOffset(MipsFI->getRegSaveAreaSize(), StackAlign) +
|
|
AlignOffset(MFI->getStackSize(), StackAlign);
|
|
|
|
// Update stack size
|
|
MFI->setStackSize(StackSize);
|
|
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::NOREORDER));
|
|
|
|
// Emit instructions that set $gp using the the value of $t9.
|
|
// O32 uses the directive .cpload while N32/64 requires three instructions to
|
|
// do this.
|
|
// TODO: Do not emit these instructions if no instructions use $gp.
|
|
if (isPIC && STI.isABI_O32())
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::CPLOAD))
|
|
.addReg(RegInfo->getPICCallReg());
|
|
else if (STI.isABI_N64() || (isPIC && STI.isABI_N32())) {
|
|
// lui $28,%hi(%neg(%gp_rel(fname)))
|
|
// addu $28,$28,$25
|
|
// addiu $28,$28,%lo(%neg(%gp_rel(fname)))
|
|
const GlobalValue *FName = MF.getFunction();
|
|
BuildMI(MBB, MBBI, dl, TII.get(LUi), GP)
|
|
.addGlobalAddress(FName, 0, MipsII::MO_GPOFF_HI);
|
|
BuildMI(MBB, MBBI, dl, TII.get(ADDu), GP).addReg(GP).addReg(T9);
|
|
BuildMI(MBB, MBBI, dl, TII.get(ADDiu), GP).addReg(GP)
|
|
.addGlobalAddress(FName, 0, MipsII::MO_GPOFF_LO);
|
|
}
|
|
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::NOMACRO));
|
|
|
|
// No need to allocate space on the stack.
|
|
if (StackSize == 0 && !MFI->adjustsStack()) return;
|
|
|
|
MachineModuleInfo &MMI = MF.getMMI();
|
|
std::vector<MachineMove> &Moves = MMI.getFrameMoves();
|
|
MachineLocation DstML, SrcML;
|
|
|
|
// Adjust stack : addi sp, sp, (-imm)
|
|
ATUsed = expandRegLargeImmPair(Mips::SP, -StackSize, NewReg, NewImm, MBB,
|
|
MBBI);
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::ADDiu), Mips::SP)
|
|
.addReg(NewReg).addImm(NewImm);
|
|
|
|
// FIXME: change this when mips goes MC".
|
|
if (ATUsed)
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::ATMACRO));
|
|
|
|
// emit ".cfi_def_cfa_offset StackSize"
|
|
MCSymbol *AdjustSPLabel = MMI.getContext().CreateTempSymbol();
|
|
BuildMI(MBB, MBBI, dl,
|
|
TII.get(TargetOpcode::PROLOG_LABEL)).addSym(AdjustSPLabel);
|
|
DstML = MachineLocation(MachineLocation::VirtualFP);
|
|
SrcML = MachineLocation(MachineLocation::VirtualFP, -StackSize);
|
|
Moves.push_back(MachineMove(AdjustSPLabel, DstML, SrcML));
|
|
|
|
const std::vector<CalleeSavedInfo> &CSI = MFI->getCalleeSavedInfo();
|
|
|
|
if (CSI.size()) {
|
|
// Find the instruction past the last instruction that saves a callee-saved
|
|
// register to the stack.
|
|
for (unsigned i = 0; i < CSI.size(); ++i)
|
|
++MBBI;
|
|
|
|
// Iterate over list of callee-saved registers and emit .cfi_offset
|
|
// directives.
|
|
MCSymbol *CSLabel = MMI.getContext().CreateTempSymbol();
|
|
BuildMI(MBB, MBBI, dl,
|
|
TII.get(TargetOpcode::PROLOG_LABEL)).addSym(CSLabel);
|
|
|
|
for (std::vector<CalleeSavedInfo>::const_iterator I = CSI.begin(),
|
|
E = CSI.end(); I != E; ++I) {
|
|
int64_t Offset = MFI->getObjectOffset(I->getFrameIdx());
|
|
unsigned Reg = I->getReg();
|
|
|
|
// If Reg is a double precision register, emit two cfa_offsets,
|
|
// one for each of the paired single precision registers.
|
|
if (Mips::AFGR64RegisterClass->contains(Reg)) {
|
|
const unsigned *SubRegs = RegInfo->getSubRegisters(Reg);
|
|
MachineLocation DstML0(MachineLocation::VirtualFP, Offset);
|
|
MachineLocation DstML1(MachineLocation::VirtualFP, Offset + 4);
|
|
MachineLocation SrcML0(*SubRegs);
|
|
MachineLocation SrcML1(*(SubRegs + 1));
|
|
|
|
if (!STI.isLittle())
|
|
std::swap(SrcML0, SrcML1);
|
|
|
|
Moves.push_back(MachineMove(CSLabel, DstML0, SrcML0));
|
|
Moves.push_back(MachineMove(CSLabel, DstML1, SrcML1));
|
|
}
|
|
else {
|
|
// Reg is either in CPURegs or FGR32.
|
|
DstML = MachineLocation(MachineLocation::VirtualFP, Offset);
|
|
SrcML = MachineLocation(Reg);
|
|
Moves.push_back(MachineMove(CSLabel, DstML, SrcML));
|
|
}
|
|
}
|
|
}
|
|
|
|
// if framepointer enabled, set it to point to the stack pointer.
|
|
if (hasFP(MF)) {
|
|
// Insert instruction "move $fp, $sp" at this location.
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::ADDu), Mips::FP)
|
|
.addReg(Mips::SP).addReg(Mips::ZERO);
|
|
|
|
// emit ".cfi_def_cfa_register $fp"
|
|
MCSymbol *SetFPLabel = MMI.getContext().CreateTempSymbol();
|
|
BuildMI(MBB, MBBI, dl,
|
|
TII.get(TargetOpcode::PROLOG_LABEL)).addSym(SetFPLabel);
|
|
DstML = MachineLocation(Mips::FP);
|
|
SrcML = MachineLocation(MachineLocation::VirtualFP);
|
|
Moves.push_back(MachineMove(SetFPLabel, DstML, SrcML));
|
|
}
|
|
|
|
// Restore GP from the saved stack location
|
|
if (MipsFI->needGPSaveRestore()) {
|
|
unsigned Offset = MFI->getObjectOffset(MipsFI->getGPFI());
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::CPRESTORE)).addImm(Offset);
|
|
|
|
if (Offset >= 0x8000) {
|
|
BuildMI(MBB, llvm::prior(MBBI), dl, TII.get(Mips::MACRO));
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::NOMACRO));
|
|
}
|
|
}
|
|
}
|
|
|
|
void MipsFrameLowering::emitEpilogue(MachineFunction &MF,
|
|
MachineBasicBlock &MBB) const {
|
|
MachineBasicBlock::iterator MBBI = MBB.getLastNonDebugInstr();
|
|
MachineFrameInfo *MFI = MF.getFrameInfo();
|
|
const MipsInstrInfo &TII =
|
|
*static_cast<const MipsInstrInfo*>(MF.getTarget().getInstrInfo());
|
|
DebugLoc dl = MBBI->getDebugLoc();
|
|
|
|
// Get the number of bytes from FrameInfo
|
|
unsigned StackSize = MFI->getStackSize();
|
|
|
|
unsigned NewReg = 0;
|
|
int NewImm = 0;
|
|
bool ATUsed = false;
|
|
|
|
// if framepointer enabled, restore the stack pointer.
|
|
if (hasFP(MF)) {
|
|
// Find the first instruction that restores a callee-saved register.
|
|
MachineBasicBlock::iterator I = MBBI;
|
|
|
|
for (unsigned i = 0; i < MFI->getCalleeSavedInfo().size(); ++i)
|
|
--I;
|
|
|
|
// Insert instruction "move $sp, $fp" at this location.
|
|
BuildMI(MBB, I, dl, TII.get(Mips::ADDu), Mips::SP)
|
|
.addReg(Mips::FP).addReg(Mips::ZERO);
|
|
}
|
|
|
|
// adjust stack : insert addi sp, sp, (imm)
|
|
if (StackSize) {
|
|
ATUsed = expandRegLargeImmPair(Mips::SP, StackSize, NewReg, NewImm, MBB,
|
|
MBBI);
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::ADDiu), Mips::SP)
|
|
.addReg(NewReg).addImm(NewImm);
|
|
|
|
// FIXME: change this when mips goes MC".
|
|
if (ATUsed)
|
|
BuildMI(MBB, MBBI, dl, TII.get(Mips::ATMACRO));
|
|
}
|
|
}
|
|
|
|
void MipsFrameLowering::
|
|
processFunctionBeforeCalleeSavedScan(MachineFunction &MF,
|
|
RegScavenger *RS) const {
|
|
MachineRegisterInfo& MRI = MF.getRegInfo();
|
|
|
|
// FIXME: remove this code if register allocator can correctly mark
|
|
// $fp and $ra used or unused.
|
|
|
|
// Mark $fp and $ra as used or unused.
|
|
if (hasFP(MF))
|
|
MRI.setPhysRegUsed(Mips::FP);
|
|
|
|
// The register allocator might determine $ra is used after seeing
|
|
// instruction "jr $ra", but we do not want PrologEpilogInserter to insert
|
|
// instructions to save/restore $ra unless there is a function call.
|
|
// To correct this, $ra is explicitly marked unused if there is no
|
|
// function call.
|
|
if (MF.getFrameInfo()->hasCalls())
|
|
MRI.setPhysRegUsed(Mips::RA);
|
|
else
|
|
MRI.setPhysRegUnused(Mips::RA);
|
|
}
|