AArch64MCAsmInfo.cpp

Go to the documentation of this file.

//===-- AArch64MCAsmInfo.cpp - AArch64 asm properties ---------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
//
// This file contains the declarations of the AArch64MCAsmInfo properties.
//
//===----------------------------------------------------------------------===//
 
#include "AArch64MCAsmInfo.h"
#include "AArch64MCOptions.h"
#include "llvm/ADT/Enum.h"
#include "llvm/MC/MCContext.h"
#include "llvm/MC/MCExpr.h"
#include "llvm/MC/MCStreamer.h"
#include "llvm/MC/MCValue.h"
#include "llvm/TargetParser/Triple.h"
using namespace llvm;
 
constexpr EnumStringDef<MCAsmInfo::AtSpecifierKind> COFFAtSpecifierDefs[] = {
    {{"IMGREL"}, MCSymbolRefExpr::VK_COFF_IMGREL32},
    {{"PAGEOFF"}, AArch64::S_MACHO_PAGEOFF},
};
constexpr auto COFFAtSpecifiers = BUILD_ENUM_STRINGS(COFFAtSpecifierDefs);
 
constexpr EnumStringDef<MCAsmInfo::AtSpecifierKind> ELFAtSpecifierDefs[] = {
    {{"GOT"}, AArch64::S_GOT},
};
constexpr auto ELFAtSpecifiers = BUILD_ENUM_STRINGS(ELFAtSpecifierDefs);
 
constexpr EnumStringDef<MCAsmInfo::AtSpecifierKind> MachOAtSpecifierDefs[] = {
    {{"GOT"}, AArch64::S_MACHO_GOT},
    {{"GOTPAGE"}, AArch64::S_MACHO_GOTPAGE},
    {{"GOTPAGEOFF"}, AArch64::S_MACHO_GOTPAGEOFF},
    {{"PAGE"}, AArch64::S_MACHO_PAGE},
    {{"PAGEOFF"}, AArch64::S_MACHO_PAGEOFF},
    {{"TLVP"}, AArch64::S_MACHO_TLVP},
    {{"TLVPPAGE"}, AArch64::S_MACHO_TLVPPAGE},
    {{"TLVPPAGEOFF"}, AArch64::S_MACHO_TLVPPAGEOFF},
};
constexpr auto MachOAtSpecifiers = BUILD_ENUM_STRINGS(MachOAtSpecifierDefs);
 
