mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-23 17:29:19 +00:00
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@122616 91177308-0d34-0410-b5e6-96231b3b80d8
275 lines
9.1 KiB
C++
275 lines
9.1 KiB
C++
//===- lib/MC/MCStreamer.cpp - Streaming Machine Code Output --------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "llvm/MC/MCAsmInfo.h"
|
|
#include "llvm/MC/MCContext.h"
|
|
#include "llvm/MC/MCStreamer.h"
|
|
#include "llvm/MC/MCExpr.h"
|
|
#include "llvm/MC/MCObjectWriter.h"
|
|
#include "llvm/Support/ErrorHandling.h"
|
|
#include "llvm/Support/raw_ostream.h"
|
|
#include "llvm/ADT/SmallString.h"
|
|
#include "llvm/ADT/Twine.h"
|
|
#include <cstdlib>
|
|
using namespace llvm;
|
|
|
|
MCStreamer::MCStreamer(MCContext &Ctx) : Context(Ctx), CurSection(0),
|
|
PrevSection(0) {
|
|
}
|
|
|
|
MCStreamer::~MCStreamer() {
|
|
}
|
|
|
|
raw_ostream &MCStreamer::GetCommentOS() {
|
|
// By default, discard comments.
|
|
return nulls();
|
|
}
|
|
|
|
void MCStreamer::EmitDwarfSetLineAddr(int64_t LineDelta,
|
|
const MCSymbol *Label, int PointerSize) {
|
|
// emit the sequence to set the address
|
|
EmitIntValue(dwarf::DW_LNS_extended_op, 1);
|
|
EmitULEB128IntValue(PointerSize + 1);
|
|
EmitIntValue(dwarf::DW_LNE_set_address, 1);
|
|
EmitSymbolValue(Label, PointerSize);
|
|
|
|
// emit the sequence for the LineDelta (from 1) and a zero address delta.
|
|
MCDwarfLineAddr::Emit(this, LineDelta, 0);
|
|
}
|
|
|
|
/// EmitIntValue - Special case of EmitValue that avoids the client having to
|
|
/// pass in a MCExpr for constant integers.
|
|
void MCStreamer::EmitIntValue(uint64_t Value, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
assert(Size <= 8 && "Invalid size");
|
|
assert((isUIntN(8 * Size, Value) || isIntN(8 * Size, Value)) &&
|
|
"Invalid size");
|
|
char buf[8];
|
|
// FIXME: Endianness assumption.
|
|
for (unsigned i = 0; i != Size; ++i)
|
|
buf[i] = uint8_t(Value >> (i * 8));
|
|
EmitBytes(StringRef(buf, Size), AddrSpace);
|
|
}
|
|
|
|
/// EmitULEB128Value - Special case of EmitULEB128Value that avoids the
|
|
/// client having to pass in a MCExpr for constant integers.
|
|
void MCStreamer::EmitULEB128IntValue(uint64_t Value, unsigned AddrSpace) {
|
|
SmallString<32> Tmp;
|
|
raw_svector_ostream OSE(Tmp);
|
|
MCObjectWriter::EncodeULEB128(Value, OSE);
|
|
EmitBytes(OSE.str(), AddrSpace);
|
|
}
|
|
|
|
/// EmitSLEB128Value - Special case of EmitSLEB128Value that avoids the
|
|
/// client having to pass in a MCExpr for constant integers.
|
|
void MCStreamer::EmitSLEB128IntValue(int64_t Value, unsigned AddrSpace) {
|
|
SmallString<32> Tmp;
|
|
raw_svector_ostream OSE(Tmp);
|
|
MCObjectWriter::EncodeSLEB128(Value, OSE);
|
|
EmitBytes(OSE.str(), AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitAbsValue(const MCExpr *Value, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
if (getContext().getAsmInfo().hasAggressiveSymbolFolding()) {
|
|
EmitValue(Value, Size, AddrSpace);
|
|
return;
|
|
}
|
|
MCSymbol *ABS = getContext().CreateTempSymbol();
|
|
EmitAssignment(ABS, Value);
|
|
EmitSymbolValue(ABS, Size, AddrSpace);
|
|
}
|
|
|
|
|
|
void MCStreamer::EmitValue(const MCExpr *Value, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
EmitValueImpl(Value, Size, false, AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitPCRelValue(const MCExpr *Value, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
EmitValueImpl(Value, Size, true, AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitSymbolValue(const MCSymbol *Sym, unsigned Size,
|
|
bool isPCRel, unsigned AddrSpace) {
|
|
EmitValueImpl(MCSymbolRefExpr::Create(Sym, getContext()), Size, isPCRel,
|
|
AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitSymbolValue(const MCSymbol *Sym, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
EmitSymbolValue(Sym, Size, false, AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitPCRelSymbolValue(const MCSymbol *Sym, unsigned Size,
|
|
unsigned AddrSpace) {
|
|
EmitSymbolValue(Sym, Size, true, AddrSpace);
|
|
}
|
|
|
|
void MCStreamer::EmitGPRel32Value(const MCExpr *Value) {
|
|
report_fatal_error("unsupported directive in streamer");
|
|
}
|
|
|
|
/// EmitFill - Emit NumBytes bytes worth of the value specified by
|
|
/// FillValue. This implements directives such as '.space'.
|
|
void MCStreamer::EmitFill(uint64_t NumBytes, uint8_t FillValue,
|
|
unsigned AddrSpace) {
|
|
const MCExpr *E = MCConstantExpr::Create(FillValue, getContext());
|
|
for (uint64_t i = 0, e = NumBytes; i != e; ++i)
|
|
EmitValue(E, 1, AddrSpace);
|
|
}
|
|
|
|
bool MCStreamer::EmitDwarfFileDirective(unsigned FileNo,
|
|
StringRef Filename) {
|
|
return getContext().GetDwarfFile(Filename, FileNo) == 0;
|
|
}
|
|
|
|
void MCStreamer::EmitDwarfLocDirective(unsigned FileNo, unsigned Line,
|
|
unsigned Column, unsigned Flags,
|
|
unsigned Isa,
|
|
unsigned Discriminator) {
|
|
getContext().setCurrentDwarfLoc(FileNo, Line, Column, Flags, Isa,
|
|
Discriminator);
|
|
}
|
|
|
|
MCDwarfFrameInfo *MCStreamer::getCurrentFrameInfo() {
|
|
if (FrameInfos.empty())
|
|
return NULL;
|
|
return &FrameInfos.back();
|
|
}
|
|
|
|
void MCStreamer::EnsureValidFrame() {
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
if (!CurFrame || CurFrame->End)
|
|
report_fatal_error("No open frame");
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIStartProc() {
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
if (CurFrame && !CurFrame->End) {
|
|
report_fatal_error("Starting a frame before finishing the previous one!");
|
|
return true;
|
|
}
|
|
MCDwarfFrameInfo Frame;
|
|
Frame.Begin = getContext().CreateTempSymbol();
|
|
EmitLabel(Frame.Begin);
|
|
FrameInfos.push_back(Frame);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIEndProc() {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
CurFrame->End = getContext().CreateTempSymbol();
|
|
EmitLabel(CurFrame->End);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIDefCfa(int64_t Register, int64_t Offset) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MachineLocation Dest(MachineLocation::VirtualFP);
|
|
MachineLocation Source(Register, -Offset);
|
|
MCCFIInstruction Instruction(Label, Dest, Source);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIDefCfaOffset(int64_t Offset) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MachineLocation Dest(MachineLocation::VirtualFP);
|
|
MachineLocation Source(MachineLocation::VirtualFP, -Offset);
|
|
MCCFIInstruction Instruction(Label, Dest, Source);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIDefCfaRegister(int64_t Register) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MachineLocation Dest(Register);
|
|
MachineLocation Source(MachineLocation::VirtualFP);
|
|
MCCFIInstruction Instruction(Label, Dest, Source);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIOffset(int64_t Register, int64_t Offset) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MachineLocation Dest(Register, Offset);
|
|
MachineLocation Source(Register, Offset);
|
|
MCCFIInstruction Instruction(Label, Dest, Source);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIPersonality(const MCSymbol *Sym,
|
|
unsigned Encoding) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
CurFrame->Personality = Sym;
|
|
CurFrame->PersonalityEncoding = Encoding;
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFILsda(const MCSymbol *Sym, unsigned Encoding) {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
CurFrame->Lsda = Sym;
|
|
CurFrame->LsdaEncoding = Encoding;
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIRememberState() {
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MCCFIInstruction Instruction(MCCFIInstruction::Remember, Label);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
bool MCStreamer::EmitCFIRestoreState() {
|
|
// FIXME: Error if there is no matching cfi_remember_state.
|
|
EnsureValidFrame();
|
|
MCDwarfFrameInfo *CurFrame = getCurrentFrameInfo();
|
|
MCSymbol *Label = getContext().CreateTempSymbol();
|
|
EmitLabel(Label);
|
|
MCCFIInstruction Instruction(MCCFIInstruction::Restore, Label);
|
|
CurFrame->Instructions.push_back(Instruction);
|
|
return false;
|
|
}
|
|
|
|
/// EmitRawText - If this file is backed by an assembly streamer, this dumps
|
|
/// the specified string in the output .s file. This capability is
|
|
/// indicated by the hasRawTextSupport() predicate.
|
|
void MCStreamer::EmitRawText(StringRef String) {
|
|
errs() << "EmitRawText called on an MCStreamer that doesn't support it, "
|
|
" something must not be fully mc'ized\n";
|
|
abort();
|
|
}
|
|
|
|
void MCStreamer::EmitRawText(const Twine &T) {
|
|
SmallString<128> Str;
|
|
T.toVector(Str);
|
|
EmitRawText(Str.str());
|
|
}
|