forked from OSchip/llvm-project
				
			
		
			
				
	
	
		
			262 lines
		
	
	
		
			9.1 KiB
		
	
	
	
		
			C++
		
	
	
	
			
		
		
	
	
			262 lines
		
	
	
		
			9.1 KiB
		
	
	
	
		
			C++
		
	
	
	
| //===-- SparcAsmBackend.cpp - Sparc Assembler Backend ---------------------===//
 | |
| //
 | |
| //                     The LLVM Compiler Infrastructure
 | |
| //
 | |
| // This file is distributed under the University of Illinois Open Source
 | |
| // License. See LICENSE.TXT for details.
 | |
| //
 | |
| //===----------------------------------------------------------------------===//
 | |
| 
 | |
| #include "llvm/MC/MCAsmBackend.h"
 | |
| #include "MCTargetDesc/SparcFixupKinds.h"
 | |
| #include "MCTargetDesc/SparcMCTargetDesc.h"
 | |
| #include "llvm/MC/MCELFObjectWriter.h"
 | |
| #include "llvm/MC/MCExpr.h"
 | |
| #include "llvm/MC/MCFixupKindInfo.h"
 | |
| #include "llvm/MC/MCObjectWriter.h"
 | |
| #include "llvm/MC/MCValue.h"
 | |
| #include "llvm/Support/TargetRegistry.h"
 | |
| 
 | |
| using namespace llvm;
 | |
| 
 | |
| static unsigned adjustFixupValue(unsigned Kind, uint64_t Value) {
 | |
|   switch (Kind) {
 | |
|   default:
 | |
|     llvm_unreachable("Unknown fixup kind!");
 | |
|   case FK_Data_1:
 | |
|   case FK_Data_2:
 | |
|   case FK_Data_4:
 | |
|   case FK_Data_8:
 | |
|     return Value;
 | |
| 
 | |
|   case Sparc::fixup_sparc_wplt30:
 | |
|   case Sparc::fixup_sparc_call30:
 | |
|     return (Value >> 2) & 0x3fffffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_br22:
 | |
|     return (Value >> 2) & 0x3fffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_br19:
 | |
|     return (Value >> 2) & 0x7ffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_br16_2:
 | |
|     return (Value >> 2) & 0xc000;
 | |
| 
 | |
|   case Sparc::fixup_sparc_br16_14:
 | |
|     return (Value >> 2) & 0x3fff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_pc22:
 | |
|   case Sparc::fixup_sparc_got22:
 | |
|   case Sparc::fixup_sparc_tls_gd_hi22:
 | |
|   case Sparc::fixup_sparc_tls_ldm_hi22:
 | |
|   case Sparc::fixup_sparc_tls_ie_hi22:
 | |
|   case Sparc::fixup_sparc_hi22:
 | |
|     return (Value >> 10) & 0x3fffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_pc10:
 | |
|   case Sparc::fixup_sparc_got10:
 | |
|   case Sparc::fixup_sparc_tls_gd_lo10:
 | |
|   case Sparc::fixup_sparc_tls_ldm_lo10:
 | |
|   case Sparc::fixup_sparc_tls_ie_lo10:
 | |
|   case Sparc::fixup_sparc_lo10:
 | |
|     return Value & 0x3ff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_tls_ldo_hix22:
 | |
|   case Sparc::fixup_sparc_tls_le_hix22:
 | |
|     return (~Value >> 10) & 0x3fffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_tls_ldo_lox10:
 | |
|   case Sparc::fixup_sparc_tls_le_lox10:
 | |
|     return (~(~Value & 0x3ff)) & 0x1fff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_h44:
 | |
|     return (Value >> 22) & 0x3fffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_m44:
 | |
|     return (Value >> 12) & 0x3ff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_l44:
 | |
|     return Value & 0xfff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_hh:
 | |
|     return (Value >> 42) & 0x3fffff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_hm:
 | |
|     return (Value >> 32) & 0x3ff;
 | |
| 
 | |
|   case Sparc::fixup_sparc_tls_gd_add:
 | |
|   case Sparc::fixup_sparc_tls_gd_call:
 | |
|   case Sparc::fixup_sparc_tls_ldm_add:
 | |
|   case Sparc::fixup_sparc_tls_ldm_call:
 | |
|   case Sparc::fixup_sparc_tls_ldo_add:
 | |
|   case Sparc::fixup_sparc_tls_ie_ld:
 | |
|   case Sparc::fixup_sparc_tls_ie_ldx:
 | |
|   case Sparc::fixup_sparc_tls_ie_add:
 | |
|     return 0;
 | |
|   }
 | |
| }
 | |
