6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-06-25 00:24:26 +00:00
Code Issues Projects Releases Wiki Activity

Factor out the code to print a value to ONE place.

Browse Source 
It turns out that unnamed values DO NOT work at all, that's next on the list.


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@2568 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner
2002-05-09 03:06:06 +00:00
parent 16c7bb2c8f
commit b5af06a0ec
2 changed files with 204 additions and 376 deletions
Download Patch File Download Diff File Expand all files Collapse all files

280
lib/Target/CBackend/CBackend.cpp
View File

@ -412,7 +412,7 @@ static string calcTypeNameVar(const Type *Ty,
// potentially named portion and the variable associated with the type. // potentially named portion and the variable associated with the type.
static ostream &printTypeVarInt(ostream &Out, const Type *Ty, static ostream &printTypeVarInt(ostream &Out, const Type *Ty,
map<const Type *, string> &TypeNames, map<const Type *, string> &TypeNames,
string VariableName) { const string &VariableName) {
// Primitive types always print out their description, regardless of whether // Primitive types always print out their description, regardless of whether
// they have been named or not. // they have been named or not.
@ -508,12 +508,18 @@ namespace {
inline void write(const Module *M) { printModule(M); } inline void write(const Module *M) { printModule(M); }
ostream& printTypeVar(const Type *Ty, string VariableName, ostream &Out); ostream& printTypeVar(const Type *Ty, const string &VariableName) {
ostream& printType(const Type *Ty, ostream &Out); return printTypeVarInt(Out, Ty, TypeNames, VariableName);
void writeOperand(const Value *Operand, bool PrintType,ostream &Out, }
bool PrintName = true);
ostream& printType(const Type *Ty, ostream &Out);
void writeOperand(const Value *Operand, ostream &Out,bool PrintName = true);
string getValueName(const Value *V);
private : private :
void printModule(const Module *M); void printModule(const Module *M);
void printSymbolTable(const SymbolTable &ST); void printSymbolTable(const SymbolTable &ST);
void printConstant(const Constant *CPV); void printConstant(const Constant *CPV);
@ -531,43 +537,46 @@ namespace {
/* CLASS InstLocalVarsVisitor */ /* CLASS InstLocalVarsVisitor */
class InstLocalVarsVisitor : public InstVisitor<InstLocalVarsVisitor> { class InstLocalVarsVisitor : public InstVisitor<InstLocalVarsVisitor> {
SlotCalculator& Table; CWriter& CW;
void handleTerminator(TerminatorInst *tI, int indx); void handleTerminator(TerminatorInst *tI, int indx);
public: public:
CLocalVars CLV; CLocalVars CLV;
InstLocalVarsVisitor(SlotCalculator& table) : Table(table) {} InstLocalVarsVisitor(CWriter &cw) : CW(cw) {}
void visitInstruction(Instruction *I) { void visitInstruction(Instruction *I) {
string tempostr; if (I->getType() != Type::VoidTy) {
if (I && I->hasName() && !isa<PHINode>(I)) { string tempostr = CW.getValueName(I);
tempostr = "llvm__" + makeNameProper(I->getName()) + "_" +
itostr((int)I->getType()->getUniqueID());
CLV.addLocalVar(I->getType(), tempostr);
} else if (I) {
int Slot = Table.getValSlot(I);
//if (Slot < 0) then it is a instruction with no
// value (like return void )
if ((Slot >= 0) && !isa<PHINode>(I)) {
tempostr = "llvm__tmp_";
tempostr += itostr(Slot) + "_" +
itostr((int)I->getType()->getUniqueID());
CLV.addLocalVar(I->getType(), tempostr); CLV.addLocalVar(I->getType(), tempostr);
} }
} }
}
void visitBranchInst(BranchInst *I) { void visitBranchInst(BranchInst *I) {
handleTerminator(I, 0); handleTerminator(I, 0);
if (I->isConditional()) if (I->isConditional())
handleTerminator(I, 1); handleTerminator(I, 1);
} }
}; };
}
void InstLocalVarsVisitor::handleTerminator(TerminatorInst *tI,int indx) {
BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<PHINode>(*insIt)) {
// Its a phinode!
// Calculate the incoming index for this
assert(pI->getBasicBlockIndex(tI->getParent()) != -1);
CLV.addLocalVar(pI->getType(), CW.getValueName(pI));
} else
break;
insIt++;
}
}
namespace {
/* CLASS CInstPrintVisitor */ /* CLASS CInstPrintVisitor */
class CInstPrintVisitor: public InstVisitor<CInstPrintVisitor> { class CInstPrintVisitor: public InstVisitor<CInstPrintVisitor> {
@ -602,77 +611,25 @@ namespace {
void visitPHINode(PHINode *I); void visitPHINode(PHINode *I);
void visitUnaryOperator (UnaryOperator *I); void visitUnaryOperator (UnaryOperator *I);
void visitBinaryOperator(BinaryOperator *I); void visitBinaryOperator(BinaryOperator *I);
}; };
} }
void InstLocalVarsVisitor::handleTerminator(TerminatorInst *tI,int indx) {
BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<const PHINode>(*insIt)) {
//Its a phinode!
//Calculate the incoming index for this
int incindex = pI->getBasicBlockIndex(tI->getParent());
if (incindex != -1)
if (pI && pI->hasName()) {
string tempostr;
tempostr = "llvm__" + makeNameProper(pI->getName()) + "_" +
itostr((int)pI->getType()->getUniqueID());
CLV.addLocalVar(pI->getType(), tempostr) ;
} else {
string tempostr;
int Slot = Table.getValSlot(pI);
if (Slot >= 0) {
tempostr = "llvm__tmp_" + itostr(Slot) + "_"
+ itostr((int)pI->getType()->getUniqueID());
CLV.addLocalVar(pI->getType(), tempostr);
}
}
}
else break;
insIt++;
}
}
/* Implementation of CInstPrintVisitor */
void CInstPrintVisitor::outputLValue(Instruction *I) { void CInstPrintVisitor::outputLValue(Instruction *I) {
if (I && I->hasName() && !isa<PHINode>(I)) { Out << " " << CW.getValueName(I) << " = ";
Out << "llvm__" << makeNameProper(I->getName()) << "_"
<< I->getType()->getUniqueID() << " = ";
} else {
int Slot = Table.getValSlot(I);
//if (Slot < 0) then it is a instruction with no value (like return void )
if ((Slot >= 0) && !isa<PHINode>(I))
Out << "llvm__tmp_" << Slot << "_" << I->getType()->getUniqueID()
<< " = ";
}
} }
void CInstPrintVisitor::printPhiFromNextBlock(TerminatorInst *tI, int indx) { void CInstPrintVisitor::printPhiFromNextBlock(TerminatorInst *tI, int indx) {
BasicBlock *bb = tI->getSuccessor(indx); BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin(); BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) { while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<const PHINode>(*insIt)) { if (PHINode *pI = dyn_cast<PHINode>(*insIt)) {
//Its a phinode! //Its a phinode!
//Calculate the incoming index for this //Calculate the incoming index for this
int incindex = pI->getBasicBlockIndex(tI->getParent()); int incindex = pI->getBasicBlockIndex(tI->getParent());
if (incindex != -1) if (incindex != -1) {
{
//now we have to do the printing //now we have to do the printing
if (pI && pI->hasName()) { outputLValue(pI);
Out << "llvm__" << makeNameProper(pI->getName()) << "_" CW.writeOperand(pI->getIncomingValue(incindex), Out);
<< pI->getType()->getUniqueID() << " = ";
} else {
int Slot = Table.getValSlot(pI);
if (Slot >= 0)
Out << "llvm__tmp_" << Slot << "_"
<< pI->getType()->getUniqueID() << " = ";
}
CW.writeOperand(pI->getIncomingValue(incindex),false, Out);
Out << ";\n"; Out << ";\n";
} }
} }
@ -688,7 +645,7 @@ void CInstPrintVisitor::visitCastInst(CastInst *I) {
Out << "("; Out << "(";
CW.printType(I->getType(), Out); CW.printType(I->getType(), Out);
Out << ")"; Out << ")";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << ";\n"; Out << ";\n";
} }
@ -714,10 +671,10 @@ void CInstPrintVisitor::visitCallInst(CallInst *I) {
} }
Out << "("; Out << "(";
if (I->getNumOperands() > 1) if (I->getNumOperands() > 1)
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
for (unsigned op = 2, Eop = I->getNumOperands(); op < Eop; ++op) { for (unsigned op = 2, Eop = I->getNumOperands(); op < Eop; ++op) {
Out << ","; Out << ",";
CW.writeOperand(I->getOperand(op), false, Out); CW.writeOperand(I->getOperand(op), Out);
} }
Out << " );\n"; Out << " );\n";
@ -727,10 +684,10 @@ void CInstPrintVisitor::visitShr(ShiftInst *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "("; Out << "(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << " >> "; Out << " >> ";
Out << "("; Out << "(";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << "));\n"; Out << "));\n";
} }
@ -738,10 +695,10 @@ void CInstPrintVisitor::visitShl(ShiftInst *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "("; Out << "(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << " << "; Out << " << ";
Out << "("; Out << "(";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << "));\n"; Out << "));\n";
} }
@ -751,7 +708,7 @@ void CInstPrintVisitor::visitShl(ShiftInst *I) {
void CInstPrintVisitor::visitReturnInst(ReturnInst *I) { void CInstPrintVisitor::visitReturnInst(ReturnInst *I) {
Out << "return "; Out << "return ";
if (I->getNumOperands()) if (I->getNumOperands())
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
} }
@ -759,21 +716,21 @@ void CInstPrintVisitor::visitBranchInst(BranchInst *I) {
TerminatorInst *tI = cast<TerminatorInst>(I); TerminatorInst *tI = cast<TerminatorInst>(I);
if (I->isConditional()) { if (I->isConditional()) {
Out << " if ("; Out << " if (";
CW.writeOperand(I->getCondition(), false, Out); CW.writeOperand(I->getCondition(), Out);
Out << ")\n"; Out << ")\n";
printPhiFromNextBlock(tI,0); printPhiFromNextBlock(tI,0);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
Out << " else\n"; Out << " else\n";
printPhiFromNextBlock(tI,1); printPhiFromNextBlock(tI,1);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(1),false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << ";\n"; Out << ";\n";
} else { } else {
printPhiFromNextBlock(tI,0); printPhiFromNextBlock(tI,0);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
} }
Out << "\n"; Out << "\n";
@ -795,11 +752,11 @@ void CInstPrintVisitor::visitMallocInst(MallocInst *I) {
CW.printType(cast<const PointerType>(I->getType())->getElementType(), Out); CW.printType(cast<const PointerType>(I->getType())->getElementType(), Out);
Out << "*) malloc(sizeof("; Out << "*) malloc(sizeof(";
CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(), CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(),
tempstr, Out); tempstr);
Out << ")"; Out << ")";
if (I->getNumOperands()) { if (I->getNumOperands()) {
Out << " * " ; Out << " * " ;
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
} }
Out << ");"; Out << ");";
} }
@ -809,14 +766,14 @@ void CInstPrintVisitor::visitAllocaInst(AllocaInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
string tempstr = ""; string tempstr = "";
Out << "("; Out << "(";
CW.printTypeVar(I->getType(), tempstr, Out); CW.printTypeVar(I->getType(), tempstr);
Out << ") alloca(sizeof("; Out << ") alloca(sizeof(";
CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(), CW.printTypeVar(cast<PointerType>(I->getType())->getElementType(),
tempstr, Out); tempstr);
Out << ")"; Out << ")";
if (I->getNumOperands()) { if (I->getNumOperands()) {
Out << " * " ; Out << " * " ;
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
} }
Out << ");\n"; Out << ");\n";
} }
@ -824,7 +781,7 @@ void CInstPrintVisitor::visitAllocaInst(AllocaInst *I) {
void CInstPrintVisitor::visitFreeInst(FreeInst *I) { void CInstPrintVisitor::visitFreeInst(FreeInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "free("; Out << "free(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << ");\n"; Out << ");\n";
} }
@ -833,7 +790,7 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
if (I->getNumOperands() <= 1) { if (I->getNumOperands() <= 1) {
Out << "*"; Out << "*";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
} }
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
@ -843,12 +800,12 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
arrtype = 0; arrtype = 0;
if (arrtype && isa<GlobalValue>(Operand)) if (arrtype && isa<GlobalValue>(Operand))
Out << "(&"; Out << "(&";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand,Out);
for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) {
if (i == 1) { if (i == 1) {
if (arrtype || !isa<GlobalValue>(Operand)) { if (arrtype || !isa<GlobalValue>(Operand)) {
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(Operand) && arrtype) if (isa<GlobalValue>(Operand) && arrtype)
@ -858,7 +815,7 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
@ -870,7 +827,7 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
if (I->getNumOperands() <= 2) { if (I->getNumOperands() <= 2) {
Out << "*"; Out << "*";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
} }
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
@ -879,12 +836,12 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
arrtype = 0; arrtype = 0;
if (isa<GlobalValue>(I->getOperand(1)) && arrtype) if (isa<GlobalValue>(I->getOperand(1)) && arrtype)
Out << "(&"; Out << "(&";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
for (unsigned i = 2, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 2, E = I->getNumOperands(); i != E; ++i) {
if (i == 2) { if (i == 2) {
if (arrtype || !isa<GlobalValue>(I->getOperand(1))) { if (arrtype || !isa<GlobalValue>(I->getOperand(1))) {
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(I->getOperand(1)) && arrtype) if (isa<GlobalValue>(I->getOperand(1)) && arrtype)
@ -894,13 +851,13 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
} }
Out << " = "; Out << " = ";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << ";\n"; Out << ";\n";
} }
@ -909,7 +866,7 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << " &("; Out << " &(";
if (I->getNumOperands() <= 1) if (I->getNumOperands() <= 1)
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
int arrtype = 1; int arrtype = 1;
@ -917,12 +874,12 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
arrtype = 0; arrtype = 0;
if ((isa<GlobalValue>(Operand)) && arrtype) if ((isa<GlobalValue>(Operand)) && arrtype)
Out << "(&"; Out << "(&";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) {
if (i == 1) { if (i == 1) {
if (arrtype || !isa<GlobalValue>(Operand)){ if (arrtype || !isa<GlobalValue>(Operand)){
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(Operand) && arrtype) if (isa<GlobalValue>(Operand) && arrtype)
@ -932,7 +889,7 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
@ -949,7 +906,7 @@ void CInstPrintVisitor::visitUnaryOperator (UnaryOperator *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "!("; Out << "!(";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << ");\n"; Out << ");\n";
} }
else { else {
@ -969,29 +926,40 @@ void CInstPrintVisitor::visitBinaryOperator(BinaryOperator *I) {
Out << "("; Out << "(";
if (Operand->getType()->getPrimitiveID() == Type::PointerTyID) if (Operand->getType()->getPrimitiveID() == Type::PointerTyID)
Out << "(long long)"; Out << "(long long)";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << getOpcodeOperName(I); Out << getOpcodeOperName(I);
// Need the extra parenthisis if the second operand is < 0 // Need the extra parenthisis if the second operand is < 0
Out << '('; Out << '(';
if (I->getOperand(1)->getType()->getPrimitiveID() == Type::PointerTyID) if (I->getOperand(1)->getType()->getPrimitiveID() == Type::PointerTyID)
Out << "(long long)"; Out << "(long long)";
CW.writeOperand(I->getOperand(1),false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << ')'; Out << ')';
Out << ");\n"; Out << ");\n";
} }
/* END : CInstPrintVisitor implementation */ /* END : CInstPrintVisitor implementation */
string CWriter::getValueName(const Value *V) {
if (V->hasName()) // Print out the label if it exists...
return "llvm__" + makeNameProper(V->getName()) + "_" +
utostr(V->getType()->getUniqueID());
int Slot = Table.getValSlot(V);
assert(Slot >= 0 && "Invalid value!");
return "llvm__tmp_" + itostr(Slot) + "_" +
utostr(V->getType()->getUniqueID());
}
void CWriter::printModule(const Module *M) { void CWriter::printModule(const Module *M) {
// printing stdlib inclusion // printing stdlib inclusion
// Out << "#include <stdlib.h>\n"; // Out << "#include <stdlib.h>\n";
// get declaration for alloca // get declaration for alloca
Out << "/* Provide Declarations */\n" Out << "/* Provide Declarations */\n"
<< "#include <alloca.h>\n" << "#include <alloca.h>\n\n"
// Provide a definition for null if one does not already exist. // Provide a definition for null if one does not already exist.
<< "#ifndef NULL\n#define NULL 0\n#endif\n" << "#ifndef NULL\n#define NULL 0\n#endif\n\n"
<< "typedef unsigned char bool;\n" << "typedef unsigned char bool;\n"
<< "\n\n/* Global Symbols */\n"; << "\n\n/* Global Symbols */\n";
@ -1017,17 +985,14 @@ void CWriter::printModule(const Module *M) {
// prints the global constants // prints the global constants
void CWriter::printGlobal(const GlobalVariable *GV) { void CWriter::printGlobal(const GlobalVariable *GV) {
string tempostr; string tempostr = getValueName(GV);
if (GV->hasName())
tempostr = "llvm__" + makeNameProper(GV->getName()) + "_" +
itostr((int)GV->getType()->getUniqueID());
if (GV->hasInternalLinkage()) Out << "static "; if (GV->hasInternalLinkage()) Out << "static ";
printTypeVar(GV->getType()->getElementType(), tempostr, Out); printTypeVar(GV->getType()->getElementType(), tempostr);
if (GV->hasInitializer()) { if (GV->hasInitializer()) {
Out << " = " ; Out << " = " ;
writeOperand(GV->getInitializer(), false, Out, false); writeOperand(GV->getInitializer(), Out, false);
} }
Out << ";\n"; Out << ";\n";
@ -1080,26 +1045,14 @@ void CWriter::printConstant(const Constant *CPV) {
// Dinakar : Don't know what to do with unnamed constants // Dinakar : Don't know what to do with unnamed constants
// should do something about it later. // should do something about it later.
string tempostr; string tempostr = getValueName(CPV);
if (CPV->hasName()) {
// Print out name...
tempostr = "llvm__" + makeNameProper(CPV->getName()) + "_" +
itostr((int)CPV->getType()->getUniqueID());
} else {
int Slot = Table.getValSlot(CPV); // slot number
if (Slot >= 0)
tempostr = "llvm__tmp_" + itostr(Slot) + "_" +
itostr((int)CPV->getType()->getUniqueID());
else
tempostr = "<badref>";
}
// Print out the constant type... // Print out the constant type...
printTypeVar(CPV->getType(), tempostr, Out); printTypeVar(CPV->getType(), tempostr);
Out << " = "; Out << " = ";
// Write the value out now... // Write the value out now...
writeOperand(CPV, false, Out, false); writeOperand(CPV, Out, false);
Out << "\n"; Out << "\n";
} }
@ -1148,24 +1101,10 @@ void CWriter::printFunctionSignature(const Function *F) {
// //
void CWriter::printFunctionArgument(const Argument *Arg) { void CWriter::printFunctionArgument(const Argument *Arg) {
// Insert commas as we go... the first arg doesn't get a comma // Insert commas as we go... the first arg doesn't get a comma
string tempostr;
if (Arg != Arg->getParent()->getArgumentList().front()) Out << ", "; if (Arg != Arg->getParent()->getArgumentList().front()) Out << ", ";
// Output name, if available...
if (Arg->hasName()) {
tempostr = "llvm__" + makeNameProper(Arg->getName()) + "_" +
itostr((int)Arg->getType()->getUniqueID());
} else if (Table.getValSlot(Arg) < 0) {
tempostr = "<badref>";
}
else {
tempostr = "llvm__tmp_" + itostr(Table.getValSlot(Arg)) + "_" +
itostr((int)Arg->getType()->getUniqueID());
}
// Output type... // Output type...
// printType(Arg->getType(), Out); printTypeVar(Arg->getType(), getValueName(Arg));
// Out << " " << tempostr;
printTypeVar (Arg->getType(), tempostr, Out);
} }
void CWriter::printFunction(const Function *F) { void CWriter::printFunction(const Function *F) {
@ -1175,7 +1114,7 @@ void CWriter::printFunction(const Function *F) {
// output methods on the CLocalVars and Function* objects. // output methods on the CLocalVars and Function* objects.
// gather local variable information for each basic block // gather local variable information for each basic block
InstLocalVarsVisitor ILV(Table); InstLocalVarsVisitor ILV(*this);
ILV.visit((Function *)F); ILV.visit((Function *)F);
printFunctionSignature(F); printFunctionSignature(F);
@ -1195,7 +1134,7 @@ void CWriter::printFunction(const Function *F) {
for (listiter = iter->second.begin(); listiter != iter->second.end(); for (listiter = iter->second.begin(); listiter != iter->second.end();
++listiter) { ++listiter) {
Out << " "; Out << " ";
printTypeVar(iter->first, *listiter, Out); printTypeVar(iter->first, *listiter);
Out << ";\n"; Out << ";\n";
} }
} }
@ -1207,19 +1146,7 @@ void CWriter::printFunction(const Function *F) {
} }
void CWriter::outputBasicBlock(const BasicBlock* BB) { void CWriter::outputBasicBlock(const BasicBlock* BB) {
Out << getValueName(BB) << ":\n";
if (BB->hasName()) { // Print out the label if it exists...
Out << "llvm__" << makeNameProper(BB->getName()) << "_"
<< BB->getType()->getUniqueID() << ":\n";
} else {
int Slot = Table.getValSlot(BB);
Out << "llvm__tmp_";
if (Slot >= 0)
Out << Slot << "_" << BB->getType()->getUniqueID() << ":\n";
// Extra newline seperates out label's
else
Out << "<badref>\n";
}
// Output all of the instructions in the basic block... // Output all of the instructions in the basic block...
// print the basic blocks // print the basic blocks
@ -1227,14 +1154,6 @@ void CWriter::outputBasicBlock(const BasicBlock* BB) {
CIPV.visit((BasicBlock *) BB); CIPV.visit((BasicBlock *) BB);
} }
// printTypeVar - Go to extreme measures to attempt to print out a short,
// symbolic version of a type name.
//
ostream& CWriter::printTypeVar(const Type *Ty, string VariableName,
ostream &Out) {
return printTypeVarInt(Out, Ty, TypeNames, VariableName);
}
// printType - Go to extreme measures to attempt to print out a short, symbolic // printType - Go to extreme measures to attempt to print out a short, symbolic
// version of a type name. // version of a type name.
ostream& CWriter::printType(const Type *Ty, ostream &Out) { ostream& CWriter::printType(const Type *Ty, ostream &Out) {
@ -1242,13 +1161,8 @@ ostream& CWriter::printType(const Type *Ty, ostream &Out) {
} }
void CWriter::writeOperand(const Value *Operand, bool PrintType, void CWriter::writeOperand(const Value *Operand,
ostream &Out, bool PrintName = true) { ostream &Out, bool PrintName = true) {
if (PrintType) {
Out << " ";
printType(Operand->getType(), Out);
}
if (PrintName && Operand->hasName()) { if (PrintName && Operand->hasName()) {
// If Operand has a name. // If Operand has a name.
Out << "llvm__" << makeNameProper(Operand->getName()) << "_" << Out << "llvm__" << makeNameProper(Operand->getName()) << "_" <<

280
lib/Target/CBackend/Writer.cpp
View File

@ -412,7 +412,7 @@ static string calcTypeNameVar(const Type *Ty,
// potentially named portion and the variable associated with the type. // potentially named portion and the variable associated with the type.
static ostream &printTypeVarInt(ostream &Out, const Type *Ty, static ostream &printTypeVarInt(ostream &Out, const Type *Ty,
map<const Type *, string> &TypeNames, map<const Type *, string> &TypeNames,
string VariableName) { const string &VariableName) {
// Primitive types always print out their description, regardless of whether // Primitive types always print out their description, regardless of whether
// they have been named or not. // they have been named or not.
@ -508,12 +508,18 @@ namespace {
inline void write(const Module *M) { printModule(M); } inline void write(const Module *M) { printModule(M); }
ostream& printTypeVar(const Type *Ty, string VariableName, ostream &Out); ostream& printTypeVar(const Type *Ty, const string &VariableName) {
ostream& printType(const Type *Ty, ostream &Out); return printTypeVarInt(Out, Ty, TypeNames, VariableName);
void writeOperand(const Value *Operand, bool PrintType,ostream &Out, }
bool PrintName = true);
ostream& printType(const Type *Ty, ostream &Out);
void writeOperand(const Value *Operand, ostream &Out,bool PrintName = true);
string getValueName(const Value *V);
private : private :
void printModule(const Module *M); void printModule(const Module *M);
void printSymbolTable(const SymbolTable &ST); void printSymbolTable(const SymbolTable &ST);
void printConstant(const Constant *CPV); void printConstant(const Constant *CPV);
@ -531,43 +537,46 @@ namespace {
/* CLASS InstLocalVarsVisitor */ /* CLASS InstLocalVarsVisitor */
class InstLocalVarsVisitor : public InstVisitor<InstLocalVarsVisitor> { class InstLocalVarsVisitor : public InstVisitor<InstLocalVarsVisitor> {
SlotCalculator& Table; CWriter& CW;
void handleTerminator(TerminatorInst *tI, int indx); void handleTerminator(TerminatorInst *tI, int indx);
public: public:
CLocalVars CLV; CLocalVars CLV;
InstLocalVarsVisitor(SlotCalculator& table) : Table(table) {} InstLocalVarsVisitor(CWriter &cw) : CW(cw) {}
void visitInstruction(Instruction *I) { void visitInstruction(Instruction *I) {
string tempostr; if (I->getType() != Type::VoidTy) {
if (I && I->hasName() && !isa<PHINode>(I)) { string tempostr = CW.getValueName(I);
tempostr = "llvm__" + makeNameProper(I->getName()) + "_" +
itostr((int)I->getType()->getUniqueID());
CLV.addLocalVar(I->getType(), tempostr);
} else if (I) {
int Slot = Table.getValSlot(I);
//if (Slot < 0) then it is a instruction with no
// value (like return void )
if ((Slot >= 0) && !isa<PHINode>(I)) {
tempostr = "llvm__tmp_";
tempostr += itostr(Slot) + "_" +
itostr((int)I->getType()->getUniqueID());
CLV.addLocalVar(I->getType(), tempostr); CLV.addLocalVar(I->getType(), tempostr);
} }
} }
}
void visitBranchInst(BranchInst *I) { void visitBranchInst(BranchInst *I) {
handleTerminator(I, 0); handleTerminator(I, 0);
if (I->isConditional()) if (I->isConditional())
handleTerminator(I, 1); handleTerminator(I, 1);
} }
}; };
}
void InstLocalVarsVisitor::handleTerminator(TerminatorInst *tI,int indx) {
BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<PHINode>(*insIt)) {
// Its a phinode!
// Calculate the incoming index for this
assert(pI->getBasicBlockIndex(tI->getParent()) != -1);
CLV.addLocalVar(pI->getType(), CW.getValueName(pI));
} else
break;
insIt++;
}
}
namespace {
/* CLASS CInstPrintVisitor */ /* CLASS CInstPrintVisitor */
class CInstPrintVisitor: public InstVisitor<CInstPrintVisitor> { class CInstPrintVisitor: public InstVisitor<CInstPrintVisitor> {
@ -602,77 +611,25 @@ namespace {
void visitPHINode(PHINode *I); void visitPHINode(PHINode *I);
void visitUnaryOperator (UnaryOperator *I); void visitUnaryOperator (UnaryOperator *I);
void visitBinaryOperator(BinaryOperator *I); void visitBinaryOperator(BinaryOperator *I);
}; };
} }
void InstLocalVarsVisitor::handleTerminator(TerminatorInst *tI,int indx) {
BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<const PHINode>(*insIt)) {
//Its a phinode!
//Calculate the incoming index for this
int incindex = pI->getBasicBlockIndex(tI->getParent());
if (incindex != -1)
if (pI && pI->hasName()) {
string tempostr;
tempostr = "llvm__" + makeNameProper(pI->getName()) + "_" +
itostr((int)pI->getType()->getUniqueID());
CLV.addLocalVar(pI->getType(), tempostr) ;
} else {
string tempostr;
int Slot = Table.getValSlot(pI);
if (Slot >= 0) {
tempostr = "llvm__tmp_" + itostr(Slot) + "_"
+ itostr((int)pI->getType()->getUniqueID());
CLV.addLocalVar(pI->getType(), tempostr);
}
}
}
else break;
insIt++;
}
}
/* Implementation of CInstPrintVisitor */
void CInstPrintVisitor::outputLValue(Instruction *I) { void CInstPrintVisitor::outputLValue(Instruction *I) {
if (I && I->hasName() && !isa<PHINode>(I)) { Out << " " << CW.getValueName(I) << " = ";
Out << "llvm__" << makeNameProper(I->getName()) << "_"
<< I->getType()->getUniqueID() << " = ";
} else {
int Slot = Table.getValSlot(I);
//if (Slot < 0) then it is a instruction with no value (like return void )
if ((Slot >= 0) && !isa<PHINode>(I))
Out << "llvm__tmp_" << Slot << "_" << I->getType()->getUniqueID()
<< " = ";
}
} }
void CInstPrintVisitor::printPhiFromNextBlock(TerminatorInst *tI, int indx) { void CInstPrintVisitor::printPhiFromNextBlock(TerminatorInst *tI, int indx) {
BasicBlock *bb = tI->getSuccessor(indx); BasicBlock *bb = tI->getSuccessor(indx);
BasicBlock::const_iterator insIt = bb->begin(); BasicBlock::const_iterator insIt = bb->begin();
while (insIt != bb->end()) { while (insIt != bb->end()) {
if (const PHINode *pI = dyn_cast<const PHINode>(*insIt)) { if (PHINode *pI = dyn_cast<PHINode>(*insIt)) {
//Its a phinode! //Its a phinode!
//Calculate the incoming index for this //Calculate the incoming index for this
int incindex = pI->getBasicBlockIndex(tI->getParent()); int incindex = pI->getBasicBlockIndex(tI->getParent());
if (incindex != -1) if (incindex != -1) {
{
//now we have to do the printing //now we have to do the printing
if (pI && pI->hasName()) { outputLValue(pI);
Out << "llvm__" << makeNameProper(pI->getName()) << "_" CW.writeOperand(pI->getIncomingValue(incindex), Out);
<< pI->getType()->getUniqueID() << " = ";
} else {
int Slot = Table.getValSlot(pI);
if (Slot >= 0)
Out << "llvm__tmp_" << Slot << "_"
<< pI->getType()->getUniqueID() << " = ";
}
CW.writeOperand(pI->getIncomingValue(incindex),false, Out);
Out << ";\n"; Out << ";\n";
} }
} }
@ -688,7 +645,7 @@ void CInstPrintVisitor::visitCastInst(CastInst *I) {
Out << "("; Out << "(";
CW.printType(I->getType(), Out); CW.printType(I->getType(), Out);
Out << ")"; Out << ")";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << ";\n"; Out << ";\n";
} }
@ -714,10 +671,10 @@ void CInstPrintVisitor::visitCallInst(CallInst *I) {
} }
Out << "("; Out << "(";
if (I->getNumOperands() > 1) if (I->getNumOperands() > 1)
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
for (unsigned op = 2, Eop = I->getNumOperands(); op < Eop; ++op) { for (unsigned op = 2, Eop = I->getNumOperands(); op < Eop; ++op) {
Out << ","; Out << ",";
CW.writeOperand(I->getOperand(op), false, Out); CW.writeOperand(I->getOperand(op), Out);
} }
Out << " );\n"; Out << " );\n";
@ -727,10 +684,10 @@ void CInstPrintVisitor::visitShr(ShiftInst *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "("; Out << "(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << " >> "; Out << " >> ";
Out << "("; Out << "(";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << "));\n"; Out << "));\n";
} }
@ -738,10 +695,10 @@ void CInstPrintVisitor::visitShl(ShiftInst *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "("; Out << "(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << " << "; Out << " << ";
Out << "("; Out << "(";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << "));\n"; Out << "));\n";
} }
@ -751,7 +708,7 @@ void CInstPrintVisitor::visitShl(ShiftInst *I) {
void CInstPrintVisitor::visitReturnInst(ReturnInst *I) { void CInstPrintVisitor::visitReturnInst(ReturnInst *I) {
Out << "return "; Out << "return ";
if (I->getNumOperands()) if (I->getNumOperands())
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
} }
@ -759,21 +716,21 @@ void CInstPrintVisitor::visitBranchInst(BranchInst *I) {
TerminatorInst *tI = cast<TerminatorInst>(I); TerminatorInst *tI = cast<TerminatorInst>(I);
if (I->isConditional()) { if (I->isConditional()) {
Out << " if ("; Out << " if (";
CW.writeOperand(I->getCondition(), false, Out); CW.writeOperand(I->getCondition(), Out);
Out << ")\n"; Out << ")\n";
printPhiFromNextBlock(tI,0); printPhiFromNextBlock(tI,0);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
Out << " else\n"; Out << " else\n";
printPhiFromNextBlock(tI,1); printPhiFromNextBlock(tI,1);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(1),false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << ";\n"; Out << ";\n";
} else { } else {
printPhiFromNextBlock(tI,0); printPhiFromNextBlock(tI,0);
Out << " goto "; Out << " goto ";
CW.writeOperand(I->getOperand(0), false, Out); CW.writeOperand(I->getOperand(0), Out);
Out << ";\n"; Out << ";\n";
} }
Out << "\n"; Out << "\n";
@ -795,11 +752,11 @@ void CInstPrintVisitor::visitMallocInst(MallocInst *I) {
CW.printType(cast<const PointerType>(I->getType())->getElementType(), Out); CW.printType(cast<const PointerType>(I->getType())->getElementType(), Out);
Out << "*) malloc(sizeof("; Out << "*) malloc(sizeof(";
CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(), CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(),
tempstr, Out); tempstr);
Out << ")"; Out << ")";
if (I->getNumOperands()) { if (I->getNumOperands()) {
Out << " * " ; Out << " * " ;
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
} }
Out << ");"; Out << ");";
} }
@ -809,14 +766,14 @@ void CInstPrintVisitor::visitAllocaInst(AllocaInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
string tempstr = ""; string tempstr = "";
Out << "("; Out << "(";
CW.printTypeVar(I->getType(), tempstr, Out); CW.printTypeVar(I->getType(), tempstr);
Out << ") alloca(sizeof("; Out << ") alloca(sizeof(";
CW.printTypeVar(cast<const PointerType>(I->getType())->getElementType(), CW.printTypeVar(cast<PointerType>(I->getType())->getElementType(),
tempstr, Out); tempstr);
Out << ")"; Out << ")";
if (I->getNumOperands()) { if (I->getNumOperands()) {
Out << " * " ; Out << " * " ;
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
} }
Out << ");\n"; Out << ");\n";
} }
@ -824,7 +781,7 @@ void CInstPrintVisitor::visitAllocaInst(AllocaInst *I) {
void CInstPrintVisitor::visitFreeInst(FreeInst *I) { void CInstPrintVisitor::visitFreeInst(FreeInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "free("; Out << "free(";
CW.writeOperand(Operand, false, Out); CW.writeOperand(Operand, Out);
Out << ");\n"; Out << ");\n";
} }
@ -833,7 +790,7 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
if (I->getNumOperands() <= 1) { if (I->getNumOperands() <= 1) {
Out << "*"; Out << "*";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
} }
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
@ -843,12 +800,12 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
arrtype = 0; arrtype = 0;
if (arrtype && isa<GlobalValue>(Operand)) if (arrtype && isa<GlobalValue>(Operand))
Out << "(&"; Out << "(&";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand,Out);
for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) {
if (i == 1) { if (i == 1) {
if (arrtype || !isa<GlobalValue>(Operand)) { if (arrtype || !isa<GlobalValue>(Operand)) {
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(Operand) && arrtype) if (isa<GlobalValue>(Operand) && arrtype)
@ -858,7 +815,7 @@ void CInstPrintVisitor::visitLoadInst(LoadInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
@ -870,7 +827,7 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
if (I->getNumOperands() <= 2) { if (I->getNumOperands() <= 2) {
Out << "*"; Out << "*";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
} }
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
@ -879,12 +836,12 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
arrtype = 0; arrtype = 0;
if (isa<GlobalValue>(I->getOperand(1)) && arrtype) if (isa<GlobalValue>(I->getOperand(1)) && arrtype)
Out << "(&"; Out << "(&";
CW.writeOperand(I->getOperand(1), false, Out); CW.writeOperand(I->getOperand(1), Out);
for (unsigned i = 2, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 2, E = I->getNumOperands(); i != E; ++i) {
if (i == 2) { if (i == 2) {
if (arrtype || !isa<GlobalValue>(I->getOperand(1))) { if (arrtype || !isa<GlobalValue>(I->getOperand(1))) {
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(I->getOperand(1)) && arrtype) if (isa<GlobalValue>(I->getOperand(1)) && arrtype)
@ -894,13 +851,13 @@ void CInstPrintVisitor::visitStoreInst(StoreInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
} }
Out << " = "; Out << " = ";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << ";\n"; Out << ";\n";
} }
@ -909,7 +866,7 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << " &("; Out << " &(";
if (I->getNumOperands() <= 1) if (I->getNumOperands() <= 1)
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
else { else {
//Check if it is an array type or struct type ptr! //Check if it is an array type or struct type ptr!
int arrtype = 1; int arrtype = 1;
@ -917,12 +874,12 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
arrtype = 0; arrtype = 0;
if ((isa<GlobalValue>(Operand)) && arrtype) if ((isa<GlobalValue>(Operand)) && arrtype)
Out << "(&"; Out << "(&";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) { for (unsigned i = 1, E = I->getNumOperands(); i != E; ++i) {
if (i == 1) { if (i == 1) {
if (arrtype || !isa<GlobalValue>(Operand)){ if (arrtype || !isa<GlobalValue>(Operand)){
Out << "["; Out << "[";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
Out << "]"; Out << "]";
} }
if (isa<GlobalValue>(Operand) && arrtype) if (isa<GlobalValue>(Operand) && arrtype)
@ -932,7 +889,7 @@ void CInstPrintVisitor::visitGetElementPtrInst(GetElementPtrInst *I) {
if (arrtype == 1) Out << "["; if (arrtype == 1) Out << "[";
else else
Out << ".field"; Out << ".field";
CW.writeOperand(I->getOperand(i), false, Out); CW.writeOperand(I->getOperand(i), Out);
if (arrtype == 1) Out << "]"; if (arrtype == 1) Out << "]";
} }
} }
@ -949,7 +906,7 @@ void CInstPrintVisitor::visitUnaryOperator (UnaryOperator *I) {
outputLValue(I); outputLValue(I);
Operand = I->getNumOperands() ? I->getOperand(0) : 0; Operand = I->getNumOperands() ? I->getOperand(0) : 0;
Out << "!("; Out << "!(";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << ");\n"; Out << ");\n";
} }
else { else {
@ -969,29 +926,40 @@ void CInstPrintVisitor::visitBinaryOperator(BinaryOperator *I) {
Out << "("; Out << "(";
if (Operand->getType()->getPrimitiveID() == Type::PointerTyID) if (Operand->getType()->getPrimitiveID() == Type::PointerTyID)
Out << "(long long)"; Out << "(long long)";
CW.writeOperand(Operand,false, Out); CW.writeOperand(Operand, Out);
Out << getOpcodeOperName(I); Out << getOpcodeOperName(I);
// Need the extra parenthisis if the second operand is < 0 // Need the extra parenthisis if the second operand is < 0
Out << '('; Out << '(';
if (I->getOperand(1)->getType()->getPrimitiveID() == Type::PointerTyID) if (I->getOperand(1)->getType()->getPrimitiveID() == Type::PointerTyID)
Out << "(long long)"; Out << "(long long)";
CW.writeOperand(I->getOperand(1),false, Out); CW.writeOperand(I->getOperand(1), Out);
Out << ')'; Out << ')';
Out << ");\n"; Out << ");\n";
} }
/* END : CInstPrintVisitor implementation */ /* END : CInstPrintVisitor implementation */
string CWriter::getValueName(const Value *V) {
if (V->hasName()) // Print out the label if it exists...
return "llvm__" + makeNameProper(V->getName()) + "_" +
utostr(V->getType()->getUniqueID());
int Slot = Table.getValSlot(V);
assert(Slot >= 0 && "Invalid value!");
return "llvm__tmp_" + itostr(Slot) + "_" +
utostr(V->getType()->getUniqueID());
}
void CWriter::printModule(const Module *M) { void CWriter::printModule(const Module *M) {
// printing stdlib inclusion // printing stdlib inclusion
// Out << "#include <stdlib.h>\n"; // Out << "#include <stdlib.h>\n";
// get declaration for alloca // get declaration for alloca
Out << "/* Provide Declarations */\n" Out << "/* Provide Declarations */\n"
<< "#include <alloca.h>\n" << "#include <alloca.h>\n\n"
// Provide a definition for null if one does not already exist. // Provide a definition for null if one does not already exist.
<< "#ifndef NULL\n#define NULL 0\n#endif\n" << "#ifndef NULL\n#define NULL 0\n#endif\n\n"
<< "typedef unsigned char bool;\n" << "typedef unsigned char bool;\n"
<< "\n\n/* Global Symbols */\n"; << "\n\n/* Global Symbols */\n";
@ -1017,17 +985,14 @@ void CWriter::printModule(const Module *M) {
// prints the global constants // prints the global constants
void CWriter::printGlobal(const GlobalVariable *GV) { void CWriter::printGlobal(const GlobalVariable *GV) {
string tempostr; string tempostr = getValueName(GV);
if (GV->hasName())
tempostr = "llvm__" + makeNameProper(GV->getName()) + "_" +
itostr((int)GV->getType()->getUniqueID());
if (GV->hasInternalLinkage()) Out << "static "; if (GV->hasInternalLinkage()) Out << "static ";
printTypeVar(GV->getType()->getElementType(), tempostr, Out); printTypeVar(GV->getType()->getElementType(), tempostr);
if (GV->hasInitializer()) { if (GV->hasInitializer()) {
Out << " = " ; Out << " = " ;
writeOperand(GV->getInitializer(), false, Out, false); writeOperand(GV->getInitializer(), Out, false);
} }
Out << ";\n"; Out << ";\n";
@ -1080,26 +1045,14 @@ void CWriter::printConstant(const Constant *CPV) {
// Dinakar : Don't know what to do with unnamed constants // Dinakar : Don't know what to do with unnamed constants
// should do something about it later. // should do something about it later.
string tempostr; string tempostr = getValueName(CPV);
if (CPV->hasName()) {
// Print out name...
tempostr = "llvm__" + makeNameProper(CPV->getName()) + "_" +
itostr((int)CPV->getType()->getUniqueID());
} else {
int Slot = Table.getValSlot(CPV); // slot number
if (Slot >= 0)
tempostr = "llvm__tmp_" + itostr(Slot) + "_" +
itostr((int)CPV->getType()->getUniqueID());
else
tempostr = "<badref>";
}
// Print out the constant type... // Print out the constant type...
printTypeVar(CPV->getType(), tempostr, Out); printTypeVar(CPV->getType(), tempostr);
Out << " = "; Out << " = ";
// Write the value out now... // Write the value out now...
writeOperand(CPV, false, Out, false); writeOperand(CPV, Out, false);
Out << "\n"; Out << "\n";
} }
@ -1148,24 +1101,10 @@ void CWriter::printFunctionSignature(const Function *F) {
// //
void CWriter::printFunctionArgument(const Argument *Arg) { void CWriter::printFunctionArgument(const Argument *Arg) {
// Insert commas as we go... the first arg doesn't get a comma // Insert commas as we go... the first arg doesn't get a comma
string tempostr;
if (Arg != Arg->getParent()->getArgumentList().front()) Out << ", "; if (Arg != Arg->getParent()->getArgumentList().front()) Out << ", ";
// Output name, if available...
if (Arg->hasName()) {
tempostr = "llvm__" + makeNameProper(Arg->getName()) + "_" +
itostr((int)Arg->getType()->getUniqueID());
} else if (Table.getValSlot(Arg) < 0) {
tempostr = "<badref>";
}
else {
tempostr = "llvm__tmp_" + itostr(Table.getValSlot(Arg)) + "_" +
itostr((int)Arg->getType()->getUniqueID());
}
// Output type... // Output type...
// printType(Arg->getType(), Out); printTypeVar(Arg->getType(), getValueName(Arg));
// Out << " " << tempostr;
printTypeVar (Arg->getType(), tempostr, Out);
} }
void CWriter::printFunction(const Function *F) { void CWriter::printFunction(const Function *F) {
@ -1175,7 +1114,7 @@ void CWriter::printFunction(const Function *F) {
// output methods on the CLocalVars and Function* objects. // output methods on the CLocalVars and Function* objects.
// gather local variable information for each basic block // gather local variable information for each basic block
InstLocalVarsVisitor ILV(Table); InstLocalVarsVisitor ILV(*this);
ILV.visit((Function *)F); ILV.visit((Function *)F);
printFunctionSignature(F); printFunctionSignature(F);
@ -1195,7 +1134,7 @@ void CWriter::printFunction(const Function *F) {
for (listiter = iter->second.begin(); listiter != iter->second.end(); for (listiter = iter->second.begin(); listiter != iter->second.end();
++listiter) { ++listiter) {
Out << " "; Out << " ";
printTypeVar(iter->first, *listiter, Out); printTypeVar(iter->first, *listiter);
Out << ";\n"; Out << ";\n";
} }
} }
@ -1207,19 +1146,7 @@ void CWriter::printFunction(const Function *F) {
} }
void CWriter::outputBasicBlock(const BasicBlock* BB) { void CWriter::outputBasicBlock(const BasicBlock* BB) {
Out << getValueName(BB) << ":\n";
if (BB->hasName()) { // Print out the label if it exists...
Out << "llvm__" << makeNameProper(BB->getName()) << "_"
<< BB->getType()->getUniqueID() << ":\n";
} else {
int Slot = Table.getValSlot(BB);
Out << "llvm__tmp_";
if (Slot >= 0)
Out << Slot << "_" << BB->getType()->getUniqueID() << ":\n";
// Extra newline seperates out label's
else
Out << "<badref>\n";
}
// Output all of the instructions in the basic block... // Output all of the instructions in the basic block...
// print the basic blocks // print the basic blocks
@ -1227,14 +1154,6 @@ void CWriter::outputBasicBlock(const BasicBlock* BB) {
CIPV.visit((BasicBlock *) BB); CIPV.visit((BasicBlock *) BB);
} }
// printTypeVar - Go to extreme measures to attempt to print out a short,
// symbolic version of a type name.
//
ostream& CWriter::printTypeVar(const Type *Ty, string VariableName,
ostream &Out) {
return printTypeVarInt(Out, Ty, TypeNames, VariableName);
}
// printType - Go to extreme measures to attempt to print out a short, symbolic // printType - Go to extreme measures to attempt to print out a short, symbolic
// version of a type name. // version of a type name.
ostream& CWriter::printType(const Type *Ty, ostream &Out) { ostream& CWriter::printType(const Type *Ty, ostream &Out) {
@ -1242,13 +1161,8 @@ ostream& CWriter::printType(const Type *Ty, ostream &Out) {
} }
void CWriter::writeOperand(const Value *Operand, bool PrintType, void CWriter::writeOperand(const Value *Operand,
ostream &Out, bool PrintName = true) { ostream &Out, bool PrintName = true) {
if (PrintType) {
Out << " ";
printType(Operand->getType(), Out);
}
if (PrintName && Operand->hasName()) { if (PrintName && Operand->hasName()) {
// If Operand has a name. // If Operand has a name.
Out << "llvm__" << makeNameProper(Operand->getName()) << "_" << Out << "llvm__" << makeNameProper(Operand->getName()) << "_" <<