StringRef AArch64::getSpecifierName(AArch64::Specifier S) {
  // clang-format off
  switch (static_cast<uint32_t>(S)) {
  case AArch64::S_CALL:                return "";
  case AArch64::S_LO12:                return ":lo12:";
  case AArch64::S_ABS_G3:              return ":abs_g3:";
  case AArch64::S_ABS_G2:              return ":abs_g2:";
  case AArch64::S_ABS_G2_S:            return ":abs_g2_s:";
  case AArch64::S_ABS_G2_NC:           return ":abs_g2_nc:";
  case AArch64::S_ABS_G1:              return ":abs_g1:";
  case AArch64::S_ABS_G1_S:            return ":abs_g1_s:";
  case AArch64::S_ABS_G1_NC:           return ":abs_g1_nc:";
  case AArch64::S_ABS_G0:              return ":abs_g0:";
  case AArch64::S_ABS_G0_S:            return ":abs_g0_s:";
  case AArch64::S_ABS_G0_NC:           return ":abs_g0_nc:";
  case AArch64::S_PREL_G3:             return ":prel_g3:";
  case AArch64::S_PREL_G2:             return ":prel_g2:";
  case AArch64::S_PREL_G2_NC:          return ":prel_g2_nc:";
  case AArch64::S_PREL_G1:             return ":prel_g1:";
  case AArch64::S_PREL_G1_NC:          return ":prel_g1_nc:";
  case AArch64::S_PREL_G0:             return ":prel_g0:";
  case AArch64::S_PREL_G0_NC:          return ":prel_g0_nc:";
  case AArch64::S_DTPREL_G2:           return ":dtprel_g2:";
  case AArch64::S_DTPREL_G1:           return ":dtprel_g1:";
  case AArch64::S_DTPREL_G1_NC:        return ":dtprel_g1_nc:";
  case AArch64::S_DTPREL_G0:           return ":dtprel_g0:";
  case AArch64::S_DTPREL_G0_NC:        return ":dtprel_g0_nc:";
  case AArch64::S_DTPREL_HI12:         return ":dtprel_hi12:";
  case AArch64::S_DTPREL_LO12:         return ":dtprel_lo12:";
  case AArch64::S_DTPREL_LO12_NC:      return ":dtprel_lo12_nc:";
  case AArch64::S_TPREL_G2:            return ":tprel_g2:";
  case AArch64::S_TPREL_G1:            return ":tprel_g1:";
  case AArch64::S_TPREL_G1_NC:         return ":tprel_g1_nc:";
  case AArch64::S_TPREL_G0:            return ":tprel_g0:";
  case AArch64::S_TPREL_G0_NC:         return ":tprel_g0_nc:";
  case AArch64::S_TPREL_HI12:          return ":tprel_hi12:";
  case AArch64::S_TPREL_LO12:          return ":tprel_lo12:";
  case AArch64::S_TPREL_LO12_NC:       return ":tprel_lo12_nc:";
  case AArch64::S_TLSDESC_LO12:        return ":tlsdesc_lo12:";
  case AArch64::S_TLSDESC_AUTH_LO12:   return ":tlsdesc_auth_lo12:";
  case AArch64::S_ABS_PAGE:            return "";
  case AArch64::S_ABS_PAGE_NC:         return ":pg_hi21_nc:";
  case AArch64::S_GOT:                 return ":got:";
  case AArch64::S_GOT_PAGE:            return ":got:";
  case AArch64::S_GOT_PAGE_LO15:       return ":gotpage_lo15:";
  case AArch64::S_GOT_LO12:            return ":got_lo12:";
  case AArch64::S_GOTTPREL:            return ":gottprel:";
  case AArch64::S_GOTTPREL_PAGE:       return ":gottprel:";
  case AArch64::S_GOTTPREL_LO12_NC:    return ":gottprel_lo12:";
  case AArch64::S_GOTTPREL_G1:         return ":gottprel_g1:";
  case AArch64::S_GOTTPREL_G0_NC:      return ":gottprel_g0_nc:";
  case AArch64::S_TLSDESC:             return "";
  case AArch64::S_TLSDESC_PAGE:        return ":tlsdesc:";
  case AArch64::S_TLSDESC_AUTH:        return "";
  case AArch64::S_TLSDESC_AUTH_PAGE:   return ":tlsdesc_auth:";
  case AArch64::S_SECREL_LO12:         return ":secrel_lo12:";
  case AArch64::S_SECREL_HI12:         return ":secrel_hi12:";
  case AArch64::S_GOT_AUTH:            return ":got_auth:";
  case AArch64::S_GOT_AUTH_PAGE:       return ":got_auth:";
  case AArch64::S_GOT_AUTH_LO12:       return ":got_auth_lo12:";
 
  case AArch64::S_GOTPCREL:            return "%gotpcrel";
  case AArch64::S_PLT:                 return "%pltpcrel";
  case AArch64::S_DTPREL:              return "%dtprel";
  case AArch64::S_FUNCINIT:            return "%funcinit";
  default:
    llvm_unreachable("Invalid relocation specifier");
  }
  // clang-format on
}
 
AArch64::Specifier AArch64::parsePercentSpecifierName(StringRef name) {
  return StringSwitch<AArch64::Specifier>(name)
      .Case("pltpcrel", AArch64::S_PLT)
      .Case("gotpcrel", AArch64::S_GOTPCREL)
      .Case("dtprel", AArch64::S_DTPREL)
      .Case("funcinit", AArch64::S_FUNCINIT)
      .Default(0);
}
 
