| Index: src/llvm2ice.cpp
|
| diff --git a/src/llvm2ice.cpp b/src/llvm2ice.cpp
|
| index c3a98dfed6b2d13a06f6dbeeb054d700990864ab..01d4f9b4354edad0114cd86024723adcda418fae 100644
|
| --- a/src/llvm2ice.cpp
|
| +++ b/src/llvm2ice.cpp
|
| @@ -13,25 +13,13 @@
|
| //
|
| //===----------------------------------------------------------------------===//
|
|
|
| -#include "IceCfg.h"
|
| -#include "IceCfgNode.h"
|
| +#include "IceConverter.h"
|
| #include "IceDefs.h"
|
| -#include "IceGlobalContext.h"
|
| -#include "IceInst.h"
|
| -#include "IceOperand.h"
|
| -#include "IceTargetLowering.h"
|
| #include "IceTypes.h"
|
|
|
| -#include "llvm/IR/Constant.h"
|
| -#include "llvm/IR/Constants.h"
|
| -#include "llvm/IR/DataLayout.h"
|
| -#include "llvm/IR/Instruction.h"
|
| -#include "llvm/IR/Instructions.h"
|
| #include "llvm/IR/LLVMContext.h"
|
| -#include "llvm/IR/Module.h"
|
| #include "llvm/IRReader/IRReader.h"
|
| #include "llvm/Support/CommandLine.h"
|
| -#include "llvm/Support/ErrorHandling.h"
|
| #include "llvm/Support/raw_os_ostream.h"
|
| #include "llvm/Support/SourceMgr.h"
|
|
|
| @@ -40,584 +28,6 @@
|
|
|
| using namespace llvm;
|
|
|
| -// Debugging helper
|
| -template <typename T> static std::string LLVMObjectAsString(const T *O) {
|
| - std::string Dump;
|
| - raw_string_ostream Stream(Dump);
|
| - O->print(Stream);
|
| - return Stream.str();
|
| -}
|
| -
|
| -// Converter from LLVM to ICE. The entry point is the convertFunction method.
|
| -//
|
| -// Note: this currently assumes that the given IR was verified to be valid PNaCl
|
| -// bitcode:
|
| -// https://developers.google.com/native-client/dev/reference/pnacl-bitcode-abi
|
| -// If not, all kinds of assertions may fire.
|
| -//
|
| -class LLVM2ICEConverter {
|
| -public:
|
| - LLVM2ICEConverter(Ice::GlobalContext *Ctx)
|
| - : Ctx(Ctx), Func(NULL), CurrentNode(NULL) {
|
| - // All PNaCl pointer widths are 32 bits because of the sandbox
|
| - // model.
|
| - SubzeroPointerType = Ice::IceType_i32;
|
| - }
|
| -
|
| - // Caller is expected to delete the returned Ice::Cfg object.
|
| - Ice::Cfg *convertFunction(const Function *F) {
|
| - VarMap.clear();
|
| - NodeMap.clear();
|
| - Func = new Ice::Cfg(Ctx);
|
| - Func->setFunctionName(F->getName());
|
| - Func->setReturnType(convertType(F->getReturnType()));
|
| - Func->setInternal(F->hasInternalLinkage());
|
| -
|
| - // The initial definition/use of each arg is the entry node.
|
| - CurrentNode = mapBasicBlockToNode(&F->getEntryBlock());
|
| - for (Function::const_arg_iterator ArgI = F->arg_begin(),
|
| - ArgE = F->arg_end();
|
| - ArgI != ArgE; ++ArgI) {
|
| - Func->addArg(mapValueToIceVar(ArgI));
|
| - }
|
| -
|
| - // Make an initial pass through the block list just to resolve the
|
| - // blocks in the original linearized order. Otherwise the ICE
|
| - // linearized order will be affected by branch targets in
|
| - // terminator instructions.
|
| - for (Function::const_iterator BBI = F->begin(), BBE = F->end(); BBI != BBE;
|
| - ++BBI) {
|
| - mapBasicBlockToNode(BBI);
|
| - }
|
| - for (Function::const_iterator BBI = F->begin(), BBE = F->end(); BBI != BBE;
|
| - ++BBI) {
|
| - CurrentNode = mapBasicBlockToNode(BBI);
|
| - convertBasicBlock(BBI);
|
| - }
|
| - Func->setEntryNode(mapBasicBlockToNode(&F->getEntryBlock()));
|
| - Func->computePredecessors();
|
| -
|
| - return Func;
|
| - }
|
| -
|
| - // convertConstant() does not use Func or require it to be a valid
|
| - // Ice::Cfg pointer. As such, it's suitable for e.g. constructing
|
| - // global initializers.
|
| - Ice::Constant *convertConstant(const Constant *Const) {
|
| - if (const GlobalValue *GV = dyn_cast<GlobalValue>(Const)) {
|
| - return Ctx->getConstantSym(convertType(GV->getType()), 0, GV->getName());
|
| - } else if (const ConstantInt *CI = dyn_cast<ConstantInt>(Const)) {
|
| - return Ctx->getConstantInt(convertIntegerType(CI->getType()),
|
| - CI->getZExtValue());
|
| - } else if (const ConstantFP *CFP = dyn_cast<ConstantFP>(Const)) {
|
| - Ice::Type Type = convertType(CFP->getType());
|
| - if (Type == Ice::IceType_f32)
|
| - return Ctx->getConstantFloat(CFP->getValueAPF().convertToFloat());
|
| - else if (Type == Ice::IceType_f64)
|
| - return Ctx->getConstantDouble(CFP->getValueAPF().convertToDouble());
|
| - llvm_unreachable("Unexpected floating point type");
|
| - return NULL;
|
| - } else if (const UndefValue *CU = dyn_cast<UndefValue>(Const)) {
|
| - return Ctx->getConstantUndef(convertType(CU->getType()));
|
| - } else {
|
| - llvm_unreachable("Unhandled constant type");
|
| - return NULL;
|
| - }
|
| - }
|
| -
|
| -private:
|
| - // LLVM values (instructions, etc.) are mapped directly to ICE variables.
|
| - // mapValueToIceVar has a version that forces an ICE type on the variable,
|
| - // and a version that just uses convertType on V.
|
| - Ice::Variable *mapValueToIceVar(const Value *V, Ice::Type IceTy) {
|
| - if (IceTy == Ice::IceType_void)
|
| - return NULL;
|
| - if (VarMap.find(V) == VarMap.end()) {
|
| - assert(CurrentNode);
|
| - VarMap[V] = Func->makeVariable(IceTy, CurrentNode, V->getName());
|
| - }
|
| - return VarMap[V];
|
| - }
|
| -
|
| - Ice::Variable *mapValueToIceVar(const Value *V) {
|
| - return mapValueToIceVar(V, convertType(V->getType()));
|
| - }
|
| -
|
| - Ice::CfgNode *mapBasicBlockToNode(const BasicBlock *BB) {
|
| - if (NodeMap.find(BB) == NodeMap.end()) {
|
| - NodeMap[BB] = Func->makeNode(BB->getName());
|
| - }
|
| - return NodeMap[BB];
|
| - }
|
| -
|
| - Ice::Type convertIntegerType(const IntegerType *IntTy) const {
|
| - switch (IntTy->getBitWidth()) {
|
| - case 1:
|
| - return Ice::IceType_i1;
|
| - case 8:
|
| - return Ice::IceType_i8;
|
| - case 16:
|
| - return Ice::IceType_i16;
|
| - case 32:
|
| - return Ice::IceType_i32;
|
| - case 64:
|
| - return Ice::IceType_i64;
|
| - default:
|
| - report_fatal_error(std::string("Invalid PNaCl int type: ") +
|
| - LLVMObjectAsString(IntTy));
|
| - return Ice::IceType_void;
|
| - }
|
| - }
|
| -
|
| - Ice::Type convertType(const Type *Ty) const {
|
| - switch (Ty->getTypeID()) {
|
| - case Type::VoidTyID:
|
| - return Ice::IceType_void;
|
| - case Type::IntegerTyID:
|
| - return convertIntegerType(cast<IntegerType>(Ty));
|
| - case Type::FloatTyID:
|
| - return Ice::IceType_f32;
|
| - case Type::DoubleTyID:
|
| - return Ice::IceType_f64;
|
| - case Type::PointerTyID:
|
| - return SubzeroPointerType;
|
| - case Type::FunctionTyID:
|
| - return SubzeroPointerType;
|
| - default:
|
| - report_fatal_error(std::string("Invalid PNaCl type: ") +
|
| - LLVMObjectAsString(Ty));
|
| - }
|
| -
|
| - llvm_unreachable("convertType");
|
| - return Ice::IceType_void;
|
| - }
|
| -
|
| - // Given an LLVM instruction and an operand number, produce the
|
| - // Ice::Operand this refers to. If there's no such operand, return
|
| - // NULL.
|
| - Ice::Operand *convertOperand(const Instruction *Inst, unsigned OpNum) {
|
| - if (OpNum >= Inst->getNumOperands()) {
|
| - return NULL;
|
| - }
|
| - const Value *Op = Inst->getOperand(OpNum);
|
| - return convertValue(Op);
|
| - }
|
| -
|
| - Ice::Operand *convertValue(const Value *Op) {
|
| - if (const Constant *Const = dyn_cast<Constant>(Op)) {
|
| - return convertConstant(Const);
|
| - } else {
|
| - return mapValueToIceVar(Op);
|
| - }
|
| - }
|
| -
|
| - // Note: this currently assumes a 1x1 mapping between LLVM IR and Ice
|
| - // instructions.
|
| - Ice::Inst *convertInstruction(const Instruction *Inst) {
|
| - switch (Inst->getOpcode()) {
|
| - case Instruction::PHI:
|
| - return convertPHINodeInstruction(cast<PHINode>(Inst));
|
| - case Instruction::Br:
|
| - return convertBrInstruction(cast<BranchInst>(Inst));
|
| - case Instruction::Ret:
|
| - return convertRetInstruction(cast<ReturnInst>(Inst));
|
| - case Instruction::IntToPtr:
|
| - return convertIntToPtrInstruction(cast<IntToPtrInst>(Inst));
|
| - case Instruction::PtrToInt:
|
| - return convertPtrToIntInstruction(cast<PtrToIntInst>(Inst));
|
| - case Instruction::ICmp:
|
| - return convertICmpInstruction(cast<ICmpInst>(Inst));
|
| - case Instruction::FCmp:
|
| - return convertFCmpInstruction(cast<FCmpInst>(Inst));
|
| - case Instruction::Select:
|
| - return convertSelectInstruction(cast<SelectInst>(Inst));
|
| - case Instruction::Switch:
|
| - return convertSwitchInstruction(cast<SwitchInst>(Inst));
|
| - case Instruction::Load:
|
| - return convertLoadInstruction(cast<LoadInst>(Inst));
|
| - case Instruction::Store:
|
| - return convertStoreInstruction(cast<StoreInst>(Inst));
|
| - case Instruction::ZExt:
|
| - return convertCastInstruction(cast<ZExtInst>(Inst), Ice::InstCast::Zext);
|
| - case Instruction::SExt:
|
| - return convertCastInstruction(cast<SExtInst>(Inst), Ice::InstCast::Sext);
|
| - case Instruction::Trunc:
|
| - return convertCastInstruction(cast<TruncInst>(Inst),
|
| - Ice::InstCast::Trunc);
|
| - case Instruction::FPTrunc:
|
| - return convertCastInstruction(cast<FPTruncInst>(Inst),
|
| - Ice::InstCast::Fptrunc);
|
| - case Instruction::FPExt:
|
| - return convertCastInstruction(cast<FPExtInst>(Inst),
|
| - Ice::InstCast::Fpext);
|
| - case Instruction::FPToSI:
|
| - return convertCastInstruction(cast<FPToSIInst>(Inst),
|
| - Ice::InstCast::Fptosi);
|
| - case Instruction::FPToUI:
|
| - return convertCastInstruction(cast<FPToUIInst>(Inst),
|
| - Ice::InstCast::Fptoui);
|
| - case Instruction::SIToFP:
|
| - return convertCastInstruction(cast<SIToFPInst>(Inst),
|
| - Ice::InstCast::Sitofp);
|
| - case Instruction::UIToFP:
|
| - return convertCastInstruction(cast<UIToFPInst>(Inst),
|
| - Ice::InstCast::Uitofp);
|
| - case Instruction::BitCast:
|
| - return convertCastInstruction(cast<BitCastInst>(Inst),
|
| - Ice::InstCast::Bitcast);
|
| - case Instruction::Add:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Add);
|
| - case Instruction::Sub:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Sub);
|
| - case Instruction::Mul:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Mul);
|
| - case Instruction::UDiv:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Udiv);
|
| - case Instruction::SDiv:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Sdiv);
|
| - case Instruction::URem:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Urem);
|
| - case Instruction::SRem:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Srem);
|
| - case Instruction::Shl:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Shl);
|
| - case Instruction::LShr:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Lshr);
|
| - case Instruction::AShr:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Ashr);
|
| - case Instruction::FAdd:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Fadd);
|
| - case Instruction::FSub:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Fsub);
|
| - case Instruction::FMul:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Fmul);
|
| - case Instruction::FDiv:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Fdiv);
|
| - case Instruction::FRem:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Frem);
|
| - case Instruction::And:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::And);
|
| - case Instruction::Or:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Or);
|
| - case Instruction::Xor:
|
| - return convertArithInstruction(Inst, Ice::InstArithmetic::Xor);
|
| - case Instruction::Call:
|
| - return convertCallInstruction(cast<CallInst>(Inst));
|
| - case Instruction::Alloca:
|
| - return convertAllocaInstruction(cast<AllocaInst>(Inst));
|
| - case Instruction::Unreachable:
|
| - return convertUnreachableInstruction(cast<UnreachableInst>(Inst));
|
| - default:
|
| - report_fatal_error(std::string("Invalid PNaCl instruction: ") +
|
| - LLVMObjectAsString(Inst));
|
| - }
|
| -
|
| - llvm_unreachable("convertInstruction");
|
| - return NULL;
|
| - }
|
| -
|
| - Ice::Inst *convertLoadInstruction(const LoadInst *Inst) {
|
| - Ice::Operand *Src = convertOperand(Inst, 0);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| - return Ice::InstLoad::create(Func, Dest, Src);
|
| - }
|
| -
|
| - Ice::Inst *convertStoreInstruction(const StoreInst *Inst) {
|
| - Ice::Operand *Addr = convertOperand(Inst, 1);
|
| - Ice::Operand *Val = convertOperand(Inst, 0);
|
| - return Ice::InstStore::create(Func, Val, Addr);
|
| - }
|
| -
|
| - Ice::Inst *convertArithInstruction(const Instruction *Inst,
|
| - Ice::InstArithmetic::OpKind Opcode) {
|
| - const BinaryOperator *BinOp = cast<BinaryOperator>(Inst);
|
| - Ice::Operand *Src0 = convertOperand(Inst, 0);
|
| - Ice::Operand *Src1 = convertOperand(Inst, 1);
|
| - Ice::Variable *Dest = mapValueToIceVar(BinOp);
|
| - return Ice::InstArithmetic::create(Func, Opcode, Dest, Src0, Src1);
|
| - }
|
| -
|
| - Ice::Inst *convertPHINodeInstruction(const PHINode *Inst) {
|
| - unsigned NumValues = Inst->getNumIncomingValues();
|
| - Ice::InstPhi *IcePhi =
|
| - Ice::InstPhi::create(Func, NumValues, mapValueToIceVar(Inst));
|
| - for (unsigned N = 0, E = NumValues; N != E; ++N) {
|
| - IcePhi->addArgument(convertOperand(Inst, N),
|
| - mapBasicBlockToNode(Inst->getIncomingBlock(N)));
|
| - }
|
| - return IcePhi;
|
| - }
|
| -
|
| - Ice::Inst *convertBrInstruction(const BranchInst *Inst) {
|
| - if (Inst->isConditional()) {
|
| - Ice::Operand *Src = convertOperand(Inst, 0);
|
| - BasicBlock *BBThen = Inst->getSuccessor(0);
|
| - BasicBlock *BBElse = Inst->getSuccessor(1);
|
| - Ice::CfgNode *NodeThen = mapBasicBlockToNode(BBThen);
|
| - Ice::CfgNode *NodeElse = mapBasicBlockToNode(BBElse);
|
| - return Ice::InstBr::create(Func, Src, NodeThen, NodeElse);
|
| - } else {
|
| - BasicBlock *BBSucc = Inst->getSuccessor(0);
|
| - return Ice::InstBr::create(Func, mapBasicBlockToNode(BBSucc));
|
| - }
|
| - }
|
| -
|
| - Ice::Inst *convertIntToPtrInstruction(const IntToPtrInst *Inst) {
|
| - Ice::Operand *Src = convertOperand(Inst, 0);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst, SubzeroPointerType);
|
| - return Ice::InstAssign::create(Func, Dest, Src);
|
| - }
|
| -
|
| - Ice::Inst *convertPtrToIntInstruction(const PtrToIntInst *Inst) {
|
| - Ice::Operand *Src = convertOperand(Inst, 0);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| - return Ice::InstAssign::create(Func, Dest, Src);
|
| - }
|
| -
|
| - Ice::Inst *convertRetInstruction(const ReturnInst *Inst) {
|
| - Ice::Operand *RetOperand = convertOperand(Inst, 0);
|
| - if (RetOperand) {
|
| - return Ice::InstRet::create(Func, RetOperand);
|
| - } else {
|
| - return Ice::InstRet::create(Func);
|
| - }
|
| - }
|
| -
|
| - Ice::Inst *convertCastInstruction(const Instruction *Inst,
|
| - Ice::InstCast::OpKind CastKind) {
|
| - Ice::Operand *Src = convertOperand(Inst, 0);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| - return Ice::InstCast::create(Func, CastKind, Dest, Src);
|
| - }
|
| -
|
| - Ice::Inst *convertICmpInstruction(const ICmpInst *Inst) {
|
| - Ice::Operand *Src0 = convertOperand(Inst, 0);
|
| - Ice::Operand *Src1 = convertOperand(Inst, 1);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| -
|
| - Ice::InstIcmp::ICond Cond;
|
| - switch (Inst->getPredicate()) {
|
| - default:
|
| - llvm_unreachable("ICmpInst predicate");
|
| - case CmpInst::ICMP_EQ:
|
| - Cond = Ice::InstIcmp::Eq;
|
| - break;
|
| - case CmpInst::ICMP_NE:
|
| - Cond = Ice::InstIcmp::Ne;
|
| - break;
|
| - case CmpInst::ICMP_UGT:
|
| - Cond = Ice::InstIcmp::Ugt;
|
| - break;
|
| - case CmpInst::ICMP_UGE:
|
| - Cond = Ice::InstIcmp::Uge;
|
| - break;
|
| - case CmpInst::ICMP_ULT:
|
| - Cond = Ice::InstIcmp::Ult;
|
| - break;
|
| - case CmpInst::ICMP_ULE:
|
| - Cond = Ice::InstIcmp::Ule;
|
| - break;
|
| - case CmpInst::ICMP_SGT:
|
| - Cond = Ice::InstIcmp::Sgt;
|
| - break;
|
| - case CmpInst::ICMP_SGE:
|
| - Cond = Ice::InstIcmp::Sge;
|
| - break;
|
| - case CmpInst::ICMP_SLT:
|
| - Cond = Ice::InstIcmp::Slt;
|
| - break;
|
| - case CmpInst::ICMP_SLE:
|
| - Cond = Ice::InstIcmp::Sle;
|
| - break;
|
| - }
|
| -
|
| - return Ice::InstIcmp::create(Func, Cond, Dest, Src0, Src1);
|
| - }
|
| -
|
| - Ice::Inst *convertFCmpInstruction(const FCmpInst *Inst) {
|
| - Ice::Operand *Src0 = convertOperand(Inst, 0);
|
| - Ice::Operand *Src1 = convertOperand(Inst, 1);
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| -
|
| - Ice::InstFcmp::FCond Cond;
|
| - switch (Inst->getPredicate()) {
|
| -
|
| - default:
|
| - llvm_unreachable("FCmpInst predicate");
|
| -
|
| - case CmpInst::FCMP_FALSE:
|
| - Cond = Ice::InstFcmp::False;
|
| - break;
|
| - case CmpInst::FCMP_OEQ:
|
| - Cond = Ice::InstFcmp::Oeq;
|
| - break;
|
| - case CmpInst::FCMP_OGT:
|
| - Cond = Ice::InstFcmp::Ogt;
|
| - break;
|
| - case CmpInst::FCMP_OGE:
|
| - Cond = Ice::InstFcmp::Oge;
|
| - break;
|
| - case CmpInst::FCMP_OLT:
|
| - Cond = Ice::InstFcmp::Olt;
|
| - break;
|
| - case CmpInst::FCMP_OLE:
|
| - Cond = Ice::InstFcmp::Ole;
|
| - break;
|
| - case CmpInst::FCMP_ONE:
|
| - Cond = Ice::InstFcmp::One;
|
| - break;
|
| - case CmpInst::FCMP_ORD:
|
| - Cond = Ice::InstFcmp::Ord;
|
| - break;
|
| - case CmpInst::FCMP_UEQ:
|
| - Cond = Ice::InstFcmp::Ueq;
|
| - break;
|
| - case CmpInst::FCMP_UGT:
|
| - Cond = Ice::InstFcmp::Ugt;
|
| - break;
|
| - case CmpInst::FCMP_UGE:
|
| - Cond = Ice::InstFcmp::Uge;
|
| - break;
|
| - case CmpInst::FCMP_ULT:
|
| - Cond = Ice::InstFcmp::Ult;
|
| - break;
|
| - case CmpInst::FCMP_ULE:
|
| - Cond = Ice::InstFcmp::Ule;
|
| - break;
|
| - case CmpInst::FCMP_UNE:
|
| - Cond = Ice::InstFcmp::Une;
|
| - break;
|
| - case CmpInst::FCMP_UNO:
|
| - Cond = Ice::InstFcmp::Uno;
|
| - break;
|
| - case CmpInst::FCMP_TRUE:
|
| - Cond = Ice::InstFcmp::True;
|
| - break;
|
| - }
|
| -
|
| - return Ice::InstFcmp::create(Func, Cond, Dest, Src0, Src1);
|
| - }
|
| -
|
| - Ice::Inst *convertSelectInstruction(const SelectInst *Inst) {
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| - Ice::Operand *Cond = convertValue(Inst->getCondition());
|
| - Ice::Operand *Source1 = convertValue(Inst->getTrueValue());
|
| - Ice::Operand *Source2 = convertValue(Inst->getFalseValue());
|
| - return Ice::InstSelect::create(Func, Dest, Cond, Source1, Source2);
|
| - }
|
| -
|
| - Ice::Inst *convertSwitchInstruction(const SwitchInst *Inst) {
|
| - Ice::Operand *Source = convertValue(Inst->getCondition());
|
| - Ice::CfgNode *LabelDefault = mapBasicBlockToNode(Inst->getDefaultDest());
|
| - unsigned NumCases = Inst->getNumCases();
|
| - Ice::InstSwitch *Switch =
|
| - Ice::InstSwitch::create(Func, NumCases, Source, LabelDefault);
|
| - unsigned CurrentCase = 0;
|
| - for (SwitchInst::ConstCaseIt I = Inst->case_begin(), E = Inst->case_end();
|
| - I != E; ++I, ++CurrentCase) {
|
| - uint64_t CaseValue = I.getCaseValue()->getZExtValue();
|
| - Ice::CfgNode *CaseSuccessor = mapBasicBlockToNode(I.getCaseSuccessor());
|
| - Switch->addBranch(CurrentCase, CaseValue, CaseSuccessor);
|
| - }
|
| - return Switch;
|
| - }
|
| -
|
| - Ice::Inst *convertCallInstruction(const CallInst *Inst) {
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst);
|
| - Ice::Operand *CallTarget = convertValue(Inst->getCalledValue());
|
| - unsigned NumArgs = Inst->getNumArgOperands();
|
| - // Note: Subzero doesn't (yet) do anything special with the Tail
|
| - // flag in the bitcode, i.e. CallInst::isTailCall().
|
| - Ice::InstCall *NewInst = NULL;
|
| - const Ice::Intrinsics::FullIntrinsicInfo *Info = NULL;
|
| -
|
| - if (Ice::ConstantRelocatable *Target =
|
| - llvm::dyn_cast<Ice::ConstantRelocatable>(CallTarget)) {
|
| - // Check if this direct call is to an Intrinsic (starts with "llvm.")
|
| - static const char LLVMPrefix[] = "llvm.";
|
| - const size_t LLVMPrefixLen = strlen(LLVMPrefix);
|
| - Ice::IceString Name = Target->getName();
|
| - if (Name.substr(0, LLVMPrefixLen) == LLVMPrefix) {
|
| - Ice::IceString NameSuffix = Name.substr(LLVMPrefixLen);
|
| - Info = Ctx->getIntrinsicsInfo().find(NameSuffix);
|
| - if (!Info) {
|
| - report_fatal_error(std::string("Invalid PNaCl intrinsic call: ") +
|
| - LLVMObjectAsString(Inst));
|
| - }
|
| - NewInst = Ice::InstIntrinsicCall::create(Func, NumArgs, Dest,
|
| - CallTarget, Info->Info);
|
| - }
|
| - }
|
| -
|
| - // Not an intrinsic call.
|
| - if (NewInst == NULL) {
|
| - NewInst = Ice::InstCall::create(Func, NumArgs, Dest, CallTarget);
|
| - }
|
| - for (unsigned i = 0; i < NumArgs; ++i) {
|
| - NewInst->addArg(convertOperand(Inst, i));
|
| - }
|
| - if (Info) {
|
| - validateIntrinsicCall(NewInst, Info);
|
| - }
|
| - return NewInst;
|
| - }
|
| -
|
| - Ice::Inst *convertAllocaInstruction(const AllocaInst *Inst) {
|
| - // PNaCl bitcode only contains allocas of byte-granular objects.
|
| - Ice::Operand *ByteCount = convertValue(Inst->getArraySize());
|
| - uint32_t Align = Inst->getAlignment();
|
| - Ice::Variable *Dest = mapValueToIceVar(Inst, SubzeroPointerType);
|
| -
|
| - return Ice::InstAlloca::create(Func, ByteCount, Align, Dest);
|
| - }
|
| -
|
| - Ice::Inst *convertUnreachableInstruction(const UnreachableInst * /*Inst*/) {
|
| - return Ice::InstUnreachable::create(Func);
|
| - }
|
| -
|
| - Ice::CfgNode *convertBasicBlock(const BasicBlock *BB) {
|
| - Ice::CfgNode *Node = mapBasicBlockToNode(BB);
|
| - for (BasicBlock::const_iterator II = BB->begin(), II_e = BB->end();
|
| - II != II_e; ++II) {
|
| - Ice::Inst *Inst = convertInstruction(II);
|
| - Node->appendInst(Inst);
|
| - }
|
| - return Node;
|
| - }
|
| -
|
| - void validateIntrinsicCall(const Ice::InstCall *Call,
|
| - const Ice::Intrinsics::FullIntrinsicInfo *I) {
|
| - assert(I->NumTypes >= 1);
|
| - if (I->Signature[0] == Ice::IceType_void) {
|
| - if (Call->getDest() != NULL) {
|
| - report_fatal_error(
|
| - "Return value for intrinsic func w/ void return type.");
|
| - }
|
| - } else {
|
| - if (I->Signature[0] != Call->getDest()->getType()) {
|
| - report_fatal_error("Mismatched return types.");
|
| - }
|
| - }
|
| - if (Call->getNumArgs() + 1 != I->NumTypes) {
|
| - report_fatal_error("Mismatched # of args.");
|
| - }
|
| - for (size_t i = 1; i < I->NumTypes; ++i) {
|
| - if (Call->getArg(i - 1)->getType() != I->Signature[i]) {
|
| - report_fatal_error("Mismatched argument type.");
|
| - }
|
| - }
|
| - }
|
| -
|
| -private:
|
| - // Data
|
| - Ice::GlobalContext *Ctx;
|
| - Ice::Cfg *Func;
|
| - Ice::CfgNode *CurrentNode;
|
| - Ice::Type SubzeroPointerType;
|
| - std::map<const Value *, Ice::Variable *> VarMap;
|
| - std::map<const BasicBlock *, Ice::CfgNode *> NodeMap;
|
| -};
|
| -
|
| static cl::list<Ice::VerboseItem> VerboseList(
|
| "verbose", cl::CommaSeparated,
|
| cl::desc("Verbose options (can be comma-separated):"),
|
| @@ -684,30 +94,14 @@ static cl::opt<NaClFileFormat> InputFileFormat(
|
| clEnumValEnd),
|
| cl::init(LLVMFormat));
|
|
|
| +static cl::opt<bool> BuildOnRead(
|
| + "build-on-read", cl::desc("Build ICE instructions when reading bitcode"),
|
| + cl::init(false));
|
| +
|
| int main(int argc, char **argv) {
|
| - int ExitStatus = 0;
|
|
|
| cl::ParseCommandLineOptions(argc, argv);
|
|
|
| - // Parse the input LLVM IR file into a module.
|
| - SMDiagnostic Err;
|
| - Module *Mod;
|
| -
|
| - {
|
| - Ice::Timer T;
|
| - Mod = NaClParseIRFile(IRFilename, InputFileFormat, Err, getGlobalContext());
|
| -
|
| - if (SubzeroTimingEnabled) {
|
| - std::cerr << "[Subzero timing] IR Parsing: " << T.getElapsedSec()
|
| - << " sec\n";
|
| - }
|
| - }
|
| -
|
| - if (!Mod) {
|
| - Err.print(argv[0], errs());
|
| - return 1;
|
| - }
|
| -
|
| Ice::VerboseMask VMask = Ice::IceV_None;
|
| for (unsigned i = 0; i != VerboseList.size(); ++i)
|
| VMask |= VerboseList[i];
|
| @@ -726,60 +120,30 @@ int main(int argc, char **argv) {
|
| raw_os_ostream *Ls = new raw_os_ostream(LogFilename == "-" ? std::cout : Lfs);
|
| Ls->SetUnbuffered();
|
|
|
| - // Ideally, Func would be declared inside the loop and its object
|
| - // would be automatically deleted at the end of the loop iteration.
|
| - // However, emitting the constant pool requires a valid Cfg object,
|
| - // so we need to defer deleting the last non-empty Cfg object until
|
| - // outside the loop and after emitting the constant pool. TODO:
|
| - // Since all constants are globally pooled in the Ice::GlobalContext
|
| - // object, change all Ice::Constant related functions to use
|
| - // GlobalContext instead of Cfg, and then clean up this loop.
|
| - OwningPtr<Ice::Cfg> Func;
|
| Ice::GlobalContext Ctx(Ls, Os, VMask, TargetArch, OptLevel, TestPrefix);
|
|
|
| - for (Module::const_iterator I = Mod->begin(), E = Mod->end(); I != E; ++I) {
|
| - if (I->empty())
|
| - continue;
|
| - LLVM2ICEConverter FunctionConverter(&Ctx);
|
| -
|
| - Ice::Timer TConvert;
|
| - Func.reset(FunctionConverter.convertFunction(I));
|
| - if (DisableInternal)
|
| - Func->setInternal(false);
|
| + if (BuildOnRead) {
|
| + std::cerr << "Direct build from bitcode not implemented yet!\n";
|
| + return 1;
|
| + } else {
|
| + // Parse the input LLVM IR file into a module.
|
| + SMDiagnostic Err;
|
| + Ice::Timer T;
|
| + Module *Mod = NaClParseIRFile(IRFilename, InputFileFormat, Err,
|
| + getGlobalContext());
|
|
|
| if (SubzeroTimingEnabled) {
|
| - std::cerr << "[Subzero timing] Convert function "
|
| - << Func->getFunctionName() << ": " << TConvert.getElapsedSec()
|
| + std::cerr << "[Subzero timing] IR Parsing: " << T.getElapsedSec()
|
| << " sec\n";
|
| }
|
|
|
| - if (DisableTranslation) {
|
| - Func->dump();
|
| - } else {
|
| - Ice::Timer TTranslate;
|
| - Func->translate();
|
| - if (SubzeroTimingEnabled) {
|
| - std::cerr << "[Subzero timing] Translate function "
|
| - << Func->getFunctionName() << ": "
|
| - << TTranslate.getElapsedSec() << " sec\n";
|
| - }
|
| - if (Func->hasError()) {
|
| - errs() << "ICE translation error: " << Func->getError() << "\n";
|
| - ExitStatus = 1;
|
| - }
|
| -
|
| - Ice::Timer TEmit;
|
| - Func->emit();
|
| - if (SubzeroTimingEnabled) {
|
| - std::cerr << "[Subzero timing] Emit function "
|
| - << Func->getFunctionName() << ": " << TEmit.getElapsedSec()
|
| - << " sec\n";
|
| - }
|
| + if (!Mod) {
|
| + Err.print(argv[0], errs());
|
| + return 1;
|
| }
|
| - }
|
| -
|
| - if (!DisableTranslation && Func)
|
| - Func->getTarget()->emitConstants();
|
|
|
| - return ExitStatus;
|
| + Ice::Converter Converter(&Ctx, DisableInternal, SubzeroTimingEnabled,
|
| + DisableTranslation);
|
| + return Converter.convertToIce(Mod);
|
| + }
|
| }
|
|
|