1 //===-- Core.cpp ----------------------------------------------------------===// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is distributed under the University of Illinois Open Source 6 // License. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 // 10 // This file implements the common infrastructure (including the C bindings) 11 // for libLLVMCore.a, which implements the LLVM intermediate representation. 12 // 13 //===----------------------------------------------------------------------===// 14 15 #include "llvm-c/Core.h" 16 #include "llvm/Bitcode/ReaderWriter.h" 17 #include "llvm/IR/Attributes.h" 18 #include "llvm/IR/CallSite.h" 19 #include "llvm/IR/Constants.h" 20 #include "llvm/IR/DerivedTypes.h" 21 #include "llvm/IR/DiagnosticInfo.h" 22 #include "llvm/IR/DiagnosticPrinter.h" 23 #include "llvm/IR/GlobalAlias.h" 24 #include "llvm/IR/GlobalVariable.h" 25 #include "llvm/IR/IRBuilder.h" 26 #include "llvm/IR/InlineAsm.h" 27 #include "llvm/IR/IntrinsicInst.h" 28 #include "llvm/IR/LLVMContext.h" 29 #include "llvm/IR/LegacyPassManager.h" 30 #include "llvm/IR/Module.h" 31 #include "llvm/Support/Debug.h" 32 #include "llvm/Support/ErrorHandling.h" 33 #include "llvm/Support/FileSystem.h" 34 #include "llvm/Support/ManagedStatic.h" 35 #include "llvm/Support/MemoryBuffer.h" 36 #include "llvm/Support/Threading.h" 37 #include "llvm/Support/raw_ostream.h" 38 #include <cassert> 39 #include <cstdlib> 40 #include <cstring> 41 #include <system_error> 42 43 using namespace llvm; 44 45 #define DEBUG_TYPE "ir" 46 47 void llvm::initializeCore(PassRegistry &Registry) { 48 initializeDominatorTreeWrapperPassPass(Registry); 49 initializePrintModulePassWrapperPass(Registry); 50 initializePrintFunctionPassWrapperPass(Registry); 51 initializePrintBasicBlockPassPass(Registry); 52 initializeVerifierLegacyPassPass(Registry); 53 } 54 55 void LLVMInitializeCore(LLVMPassRegistryRef R) { 56 initializeCore(*unwrap(R)); 57 } 58 59 void LLVMShutdown() { 60 llvm_shutdown(); 61 } 62 63 /*===-- Error handling ----------------------------------------------------===*/ 64 65 char *LLVMCreateMessage(const char *Message) { 66 return strdup(Message); 67 } 68 69 void LLVMDisposeMessage(char *Message) { 70 free(Message); 71 } 72 73 74 /*===-- Operations on contexts --------------------------------------------===*/ 75 76 LLVMContextRef LLVMContextCreate() { 77 return wrap(new LLVMContext()); 78 } 79 80 LLVMContextRef LLVMGetGlobalContext() { 81 return wrap(&getGlobalContext()); 82 } 83 84 void LLVMContextSetDiagnosticHandler(LLVMContextRef C, 85 LLVMDiagnosticHandler Handler, 86 void *DiagnosticContext) { 87 unwrap(C)->setDiagnosticHandler( 88 LLVM_EXTENSION reinterpret_cast<LLVMContext::DiagnosticHandlerTy>(Handler), 89 DiagnosticContext); 90 } 91 92 void LLVMContextSetYieldCallback(LLVMContextRef C, LLVMYieldCallback Callback, 93 void *OpaqueHandle) { 94 auto YieldCallback = 95 LLVM_EXTENSION reinterpret_cast<LLVMContext::YieldCallbackTy>(Callback); 96 unwrap(C)->setYieldCallback(YieldCallback, OpaqueHandle); 97 } 98 99 void LLVMContextDispose(LLVMContextRef C) { 100 delete unwrap(C); 101 } 102 103 unsigned LLVMGetMDKindIDInContext(LLVMContextRef C, const char* Name, 104 unsigned SLen) { 105 return unwrap(C)->getMDKindID(StringRef(Name, SLen)); 106 } 107 108 unsigned LLVMGetMDKindID(const char* Name, unsigned SLen) { 109 return LLVMGetMDKindIDInContext(LLVMGetGlobalContext(), Name, SLen); 110 } 111 112 char *LLVMGetDiagInfoDescription(LLVMDiagnosticInfoRef DI) { 113 std::string MsgStorage; 114 raw_string_ostream Stream(MsgStorage); 115 DiagnosticPrinterRawOStream DP(Stream); 116 117 unwrap(DI)->print(DP); 118 Stream.flush(); 119 120 return LLVMCreateMessage(MsgStorage.c_str()); 121 } 122 123 LLVMDiagnosticSeverity LLVMGetDiagInfoSeverity(LLVMDiagnosticInfoRef DI){ 124 LLVMDiagnosticSeverity severity; 125 126 switch(unwrap(DI)->getSeverity()) { 127 default: 128 severity = LLVMDSError; 129 break; 130 case DS_Warning: 131 severity = LLVMDSWarning; 132 break; 133 case DS_Remark: 134 severity = LLVMDSRemark; 135 break; 136 case DS_Note: 137 severity = LLVMDSNote; 138 break; 139 } 140 141 return severity; 142 } 143 144 145 146 147 /*===-- Operations on modules ---------------------------------------------===*/ 148 149 LLVMModuleRef LLVMModuleCreateWithName(const char *ModuleID) { 150 return wrap(new Module(ModuleID, getGlobalContext())); 151 } 152 153 LLVMModuleRef LLVMModuleCreateWithNameInContext(const char *ModuleID, 154 LLVMContextRef C) { 155 return wrap(new Module(ModuleID, *unwrap(C))); 156 } 157 158 void LLVMDisposeModule(LLVMModuleRef M) { 159 delete unwrap(M); 160 } 161 162 /*--.. Data layout .........................................................--*/ 163 const char * LLVMGetDataLayout(LLVMModuleRef M) { 164 return unwrap(M)->getDataLayoutStr().c_str(); 165 } 166 167 void LLVMSetDataLayout(LLVMModuleRef M, const char *Triple) { 168 unwrap(M)->setDataLayout(Triple); 169 } 170 171 /*--.. Target triple .......................................................--*/ 172 const char * LLVMGetTarget(LLVMModuleRef M) { 173 return unwrap(M)->getTargetTriple().c_str(); 174 } 175 176 void LLVMSetTarget(LLVMModuleRef M, const char *Triple) { 177 unwrap(M)->setTargetTriple(Triple); 178 } 179 180 void LLVMDumpModule(LLVMModuleRef M) { 181 unwrap(M)->dump(); 182 } 183 184 LLVMBool LLVMPrintModuleToFile(LLVMModuleRef M, const char *Filename, 185 char **ErrorMessage) { 186 std::error_code EC; 187 raw_fd_ostream dest(Filename, EC, sys::fs::F_Text); 188 if (EC) { 189 *ErrorMessage = strdup(EC.message().c_str()); 190 return true; 191 } 192 193 unwrap(M)->print(dest, nullptr); 194 195 dest.close(); 196 197 if (dest.has_error()) { 198 *ErrorMessage = strdup("Error printing to file"); 199 return true; 200 } 201 202 return false; 203 } 204 205 char *LLVMPrintModuleToString(LLVMModuleRef M) { 206 std::string buf; 207 raw_string_ostream os(buf); 208 209 unwrap(M)->print(os, nullptr); 210 os.flush(); 211 212 return strdup(buf.c_str()); 213 } 214 215 /*--.. Operations on inline assembler ......................................--*/ 216 void LLVMSetModuleInlineAsm(LLVMModuleRef M, const char *Asm) { 217 unwrap(M)->setModuleInlineAsm(StringRef(Asm)); 218 } 219 220 221 /*--.. Operations on module contexts ......................................--*/ 222 LLVMContextRef LLVMGetModuleContext(LLVMModuleRef M) { 223 return wrap(&unwrap(M)->getContext()); 224 } 225 226 227 /*===-- Operations on types -----------------------------------------------===*/ 228 229 /*--.. Operations on all types (mostly) ....................................--*/ 230 231 LLVMTypeKind LLVMGetTypeKind(LLVMTypeRef Ty) { 232 switch (unwrap(Ty)->getTypeID()) { 233 case Type::VoidTyID: 234 return LLVMVoidTypeKind; 235 case Type::HalfTyID: 236 return LLVMHalfTypeKind; 237 case Type::FloatTyID: 238 return LLVMFloatTypeKind; 239 case Type::DoubleTyID: 240 return LLVMDoubleTypeKind; 241 case Type::X86_FP80TyID: 242 return LLVMX86_FP80TypeKind; 243 case Type::FP128TyID: 244 return LLVMFP128TypeKind; 245 case Type::PPC_FP128TyID: 246 return LLVMPPC_FP128TypeKind; 247 case Type::LabelTyID: 248 return LLVMLabelTypeKind; 249 case Type::MetadataTyID: 250 return LLVMMetadataTypeKind; 251 case Type::IntegerTyID: 252 return LLVMIntegerTypeKind; 253 case Type::FunctionTyID: 254 return LLVMFunctionTypeKind; 255 case Type::StructTyID: 256 return LLVMStructTypeKind; 257 case Type::ArrayTyID: 258 return LLVMArrayTypeKind; 259 case Type::PointerTyID: 260 return LLVMPointerTypeKind; 261 case Type::VectorTyID: 262 return LLVMVectorTypeKind; 263 case Type::X86_MMXTyID: 264 return LLVMX86_MMXTypeKind; 265 case Type::TokenTyID: 266 return LLVMTokenTypeKind; 267 } 268 llvm_unreachable("Unhandled TypeID."); 269 } 270 271 LLVMBool LLVMTypeIsSized(LLVMTypeRef Ty) 272 { 273 return unwrap(Ty)->isSized(); 274 } 275 276 LLVMContextRef LLVMGetTypeContext(LLVMTypeRef Ty) { 277 return wrap(&unwrap(Ty)->getContext()); 278 } 279 280 void LLVMDumpType(LLVMTypeRef Ty) { 281 return unwrap(Ty)->dump(); 282 } 283 284 char *LLVMPrintTypeToString(LLVMTypeRef Ty) { 285 std::string buf; 286 raw_string_ostream os(buf); 287 288 if (unwrap(Ty)) 289 unwrap(Ty)->print(os); 290 else 291 os << "Printing <null> Type"; 292 293 os.flush(); 294 295 return strdup(buf.c_str()); 296 } 297 298 /*--.. Operations on integer types .........................................--*/ 299 300 LLVMTypeRef LLVMInt1TypeInContext(LLVMContextRef C) { 301 return (LLVMTypeRef) Type::getInt1Ty(*unwrap(C)); 302 } 303 LLVMTypeRef LLVMInt8TypeInContext(LLVMContextRef C) { 304 return (LLVMTypeRef) Type::getInt8Ty(*unwrap(C)); 305 } 306 LLVMTypeRef LLVMInt16TypeInContext(LLVMContextRef C) { 307 return (LLVMTypeRef) Type::getInt16Ty(*unwrap(C)); 308 } 309 LLVMTypeRef LLVMInt32TypeInContext(LLVMContextRef C) { 310 return (LLVMTypeRef) Type::getInt32Ty(*unwrap(C)); 311 } 312 LLVMTypeRef LLVMInt64TypeInContext(LLVMContextRef C) { 313 return (LLVMTypeRef) Type::getInt64Ty(*unwrap(C)); 314 } 315 LLVMTypeRef LLVMInt128TypeInContext(LLVMContextRef C) { 316 return (LLVMTypeRef) Type::getInt128Ty(*unwrap(C)); 317 } 318 LLVMTypeRef LLVMIntTypeInContext(LLVMContextRef C, unsigned NumBits) { 319 return wrap(IntegerType::get(*unwrap(C), NumBits)); 320 } 321 322 LLVMTypeRef LLVMInt1Type(void) { 323 return LLVMInt1TypeInContext(LLVMGetGlobalContext()); 324 } 325 LLVMTypeRef LLVMInt8Type(void) { 326 return LLVMInt8TypeInContext(LLVMGetGlobalContext()); 327 } 328 LLVMTypeRef LLVMInt16Type(void) { 329 return LLVMInt16TypeInContext(LLVMGetGlobalContext()); 330 } 331 LLVMTypeRef LLVMInt32Type(void) { 332 return LLVMInt32TypeInContext(LLVMGetGlobalContext()); 333 } 334 LLVMTypeRef LLVMInt64Type(void) { 335 return LLVMInt64TypeInContext(LLVMGetGlobalContext()); 336 } 337 LLVMTypeRef LLVMInt128Type(void) { 338 return LLVMInt128TypeInContext(LLVMGetGlobalContext()); 339 } 340 LLVMTypeRef LLVMIntType(unsigned NumBits) { 341 return LLVMIntTypeInContext(LLVMGetGlobalContext(), NumBits); 342 } 343 344 unsigned LLVMGetIntTypeWidth(LLVMTypeRef IntegerTy) { 345 return unwrap<IntegerType>(IntegerTy)->getBitWidth(); 346 } 347 348 /*--.. Operations on real types ............................................--*/ 349 350 LLVMTypeRef LLVMHalfTypeInContext(LLVMContextRef C) { 351 return (LLVMTypeRef) Type::getHalfTy(*unwrap(C)); 352 } 353 LLVMTypeRef LLVMFloatTypeInContext(LLVMContextRef C) { 354 return (LLVMTypeRef) Type::getFloatTy(*unwrap(C)); 355 } 356 LLVMTypeRef LLVMDoubleTypeInContext(LLVMContextRef C) { 357 return (LLVMTypeRef) Type::getDoubleTy(*unwrap(C)); 358 } 359 LLVMTypeRef LLVMX86FP80TypeInContext(LLVMContextRef C) { 360 return (LLVMTypeRef) Type::getX86_FP80Ty(*unwrap(C)); 361 } 362 LLVMTypeRef LLVMFP128TypeInContext(LLVMContextRef C) { 363 return (LLVMTypeRef) Type::getFP128Ty(*unwrap(C)); 364 } 365 LLVMTypeRef LLVMPPCFP128TypeInContext(LLVMContextRef C) { 366 return (LLVMTypeRef) Type::getPPC_FP128Ty(*unwrap(C)); 367 } 368 LLVMTypeRef LLVMX86MMXTypeInContext(LLVMContextRef C) { 369 return (LLVMTypeRef) Type::getX86_MMXTy(*unwrap(C)); 370 } 371 LLVMTypeRef LLVMTokenTypeInContext(LLVMContextRef C) { 372 return (LLVMTypeRef) Type::getTokenTy(*unwrap(C)); 373 } 374 375 LLVMTypeRef LLVMHalfType(void) { 376 return LLVMHalfTypeInContext(LLVMGetGlobalContext()); 377 } 378 LLVMTypeRef LLVMFloatType(void) { 379 return LLVMFloatTypeInContext(LLVMGetGlobalContext()); 380 } 381 LLVMTypeRef LLVMDoubleType(void) { 382 return LLVMDoubleTypeInContext(LLVMGetGlobalContext()); 383 } 384 LLVMTypeRef LLVMX86FP80Type(void) { 385 return LLVMX86FP80TypeInContext(LLVMGetGlobalContext()); 386 } 387 LLVMTypeRef LLVMFP128Type(void) { 388 return LLVMFP128TypeInContext(LLVMGetGlobalContext()); 389 } 390 LLVMTypeRef LLVMPPCFP128Type(void) { 391 return LLVMPPCFP128TypeInContext(LLVMGetGlobalContext()); 392 } 393 LLVMTypeRef LLVMX86MMXType(void) { 394 return LLVMX86MMXTypeInContext(LLVMGetGlobalContext()); 395 } 396 397 /*--.. Operations on function types ........................................--*/ 398 399 LLVMTypeRef LLVMFunctionType(LLVMTypeRef ReturnType, 400 LLVMTypeRef *ParamTypes, unsigned ParamCount, 401 LLVMBool IsVarArg) { 402 ArrayRef<Type*> Tys(unwrap(ParamTypes), ParamCount); 403 return wrap(FunctionType::get(unwrap(ReturnType), Tys, IsVarArg != 0)); 404 } 405 406 LLVMBool LLVMIsFunctionVarArg(LLVMTypeRef FunctionTy) { 407 return unwrap<FunctionType>(FunctionTy)->isVarArg(); 408 } 409 410 LLVMTypeRef LLVMGetReturnType(LLVMTypeRef FunctionTy) { 411 return wrap(unwrap<FunctionType>(FunctionTy)->getReturnType()); 412 } 413 414 unsigned LLVMCountParamTypes(LLVMTypeRef FunctionTy) { 415 return unwrap<FunctionType>(FunctionTy)->getNumParams(); 416 } 417 418 void LLVMGetParamTypes(LLVMTypeRef FunctionTy, LLVMTypeRef *Dest) { 419 FunctionType *Ty = unwrap<FunctionType>(FunctionTy); 420 for (FunctionType::param_iterator I = Ty->param_begin(), 421 E = Ty->param_end(); I != E; ++I) 422 *Dest++ = wrap(*I); 423 } 424 425 /*--.. Operations on struct types ..........................................--*/ 426 427 LLVMTypeRef LLVMStructTypeInContext(LLVMContextRef C, LLVMTypeRef *ElementTypes, 428 unsigned ElementCount, LLVMBool Packed) { 429 ArrayRef<Type*> Tys(unwrap(ElementTypes), ElementCount); 430 return wrap(StructType::get(*unwrap(C), Tys, Packed != 0)); 431 } 432 433 LLVMTypeRef LLVMStructType(LLVMTypeRef *ElementTypes, 434 unsigned ElementCount, LLVMBool Packed) { 435 return LLVMStructTypeInContext(LLVMGetGlobalContext(), ElementTypes, 436 ElementCount, Packed); 437 } 438 439 LLVMTypeRef LLVMStructCreateNamed(LLVMContextRef C, const char *Name) 440 { 441 return wrap(StructType::create(*unwrap(C), Name)); 442 } 443 444 const char *LLVMGetStructName(LLVMTypeRef Ty) 445 { 446 StructType *Type = unwrap<StructType>(Ty); 447 if (!Type->hasName()) 448 return nullptr; 449 return Type->getName().data(); 450 } 451 452 void LLVMStructSetBody(LLVMTypeRef StructTy, LLVMTypeRef *ElementTypes, 453 unsigned ElementCount, LLVMBool Packed) { 454 ArrayRef<Type*> Tys(unwrap(ElementTypes), ElementCount); 455 unwrap<StructType>(StructTy)->setBody(Tys, Packed != 0); 456 } 457 458 unsigned LLVMCountStructElementTypes(LLVMTypeRef StructTy) { 459 return unwrap<StructType>(StructTy)->getNumElements(); 460 } 461 462 void LLVMGetStructElementTypes(LLVMTypeRef StructTy, LLVMTypeRef *Dest) { 463 StructType *Ty = unwrap<StructType>(StructTy); 464 for (StructType::element_iterator I = Ty->element_begin(), 465 E = Ty->element_end(); I != E; ++I) 466 *Dest++ = wrap(*I); 467 } 468 469 LLVMTypeRef LLVMStructGetTypeAtIndex(LLVMTypeRef StructTy, unsigned i) { 470 StructType *Ty = unwrap<StructType>(StructTy); 471 return wrap(Ty->getTypeAtIndex(i)); 472 } 473 474 LLVMBool LLVMIsPackedStruct(LLVMTypeRef StructTy) { 475 return unwrap<StructType>(StructTy)->isPacked(); 476 } 477 478 LLVMBool LLVMIsOpaqueStruct(LLVMTypeRef StructTy) { 479 return unwrap<StructType>(StructTy)->isOpaque(); 480 } 481 482 LLVMTypeRef LLVMGetTypeByName(LLVMModuleRef M, const char *Name) { 483 return wrap(unwrap(M)->getTypeByName(Name)); 484 } 485 486 /*--.. Operations on array, pointer, and vector types (sequence types) .....--*/ 487 488 LLVMTypeRef LLVMArrayType(LLVMTypeRef ElementType, unsigned ElementCount) { 489 return wrap(ArrayType::get(unwrap(ElementType), ElementCount)); 490 } 491 492 LLVMTypeRef LLVMPointerType(LLVMTypeRef ElementType, unsigned AddressSpace) { 493 return wrap(PointerType::get(unwrap(ElementType), AddressSpace)); 494 } 495 496 LLVMTypeRef LLVMVectorType(LLVMTypeRef ElementType, unsigned ElementCount) { 497 return wrap(VectorType::get(unwrap(ElementType), ElementCount)); 498 } 499 500 LLVMTypeRef LLVMGetElementType(LLVMTypeRef Ty) { 501 return wrap(unwrap<SequentialType>(Ty)->getElementType()); 502 } 503 504 unsigned LLVMGetArrayLength(LLVMTypeRef ArrayTy) { 505 return unwrap<ArrayType>(ArrayTy)->getNumElements(); 506 } 507 508 unsigned LLVMGetPointerAddressSpace(LLVMTypeRef PointerTy) { 509 return unwrap<PointerType>(PointerTy)->getAddressSpace(); 510 } 511 512 unsigned LLVMGetVectorSize(LLVMTypeRef VectorTy) { 513 return unwrap<VectorType>(VectorTy)->getNumElements(); 514 } 515 516 /*--.. Operations on other types ...........................................--*/ 517 518 LLVMTypeRef LLVMVoidTypeInContext(LLVMContextRef C) { 519 return wrap(Type::getVoidTy(*unwrap(C))); 520 } 521 LLVMTypeRef LLVMLabelTypeInContext(LLVMContextRef C) { 522 return wrap(Type::getLabelTy(*unwrap(C))); 523 } 524 525 LLVMTypeRef LLVMVoidType(void) { 526 return LLVMVoidTypeInContext(LLVMGetGlobalContext()); 527 } 528 LLVMTypeRef LLVMLabelType(void) { 529 return LLVMLabelTypeInContext(LLVMGetGlobalContext()); 530 } 531 532 /*===-- Operations on values ----------------------------------------------===*/ 533 534 /*--.. Operations on all values ............................................--*/ 535 536 LLVMTypeRef LLVMTypeOf(LLVMValueRef Val) { 537 return wrap(unwrap(Val)->getType()); 538 } 539 540 const char *LLVMGetValueName(LLVMValueRef Val) { 541 return unwrap(Val)->getName().data(); 542 } 543 544 void LLVMSetValueName(LLVMValueRef Val, const char *Name) { 545 unwrap(Val)->setName(Name); 546 } 547 548 void LLVMDumpValue(LLVMValueRef Val) { 549 unwrap(Val)->dump(); 550 } 551 552 char* LLVMPrintValueToString(LLVMValueRef Val) { 553 std::string buf; 554 raw_string_ostream os(buf); 555 556 if (unwrap(Val)) 557 unwrap(Val)->print(os); 558 else 559 os << "Printing <null> Value"; 560 561 os.flush(); 562 563 return strdup(buf.c_str()); 564 } 565 566 void LLVMReplaceAllUsesWith(LLVMValueRef OldVal, LLVMValueRef NewVal) { 567 unwrap(OldVal)->replaceAllUsesWith(unwrap(NewVal)); 568 } 569 570 int LLVMHasMetadata(LLVMValueRef Inst) { 571 return unwrap<Instruction>(Inst)->hasMetadata(); 572 } 573 574 LLVMValueRef LLVMGetMetadata(LLVMValueRef Inst, unsigned KindID) { 575 auto *I = unwrap<Instruction>(Inst); 576 assert(I && "Expected instruction"); 577 if (auto *MD = I->getMetadata(KindID)) 578 return wrap(MetadataAsValue::get(I->getContext(), MD)); 579 return nullptr; 580 } 581 582 // MetadataAsValue uses a canonical format which strips the actual MDNode for 583 // MDNode with just a single constant value, storing just a ConstantAsMetadata 584 // This undoes this canonicalization, reconstructing the MDNode. 585 static MDNode *extractMDNode(MetadataAsValue *MAV) { 586 Metadata *MD = MAV->getMetadata(); 587 assert((isa<MDNode>(MD) || isa<ConstantAsMetadata>(MD)) && 588 "Expected a metadata node or a canonicalized constant"); 589 590 if (MDNode *N = dyn_cast<MDNode>(MD)) 591 return N; 592 593 return MDNode::get(MAV->getContext(), MD); 594 } 595 596 void LLVMSetMetadata(LLVMValueRef Inst, unsigned KindID, LLVMValueRef Val) { 597 MDNode *N = Val ? extractMDNode(unwrap<MetadataAsValue>(Val)) : nullptr; 598 599 unwrap<Instruction>(Inst)->setMetadata(KindID, N); 600 } 601 602 /*--.. Conversion functions ................................................--*/ 603 604 #define LLVM_DEFINE_VALUE_CAST(name) \ 605 LLVMValueRef LLVMIsA##name(LLVMValueRef Val) { \ 606 return wrap(static_cast<Value*>(dyn_cast_or_null<name>(unwrap(Val)))); \ 607 } 608 609 LLVM_FOR_EACH_VALUE_SUBCLASS(LLVM_DEFINE_VALUE_CAST) 610 611 LLVMValueRef LLVMIsAMDNode(LLVMValueRef Val) { 612 if (auto *MD = dyn_cast_or_null<MetadataAsValue>(unwrap(Val))) 613 if (isa<MDNode>(MD->getMetadata()) || 614 isa<ValueAsMetadata>(MD->getMetadata())) 615 return Val; 616 return nullptr; 617 } 618 619 LLVMValueRef LLVMIsAMDString(LLVMValueRef Val) { 620 if (auto *MD = dyn_cast_or_null<MetadataAsValue>(unwrap(Val))) 621 if (isa<MDString>(MD->getMetadata())) 622 return Val; 623 return nullptr; 624 } 625 626 /*--.. Operations on Uses ..................................................--*/ 627 LLVMUseRef LLVMGetFirstUse(LLVMValueRef Val) { 628 Value *V = unwrap(Val); 629 Value::use_iterator I = V->use_begin(); 630 if (I == V->use_end()) 631 return nullptr; 632 return wrap(&*I); 633 } 634 635 LLVMUseRef LLVMGetNextUse(LLVMUseRef U) { 636 Use *Next = unwrap(U)->getNext(); 637 if (Next) 638 return wrap(Next); 639 return nullptr; 640 } 641 642 LLVMValueRef LLVMGetUser(LLVMUseRef U) { 643 return wrap(unwrap(U)->getUser()); 644 } 645 646 LLVMValueRef LLVMGetUsedValue(LLVMUseRef U) { 647 return wrap(unwrap(U)->get()); 648 } 649 650 /*--.. Operations on Users .................................................--*/ 651 652 static LLVMValueRef getMDNodeOperandImpl(LLVMContext &Context, const MDNode *N, 653 unsigned Index) { 654 Metadata *Op = N->getOperand(Index); 655 if (!Op) 656 return nullptr; 657 if (auto *C = dyn_cast<ConstantAsMetadata>(Op)) 658 return wrap(C->getValue()); 659 return wrap(MetadataAsValue::get(Context, Op)); 660 } 661 662 LLVMValueRef LLVMGetOperand(LLVMValueRef Val, unsigned Index) { 663 Value *V = unwrap(Val); 664 if (auto *MD = dyn_cast<MetadataAsValue>(V)) { 665 if (auto *L = dyn_cast<ValueAsMetadata>(MD->getMetadata())) { 666 assert(Index == 0 && "Function-local metadata can only have one operand"); 667 return wrap(L->getValue()); 668 } 669 return getMDNodeOperandImpl(V->getContext(), 670 cast<MDNode>(MD->getMetadata()), Index); 671 } 672 673 return wrap(cast<User>(V)->getOperand(Index)); 674 } 675 676 LLVMUseRef LLVMGetOperandUse(LLVMValueRef Val, unsigned Index) { 677 Value *V = unwrap(Val); 678 return wrap(&cast<User>(V)->getOperandUse(Index)); 679 } 680 681 void LLVMSetOperand(LLVMValueRef Val, unsigned Index, LLVMValueRef Op) { 682 unwrap<User>(Val)->setOperand(Index, unwrap(Op)); 683 } 684 685 int LLVMGetNumOperands(LLVMValueRef Val) { 686 Value *V = unwrap(Val); 687 if (isa<MetadataAsValue>(V)) 688 return LLVMGetMDNodeNumOperands(Val); 689 690 return cast<User>(V)->getNumOperands(); 691 } 692 693 /*--.. Operations on constants of any type .................................--*/ 694 695 LLVMValueRef LLVMConstNull(LLVMTypeRef Ty) { 696 return wrap(Constant::getNullValue(unwrap(Ty))); 697 } 698 699 LLVMValueRef LLVMConstAllOnes(LLVMTypeRef Ty) { 700 return wrap(Constant::getAllOnesValue(unwrap(Ty))); 701 } 702 703 LLVMValueRef LLVMGetUndef(LLVMTypeRef Ty) { 704 return wrap(UndefValue::get(unwrap(Ty))); 705 } 706 707 LLVMBool LLVMIsConstant(LLVMValueRef Ty) { 708 return isa<Constant>(unwrap(Ty)); 709 } 710 711 LLVMBool LLVMIsNull(LLVMValueRef Val) { 712 if (Constant *C = dyn_cast<Constant>(unwrap(Val))) 713 return C->isNullValue(); 714 return false; 715 } 716 717 LLVMBool LLVMIsUndef(LLVMValueRef Val) { 718 return isa<UndefValue>(unwrap(Val)); 719 } 720 721 LLVMValueRef LLVMConstPointerNull(LLVMTypeRef Ty) { 722 return 723 wrap(ConstantPointerNull::get(unwrap<PointerType>(Ty))); 724 } 725 726 /*--.. Operations on metadata nodes ........................................--*/ 727 728 LLVMValueRef LLVMMDStringInContext(LLVMContextRef C, const char *Str, 729 unsigned SLen) { 730 LLVMContext &Context = *unwrap(C); 731 return wrap(MetadataAsValue::get( 732 Context, MDString::get(Context, StringRef(Str, SLen)))); 733 } 734 735 LLVMValueRef LLVMMDString(const char *Str, unsigned SLen) { 736 return LLVMMDStringInContext(LLVMGetGlobalContext(), Str, SLen); 737 } 738 739 LLVMValueRef LLVMMDNodeInContext(LLVMContextRef C, LLVMValueRef *Vals, 740 unsigned Count) { 741 LLVMContext &Context = *unwrap(C); 742 SmallVector<Metadata *, 8> MDs; 743 for (auto *OV : makeArrayRef(Vals, Count)) { 744 Value *V = unwrap(OV); 745 Metadata *MD; 746 if (!V) 747 MD = nullptr; 748 else if (auto *C = dyn_cast<Constant>(V)) 749 MD = ConstantAsMetadata::get(C); 750 else if (auto *MDV = dyn_cast<MetadataAsValue>(V)) { 751 MD = MDV->getMetadata(); 752 assert(!isa<LocalAsMetadata>(MD) && "Unexpected function-local metadata " 753 "outside of direct argument to call"); 754 } else { 755 // This is function-local metadata. Pretend to make an MDNode. 756 assert(Count == 1 && 757 "Expected only one operand to function-local metadata"); 758 return wrap(MetadataAsValue::get(Context, LocalAsMetadata::get(V))); 759 } 760 761 MDs.push_back(MD); 762 } 763 return wrap(MetadataAsValue::get(Context, MDNode::get(Context, MDs))); 764 } 765 766 LLVMValueRef LLVMMDNode(LLVMValueRef *Vals, unsigned Count) { 767 return LLVMMDNodeInContext(LLVMGetGlobalContext(), Vals, Count); 768 } 769 770 const char *LLVMGetMDString(LLVMValueRef V, unsigned* Len) { 771 if (const auto *MD = dyn_cast<MetadataAsValue>(unwrap(V))) 772 if (const MDString *S = dyn_cast<MDString>(MD->getMetadata())) { 773 *Len = S->getString().size(); 774 return S->getString().data(); 775 } 776 *Len = 0; 777 return nullptr; 778 } 779 780 unsigned LLVMGetMDNodeNumOperands(LLVMValueRef V) 781 { 782 auto *MD = cast<MetadataAsValue>(unwrap(V)); 783 if (isa<ValueAsMetadata>(MD->getMetadata())) 784 return 1; 785 return cast<MDNode>(MD->getMetadata())->getNumOperands(); 786 } 787 788 void LLVMGetMDNodeOperands(LLVMValueRef V, LLVMValueRef *Dest) 789 { 790 auto *MD = cast<MetadataAsValue>(unwrap(V)); 791 if (auto *MDV = dyn_cast<ValueAsMetadata>(MD->getMetadata())) { 792 *Dest = wrap(MDV->getValue()); 793 return; 794 } 795 const auto *N = cast<MDNode>(MD->getMetadata()); 796 const unsigned numOperands = N->getNumOperands(); 797 LLVMContext &Context = unwrap(V)->getContext(); 798 for (unsigned i = 0; i < numOperands; i++) 799 Dest[i] = getMDNodeOperandImpl(Context, N, i); 800 } 801 802 unsigned LLVMGetNamedMetadataNumOperands(LLVMModuleRef M, const char* name) 803 { 804 if (NamedMDNode *N = unwrap(M)->getNamedMetadata(name)) { 805 return N->getNumOperands(); 806 } 807 return 0; 808 } 809 810 void LLVMGetNamedMetadataOperands(LLVMModuleRef M, const char* name, LLVMValueRef *Dest) 811 { 812 NamedMDNode *N = unwrap(M)->getNamedMetadata(name); 813 if (!N) 814 return; 815 LLVMContext &Context = unwrap(M)->getContext(); 816 for (unsigned i=0;i<N->getNumOperands();i++) 817 Dest[i] = wrap(MetadataAsValue::get(Context, N->getOperand(i))); 818 } 819 820 void LLVMAddNamedMetadataOperand(LLVMModuleRef M, const char* name, 821 LLVMValueRef Val) 822 { 823 NamedMDNode *N = unwrap(M)->getOrInsertNamedMetadata(name); 824 if (!N) 825 return; 826 if (!Val) 827 return; 828 N->addOperand(extractMDNode(unwrap<MetadataAsValue>(Val))); 829 } 830 831 /*--.. Operations on scalar constants ......................................--*/ 832 833 LLVMValueRef LLVMConstInt(LLVMTypeRef IntTy, unsigned long long N, 834 LLVMBool SignExtend) { 835 return wrap(ConstantInt::get(unwrap<IntegerType>(IntTy), N, SignExtend != 0)); 836 } 837 838 LLVMValueRef LLVMConstIntOfArbitraryPrecision(LLVMTypeRef IntTy, 839 unsigned NumWords, 840 const uint64_t Words[]) { 841 IntegerType *Ty = unwrap<IntegerType>(IntTy); 842 return wrap(ConstantInt::get(Ty->getContext(), 843 APInt(Ty->getBitWidth(), 844 makeArrayRef(Words, NumWords)))); 845 } 846 847 LLVMValueRef LLVMConstIntOfString(LLVMTypeRef IntTy, const char Str[], 848 uint8_t Radix) { 849 return wrap(ConstantInt::get(unwrap<IntegerType>(IntTy), StringRef(Str), 850 Radix)); 851 } 852 853 LLVMValueRef LLVMConstIntOfStringAndSize(LLVMTypeRef IntTy, const char Str[], 854 unsigned SLen, uint8_t Radix) { 855 return wrap(ConstantInt::get(unwrap<IntegerType>(IntTy), StringRef(Str, SLen), 856 Radix)); 857 } 858 859 LLVMValueRef LLVMConstReal(LLVMTypeRef RealTy, double N) { 860 return wrap(ConstantFP::get(unwrap(RealTy), N)); 861 } 862 863 LLVMValueRef LLVMConstRealOfString(LLVMTypeRef RealTy, const char *Text) { 864 return wrap(ConstantFP::get(unwrap(RealTy), StringRef(Text))); 865 } 866 867 LLVMValueRef LLVMConstRealOfStringAndSize(LLVMTypeRef RealTy, const char Str[], 868 unsigned SLen) { 869 return wrap(ConstantFP::get(unwrap(RealTy), StringRef(Str, SLen))); 870 } 871 872 unsigned long long LLVMConstIntGetZExtValue(LLVMValueRef ConstantVal) { 873 return unwrap<ConstantInt>(ConstantVal)->getZExtValue(); 874 } 875 876 long long LLVMConstIntGetSExtValue(LLVMValueRef ConstantVal) { 877 return unwrap<ConstantInt>(ConstantVal)->getSExtValue(); 878 } 879 880 double LLVMConstRealGetDouble(LLVMValueRef ConstantVal, LLVMBool *LosesInfo) { 881 ConstantFP *cFP = unwrap<ConstantFP>(ConstantVal) ; 882 Type *Ty = cFP->getType(); 883 884 if (Ty->isFloatTy()) { 885 *LosesInfo = false; 886 return cFP->getValueAPF().convertToFloat(); 887 } 888 889 if (Ty->isDoubleTy()) { 890 *LosesInfo = false; 891 return cFP->getValueAPF().convertToDouble(); 892 } 893 894 bool APFLosesInfo; 895 APFloat APF = cFP->getValueAPF(); 896 APF.convert(APFloat::IEEEdouble, APFloat::rmNearestTiesToEven, &APFLosesInfo); 897 *LosesInfo = APFLosesInfo; 898 return APF.convertToDouble(); 899 } 900 901 /*--.. Operations on composite constants ...................................--*/ 902 903 LLVMValueRef LLVMConstStringInContext(LLVMContextRef C, const char *Str, 904 unsigned Length, 905 LLVMBool DontNullTerminate) { 906 /* Inverted the sense of AddNull because ', 0)' is a 907 better mnemonic for null termination than ', 1)'. */ 908 return wrap(ConstantDataArray::getString(*unwrap(C), StringRef(Str, Length), 909 DontNullTerminate == 0)); 910 } 911 LLVMValueRef LLVMConstStructInContext(LLVMContextRef C, 912 LLVMValueRef *ConstantVals, 913 unsigned Count, LLVMBool Packed) { 914 Constant **Elements = unwrap<Constant>(ConstantVals, Count); 915 return wrap(ConstantStruct::getAnon(*unwrap(C), makeArrayRef(Elements, Count), 916 Packed != 0)); 917 } 918 919 LLVMValueRef LLVMConstString(const char *Str, unsigned Length, 920 LLVMBool DontNullTerminate) { 921 return LLVMConstStringInContext(LLVMGetGlobalContext(), Str, Length, 922 DontNullTerminate); 923 } 924 925 LLVMValueRef LLVMGetElementAsConstant(LLVMValueRef c, unsigned idx) { 926 return wrap(static_cast<ConstantDataSequential*>(unwrap(c))->getElementAsConstant(idx)); 927 } 928 929 LLVMBool LLVMIsConstantString(LLVMValueRef c) { 930 return static_cast<ConstantDataSequential*>(unwrap(c))->isString(); 931 } 932 933 const char *LLVMGetAsString(LLVMValueRef c, size_t* Length) { 934 StringRef str = static_cast<ConstantDataSequential*>(unwrap(c))->getAsString(); 935 *Length = str.size(); 936 return str.data(); 937 } 938 939 LLVMValueRef LLVMConstArray(LLVMTypeRef ElementTy, 940 LLVMValueRef *ConstantVals, unsigned Length) { 941 ArrayRef<Constant*> V(unwrap<Constant>(ConstantVals, Length), Length); 942 return wrap(ConstantArray::get(ArrayType::get(unwrap(ElementTy), Length), V)); 943 } 944 945 LLVMValueRef LLVMConstStruct(LLVMValueRef *ConstantVals, unsigned Count, 946 LLVMBool Packed) { 947 return LLVMConstStructInContext(LLVMGetGlobalContext(), ConstantVals, Count, 948 Packed); 949 } 950 951 LLVMValueRef LLVMConstNamedStruct(LLVMTypeRef StructTy, 952 LLVMValueRef *ConstantVals, 953 unsigned Count) { 954 Constant **Elements = unwrap<Constant>(ConstantVals, Count); 955 StructType *Ty = cast<StructType>(unwrap(StructTy)); 956 957 return wrap(ConstantStruct::get(Ty, makeArrayRef(Elements, Count))); 958 } 959 960 LLVMValueRef LLVMConstVector(LLVMValueRef *ScalarConstantVals, unsigned Size) { 961 return wrap(ConstantVector::get(makeArrayRef( 962 unwrap<Constant>(ScalarConstantVals, Size), Size))); 963 } 964 965 /*-- Opcode mapping */ 966 967 static LLVMOpcode map_to_llvmopcode(int opcode) 968 { 969 switch (opcode) { 970 default: llvm_unreachable("Unhandled Opcode."); 971 #define HANDLE_INST(num, opc, clas) case num: return LLVM##opc; 972 #include "llvm/IR/Instruction.def" 973 #undef HANDLE_INST 974 } 975 } 976 977 static int map_from_llvmopcode(LLVMOpcode code) 978 { 979 switch (code) { 980 #define HANDLE_INST(num, opc, clas) case LLVM##opc: return num; 981 #include "llvm/IR/Instruction.def" 982 #undef HANDLE_INST 983 } 984 llvm_unreachable("Unhandled Opcode."); 985 } 986 987 /*--.. Constant expressions ................................................--*/ 988 989 LLVMOpcode LLVMGetConstOpcode(LLVMValueRef ConstantVal) { 990 return map_to_llvmopcode(unwrap<ConstantExpr>(ConstantVal)->getOpcode()); 991 } 992 993 LLVMValueRef LLVMAlignOf(LLVMTypeRef Ty) { 994 return wrap(ConstantExpr::getAlignOf(unwrap(Ty))); 995 } 996 997 LLVMValueRef LLVMSizeOf(LLVMTypeRef Ty) { 998 return wrap(ConstantExpr::getSizeOf(unwrap(Ty))); 999 } 1000 1001 LLVMValueRef LLVMConstNeg(LLVMValueRef ConstantVal) { 1002 return wrap(ConstantExpr::getNeg(unwrap<Constant>(ConstantVal))); 1003 } 1004 1005 LLVMValueRef LLVMConstNSWNeg(LLVMValueRef ConstantVal) { 1006 return wrap(ConstantExpr::getNSWNeg(unwrap<Constant>(ConstantVal))); 1007 } 1008 1009 LLVMValueRef LLVMConstNUWNeg(LLVMValueRef ConstantVal) { 1010 return wrap(ConstantExpr::getNUWNeg(unwrap<Constant>(ConstantVal))); 1011 } 1012 1013 1014 LLVMValueRef LLVMConstFNeg(LLVMValueRef ConstantVal) { 1015 return wrap(ConstantExpr::getFNeg(unwrap<Constant>(ConstantVal))); 1016 } 1017 1018 LLVMValueRef LLVMConstNot(LLVMValueRef ConstantVal) { 1019 return wrap(ConstantExpr::getNot(unwrap<Constant>(ConstantVal))); 1020 } 1021 1022 LLVMValueRef LLVMConstAdd(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1023 return wrap(ConstantExpr::getAdd(unwrap<Constant>(LHSConstant), 1024 unwrap<Constant>(RHSConstant))); 1025 } 1026 1027 LLVMValueRef LLVMConstNSWAdd(LLVMValueRef LHSConstant, 1028 LLVMValueRef RHSConstant) { 1029 return wrap(ConstantExpr::getNSWAdd(unwrap<Constant>(LHSConstant), 1030 unwrap<Constant>(RHSConstant))); 1031 } 1032 1033 LLVMValueRef LLVMConstNUWAdd(LLVMValueRef LHSConstant, 1034 LLVMValueRef RHSConstant) { 1035 return wrap(ConstantExpr::getNUWAdd(unwrap<Constant>(LHSConstant), 1036 unwrap<Constant>(RHSConstant))); 1037 } 1038 1039 LLVMValueRef LLVMConstFAdd(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1040 return wrap(ConstantExpr::getFAdd(unwrap<Constant>(LHSConstant), 1041 unwrap<Constant>(RHSConstant))); 1042 } 1043 1044 LLVMValueRef LLVMConstSub(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1045 return wrap(ConstantExpr::getSub(unwrap<Constant>(LHSConstant), 1046 unwrap<Constant>(RHSConstant))); 1047 } 1048 1049 LLVMValueRef LLVMConstNSWSub(LLVMValueRef LHSConstant, 1050 LLVMValueRef RHSConstant) { 1051 return wrap(ConstantExpr::getNSWSub(unwrap<Constant>(LHSConstant), 1052 unwrap<Constant>(RHSConstant))); 1053 } 1054 1055 LLVMValueRef LLVMConstNUWSub(LLVMValueRef LHSConstant, 1056 LLVMValueRef RHSConstant) { 1057 return wrap(ConstantExpr::getNUWSub(unwrap<Constant>(LHSConstant), 1058 unwrap<Constant>(RHSConstant))); 1059 } 1060 1061 LLVMValueRef LLVMConstFSub(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1062 return wrap(ConstantExpr::getFSub(unwrap<Constant>(LHSConstant), 1063 unwrap<Constant>(RHSConstant))); 1064 } 1065 1066 LLVMValueRef LLVMConstMul(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1067 return wrap(ConstantExpr::getMul(unwrap<Constant>(LHSConstant), 1068 unwrap<Constant>(RHSConstant))); 1069 } 1070 1071 LLVMValueRef LLVMConstNSWMul(LLVMValueRef LHSConstant, 1072 LLVMValueRef RHSConstant) { 1073 return wrap(ConstantExpr::getNSWMul(unwrap<Constant>(LHSConstant), 1074 unwrap<Constant>(RHSConstant))); 1075 } 1076 1077 LLVMValueRef LLVMConstNUWMul(LLVMValueRef LHSConstant, 1078 LLVMValueRef RHSConstant) { 1079 return wrap(ConstantExpr::getNUWMul(unwrap<Constant>(LHSConstant), 1080 unwrap<Constant>(RHSConstant))); 1081 } 1082 1083 LLVMValueRef LLVMConstFMul(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1084 return wrap(ConstantExpr::getFMul(unwrap<Constant>(LHSConstant), 1085 unwrap<Constant>(RHSConstant))); 1086 } 1087 1088 LLVMValueRef LLVMConstUDiv(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1089 return wrap(ConstantExpr::getUDiv(unwrap<Constant>(LHSConstant), 1090 unwrap<Constant>(RHSConstant))); 1091 } 1092 1093 LLVMValueRef LLVMConstSDiv(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1094 return wrap(ConstantExpr::getSDiv(unwrap<Constant>(LHSConstant), 1095 unwrap<Constant>(RHSConstant))); 1096 } 1097 1098 LLVMValueRef LLVMConstExactSDiv(LLVMValueRef LHSConstant, 1099 LLVMValueRef RHSConstant) { 1100 return wrap(ConstantExpr::getExactSDiv(unwrap<Constant>(LHSConstant), 1101 unwrap<Constant>(RHSConstant))); 1102 } 1103 1104 LLVMValueRef LLVMConstFDiv(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1105 return wrap(ConstantExpr::getFDiv(unwrap<Constant>(LHSConstant), 1106 unwrap<Constant>(RHSConstant))); 1107 } 1108 1109 LLVMValueRef LLVMConstURem(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1110 return wrap(ConstantExpr::getURem(unwrap<Constant>(LHSConstant), 1111 unwrap<Constant>(RHSConstant))); 1112 } 1113 1114 LLVMValueRef LLVMConstSRem(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1115 return wrap(ConstantExpr::getSRem(unwrap<Constant>(LHSConstant), 1116 unwrap<Constant>(RHSConstant))); 1117 } 1118 1119 LLVMValueRef LLVMConstFRem(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1120 return wrap(ConstantExpr::getFRem(unwrap<Constant>(LHSConstant), 1121 unwrap<Constant>(RHSConstant))); 1122 } 1123 1124 LLVMValueRef LLVMConstAnd(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1125 return wrap(ConstantExpr::getAnd(unwrap<Constant>(LHSConstant), 1126 unwrap<Constant>(RHSConstant))); 1127 } 1128 1129 LLVMValueRef LLVMConstOr(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1130 return wrap(ConstantExpr::getOr(unwrap<Constant>(LHSConstant), 1131 unwrap<Constant>(RHSConstant))); 1132 } 1133 1134 LLVMValueRef LLVMConstXor(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1135 return wrap(ConstantExpr::getXor(unwrap<Constant>(LHSConstant), 1136 unwrap<Constant>(RHSConstant))); 1137 } 1138 1139 LLVMValueRef LLVMConstICmp(LLVMIntPredicate Predicate, 1140 LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1141 return wrap(ConstantExpr::getICmp(Predicate, 1142 unwrap<Constant>(LHSConstant), 1143 unwrap<Constant>(RHSConstant))); 1144 } 1145 1146 LLVMValueRef LLVMConstFCmp(LLVMRealPredicate Predicate, 1147 LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1148 return wrap(ConstantExpr::getFCmp(Predicate, 1149 unwrap<Constant>(LHSConstant), 1150 unwrap<Constant>(RHSConstant))); 1151 } 1152 1153 LLVMValueRef LLVMConstShl(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1154 return wrap(ConstantExpr::getShl(unwrap<Constant>(LHSConstant), 1155 unwrap<Constant>(RHSConstant))); 1156 } 1157 1158 LLVMValueRef LLVMConstLShr(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1159 return wrap(ConstantExpr::getLShr(unwrap<Constant>(LHSConstant), 1160 unwrap<Constant>(RHSConstant))); 1161 } 1162 1163 LLVMValueRef LLVMConstAShr(LLVMValueRef LHSConstant, LLVMValueRef RHSConstant) { 1164 return wrap(ConstantExpr::getAShr(unwrap<Constant>(LHSConstant), 1165 unwrap<Constant>(RHSConstant))); 1166 } 1167 1168 LLVMValueRef LLVMConstGEP(LLVMValueRef ConstantVal, 1169 LLVMValueRef *ConstantIndices, unsigned NumIndices) { 1170 ArrayRef<Constant *> IdxList(unwrap<Constant>(ConstantIndices, NumIndices), 1171 NumIndices); 1172 return wrap(ConstantExpr::getGetElementPtr( 1173 nullptr, unwrap<Constant>(ConstantVal), IdxList)); 1174 } 1175 1176 LLVMValueRef LLVMConstInBoundsGEP(LLVMValueRef ConstantVal, 1177 LLVMValueRef *ConstantIndices, 1178 unsigned NumIndices) { 1179 Constant* Val = unwrap<Constant>(ConstantVal); 1180 ArrayRef<Constant *> IdxList(unwrap<Constant>(ConstantIndices, NumIndices), 1181 NumIndices); 1182 return wrap(ConstantExpr::getInBoundsGetElementPtr(nullptr, Val, IdxList)); 1183 } 1184 1185 LLVMValueRef LLVMConstTrunc(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1186 return wrap(ConstantExpr::getTrunc(unwrap<Constant>(ConstantVal), 1187 unwrap(ToType))); 1188 } 1189 1190 LLVMValueRef LLVMConstSExt(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1191 return wrap(ConstantExpr::getSExt(unwrap<Constant>(ConstantVal), 1192 unwrap(ToType))); 1193 } 1194 1195 LLVMValueRef LLVMConstZExt(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1196 return wrap(ConstantExpr::getZExt(unwrap<Constant>(ConstantVal), 1197 unwrap(ToType))); 1198 } 1199 1200 LLVMValueRef LLVMConstFPTrunc(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1201 return wrap(ConstantExpr::getFPTrunc(unwrap<Constant>(ConstantVal), 1202 unwrap(ToType))); 1203 } 1204 1205 LLVMValueRef LLVMConstFPExt(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1206 return wrap(ConstantExpr::getFPExtend(unwrap<Constant>(ConstantVal), 1207 unwrap(ToType))); 1208 } 1209 1210 LLVMValueRef LLVMConstUIToFP(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1211 return wrap(ConstantExpr::getUIToFP(unwrap<Constant>(ConstantVal), 1212 unwrap(ToType))); 1213 } 1214 1215 LLVMValueRef LLVMConstSIToFP(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1216 return wrap(ConstantExpr::getSIToFP(unwrap<Constant>(ConstantVal), 1217 unwrap(ToType))); 1218 } 1219 1220 LLVMValueRef LLVMConstFPToUI(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1221 return wrap(ConstantExpr::getFPToUI(unwrap<Constant>(ConstantVal), 1222 unwrap(ToType))); 1223 } 1224 1225 LLVMValueRef LLVMConstFPToSI(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1226 return wrap(ConstantExpr::getFPToSI(unwrap<Constant>(ConstantVal), 1227 unwrap(ToType))); 1228 } 1229 1230 LLVMValueRef LLVMConstPtrToInt(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1231 return wrap(ConstantExpr::getPtrToInt(unwrap<Constant>(ConstantVal), 1232 unwrap(ToType))); 1233 } 1234 1235 LLVMValueRef LLVMConstIntToPtr(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1236 return wrap(ConstantExpr::getIntToPtr(unwrap<Constant>(ConstantVal), 1237 unwrap(ToType))); 1238 } 1239 1240 LLVMValueRef LLVMConstBitCast(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1241 return wrap(ConstantExpr::getBitCast(unwrap<Constant>(ConstantVal), 1242 unwrap(ToType))); 1243 } 1244 1245 LLVMValueRef LLVMConstAddrSpaceCast(LLVMValueRef ConstantVal, 1246 LLVMTypeRef ToType) { 1247 return wrap(ConstantExpr::getAddrSpaceCast(unwrap<Constant>(ConstantVal), 1248 unwrap(ToType))); 1249 } 1250 1251 LLVMValueRef LLVMConstZExtOrBitCast(LLVMValueRef ConstantVal, 1252 LLVMTypeRef ToType) { 1253 return wrap(ConstantExpr::getZExtOrBitCast(unwrap<Constant>(ConstantVal), 1254 unwrap(ToType))); 1255 } 1256 1257 LLVMValueRef LLVMConstSExtOrBitCast(LLVMValueRef ConstantVal, 1258 LLVMTypeRef ToType) { 1259 return wrap(ConstantExpr::getSExtOrBitCast(unwrap<Constant>(ConstantVal), 1260 unwrap(ToType))); 1261 } 1262 1263 LLVMValueRef LLVMConstTruncOrBitCast(LLVMValueRef ConstantVal, 1264 LLVMTypeRef ToType) { 1265 return wrap(ConstantExpr::getTruncOrBitCast(unwrap<Constant>(ConstantVal), 1266 unwrap(ToType))); 1267 } 1268 1269 LLVMValueRef LLVMConstPointerCast(LLVMValueRef ConstantVal, 1270 LLVMTypeRef ToType) { 1271 return wrap(ConstantExpr::getPointerCast(unwrap<Constant>(ConstantVal), 1272 unwrap(ToType))); 1273 } 1274 1275 LLVMValueRef LLVMConstIntCast(LLVMValueRef ConstantVal, LLVMTypeRef ToType, 1276 LLVMBool isSigned) { 1277 return wrap(ConstantExpr::getIntegerCast(unwrap<Constant>(ConstantVal), 1278 unwrap(ToType), isSigned)); 1279 } 1280 1281 LLVMValueRef LLVMConstFPCast(LLVMValueRef ConstantVal, LLVMTypeRef ToType) { 1282 return wrap(ConstantExpr::getFPCast(unwrap<Constant>(ConstantVal), 1283 unwrap(ToType))); 1284 } 1285 1286 LLVMValueRef LLVMConstSelect(LLVMValueRef ConstantCondition, 1287 LLVMValueRef ConstantIfTrue, 1288 LLVMValueRef ConstantIfFalse) { 1289 return wrap(ConstantExpr::getSelect(unwrap<Constant>(ConstantCondition), 1290 unwrap<Constant>(ConstantIfTrue), 1291 unwrap<Constant>(ConstantIfFalse))); 1292 } 1293 1294 LLVMValueRef LLVMConstExtractElement(LLVMValueRef VectorConstant, 1295 LLVMValueRef IndexConstant) { 1296 return wrap(ConstantExpr::getExtractElement(unwrap<Constant>(VectorConstant), 1297 unwrap<Constant>(IndexConstant))); 1298 } 1299 1300 LLVMValueRef LLVMConstInsertElement(LLVMValueRef VectorConstant, 1301 LLVMValueRef ElementValueConstant, 1302 LLVMValueRef IndexConstant) { 1303 return wrap(ConstantExpr::getInsertElement(unwrap<Constant>(VectorConstant), 1304 unwrap<Constant>(ElementValueConstant), 1305 unwrap<Constant>(IndexConstant))); 1306 } 1307 1308 LLVMValueRef LLVMConstShuffleVector(LLVMValueRef VectorAConstant, 1309 LLVMValueRef VectorBConstant, 1310 LLVMValueRef MaskConstant) { 1311 return wrap(ConstantExpr::getShuffleVector(unwrap<Constant>(VectorAConstant), 1312 unwrap<Constant>(VectorBConstant), 1313 unwrap<Constant>(MaskConstant))); 1314 } 1315 1316 LLVMValueRef LLVMConstExtractValue(LLVMValueRef AggConstant, unsigned *IdxList, 1317 unsigned NumIdx) { 1318 return wrap(ConstantExpr::getExtractValue(unwrap<Constant>(AggConstant), 1319 makeArrayRef(IdxList, NumIdx))); 1320 } 1321 1322 LLVMValueRef LLVMConstInsertValue(LLVMValueRef AggConstant, 1323 LLVMValueRef ElementValueConstant, 1324 unsigned *IdxList, unsigned NumIdx) { 1325 return wrap(ConstantExpr::getInsertValue(unwrap<Constant>(AggConstant), 1326 unwrap<Constant>(ElementValueConstant), 1327 makeArrayRef(IdxList, NumIdx))); 1328 } 1329 1330 LLVMValueRef LLVMConstInlineAsm(LLVMTypeRef Ty, const char *AsmString, 1331 const char *Constraints, 1332 LLVMBool HasSideEffects, 1333 LLVMBool IsAlignStack) { 1334 return wrap(InlineAsm::get(dyn_cast<FunctionType>(unwrap(Ty)), AsmString, 1335 Constraints, HasSideEffects, IsAlignStack)); 1336 } 1337 1338 LLVMValueRef LLVMBlockAddress(LLVMValueRef F, LLVMBasicBlockRef BB) { 1339 return wrap(BlockAddress::get(unwrap<Function>(F), unwrap(BB))); 1340 } 1341 1342 /*--.. Operations on global variables, functions, and aliases (globals) ....--*/ 1343 1344 LLVMModuleRef LLVMGetGlobalParent(LLVMValueRef Global) { 1345 return wrap(unwrap<GlobalValue>(Global)->getParent()); 1346 } 1347 1348 LLVMBool LLVMIsDeclaration(LLVMValueRef Global) { 1349 return unwrap<GlobalValue>(Global)->isDeclaration(); 1350 } 1351 1352 LLVMLinkage LLVMGetLinkage(LLVMValueRef Global) { 1353 switch (unwrap<GlobalValue>(Global)->getLinkage()) { 1354 case GlobalValue::ExternalLinkage: 1355 return LLVMExternalLinkage; 1356 case GlobalValue::AvailableExternallyLinkage: 1357 return LLVMAvailableExternallyLinkage; 1358 case GlobalValue::LinkOnceAnyLinkage: 1359 return LLVMLinkOnceAnyLinkage; 1360 case GlobalValue::LinkOnceODRLinkage: 1361 return LLVMLinkOnceODRLinkage; 1362 case GlobalValue::WeakAnyLinkage: 1363 return LLVMWeakAnyLinkage; 1364 case GlobalValue::WeakODRLinkage: 1365 return LLVMWeakODRLinkage; 1366 case GlobalValue::AppendingLinkage: 1367 return LLVMAppendingLinkage; 1368 case GlobalValue::InternalLinkage: 1369 return LLVMInternalLinkage; 1370 case GlobalValue::PrivateLinkage: 1371 return LLVMPrivateLinkage; 1372 case GlobalValue::ExternalWeakLinkage: 1373 return LLVMExternalWeakLinkage; 1374 case GlobalValue::CommonLinkage: 1375 return LLVMCommonLinkage; 1376 } 1377 1378 llvm_unreachable("Invalid GlobalValue linkage!"); 1379 } 1380 1381 void LLVMSetLinkage(LLVMValueRef Global, LLVMLinkage Linkage) { 1382 GlobalValue *GV = unwrap<GlobalValue>(Global); 1383 1384 switch (Linkage) { 1385 case LLVMExternalLinkage: 1386 GV->setLinkage(GlobalValue::ExternalLinkage); 1387 break; 1388 case LLVMAvailableExternallyLinkage: 1389 GV->setLinkage(GlobalValue::AvailableExternallyLinkage); 1390 break; 1391 case LLVMLinkOnceAnyLinkage: 1392 GV->setLinkage(GlobalValue::LinkOnceAnyLinkage); 1393 break; 1394 case LLVMLinkOnceODRLinkage: 1395 GV->setLinkage(GlobalValue::LinkOnceODRLinkage); 1396 break; 1397 case LLVMLinkOnceODRAutoHideLinkage: 1398 DEBUG(errs() << "LLVMSetLinkage(): LLVMLinkOnceODRAutoHideLinkage is no " 1399 "longer supported."); 1400 break; 1401 case LLVMWeakAnyLinkage: 1402 GV->setLinkage(GlobalValue::WeakAnyLinkage); 1403 break; 1404 case LLVMWeakODRLinkage: 1405 GV->setLinkage(GlobalValue::WeakODRLinkage); 1406 break; 1407 case LLVMAppendingLinkage: 1408 GV->setLinkage(GlobalValue::AppendingLinkage); 1409 break; 1410 case LLVMInternalLinkage: 1411 GV->setLinkage(GlobalValue::InternalLinkage); 1412 break; 1413 case LLVMPrivateLinkage: 1414 GV->setLinkage(GlobalValue::PrivateLinkage); 1415 break; 1416 case LLVMLinkerPrivateLinkage: 1417 GV->setLinkage(GlobalValue::PrivateLinkage); 1418 break; 1419 case LLVMLinkerPrivateWeakLinkage: 1420 GV->setLinkage(GlobalValue::PrivateLinkage); 1421 break; 1422 case LLVMDLLImportLinkage: 1423 DEBUG(errs() 1424 << "LLVMSetLinkage(): LLVMDLLImportLinkage is no longer supported."); 1425 break; 1426 case LLVMDLLExportLinkage: 1427 DEBUG(errs() 1428 << "LLVMSetLinkage(): LLVMDLLExportLinkage is no longer supported."); 1429 break; 1430 case LLVMExternalWeakLinkage: 1431 GV->setLinkage(GlobalValue::ExternalWeakLinkage); 1432 break; 1433 case LLVMGhostLinkage: 1434 DEBUG(errs() 1435 << "LLVMSetLinkage(): LLVMGhostLinkage is no longer supported."); 1436 break; 1437 case LLVMCommonLinkage: 1438 GV->setLinkage(GlobalValue::CommonLinkage); 1439 break; 1440 } 1441 } 1442 1443 const char *LLVMGetSection(LLVMValueRef Global) { 1444 return unwrap<GlobalValue>(Global)->getSection(); 1445 } 1446 1447 void LLVMSetSection(LLVMValueRef Global, const char *Section) { 1448 unwrap<GlobalObject>(Global)->setSection(Section); 1449 } 1450 1451 LLVMVisibility LLVMGetVisibility(LLVMValueRef Global) { 1452 return static_cast<LLVMVisibility>( 1453 unwrap<GlobalValue>(Global)->getVisibility()); 1454 } 1455 1456 void LLVMSetVisibility(LLVMValueRef Global, LLVMVisibility Viz) { 1457 unwrap<GlobalValue>(Global) 1458 ->setVisibility(static_cast<GlobalValue::VisibilityTypes>(Viz)); 1459 } 1460 1461 LLVMDLLStorageClass LLVMGetDLLStorageClass(LLVMValueRef Global) { 1462 return static_cast<LLVMDLLStorageClass>( 1463 unwrap<GlobalValue>(Global)->getDLLStorageClass()); 1464 } 1465 1466 void LLVMSetDLLStorageClass(LLVMValueRef Global, LLVMDLLStorageClass Class) { 1467 unwrap<GlobalValue>(Global)->setDLLStorageClass( 1468 static_cast<GlobalValue::DLLStorageClassTypes>(Class)); 1469 } 1470 1471 LLVMBool LLVMHasUnnamedAddr(LLVMValueRef Global) { 1472 return unwrap<GlobalValue>(Global)->hasUnnamedAddr(); 1473 } 1474 1475 void LLVMSetUnnamedAddr(LLVMValueRef Global, LLVMBool HasUnnamedAddr) { 1476 unwrap<GlobalValue>(Global)->setUnnamedAddr(HasUnnamedAddr); 1477 } 1478 1479 /*--.. Operations on global variables, load and store instructions .........--*/ 1480 1481 unsigned LLVMGetAlignment(LLVMValueRef V) { 1482 Value *P = unwrap<Value>(V); 1483 if (GlobalValue *GV = dyn_cast<GlobalValue>(P)) 1484 return GV->getAlignment(); 1485 if (AllocaInst *AI = dyn_cast<AllocaInst>(P)) 1486 return AI->getAlignment(); 1487 if (LoadInst *LI = dyn_cast<LoadInst>(P)) 1488 return LI->getAlignment(); 1489 if (StoreInst *SI = dyn_cast<StoreInst>(P)) 1490 return SI->getAlignment(); 1491 1492 llvm_unreachable( 1493 "only GlobalValue, AllocaInst, LoadInst and StoreInst have alignment"); 1494 } 1495 1496 void LLVMSetAlignment(LLVMValueRef V, unsigned Bytes) { 1497 Value *P = unwrap<Value>(V); 1498 if (GlobalObject *GV = dyn_cast<GlobalObject>(P)) 1499 GV->setAlignment(Bytes); 1500 else if (AllocaInst *AI = dyn_cast<AllocaInst>(P)) 1501 AI->setAlignment(Bytes); 1502 else if (LoadInst *LI = dyn_cast<LoadInst>(P)) 1503 LI->setAlignment(Bytes); 1504 else if (StoreInst *SI = dyn_cast<StoreInst>(P)) 1505 SI->setAlignment(Bytes); 1506 else 1507 llvm_unreachable( 1508 "only GlobalValue, AllocaInst, LoadInst and StoreInst have alignment"); 1509 } 1510 1511 /*--.. Operations on global variables ......................................--*/ 1512 1513 LLVMValueRef LLVMAddGlobal(LLVMModuleRef M, LLVMTypeRef Ty, const char *Name) { 1514 return wrap(new GlobalVariable(*unwrap(M), unwrap(Ty), false, 1515 GlobalValue::ExternalLinkage, nullptr, Name)); 1516 } 1517 1518 LLVMValueRef LLVMAddGlobalInAddressSpace(LLVMModuleRef M, LLVMTypeRef Ty, 1519 const char *Name, 1520 unsigned AddressSpace) { 1521 return wrap(new GlobalVariable(*unwrap(M), unwrap(Ty), false, 1522 GlobalValue::ExternalLinkage, nullptr, Name, 1523 nullptr, GlobalVariable::NotThreadLocal, 1524 AddressSpace)); 1525 } 1526 1527 LLVMValueRef LLVMGetNamedGlobal(LLVMModuleRef M, const char *Name) { 1528 return wrap(unwrap(M)->getNamedGlobal(Name)); 1529 } 1530 1531 LLVMValueRef LLVMGetFirstGlobal(LLVMModuleRef M) { 1532 Module *Mod = unwrap(M); 1533 Module::global_iterator I = Mod->global_begin(); 1534 if (I == Mod->global_end()) 1535 return nullptr; 1536 return wrap(&*I); 1537 } 1538 1539 LLVMValueRef LLVMGetLastGlobal(LLVMModuleRef M) { 1540 Module *Mod = unwrap(M); 1541 Module::global_iterator I = Mod->global_end(); 1542 if (I == Mod->global_begin()) 1543 return nullptr; 1544 return wrap(&*--I); 1545 } 1546 1547 LLVMValueRef LLVMGetNextGlobal(LLVMValueRef GlobalVar) { 1548 GlobalVariable *GV = unwrap<GlobalVariable>(GlobalVar); 1549 Module::global_iterator I(GV); 1550 if (++I == GV->getParent()->global_end()) 1551 return nullptr; 1552 return wrap(&*I); 1553 } 1554 1555 LLVMValueRef LLVMGetPreviousGlobal(LLVMValueRef GlobalVar) { 1556 GlobalVariable *GV = unwrap<GlobalVariable>(GlobalVar); 1557 Module::global_iterator I(GV); 1558 if (I == GV->getParent()->global_begin()) 1559 return nullptr; 1560 return wrap(&*--I); 1561 } 1562 1563 void LLVMDeleteGlobal(LLVMValueRef GlobalVar) { 1564 unwrap<GlobalVariable>(GlobalVar)->eraseFromParent(); 1565 } 1566 1567 LLVMValueRef LLVMGetInitializer(LLVMValueRef GlobalVar) { 1568 GlobalVariable* GV = unwrap<GlobalVariable>(GlobalVar); 1569 if ( !GV->hasInitializer() ) 1570 return nullptr; 1571 return wrap(GV->getInitializer()); 1572 } 1573 1574 void LLVMSetInitializer(LLVMValueRef GlobalVar, LLVMValueRef ConstantVal) { 1575 unwrap<GlobalVariable>(GlobalVar) 1576 ->setInitializer(unwrap<Constant>(ConstantVal)); 1577 } 1578 1579 LLVMBool LLVMIsThreadLocal(LLVMValueRef GlobalVar) { 1580 return unwrap<GlobalVariable>(GlobalVar)->isThreadLocal(); 1581 } 1582 1583 void LLVMSetThreadLocal(LLVMValueRef GlobalVar, LLVMBool IsThreadLocal) { 1584 unwrap<GlobalVariable>(GlobalVar)->setThreadLocal(IsThreadLocal != 0); 1585 } 1586 1587 LLVMBool LLVMIsGlobalConstant(LLVMValueRef GlobalVar) { 1588 return unwrap<GlobalVariable>(GlobalVar)->isConstant(); 1589 } 1590 1591 void LLVMSetGlobalConstant(LLVMValueRef GlobalVar, LLVMBool IsConstant) { 1592 unwrap<GlobalVariable>(GlobalVar)->setConstant(IsConstant != 0); 1593 } 1594 1595 LLVMThreadLocalMode LLVMGetThreadLocalMode(LLVMValueRef GlobalVar) { 1596 switch (unwrap<GlobalVariable>(GlobalVar)->getThreadLocalMode()) { 1597 case GlobalVariable::NotThreadLocal: 1598 return LLVMNotThreadLocal; 1599 case GlobalVariable::GeneralDynamicTLSModel: 1600 return LLVMGeneralDynamicTLSModel; 1601 case GlobalVariable::LocalDynamicTLSModel: 1602 return LLVMLocalDynamicTLSModel; 1603 case GlobalVariable::InitialExecTLSModel: 1604 return LLVMInitialExecTLSModel; 1605 case GlobalVariable::LocalExecTLSModel: 1606 return LLVMLocalExecTLSModel; 1607 } 1608 1609 llvm_unreachable("Invalid GlobalVariable thread local mode"); 1610 } 1611 1612 void LLVMSetThreadLocalMode(LLVMValueRef GlobalVar, LLVMThreadLocalMode Mode) { 1613 GlobalVariable *GV = unwrap<GlobalVariable>(GlobalVar); 1614 1615 switch (Mode) { 1616 case LLVMNotThreadLocal: 1617 GV->setThreadLocalMode(GlobalVariable::NotThreadLocal); 1618 break; 1619 case LLVMGeneralDynamicTLSModel: 1620 GV->setThreadLocalMode(GlobalVariable::GeneralDynamicTLSModel); 1621 break; 1622 case LLVMLocalDynamicTLSModel: 1623 GV->setThreadLocalMode(GlobalVariable::LocalDynamicTLSModel); 1624 break; 1625 case LLVMInitialExecTLSModel: 1626 GV->setThreadLocalMode(GlobalVariable::InitialExecTLSModel); 1627 break; 1628 case LLVMLocalExecTLSModel: 1629 GV->setThreadLocalMode(GlobalVariable::LocalExecTLSModel); 1630 break; 1631 } 1632 } 1633 1634 LLVMBool LLVMIsExternallyInitialized(LLVMValueRef GlobalVar) { 1635 return unwrap<GlobalVariable>(GlobalVar)->isExternallyInitialized(); 1636 } 1637 1638 void LLVMSetExternallyInitialized(LLVMValueRef GlobalVar, LLVMBool IsExtInit) { 1639 unwrap<GlobalVariable>(GlobalVar)->setExternallyInitialized(IsExtInit); 1640 } 1641 1642 /*--.. Operations on aliases ......................................--*/ 1643 1644 LLVMValueRef LLVMAddAlias(LLVMModuleRef M, LLVMTypeRef Ty, LLVMValueRef Aliasee, 1645 const char *Name) { 1646 auto *PTy = cast<PointerType>(unwrap(Ty)); 1647 return wrap(GlobalAlias::create(PTy->getElementType(), PTy->getAddressSpace(), 1648 GlobalValue::ExternalLinkage, Name, 1649 unwrap<Constant>(Aliasee), unwrap(M))); 1650 } 1651 1652 /*--.. Operations on functions .............................................--*/ 1653 1654 LLVMValueRef LLVMAddFunction(LLVMModuleRef M, const char *Name, 1655 LLVMTypeRef FunctionTy) { 1656 return wrap(Function::Create(unwrap<FunctionType>(FunctionTy), 1657 GlobalValue::ExternalLinkage, Name, unwrap(M))); 1658 } 1659 1660 LLVMValueRef LLVMGetNamedFunction(LLVMModuleRef M, const char *Name) { 1661 return wrap(unwrap(M)->getFunction(Name)); 1662 } 1663 1664 LLVMValueRef LLVMGetFirstFunction(LLVMModuleRef M) { 1665 Module *Mod = unwrap(M); 1666 Module::iterator I = Mod->begin(); 1667 if (I == Mod->end()) 1668 return nullptr; 1669 return wrap(&*I); 1670 } 1671 1672 LLVMValueRef LLVMGetLastFunction(LLVMModuleRef M) { 1673 Module *Mod = unwrap(M); 1674 Module::iterator I = Mod->end(); 1675 if (I == Mod->begin()) 1676 return nullptr; 1677 return wrap(&*--I); 1678 } 1679 1680 LLVMValueRef LLVMGetNextFunction(LLVMValueRef Fn) { 1681 Function *Func = unwrap<Function>(Fn); 1682 Module::iterator I(Func); 1683 if (++I == Func->getParent()->end()) 1684 return nullptr; 1685 return wrap(&*I); 1686 } 1687 1688 LLVMValueRef LLVMGetPreviousFunction(LLVMValueRef Fn) { 1689 Function *Func = unwrap<Function>(Fn); 1690 Module::iterator I(Func); 1691 if (I == Func->getParent()->begin()) 1692 return nullptr; 1693 return wrap(&*--I); 1694 } 1695 1696 void LLVMDeleteFunction(LLVMValueRef Fn) { 1697 unwrap<Function>(Fn)->eraseFromParent(); 1698 } 1699 1700 LLVMValueRef LLVMGetPersonalityFn(LLVMValueRef Fn) { 1701 return wrap(unwrap<Function>(Fn)->getPersonalityFn()); 1702 } 1703 1704 void LLVMSetPersonalityFn(LLVMValueRef Fn, LLVMValueRef PersonalityFn) { 1705 unwrap<Function>(Fn)->setPersonalityFn(unwrap<Constant>(PersonalityFn)); 1706 } 1707 1708 unsigned LLVMGetIntrinsicID(LLVMValueRef Fn) { 1709 if (Function *F = dyn_cast<Function>(unwrap(Fn))) 1710 return F->getIntrinsicID(); 1711 return 0; 1712 } 1713 1714 unsigned LLVMGetFunctionCallConv(LLVMValueRef Fn) { 1715 return unwrap<Function>(Fn)->getCallingConv(); 1716 } 1717 1718 void LLVMSetFunctionCallConv(LLVMValueRef Fn, unsigned CC) { 1719 return unwrap<Function>(Fn)->setCallingConv( 1720 static_cast<CallingConv::ID>(CC)); 1721 } 1722 1723 const char *LLVMGetGC(LLVMValueRef Fn) { 1724 Function *F = unwrap<Function>(Fn); 1725 return F->hasGC()? F->getGC() : nullptr; 1726 } 1727 1728 void LLVMSetGC(LLVMValueRef Fn, const char *GC) { 1729 Function *F = unwrap<Function>(Fn); 1730 if (GC) 1731 F->setGC(GC); 1732 else 1733 F->clearGC(); 1734 } 1735 1736 void LLVMAddFunctionAttr(LLVMValueRef Fn, LLVMAttribute PA) { 1737 Function *Func = unwrap<Function>(Fn); 1738 const AttributeSet PAL = Func->getAttributes(); 1739 AttrBuilder B(PA); 1740 const AttributeSet PALnew = 1741 PAL.addAttributes(Func->getContext(), AttributeSet::FunctionIndex, 1742 AttributeSet::get(Func->getContext(), 1743 AttributeSet::FunctionIndex, B)); 1744 Func->setAttributes(PALnew); 1745 } 1746 1747 void LLVMAddTargetDependentFunctionAttr(LLVMValueRef Fn, const char *A, 1748 const char *V) { 1749 Function *Func = unwrap<Function>(Fn); 1750 AttributeSet::AttrIndex Idx = 1751 AttributeSet::AttrIndex(AttributeSet::FunctionIndex); 1752 AttrBuilder B; 1753 1754 B.addAttribute(A, V); 1755 AttributeSet Set = AttributeSet::get(Func->getContext(), Idx, B); 1756 Func->addAttributes(Idx, Set); 1757 } 1758 1759 void LLVMRemoveFunctionAttr(LLVMValueRef Fn, LLVMAttribute PA) { 1760 Function *Func = unwrap<Function>(Fn); 1761 const AttributeSet PAL = Func->getAttributes(); 1762 AttrBuilder B(PA); 1763 const AttributeSet PALnew = 1764 PAL.removeAttributes(Func->getContext(), AttributeSet::FunctionIndex, 1765 AttributeSet::get(Func->getContext(), 1766 AttributeSet::FunctionIndex, B)); 1767 Func->setAttributes(PALnew); 1768 } 1769 1770 LLVMAttribute LLVMGetFunctionAttr(LLVMValueRef Fn) { 1771 Function *Func = unwrap<Function>(Fn); 1772 const AttributeSet PAL = Func->getAttributes(); 1773 return (LLVMAttribute)PAL.Raw(AttributeSet::FunctionIndex); 1774 } 1775 1776 /*--.. Operations on parameters ............................................--*/ 1777 1778 unsigned LLVMCountParams(LLVMValueRef FnRef) { 1779 // This function is strictly redundant to 1780 // LLVMCountParamTypes(LLVMGetElementType(LLVMTypeOf(FnRef))) 1781 return unwrap<Function>(FnRef)->arg_size(); 1782 } 1783 1784 void LLVMGetParams(LLVMValueRef FnRef, LLVMValueRef *ParamRefs) { 1785 Function *Fn = unwrap<Function>(FnRef); 1786 for (Function::arg_iterator I = Fn->arg_begin(), 1787 E = Fn->arg_end(); I != E; I++) 1788 *ParamRefs++ = wrap(&*I); 1789 } 1790 1791 LLVMValueRef LLVMGetParam(LLVMValueRef FnRef, unsigned index) { 1792 Function::arg_iterator AI = unwrap<Function>(FnRef)->arg_begin(); 1793 while (index --> 0) 1794 AI++; 1795 return wrap(&*AI); 1796 } 1797 1798 LLVMValueRef LLVMGetParamParent(LLVMValueRef V) { 1799 return wrap(unwrap<Argument>(V)->getParent()); 1800 } 1801 1802 LLVMValueRef LLVMGetFirstParam(LLVMValueRef Fn) { 1803 Function *Func = unwrap<Function>(Fn); 1804 Function::arg_iterator I = Func->arg_begin(); 1805 if (I == Func->arg_end()) 1806 return nullptr; 1807 return wrap(&*I); 1808 } 1809 1810 LLVMValueRef LLVMGetLastParam(LLVMValueRef Fn) { 1811 Function *Func = unwrap<Function>(Fn); 1812 Function::arg_iterator I = Func->arg_end(); 1813 if (I == Func->arg_begin()) 1814 return nullptr; 1815 return wrap(&*--I); 1816 } 1817 1818 LLVMValueRef LLVMGetNextParam(LLVMValueRef Arg) { 1819 Argument *A = unwrap<Argument>(Arg); 1820 Function::arg_iterator I(A); 1821 if (++I == A->getParent()->arg_end()) 1822 return nullptr; 1823 return wrap(&*I); 1824 } 1825 1826 LLVMValueRef LLVMGetPreviousParam(LLVMValueRef Arg) { 1827 Argument *A = unwrap<Argument>(Arg); 1828 Function::arg_iterator I(A); 1829 if (I == A->getParent()->arg_begin()) 1830 return nullptr; 1831 return wrap(&*--I); 1832 } 1833 1834 void LLVMAddAttribute(LLVMValueRef Arg, LLVMAttribute PA) { 1835 Argument *A = unwrap<Argument>(Arg); 1836 AttrBuilder B(PA); 1837 A->addAttr(AttributeSet::get(A->getContext(), A->getArgNo() + 1, B)); 1838 } 1839 1840 void LLVMRemoveAttribute(LLVMValueRef Arg, LLVMAttribute PA) { 1841 Argument *A = unwrap<Argument>(Arg); 1842 AttrBuilder B(PA); 1843 A->removeAttr(AttributeSet::get(A->getContext(), A->getArgNo() + 1, B)); 1844 } 1845 1846 LLVMAttribute LLVMGetAttribute(LLVMValueRef Arg) { 1847 Argument *A = unwrap<Argument>(Arg); 1848 return (LLVMAttribute)A->getParent()->getAttributes(). 1849 Raw(A->getArgNo()+1); 1850 } 1851 1852 1853 void LLVMSetParamAlignment(LLVMValueRef Arg, unsigned align) { 1854 Argument *A = unwrap<Argument>(Arg); 1855 AttrBuilder B; 1856 B.addAlignmentAttr(align); 1857 A->addAttr(AttributeSet::get(A->getContext(),A->getArgNo() + 1, B)); 1858 } 1859 1860 /*--.. Operations on basic blocks ..........................................--*/ 1861 1862 LLVMValueRef LLVMBasicBlockAsValue(LLVMBasicBlockRef BB) { 1863 return wrap(static_cast<Value*>(unwrap(BB))); 1864 } 1865 1866 LLVMBool LLVMValueIsBasicBlock(LLVMValueRef Val) { 1867 return isa<BasicBlock>(unwrap(Val)); 1868 } 1869 1870 LLVMBasicBlockRef LLVMValueAsBasicBlock(LLVMValueRef Val) { 1871 return wrap(unwrap<BasicBlock>(Val)); 1872 } 1873 1874 LLVMValueRef LLVMGetBasicBlockParent(LLVMBasicBlockRef BB) { 1875 return wrap(unwrap(BB)->getParent()); 1876 } 1877 1878 LLVMValueRef LLVMGetBasicBlockTerminator(LLVMBasicBlockRef BB) { 1879 return wrap(unwrap(BB)->getTerminator()); 1880 } 1881 1882 unsigned LLVMCountBasicBlocks(LLVMValueRef FnRef) { 1883 return unwrap<Function>(FnRef)->size(); 1884 } 1885 1886 void LLVMGetBasicBlocks(LLVMValueRef FnRef, LLVMBasicBlockRef *BasicBlocksRefs){ 1887 Function *Fn = unwrap<Function>(FnRef); 1888 for (Function::iterator I = Fn->begin(), E = Fn->end(); I != E; I++) 1889 *BasicBlocksRefs++ = wrap(&*I); 1890 } 1891 1892 LLVMBasicBlockRef LLVMGetEntryBasicBlock(LLVMValueRef Fn) { 1893 return wrap(&unwrap<Function>(Fn)->getEntryBlock()); 1894 } 1895 1896 LLVMBasicBlockRef LLVMGetFirstBasicBlock(LLVMValueRef Fn) { 1897 Function *Func = unwrap<Function>(Fn); 1898 Function::iterator I = Func->begin(); 1899 if (I == Func->end()) 1900 return nullptr; 1901 return wrap(&*I); 1902 } 1903 1904 LLVMBasicBlockRef LLVMGetLastBasicBlock(LLVMValueRef Fn) { 1905 Function *Func = unwrap<Function>(Fn); 1906 Function::iterator I = Func->end(); 1907 if (I == Func->begin()) 1908 return nullptr; 1909 return wrap(&*--I); 1910 } 1911 1912 LLVMBasicBlockRef LLVMGetNextBasicBlock(LLVMBasicBlockRef BB) { 1913 BasicBlock *Block = unwrap(BB); 1914 Function::iterator I(Block); 1915 if (++I == Block->getParent()->end()) 1916 return nullptr; 1917 return wrap(&*I); 1918 } 1919 1920 LLVMBasicBlockRef LLVMGetPreviousBasicBlock(LLVMBasicBlockRef BB) { 1921 BasicBlock *Block = unwrap(BB); 1922 Function::iterator I(Block); 1923 if (I == Block->getParent()->begin()) 1924 return nullptr; 1925 return wrap(&*--I); 1926 } 1927 1928 LLVMBasicBlockRef LLVMAppendBasicBlockInContext(LLVMContextRef C, 1929 LLVMValueRef FnRef, 1930 const char *Name) { 1931 return wrap(BasicBlock::Create(*unwrap(C), Name, unwrap<Function>(FnRef))); 1932 } 1933 1934 LLVMBasicBlockRef LLVMAppendBasicBlock(LLVMValueRef FnRef, const char *Name) { 1935 return LLVMAppendBasicBlockInContext(LLVMGetGlobalContext(), FnRef, Name); 1936 } 1937 1938 LLVMBasicBlockRef LLVMInsertBasicBlockInContext(LLVMContextRef C, 1939 LLVMBasicBlockRef BBRef, 1940 const char *Name) { 1941 BasicBlock *BB = unwrap(BBRef); 1942 return wrap(BasicBlock::Create(*unwrap(C), Name, BB->getParent(), BB)); 1943 } 1944 1945 LLVMBasicBlockRef LLVMInsertBasicBlock(LLVMBasicBlockRef BBRef, 1946 const char *Name) { 1947 return LLVMInsertBasicBlockInContext(LLVMGetGlobalContext(), BBRef, Name); 1948 } 1949 1950 void LLVMDeleteBasicBlock(LLVMBasicBlockRef BBRef) { 1951 unwrap(BBRef)->eraseFromParent(); 1952 } 1953 1954 void LLVMRemoveBasicBlockFromParent(LLVMBasicBlockRef BBRef) { 1955 unwrap(BBRef)->removeFromParent(); 1956 } 1957 1958 void LLVMMoveBasicBlockBefore(LLVMBasicBlockRef BB, LLVMBasicBlockRef MovePos) { 1959 unwrap(BB)->moveBefore(unwrap(MovePos)); 1960 } 1961 1962 void LLVMMoveBasicBlockAfter(LLVMBasicBlockRef BB, LLVMBasicBlockRef MovePos) { 1963 unwrap(BB)->moveAfter(unwrap(MovePos)); 1964 } 1965 1966 /*--.. Operations on instructions ..........................................--*/ 1967 1968 LLVMBasicBlockRef LLVMGetInstructionParent(LLVMValueRef Inst) { 1969 return wrap(unwrap<Instruction>(Inst)->getParent()); 1970 } 1971 1972 LLVMValueRef LLVMGetFirstInstruction(LLVMBasicBlockRef BB) { 1973 BasicBlock *Block = unwrap(BB); 1974 BasicBlock::iterator I = Block->begin(); 1975 if (I == Block->end()) 1976 return nullptr; 1977 return wrap(&*I); 1978 } 1979 1980 LLVMValueRef LLVMGetLastInstruction(LLVMBasicBlockRef BB) { 1981 BasicBlock *Block = unwrap(BB); 1982 BasicBlock::iterator I = Block->end(); 1983 if (I == Block->begin()) 1984 return nullptr; 1985 return wrap(&*--I); 1986 } 1987 1988 LLVMValueRef LLVMGetNextInstruction(LLVMValueRef Inst) { 1989 Instruction *Instr = unwrap<Instruction>(Inst); 1990 BasicBlock::iterator I(Instr); 1991 if (++I == Instr->getParent()->end()) 1992 return nullptr; 1993 return wrap(&*I); 1994 } 1995 1996 LLVMValueRef LLVMGetPreviousInstruction(LLVMValueRef Inst) { 1997 Instruction *Instr = unwrap<Instruction>(Inst); 1998 BasicBlock::iterator I(Instr); 1999 if (I == Instr->getParent()->begin()) 2000 return nullptr; 2001 return wrap(&*--I); 2002 } 2003 2004 void LLVMInstructionEraseFromParent(LLVMValueRef Inst) { 2005 unwrap<Instruction>(Inst)->eraseFromParent(); 2006 } 2007 2008 LLVMIntPredicate LLVMGetICmpPredicate(LLVMValueRef Inst) { 2009 if (ICmpInst *I = dyn_cast<ICmpInst>(unwrap(Inst))) 2010 return (LLVMIntPredicate)I->getPredicate(); 2011 if (ConstantExpr *CE = dyn_cast<ConstantExpr>(unwrap(Inst))) 2012 if (CE->getOpcode() == Instruction::ICmp) 2013 return (LLVMIntPredicate)CE->getPredicate(); 2014 return (LLVMIntPredicate)0; 2015 } 2016 2017 LLVMRealPredicate LLVMGetFCmpPredicate(LLVMValueRef Inst) { 2018 if (FCmpInst *I = dyn_cast<FCmpInst>(unwrap(Inst))) 2019 return (LLVMRealPredicate)I->getPredicate(); 2020 if (ConstantExpr *CE = dyn_cast<ConstantExpr>(unwrap(Inst))) 2021 if (CE->getOpcode() == Instruction::FCmp) 2022 return (LLVMRealPredicate)CE->getPredicate(); 2023 return (LLVMRealPredicate)0; 2024 } 2025 2026 LLVMOpcode LLVMGetInstructionOpcode(LLVMValueRef Inst) { 2027 if (Instruction *C = dyn_cast<Instruction>(unwrap(Inst))) 2028 return map_to_llvmopcode(C->getOpcode()); 2029 return (LLVMOpcode)0; 2030 } 2031 2032 LLVMValueRef LLVMInstructionClone(LLVMValueRef Inst) { 2033 if (Instruction *C = dyn_cast<Instruction>(unwrap(Inst))) 2034 return wrap(C->clone()); 2035 return nullptr; 2036 } 2037 2038 /*--.. Call and invoke instructions ........................................--*/ 2039 2040 unsigned LLVMGetInstructionCallConv(LLVMValueRef Instr) { 2041 Value *V = unwrap(Instr); 2042 if (CallInst *CI = dyn_cast<CallInst>(V)) 2043 return CI->getCallingConv(); 2044 if (InvokeInst *II = dyn_cast<InvokeInst>(V)) 2045 return II->getCallingConv(); 2046 llvm_unreachable("LLVMGetInstructionCallConv applies only to call and invoke!"); 2047 } 2048 2049 void LLVMSetInstructionCallConv(LLVMValueRef Instr, unsigned CC) { 2050 Value *V = unwrap(Instr); 2051 if (CallInst *CI = dyn_cast<CallInst>(V)) 2052 return CI->setCallingConv(static_cast<CallingConv::ID>(CC)); 2053 else if (InvokeInst *II = dyn_cast<InvokeInst>(V)) 2054 return II->setCallingConv(static_cast<CallingConv::ID>(CC)); 2055 llvm_unreachable("LLVMSetInstructionCallConv applies only to call and invoke!"); 2056 } 2057 2058 void LLVMAddInstrAttribute(LLVMValueRef Instr, unsigned index, 2059 LLVMAttribute PA) { 2060 CallSite Call = CallSite(unwrap<Instruction>(Instr)); 2061 AttrBuilder B(PA); 2062 Call.setAttributes( 2063 Call.getAttributes().addAttributes(Call->getContext(), index, 2064 AttributeSet::get(Call->getContext(), 2065 index, B))); 2066 } 2067 2068 void LLVMRemoveInstrAttribute(LLVMValueRef Instr, unsigned index, 2069 LLVMAttribute PA) { 2070 CallSite Call = CallSite(unwrap<Instruction>(Instr)); 2071 AttrBuilder B(PA); 2072 Call.setAttributes(Call.getAttributes() 2073 .removeAttributes(Call->getContext(), index, 2074 AttributeSet::get(Call->getContext(), 2075 index, B))); 2076 } 2077 2078 void LLVMSetInstrParamAlignment(LLVMValueRef Instr, unsigned index, 2079 unsigned align) { 2080 CallSite Call = CallSite(unwrap<Instruction>(Instr)); 2081 AttrBuilder B; 2082 B.addAlignmentAttr(align); 2083 Call.setAttributes(Call.getAttributes() 2084 .addAttributes(Call->getContext(), index, 2085 AttributeSet::get(Call->getContext(), 2086 index, B))); 2087 } 2088 2089 /*--.. Operations on call instructions (only) ..............................--*/ 2090 2091 LLVMBool LLVMIsTailCall(LLVMValueRef Call) { 2092 return unwrap<CallInst>(Call)->isTailCall(); 2093 } 2094 2095 void LLVMSetTailCall(LLVMValueRef Call, LLVMBool isTailCall) { 2096 unwrap<CallInst>(Call)->setTailCall(isTailCall); 2097 } 2098 2099 /*--.. Operations on terminators ...........................................--*/ 2100 2101 unsigned LLVMGetNumSuccessors(LLVMValueRef Term) { 2102 return unwrap<TerminatorInst>(Term)->getNumSuccessors(); 2103 } 2104 2105 LLVMBasicBlockRef LLVMGetSuccessor(LLVMValueRef Term, unsigned i) { 2106 return wrap(unwrap<TerminatorInst>(Term)->getSuccessor(i)); 2107 } 2108 2109 void LLVMSetSuccessor(LLVMValueRef Term, unsigned i, LLVMBasicBlockRef block) { 2110 return unwrap<TerminatorInst>(Term)->setSuccessor(i,unwrap(block)); 2111 } 2112 2113 /*--.. Operations on branch instructions (only) ............................--*/ 2114 2115 LLVMBool LLVMIsConditional(LLVMValueRef Branch) { 2116 return unwrap<BranchInst>(Branch)->isConditional(); 2117 } 2118 2119 LLVMValueRef LLVMGetCondition(LLVMValueRef Branch) { 2120 return wrap(unwrap<BranchInst>(Branch)->getCondition()); 2121 } 2122 2123 void LLVMSetCondition(LLVMValueRef Branch, LLVMValueRef Cond) { 2124 return unwrap<BranchInst>(Branch)->setCondition(unwrap(Cond)); 2125 } 2126 2127 /*--.. Operations on switch instructions (only) ............................--*/ 2128 2129 LLVMBasicBlockRef LLVMGetSwitchDefaultDest(LLVMValueRef Switch) { 2130 return wrap(unwrap<SwitchInst>(Switch)->getDefaultDest()); 2131 } 2132 2133 /*--.. Operations on phi nodes .............................................--*/ 2134 2135 void LLVMAddIncoming(LLVMValueRef PhiNode, LLVMValueRef *IncomingValues, 2136 LLVMBasicBlockRef *IncomingBlocks, unsigned Count) { 2137 PHINode *PhiVal = unwrap<PHINode>(PhiNode); 2138 for (unsigned I = 0; I != Count; ++I) 2139 PhiVal->addIncoming(unwrap(IncomingValues[I]), unwrap(IncomingBlocks[I])); 2140 } 2141 2142 unsigned LLVMCountIncoming(LLVMValueRef PhiNode) { 2143 return unwrap<PHINode>(PhiNode)->getNumIncomingValues(); 2144 } 2145 2146 LLVMValueRef LLVMGetIncomingValue(LLVMValueRef PhiNode, unsigned Index) { 2147 return wrap(unwrap<PHINode>(PhiNode)->getIncomingValue(Index)); 2148 } 2149 2150 LLVMBasicBlockRef LLVMGetIncomingBlock(LLVMValueRef PhiNode, unsigned Index) { 2151 return wrap(unwrap<PHINode>(PhiNode)->getIncomingBlock(Index)); 2152 } 2153 2154 2155 /*===-- Instruction builders ----------------------------------------------===*/ 2156 2157 LLVMBuilderRef LLVMCreateBuilderInContext(LLVMContextRef C) { 2158 return wrap(new IRBuilder<>(*unwrap(C))); 2159 } 2160 2161 LLVMBuilderRef LLVMCreateBuilder(void) { 2162 return LLVMCreateBuilderInContext(LLVMGetGlobalContext()); 2163 } 2164 2165 void LLVMPositionBuilder(LLVMBuilderRef Builder, LLVMBasicBlockRef Block, 2166 LLVMValueRef Instr) { 2167 BasicBlock *BB = unwrap(Block); 2168 Instruction *I = Instr? unwrap<Instruction>(Instr) : (Instruction*) BB->end(); 2169 unwrap(Builder)->SetInsertPoint(BB, I->getIterator()); 2170 } 2171 2172 void LLVMPositionBuilderBefore(LLVMBuilderRef Builder, LLVMValueRef Instr) { 2173 Instruction *I = unwrap<Instruction>(Instr); 2174 unwrap(Builder)->SetInsertPoint(I->getParent(), I->getIterator()); 2175 } 2176 2177 void LLVMPositionBuilderAtEnd(LLVMBuilderRef Builder, LLVMBasicBlockRef Block) { 2178 BasicBlock *BB = unwrap(Block); 2179 unwrap(Builder)->SetInsertPoint(BB); 2180 } 2181 2182 LLVMBasicBlockRef LLVMGetInsertBlock(LLVMBuilderRef Builder) { 2183 return wrap(unwrap(Builder)->GetInsertBlock()); 2184 } 2185 2186 void LLVMClearInsertionPosition(LLVMBuilderRef Builder) { 2187 unwrap(Builder)->ClearInsertionPoint(); 2188 } 2189 2190 void LLVMInsertIntoBuilder(LLVMBuilderRef Builder, LLVMValueRef Instr) { 2191 unwrap(Builder)->Insert(unwrap<Instruction>(Instr)); 2192 } 2193 2194 void LLVMInsertIntoBuilderWithName(LLVMBuilderRef Builder, LLVMValueRef Instr, 2195 const char *Name) { 2196 unwrap(Builder)->Insert(unwrap<Instruction>(Instr), Name); 2197 } 2198 2199 void LLVMDisposeBuilder(LLVMBuilderRef Builder) { 2200 delete unwrap(Builder); 2201 } 2202 2203 /*--.. Metadata builders ...................................................--*/ 2204 2205 void LLVMSetCurrentDebugLocation(LLVMBuilderRef Builder, LLVMValueRef L) { 2206 MDNode *Loc = 2207 L ? cast<MDNode>(unwrap<MetadataAsValue>(L)->getMetadata()) : nullptr; 2208 unwrap(Builder)->SetCurrentDebugLocation(DebugLoc(Loc)); 2209 } 2210 2211 LLVMValueRef LLVMGetCurrentDebugLocation(LLVMBuilderRef Builder) { 2212 LLVMContext &Context = unwrap(Builder)->getContext(); 2213 return wrap(MetadataAsValue::get( 2214 Context, unwrap(Builder)->getCurrentDebugLocation().getAsMDNode())); 2215 } 2216 2217 void LLVMSetInstDebugLocation(LLVMBuilderRef Builder, LLVMValueRef Inst) { 2218 unwrap(Builder)->SetInstDebugLocation(unwrap<Instruction>(Inst)); 2219 } 2220 2221 2222 /*--.. Instruction builders ................................................--*/ 2223 2224 LLVMValueRef LLVMBuildRetVoid(LLVMBuilderRef B) { 2225 return wrap(unwrap(B)->CreateRetVoid()); 2226 } 2227 2228 LLVMValueRef LLVMBuildRet(LLVMBuilderRef B, LLVMValueRef V) { 2229 return wrap(unwrap(B)->CreateRet(unwrap(V))); 2230 } 2231 2232 LLVMValueRef LLVMBuildAggregateRet(LLVMBuilderRef B, LLVMValueRef *RetVals, 2233 unsigned N) { 2234 return wrap(unwrap(B)->CreateAggregateRet(unwrap(RetVals), N)); 2235 } 2236 2237 LLVMValueRef LLVMBuildBr(LLVMBuilderRef B, LLVMBasicBlockRef Dest) { 2238 return wrap(unwrap(B)->CreateBr(unwrap(Dest))); 2239 } 2240 2241 LLVMValueRef LLVMBuildCondBr(LLVMBuilderRef B, LLVMValueRef If, 2242 LLVMBasicBlockRef Then, LLVMBasicBlockRef Else) { 2243 return wrap(unwrap(B)->CreateCondBr(unwrap(If), unwrap(Then), unwrap(Else))); 2244 } 2245 2246 LLVMValueRef LLVMBuildSwitch(LLVMBuilderRef B, LLVMValueRef V, 2247 LLVMBasicBlockRef Else, unsigned NumCases) { 2248 return wrap(unwrap(B)->CreateSwitch(unwrap(V), unwrap(Else), NumCases)); 2249 } 2250 2251 LLVMValueRef LLVMBuildIndirectBr(LLVMBuilderRef B, LLVMValueRef Addr, 2252 unsigned NumDests) { 2253 return wrap(unwrap(B)->CreateIndirectBr(unwrap(Addr), NumDests)); 2254 } 2255 2256 LLVMValueRef LLVMBuildInvoke(LLVMBuilderRef B, LLVMValueRef Fn, 2257 LLVMValueRef *Args, unsigned NumArgs, 2258 LLVMBasicBlockRef Then, LLVMBasicBlockRef Catch, 2259 const char *Name) { 2260 return wrap(unwrap(B)->CreateInvoke(unwrap(Fn), unwrap(Then), unwrap(Catch), 2261 makeArrayRef(unwrap(Args), NumArgs), 2262 Name)); 2263 } 2264 2265 LLVMValueRef LLVMBuildLandingPad(LLVMBuilderRef B, LLVMTypeRef Ty, 2266 LLVMValueRef PersFn, unsigned NumClauses, 2267 const char *Name) { 2268 // The personality used to live on the landingpad instruction, but now it 2269 // lives on the parent function. For compatibility, take the provided 2270 // personality and put it on the parent function. 2271 if (PersFn) 2272 unwrap(B)->GetInsertBlock()->getParent()->setPersonalityFn( 2273 cast<Function>(unwrap(PersFn))); 2274 return wrap(unwrap(B)->CreateLandingPad(unwrap(Ty), NumClauses, Name)); 2275 } 2276 2277 LLVMValueRef LLVMBuildResume(LLVMBuilderRef B, LLVMValueRef Exn) { 2278 return wrap(unwrap(B)->CreateResume(unwrap(Exn))); 2279 } 2280 2281 LLVMValueRef LLVMBuildUnreachable(LLVMBuilderRef B) { 2282 return wrap(unwrap(B)->CreateUnreachable()); 2283 } 2284 2285 void LLVMAddCase(LLVMValueRef Switch, LLVMValueRef OnVal, 2286 LLVMBasicBlockRef Dest) { 2287 unwrap<SwitchInst>(Switch)->addCase(unwrap<ConstantInt>(OnVal), unwrap(Dest)); 2288 } 2289 2290 void LLVMAddDestination(LLVMValueRef IndirectBr, LLVMBasicBlockRef Dest) { 2291 unwrap<IndirectBrInst>(IndirectBr)->addDestination(unwrap(Dest)); 2292 } 2293 2294 void LLVMAddClause(LLVMValueRef LandingPad, LLVMValueRef ClauseVal) { 2295 unwrap<LandingPadInst>(LandingPad)-> 2296 addClause(cast<Constant>(unwrap(ClauseVal))); 2297 } 2298 2299 void LLVMSetCleanup(LLVMValueRef LandingPad, LLVMBool Val) { 2300 unwrap<LandingPadInst>(LandingPad)->setCleanup(Val); 2301 } 2302 2303 /*--.. Arithmetic ..........................................................--*/ 2304 2305 LLVMValueRef LLVMBuildAdd(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2306 const char *Name) { 2307 return wrap(unwrap(B)->CreateAdd(unwrap(LHS), unwrap(RHS), Name)); 2308 } 2309 2310 LLVMValueRef LLVMBuildNSWAdd(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2311 const char *Name) { 2312 return wrap(unwrap(B)->CreateNSWAdd(unwrap(LHS), unwrap(RHS), Name)); 2313 } 2314 2315 LLVMValueRef LLVMBuildNUWAdd(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2316 const char *Name) { 2317 return wrap(unwrap(B)->CreateNUWAdd(unwrap(LHS), unwrap(RHS), Name)); 2318 } 2319 2320 LLVMValueRef LLVMBuildFAdd(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2321 const char *Name) { 2322 return wrap(unwrap(B)->CreateFAdd(unwrap(LHS), unwrap(RHS), Name)); 2323 } 2324 2325 LLVMValueRef LLVMBuildSub(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2326 const char *Name) { 2327 return wrap(unwrap(B)->CreateSub(unwrap(LHS), unwrap(RHS), Name)); 2328 } 2329 2330 LLVMValueRef LLVMBuildNSWSub(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2331 const char *Name) { 2332 return wrap(unwrap(B)->CreateNSWSub(unwrap(LHS), unwrap(RHS), Name)); 2333 } 2334 2335 LLVMValueRef LLVMBuildNUWSub(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2336 const char *Name) { 2337 return wrap(unwrap(B)->CreateNUWSub(unwrap(LHS), unwrap(RHS), Name)); 2338 } 2339 2340 LLVMValueRef LLVMBuildFSub(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2341 const char *Name) { 2342 return wrap(unwrap(B)->CreateFSub(unwrap(LHS), unwrap(RHS), Name)); 2343 } 2344 2345 LLVMValueRef LLVMBuildMul(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2346 const char *Name) { 2347 return wrap(unwrap(B)->CreateMul(unwrap(LHS), unwrap(RHS), Name)); 2348 } 2349 2350 LLVMValueRef LLVMBuildNSWMul(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2351 const char *Name) { 2352 return wrap(unwrap(B)->CreateNSWMul(unwrap(LHS), unwrap(RHS), Name)); 2353 } 2354 2355 LLVMValueRef LLVMBuildNUWMul(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2356 const char *Name) { 2357 return wrap(unwrap(B)->CreateNUWMul(unwrap(LHS), unwrap(RHS), Name)); 2358 } 2359 2360 LLVMValueRef LLVMBuildFMul(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2361 const char *Name) { 2362 return wrap(unwrap(B)->CreateFMul(unwrap(LHS), unwrap(RHS), Name)); 2363 } 2364 2365 LLVMValueRef LLVMBuildUDiv(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2366 const char *Name) { 2367 return wrap(unwrap(B)->CreateUDiv(unwrap(LHS), unwrap(RHS), Name)); 2368 } 2369 2370 LLVMValueRef LLVMBuildSDiv(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2371 const char *Name) { 2372 return wrap(unwrap(B)->CreateSDiv(unwrap(LHS), unwrap(RHS), Name)); 2373 } 2374 2375 LLVMValueRef LLVMBuildExactSDiv(LLVMBuilderRef B, LLVMValueRef LHS, 2376 LLVMValueRef RHS, const char *Name) { 2377 return wrap(unwrap(B)->CreateExactSDiv(unwrap(LHS), unwrap(RHS), Name)); 2378 } 2379 2380 LLVMValueRef LLVMBuildFDiv(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2381 const char *Name) { 2382 return wrap(unwrap(B)->CreateFDiv(unwrap(LHS), unwrap(RHS), Name)); 2383 } 2384 2385 LLVMValueRef LLVMBuildURem(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2386 const char *Name) { 2387 return wrap(unwrap(B)->CreateURem(unwrap(LHS), unwrap(RHS), Name)); 2388 } 2389 2390 LLVMValueRef LLVMBuildSRem(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2391 const char *Name) { 2392 return wrap(unwrap(B)->CreateSRem(unwrap(LHS), unwrap(RHS), Name)); 2393 } 2394 2395 LLVMValueRef LLVMBuildFRem(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2396 const char *Name) { 2397 return wrap(unwrap(B)->CreateFRem(unwrap(LHS), unwrap(RHS), Name)); 2398 } 2399 2400 LLVMValueRef LLVMBuildShl(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2401 const char *Name) { 2402 return wrap(unwrap(B)->CreateShl(unwrap(LHS), unwrap(RHS), Name)); 2403 } 2404 2405 LLVMValueRef LLVMBuildLShr(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2406 const char *Name) { 2407 return wrap(unwrap(B)->CreateLShr(unwrap(LHS), unwrap(RHS), Name)); 2408 } 2409 2410 LLVMValueRef LLVMBuildAShr(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2411 const char *Name) { 2412 return wrap(unwrap(B)->CreateAShr(unwrap(LHS), unwrap(RHS), Name)); 2413 } 2414 2415 LLVMValueRef LLVMBuildAnd(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2416 const char *Name) { 2417 return wrap(unwrap(B)->CreateAnd(unwrap(LHS), unwrap(RHS), Name)); 2418 } 2419 2420 LLVMValueRef LLVMBuildOr(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2421 const char *Name) { 2422 return wrap(unwrap(B)->CreateOr(unwrap(LHS), unwrap(RHS), Name)); 2423 } 2424 2425 LLVMValueRef LLVMBuildXor(LLVMBuilderRef B, LLVMValueRef LHS, LLVMValueRef RHS, 2426 const char *Name) { 2427 return wrap(unwrap(B)->CreateXor(unwrap(LHS), unwrap(RHS), Name)); 2428 } 2429 2430 LLVMValueRef LLVMBuildBinOp(LLVMBuilderRef B, LLVMOpcode Op, 2431 LLVMValueRef LHS, LLVMValueRef RHS, 2432 const char *Name) { 2433 return wrap(unwrap(B)->CreateBinOp(Instruction::BinaryOps(map_from_llvmopcode(Op)), unwrap(LHS), 2434 unwrap(RHS), Name)); 2435 } 2436 2437 LLVMValueRef LLVMBuildNeg(LLVMBuilderRef B, LLVMValueRef V, const char *Name) { 2438 return wrap(unwrap(B)->CreateNeg(unwrap(V), Name)); 2439 } 2440 2441 LLVMValueRef LLVMBuildNSWNeg(LLVMBuilderRef B, LLVMValueRef V, 2442 const char *Name) { 2443 return wrap(unwrap(B)->CreateNSWNeg(unwrap(V), Name)); 2444 } 2445 2446 LLVMValueRef LLVMBuildNUWNeg(LLVMBuilderRef B, LLVMValueRef V, 2447 const char *Name) { 2448 return wrap(unwrap(B)->CreateNUWNeg(unwrap(V), Name)); 2449 } 2450 2451 LLVMValueRef LLVMBuildFNeg(LLVMBuilderRef B, LLVMValueRef V, const char *Name) { 2452 return wrap(unwrap(B)->CreateFNeg(unwrap(V), Name)); 2453 } 2454 2455 LLVMValueRef LLVMBuildNot(LLVMBuilderRef B, LLVMValueRef V, const char *Name) { 2456 return wrap(unwrap(B)->CreateNot(unwrap(V), Name)); 2457 } 2458 2459 /*--.. Memory ..............................................................--*/ 2460 2461 LLVMValueRef LLVMBuildMalloc(LLVMBuilderRef B, LLVMTypeRef Ty, 2462 const char *Name) { 2463 Type* ITy = Type::getInt32Ty(unwrap(B)->GetInsertBlock()->getContext()); 2464 Constant* AllocSize = ConstantExpr::getSizeOf(unwrap(Ty)); 2465 AllocSize = ConstantExpr::getTruncOrBitCast(AllocSize, ITy); 2466 Instruction* Malloc = CallInst::CreateMalloc(unwrap(B)->GetInsertBlock(), 2467 ITy, unwrap(Ty), AllocSize, 2468 nullptr, nullptr, ""); 2469 return wrap(unwrap(B)->Insert(Malloc, Twine(Name))); 2470 } 2471 2472 LLVMValueRef LLVMBuildArrayMalloc(LLVMBuilderRef B, LLVMTypeRef Ty, 2473 LLVMValueRef Val, const char *Name) { 2474 Type* ITy = Type::getInt32Ty(unwrap(B)->GetInsertBlock()->getContext()); 2475 Constant* AllocSize = ConstantExpr::getSizeOf(unwrap(Ty)); 2476 AllocSize = ConstantExpr::getTruncOrBitCast(AllocSize, ITy); 2477 Instruction* Malloc = CallInst::CreateMalloc(unwrap(B)->GetInsertBlock(), 2478 ITy, unwrap(Ty), AllocSize, 2479 unwrap(Val), nullptr, ""); 2480 return wrap(unwrap(B)->Insert(Malloc, Twine(Name))); 2481 } 2482 2483 LLVMValueRef LLVMBuildAlloca(LLVMBuilderRef B, LLVMTypeRef Ty, 2484 const char *Name) { 2485 return wrap(unwrap(B)->CreateAlloca(unwrap(Ty), nullptr, Name)); 2486 } 2487 2488 LLVMValueRef LLVMBuildArrayAlloca(LLVMBuilderRef B, LLVMTypeRef Ty, 2489 LLVMValueRef Val, const char *Name) { 2490 return wrap(unwrap(B)->CreateAlloca(unwrap(Ty), unwrap(Val), Name)); 2491 } 2492 2493 LLVMValueRef LLVMBuildFree(LLVMBuilderRef B, LLVMValueRef PointerVal) { 2494 return wrap(unwrap(B)->Insert( 2495 CallInst::CreateFree(unwrap(PointerVal), unwrap(B)->GetInsertBlock()))); 2496 } 2497 2498 LLVMValueRef LLVMBuildLoad(LLVMBuilderRef B, LLVMValueRef PointerVal, 2499 const char *Name) { 2500 return wrap(unwrap(B)->CreateLoad(unwrap(PointerVal), Name)); 2501 } 2502 2503 LLVMValueRef LLVMBuildStore(LLVMBuilderRef B, LLVMValueRef Val, 2504 LLVMValueRef PointerVal) { 2505 return wrap(unwrap(B)->CreateStore(unwrap(Val), unwrap(PointerVal))); 2506 } 2507 2508 static AtomicOrdering mapFromLLVMOrdering(LLVMAtomicOrdering Ordering) { 2509 switch (Ordering) { 2510 case LLVMAtomicOrderingNotAtomic: return NotAtomic; 2511 case LLVMAtomicOrderingUnordered: return Unordered; 2512 case LLVMAtomicOrderingMonotonic: return Monotonic; 2513 case LLVMAtomicOrderingAcquire: return Acquire; 2514 case LLVMAtomicOrderingRelease: return Release; 2515 case LLVMAtomicOrderingAcquireRelease: return AcquireRelease; 2516 case LLVMAtomicOrderingSequentiallyConsistent: 2517 return SequentiallyConsistent; 2518 } 2519 2520 llvm_unreachable("Invalid LLVMAtomicOrdering value!"); 2521 } 2522 2523 static LLVMAtomicOrdering mapToLLVMOrdering(AtomicOrdering Ordering) { 2524 switch (Ordering) { 2525 case NotAtomic: return LLVMAtomicOrderingNotAtomic; 2526 case Unordered: return LLVMAtomicOrderingUnordered; 2527 case Monotonic: return LLVMAtomicOrderingMonotonic; 2528 case Acquire: return LLVMAtomicOrderingAcquire; 2529 case Release: return LLVMAtomicOrderingRelease; 2530 case AcquireRelease: return LLVMAtomicOrderingAcquireRelease; 2531 case SequentiallyConsistent: 2532 return LLVMAtomicOrderingSequentiallyConsistent; 2533 } 2534 2535 llvm_unreachable("Invalid AtomicOrdering value!"); 2536 } 2537 2538 LLVMValueRef LLVMBuildFence(LLVMBuilderRef B, LLVMAtomicOrdering Ordering, 2539 LLVMBool isSingleThread, const char *Name) { 2540 return wrap( 2541 unwrap(B)->CreateFence(mapFromLLVMOrdering(Ordering), 2542 isSingleThread ? SingleThread : CrossThread, 2543 Name)); 2544 } 2545 2546 LLVMValueRef LLVMBuildGEP(LLVMBuilderRef B, LLVMValueRef Pointer, 2547 LLVMValueRef *Indices, unsigned NumIndices, 2548 const char *Name) { 2549 ArrayRef<Value *> IdxList(unwrap(Indices), NumIndices); 2550 return wrap(unwrap(B)->CreateGEP(nullptr, unwrap(Pointer), IdxList, Name)); 2551 } 2552 2553 LLVMValueRef LLVMBuildInBoundsGEP(LLVMBuilderRef B, LLVMValueRef Pointer, 2554 LLVMValueRef *Indices, unsigned NumIndices, 2555 const char *Name) { 2556 ArrayRef<Value *> IdxList(unwrap(Indices), NumIndices); 2557 return wrap( 2558 unwrap(B)->CreateInBoundsGEP(nullptr, unwrap(Pointer), IdxList, Name)); 2559 } 2560 2561 LLVMValueRef LLVMBuildStructGEP(LLVMBuilderRef B, LLVMValueRef Pointer, 2562 unsigned Idx, const char *Name) { 2563 return wrap(unwrap(B)->CreateStructGEP(nullptr, unwrap(Pointer), Idx, Name)); 2564 } 2565 2566 LLVMValueRef LLVMBuildGlobalString(LLVMBuilderRef B, const char *Str, 2567 const char *Name) { 2568 return wrap(unwrap(B)->CreateGlobalString(Str, Name)); 2569 } 2570 2571 LLVMValueRef LLVMBuildGlobalStringPtr(LLVMBuilderRef B, const char *Str, 2572 const char *Name) { 2573 return wrap(unwrap(B)->CreateGlobalStringPtr(Str, Name)); 2574 } 2575 2576 LLVMBool LLVMGetVolatile(LLVMValueRef MemAccessInst) { 2577 Value *P = unwrap<Value>(MemAccessInst); 2578 if (LoadInst *LI = dyn_cast<LoadInst>(P)) 2579 return LI->isVolatile(); 2580 return cast<StoreInst>(P)->isVolatile(); 2581 } 2582 2583 void LLVMSetVolatile(LLVMValueRef MemAccessInst, LLVMBool isVolatile) { 2584 Value *P = unwrap<Value>(MemAccessInst); 2585 if (LoadInst *LI = dyn_cast<LoadInst>(P)) 2586 return LI->setVolatile(isVolatile); 2587 return cast<StoreInst>(P)->setVolatile(isVolatile); 2588 } 2589 2590 LLVMAtomicOrdering LLVMGetOrdering(LLVMValueRef MemAccessInst) { 2591 Value *P = unwrap<Value>(MemAccessInst); 2592 AtomicOrdering O; 2593 if (LoadInst *LI = dyn_cast<LoadInst>(P)) 2594 O = LI->getOrdering(); 2595 else 2596 O = cast<StoreInst>(P)->getOrdering(); 2597 return mapToLLVMOrdering(O); 2598 } 2599 2600 void LLVMSetOrdering(LLVMValueRef MemAccessInst, LLVMAtomicOrdering Ordering) { 2601 Value *P = unwrap<Value>(MemAccessInst); 2602 AtomicOrdering O = mapFromLLVMOrdering(Ordering); 2603 2604 if (LoadInst *LI = dyn_cast<LoadInst>(P)) 2605 return LI->setOrdering(O); 2606 return cast<StoreInst>(P)->setOrdering(O); 2607 } 2608 2609 /*--.. Casts ...............................................................--*/ 2610 2611 LLVMValueRef LLVMBuildTrunc(LLVMBuilderRef B, LLVMValueRef Val, 2612 LLVMTypeRef DestTy, const char *Name) { 2613 return wrap(unwrap(B)->CreateTrunc(unwrap(Val), unwrap(DestTy), Name)); 2614 } 2615 2616 LLVMValueRef LLVMBuildZExt(LLVMBuilderRef B, LLVMValueRef Val, 2617 LLVMTypeRef DestTy, const char *Name) { 2618 return wrap(unwrap(B)->CreateZExt(unwrap(Val), unwrap(DestTy), Name)); 2619 } 2620 2621 LLVMValueRef LLVMBuildSExt(LLVMBuilderRef B, LLVMValueRef Val, 2622 LLVMTypeRef DestTy, const char *Name) { 2623 return wrap(unwrap(B)->CreateSExt(unwrap(Val), unwrap(DestTy), Name)); 2624 } 2625 2626 LLVMValueRef LLVMBuildFPToUI(LLVMBuilderRef B, LLVMValueRef Val, 2627 LLVMTypeRef DestTy, const char *Name) { 2628 return wrap(unwrap(B)->CreateFPToUI(unwrap(Val), unwrap(DestTy), Name)); 2629 } 2630 2631 LLVMValueRef LLVMBuildFPToSI(LLVMBuilderRef B, LLVMValueRef Val, 2632 LLVMTypeRef DestTy, const char *Name) { 2633 return wrap(unwrap(B)->CreateFPToSI(unwrap(Val), unwrap(DestTy), Name)); 2634 } 2635 2636 LLVMValueRef LLVMBuildUIToFP(LLVMBuilderRef B, LLVMValueRef Val, 2637 LLVMTypeRef DestTy, const char *Name) { 2638 return wrap(unwrap(B)->CreateUIToFP(unwrap(Val), unwrap(DestTy), Name)); 2639 } 2640 2641 LLVMValueRef LLVMBuildSIToFP(LLVMBuilderRef B, LLVMValueRef Val, 2642 LLVMTypeRef DestTy, const char *Name) { 2643 return wrap(unwrap(B)->CreateSIToFP(unwrap(Val), unwrap(DestTy), Name)); 2644 } 2645 2646 LLVMValueRef LLVMBuildFPTrunc(LLVMBuilderRef B, LLVMValueRef Val, 2647 LLVMTypeRef DestTy, const char *Name) { 2648 return wrap(unwrap(B)->CreateFPTrunc(unwrap(Val), unwrap(DestTy), Name)); 2649 } 2650 2651 LLVMValueRef LLVMBuildFPExt(LLVMBuilderRef B, LLVMValueRef Val, 2652 LLVMTypeRef DestTy, const char *Name) { 2653 return wrap(unwrap(B)->CreateFPExt(unwrap(Val), unwrap(DestTy), Name)); 2654 } 2655 2656 LLVMValueRef LLVMBuildPtrToInt(LLVMBuilderRef B, LLVMValueRef Val, 2657 LLVMTypeRef DestTy, const char *Name) { 2658 return wrap(unwrap(B)->CreatePtrToInt(unwrap(Val), unwrap(DestTy), Name)); 2659 } 2660 2661 LLVMValueRef LLVMBuildIntToPtr(LLVMBuilderRef B, LLVMValueRef Val, 2662 LLVMTypeRef DestTy, const char *Name) { 2663 return wrap(unwrap(B)->CreateIntToPtr(unwrap(Val), unwrap(DestTy), Name)); 2664 } 2665 2666 LLVMValueRef LLVMBuildBitCast(LLVMBuilderRef B, LLVMValueRef Val, 2667 LLVMTypeRef DestTy, const char *Name) { 2668 return wrap(unwrap(B)->CreateBitCast(unwrap(Val), unwrap(DestTy), Name)); 2669 } 2670 2671 LLVMValueRef LLVMBuildAddrSpaceCast(LLVMBuilderRef B, LLVMValueRef Val, 2672 LLVMTypeRef DestTy, const char *Name) { 2673 return wrap(unwrap(B)->CreateAddrSpaceCast(unwrap(Val), unwrap(DestTy), Name)); 2674 } 2675 2676 LLVMValueRef LLVMBuildZExtOrBitCast(LLVMBuilderRef B, LLVMValueRef Val, 2677 LLVMTypeRef DestTy, const char *Name) { 2678 return wrap(unwrap(B)->CreateZExtOrBitCast(unwrap(Val), unwrap(DestTy), 2679 Name)); 2680 } 2681 2682 LLVMValueRef LLVMBuildSExtOrBitCast(LLVMBuilderRef B, LLVMValueRef Val, 2683 LLVMTypeRef DestTy, const char *Name) { 2684 return wrap(unwrap(B)->CreateSExtOrBitCast(unwrap(Val), unwrap(DestTy), 2685 Name)); 2686 } 2687 2688 LLVMValueRef LLVMBuildTruncOrBitCast(LLVMBuilderRef B, LLVMValueRef Val, 2689 LLVMTypeRef DestTy, const char *Name) { 2690 return wrap(unwrap(B)->CreateTruncOrBitCast(unwrap(Val), unwrap(DestTy), 2691 Name)); 2692 } 2693 2694 LLVMValueRef LLVMBuildCast(LLVMBuilderRef B, LLVMOpcode Op, LLVMValueRef Val, 2695 LLVMTypeRef DestTy, const char *Name) { 2696 return wrap(unwrap(B)->CreateCast(Instruction::CastOps(map_from_llvmopcode(Op)), unwrap(Val), 2697 unwrap(DestTy), Name)); 2698 } 2699 2700 LLVMValueRef LLVMBuildPointerCast(LLVMBuilderRef B, LLVMValueRef Val, 2701 LLVMTypeRef DestTy, const char *Name) { 2702 return wrap(unwrap(B)->CreatePointerCast(unwrap(Val), unwrap(DestTy), Name)); 2703 } 2704 2705 LLVMValueRef LLVMBuildIntCast(LLVMBuilderRef B, LLVMValueRef Val, 2706 LLVMTypeRef DestTy, const char *Name) { 2707 return wrap(unwrap(B)->CreateIntCast(unwrap(Val), unwrap(DestTy), 2708 /*isSigned*/true, Name)); 2709 } 2710 2711 LLVMValueRef LLVMBuildFPCast(LLVMBuilderRef B, LLVMValueRef Val, 2712 LLVMTypeRef DestTy, const char *Name) { 2713 return wrap(unwrap(B)->CreateFPCast(unwrap(Val), unwrap(DestTy), Name)); 2714 } 2715 2716 /*--.. Comparisons .........................................................--*/ 2717 2718 LLVMValueRef LLVMBuildICmp(LLVMBuilderRef B, LLVMIntPredicate Op, 2719 LLVMValueRef LHS, LLVMValueRef RHS, 2720 const char *Name) { 2721 return wrap(unwrap(B)->CreateICmp(static_cast<ICmpInst::Predicate>(Op), 2722 unwrap(LHS), unwrap(RHS), Name)); 2723 } 2724 2725 LLVMValueRef LLVMBuildFCmp(LLVMBuilderRef B, LLVMRealPredicate Op, 2726 LLVMValueRef LHS, LLVMValueRef RHS, 2727 const char *Name) { 2728 return wrap(unwrap(B)->CreateFCmp(static_cast<FCmpInst::Predicate>(Op), 2729 unwrap(LHS), unwrap(RHS), Name)); 2730 } 2731 2732 /*--.. Miscellaneous instructions ..........................................--*/ 2733 2734 LLVMValueRef LLVMBuildPhi(LLVMBuilderRef B, LLVMTypeRef Ty, const char *Name) { 2735 return wrap(unwrap(B)->CreatePHI(unwrap(Ty), 0, Name)); 2736 } 2737 2738 LLVMValueRef LLVMBuildCall(LLVMBuilderRef B, LLVMValueRef Fn, 2739 LLVMValueRef *Args, unsigned NumArgs, 2740 const char *Name) { 2741 return wrap(unwrap(B)->CreateCall(unwrap(Fn), 2742 makeArrayRef(unwrap(Args), NumArgs), 2743 Name)); 2744 } 2745 2746 LLVMValueRef LLVMBuildSelect(LLVMBuilderRef B, LLVMValueRef If, 2747 LLVMValueRef Then, LLVMValueRef Else, 2748 const char *Name) { 2749 return wrap(unwrap(B)->CreateSelect(unwrap(If), unwrap(Then), unwrap(Else), 2750 Name)); 2751 } 2752 2753 LLVMValueRef LLVMBuildVAArg(LLVMBuilderRef B, LLVMValueRef List, 2754 LLVMTypeRef Ty, const char *Name) { 2755 return wrap(unwrap(B)->CreateVAArg(unwrap(List), unwrap(Ty), Name)); 2756 } 2757 2758 LLVMValueRef LLVMBuildExtractElement(LLVMBuilderRef B, LLVMValueRef VecVal, 2759 LLVMValueRef Index, const char *Name) { 2760 return wrap(unwrap(B)->CreateExtractElement(unwrap(VecVal), unwrap(Index), 2761 Name)); 2762 } 2763 2764 LLVMValueRef LLVMBuildInsertElement(LLVMBuilderRef B, LLVMValueRef VecVal, 2765 LLVMValueRef EltVal, LLVMValueRef Index, 2766 const char *Name) { 2767 return wrap(unwrap(B)->CreateInsertElement(unwrap(VecVal), unwrap(EltVal), 2768 unwrap(Index), Name)); 2769 } 2770 2771 LLVMValueRef LLVMBuildShuffleVector(LLVMBuilderRef B, LLVMValueRef V1, 2772 LLVMValueRef V2, LLVMValueRef Mask, 2773 const char *Name) { 2774 return wrap(unwrap(B)->CreateShuffleVector(unwrap(V1), unwrap(V2), 2775 unwrap(Mask), Name)); 2776 } 2777 2778 LLVMValueRef LLVMBuildExtractValue(LLVMBuilderRef B, LLVMValueRef AggVal, 2779 unsigned Index, const char *Name) { 2780 return wrap(unwrap(B)->CreateExtractValue(unwrap(AggVal), Index, Name)); 2781 } 2782 2783 LLVMValueRef LLVMBuildInsertValue(LLVMBuilderRef B, LLVMValueRef AggVal, 2784 LLVMValueRef EltVal, unsigned Index, 2785 const char *Name) { 2786 return wrap(unwrap(B)->CreateInsertValue(unwrap(AggVal), unwrap(EltVal), 2787 Index, Name)); 2788 } 2789 2790 LLVMValueRef LLVMBuildIsNull(LLVMBuilderRef B, LLVMValueRef Val, 2791 const char *Name) { 2792 return wrap(unwrap(B)->CreateIsNull(unwrap(Val), Name)); 2793 } 2794 2795 LLVMValueRef LLVMBuildIsNotNull(LLVMBuilderRef B, LLVMValueRef Val, 2796 const char *Name) { 2797 return wrap(unwrap(B)->CreateIsNotNull(unwrap(Val), Name)); 2798 } 2799 2800 LLVMValueRef LLVMBuildPtrDiff(LLVMBuilderRef B, LLVMValueRef LHS, 2801 LLVMValueRef RHS, const char *Name) { 2802 return wrap(unwrap(B)->CreatePtrDiff(unwrap(LHS), unwrap(RHS), Name)); 2803 } 2804 2805 LLVMValueRef LLVMBuildAtomicRMW(LLVMBuilderRef B,LLVMAtomicRMWBinOp op, 2806 LLVMValueRef PTR, LLVMValueRef Val, 2807 LLVMAtomicOrdering ordering, 2808 LLVMBool singleThread) { 2809 AtomicRMWInst::BinOp intop; 2810 switch (op) { 2811 case LLVMAtomicRMWBinOpXchg: intop = AtomicRMWInst::Xchg; break; 2812 case LLVMAtomicRMWBinOpAdd: intop = AtomicRMWInst::Add; break; 2813 case LLVMAtomicRMWBinOpSub: intop = AtomicRMWInst::Sub; break; 2814 case LLVMAtomicRMWBinOpAnd: intop = AtomicRMWInst::And; break; 2815 case LLVMAtomicRMWBinOpNand: intop = AtomicRMWInst::Nand; break; 2816 case LLVMAtomicRMWBinOpOr: intop = AtomicRMWInst::Or; break; 2817 case LLVMAtomicRMWBinOpXor: intop = AtomicRMWInst::Xor; break; 2818 case LLVMAtomicRMWBinOpMax: intop = AtomicRMWInst::Max; break; 2819 case LLVMAtomicRMWBinOpMin: intop = AtomicRMWInst::Min; break; 2820 case LLVMAtomicRMWBinOpUMax: intop = AtomicRMWInst::UMax; break; 2821 case LLVMAtomicRMWBinOpUMin: intop = AtomicRMWInst::UMin; break; 2822 } 2823 return wrap(unwrap(B)->CreateAtomicRMW(intop, unwrap(PTR), unwrap(Val), 2824 mapFromLLVMOrdering(ordering), singleThread ? SingleThread : CrossThread)); 2825 } 2826 2827 2828 /*===-- Module providers --------------------------------------------------===*/ 2829 2830 LLVMModuleProviderRef 2831 LLVMCreateModuleProviderForExistingModule(LLVMModuleRef M) { 2832 return reinterpret_cast<LLVMModuleProviderRef>(M); 2833 } 2834 2835 void LLVMDisposeModuleProvider(LLVMModuleProviderRef MP) { 2836 delete unwrap(MP); 2837 } 2838 2839 2840 /*===-- Memory buffers ----------------------------------------------------===*/ 2841 2842 LLVMBool LLVMCreateMemoryBufferWithContentsOfFile( 2843 const char *Path, 2844 LLVMMemoryBufferRef *OutMemBuf, 2845 char **OutMessage) { 2846 2847 ErrorOr<std::unique_ptr<MemoryBuffer>> MBOrErr = MemoryBuffer::getFile(Path); 2848 if (std::error_code EC = MBOrErr.getError()) { 2849 *OutMessage = strdup(EC.message().c_str()); 2850 return 1; 2851 } 2852 *OutMemBuf = wrap(MBOrErr.get().release()); 2853 return 0; 2854 } 2855 2856 LLVMBool LLVMCreateMemoryBufferWithSTDIN(LLVMMemoryBufferRef *OutMemBuf, 2857 char **OutMessage) { 2858 ErrorOr<std::unique_ptr<MemoryBuffer>> MBOrErr = MemoryBuffer::getSTDIN(); 2859 if (std::error_code EC = MBOrErr.getError()) { 2860 *OutMessage = strdup(EC.message().c_str()); 2861 return 1; 2862 } 2863 *OutMemBuf = wrap(MBOrErr.get().release()); 2864 return 0; 2865 } 2866 2867 LLVMMemoryBufferRef LLVMCreateMemoryBufferWithMemoryRange( 2868 const char *InputData, 2869 size_t InputDataLength, 2870 const char *BufferName, 2871 LLVMBool RequiresNullTerminator) { 2872 2873 return wrap(MemoryBuffer::getMemBuffer(StringRef(InputData, InputDataLength), 2874 StringRef(BufferName), 2875 RequiresNullTerminator).release()); 2876 } 2877 2878 LLVMMemoryBufferRef LLVMCreateMemoryBufferWithMemoryRangeCopy( 2879 const char *InputData, 2880 size_t InputDataLength, 2881 const char *BufferName) { 2882 2883 return wrap( 2884 MemoryBuffer::getMemBufferCopy(StringRef(InputData, InputDataLength), 2885 StringRef(BufferName)).release()); 2886 } 2887 2888 const char *LLVMGetBufferStart(LLVMMemoryBufferRef MemBuf) { 2889 return unwrap(MemBuf)->getBufferStart(); 2890 } 2891 2892 size_t LLVMGetBufferSize(LLVMMemoryBufferRef MemBuf) { 2893 return unwrap(MemBuf)->getBufferSize(); 2894 } 2895 2896 void LLVMDisposeMemoryBuffer(LLVMMemoryBufferRef MemBuf) { 2897 delete unwrap(MemBuf); 2898 } 2899 2900 /*===-- Pass Registry -----------------------------------------------------===*/ 2901 2902 LLVMPassRegistryRef LLVMGetGlobalPassRegistry(void) { 2903 return wrap(PassRegistry::getPassRegistry()); 2904 } 2905 2906 /*===-- Pass Manager ------------------------------------------------------===*/ 2907 2908 LLVMPassManagerRef LLVMCreatePassManager() { 2909 return wrap(new legacy::PassManager()); 2910 } 2911 2912 LLVMPassManagerRef LLVMCreateFunctionPassManagerForModule(LLVMModuleRef M) { 2913 return wrap(new legacy::FunctionPassManager(unwrap(M))); 2914 } 2915 2916 LLVMPassManagerRef LLVMCreateFunctionPassManager(LLVMModuleProviderRef P) { 2917 return LLVMCreateFunctionPassManagerForModule( 2918 reinterpret_cast<LLVMModuleRef>(P)); 2919 } 2920 2921 LLVMBool LLVMRunPassManager(LLVMPassManagerRef PM, LLVMModuleRef M) { 2922 return unwrap<legacy::PassManager>(PM)->run(*unwrap(M)); 2923 } 2924 2925 LLVMBool LLVMInitializeFunctionPassManager(LLVMPassManagerRef FPM) { 2926 return unwrap<legacy::FunctionPassManager>(FPM)->doInitialization(); 2927 } 2928 2929 LLVMBool LLVMRunFunctionPassManager(LLVMPassManagerRef FPM, LLVMValueRef F) { 2930 return unwrap<legacy::FunctionPassManager>(FPM)->run(*unwrap<Function>(F)); 2931 } 2932 2933 LLVMBool LLVMFinalizeFunctionPassManager(LLVMPassManagerRef FPM) { 2934 return unwrap<legacy::FunctionPassManager>(FPM)->doFinalization(); 2935 } 2936 2937 void LLVMDisposePassManager(LLVMPassManagerRef PM) { 2938 delete unwrap(PM); 2939 } 2940 2941 /*===-- Threading ------------------------------------------------------===*/ 2942 2943 LLVMBool LLVMStartMultithreaded() { 2944 return LLVMIsMultithreaded(); 2945 } 2946 2947 void LLVMStopMultithreaded() { 2948 } 2949 2950 LLVMBool LLVMIsMultithreaded() { 2951 return llvm_is_multithreaded(); 2952 } 2953