| 
 | |
| namespace {
 | |
|   class SparcAsmBackend : public MCAsmBackend {
 | |
|     const Target &TheTarget;
 | |
|   public:
 | |
|     SparcAsmBackend(const Target &T) : MCAsmBackend(), TheTarget(T) {}
 | |
| 
 | |
|     unsigned getNumFixupKinds() const override {
 | |
|       return Sparc::NumTargetFixupKinds;
 | |
|     }
 | |
| 
 | |
|     const MCFixupKindInfo &getFixupKindInfo(MCFixupKind Kind) const override {
 | |
|       const static MCFixupKindInfo Infos[Sparc::NumTargetFixupKinds] = {
 | |
|         // name                    offset bits  flags
 | |
|         { "fixup_sparc_call30",     2,     30,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_br22",      10,     22,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_br19",      13,     19,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_br16_2",    10,      2,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_br16_14",   18,     14,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_hi22",      10,     22,  0 },
 | |
|         { "fixup_sparc_lo10",      22,     10,  0 },
 | |
|         { "fixup_sparc_h44",       10,     22,  0 },
 | |
|         { "fixup_sparc_m44",       22,     10,  0 },
 | |
|         { "fixup_sparc_l44",       20,     12,  0 },
 | |
|         { "fixup_sparc_hh",        10,     22,  0 },
 | |
|         { "fixup_sparc_hm",        22,     10,  0 },
 | |
|         { "fixup_sparc_pc22",      10,     22,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_pc10",      22,     10,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_got22",     10,     22,  0 },
 | |
|         { "fixup_sparc_got10",     22,     10,  0 },
 | |
|         { "fixup_sparc_wplt30",     2,     30,  MCFixupKindInfo::FKF_IsPCRel },
 | |
|         { "fixup_sparc_tls_gd_hi22",   10, 22,  0 },
 | |
|         { "fixup_sparc_tls_gd_lo10",   22, 10,  0 },
 | |
|         { "fixup_sparc_tls_gd_add",     0,  0,  0 },
 | |
|         { "fixup_sparc_tls_gd_call",    0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ldm_hi22",  10, 22,  0 },
 | |
|         { "fixup_sparc_tls_ldm_lo10",  22, 10,  0 },
 | |
|         { "fixup_sparc_tls_ldm_add",    0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ldm_call",   0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ldo_hix22", 10, 22,  0 },
 | |
|         { "fixup_sparc_tls_ldo_lox10", 22, 10,  0 },
 | |
|         { "fixup_sparc_tls_ldo_add",    0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ie_hi22",   10, 22,  0 },
 | |
|         { "fixup_sparc_tls_ie_lo10",   22, 10,  0 },
 | |
|         { "fixup_sparc_tls_ie_ld",      0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ie_ldx",     0,  0,  0 },
 | |
|         { "fixup_sparc_tls_ie_add",     0,  0,  0 },
 | |
|         { "fixup_sparc_tls_le_hix22",   0,  0,  0 },
 | |
|         { "fixup_sparc_tls_le_lox10",   0,  0,  0 }
 | |
|       };
 | |
| 
 | |
|       if (Kind < FirstTargetFixupKind)
 | |
|         return MCAsmBackend::getFixupKindInfo(Kind);
 | |
| 
 | |
|       assert(unsigned(Kind - FirstTargetFixupKind) < getNumFixupKinds() &&
 | |
|              "Invalid kind!");
 | |
|       return Infos[Kind - FirstTargetFixupKind];
 | |
|     }
 | |
| 
 | |
|     void processFixupValue(const MCAssembler &Asm, const MCAsmLayout &Layout,
 | |
|                            const MCFixup &Fixup, const MCFragment *DF,
 | |
|                            const MCValue &Target, uint64_t &Value,
 | |
|                            bool &IsResolved) override {
 | |
|       switch ((Sparc::Fixups)Fixup.getKind()) {
 | |
|       default: break;
 | |
|       case Sparc::fixup_sparc_wplt30:
 | |
|         if (Target.getSymA()->getSymbol().isTemporary())
 | |
|           return;
 | |
|       case Sparc::fixup_sparc_tls_gd_hi22:
 | |
|       case Sparc::fixup_sparc_tls_gd_lo10:
 | |
|       case Sparc::fixup_sparc_tls_gd_add:
 | |
|       case Sparc::fixup_sparc_tls_gd_call:
 | |
|       case Sparc::fixup_sparc_tls_ldm_hi22:
 | |
|       case Sparc::fixup_sparc_tls_ldm_lo10:
 | |
|       case Sparc::fixup_sparc_tls_ldm_add:
 | |
|       case Sparc::fixup_sparc_tls_ldm_call:
 | |
|       case Sparc::fixup_sparc_tls_ldo_hix22:
 | |
|       case Sparc::fixup_sparc_tls_ldo_lox10:
 | |
|       case Sparc::fixup_sparc_tls_ldo_add:
 | |
|       case Sparc::fixup_sparc_tls_ie_hi22:
 | |
|       case Sparc::fixup_sparc_tls_ie_lo10:
 | |
|       case Sparc::fixup_sparc_tls_ie_ld:
 | |
|       case Sparc::fixup_sparc_tls_ie_ldx:
 | |
|       case Sparc::fixup_sparc_tls_ie_add:
 | |
|       case Sparc::fixup_sparc_tls_le_hix22:
 | |
|       case Sparc::fixup_sparc_tls_le_lox10:  IsResolved = false; break;
 | |
|       }
 | |
|     }
 | |
| 
 | |
|     bool mayNeedRelaxation(const MCInst &Inst) const override {
 | |
|       // FIXME.
 | |
|       return false;
 | |
|     }
 | |
| 
 | |
|     /// fixupNeedsRelaxation - Target specific predicate for whether a given
 | |
|     /// fixup requires the associated instruction to be relaxed.
 | |
|     bool fixupNeedsRelaxation(const MCFixup &Fixup,
 | |
|                               uint64_t Value,
 | |
|                               const MCRelaxableFragment *DF,
 | |
|                               const MCAsmLayout &Layout) const override {
 | |
|       // FIXME.
 | |
|       llvm_unreachable("fixupNeedsRelaxation() unimplemented");
 | |
|       return false;
 | |
|     }
 | |
|     void relaxInstruction(const MCInst &Inst, MCInst &Res) const override {
 | |
|       // FIXME.
 | |
|       llvm_unreachable("relaxInstruction() unimplemented");
 | |
|     }
 | |
| 
 | |
|     bool writeNopData(uint64_t Count, MCObjectWriter *OW) const override {
 | |
|       // Cannot emit NOP with size not multiple of 32 bits.
 | |
|       if (Count % 4 != 0)
 | |
|         return false;
 | |
| 
 | |
|       uint64_t NumNops = Count / 4;
 | |
|       for (uint64_t i = 0; i != NumNops; ++i)
 | |
|         OW->Write32(0x01000000);
 | |
| 
 | |
|       return true;
 | |
|     }
 | |
| 
 | |
|     bool is64Bit() const {
 | |
|       StringRef name = TheTarget.getName();
 | |
|       return name == "sparcv9";
 | |
|     }
 | |
|   };
 | |
| 
 | |
|   class ELFSparcAsmBackend : public SparcAsmBackend {
 | |
|     Triple::OSType OSType;
 | |
|   public:
 | |
|     ELFSparcAsmBackend(const Target &T, Triple::OSType OSType) :
 | |
|       SparcAsmBackend(T), OSType(OSType) { }
 | |
| 
 | |
|     void applyFixup(const MCFixup &Fixup, char *Data, unsigned DataSize,
 | |
|                     uint64_t Value, bool IsPCRel) const override {
 | |
| 
 | |
|       Value = adjustFixupValue(Fixup.getKind(), Value);
 | |
|       if (!Value) return;           // Doesn't change encoding.
 | |
| 
 | |
|       unsigned Offset = Fixup.getOffset();
 | |
| 
 | |
|       // For each byte of the fragment that the fixup touches, mask in the bits
 | |
|       // from the fixup value. The Value has been "split up" into the
 | |
|       // appropriate bitfields above.
 | |
|       for (unsigned i = 0; i != 4; ++i)
 | |
|         Data[Offset + i] |= uint8_t((Value >> ((4 - i - 1)*8)) & 0xff);
 | |
| 
 | |
|     }
 | |
| 
 | |
|     MCObjectWriter *createObjectWriter(raw_ostream &OS) const override {
 | |
|       uint8_t OSABI = MCELFObjectTargetWriter::getOSABI(OSType);
 | |
|       return createSparcELFObjectWriter(OS, is64Bit(), OSABI);
 | |
|     }
 | |
|   };
 | |
| 
 | |
| } // end anonymous namespace
 | |
| 
 | |
| 
 | |
| MCAsmBackend *llvm::createSparcAsmBackend(const Target &T,
 | |
|                                           const MCRegisterInfo &MRI,
 | |
|                                           StringRef TT,
 | |
|                                           StringRef CPU) {
 | |
|   return new ELFSparcAsmBackend(T, Triple(TT).getOS());
 | |
| }
 |