MIR Serialization: Serialize immediate machine operands.
[oota-llvm.git] / lib / CodeGen / MIRParser / MILexer.cpp
1 //===- MILexer.cpp - Machine instructions lexer implementation ----------===//
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 // This file implements the lexing of machine instructions.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "MILexer.h"
15 #include "llvm/ADT/Twine.h"
16 #include <cctype>
17
18 using namespace llvm;
19
20 namespace {
21
22 /// This class provides a way to iterate and get characters from the source
23 /// string.
24 class Cursor {
25   const char *Ptr;
26   const char *End;
27
28 public:
29   explicit Cursor(StringRef Str) {
30     Ptr = Str.data();
31     End = Ptr + Str.size();
32   }
33
34   bool isEOF() const { return Ptr == End; }
35
36   char peek(unsigned I = 0) const { return End - Ptr <= I ? 0 : Ptr[I]; }
37
38   void advance() { ++Ptr; }
39
40   StringRef remaining() const { return StringRef(Ptr, End - Ptr); }
41
42   StringRef upto(Cursor C) const {
43     assert(C.Ptr >= Ptr && C.Ptr <= End);
44     return StringRef(Ptr, C.Ptr - Ptr);
45   }
46
47   StringRef::iterator location() const { return Ptr; }
48 };
49
50 } // end anonymous namespace
51
52 /// Skip the leading whitespace characters and return the updated cursor.
53 static Cursor skipWhitespace(Cursor C) {
54   while (isspace(C.peek()))
55     C.advance();
56   return C;
57 }
58
59 static bool isIdentifierChar(char C) {
60   return isalpha(C) || isdigit(C) || C == '_' || C == '-' || C == '.';
61 }
62
63 static Cursor lexIdentifier(Cursor C, MIToken &Token) {
64   auto Range = C;
65   while (isIdentifierChar(C.peek()))
66     C.advance();
67   Token = MIToken(MIToken::Identifier, Range.upto(C));
68   return C;
69 }
70
71 static Cursor lexPercent(Cursor C, MIToken &Token) {
72   auto Range = C;
73   C.advance(); // Skip '%'
74   while (isIdentifierChar(C.peek()))
75     C.advance();
76   Token = MIToken(MIToken::NamedRegister, Range.upto(C));
77   return C;
78 }
79
80 static Cursor lexIntegerLiteral(Cursor C, MIToken &Token) {
81   auto Range = C;
82   C.advance();
83   while (isdigit(C.peek()))
84     C.advance();
85   StringRef StrVal = Range.upto(C);
86   Token = MIToken(MIToken::IntegerLiteral, StrVal, APSInt(StrVal));
87   return C;
88 }
89
90 static MIToken::TokenKind symbolToken(char C) {
91   switch (C) {
92   case ',':
93     return MIToken::comma;
94   case '=':
95     return MIToken::equal;
96   default:
97     return MIToken::Error;
98   }
99 }
100
101 static Cursor lexSymbol(Cursor C, MIToken::TokenKind Kind, MIToken &Token) {
102   auto Range = C;
103   C.advance();
104   Token = MIToken(Kind, Range.upto(C));
105   return C;
106 }
107
108 StringRef llvm::lexMIToken(
109     StringRef Source, MIToken &Token,
110     function_ref<void(StringRef::iterator Loc, const Twine &)> ErrorCallback) {
111   auto C = skipWhitespace(Cursor(Source));
112   if (C.isEOF()) {
113     Token = MIToken(MIToken::Eof, C.remaining());
114     return C.remaining();
115   }
116
117   auto Char = C.peek();
118   if (isalpha(Char) || Char == '_')
119     return lexIdentifier(C, Token).remaining();
120   if (Char == '%')
121     return lexPercent(C, Token).remaining();
122   if (isdigit(Char) || (Char == '-' && isdigit(C.peek(1))))
123     return lexIntegerLiteral(C, Token).remaining();
124   MIToken::TokenKind Kind = symbolToken(Char);
125   if (Kind != MIToken::Error)
126     return lexSymbol(C, Kind, Token).remaining();
127   Token = MIToken(MIToken::Error, C.remaining());
128   ErrorCallback(C.location(),
129                 Twine("unexpected character '") + Twine(Char) + "'");
130   return C.remaining();
131 }