mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-01-13 09:33:50 +00:00
PPC: MCize most of the darwin PIC emission.
The last remaining bit is "bcl 20, 31, AnonSymbol", which I couldn't find the instruction definition for. Only whitespace changes in assembly output. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@168541 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
parent
e8ca482c97
commit
915558e775
@ -55,6 +55,7 @@
|
|||||||
#include "llvm/ADT/StringExtras.h"
|
#include "llvm/ADT/StringExtras.h"
|
||||||
#include "llvm/ADT/SmallString.h"
|
#include "llvm/ADT/SmallString.h"
|
||||||
#include "llvm/ADT/MapVector.h"
|
#include "llvm/ADT/MapVector.h"
|
||||||
|
#include "llvm/ADT/VariadicFunction.h"
|
||||||
using namespace llvm;
|
using namespace llvm;
|
||||||
|
|
||||||
namespace {
|
namespace {
|
||||||
@ -558,6 +559,21 @@ static MCSymbol *GetAnonSym(MCSymbol *Sym, MCContext &Ctx) {
|
|||||||
return Ctx.GetOrCreateSymbol(Sym->getName() + "$tmp");
|
return Ctx.GetOrCreateSymbol(Sym->getName() + "$tmp");
|
||||||
}
|
}
|
||||||
|
|
||||||
|
namespace {
|
||||||
|
// Helper function to emit a custom MCInst.
|
||||||
|
void emitMCInstImpl(MCStreamer &OutStreamer, unsigned Opcode,
|
||||||
|
ArrayRef<const MCOperand *> Ops) {
|
||||||
|
MCInst TmpInst;
|
||||||
|
TmpInst.setOpcode(Opcode);
|
||||||
|
for (unsigned I = 0, E = Ops.size(); I != E; ++I)
|
||||||
|
TmpInst.addOperand(*Ops[I]);
|
||||||
|
OutStreamer.EmitInstruction(TmpInst);
|
||||||
|
}
|
||||||
|
|
||||||
|
const VariadicFunction2<void, MCStreamer &, unsigned, MCOperand,
|
||||||
|
emitMCInstImpl> emitMCInst = {};
|
||||||
|
}
|
||||||
|
|
||||||
void PPCDarwinAsmPrinter::
|
void PPCDarwinAsmPrinter::
|
||||||
EmitFunctionStubs(const MachineModuleInfoMachO::SymbolListTy &Stubs) {
|
EmitFunctionStubs(const MachineModuleInfoMachO::SymbolListTy &Stubs) {
|
||||||
bool isPPC64 = TM.getDataLayout()->getPointerSizeInBits() == 64;
|
bool isPPC64 = TM.getDataLayout()->getPointerSizeInBits() == 64;
|
||||||
@ -586,32 +602,52 @@ EmitFunctionStubs(const MachineModuleInfoMachO::SymbolListTy &Stubs) {
|
|||||||
|
|
||||||
OutStreamer.EmitLabel(Stub);
|
OutStreamer.EmitLabel(Stub);
|
||||||
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
||||||
|
|
||||||
|
// mflr r0
|
||||||
|
emitMCInst(OutStreamer, PPC::MFLR, MCOperand::CreateReg(PPC::R0));
|
||||||
// FIXME: MCize this.
|
// FIXME: MCize this.
|
||||||
OutStreamer.EmitRawText(StringRef("\tmflr r0"));
|
OutStreamer.EmitRawText("\tbcl 20, 31, " + Twine(AnonSymbol->getName()));
|
||||||
OutStreamer.EmitRawText("\tbcl 20,31," + Twine(AnonSymbol->getName()));
|
|
||||||
OutStreamer.EmitLabel(AnonSymbol);
|
OutStreamer.EmitLabel(AnonSymbol);
|
||||||
OutStreamer.EmitRawText(StringRef("\tmflr r11"));
|
// mflr r11
|
||||||
OutStreamer.EmitRawText("\taddis r11,r11,ha16("+Twine(LazyPtr->getName())+
|
emitMCInst(OutStreamer, PPC::MFLR, MCOperand::CreateReg(PPC::R11));
|
||||||
"-" + AnonSymbol->getName() + ")");
|
// addis r11, r11, ha16(LazyPtr - AnonSymbol)
|
||||||
OutStreamer.EmitRawText(StringRef("\tmtlr r0"));
|
MCOperand Sub = MCOperand::CreateExpr(
|
||||||
|
MCBinaryExpr::CreateSub(
|
||||||
if (isPPC64)
|
MCSymbolRefExpr::Create(LazyPtr, OutContext),
|
||||||
OutStreamer.EmitRawText("\tldu r12,lo16(" + Twine(LazyPtr->getName()) +
|
MCSymbolRefExpr::Create(AnonSymbol, OutContext),
|
||||||
"-" + AnonSymbol->getName() + ")(r11)");
|
OutContext));
|
||||||
else
|
emitMCInst(OutStreamer, PPC::ADDIS, MCOperand::CreateReg(PPC::R11),
|
||||||
OutStreamer.EmitRawText("\tlwzu r12,lo16(" + Twine(LazyPtr->getName()) +
|
MCOperand::CreateReg(PPC::R11), Sub);
|
||||||
"-" + AnonSymbol->getName() + ")(r11)");
|
// mtlr r0
|
||||||
OutStreamer.EmitRawText(StringRef("\tmtctr r12"));
|
emitMCInst(OutStreamer, PPC::MTLR, MCOperand::CreateReg(PPC::R0));
|
||||||
OutStreamer.EmitRawText(StringRef("\tbctr"));
|
|
||||||
|
if (isPPC64) {
|
||||||
|
// ldu r12, lo16(LazyPtr - AnonSymbol)(r11)
|
||||||
|
emitMCInst(OutStreamer, PPC::LDU, MCOperand::CreateReg(PPC::R12),
|
||||||
|
Sub, Sub, MCOperand::CreateReg(PPC::R11));
|
||||||
|
} else {
|
||||||
|
// lwzu r12, lo16(LazyPtr - AnonSymbol)(r11)
|
||||||
|
emitMCInst(OutStreamer, PPC::LWZU, MCOperand::CreateReg(PPC::R12),
|
||||||
|
Sub, Sub, MCOperand::CreateReg(PPC::R11));
|
||||||
|
}
|
||||||
|
// mtctr r12
|
||||||
|
emitMCInst(OutStreamer, PPC::MTCTR, MCOperand::CreateReg(PPC::R12));
|
||||||
|
// bctr
|
||||||
|
emitMCInst(OutStreamer, PPC::BCTR);
|
||||||
|
|
||||||
OutStreamer.SwitchSection(LSPSection);
|
OutStreamer.SwitchSection(LSPSection);
|
||||||
OutStreamer.EmitLabel(LazyPtr);
|
OutStreamer.EmitLabel(LazyPtr);
|
||||||
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
||||||
|
|
||||||
if (isPPC64)
|
MCSymbol *DyldStubBindingHelper =
|
||||||
OutStreamer.EmitRawText(StringRef("\t.quad dyld_stub_binding_helper"));
|
OutContext.GetOrCreateSymbol(StringRef("dyld_stub_binding_helper"));
|
||||||
else
|
if (isPPC64) {
|
||||||
OutStreamer.EmitRawText(StringRef("\t.long dyld_stub_binding_helper"));
|
// .quad dyld_stub_binding_helper
|
||||||
|
OutStreamer.EmitSymbolValue(DyldStubBindingHelper, 8);
|
||||||
|
} else {
|
||||||
|
// .long dyld_stub_binding_helper
|
||||||
|
OutStreamer.EmitSymbolValue(DyldStubBindingHelper, 4);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
OutStreamer.AddBlankLine();
|
OutStreamer.AddBlankLine();
|
||||||
return;
|
return;
|
||||||
@ -631,23 +667,44 @@ EmitFunctionStubs(const MachineModuleInfoMachO::SymbolListTy &Stubs) {
|
|||||||
EmitAlignment(4);
|
EmitAlignment(4);
|
||||||
OutStreamer.EmitLabel(Stub);
|
OutStreamer.EmitLabel(Stub);
|
||||||
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
||||||
OutStreamer.EmitRawText("\tlis r11,ha16(" + Twine(LazyPtr->getName()) +")");
|
// lis r11, ha16(LazyPtr)
|
||||||
if (isPPC64)
|
MCOperand LazyPtrHa16 =
|
||||||
OutStreamer.EmitRawText("\tldu r12,lo16(" + Twine(LazyPtr->getName()) +
|
MCOperand::CreateExpr(
|
||||||
")(r11)");
|
MCSymbolRefExpr::Create(LazyPtr, MCSymbolRefExpr::VK_PPC_DARWIN_HA16,
|
||||||
else
|
OutContext));
|
||||||
OutStreamer.EmitRawText("\tlwzu r12,lo16(" + Twine(LazyPtr->getName()) +
|
emitMCInst(OutStreamer, PPC::LIS, MCOperand::CreateReg(PPC::R11),
|
||||||
")(r11)");
|
LazyPtrHa16);
|
||||||
OutStreamer.EmitRawText(StringRef("\tmtctr r12"));
|
|
||||||
OutStreamer.EmitRawText(StringRef("\tbctr"));
|
MCOperand LazyPtrLo16 =
|
||||||
|
MCOperand::CreateExpr(
|
||||||
|
MCSymbolRefExpr::Create(LazyPtr, MCSymbolRefExpr::VK_PPC_DARWIN_LO16,
|
||||||
|
OutContext));
|
||||||
|
if (isPPC64) {
|
||||||
|
// ldu r12, lo16(LazyPtr)(r11)
|
||||||
|
emitMCInst(OutStreamer, PPC::LDU, MCOperand::CreateReg(PPC::R12),
|
||||||
|
LazyPtrLo16, LazyPtrLo16, MCOperand::CreateReg(PPC::R11));
|
||||||
|
} else {
|
||||||
|
// lwzu r12, lo16(LazyPtr)(r11)
|
||||||
|
emitMCInst(OutStreamer, PPC::LWZU, MCOperand::CreateReg(PPC::R12),
|
||||||
|
LazyPtrLo16, LazyPtrLo16, MCOperand::CreateReg(PPC::R11));
|
||||||
|
}
|
||||||
|
// mtctr r12
|
||||||
|
emitMCInst(OutStreamer, PPC::MTCTR, MCOperand::CreateReg(PPC::R12));
|
||||||
|
// bctr
|
||||||
|
emitMCInst(OutStreamer, PPC::BCTR);
|
||||||
OutStreamer.SwitchSection(LSPSection);
|
OutStreamer.SwitchSection(LSPSection);
|
||||||
OutStreamer.EmitLabel(LazyPtr);
|
OutStreamer.EmitLabel(LazyPtr);
|
||||||
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
OutStreamer.EmitSymbolAttribute(RawSym, MCSA_IndirectSymbol);
|
||||||
|
|
||||||
if (isPPC64)
|
MCSymbol *DyldStubBindingHelper =
|
||||||
OutStreamer.EmitRawText(StringRef("\t.quad dyld_stub_binding_helper"));
|
OutContext.GetOrCreateSymbol(StringRef("dyld_stub_binding_helper"));
|
||||||
else
|
if (isPPC64) {
|
||||||
OutStreamer.EmitRawText(StringRef("\t.long dyld_stub_binding_helper"));
|
// .quad dyld_stub_binding_helper
|
||||||
|
OutStreamer.EmitSymbolValue(DyldStubBindingHelper, 8);
|
||||||
|
} else {
|
||||||
|
// .long dyld_stub_binding_helper
|
||||||
|
OutStreamer.EmitSymbolValue(DyldStubBindingHelper, 4);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
OutStreamer.AddBlankLine();
|
OutStreamer.AddBlankLine();
|
||||||
|
@ -1,6 +1,8 @@
|
|||||||
; RUN: llc < %s -relocation-model=static | FileCheck %s -check-prefix=STATIC
|
; RUN: llc < %s -relocation-model=static | FileCheck %s -check-prefix=STATIC
|
||||||
; RUN: llc < %s -relocation-model=pic | FileCheck %s -check-prefix=PIC
|
; RUN: llc < %s -relocation-model=pic | FileCheck %s -check-prefix=PIC
|
||||||
|
; RUN: llc < %s -relocation-model=pic -mtriple=powerpc64-apple-darwin8 | FileCheck %s -check-prefix=PIC64
|
||||||
; RUN: llc < %s -relocation-model=dynamic-no-pic | FileCheck %s -check-prefix=DYNAMIC
|
; RUN: llc < %s -relocation-model=dynamic-no-pic | FileCheck %s -check-prefix=DYNAMIC
|
||||||
|
; RUN: llc < %s -relocation-model=dynamic-no-pic -mtriple=powerpc64-apple-darwin8 | FileCheck %s -check-prefix=DYNAMIC64
|
||||||
; PR4482
|
; PR4482
|
||||||
target datalayout = "e-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:32:64-f32:32:32-f64:32:64-v64:64:64-v128:128:128-a0:0:64-f80:128:128"
|
target datalayout = "e-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:32:64-f32:32:32-f64:32:64-v64:64:64-v128:128:128-a0:0:64-f80:128:128"
|
||||||
target triple = "powerpc-apple-darwin8"
|
target triple = "powerpc-apple-darwin8"
|
||||||
@ -16,10 +18,18 @@ entry:
|
|||||||
; PIC: bl L_exact_log2$stub
|
; PIC: bl L_exact_log2$stub
|
||||||
; PIC: blr
|
; PIC: blr
|
||||||
|
|
||||||
|
; PIC64: _foo:
|
||||||
|
; PIC64: bl L_exact_log2$stub
|
||||||
|
; PIC64: blr
|
||||||
|
|
||||||
; DYNAMIC: _foo:
|
; DYNAMIC: _foo:
|
||||||
; DYNAMIC: bl L_exact_log2$stub
|
; DYNAMIC: bl L_exact_log2$stub
|
||||||
; DYNAMIC: blr
|
; DYNAMIC: blr
|
||||||
|
|
||||||
|
; DYNAMIC64: _foo:
|
||||||
|
; DYNAMIC64: bl L_exact_log2$stub
|
||||||
|
; DYNAMIC64: blr
|
||||||
|
|
||||||
%A = call i32 @exact_log2(i64 %x) nounwind
|
%A = call i32 @exact_log2(i64 %x) nounwind
|
||||||
ret i32 %A
|
ret i32 %A
|
||||||
}
|
}
|
||||||
@ -34,13 +44,13 @@ entry:
|
|||||||
; PIC: L_exact_log2$stub:
|
; PIC: L_exact_log2$stub:
|
||||||
; PIC: .indirect_symbol _exact_log2
|
; PIC: .indirect_symbol _exact_log2
|
||||||
; PIC: mflr r0
|
; PIC: mflr r0
|
||||||
; PIC: bcl 20,31,L_exact_log2$stub$tmp
|
; PIC: bcl 20, 31, L_exact_log2$stub$tmp
|
||||||
|
|
||||||
; PIC: L_exact_log2$stub$tmp:
|
; PIC: L_exact_log2$stub$tmp:
|
||||||
; PIC: mflr r11
|
; PIC: mflr r11
|
||||||
; PIC: addis r11,r11,ha16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)
|
; PIC: addis r11, r11, ha16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)
|
||||||
; PIC: mtlr r0
|
; PIC: mtlr r0
|
||||||
; PIC: lwzu r12,lo16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)(r11)
|
; PIC: lwzu r12, lo16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)(r11)
|
||||||
; PIC: mtctr r12
|
; PIC: mtctr r12
|
||||||
; PIC: bctr
|
; PIC: bctr
|
||||||
|
|
||||||
@ -51,12 +61,32 @@ entry:
|
|||||||
|
|
||||||
; PIC: .subsections_via_symbols
|
; PIC: .subsections_via_symbols
|
||||||
|
|
||||||
|
; PIC64: .section __TEXT,__picsymbolstub1,symbol_stubs,pure_instructions,32
|
||||||
|
; PIC64: L_exact_log2$stub:
|
||||||
|
; PIC64: .indirect_symbol _exact_log2
|
||||||
|
; PIC64: mflr r0
|
||||||
|
; PIC64: bcl 20, 31, L_exact_log2$stub$tmp
|
||||||
|
|
||||||
|
; PIC64: L_exact_log2$stub$tmp:
|
||||||
|
; PIC64: mflr r11
|
||||||
|
; PIC64: addis r11, r11, ha16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)
|
||||||
|
; PIC64: mtlr r0
|
||||||
|
; PIC64: ldu r12, lo16(L_exact_log2$lazy_ptr-L_exact_log2$stub$tmp)(r11)
|
||||||
|
; PIC64: mtctr r12
|
||||||
|
; PIC64: bctr
|
||||||
|
|
||||||
|
; PIC64: .section __DATA,__la_symbol_ptr,lazy_symbol_pointers
|
||||||
|
; PIC64: L_exact_log2$lazy_ptr:
|
||||||
|
; PIC64: .indirect_symbol _exact_log2
|
||||||
|
; PIC64: .quad dyld_stub_binding_helper
|
||||||
|
|
||||||
|
; PIC64: .subsections_via_symbols
|
||||||
|
|
||||||
; DYNAMIC: .section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16
|
; DYNAMIC: .section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16
|
||||||
; DYNAMIC: L_exact_log2$stub:
|
; DYNAMIC: L_exact_log2$stub:
|
||||||
; DYNAMIC: .indirect_symbol _exact_log2
|
; DYNAMIC: .indirect_symbol _exact_log2
|
||||||
; DYNAMIC: lis r11,ha16(L_exact_log2$lazy_ptr)
|
; DYNAMIC: lis r11, ha16(L_exact_log2$lazy_ptr)
|
||||||
; DYNAMIC: lwzu r12,lo16(L_exact_log2$lazy_ptr)(r11)
|
; DYNAMIC: lwzu r12, lo16(L_exact_log2$lazy_ptr)(r11)
|
||||||
; DYNAMIC: mtctr r12
|
; DYNAMIC: mtctr r12
|
||||||
; DYNAMIC: bctr
|
; DYNAMIC: bctr
|
||||||
|
|
||||||
@ -65,7 +95,15 @@ entry:
|
|||||||
; DYNAMIC: .indirect_symbol _exact_log2
|
; DYNAMIC: .indirect_symbol _exact_log2
|
||||||
; DYNAMIC: .long dyld_stub_binding_helper
|
; DYNAMIC: .long dyld_stub_binding_helper
|
||||||
|
|
||||||
|
; DYNAMIC64: .section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16
|
||||||
|
; DYNAMIC64: L_exact_log2$stub:
|
||||||
|
; DYNAMIC64: .indirect_symbol _exact_log2
|
||||||
|
; DYNAMIC64: lis r11, ha16(L_exact_log2$lazy_ptr)
|
||||||
|
; DYNAMIC64: ldu r12, lo16(L_exact_log2$lazy_ptr)(r11)
|
||||||
|
; DYNAMIC64: mtctr r12
|
||||||
|
; DYNAMIC64: bctr
|
||||||
|
|
||||||
|
; DYNAMIC64: .section __DATA,__la_symbol_ptr,lazy_symbol_pointers
|
||||||
|
; DYNAMIC64: L_exact_log2$lazy_ptr:
|
||||||
|
; DYNAMIC64: .indirect_symbol _exact_log2
|
||||||
|
; DYNAMIC64: .quad dyld_stub_binding_helper
|
||||||
|
@ -10,8 +10,8 @@ entry:
|
|||||||
; CHECK: .section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16
|
; CHECK: .section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16
|
||||||
; CHECK: ___floatditf$stub:
|
; CHECK: ___floatditf$stub:
|
||||||
; CHECK: .indirect_symbol ___floatditf
|
; CHECK: .indirect_symbol ___floatditf
|
||||||
; CHECK: lis r11,ha16(___floatditf$lazy_ptr)
|
; CHECK: lis r11, ha16(___floatditf$lazy_ptr)
|
||||||
; CHECK: lwzu r12,lo16(___floatditf$lazy_ptr)(r11)
|
; CHECK: lwzu r12, lo16(___floatditf$lazy_ptr)(r11)
|
||||||
; CHECK: mtctr r12
|
; CHECK: mtctr r12
|
||||||
; CHECK: bctr
|
; CHECK: bctr
|
||||||
; CHECK: .section __DATA,__la_symbol_ptr,lazy_symbol_pointers
|
; CHECK: .section __DATA,__la_symbol_ptr,lazy_symbol_pointers
|
||||||
|
Loading…
x
Reference in New Issue
Block a user