-//===-- ParserInternals.h - Definitions internal to the parser ---*- C++ -*--=//
+//===-- ParserInternals.h - Definitions internal to the parser --*- C++ -*-===//
//
-// This header file defines the various variables that are shared among the
+// The LLVM Compiler Infrastructure
+//
+// This file was developed by the LLVM research group and is distributed under
+// the University of Illinois Open Source License. See LICENSE.TXT for details.
+//
+//===----------------------------------------------------------------------===//
+//
+// This header file defines the various variables that are shared among the
// different components of the parser...
//
//===----------------------------------------------------------------------===//
#ifndef PARSER_INTERNALS_H
#define PARSER_INTERNALS_H
-#include <stdio.h>
-#define __STDC_LIMIT_MACROS
-
-#include "llvm/InstrTypes.h"
-#include "llvm/BasicBlock.h"
-#include "llvm/ConstPoolVals.h"
-#include "llvm/iOther.h"
-#include "llvm/Method.h"
+#include "llvm/Constants.h"
#include "llvm/DerivedTypes.h"
+#include "llvm/Function.h"
+#include "llvm/Instructions.h"
#include "llvm/Assembly/Parser.h"
-#include "llvm/Support/StringExtras.h"
+#include "llvm/ADT/StringExtras.h"
-class Module;
// Global variables exported from the lexer...
-extern FILE *llvmAsmin;
-extern int llvmAsmlineno;
+
+extern int llvmAsmlineno; /// FIXME: Not threading friendly
+extern llvm::ParseError* TheParseError; /// FIXME: Not threading friendly
+
+extern std::string &llvmAsmTextin;
+
+// functions exported from the lexer
+void set_scan_file(FILE * F);
+void set_scan_string (const char * str);
// Globals exported by the parser...
-extern string CurFilename;
-Module *RunVMAsmParser(const string &Filename, FILE *F);
+extern char* llvmAsmtext;
+extern int llvmAsmleng;
+
+namespace llvm {
+
+// Globals exported by the parser...
+extern std::string CurFilename; /// FIXME: Not threading friendly
+
+class Module;
+Module *RunVMAsmParser(const std::string &Filename, FILE *F);
+
+// Parse a string directly
+Module *RunVMAsmParser(const char * AsmString, Module * M);
// UnEscapeLexed - Run through the specified buffer and change \xx codes to the
// appropriate character. If AllowNull is set to false, a \00 value will cause
-// an exception to be thrown.
+// an error.
//
// If AllowNull is set to true, the return value of the function points to the
// last character of the string in memory.
// ThrowException - Wrapper around the ParseException class that automatically
// fills in file line number and column number and options info.
//
-// This also helps me because I keep typing 'throw new ParseException' instead
+// This also helps me because I keep typing 'throw new ParseException' instead
// of just 'throw ParseException'... sigh...
//
-static inline void ThrowException(const string &message,
- int LineNo = -1) {
- if (LineNo == -1) LineNo = llvmAsmlineno;
- // TODO: column number in exception
- throw ParseException(CurFilename, message, LineNo);
-}
+extern void GenerateError(const std::string &message, int LineNo = -1);
+
+/// InlineAsmDescriptor - This is a simple class that holds info about inline
+/// asm blocks, for use by ValID.
+struct InlineAsmDescriptor {
+ std::string AsmString, Constraints;
+ bool HasSideEffects;
+
+ InlineAsmDescriptor(const std::string &as, const std::string &c, bool HSE)
+ : AsmString(as), Constraints(c), HasSideEffects(HSE) {}
+};
+
// ValID - Represents a reference of a definition of some sort. This may either
-// be a numeric reference or a symbolic (%var) reference. This is just a
+// be a numeric reference or a symbolic (%var) reference. This is just a
// discriminated union.
//
-// Note that I can't implement this class in a straight forward manner with
-// constructors and stuff because it goes in a union, and GCC doesn't like
-// putting classes with ctor's in unions. :(
+// Note that I can't implement this class in a straight forward manner with
+// constructors and stuff because it goes in a union.
//
struct ValID {
- int Type; // 0 = number, 1 = name, 2 = const pool,
- // 3 = unsigned const pool, 4 = const string,
- // 5 = const fp
+ enum {
+ NumberVal, NameVal, ConstSIntVal, ConstUIntVal, ConstFPVal, ConstNullVal,
+ ConstUndefVal, ConstZeroVal, ConstantVal, InlineAsmVal
+ } Type;
+
union {
int Num; // If it's a numeric reference
char *Name; // If it's a named reference. Memory must be free'd.
int64_t ConstPool64; // Constant pool reference. This is the value
uint64_t UConstPool64;// Unsigned constant pool reference.
double ConstPoolFP; // Floating point constant pool reference
+ Constant *ConstantValue; // Fully resolved constant for ConstantVal case.
+ InlineAsmDescriptor *IAD;
};
static ValID create(int Num) {
- ValID D; D.Type = 0; D.Num = Num; return D;
+ ValID D; D.Type = NumberVal; D.Num = Num; return D;
}
static ValID create(char *Name) {
- ValID D; D.Type = 1; D.Name = Name; return D;
+ ValID D; D.Type = NameVal; D.Name = Name; return D;
}
static ValID create(int64_t Val) {
- ValID D; D.Type = 2; D.ConstPool64 = Val; return D;
+ ValID D; D.Type = ConstSIntVal; D.ConstPool64 = Val; return D;
}
static ValID create(uint64_t Val) {
- ValID D; D.Type = 3; D.UConstPool64 = Val; return D;
+ ValID D; D.Type = ConstUIntVal; D.UConstPool64 = Val; return D;
}
- static ValID create_conststr(char *Name) {
- ValID D; D.Type = 4; D.Name = Name; return D;
+ static ValID create(double Val) {
+ ValID D; D.Type = ConstFPVal; D.ConstPoolFP = Val; return D;
}
- static ValID create(double Val) {
- ValID D; D.Type = 5; D.ConstPoolFP = Val; return D;
+ static ValID createNull() {
+ ValID D; D.Type = ConstNullVal; return D;
+ }
+
+ static ValID createUndef() {
+ ValID D; D.Type = ConstUndefVal; return D;
+ }
+
+ static ValID createZeroInit() {
+ ValID D; D.Type = ConstZeroVal; return D;
+ }
+
+ static ValID create(Constant *Val) {
+ ValID D; D.Type = ConstantVal; D.ConstantValue = Val; return D;
+ }
+
+ static ValID createInlineAsm(const std::string &AsmString,
+ const std::string &Constraints,
+ bool HasSideEffects) {
+ ValID D;
+ D.Type = InlineAsmVal;
+ D.IAD = new InlineAsmDescriptor(AsmString, Constraints, HasSideEffects);
+ return D;
}
inline void destroy() const {
- if (Type == 1 || Type == 4) free(Name); // Free this strdup'd memory...
+ if (Type == NameVal)
+ free(Name); // Free this strdup'd memory.
+ else if (Type == InlineAsmVal)
+ delete IAD;
}
inline ValID copy() const {
- if (Type != 1 && Type != 4) return *this;
+ if (Type != NameVal) return *this;
ValID Result = *this;
Result.Name = strdup(Name);
return Result;
}
- inline string getName() const {
+ inline std::string getName() const {
switch (Type) {
- case 0: return string("#") + itostr(Num);
- case 1: return Name;
- case 4: return string("\"") + Name + string("\"");
- case 5: return ftostr(ConstPoolFP);
- default: return string("%") + itostr(ConstPool64);
+ case NumberVal : return std::string("#") + itostr(Num);
+ case NameVal : return Name;
+ case ConstFPVal : return ftostr(ConstPoolFP);
+ case ConstNullVal : return "null";
+ case ConstUndefVal : return "undef";
+ case ConstZeroVal : return "zeroinitializer";
+ case ConstUIntVal :
+ case ConstSIntVal : return std::string("%") + itostr(ConstPool64);
+ case ConstantVal:
+ if (ConstantValue == ConstantBool::getTrue()) return "true";
+ if (ConstantValue == ConstantBool::getFalse()) return "false";
+ return "<constant expression>";
+ default:
+ assert(0 && "Unknown value!");
+ abort();
+ return "";
}
}
-};
-
-
-
-template<class SuperType>
-class PlaceholderValue : public SuperType {
- ValID D;
- int LineNum;
-public:
- PlaceholderValue(const Type *Ty, const ValID &d) : SuperType(Ty), D(d) {
- LineNum = llvmAsmlineno;
- }
- ValID &getDef() { return D; }
- int getLineNum() const { return LineNum; }
-};
-
-struct TypePlaceHolderHelper : public OpaqueType {
- TypePlaceHolderHelper(const Type *Ty) : OpaqueType() {
- assert(Ty == Type::TypeTy);
- }
-};
-
-
-struct InstPlaceHolderHelper : public Instruction {
- InstPlaceHolderHelper(const Type *Ty) : Instruction(Ty, UserOp1, "") {}
- virtual Instruction *clone() const { abort(); }
- virtual const char *getOpcodeName() const { return "placeholder"; }
-};
-
-struct BBPlaceHolderHelper : public BasicBlock {
- BBPlaceHolderHelper(const Type *Ty) : BasicBlock() {
- assert(Ty->isLabelType());
+ bool operator<(const ValID &V) const {
+ if (Type != V.Type) return Type < V.Type;
+ switch (Type) {
+ case NumberVal: return Num < V.Num;
+ case NameVal: return strcmp(Name, V.Name) < 0;
+ case ConstSIntVal: return ConstPool64 < V.ConstPool64;
+ case ConstUIntVal: return UConstPool64 < V.UConstPool64;
+ case ConstFPVal: return ConstPoolFP < V.ConstPoolFP;
+ case ConstNullVal: return false;
+ case ConstUndefVal: return false;
+ case ConstZeroVal: return false;
+ case ConstantVal: return ConstantValue < V.ConstantValue;
+ default: assert(0 && "Unknown value type!"); return false;
+ }
}
};
-struct MethPlaceHolderHelper : public Method {
- MethPlaceHolderHelper(const Type *Ty)
- : Method((const MethodType*)Ty) {
- assert(Ty->isMethodType() && "Method placeholders must be method types!");
- }
+} // End llvm namespace
+
+// This structure is used to keep track of obsolete opcodes. The lexer will
+// retain the ability to parse obsolete opcode mnemonics. In this case it will
+// set "obsolete" to true and the opcode will be the replacement opcode. For
+// example if "rem" is encountered then opcode will be set to "urem" and the
+// "obsolete" flag will be true. If the opcode is not obsolete then "obsolete"
+// will be false.
+template <class Enum>
+struct OpcodeInfo {
+ Enum opcode;
+ bool obsolete;
};
-
-typedef PlaceholderValue<TypePlaceHolderHelper> TypePlaceHolder;
-typedef PlaceholderValue<InstPlaceHolderHelper> ValuePlaceHolder;
-typedef PlaceholderValue<BBPlaceHolderHelper> BBPlaceHolder;
-typedef PlaceholderValue<MethPlaceHolderHelper> MethPlaceHolder;
-
-static inline ValID &getValIDFromPlaceHolder(const Value *Val) {
- switch (Val->getType()->getPrimitiveID()) {
- case Type::TypeTyID: return ((TypePlaceHolder*)Val)->getDef();
- case Type::LabelTyID: return ((BBPlaceHolder*)Val)->getDef();
- case Type::MethodTyID: return ((MethPlaceHolder*)Val)->getDef();
- default: return ((ValuePlaceHolder*)Val)->getDef();
- }
-}
-
-static inline int getLineNumFromPlaceHolder(const Value *Val) {
- switch (Val->getType()->getPrimitiveID()) {
- case Type::TypeTyID: return ((TypePlaceHolder*)Val)->getLineNum();
- case Type::LabelTyID: return ((BBPlaceHolder*)Val)->getLineNum();
- case Type::MethodTyID: return ((MethPlaceHolder*)Val)->getLineNum();
- default: return ((ValuePlaceHolder*)Val)->getLineNum();
- }
-}
+typedef OpcodeInfo<llvm::Instruction::BinaryOps> BinaryOpInfo;
+typedef OpcodeInfo<llvm::Instruction::TermOps> TermOpInfo;
+typedef OpcodeInfo<llvm::Instruction::MemoryOps> MemOpInfo;
+typedef OpcodeInfo<llvm::Instruction::OtherOps> OtherOpInfo;
#endif