-//===-- EdgeCode.cpp - generate LLVM instrumentation code --------*- C++ -*--=//
+//===-- EdgeCode.cpp - generate LLVM instrumentation code -----------------===//
//It implements the class EdgeCode: which provides
//support for inserting "appropriate" instrumentation at
//designated points in the graph
//top block of cfg
//===----------------------------------------------------------------------===//
-#include "Graph.h"
-#include "llvm/ConstantVals.h"
+#include "llvm/Transforms/Instrumentation/Graph.h"
+#include "llvm/Constants.h"
#include "llvm/DerivedTypes.h"
#include "llvm/iMemory.h"
#include "llvm/iTerminators.h"
#include "llvm/iOther.h"
#include "llvm/iOperators.h"
#include "llvm/iPHINode.h"
+#include "llvm/Module.h"
+#include <string.h>
+#include <stdio.h>
+
+#define INSERT_LOAD_COUNT
+#define INSERT_STORE
-class Method;
using std::vector;
+
+static void getTriggerCode(Module *M, BasicBlock *BB, int MethNo, Value *pathNo,
+ Value *cnt, Instruction *InsertPos){
+ static int i=-1;
+ i++;
+ char gstr[100];
+ sprintf(gstr,"globalVar%d",i);
+ std::string globalVarName=gstr;
+ vector<const Type*> args;
+ //args.push_back(PointerType::get(Type::SByteTy));
+ args.push_back(Type::IntTy);
+ args.push_back(Type::IntTy);
+ args.push_back(Type::IntTy);
+ const FunctionType *MTy = FunctionType::get(Type::VoidTy, args, false);
+
+ // Function *triggerMeth = M->getOrInsertFunction("trigger", MTy);
+ Function *trigMeth = M->getOrInsertFunction("trigger", MTy);
+ assert(trigMeth && "trigger method could not be inserted!");
+ //if (Value *triggerMeth = ST->lookup(PointerType::get(MTy), "trigger")) {
+ //Function *trigMeth = cast<Function>(triggerMeth);
+ vector<Value *> trargs;
+
+ //pred_iterator piter=BB->pred_begin();
+ //std::string predName = "uu";//BB->getName();
+ //Constant *bbName=ConstantArray::get(predName);//BB->getName());
+ //GlobalVariable *gbl=new GlobalVariable(ArrayType::get(Type::SByteTy,
+ // predName.size()+1),
+ // true, true, bbName, gstr);
+
+ //M->getGlobalList().push_back(gbl);
+
+ //vector<Value *> elargs;
+ //elargs.push_back(ConstantSInt::get(Type::LongTy, 0));
+ //elargs.push_back(ConstantSInt::get(Type::LongTy, 0));
+
+ // commented out bb name frm which its called
+ //Instruction *getElmntInst=new GetElementPtrInst(gbl,elargs,"elmntInst");
+
+ //trargs.push_back(ConstantArray::get(BB->getName()));
+
+ //trargs.push_back(getElmntInst);
+ //trargs.push_back(bbName);
+
+ trargs.push_back(ConstantSInt::get(Type::IntTy,MethNo));
+
+ //trargs.push_back(ConstantSInt::get(Type::IntTy,-1));//erase this
+ trargs.push_back(pathNo);
+ trargs.push_back(cnt);
+ Instruction *callInst=new CallInst(trigMeth, trargs, "", InsertPos);
+}
+
+
//get the code to be inserted on the edge
//This is determined from cond (1-6)
void getEdgeCode::getCode(Instruction *rInst,
Instruction *countInst,
- Method *M,
- BasicBlock *BB){
+ Function *M,
+ BasicBlock *BB, int numPaths, int MethNo){
- BasicBlock::InstListType& instList=BB->getInstList();
- BasicBlock::iterator here=instList.begin();
+ Instruction *InsertPos = BB->begin();
//case: r=k code to be inserted
switch(cond){
case 1:{
Value *val=ConstantSInt::get(Type::IntTy,inc);
- Instruction *stInst=new StoreInst(val, rInst);
- here=instList.insert(here,stInst)+1;
+#ifdef INSERT_STORE
+ Instruction *stInst=new StoreInst(val, rInst, InsertPos);
+#endif
break;
}
//case: r=0 to be inserted
- case 2:{
- Value *val=ConstantSInt::get(Type::IntTy,0);
- Instruction *stInst=new StoreInst(val, rInst);
- here=instList.insert(here,stInst)+1;
+ case 2:
+#ifdef INSERT_STORE
+ new StoreInst(ConstantSInt::getNullValue(Type::IntTy), rInst, InsertPos);
+#endif
break;
- }
//r+=k
case 3:{
- Instruction *ldInst=new LoadInst(rInst, "ti1");
- Value *val=ConstantSInt::get(Type::IntTy,inc);
- Instruction *addIn=BinaryOperator::
- create(Instruction::Add, ldInst, val,"ti2");
-
- Instruction *stInst=new StoreInst(addIn, rInst);
- here=instList.insert(here,ldInst)+1;
- here=instList.insert(here,addIn)+1;
- here=instList.insert(here,stInst)+1;
+ Instruction *ldInst = new LoadInst(rInst, "ti1", InsertPos);
+ Value *val = ConstantSInt::get(Type::IntTy,inc);
+ Value *addIn = BinaryOperator::create(Instruction::Add, ldInst, val,
+ "ti2", InsertPos);
+#ifdef INSERT_STORE
+ new StoreInst(addIn, rInst, InsertPos);
+#endif
break;
}
//count[inc]++
case 4:{
- Instruction *ldInst=new
- LoadInst(countInst,vector<Value *>
- (1,ConstantUInt::get(Type::UIntTy, inc)), "ti1");
- Value *val=ConstantSInt::get(Type::IntTy,1);
- Instruction *addIn=BinaryOperator::
- create(Instruction::Add, ldInst, val,"ti2");
+ assert(inc>=0 && inc<=numPaths && "inc out of bound!");
+
+ Instruction *Idx = new GetElementPtrInst(countInst,
+ vector<Value*>(1,ConstantSInt::get(Type::LongTy, inc)),
+ "", InsertPos);
+
+ Instruction *ldInst=new LoadInst(Idx, "ti1", InsertPos);
+
+ Value *val = ConstantSInt::get(Type::IntTy, 1);
+ Instruction *addIn =
+ BinaryOperator::create(Instruction::Add, ldInst, val,"ti2", InsertPos);
+
+#ifdef INSERT_STORE
+ Instruction *stInst=new StoreInst(addIn, Idx, InsertPos);
+#endif
+
+ //insert trigger
+ getTriggerCode(M->getParent(), BB, MethNo,
+ ConstantSInt::get(Type::IntTy,inc), addIn, InsertPos);
+ //end trigger code
assert(inc>=0 && "IT MUST BE POSITIVE NOW");
- Instruction *stInst=new
- StoreInst(addIn, countInst, vector<Value *>
- (1, ConstantUInt::get(Type::UIntTy,inc)));
-
- here=instList.insert(here,ldInst)+1;
- here=instList.insert(here,addIn)+1;
- here=instList.insert(here,stInst)+1;
break;
}
//case: count[r+inc]++
case 5:{
+
//ti1=inc+r
- Instruction *ldIndex=new LoadInst(rInst, "ti1");
+ Instruction *ldIndex=new LoadInst(rInst, "ti1", InsertPos);
Value *val=ConstantSInt::get(Type::IntTy,inc);
Instruction *addIndex=BinaryOperator::
- create(Instruction::Add, ldIndex, val,"ti2");
-
+ create(Instruction::Add, ldIndex, val,"ti2", InsertPos);
+ //erase following 1 line
+ //Value *valtemp=ConstantSInt::get(Type::IntTy,999);
//now load count[addIndex]
+
Instruction *castInst=new CastInst(addIndex,
- Type::UIntTy,"ctin");
- Instruction *ldInst=new
- LoadInst(countInst, vector<Value *>(1,castInst), "ti3");
+ Type::LongTy,"ctin", InsertPos);
+ Instruction *Idx = new GetElementPtrInst(countInst,
+ vector<Value*>(1,castInst), "",
+ InsertPos);
+
+ Instruction *ldInst=new LoadInst(Idx, "ti3", InsertPos);
Value *cons=ConstantSInt::get(Type::IntTy,1);
-
//count[addIndex]++
- Instruction *addIn=BinaryOperator::
- create(Instruction::Add, ldInst, cons,"ti4");
- Instruction *stInst=new
- StoreInst(addIn, countInst,
- vector<Value *>(1,castInst));
+ Value *addIn = BinaryOperator::create(Instruction::Add, ldInst, cons,
+ "ti4", InsertPos);
- here=instList.insert(here,ldIndex)+1;
- here=instList.insert(here,addIndex)+1;
- here=instList.insert(here,castInst)+1;
- here=instList.insert(here,ldInst)+1;
- here=instList.insert(here,addIn)+1;
- here=instList.insert(here,stInst)+1;
+#ifdef INSERT_STORE
+ ///*
+ new StoreInst(addIn, Idx, InsertPos);
+ //*/
+#endif
+
+ //insert trigger
+ getTriggerCode(M->getParent(), BB, MethNo, addIndex, addIn, InsertPos);
+ //end trigger code
+
break;
}
//case: count[r]+
case 6:{
//ti1=inc+r
- Instruction *ldIndex=new LoadInst(rInst, "ti1");
-
+ Instruction *ldIndex=new LoadInst(rInst, "ti1", InsertPos);
+
//now load count[addIndex]
- Instruction *castInst2=new
- CastInst(ldIndex, Type::UIntTy,"ctin");
- Instruction *ldInst=new
- LoadInst(countInst, vector<Value *>(1,castInst2), "ti2");
+ Instruction *castInst2=new CastInst(ldIndex, Type::LongTy,"ctin",InsertPos);
+ Instruction *Idx = new GetElementPtrInst(countInst,
+ vector<Value*>(1,castInst2), "",
+ InsertPos);
+
+ Instruction *ldInst=new LoadInst(Idx, "ti2", InsertPos);
Value *cons=ConstantSInt::get(Type::IntTy,1);
//count[addIndex]++
- Instruction *addIn=BinaryOperator::
- create(Instruction::Add, ldInst, cons,"ti3");
- Instruction *stInst=new
- StoreInst(addIn, countInst, vector<Value *>(1,castInst2));
+ Instruction *addIn=BinaryOperator::create(Instruction::Add, ldInst,
+ cons,"ti3", InsertPos);
+
+#ifdef INSERT_STORE
+ new StoreInst(addIn, Idx, InsertPos);
+#endif
+ //insert trigger
+ getTriggerCode(M->getParent(), BB, MethNo, ldIndex, addIn, InsertPos);
+ //end trigger code
- here=instList.insert(here,ldIndex)+1;
- here=instList.insert(here,castInst2)+1;
- here=instList.insert(here,ldInst)+1;
- here=instList.insert(here,addIn)+1;
- here=instList.insert(here,stInst)+1;
break;
}
}
//now check for cdIn and cdOut
//first put cdOut
- if(cdOut!=NULL){
- cdOut->getCode(rInst, countInst, M, BB);
- }
if(cdIn!=NULL){
- cdIn->getCode(rInst, countInst, M, BB);
+ cdIn->getCode(rInst, countInst, M, BB, numPaths, MethNo);
+ }
+ if(cdOut!=NULL){
+ cdOut->getCode(rInst, countInst, M, BB, numPaths, MethNo);
}
-
}
Instruction *countVar){
//rVar is variable r,
//countVar is array Count, and these are allocatted outside
-
- //store uint 0, uint *%R, uint 0
- vector<Value *> idx;
- idx.push_back(ConstantUInt::get(Type::UIntTy, 0));
- Instruction *stInstr=new StoreInst(ConstantInt::get(Type::IntTy, 0), rVar,
- idx);
+ Value *Int0 = ConstantInt::get(Type::IntTy, 0);
+
//now push all instructions in front of the BB
- BasicBlock::InstListType& instList=front->getInstList();
- BasicBlock::iterator here=instList.begin();
- here=front->getInstList().insert(here, rVar)+1;
- here=front->getInstList().insert(here,countVar)+1;
+ BasicBlock::iterator here=front->begin();
+ front->getInstList().insert(here, rVar);
+ front->getInstList().insert(here,countVar);
//Initialize Count[...] with 0
- for(int i=0;i<k; i++){
- Instruction *stInstrC=new
- StoreInst(ConstantInt::get(Type::IntTy, 0),
- countVar, std::vector<Value *>
- (1,ConstantUInt::get(Type::UIntTy, i)));
- here=front->getInstList().insert(here,stInstrC)+1;
+
+ for (int i=0;i<k; i++){
+ Value *GEP2 = new GetElementPtrInst(countVar,
+ vector<Value *>(1,ConstantSInt::get(Type::LongTy, i)),
+ "", here);
+ new StoreInst(Int0, GEP2, here);
}
-
- here=front->getInstList().insert(here,stInstr)+1;
+
+ //store uint 0, uint *%R
+ new StoreInst(Int0, rVar, here);
}
void insertBB(Edge ed,
getEdgeCode *edgeCode,
Instruction *rInst,
- Instruction *countInst){
-
+ Instruction *countInst,
+ int numPaths, int Methno){
+ static int i=-1;
+ i++;
BasicBlock* BB1=ed.getFirst()->getElement();
BasicBlock* BB2=ed.getSecond()->getElement();
cerr<<BB1->getName()<<"->"<<BB2->getName()<<"\n";
cerr<<"########################\n";
#endif
+
+ char counterstr[100];
+ sprintf(counterstr,"counter%d",i);
+ std::string ctr=counterstr;
//We need to insert a BB between BB1 and BB2
TerminatorInst *TI=BB1->getTerminator();
- BasicBlock *newBB=new BasicBlock("counter", BB1->getParent());
+ BasicBlock *newBB=new BasicBlock(ctr, BB1->getParent());
- //get code for the new BB
- edgeCode->getCode(rInst, countInst, BB1->getParent(), newBB);
-
//Is terminator a branch instruction?
//then we need to change branch destinations to include new BB
- BranchInst *BI=cast<BranchInst>(TI);
-
+ //std::cerr<<"before cast!\n";
+ //std::cerr<<"Method no in Edgecode:"<<Methno<<"\n";
+ //std::cerr<<"Instruction\n";
+ //std::cerr<<*TI;
+ BranchInst *BI = cast<BranchInst>(TI);
+
if(BI->isUnconditional()){
BI->setUnconditionalDest(newBB);
Instruction *newBI2=new BranchInst(BB2);
newBB->getInstList().push_back(newBI2);
}
else{
- Value *cond=BI->getCondition();
- BasicBlock *fB, *tB;
-
- if(BI->getSuccessor(0)==BB2){
- tB=newBB;
- fB=BI->getSuccessor(1);
- }
- else{
- fB=newBB;
- tB=BI->getSuccessor(0);
- }
-
- delete BB1->getInstList().pop_back();
- Instruction *newBI=new BranchInst(tB,fB,cond);
+ if(BI->getSuccessor(0)==BB2)
+ BI->setSuccessor(0, newBB);
+
+ if(BI->getSuccessor(1)==BB2)
+ BI->setSuccessor(1, newBB);
+
Instruction *newBI2=new BranchInst(BB2);
- BB1->getInstList().push_back(newBI);
newBB->getInstList().push_back(newBI2);
}
+
+ //get code for the new BB
+ edgeCode->getCode(rInst, countInst, BB1->getParent(), newBB, numPaths, Methno);
+
- //now iterate over BB2, and set its Phi nodes right
- for(BasicBlock::iterator BB2Inst=BB2->begin(), BBend=BB2->end();
- BB2Inst!=BBend; ++BB2Inst){
+ //std::cerr<<"After casting\n";
+ //get code for the new BB
+ //now iterate over BB2, and set its Phi nodes right
+ for(BasicBlock::iterator BB2Inst = BB2->begin(), BBend = BB2->end();
+ BB2Inst != BBend; ++BB2Inst){
- if(PHINode *phiInst=dyn_cast<PHINode>(*BB2Inst)){
-#ifdef DEBUG_PATH_PROFILES
- cerr<<"YYYYYYYYYYYYYYYYY\n";
-#endif
-
+ if(PHINode *phiInst=dyn_cast<PHINode>(&*BB2Inst)){
int bbIndex=phiInst->getBasicBlockIndex(BB1);
- if(bbIndex>=0)
- phiInst->setIncomingBlock(bbIndex, newBB);
+ assert(bbIndex>=0);
+ phiInst->setIncomingBlock(bbIndex, newBB);
}
}
}
+
projects / oota-llvm.git / blobdiff