mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-12-17 03:30:28 +00:00
ca1a3cf45b
The current SystemZ back-end only supports the local-exec TLS access model.
This patch adds all required MC support for the other TLS models, which
means in particular:
- Support additional relocation types for
Initial-exec model: R_390_TLS_IEENT
Local-dynamic-model: R_390_TLS_LDO32, R_390_TLS_LDO64,
R_390_TLS_LDM32, R_390_TLS_LDM64, R_390_TLS_LDCALL
General-dynamic model: R_390_TLS_GD32, R_390_TLS_GD64, R_390_TLS_GDCALL
- Support assembler syntax to generate additional relocations
for use with __tls_get_offset calls:
:tls_gdcall:
:tls_ldcall:
The patch also adds a new test to verify fixups and relocations,
and removes the (already unused) FK_390_PLT16DBL/FK_390_PLT32DBL
fixup kinds.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@229652 91177308-0d34-0410-b5e6-96231b3b80d8
118 lines
4.0 KiB
C++
118 lines
4.0 KiB
C++
//===-- SystemZMCAsmBackend.cpp - SystemZ assembler backend ---------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "MCTargetDesc/SystemZMCTargetDesc.h"
|
|
#include "MCTargetDesc/SystemZMCFixups.h"
|
|
#include "llvm/MC/MCAsmBackend.h"
|
|
#include "llvm/MC/MCELFObjectWriter.h"
|
|
#include "llvm/MC/MCFixupKindInfo.h"
|
|
#include "llvm/MC/MCInst.h"
|
|
#include "llvm/MC/MCObjectWriter.h"
|
|
|
|
using namespace llvm;
|
|
|
|
// Value is a fully-resolved relocation value: Symbol + Addend [- Pivot].
|
|
// Return the bits that should be installed in a relocation field for
|
|
// fixup kind Kind.
|
|
static uint64_t extractBitsForFixup(MCFixupKind Kind, uint64_t Value) {
|
|
if (Kind < FirstTargetFixupKind)
|
|
return Value;
|
|
|
|
switch (unsigned(Kind)) {
|
|
case SystemZ::FK_390_PC16DBL:
|
|
case SystemZ::FK_390_PC32DBL:
|
|
return (int64_t)Value / 2;
|
|
|
|
case SystemZ::FK_390_TLS_CALL:
|
|
return 0;
|
|
}
|
|
|
|
llvm_unreachable("Unknown fixup kind!");
|
|
}
|
|
|
|
namespace {
|
|
class SystemZMCAsmBackend : public MCAsmBackend {
|
|
uint8_t OSABI;
|
|
public:
|
|
SystemZMCAsmBackend(uint8_t osABI)
|
|
: OSABI(osABI) {}
|
|
|
|
// Override MCAsmBackend
|
|
unsigned getNumFixupKinds() const override {
|
|
return SystemZ::NumTargetFixupKinds;
|
|
}
|
|
const MCFixupKindInfo &getFixupKindInfo(MCFixupKind Kind) const override;
|
|
void applyFixup(const MCFixup &Fixup, char *Data, unsigned DataSize,
|
|
uint64_t Value, bool IsPCRel) const override;
|
|
bool mayNeedRelaxation(const MCInst &Inst) const override {
|
|
return false;
|
|
}
|
|
bool fixupNeedsRelaxation(const MCFixup &Fixup, uint64_t Value,
|
|
const MCRelaxableFragment *Fragment,
|
|
const MCAsmLayout &Layout) const override {
|
|
return false;
|
|
}
|
|
void relaxInstruction(const MCInst &Inst, MCInst &Res) const override {
|
|
llvm_unreachable("SystemZ does do not have assembler relaxation");
|
|
}
|
|
bool writeNopData(uint64_t Count, MCObjectWriter *OW) const override;
|
|
MCObjectWriter *createObjectWriter(raw_ostream &OS) const override {
|
|
return createSystemZObjectWriter(OS, OSABI);
|
|
}
|
|
};
|
|
} // end anonymous namespace
|
|
|
|
const MCFixupKindInfo &
|
|
SystemZMCAsmBackend::getFixupKindInfo(MCFixupKind Kind) const {
|
|
const static MCFixupKindInfo Infos[SystemZ::NumTargetFixupKinds] = {
|
|
{ "FK_390_PC16DBL", 0, 16, MCFixupKindInfo::FKF_IsPCRel },
|
|
{ "FK_390_PC32DBL", 0, 32, MCFixupKindInfo::FKF_IsPCRel },
|
|
{ "FK_390_TLS_CALL", 0, 0, 0 }
|
|
};
|
|
|
|
if (Kind < FirstTargetFixupKind)
|
|
return MCAsmBackend::getFixupKindInfo(Kind);
|
|
|
|
assert(unsigned(Kind - FirstTargetFixupKind) < getNumFixupKinds() &&
|
|
"Invalid kind!");
|
|
return Infos[Kind - FirstTargetFixupKind];
|
|
}
|
|
|
|
void SystemZMCAsmBackend::applyFixup(const MCFixup &Fixup, char *Data,
|
|
unsigned DataSize, uint64_t Value,
|
|
bool IsPCRel) const {
|
|
MCFixupKind Kind = Fixup.getKind();
|
|
unsigned Offset = Fixup.getOffset();
|
|
unsigned Size = (getFixupKindInfo(Kind).TargetSize + 7) / 8;
|
|
|
|
assert(Offset + Size <= DataSize && "Invalid fixup offset!");
|
|
|
|
// Big-endian insertion of Size bytes.
|
|
Value = extractBitsForFixup(Kind, Value);
|
|
unsigned ShiftValue = (Size * 8) - 8;
|
|
for (unsigned I = 0; I != Size; ++I) {
|
|
Data[Offset + I] |= uint8_t(Value >> ShiftValue);
|
|
ShiftValue -= 8;
|
|
}
|
|
}
|
|
|
|
bool SystemZMCAsmBackend::writeNopData(uint64_t Count,
|
|
MCObjectWriter *OW) const {
|
|
for (uint64_t I = 0; I != Count; ++I)
|
|
OW->Write8(7);
|
|
return true;
|
|
}
|
|
|
|
MCAsmBackend *llvm::createSystemZMCAsmBackend(const Target &T,
|
|
const MCRegisterInfo &MRI,
|
|
StringRef TT, StringRef CPU) {
|
|
uint8_t OSABI = MCELFObjectTargetWriter::getOSABI(Triple(TT).getOS());
|
|
return new SystemZMCAsmBackend(OSABI);
|
|
}
|