static bool evaluate(const MCSpecifierExpr &Expr, MCValue &Res,
                     const MCAssembler *Asm) {
  if (!Expr.getSubExpr()->evaluateAsRelocatable(Res, Asm))
    return false;
  Res.setSpecifier(Expr.getSpecifier());
  return !Res.getSubSym();
}
 
AArch64MCAsmInfoDarwin::AArch64MCAsmInfoDarwin(bool IsILP32,
                                               const MCTargetOptions &Options)
    : MCAsmInfoDarwin(Options) {
  // We prefer NEON instructions to be printed in the short, Apple-specific
  // form when targeting Darwin.
  AssemblerDialect =
      AArch64MCOptions::Global.neon_syntax.value_or(AArch64::Apple);
 
  InternalSymbolPrefix = "L";
  SeparatorString = "%%";
  CommentString = ";";
  CalleeSaveStackSlotSize = 8;
  CodePointerSize = IsILP32 ? 4 : 8;
 
  AlignmentIsInBytes = false;
  UsesELFSectionDirectiveForBSS = true;
  SupportsDebugInformation = true;
  UseDataRegionDirectives = true;
  ExceptionsType = ExceptionHandling::DwarfCFI;
 
  initializeAtSpecifiers(MachOAtSpecifiers);
  UseAtForSpecifier = false;
}
 
const MCExpr *AArch64MCAsmInfoDarwin::getExprForPersonalitySymbol(
    const MCSymbol *Sym, unsigned Encoding, MCStreamer &Streamer) const {
  // On Darwin, we can reference dwarf symbols with foo@GOT-., which
  // is an indirect pc-relative reference. The default implementation
  // won't reference using the GOT, so we need this target-specific
  // version.
  MCContext &Context = Streamer.getContext();
  const MCExpr *Res =
      MCSymbolRefExpr::create(Sym, AArch64::S_MACHO_GOT, Context);
  MCSymbol *PCSym = Context.createTempSymbol();
  Streamer.emitLabel(PCSym);
  const MCExpr *PC = MCSymbolRefExpr::create(PCSym, Context);
  return MCBinaryExpr::createSub(Res, PC, Context);
}
 
void AArch64AuthMCExpr::print(raw_ostream &OS, const MCAsmInfo *MAI) const {
  bool WrapSubExprInParens = !isa<MCSymbolRefExpr>(getSubExpr());
  if (WrapSubExprInParens)
    OS << '(';
  MAI->printExpr(OS, *getSubExpr());
  if (WrapSubExprInParens)
    OS << ')';
 
  OS << "@AUTH(" << AArch64PACKeyIDToString(Key) << ',' << Discriminator;
  if (hasAddressDiversity())
    OS << ",addr";
  OS << ')';
}
 
void AArch64MCAsmInfoDarwin::printSpecifierExpr(
    raw_ostream &OS, const MCSpecifierExpr &Expr) const {
  if (auto *AE = dyn_cast<AArch64AuthMCExpr>(&Expr))
    return AE->print(OS, this);
  OS << AArch64::getSpecifierName(Expr.getSpecifier());
  printExpr(OS, *Expr.getSubExpr());
}
 
bool AArch64MCAsmInfoDarwin::evaluateAsRelocatableImpl(
    const MCSpecifierExpr &Expr, MCValue &Res, const MCAssembler *Asm) const {
  return evaluate(Expr, Res, Asm);
}
 
AArch64MCAsmInfoELF::AArch64MCAsmInfoELF(const Triple &T,
                                         const MCTargetOptions &Options)
    : MCAsmInfoELF(Options) {
  if (T.getArch() == Triple::aarch64_be)
    IsLittleEndian = false;
 
  // We prefer NEON instructions to be printed in the generic form when
  // targeting ELF.
  AssemblerDialect =
      AArch64MCOptions::Global.neon_syntax.value_or(AArch64::Generic);
 
  CodePointerSize = T.getEnvironment() == Triple::GNUILP32 ? 4 : 8;
 
  // ".comm align is in bytes but .align is pow-2."
  AlignmentIsInBytes = false;
 
  CommentString = "//";
  InternalSymbolPrefix = ".L";
 
  Data16bitsDirective = "\t.hword\t";
  Data32bitsDirective = "\t.word\t";
  Data64bitsDirective = "\t.xword\t";
 
  UseDataRegionDirectives = false;
 
  WeakRefDirective = "\t.weak\t";
 
  SupportsDebugInformation = true;
 
  // Exceptions handling
  ExceptionsType = ExceptionHandling::DwarfCFI;
 
  HasIdentDirective = true;
 
  initializeAtSpecifiers(ELFAtSpecifiers);
  UseAtForSpecifier = false;
}
 
