CodeGenTarget.cpp revision 64d80e3387f328d21cd9cc06464b5de7861e3f27
1//===- CodeGenTarget.cpp - CodeGen Target Class Wrapper ---------*- C++ -*-===// 2// 3// The LLVM Compiler Infrastructure 4// 5// This file was developed by the LLVM research group and is distributed under 6// the University of Illinois Open Source License. See LICENSE.TXT for details. 7// 8//===----------------------------------------------------------------------===// 9// 10// This class wrap target description classes used by the various code 11// generation TableGen backends. This makes it easier to access the data and 12// provides a single place that needs to check it for validity. All of these 13// classes throw exceptions on error conditions. 14// 15//===----------------------------------------------------------------------===// 16 17#include "CodeGenTarget.h" 18#include "CodeGenIntrinsics.h" 19#include "Record.h" 20#include "llvm/ADT/StringExtras.h" 21#include "llvm/Support/CommandLine.h" 22#include "llvm/Support/Streams.h" 23#include <set> 24#include <algorithm> 25using namespace llvm; 26 27static cl::opt<unsigned> 28AsmWriterNum("asmwriternum", cl::init(0), 29 cl::desc("Make -gen-asm-writer emit assembly writer #N")); 30 31/// getValueType - Return the MCV::ValueType that the specified TableGen record 32/// corresponds to. 33MVT::ValueType llvm::getValueType(Record *Rec) { 34 return (MVT::ValueType)Rec->getValueAsInt("Value"); 35} 36 37std::string llvm::getName(MVT::ValueType T) { 38 switch (T) { 39 case MVT::Other: return "UNKNOWN"; 40 case MVT::i1: return "MVT::i1"; 41 case MVT::i8: return "MVT::i8"; 42 case MVT::i16: return "MVT::i16"; 43 case MVT::i32: return "MVT::i32"; 44 case MVT::i64: return "MVT::i64"; 45 case MVT::i128: return "MVT::i128"; 46 case MVT::iAny: return "MVT::iAny"; 47 case MVT::f32: return "MVT::f32"; 48 case MVT::f64: return "MVT::f64"; 49 case MVT::f80: return "MVT::f80"; 50 case MVT::f128: return "MVT::f128"; 51 case MVT::Flag: return "MVT::Flag"; 52 case MVT::isVoid:return "MVT::void"; 53 case MVT::v8i8: return "MVT::v8i8"; 54 case MVT::v4i16: return "MVT::v4i16"; 55 case MVT::v2i32: return "MVT::v2i32"; 56 case MVT::v1i64: return "MVT::v1i64"; 57 case MVT::v16i8: return "MVT::v16i8"; 58 case MVT::v8i16: return "MVT::v8i16"; 59 case MVT::v4i32: return "MVT::v4i32"; 60 case MVT::v2i64: return "MVT::v2i64"; 61 case MVT::v2f32: return "MVT::v2f32"; 62 case MVT::v4f32: return "MVT::v4f32"; 63 case MVT::v2f64: return "MVT::v2f64"; 64 case MVT::iPTR: return "TLI.getPointerTy()"; 65 default: assert(0 && "ILLEGAL VALUE TYPE!"); return ""; 66 } 67} 68 69std::string llvm::getEnumName(MVT::ValueType T) { 70 switch (T) { 71 case MVT::Other: return "MVT::Other"; 72 case MVT::i1: return "MVT::i1"; 73 case MVT::i8: return "MVT::i8"; 74 case MVT::i16: return "MVT::i16"; 75 case MVT::i32: return "MVT::i32"; 76 case MVT::i64: return "MVT::i64"; 77 case MVT::i128: return "MVT::i128"; 78 case MVT::iAny: return "MVT::iAny"; 79 case MVT::f32: return "MVT::f32"; 80 case MVT::f64: return "MVT::f64"; 81 case MVT::f80: return "MVT::f80"; 82 case MVT::f128: return "MVT::f128"; 83 case MVT::Flag: return "MVT::Flag"; 84 case MVT::isVoid:return "MVT::isVoid"; 85 case MVT::v8i8: return "MVT::v8i8"; 86 case MVT::v4i16: return "MVT::v4i16"; 87 case MVT::v2i32: return "MVT::v2i32"; 88 case MVT::v1i64: return "MVT::v1i64"; 89 case MVT::v16i8: return "MVT::v16i8"; 90 case MVT::v8i16: return "MVT::v8i16"; 91 case MVT::v4i32: return "MVT::v4i32"; 92 case MVT::v2i64: return "MVT::v2i64"; 93 case MVT::v2f32: return "MVT::v2f32"; 94 case MVT::v4f32: return "MVT::v4f32"; 95 case MVT::v2f64: return "MVT::v2f64"; 96 case MVT::iPTR: return "TLI.getPointerTy()"; 97 default: assert(0 && "ILLEGAL VALUE TYPE!"); return ""; 98 } 99} 100 101 102/// getTarget - Return the current instance of the Target class. 103/// 104CodeGenTarget::CodeGenTarget() { 105 std::vector<Record*> Targets = Records.getAllDerivedDefinitions("Target"); 106 if (Targets.size() == 0) 107 throw std::string("ERROR: No 'Target' subclasses defined!"); 108 if (Targets.size() != 1) 109 throw std::string("ERROR: Multiple subclasses of Target defined!"); 110 TargetRec = Targets[0]; 111} 112 113 114const std::string &CodeGenTarget::getName() const { 115 return TargetRec->getName(); 116} 117 118Record *CodeGenTarget::getInstructionSet() const { 119 return TargetRec->getValueAsDef("InstructionSet"); 120} 121 122/// getAsmWriter - Return the AssemblyWriter definition for this target. 123/// 124Record *CodeGenTarget::getAsmWriter() const { 125 std::vector<Record*> LI = TargetRec->getValueAsListOfDefs("AssemblyWriters"); 126 if (AsmWriterNum >= LI.size()) 127 throw "Target does not have an AsmWriter #" + utostr(AsmWriterNum) + "!"; 128 return LI[AsmWriterNum]; 129} 130 131void CodeGenTarget::ReadRegisters() const { 132 std::vector<Record*> Regs = Records.getAllDerivedDefinitions("Register"); 133 if (Regs.empty()) 134 throw std::string("No 'Register' subclasses defined!"); 135 136 Registers.reserve(Regs.size()); 137 Registers.assign(Regs.begin(), Regs.end()); 138} 139 140CodeGenRegister::CodeGenRegister(Record *R) : TheDef(R) { 141 DeclaredSpillSize = R->getValueAsInt("SpillSize"); 142 DeclaredSpillAlignment = R->getValueAsInt("SpillAlignment"); 143} 144 145const std::string &CodeGenRegister::getName() const { 146 return TheDef->getName(); 147} 148 149void CodeGenTarget::ReadRegisterClasses() const { 150 std::vector<Record*> RegClasses = 151 Records.getAllDerivedDefinitions("RegisterClass"); 152 if (RegClasses.empty()) 153 throw std::string("No 'RegisterClass' subclasses defined!"); 154 155 RegisterClasses.reserve(RegClasses.size()); 156 RegisterClasses.assign(RegClasses.begin(), RegClasses.end()); 157} 158 159std::vector<unsigned char> CodeGenTarget::getRegisterVTs(Record *R) const { 160 std::vector<unsigned char> Result; 161 const std::vector<CodeGenRegisterClass> &RCs = getRegisterClasses(); 162 for (unsigned i = 0, e = RCs.size(); i != e; ++i) { 163 const CodeGenRegisterClass &RC = RegisterClasses[i]; 164 for (unsigned ei = 0, ee = RC.Elements.size(); ei != ee; ++ei) { 165 if (R == RC.Elements[ei]) { 166 const std::vector<MVT::ValueType> &InVTs = RC.getValueTypes(); 167 for (unsigned i = 0, e = InVTs.size(); i != e; ++i) 168 Result.push_back(InVTs[i]); 169 } 170 } 171 } 172 return Result; 173} 174 175 176CodeGenRegisterClass::CodeGenRegisterClass(Record *R) : TheDef(R) { 177 // Rename anonymous register classes. 178 if (R->getName().size() > 9 && R->getName()[9] == '.') { 179 static unsigned AnonCounter = 0; 180 R->setName("AnonRegClass_"+utostr(AnonCounter++)); 181 } 182 183 std::vector<Record*> TypeList = R->getValueAsListOfDefs("RegTypes"); 184 for (unsigned i = 0, e = TypeList.size(); i != e; ++i) { 185 Record *Type = TypeList[i]; 186 if (!Type->isSubClassOf("ValueType")) 187 throw "RegTypes list member '" + Type->getName() + 188 "' does not derive from the ValueType class!"; 189 VTs.push_back(getValueType(Type)); 190 } 191 assert(!VTs.empty() && "RegisterClass must contain at least one ValueType!"); 192 193 std::vector<Record*> RegList = R->getValueAsListOfDefs("MemberList"); 194 for (unsigned i = 0, e = RegList.size(); i != e; ++i) { 195 Record *Reg = RegList[i]; 196 if (!Reg->isSubClassOf("Register")) 197 throw "Register Class member '" + Reg->getName() + 198 "' does not derive from the Register class!"; 199 Elements.push_back(Reg); 200 } 201 202 std::vector<Record*> SubRegClassList = 203 R->getValueAsListOfDefs("SubRegClassList"); 204 for (unsigned i = 0, e = SubRegClassList.size(); i != e; ++i) { 205 Record *SubRegClass = SubRegClassList[i]; 206 if (!SubRegClass->isSubClassOf("RegisterClass")) 207 throw "Register Class member '" + SubRegClass->getName() + 208 "' does not derive from the RegisterClass class!"; 209 SubRegClasses.push_back(SubRegClass); 210 } 211 212 // Allow targets to override the size in bits of the RegisterClass. 213 unsigned Size = R->getValueAsInt("Size"); 214 215 Namespace = R->getValueAsString("Namespace"); 216 SpillSize = Size ? Size : MVT::getSizeInBits(VTs[0]); 217 SpillAlignment = R->getValueAsInt("Alignment"); 218 MethodBodies = R->getValueAsCode("MethodBodies"); 219 MethodProtos = R->getValueAsCode("MethodProtos"); 220} 221 222const std::string &CodeGenRegisterClass::getName() const { 223 return TheDef->getName(); 224} 225 226void CodeGenTarget::ReadLegalValueTypes() const { 227 const std::vector<CodeGenRegisterClass> &RCs = getRegisterClasses(); 228 for (unsigned i = 0, e = RCs.size(); i != e; ++i) 229 for (unsigned ri = 0, re = RCs[i].VTs.size(); ri != re; ++ri) 230 LegalValueTypes.push_back(RCs[i].VTs[ri]); 231 232 // Remove duplicates. 233 std::sort(LegalValueTypes.begin(), LegalValueTypes.end()); 234 LegalValueTypes.erase(std::unique(LegalValueTypes.begin(), 235 LegalValueTypes.end()), 236 LegalValueTypes.end()); 237} 238 239 240void CodeGenTarget::ReadInstructions() const { 241 std::vector<Record*> Insts = Records.getAllDerivedDefinitions("Instruction"); 242 if (Insts.size() <= 2) 243 throw std::string("No 'Instruction' subclasses defined!"); 244 245 // Parse the instructions defined in the .td file. 246 std::string InstFormatName = 247 getAsmWriter()->getValueAsString("InstFormatName"); 248 249 for (unsigned i = 0, e = Insts.size(); i != e; ++i) { 250 std::string AsmStr = Insts[i]->getValueAsString(InstFormatName); 251 Instructions.insert(std::make_pair(Insts[i]->getName(), 252 CodeGenInstruction(Insts[i], AsmStr))); 253 } 254} 255 256/// getInstructionsByEnumValue - Return all of the instructions defined by the 257/// target, ordered by their enum value. 258void CodeGenTarget:: 259getInstructionsByEnumValue(std::vector<const CodeGenInstruction*> 260 &NumberedInstructions) { 261 std::map<std::string, CodeGenInstruction>::const_iterator I; 262 I = getInstructions().find("PHI"); 263 if (I == Instructions.end()) throw "Could not find 'PHI' instruction!"; 264 const CodeGenInstruction *PHI = &I->second; 265 266 I = getInstructions().find("INLINEASM"); 267 if (I == Instructions.end()) throw "Could not find 'INLINEASM' instruction!"; 268 const CodeGenInstruction *INLINEASM = &I->second; 269 270 I = getInstructions().find("LABEL"); 271 if (I == Instructions.end()) throw "Could not find 'LABEL' instruction!"; 272 const CodeGenInstruction *LABEL = &I->second; 273 274 // Print out the rest of the instructions now. 275 NumberedInstructions.push_back(PHI); 276 NumberedInstructions.push_back(INLINEASM); 277 NumberedInstructions.push_back(LABEL); 278 for (inst_iterator II = inst_begin(), E = inst_end(); II != E; ++II) 279 if (&II->second != PHI && 280 &II->second != INLINEASM && 281 &II->second != LABEL) 282 NumberedInstructions.push_back(&II->second); 283} 284 285 286/// isLittleEndianEncoding - Return whether this target encodes its instruction 287/// in little-endian format, i.e. bits laid out in the order [0..n] 288/// 289bool CodeGenTarget::isLittleEndianEncoding() const { 290 return getInstructionSet()->getValueAsBit("isLittleEndianEncoding"); 291} 292 293 294 295static void ParseConstraint(const std::string &CStr, CodeGenInstruction *I) { 296 // FIXME: Only supports TIED_TO for now. 297 std::string::size_type pos = CStr.find_first_of('='); 298 assert(pos != std::string::npos && "Unrecognized constraint"); 299 std::string Name = CStr.substr(0, pos); 300 301 // TIED_TO: $src1 = $dst 302 std::string::size_type wpos = Name.find_first_of(" \t"); 303 if (wpos == std::string::npos) 304 throw "Illegal format for tied-to constraint: '" + CStr + "'"; 305 std::string DestOpName = Name.substr(0, wpos); 306 std::pair<unsigned,unsigned> DestOp = I->ParseOperandName(DestOpName, false); 307 308 Name = CStr.substr(pos+1); 309 wpos = Name.find_first_not_of(" \t"); 310 if (wpos == std::string::npos) 311 throw "Illegal format for tied-to constraint: '" + CStr + "'"; 312 313 std::pair<unsigned,unsigned> SrcOp = 314 I->ParseOperandName(Name.substr(wpos), false); 315 if (SrcOp > DestOp) 316 throw "Illegal tied-to operand constraint '" + CStr + "'"; 317 318 319 unsigned FlatOpNo = I->getFlattenedOperandNumber(SrcOp); 320 // Build the string for the operand. 321 std::string OpConstraint = 322 "((" + utostr(FlatOpNo) + " << 16) | (1 << TOI::TIED_TO))"; 323 324 325 if (!I->OperandList[DestOp.first].Constraints[DestOp.second].empty()) 326 throw "Operand '" + DestOpName + "' cannot have multiple constraints!"; 327 I->OperandList[DestOp.first].Constraints[DestOp.second] = OpConstraint; 328} 329 330static void ParseConstraints(const std::string &CStr, CodeGenInstruction *I) { 331 // Make sure the constraints list for each operand is large enough to hold 332 // constraint info, even if none is present. 333 for (unsigned i = 0, e = I->OperandList.size(); i != e; ++i) 334 I->OperandList[i].Constraints.resize(I->OperandList[i].MINumOperands); 335 336 if (CStr.empty()) return; 337 338 const std::string delims(","); 339 std::string::size_type bidx, eidx; 340 341 bidx = CStr.find_first_not_of(delims); 342 while (bidx != std::string::npos) { 343 eidx = CStr.find_first_of(delims, bidx); 344 if (eidx == std::string::npos) 345 eidx = CStr.length(); 346 347 ParseConstraint(CStr.substr(bidx, eidx), I); 348 bidx = CStr.find_first_not_of(delims, eidx); 349 } 350} 351 352CodeGenInstruction::CodeGenInstruction(Record *R, const std::string &AsmStr) 353 : TheDef(R), AsmString(AsmStr) { 354 Name = R->getValueAsString("Name"); 355 Namespace = R->getValueAsString("Namespace"); 356 357 isReturn = R->getValueAsBit("isReturn"); 358 isBranch = R->getValueAsBit("isBranch"); 359 isBarrier = R->getValueAsBit("isBarrier"); 360 isCall = R->getValueAsBit("isCall"); 361 isLoad = R->getValueAsBit("isLoad"); 362 isStore = R->getValueAsBit("isStore"); 363 bool isTwoAddress = R->getValueAsBit("isTwoAddress"); 364 isPredicable = R->getValueAsBit("isPredicable"); 365 isConvertibleToThreeAddress = R->getValueAsBit("isConvertibleToThreeAddress"); 366 isCommutable = R->getValueAsBit("isCommutable"); 367 isTerminator = R->getValueAsBit("isTerminator"); 368 isReMaterializable = R->getValueAsBit("isReMaterializable"); 369 hasDelaySlot = R->getValueAsBit("hasDelaySlot"); 370 usesCustomDAGSchedInserter = R->getValueAsBit("usesCustomDAGSchedInserter"); 371 hasCtrlDep = R->getValueAsBit("hasCtrlDep"); 372 noResults = R->getValueAsBit("noResults"); 373 isNotDuplicable = R->getValueAsBit("isNotDuplicable"); 374 hasOptionalDef = false; 375 hasVariableNumberOfOperands = false; 376 377 DagInit *DI; 378 try { 379 DI = R->getValueAsDag("OutOperandList"); 380 } catch (...) { 381 // Error getting operand list, just ignore it (sparcv9). 382 AsmString.clear(); 383 OperandList.clear(); 384 return; 385 } 386 NumDefs = DI->getNumArgs(); 387 388 DagInit *IDI; 389 try { 390 IDI = R->getValueAsDag("InOperandList"); 391 } catch (...) { 392 // Error getting operand list, just ignore it (sparcv9). 393 AsmString.clear(); 394 OperandList.clear(); 395 return; 396 } 397 DI = (DagInit*)(new BinOpInit(BinOpInit::CONCAT, DI, IDI))->Fold(); 398 399 unsigned MIOperandNo = 0; 400 std::set<std::string> OperandNames; 401 for (unsigned i = 0, e = DI->getNumArgs(); i != e; ++i) { 402 DefInit *Arg = dynamic_cast<DefInit*>(DI->getArg(i)); 403 if (!Arg) 404 throw "Illegal operand for the '" + R->getName() + "' instruction!"; 405 406 Record *Rec = Arg->getDef(); 407 std::string PrintMethod = "printOperand"; 408 unsigned NumOps = 1; 409 DagInit *MIOpInfo = 0; 410 if (Rec->isSubClassOf("Operand")) { 411 PrintMethod = Rec->getValueAsString("PrintMethod"); 412 MIOpInfo = Rec->getValueAsDag("MIOperandInfo"); 413 414 // Verify that MIOpInfo has an 'ops' root value. 415 if (!dynamic_cast<DefInit*>(MIOpInfo->getOperator()) || 416 dynamic_cast<DefInit*>(MIOpInfo->getOperator()) 417 ->getDef()->getName() != "ops") 418 throw "Bad value for MIOperandInfo in operand '" + Rec->getName() + 419 "'\n"; 420 421 // If we have MIOpInfo, then we have #operands equal to number of entries 422 // in MIOperandInfo. 423 if (unsigned NumArgs = MIOpInfo->getNumArgs()) 424 NumOps = NumArgs; 425 426 if (Rec->isSubClassOf("PredicateOperand")) 427 isPredicable = true; 428 else if (Rec->isSubClassOf("OptionalDefOperand")) 429 hasOptionalDef = true; 430 } else if (Rec->getName() == "variable_ops") { 431 hasVariableNumberOfOperands = true; 432 continue; 433 } else if (!Rec->isSubClassOf("RegisterClass") && 434 Rec->getName() != "ptr_rc") 435 throw "Unknown operand class '" + Rec->getName() + 436 "' in instruction '" + R->getName() + "' instruction!"; 437 438 // Check that the operand has a name and that it's unique. 439 if (DI->getArgName(i).empty()) 440 throw "In instruction '" + R->getName() + "', operand #" + utostr(i) + 441 " has no name!"; 442 if (!OperandNames.insert(DI->getArgName(i)).second) 443 throw "In instruction '" + R->getName() + "', operand #" + utostr(i) + 444 " has the same name as a previous operand!"; 445 446 OperandList.push_back(OperandInfo(Rec, DI->getArgName(i), PrintMethod, 447 MIOperandNo, NumOps, MIOpInfo)); 448 MIOperandNo += NumOps; 449 } 450 451 // Parse Constraints. 452 ParseConstraints(R->getValueAsString("Constraints"), this); 453 454 // For backward compatibility: isTwoAddress means operand 1 is tied to 455 // operand 0. 456 if (isTwoAddress) { 457 if (!OperandList[1].Constraints[0].empty()) 458 throw R->getName() + ": cannot use isTwoAddress property: instruction " 459 "already has constraint set!"; 460 OperandList[1].Constraints[0] = "((0 << 16) | (1 << TOI::TIED_TO))"; 461 } 462 463 // Any operands with unset constraints get 0 as their constraint. 464 for (unsigned op = 0, e = OperandList.size(); op != e; ++op) 465 for (unsigned j = 0, e = OperandList[op].MINumOperands; j != e; ++j) 466 if (OperandList[op].Constraints[j].empty()) 467 OperandList[op].Constraints[j] = "0"; 468 469 // Parse the DisableEncoding field. 470 std::string DisableEncoding = R->getValueAsString("DisableEncoding"); 471 while (1) { 472 std::string OpName = getToken(DisableEncoding, " ,\t"); 473 if (OpName.empty()) break; 474 475 // Figure out which operand this is. 476 std::pair<unsigned,unsigned> Op = ParseOperandName(OpName, false); 477 478 // Mark the operand as not-to-be encoded. 479 if (Op.second >= OperandList[Op.first].DoNotEncode.size()) 480 OperandList[Op.first].DoNotEncode.resize(Op.second+1); 481 OperandList[Op.first].DoNotEncode[Op.second] = true; 482 } 483} 484 485 486 487/// getOperandNamed - Return the index of the operand with the specified 488/// non-empty name. If the instruction does not have an operand with the 489/// specified name, throw an exception. 490/// 491unsigned CodeGenInstruction::getOperandNamed(const std::string &Name) const { 492 assert(!Name.empty() && "Cannot search for operand with no name!"); 493 for (unsigned i = 0, e = OperandList.size(); i != e; ++i) 494 if (OperandList[i].Name == Name) return i; 495 throw "Instruction '" + TheDef->getName() + 496 "' does not have an operand named '$" + Name + "'!"; 497} 498 499std::pair<unsigned,unsigned> 500CodeGenInstruction::ParseOperandName(const std::string &Op, 501 bool AllowWholeOp) { 502 if (Op.empty() || Op[0] != '$') 503 throw TheDef->getName() + ": Illegal operand name: '" + Op + "'"; 504 505 std::string OpName = Op.substr(1); 506 std::string SubOpName; 507 508 // Check to see if this is $foo.bar. 509 std::string::size_type DotIdx = OpName.find_first_of("."); 510 if (DotIdx != std::string::npos) { 511 SubOpName = OpName.substr(DotIdx+1); 512 if (SubOpName.empty()) 513 throw TheDef->getName() + ": illegal empty suboperand name in '" +Op +"'"; 514 OpName = OpName.substr(0, DotIdx); 515 } 516 517 unsigned OpIdx = getOperandNamed(OpName); 518 519 if (SubOpName.empty()) { // If no suboperand name was specified: 520 // If one was needed, throw. 521 if (OperandList[OpIdx].MINumOperands > 1 && !AllowWholeOp && 522 SubOpName.empty()) 523 throw TheDef->getName() + ": Illegal to refer to" 524 " whole operand part of complex operand '" + Op + "'"; 525 526 // Otherwise, return the operand. 527 return std::make_pair(OpIdx, 0U); 528 } 529 530 // Find the suboperand number involved. 531 DagInit *MIOpInfo = OperandList[OpIdx].MIOperandInfo; 532 if (MIOpInfo == 0) 533 throw TheDef->getName() + ": unknown suboperand name in '" + Op + "'"; 534 535 // Find the operand with the right name. 536 for (unsigned i = 0, e = MIOpInfo->getNumArgs(); i != e; ++i) 537 if (MIOpInfo->getArgName(i) == SubOpName) 538 return std::make_pair(OpIdx, i); 539 540 // Otherwise, didn't find it! 541 throw TheDef->getName() + ": unknown suboperand name in '" + Op + "'"; 542} 543 544 545 546 547//===----------------------------------------------------------------------===// 548// ComplexPattern implementation 549// 550ComplexPattern::ComplexPattern(Record *R) { 551 Ty = ::getValueType(R->getValueAsDef("Ty")); 552 NumOperands = R->getValueAsInt("NumOperands"); 553 SelectFunc = R->getValueAsString("SelectFunc"); 554 RootNodes = R->getValueAsListOfDefs("RootNodes"); 555 556 // Parse the properties. 557 Properties = 0; 558 std::vector<Record*> PropList = R->getValueAsListOfDefs("Properties"); 559 for (unsigned i = 0, e = PropList.size(); i != e; ++i) 560 if (PropList[i]->getName() == "SDNPHasChain") { 561 Properties |= 1 << SDNPHasChain; 562 } else if (PropList[i]->getName() == "SDNPOptInFlag") { 563 Properties |= 1 << SDNPOptInFlag; 564 } else { 565 cerr << "Unsupported SD Node property '" << PropList[i]->getName() 566 << "' on ComplexPattern '" << R->getName() << "'!\n"; 567 exit(1); 568 } 569} 570 571//===----------------------------------------------------------------------===// 572// CodeGenIntrinsic Implementation 573//===----------------------------------------------------------------------===// 574 575std::vector<CodeGenIntrinsic> llvm::LoadIntrinsics(const RecordKeeper &RC) { 576 std::vector<Record*> I = RC.getAllDerivedDefinitions("Intrinsic"); 577 578 std::vector<CodeGenIntrinsic> Result; 579 580 // If we are in the context of a target .td file, get the target info so that 581 // we can decode the current intptr_t. 582 CodeGenTarget *CGT = 0; 583 if (Records.getClass("Target") && 584 Records.getAllDerivedDefinitions("Target").size() == 1) 585 CGT = new CodeGenTarget(); 586 587 for (unsigned i = 0, e = I.size(); i != e; ++i) 588 Result.push_back(CodeGenIntrinsic(I[i], CGT)); 589 delete CGT; 590 return Result; 591} 592 593CodeGenIntrinsic::CodeGenIntrinsic(Record *R, CodeGenTarget *CGT) { 594 TheDef = R; 595 std::string DefName = R->getName(); 596 ModRef = WriteMem; 597 isOverloaded = false; 598 599 if (DefName.size() <= 4 || 600 std::string(DefName.begin(), DefName.begin()+4) != "int_") 601 throw "Intrinsic '" + DefName + "' does not start with 'int_'!"; 602 EnumName = std::string(DefName.begin()+4, DefName.end()); 603 if (R->getValue("GCCBuiltinName")) // Ignore a missing GCCBuiltinName field. 604 GCCBuiltinName = R->getValueAsString("GCCBuiltinName"); 605 TargetPrefix = R->getValueAsString("TargetPrefix"); 606 Name = R->getValueAsString("LLVMName"); 607 if (Name == "") { 608 // If an explicit name isn't specified, derive one from the DefName. 609 Name = "llvm."; 610 for (unsigned i = 0, e = EnumName.size(); i != e; ++i) 611 if (EnumName[i] == '_') 612 Name += '.'; 613 else 614 Name += EnumName[i]; 615 } else { 616 // Verify it starts with "llvm.". 617 if (Name.size() <= 5 || 618 std::string(Name.begin(), Name.begin()+5) != "llvm.") 619 throw "Intrinsic '" + DefName + "'s name does not start with 'llvm.'!"; 620 } 621 622 // If TargetPrefix is specified, make sure that Name starts with 623 // "llvm.<targetprefix>.". 624 if (!TargetPrefix.empty()) { 625 if (Name.size() < 6+TargetPrefix.size() || 626 std::string(Name.begin()+5, Name.begin()+6+TargetPrefix.size()) 627 != (TargetPrefix+".")) 628 throw "Intrinsic '" + DefName + "' does not start with 'llvm." + 629 TargetPrefix + ".'!"; 630 } 631 632 // Parse the list of argument types. 633 ListInit *TypeList = R->getValueAsListInit("Types"); 634 for (unsigned i = 0, e = TypeList->getSize(); i != e; ++i) { 635 Record *TyEl = TypeList->getElementAsRecord(i); 636 assert(TyEl->isSubClassOf("LLVMType") && "Expected a type!"); 637 ArgTypes.push_back(TyEl->getValueAsString("TypeVal")); 638 MVT::ValueType VT = getValueType(TyEl->getValueAsDef("VT")); 639 isOverloaded |= VT == MVT::iAny; 640 ArgVTs.push_back(VT); 641 ArgTypeDefs.push_back(TyEl); 642 } 643 if (ArgTypes.size() == 0) 644 throw "Intrinsic '"+DefName+"' needs at least a type for the ret value!"; 645 646 647 // Parse the intrinsic properties. 648 ListInit *PropList = R->getValueAsListInit("Properties"); 649 for (unsigned i = 0, e = PropList->getSize(); i != e; ++i) { 650 Record *Property = PropList->getElementAsRecord(i); 651 assert(Property->isSubClassOf("IntrinsicProperty") && 652 "Expected a property!"); 653 654 if (Property->getName() == "IntrNoMem") 655 ModRef = NoMem; 656 else if (Property->getName() == "IntrReadArgMem") 657 ModRef = ReadArgMem; 658 else if (Property->getName() == "IntrReadMem") 659 ModRef = ReadMem; 660 else if (Property->getName() == "IntrWriteArgMem") 661 ModRef = WriteArgMem; 662 else if (Property->getName() == "IntrWriteMem") 663 ModRef = WriteMem; 664 else 665 assert(0 && "Unknown property!"); 666 } 667} 668