lib/Target/ARM/AsmParser/ARMAsmLexer.cpp

   1 //===-- ARMAsmLexer.cpp - Tokenize ARM assembly to AsmTokens --------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10 #include "ARM.h"
  11 #include "ARMTargetMachine.h"
  12
  13 #include "llvm/ADT/OwningPtr.h"
  14 #include "llvm/ADT/SmallVector.h"
  15 #include "llvm/ADT/StringExtras.h"
  16
  17 #include "llvm/MC/MCAsmInfo.h"
  18 #include "llvm/MC/MCParser/MCAsmLexer.h"
  19 #include "llvm/MC/MCParser/MCParsedAsmOperand.h"
  20
  21 #include "llvm/Target/TargetAsmLexer.h"
  22 #include "llvm/Target/TargetMachine.h"
  23 #include "llvm/Target/TargetRegistry.h"
  24
  25 #include <string>
  26 #include <map>
  27
  28 using namespace llvm;
  29
  30 namespace {
  31
  32   class ARMBaseAsmLexer : public TargetAsmLexer {
  33     const MCAsmInfo &AsmInfo;
  34
  35     const AsmToken &lexDefinite() {
  36       return getLexer()->Lex();
  37     }
  38
  39     AsmToken LexTokenUAL();
  40   protected:
  41     typedef std::map <std::string, unsigned> rmap_ty;
  42
  43     rmap_ty RegisterMap;
  44
  45     void InitRegisterMap(const TargetRegisterInfo *info) {
  46       unsigned numRegs = info->getNumRegs();
  47
  48       for (unsigned i = 0; i < numRegs; ++i) {
  49         const char *regName = info->getName(i);
  50         if (regName)
  51           RegisterMap[regName] = i;
  52       }
  53     }
  54
  55     unsigned MatchRegisterName(StringRef Name) {
  56       rmap_ty::iterator iter = RegisterMap.find(Name.str());
  57       if (iter != RegisterMap.end())
  58         return iter->second;
  59       else
  60         return 0;
  61     }
  62
  63     AsmToken LexToken() {
  64       if (!Lexer) {
  65         SetError(SMLoc(), "No MCAsmLexer installed");
  66         return AsmToken(AsmToken::Error, "", 0);
  67       }
  68
  69       switch (AsmInfo.getAssemblerDialect()) {
  70       default:
  71         SetError(SMLoc(), "Unhandled dialect");
  72         return AsmToken(AsmToken::Error, "", 0);
  73       case 0:
  74         return LexTokenUAL();
  75       }
  76     }
  77   public:
  78     ARMBaseAsmLexer(const Target &T, const MCAsmInfo &MAI)
  79       : TargetAsmLexer(T), AsmInfo(MAI) {
  80     }
  81   };
  82
  83   class ARMAsmLexer : public ARMBaseAsmLexer {
  84   public:
  85     ARMAsmLexer(const Target &T, const MCAsmInfo &MAI)
  86       : ARMBaseAsmLexer(T, MAI) {
  87       std::string tripleString("arm-unknown-unknown");
  88       std::string featureString;
  89       OwningPtr<const TargetMachine>
  90         targetMachine(T.createTargetMachine(tripleString, featureString));
  91       InitRegisterMap(targetMachine->getRegisterInfo());
  92     }
  93   };
  94
  95   class ThumbAsmLexer : public ARMBaseAsmLexer {
  96   public:
  97     ThumbAsmLexer(const Target &T, const MCAsmInfo &MAI)
  98       : ARMBaseAsmLexer(T, MAI) {
  99       std::string tripleString("thumb-unknown-unknown");
 100       std::string featureString;
 101       OwningPtr<const TargetMachine>
 102         targetMachine(T.createTargetMachine(tripleString, featureString));
 103       InitRegisterMap(targetMachine->getRegisterInfo());
 104     }
 105   };
 106 }
 107
 108 AsmToken ARMBaseAsmLexer::LexTokenUAL() {
 109   const AsmToken &lexedToken = lexDefinite();
 110
 111   switch (lexedToken.getKind()) {
 112   default:
 113     return AsmToken(lexedToken);
 114   case AsmToken::Error:
 115     SetError(Lexer->getErrLoc(), Lexer->getErr());
 116     return AsmToken(lexedToken);
 117   case AsmToken::Identifier:
 118   {
 119     std::string upperCase = lexedToken.getString().str();
 120     std::string lowerCase = LowercaseString(upperCase);
 121     StringRef lowerRef(lowerCase);
 122
 123     unsigned regID = MatchRegisterName(lowerRef);
 124     // Check for register aliases.
 125     //   r13 -> sp
 126     //   r14 -> lr
 127     //   r15 -> pc
 128     //   ip  -> r12
 129     //   FIXME: Some assemblers support lots of others. Do we want them all?
 130     if (!regID) {
 131      if (lowerCase.size() == 3 && lowerCase[0] == 'r'
 132         && lowerCase[1] == '1') {
 133        switch (lowerCase[2]) {
 134        default: break;
 135        case '3': regID = ARM::SP;
 136        case '4': regID = ARM::LR;
 137        case '5': regID = ARM::PC;
 138        }
 139      } else if (lowerCase == "ip")
 140        regID = ARM::R12;
 141     }
 142
 143     if (regID) {
 144       return AsmToken(AsmToken::Register,
 145                       lexedToken.getString(),
 146                       static_cast<int64_t>(regID));
 147     } else {
 148       return AsmToken(lexedToken);
 149     }
 150   }
 151   }
 152 }
 153
 154 extern "C" void LLVMInitializeARMAsmLexer() {
 155   RegisterAsmLexer<ARMAsmLexer> X(TheARMTarget);
 156   RegisterAsmLexer<ThumbAsmLexer> Y(TheThumbTarget);
 157 }
 158