void AArch64MCAsmInfoELF::printSpecifierExpr(
    raw_ostream &OS, const MCSpecifierExpr &Expr) const {
  if (auto *AE = dyn_cast<AArch64AuthMCExpr>(&Expr))
    return AE->print(OS, this);
  auto Str = AArch64::getSpecifierName(Expr.getSpecifier());
  OS << Str;
  if (!Str.empty() && Str[0] == '%')
    OS << '(';
  printExpr(OS, *Expr.getSubExpr());
  if (!Str.empty() && Str[0] == '%')
    OS << ')';
}
 
bool AArch64MCAsmInfoELF::evaluateAsRelocatableImpl(
    const MCSpecifierExpr &Expr, MCValue &Res, const MCAssembler *Asm) const {
  return evaluate(Expr, Res, Asm);
}
 
AArch64MCAsmInfoMicrosoftCOFF::AArch64MCAsmInfoMicrosoftCOFF(
    const MCTargetOptions &Options)
    : MCAsmInfoMicrosoft(Options) {
  InternalSymbolPrefix = ".L";
 
  Data16bitsDirective = "\t.hword\t";
  Data32bitsDirective = "\t.word\t";
  Data64bitsDirective = "\t.xword\t";
 
  AlignmentIsInBytes = false;
  SupportsDebugInformation = true;
  CodePointerSize = 8;
 
  CommentString = "//";
  ExceptionsType = ExceptionHandling::WinEH;
  WinEHEncodingType = WinEH::EncodingType::Itanium;
 
  initializeAtSpecifiers(COFFAtSpecifiers);
}
 
void AArch64MCAsmInfoMicrosoftCOFF::printSpecifierExpr(
    raw_ostream &OS, const MCSpecifierExpr &Expr) const {
  OS << AArch64::getSpecifierName(Expr.getSpecifier());
  printExpr(OS, *Expr.getSubExpr());
}
 
bool AArch64MCAsmInfoMicrosoftCOFF::evaluateAsRelocatableImpl(
    const MCSpecifierExpr &Expr, MCValue &Res, const MCAssembler *Asm) const {
  return evaluate(Expr, Res, Asm);
}
 
AArch64MCAsmInfoGNUCOFF::AArch64MCAsmInfoGNUCOFF(const MCTargetOptions &Options)
    : MCAsmInfoGNUCOFF(Options) {
  InternalSymbolPrefix = ".L";
 
  Data16bitsDirective = "\t.hword\t";
  Data32bitsDirective = "\t.word\t";
  Data64bitsDirective = "\t.xword\t";
 
  AlignmentIsInBytes = false;
  SupportsDebugInformation = true;
  CodePointerSize = 8;
 
  CommentString = "//";
  ExceptionsType = ExceptionHandling::WinEH;
  WinEHEncodingType = WinEH::EncodingType::Itanium;
 
  initializeAtSpecifiers(COFFAtSpecifiers);
}
 
void AArch64MCAsmInfoGNUCOFF::printSpecifierExpr(
    raw_ostream &OS, const MCSpecifierExpr &Expr) const {
  OS << AArch64::getSpecifierName(Expr.getSpecifier());
  printExpr(OS, *Expr.getSubExpr());
}
 
bool AArch64MCAsmInfoGNUCOFF::evaluateAsRelocatableImpl(
    const MCSpecifierExpr &Expr, MCValue &Res, const MCAssembler *Asm) const {
  return evaluate(Expr, Res, Asm);
}