mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-28 06:29:45 +00:00
but I cannot reproduce the problem and have scrubed my sources and even tested with llvm-lit -v --vg. Support for Mips register information sections. Mips ELF object files have a section that is dedicated to register use info. Some of this information such as the assumed Global Pointer value is used by the linker in relocation resolution. The register info file is .reginfo in o32 and .MIPS.options in 64 and n32 abi files. This patch contains the changes needed to create the sections, but leaves the actual register accounting for a future patch. Contributer: Jack Carter git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@172847 91177308-0d34-0410-b5e6-96231b3b80d8
119 lines
4.2 KiB
C++
119 lines
4.2 KiB
C++
//===-- MipsTargetObjectFile.cpp - Mips Object Files ----------------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "MipsTargetObjectFile.h"
|
|
#include "MipsSubtarget.h"
|
|
#include "llvm/IR/DataLayout.h"
|
|
#include "llvm/IR/DerivedTypes.h"
|
|
#include "llvm/IR/GlobalVariable.h"
|
|
#include "llvm/MC/MCContext.h"
|
|
#include "llvm/MC/MCSectionELF.h"
|
|
#include "llvm/Support/CommandLine.h"
|
|
#include "llvm/Support/ELF.h"
|
|
#include "llvm/Target/TargetMachine.h"
|
|
using namespace llvm;
|
|
|
|
static cl::opt<unsigned>
|
|
SSThreshold("mips-ssection-threshold", cl::Hidden,
|
|
cl::desc("Small data and bss section threshold size (default=8)"),
|
|
cl::init(8));
|
|
|
|
void MipsTargetObjectFile::Initialize(MCContext &Ctx, const TargetMachine &TM){
|
|
TargetLoweringObjectFileELF::Initialize(Ctx, TM);
|
|
InitializeELF(TM.Options.UseInitArray);
|
|
|
|
SmallDataSection =
|
|
getContext().getELFSection(".sdata", ELF::SHT_PROGBITS,
|
|
ELF::SHF_WRITE |ELF::SHF_ALLOC,
|
|
SectionKind::getDataRel());
|
|
|
|
SmallBSSSection =
|
|
getContext().getELFSection(".sbss", ELF::SHT_NOBITS,
|
|
ELF::SHF_WRITE |ELF::SHF_ALLOC,
|
|
SectionKind::getBSS());
|
|
|
|
// Register info information
|
|
const MipsSubtarget &Subtarget = TM.getSubtarget<MipsSubtarget>();
|
|
if (Subtarget.isABI_N64() || Subtarget.isABI_N32())
|
|
ReginfoSection =
|
|
getContext().getELFSection(".MIPS.options",
|
|
ELF::SHT_MIPS_OPTIONS,
|
|
ELF::SHF_ALLOC |ELF::SHF_MIPS_NOSTRIP,
|
|
SectionKind::getMetadata());
|
|
else
|
|
ReginfoSection =
|
|
getContext().getELFSection(".reginfo",
|
|
ELF::SHT_MIPS_REGINFO,
|
|
ELF::SHF_ALLOC,
|
|
SectionKind::getMetadata());
|
|
}
|
|
|
|
// A address must be loaded from a small section if its size is less than the
|
|
// small section size threshold. Data in this section must be addressed using
|
|
// gp_rel operator.
|
|
static bool IsInSmallSection(uint64_t Size) {
|
|
return Size > 0 && Size <= SSThreshold;
|
|
}
|
|
|
|
bool MipsTargetObjectFile::IsGlobalInSmallSection(const GlobalValue *GV,
|
|
const TargetMachine &TM) const {
|
|
if (GV->isDeclaration() || GV->hasAvailableExternallyLinkage())
|
|
return false;
|
|
|
|
return IsGlobalInSmallSection(GV, TM, getKindForGlobal(GV, TM));
|
|
}
|
|
|
|
/// IsGlobalInSmallSection - Return true if this global address should be
|
|
/// placed into small data/bss section.
|
|
bool MipsTargetObjectFile::
|
|
IsGlobalInSmallSection(const GlobalValue *GV, const TargetMachine &TM,
|
|
SectionKind Kind) const {
|
|
|
|
const MipsSubtarget &Subtarget = TM.getSubtarget<MipsSubtarget>();
|
|
|
|
// Return if small section is not available.
|
|
if (!Subtarget.useSmallSection())
|
|
return false;
|
|
|
|
// Only global variables, not functions.
|
|
const GlobalVariable *GVA = dyn_cast<GlobalVariable>(GV);
|
|
if (!GVA)
|
|
return false;
|
|
|
|
// We can only do this for datarel or BSS objects for now.
|
|
if (!Kind.isBSS() && !Kind.isDataRel())
|
|
return false;
|
|
|
|
// If this is a internal constant string, there is a special
|
|
// section for it, but not in small data/bss.
|
|
if (Kind.isMergeable1ByteCString())
|
|
return false;
|
|
|
|
Type *Ty = GV->getType()->getElementType();
|
|
return IsInSmallSection(TM.getDataLayout()->getTypeAllocSize(Ty));
|
|
}
|
|
|
|
|
|
|
|
const MCSection *MipsTargetObjectFile::
|
|
SelectSectionForGlobal(const GlobalValue *GV, SectionKind Kind,
|
|
Mangler *Mang, const TargetMachine &TM) const {
|
|
// TODO: Could also support "weak" symbols as well with ".gnu.linkonce.s.*"
|
|
// sections?
|
|
|
|
// Handle Small Section classification here.
|
|
if (Kind.isBSS() && IsGlobalInSmallSection(GV, TM, Kind))
|
|
return SmallBSSSection;
|
|
if (Kind.isDataNoRel() && IsGlobalInSmallSection(GV, TM, Kind))
|
|
return SmallDataSection;
|
|
|
|
// Otherwise, we work the same as ELF.
|
|
return TargetLoweringObjectFileELF::SelectSectionForGlobal(GV, Kind, Mang,TM);
|
|
}
|