#include "llvm/InstrTypes.h"
#include "llvm/BasicBlock.h"
-#include "llvm/ConstPoolVals.h"
+#include "llvm/ConstantVals.h"
#include "llvm/iOther.h"
-#include "llvm/Method.h"
-#include "llvm/Type.h"
+#include "llvm/Function.h"
+#include "llvm/DerivedTypes.h"
#include "llvm/Assembly/Parser.h"
-#include "llvm/Tools/CommandLine.h"
-#include "llvm/Tools/StringExtras.h"
+#include "Support/StringExtras.h"
class Module;
// Global variables exported from the lexer...
-extern FILE *llvmAsmin;
+extern std::FILE *llvmAsmin;
extern int llvmAsmlineno;
// Globals exported by the parser...
-extern const ToolCommandLine *CurOptions;
-Module *RunVMAsmParser(const ToolCommandLine &Opts, FILE *F);
+extern std::string CurFilename;
+Module *RunVMAsmParser(const std::string &Filename, FILE *F);
+
+
+// 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.
+//
+// If AllowNull is set to true, the return value of the function points to the
+// last character of the string in memory.
+//
+char *UnEscapeLexed(char *Buffer, bool AllowNull = false);
// ThrowException - Wrapper around the ParseException class that automatically
// This also helps me because I keep typing 'throw new ParseException' instead
// of just 'throw ParseException'... sigh...
//
-static inline void ThrowException(const string &message) {
+static inline void ThrowException(const std::string &message,
+ int LineNo = -1) {
+ if (LineNo == -1) LineNo = llvmAsmlineno;
// TODO: column number in exception
- throw ParseException(*CurOptions, message, llvmAsmlineno);
+ throw ParseException(CurFilename, message, LineNo);
}
// ValID - Represents a reference of a definition of some sort. This may either
// putting classes with ctor's in unions. :(
//
struct ValID {
- int Type; // 0 = number, 1 = name, 2 = const pool,
- // 3 = unsigned const pool, 4 = const string
+ enum {
+ NumberVal, NameVal, ConstSIntVal, ConstUIntVal, ConstStringVal,
+ ConstFPVal, ConstNullVal
+ } 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
};
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;
+ ValID D; D.Type = ConstStringVal; D.Name = Name; return D;
}
- inline void destroy() {
- if (Type == 1 || Type == 4) free(Name); // Free this strdup'd memory...
+ static ValID create(double Val) {
+ ValID D; D.Type = ConstFPVal; D.ConstPoolFP = Val; return D;
+ }
+
+ static ValID createNull() {
+ ValID D; D.Type = ConstNullVal; return D;
+ }
+
+ inline void destroy() const {
+ if (Type == NameVal || Type == ConstStringVal)
+ free(Name); // Free this strdup'd memory...
}
inline ValID copy() const {
- if (Type != 1 && Type != 4) return *this;
+ if (Type != NameVal && Type != ConstStringVal) 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("\"");
- default: return string("%") + itostr(ConstPool64);
+ case NumberVal : return std::string("#") + itostr(Num);
+ case NameVal : return Name;
+ case ConstStringVal: return std::string("\"") + Name + std::string("\"");
+ case ConstFPVal : return ftostr(ConstPoolFP);
+ case ConstNullVal : return "null";
+ case ConstUIntVal :
+ case ConstSIntVal : return std::string("%") + itostr(ConstPool64);
+ default:
+ assert(0 && "Unknown value!");
+ abort();
+ return "";
+ }
+ }
+
+ bool operator<(const ValID &V) const {
+ if (Type != V.Type) return Type < V.Type;
+ switch (Type) {
+ case NumberVal: return Num < V.Num;
+ case ConstStringVal:
+ 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;
+ default: assert(0 && "Unknown value type!"); return false;
}
}
};
template<class SuperType>
-class PlaceholderDef : public SuperType {
+class PlaceholderValue : public SuperType {
ValID D;
- // TODO: Placeholder def should hold Line #/Column # of definition in case
- // there is an error resolving the defintition!
+ int LineNum;
public:
- PlaceholderDef(const Type *Ty, const ValID &d) : SuperType(Ty), D(d) {}
+ PlaceholderValue(const Type *Ty, const ValID &d) : SuperType(Ty), D(d) {
+ LineNum = llvmAsmlineno;
+ }
ValID &getDef() { return D; }
+ int getLineNum() const { return LineNum; }
};
struct InstPlaceHolderHelper : public Instruction {
InstPlaceHolderHelper(const Type *Ty) : Instruction(Ty, UserOp1, "") {}
- virtual Instruction *clone() const { abort(); }
- virtual string getOpcode() const { return "placeholder"; }
+ virtual Instruction *clone() const { abort(); return 0; }
+ virtual const char *getOpcodeName() const { return "placeholder"; }
};
struct BBPlaceHolderHelper : public BasicBlock {
BBPlaceHolderHelper(const Type *Ty) : BasicBlock() {
- assert(Ty->isLabelType());
+ assert(Ty == Type::LabelTy);
}
};
-struct MethPlaceHolderHelper : public Method {
- MethPlaceHolderHelper(const Type *Ty)
- : Method((const MethodType*)Ty) {
- assert(Ty->isMethodType() && "Method placeholders must be method types!");
- }
+struct MethPlaceHolderHelper : public Function {
+ MethPlaceHolderHelper(const Type *Ty)
+ : Function(cast<FunctionType>(Ty), true) {}
};
-typedef PlaceholderDef<InstPlaceHolderHelper> DefPlaceHolder;
-typedef PlaceholderDef<BBPlaceHolderHelper> BBPlaceHolder;
-typedef PlaceholderDef<MethPlaceHolderHelper> MethPlaceHolder;
-//typedef PlaceholderDef<ModulePlaceHolderHelper> ModulePlaceHolder;
-
-static inline ValID &getValIDFromPlaceHolder(Value *Def) {
- switch (Def->getType()->getPrimitiveID()) {
- case Type::LabelTyID: return ((BBPlaceHolder*)Def)->getDef();
- case Type::MethodTyID: return ((MethPlaceHolder*)Def)->getDef();
-//case Type::ModuleTyID: return ((ModulePlaceHolder*)Def)->getDef();
- default: return ((DefPlaceHolder*)Def)->getDef();
+typedef PlaceholderValue<InstPlaceHolderHelper> ValuePlaceHolder;
+typedef PlaceholderValue<BBPlaceHolderHelper> BBPlaceHolder;
+
+static inline ValID &getValIDFromPlaceHolder(const Value *Val) {
+ const Type *Ty = Val->getType();
+ if (isa<PointerType>(Ty) &&
+ isa<FunctionType>(cast<PointerType>(Ty)->getElementType()))
+ Ty = cast<PointerType>(Ty)->getElementType();
+
+ switch (Ty->getPrimitiveID()) {
+ case Type::LabelTyID: return ((BBPlaceHolder*)Val)->getDef();
+ default: return ((ValuePlaceHolder*)Val)->getDef();
+ }
+}
+
+static inline int getLineNumFromPlaceHolder(const Value *Val) {
+ const Type *Ty = Val->getType();
+ if (isa<PointerType>(Ty) &&
+ isa<FunctionType>(cast<PointerType>(Ty)->getElementType()))
+ Ty = cast<PointerType>(Ty)->getElementType();
+
+ switch (Ty->getPrimitiveID()) {
+ case Type::LabelTyID: return ((BBPlaceHolder*)Val)->getLineNum();
+ default: return ((ValuePlaceHolder*)Val)->getLineNum();
}
}
projects / oota-llvm.git / blobdiff