src/rustllvm/RustWrapper.cpp

   1 // Copyright 2013 The Rust Project Developers. See the COPYRIGHT
   2 // file at the top-level directory of this distribution and at
   3 // http://rust-lang.org/COPYRIGHT.
   4 //
   5 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
   6 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
   7 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
   8 // option. This file may not be copied, modified, or distributed
   9 // except according to those terms.
  10
  11 #include "rustllvm.h"
  12 #include "llvm/IR/DiagnosticInfo.h"
  13 #include "llvm/IR/DiagnosticPrinter.h"
  14 #include "llvm/IR/Instructions.h"
  15 #include "llvm/Object/Archive.h"
  16 #include "llvm/Object/ObjectFile.h"
  17
  18 #include "llvm/IR/CallSite.h"
  19
  20 //===----------------------------------------------------------------------===
  21 //
  22 // This file defines alternate interfaces to core functions that are more
  23 // readily callable by Rust's FFI.
  24 //
  25 //===----------------------------------------------------------------------===
  26
  27 using namespace llvm;
  28 using namespace llvm::sys;
  29 using namespace llvm::object;
  30
  31 // LLVMAtomicOrdering is already an enum - don't create another
  32 // one.
  33 static AtomicOrdering fromRust(LLVMAtomicOrdering Ordering) {
  34   switch (Ordering) {
  35   case LLVMAtomicOrderingNotAtomic:
  36     return AtomicOrdering::NotAtomic;
  37   case LLVMAtomicOrderingUnordered:
  38     return AtomicOrdering::Unordered;
  39   case LLVMAtomicOrderingMonotonic:
  40     return AtomicOrdering::Monotonic;
  41   case LLVMAtomicOrderingAcquire:
  42     return AtomicOrdering::Acquire;
  43   case LLVMAtomicOrderingRelease:
  44     return AtomicOrdering::Release;
  45   case LLVMAtomicOrderingAcquireRelease:
  46     return AtomicOrdering::AcquireRelease;
  47   case LLVMAtomicOrderingSequentiallyConsistent:
  48     return AtomicOrdering::SequentiallyConsistent;
  49   }
  50
  51   llvm_unreachable("Invalid LLVMAtomicOrdering value!");
  52 }
  53
  54 static char *LastError;
  55
  56 extern "C" LLVMMemoryBufferRef
  57 LLVMRustCreateMemoryBufferWithContentsOfFile(const char *Path) {
  58   ErrorOr<std::unique_ptr<MemoryBuffer>> BufOr =
  59       MemoryBuffer::getFile(Path, -1, false);
  60   if (!BufOr) {
  61     LLVMRustSetLastError(BufOr.getError().message().c_str());
  62     return nullptr;
  63   }
  64   return wrap(BufOr.get().release());
  65 }
  66
  67 extern "C" char *LLVMRustGetLastError(void) {
  68   char *Ret = LastError;
  69   LastError = nullptr;
  70   return Ret;
  71 }
  72
  73 void LLVMRustSetLastError(const char *Err) {
  74   free((void *)LastError);
  75   LastError = strdup(Err);
  76 }
  77
  78 extern "C" void LLVMRustSetNormalizedTarget(LLVMModuleRef M,
  79                                             const char *Triple) {
  80   unwrap(M)->setTargetTriple(Triple::normalize(Triple));
  81 }
  82
  83 extern "C" void LLVMRustPrintPassTimings() {
  84   raw_fd_ostream OS(2, false); // stderr.
  85   TimerGroup::printAll(OS);
  86 }
  87
  88 extern "C" LLVMValueRef LLVMRustGetNamedValue(LLVMModuleRef M,
  89                                               const char *Name) {
  90   return wrap(unwrap(M)->getNamedValue(Name));
  91 }
  92
  93 extern "C" LLVMValueRef LLVMRustGetOrInsertFunction(LLVMModuleRef M,
  94                                                     const char *Name,
  95                                                     LLVMTypeRef FunctionTy) {
  96   return wrap(
  97       unwrap(M)->getOrInsertFunction(Name, unwrap<FunctionType>(FunctionTy)));
  98 }
  99
 100 extern "C" LLVMValueRef
 101 LLVMRustGetOrInsertGlobal(LLVMModuleRef M, const char *Name, LLVMTypeRef Ty) {
 102   return wrap(unwrap(M)->getOrInsertGlobal(Name, unwrap(Ty)));
 103 }
 104
 105 extern "C" LLVMTypeRef LLVMRustMetadataTypeInContext(LLVMContextRef C) {
 106   return wrap(Type::getMetadataTy(*unwrap(C)));
 107 }
 108
 109 static Attribute::AttrKind fromRust(LLVMRustAttribute Kind) {
 110   switch (Kind) {
 111   case AlwaysInline:
 112     return Attribute::AlwaysInline;
 113   case ByVal:
 114     return Attribute::ByVal;
 115   case Cold:
 116     return Attribute::Cold;
 117   case InlineHint:
 118     return Attribute::InlineHint;
 119   case MinSize:
 120     return Attribute::MinSize;
 121   case Naked:
 122     return Attribute::Naked;
 123   case NoAlias:
 124     return Attribute::NoAlias;
 125   case NoCapture:
 126     return Attribute::NoCapture;
 127   case NoInline:
 128     return Attribute::NoInline;
 129   case NonNull:
 130     return Attribute::NonNull;
 131   case NoRedZone:
 132     return Attribute::NoRedZone;
 133   case NoReturn:
 134     return Attribute::NoReturn;
 135   case NoUnwind:
 136     return Attribute::NoUnwind;
 137   case OptimizeForSize:
 138     return Attribute::OptimizeForSize;
 139   case ReadOnly:
 140     return Attribute::ReadOnly;
 141   case SExt:
 142     return Attribute::SExt;
 143   case StructRet:
 144     return Attribute::StructRet;
 145   case UWTable:
 146     return Attribute::UWTable;
 147   case ZExt:
 148     return Attribute::ZExt;
 149   case InReg:
 150     return Attribute::InReg;
 151   }
 152   llvm_unreachable("bad AttributeKind");
 153 }
 154
 155 extern "C" void LLVMRustAddCallSiteAttribute(LLVMValueRef Instr, unsigned Index,
 156                                              LLVMRustAttribute RustAttr) {
 157   CallSite Call = CallSite(unwrap<Instruction>(Instr));
 158   Attribute Attr = Attribute::get(Call->getContext(), fromRust(RustAttr));
 159   AttrBuilder B(Attr);
 160   Call.setAttributes(Call.getAttributes().addAttributes(
 161       Call->getContext(), Index,
 162       AttributeSet::get(Call->getContext(), Index, B)));
 163 }
 164
 165 extern "C" void LLVMRustAddDereferenceableCallSiteAttr(LLVMValueRef Instr,
 166                                                        unsigned Index,
 167                                                        uint64_t Bytes) {
 168   CallSite Call = CallSite(unwrap<Instruction>(Instr));
 169   AttrBuilder B;
 170   B.addDereferenceableAttr(Bytes);
 171   Call.setAttributes(Call.getAttributes().addAttributes(
 172       Call->getContext(), Index,
 173       AttributeSet::get(Call->getContext(), Index, B)));
 174 }
 175
 176 extern "C" void LLVMRustAddFunctionAttribute(LLVMValueRef Fn, unsigned Index,
 177                                              LLVMRustAttribute RustAttr) {
 178   Function *A = unwrap<Function>(Fn);
 179   Attribute Attr = Attribute::get(A->getContext(), fromRust(RustAttr));
 180   AttrBuilder B(Attr);
 181   A->addAttributes(Index, AttributeSet::get(A->getContext(), Index, B));
 182 }
 183
 184 extern "C" void LLVMRustAddDereferenceableAttr(LLVMValueRef Fn, unsigned Index,
 185                                                uint64_t Bytes) {
 186   Function *A = unwrap<Function>(Fn);
 187   AttrBuilder B;
 188   B.addDereferenceableAttr(Bytes);
 189   A->addAttributes(Index, AttributeSet::get(A->getContext(), Index, B));
 190 }
 191
 192 extern "C" void LLVMRustAddFunctionAttrStringValue(LLVMValueRef Fn,
 193                                                    unsigned Index,
 194                                                    const char *Name,
 195                                                    const char *Value) {
 196   Function *F = unwrap<Function>(Fn);
 197   AttrBuilder B;
 198   B.addAttribute(Name, Value);
 199   F->addAttributes(Index, AttributeSet::get(F->getContext(), Index, B));
 200 }
 201
 202 extern "C" void LLVMRustRemoveFunctionAttributes(LLVMValueRef Fn,
 203                                                  unsigned Index,
 204                                                  LLVMRustAttribute RustAttr) {
 205   Function *F = unwrap<Function>(Fn);
 206   const AttributeSet PAL = F->getAttributes();
 207   Attribute Attr = Attribute::get(F->getContext(), fromRust(RustAttr));
 208   AttrBuilder B(Attr);
 209   const AttributeSet PALNew = PAL.removeAttributes(
 210       F->getContext(), Index, AttributeSet::get(F->getContext(), Index, B));
 211   F->setAttributes(PALNew);
 212 }
 213
 214 // enable fpmath flag UnsafeAlgebra
 215 extern "C" void LLVMRustSetHasUnsafeAlgebra(LLVMValueRef V) {
 216   if (auto I = dyn_cast<Instruction>(unwrap<Value>(V))) {
 217     I->setHasUnsafeAlgebra(true);
 218   }
 219 }
 220
 221 extern "C" LLVMValueRef
 222 LLVMRustBuildAtomicLoad(LLVMBuilderRef B, LLVMValueRef Source, const char *Name,
 223                         LLVMAtomicOrdering Order, unsigned Alignment) {
 224   LoadInst *LI = new LoadInst(unwrap(Source), 0);
 225   LI->setAtomic(fromRust(Order));
 226   LI->setAlignment(Alignment);
 227   return wrap(unwrap(B)->Insert(LI, Name));
 228 }
 229
 230 extern "C" LLVMValueRef LLVMRustBuildAtomicStore(LLVMBuilderRef B,
 231                                                  LLVMValueRef V,
 232                                                  LLVMValueRef Target,
 233                                                  LLVMAtomicOrdering Order,
 234                                                  unsigned Alignment) {
 235   StoreInst *SI = new StoreInst(unwrap(V), unwrap(Target));
 236   SI->setAtomic(fromRust(Order));
 237   SI->setAlignment(Alignment);
 238   return wrap(unwrap(B)->Insert(SI));
 239 }
 240
 241 extern "C" LLVMValueRef
 242 LLVMRustBuildAtomicCmpXchg(LLVMBuilderRef B, LLVMValueRef Target,
 243                            LLVMValueRef Old, LLVMValueRef Source,
 244                            LLVMAtomicOrdering Order,
 245                            LLVMAtomicOrdering FailureOrder, LLVMBool Weak) {
 246   AtomicCmpXchgInst *ACXI = unwrap(B)->CreateAtomicCmpXchg(
 247       unwrap(Target), unwrap(Old), unwrap(Source), fromRust(Order),
 248       fromRust(FailureOrder));
 249   ACXI->setWeak(Weak);
 250   return wrap(ACXI);
 251 }
 252
 253 enum class LLVMRustSynchronizationScope {
 254   Other,
 255   SingleThread,
 256   CrossThread,
 257 };
 258
 259 static SynchronizationScope fromRust(LLVMRustSynchronizationScope Scope) {
 260   switch (Scope) {
 261   case LLVMRustSynchronizationScope::SingleThread:
 262     return SingleThread;
 263   case LLVMRustSynchronizationScope::CrossThread:
 264     return CrossThread;
 265   default:
 266     llvm_unreachable("bad SynchronizationScope.");
 267   }
 268 }
 269
 270 extern "C" LLVMValueRef
 271 LLVMRustBuildAtomicFence(LLVMBuilderRef B, LLVMAtomicOrdering Order,
 272                          LLVMRustSynchronizationScope Scope) {
 273   return wrap(unwrap(B)->CreateFence(fromRust(Order), fromRust(Scope)));
 274 }
 275
 276 extern "C" void LLVMRustSetDebug(int Enabled) {
 277 #ifndef NDEBUG
 278   DebugFlag = Enabled;
 279 #endif
 280 }
 281
 282 enum class LLVMRustAsmDialect {
 283   Other,
 284   Att,
 285   Intel,
 286 };
 287
 288 static InlineAsm::AsmDialect fromRust(LLVMRustAsmDialect Dialect) {
 289   switch (Dialect) {
 290   case LLVMRustAsmDialect::Att:
 291     return InlineAsm::AD_ATT;
 292   case LLVMRustAsmDialect::Intel:
 293     return InlineAsm::AD_Intel;
 294   default:
 295     llvm_unreachable("bad AsmDialect.");
 296   }
 297 }
 298
 299 extern "C" LLVMValueRef LLVMRustInlineAsm(LLVMTypeRef Ty, char *AsmString,
 300                                           char *Constraints,
 301                                           LLVMBool HasSideEffects,
 302                                           LLVMBool IsAlignStack,
 303                                           LLVMRustAsmDialect Dialect) {
 304   return wrap(InlineAsm::get(unwrap<FunctionType>(Ty), AsmString, Constraints,
 305                              HasSideEffects, IsAlignStack, fromRust(Dialect)));
 306 }
 307
 308 typedef DIBuilder *LLVMRustDIBuilderRef;
 309
 310 typedef struct LLVMOpaqueMetadata *LLVMRustMetadataRef;
 311
 312 namespace llvm {
 313 DEFINE_ISA_CONVERSION_FUNCTIONS(Metadata, LLVMRustMetadataRef)
 314
 315 inline Metadata **unwrap(LLVMRustMetadataRef *Vals) {
 316   return reinterpret_cast<Metadata **>(Vals);
 317 }
 318 }
 319
 320 template <typename DIT> DIT *unwrapDIPtr(LLVMRustMetadataRef Ref) {
 321   return (DIT *)(Ref ? unwrap<MDNode>(Ref) : nullptr);
 322 }
 323
 324 #define DIDescriptor DIScope
 325 #define DIArray DINodeArray
 326 #define unwrapDI unwrapDIPtr
 327
 328 // These values **must** match debuginfo::DIFlags! They also *happen*
 329 // to match LLVM, but that isn't required as we do giant sets of
 330 // matching below. The value shouldn't be directly passed to LLVM.
 331 enum class LLVMRustDIFlags : uint32_t {
 332   FlagZero = 0,
 333   FlagPrivate = 1,
 334   FlagProtected = 2,
 335   FlagPublic = 3,
 336   FlagFwdDecl = (1 << 2),
 337   FlagAppleBlock = (1 << 3),
 338   FlagBlockByrefStruct = (1 << 4),
 339   FlagVirtual = (1 << 5),
 340   FlagArtificial = (1 << 6),
 341   FlagExplicit = (1 << 7),
 342   FlagPrototyped = (1 << 8),
 343   FlagObjcClassComplete = (1 << 9),
 344   FlagObjectPointer = (1 << 10),
 345   FlagVector = (1 << 11),
 346   FlagStaticMember = (1 << 12),
 347   FlagLValueReference = (1 << 13),
 348   FlagRValueReference = (1 << 14),
 349   // Do not add values that are not supported by the minimum LLVM
 350   // version we support!
 351 };
 352
 353 inline LLVMRustDIFlags operator&(LLVMRustDIFlags A, LLVMRustDIFlags B) {
 354   return static_cast<LLVMRustDIFlags>(static_cast<uint32_t>(A) &
 355                                       static_cast<uint32_t>(B));
 356 }
 357
 358 inline LLVMRustDIFlags operator|(LLVMRustDIFlags A, LLVMRustDIFlags B) {
 359   return static_cast<LLVMRustDIFlags>(static_cast<uint32_t>(A) |
 360                                       static_cast<uint32_t>(B));
 361 }
 362
 363 inline LLVMRustDIFlags &operator|=(LLVMRustDIFlags &A, LLVMRustDIFlags B) {
 364   return A = A | B;
 365 }
 366
 367 inline bool isSet(LLVMRustDIFlags F) { return F != LLVMRustDIFlags::FlagZero; }
 368
 369 inline LLVMRustDIFlags visibility(LLVMRustDIFlags F) {
 370   return static_cast<LLVMRustDIFlags>(static_cast<uint32_t>(F) & 0x3);
 371 }
 372
 373 #if LLVM_VERSION_GE(4, 0)
 374 static DINode::DIFlags fromRust(LLVMRustDIFlags Flags) {
 375   DINode::DIFlags Result = DINode::DIFlags::FlagZero;
 376 #else
 377 static unsigned fromRust(LLVMRustDIFlags Flags) {
 378   unsigned Result = 0;
 379 #endif
 380
 381   switch (visibility(Flags)) {
 382   case LLVMRustDIFlags::FlagPrivate:
 383     Result |= DINode::DIFlags::FlagPrivate;
 384     break;
 385   case LLVMRustDIFlags::FlagProtected:
 386     Result |= DINode::DIFlags::FlagProtected;
 387     break;
 388   case LLVMRustDIFlags::FlagPublic:
 389     Result |= DINode::DIFlags::FlagPublic;
 390     break;
 391   default:
 392     // The rest are handled below
 393     break;
 394   }
 395
 396   if (isSet(Flags & LLVMRustDIFlags::FlagFwdDecl)) {
 397     Result |= DINode::DIFlags::FlagFwdDecl;
 398   }
 399   if (isSet(Flags & LLVMRustDIFlags::FlagAppleBlock)) {
 400     Result |= DINode::DIFlags::FlagAppleBlock;
 401   }
 402   if (isSet(Flags & LLVMRustDIFlags::FlagBlockByrefStruct)) {
 403     Result |= DINode::DIFlags::FlagBlockByrefStruct;
 404   }
 405   if (isSet(Flags & LLVMRustDIFlags::FlagVirtual)) {
 406     Result |= DINode::DIFlags::FlagVirtual;
 407   }
 408   if (isSet(Flags & LLVMRustDIFlags::FlagArtificial)) {
 409     Result |= DINode::DIFlags::FlagArtificial;
 410   }
 411   if (isSet(Flags & LLVMRustDIFlags::FlagExplicit)) {
 412     Result |= DINode::DIFlags::FlagExplicit;
 413   }
 414   if (isSet(Flags & LLVMRustDIFlags::FlagPrototyped)) {
 415     Result |= DINode::DIFlags::FlagPrototyped;
 416   }
 417   if (isSet(Flags & LLVMRustDIFlags::FlagObjcClassComplete)) {
 418     Result |= DINode::DIFlags::FlagObjcClassComplete;
 419   }
 420   if (isSet(Flags & LLVMRustDIFlags::FlagObjectPointer)) {
 421     Result |= DINode::DIFlags::FlagObjectPointer;
 422   }
 423   if (isSet(Flags & LLVMRustDIFlags::FlagVector)) {
 424     Result |= DINode::DIFlags::FlagVector;
 425   }
 426   if (isSet(Flags & LLVMRustDIFlags::FlagStaticMember)) {
 427     Result |= DINode::DIFlags::FlagStaticMember;
 428   }
 429   if (isSet(Flags & LLVMRustDIFlags::FlagLValueReference)) {
 430     Result |= DINode::DIFlags::FlagLValueReference;
 431   }
 432   if (isSet(Flags & LLVMRustDIFlags::FlagRValueReference)) {
 433     Result |= DINode::DIFlags::FlagRValueReference;
 434   }
 435
 436   return Result;
 437 }
 438
 439 extern "C" uint32_t LLVMRustDebugMetadataVersion() {
 440   return DEBUG_METADATA_VERSION;
 441 }
 442
 443 extern "C" uint32_t LLVMRustVersionMinor() { return LLVM_VERSION_MINOR; }
 444
 445 extern "C" uint32_t LLVMRustVersionMajor() { return LLVM_VERSION_MAJOR; }
 446
 447 extern "C" void LLVMRustAddModuleFlag(LLVMModuleRef M, const char *Name,
 448                                       uint32_t Value) {
 449   unwrap(M)->addModuleFlag(Module::Warning, Name, Value);
 450 }
 451
 452 extern "C" LLVMRustDIBuilderRef LLVMRustDIBuilderCreate(LLVMModuleRef M) {
 453   return new DIBuilder(*unwrap(M));
 454 }
 455
 456 extern "C" void LLVMRustDIBuilderDispose(LLVMRustDIBuilderRef Builder) {
 457   delete Builder;
 458 }
 459
 460 extern "C" void LLVMRustDIBuilderFinalize(LLVMRustDIBuilderRef Builder) {
 461   Builder->finalize();
 462 }
 463
 464 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateCompileUnit(
 465     LLVMRustDIBuilderRef Builder, unsigned Lang, const char *File,
 466     const char *Dir, const char *Producer, bool isOptimized, const char *Flags,
 467     unsigned RuntimeVer, const char *SplitName) {
 468   return wrap(Builder->createCompileUnit(Lang, File, Dir, Producer, isOptimized,
 469                                          Flags, RuntimeVer, SplitName));
 470 }
 471
 472 extern "C" LLVMRustMetadataRef
 473 LLVMRustDIBuilderCreateFile(LLVMRustDIBuilderRef Builder, const char *Filename,
 474                             const char *Directory) {
 475   return wrap(Builder->createFile(Filename, Directory));
 476 }
 477
 478 extern "C" LLVMRustMetadataRef
 479 LLVMRustDIBuilderCreateSubroutineType(LLVMRustDIBuilderRef Builder,
 480                                       LLVMRustMetadataRef File,
 481                                       LLVMRustMetadataRef ParameterTypes) {
 482   return wrap(Builder->createSubroutineType(
 483 #if LLVM_VERSION_EQ(3, 7)
 484       unwrapDI<DIFile>(File),
 485 #endif
 486       DITypeRefArray(unwrap<MDTuple>(ParameterTypes))));
 487 }
 488
 489 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateFunction(
 490     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 491     const char *LinkageName, LLVMRustMetadataRef File, unsigned LineNo,
 492     LLVMRustMetadataRef Ty, bool IsLocalToUnit, bool IsDefinition,
 493     unsigned ScopeLine, LLVMRustDIFlags Flags, bool IsOptimized,
 494     LLVMValueRef Fn, LLVMRustMetadataRef TParam, LLVMRustMetadataRef Decl) {
 495 #if LLVM_VERSION_GE(3, 8)
 496   DITemplateParameterArray TParams =
 497       DITemplateParameterArray(unwrap<MDTuple>(TParam));
 498   DISubprogram *Sub = Builder->createFunction(
 499       unwrapDI<DIScope>(Scope), Name, LinkageName, unwrapDI<DIFile>(File),
 500       LineNo, unwrapDI<DISubroutineType>(Ty), IsLocalToUnit, IsDefinition,
 501       ScopeLine, fromRust(Flags), IsOptimized, TParams,
 502       unwrapDIPtr<DISubprogram>(Decl));
 503   unwrap<Function>(Fn)->setSubprogram(Sub);
 504   return wrap(Sub);
 505 #else
 506   return wrap(Builder->createFunction(
 507       unwrapDI<DIScope>(Scope), Name, LinkageName, unwrapDI<DIFile>(File),
 508       LineNo, unwrapDI<DISubroutineType>(Ty), IsLocalToUnit, IsDefinition,
 509       ScopeLine, fromRust(Flags), IsOptimized, unwrap<Function>(Fn),
 510       unwrapDIPtr<MDNode>(TParam), unwrapDIPtr<MDNode>(Decl)));
 511 #endif
 512 }
 513
 514 extern "C" LLVMRustMetadataRef
 515 LLVMRustDIBuilderCreateBasicType(LLVMRustDIBuilderRef Builder, const char *Name,
 516                                  uint64_t SizeInBits, uint64_t AlignInBits,
 517                                  unsigned Encoding) {
 518   return wrap(Builder->createBasicType(Name, SizeInBits,
 519 #if LLVM_VERSION_LE(3, 9)
 520                                        AlignInBits,
 521 #endif
 522                                        Encoding));
 523 }
 524
 525 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreatePointerType(
 526     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef PointeeTy,
 527     uint64_t SizeInBits, uint64_t AlignInBits, const char *Name) {
 528   return wrap(Builder->createPointerType(unwrapDI<DIType>(PointeeTy),
 529                                          SizeInBits, AlignInBits, Name));
 530 }
 531
 532 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateStructType(
 533     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 534     LLVMRustMetadataRef File, unsigned LineNumber, uint64_t SizeInBits,
 535     uint64_t AlignInBits, LLVMRustDIFlags Flags,
 536     LLVMRustMetadataRef DerivedFrom, LLVMRustMetadataRef Elements,
 537     unsigned RunTimeLang, LLVMRustMetadataRef VTableHolder,
 538     const char *UniqueId) {
 539   return wrap(Builder->createStructType(
 540       unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNumber,
 541       SizeInBits, AlignInBits, fromRust(Flags), unwrapDI<DIType>(DerivedFrom),
 542       DINodeArray(unwrapDI<MDTuple>(Elements)), RunTimeLang,
 543       unwrapDI<DIType>(VTableHolder), UniqueId));
 544 }
 545
 546 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateMemberType(
 547     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 548     LLVMRustMetadataRef File, unsigned LineNo, uint64_t SizeInBits,
 549     uint64_t AlignInBits, uint64_t OffsetInBits, LLVMRustDIFlags Flags,
 550     LLVMRustMetadataRef Ty) {
 551   return wrap(Builder->createMemberType(unwrapDI<DIDescriptor>(Scope), Name,
 552                                         unwrapDI<DIFile>(File), LineNo,
 553                                         SizeInBits, AlignInBits, OffsetInBits,
 554                                         fromRust(Flags), unwrapDI<DIType>(Ty)));
 555 }
 556
 557 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateLexicalBlock(
 558     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope,
 559     LLVMRustMetadataRef File, unsigned Line, unsigned Col) {
 560   return wrap(Builder->createLexicalBlock(unwrapDI<DIDescriptor>(Scope),
 561                                           unwrapDI<DIFile>(File), Line, Col));
 562 }
 563
 564 extern "C" LLVMRustMetadataRef
 565 LLVMRustDIBuilderCreateLexicalBlockFile(LLVMRustDIBuilderRef Builder,
 566                                         LLVMRustMetadataRef Scope,
 567                                         LLVMRustMetadataRef File) {
 568   return wrap(Builder->createLexicalBlockFile(unwrapDI<DIDescriptor>(Scope),
 569                                               unwrapDI<DIFile>(File)));
 570 }
 571
 572 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateStaticVariable(
 573     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Context, const char *Name,
 574     const char *LinkageName, LLVMRustMetadataRef File, unsigned LineNo,
 575     LLVMRustMetadataRef Ty, bool IsLocalToUnit, LLVMValueRef V,
 576     LLVMRustMetadataRef Decl = nullptr, uint64_t AlignInBits = 0) {
 577   Constant *InitVal = cast<Constant>(unwrap(V));
 578
 579 #if LLVM_VERSION_GE(4, 0)
 580   llvm::DIExpression *InitExpr = nullptr;
 581   if (llvm::ConstantInt *IntVal = llvm::dyn_cast<llvm::ConstantInt>(InitVal)) {
 582     InitExpr = Builder->createConstantValueExpression(
 583         IntVal->getValue().getSExtValue());
 584   } else if (llvm::ConstantFP *FPVal =
 585                  llvm::dyn_cast<llvm::ConstantFP>(InitVal)) {
 586     InitExpr = Builder->createConstantValueExpression(
 587         FPVal->getValueAPF().bitcastToAPInt().getZExtValue());
 588   }
 589 #endif
 590
 591 #if LLVM_VERSION_GE(4, 0)
 592   return wrap(Builder->createGlobalVariableExpression(
 593 #else
 594   return wrap(Builder->createGlobalVariable(
 595 #endif
 596       unwrapDI<DIDescriptor>(Context), Name, LinkageName,
 597       unwrapDI<DIFile>(File), LineNo, unwrapDI<DIType>(Ty), IsLocalToUnit,
 598 #if LLVM_VERSION_GE(4, 0)
 599       InitExpr,
 600 #else
 601       InitVal,
 602 #endif
 603       unwrapDIPtr<MDNode>(Decl)
 604 #if LLVM_VERSION_GE(4, 0)
 605       ,
 606       AlignInBits
 607 #endif
 608       ));
 609 }
 610
 611 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateVariable(
 612     LLVMRustDIBuilderRef Builder, unsigned Tag, LLVMRustMetadataRef Scope,
 613     const char *Name, LLVMRustMetadataRef File, unsigned LineNo,
 614     LLVMRustMetadataRef Ty, bool AlwaysPreserve, LLVMRustDIFlags Flags,
 615     unsigned ArgNo, uint64_t AlignInBits) {
 616 #if LLVM_VERSION_GE(3, 8)
 617   if (Tag == 0x100) { // DW_TAG_auto_variable
 618     return wrap(Builder->createAutoVariable(
 619         unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNo,
 620         unwrapDI<DIType>(Ty), AlwaysPreserve, fromRust(Flags)
 621 #if LLVM_VERSION_GE(4, 0)
 622         ,
 623         AlignInBits
 624 #endif
 625         ));
 626   } else {
 627     return wrap(Builder->createParameterVariable(
 628         unwrapDI<DIDescriptor>(Scope), Name, ArgNo, unwrapDI<DIFile>(File),
 629         LineNo, unwrapDI<DIType>(Ty), AlwaysPreserve, fromRust(Flags)));
 630   }
 631 #else
 632   return wrap(Builder->createLocalVariable(
 633       Tag, unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNo,
 634       unwrapDI<DIType>(Ty), AlwaysPreserve, fromRust(Flags), ArgNo));
 635 #endif
 636 }
 637
 638 extern "C" LLVMRustMetadataRef
 639 LLVMRustDIBuilderCreateArrayType(LLVMRustDIBuilderRef Builder, uint64_t Size,
 640                                  uint64_t AlignInBits, LLVMRustMetadataRef Ty,
 641                                  LLVMRustMetadataRef Subscripts) {
 642   return wrap(
 643       Builder->createArrayType(Size, AlignInBits, unwrapDI<DIType>(Ty),
 644                                DINodeArray(unwrapDI<MDTuple>(Subscripts))));
 645 }
 646
 647 extern "C" LLVMRustMetadataRef
 648 LLVMRustDIBuilderCreateVectorType(LLVMRustDIBuilderRef Builder, uint64_t Size,
 649                                   uint64_t AlignInBits, LLVMRustMetadataRef Ty,
 650                                   LLVMRustMetadataRef Subscripts) {
 651   return wrap(
 652       Builder->createVectorType(Size, AlignInBits, unwrapDI<DIType>(Ty),
 653                                 DINodeArray(unwrapDI<MDTuple>(Subscripts))));
 654 }
 655
 656 extern "C" LLVMRustMetadataRef
 657 LLVMRustDIBuilderGetOrCreateSubrange(LLVMRustDIBuilderRef Builder, int64_t Lo,
 658                                      int64_t Count) {
 659   return wrap(Builder->getOrCreateSubrange(Lo, Count));
 660 }
 661
 662 extern "C" LLVMRustMetadataRef
 663 LLVMRustDIBuilderGetOrCreateArray(LLVMRustDIBuilderRef Builder,
 664                                   LLVMRustMetadataRef *Ptr, unsigned Count) {
 665   Metadata **DataValue = unwrap(Ptr);
 666   return wrap(
 667       Builder->getOrCreateArray(ArrayRef<Metadata *>(DataValue, Count)).get());
 668 }
 669
 670 extern "C" LLVMValueRef LLVMRustDIBuilderInsertDeclareAtEnd(
 671     LLVMRustDIBuilderRef Builder, LLVMValueRef V, LLVMRustMetadataRef VarInfo,
 672     int64_t *AddrOps, unsigned AddrOpsCount, LLVMValueRef DL,
 673     LLVMBasicBlockRef InsertAtEnd) {
 674   return wrap(Builder->insertDeclare(
 675       unwrap(V), unwrap<DILocalVariable>(VarInfo),
 676       Builder->createExpression(llvm::ArrayRef<int64_t>(AddrOps, AddrOpsCount)),
 677       DebugLoc(cast<MDNode>(unwrap<MetadataAsValue>(DL)->getMetadata())),
 678       unwrap(InsertAtEnd)));
 679 }
 680
 681 extern "C" LLVMRustMetadataRef
 682 LLVMRustDIBuilderCreateEnumerator(LLVMRustDIBuilderRef Builder,
 683                                   const char *Name, uint64_t Val) {
 684   return wrap(Builder->createEnumerator(Name, Val));
 685 }
 686
 687 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateEnumerationType(
 688     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 689     LLVMRustMetadataRef File, unsigned LineNumber, uint64_t SizeInBits,
 690     uint64_t AlignInBits, LLVMRustMetadataRef Elements,
 691     LLVMRustMetadataRef ClassTy) {
 692   return wrap(Builder->createEnumerationType(
 693       unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNumber,
 694       SizeInBits, AlignInBits, DINodeArray(unwrapDI<MDTuple>(Elements)),
 695       unwrapDI<DIType>(ClassTy)));
 696 }
 697
 698 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateUnionType(
 699     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 700     LLVMRustMetadataRef File, unsigned LineNumber, uint64_t SizeInBits,
 701     uint64_t AlignInBits, LLVMRustDIFlags Flags, LLVMRustMetadataRef Elements,
 702     unsigned RunTimeLang, const char *UniqueId) {
 703   return wrap(Builder->createUnionType(
 704       unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNumber,
 705       SizeInBits, AlignInBits, fromRust(Flags),
 706       DINodeArray(unwrapDI<MDTuple>(Elements)), RunTimeLang, UniqueId));
 707 }
 708
 709 extern "C" LLVMRustMetadataRef LLVMRustDIBuilderCreateTemplateTypeParameter(
 710     LLVMRustDIBuilderRef Builder, LLVMRustMetadataRef Scope, const char *Name,
 711     LLVMRustMetadataRef Ty, LLVMRustMetadataRef File, unsigned LineNo,
 712     unsigned ColumnNo) {
 713   return wrap(Builder->createTemplateTypeParameter(
 714       unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIType>(Ty)));
 715 }
 716
 717 extern "C" LLVMRustMetadataRef
 718 LLVMRustDIBuilderCreateNameSpace(LLVMRustDIBuilderRef Builder,
 719                                  LLVMRustMetadataRef Scope, const char *Name,
 720                                  LLVMRustMetadataRef File, unsigned LineNo) {
 721   return wrap(Builder->createNameSpace(
 722       unwrapDI<DIDescriptor>(Scope), Name, unwrapDI<DIFile>(File), LineNo
 723 #if LLVM_VERSION_GE(4, 0)
 724       ,
 725       false // ExportSymbols (only relevant for C++ anonymous namespaces)
 726 #endif
 727       ));
 728 }
 729
 730 extern "C" void
 731 LLVMRustDICompositeTypeSetTypeArray(LLVMRustDIBuilderRef Builder,
 732                                     LLVMRustMetadataRef CompositeTy,
 733                                     LLVMRustMetadataRef TyArray) {
 734   DICompositeType *Tmp = unwrapDI<DICompositeType>(CompositeTy);
 735   Builder->replaceArrays(Tmp, DINodeArray(unwrap<MDTuple>(TyArray)));
 736 }
 737
 738 extern "C" LLVMValueRef
 739 LLVMRustDIBuilderCreateDebugLocation(LLVMContextRef ContextRef, unsigned Line,
 740                                      unsigned Column, LLVMRustMetadataRef Scope,
 741                                      LLVMRustMetadataRef InlinedAt) {
 742   LLVMContext &Context = *unwrap(ContextRef);
 743
 744   DebugLoc debug_loc = DebugLoc::get(Line, Column, unwrapDIPtr<MDNode>(Scope),
 745                                      unwrapDIPtr<MDNode>(InlinedAt));
 746
 747   return wrap(MetadataAsValue::get(Context, debug_loc.getAsMDNode()));
 748 }
 749
 750 extern "C" int64_t LLVMRustDIBuilderCreateOpDeref() {
 751   return dwarf::DW_OP_deref;
 752 }
 753
 754 extern "C" int64_t LLVMRustDIBuilderCreateOpPlus() { return dwarf::DW_OP_plus; }
 755
 756 extern "C" void LLVMRustWriteTypeToString(LLVMTypeRef Ty, RustStringRef Str) {
 757   RawRustStringOstream OS(Str);
 758   unwrap<llvm::Type>(Ty)->print(OS);
 759 }
 760
 761 extern "C" void LLVMRustWriteValueToString(LLVMValueRef V,
 762                                            RustStringRef Str) {
 763   RawRustStringOstream OS(Str);
 764   OS << "(";
 765   unwrap<llvm::Value>(V)->getType()->print(OS);
 766   OS << ":";
 767   unwrap<llvm::Value>(V)->print(OS);
 768   OS << ")";
 769 }
 770
 771 extern "C" bool LLVMRustLinkInExternalBitcode(LLVMModuleRef DstRef, char *BC,
 772                                               size_t Len) {
 773   Module *Dst = unwrap(DstRef);
 774
 775   std::unique_ptr<MemoryBuffer> Buf =
 776       MemoryBuffer::getMemBufferCopy(StringRef(BC, Len));
 777
 778 #if LLVM_VERSION_GE(4, 0)
 779   Expected<std::unique_ptr<Module>> SrcOrError =
 780       llvm::getLazyBitcodeModule(Buf->getMemBufferRef(), Dst->getContext());
 781   if (!SrcOrError) {
 782     LLVMRustSetLastError(toString(SrcOrError.takeError()).c_str());
 783     return false;
 784   }
 785
 786   auto Src = std::move(*SrcOrError);
 787 #else
 788   ErrorOr<std::unique_ptr<Module>> Src =
 789       llvm::getLazyBitcodeModule(std::move(Buf), Dst->getContext());
 790   if (!Src) {
 791     LLVMRustSetLastError(Src.getError().message().c_str());
 792     return false;
 793   }
 794 #endif
 795
 796   std::string Err;
 797
 798   raw_string_ostream Stream(Err);
 799   DiagnosticPrinterRawOStream DP(Stream);
 800 #if LLVM_VERSION_GE(4, 0)
 801   if (Linker::linkModules(*Dst, std::move(Src))) {
 802 #elif LLVM_VERSION_GE(3, 8)
 803   if (Linker::linkModules(*Dst, std::move(Src.get()))) {
 804 #else
 805   if (Linker::LinkModules(Dst, Src->get(),
 806                           [&](const DiagnosticInfo &DI) { DI.print(DP); })) {
 807 #endif
 808     LLVMRustSetLastError(Err.c_str());
 809     return false;
 810   }
 811   return true;
 812 }
 813
 814 // Note that the two following functions look quite similar to the
 815 // LLVMGetSectionName function. Sadly, it appears that this function only
 816 // returns a char* pointer, which isn't guaranteed to be null-terminated. The
 817 // function provided by LLVM doesn't return the length, so we've created our own
 818 // function which returns the length as well as the data pointer.
 819 //
 820 // For an example of this not returning a null terminated string, see
 821 // lib/Object/COFFObjectFile.cpp in the getSectionName function. One of the
 822 // branches explicitly creates a StringRef without a null terminator, and then
 823 // that's returned.
 824
 825 inline section_iterator *unwrap(LLVMSectionIteratorRef SI) {
 826   return reinterpret_cast<section_iterator *>(SI);
 827 }
 828
 829 extern "C" size_t LLVMRustGetSectionName(LLVMSectionIteratorRef SI,
 830                                          const char **Ptr) {
 831   StringRef Ret;
 832   if (std::error_code EC = (*unwrap(SI))->getName(Ret))
 833     report_fatal_error(EC.message());
 834   *Ptr = Ret.data();
 835   return Ret.size();
 836 }
 837
 838 // LLVMArrayType function does not support 64-bit ElementCount
 839 extern "C" LLVMTypeRef LLVMRustArrayType(LLVMTypeRef ElementTy,
 840                                          uint64_t ElementCount) {
 841   return wrap(ArrayType::get(unwrap(ElementTy), ElementCount));
 842 }
 843
 844 DEFINE_SIMPLE_CONVERSION_FUNCTIONS(Twine, LLVMTwineRef)
 845 DEFINE_SIMPLE_CONVERSION_FUNCTIONS(DebugLoc, LLVMDebugLocRef)
 846
 847 extern "C" void LLVMRustWriteTwineToString(LLVMTwineRef T, RustStringRef Str) {
 848   RawRustStringOstream OS(Str);
 849   unwrap(T)->print(OS);
 850 }
 851
 852 extern "C" void LLVMRustUnpackOptimizationDiagnostic(
 853     LLVMDiagnosticInfoRef DI, RustStringRef PassNameOut,
 854     LLVMValueRef *FunctionOut, LLVMDebugLocRef *DebugLocOut,
 855     RustStringRef MessageOut) {
 856   // Undefined to call this not on an optimization diagnostic!
 857   llvm::DiagnosticInfoOptimizationBase *Opt =
 858       static_cast<llvm::DiagnosticInfoOptimizationBase *>(unwrap(DI));
 859
 860   RawRustStringOstream PassNameOS(PassNameOut);
 861   PassNameOS << Opt->getPassName();
 862   *FunctionOut = wrap(&Opt->getFunction());
 863   *DebugLocOut = wrap(&Opt->getDebugLoc());
 864   RawRustStringOstream MessageOS(MessageOut);
 865   MessageOS << Opt->getMsg();
 866 }
 867
 868 extern "C" void
 869 LLVMRustUnpackInlineAsmDiagnostic(LLVMDiagnosticInfoRef DI, unsigned *CookieOut,
 870                                   LLVMTwineRef *MessageOut,
 871                                   LLVMValueRef *InstructionOut) {
 872   // Undefined to call this not on an inline assembly diagnostic!
 873   llvm::DiagnosticInfoInlineAsm *IA =
 874       static_cast<llvm::DiagnosticInfoInlineAsm *>(unwrap(DI));
 875
 876   *CookieOut = IA->getLocCookie();
 877   *MessageOut = wrap(&IA->getMsgStr());
 878   *InstructionOut = wrap(IA->getInstruction());
 879 }
 880
 881 extern "C" void LLVMRustWriteDiagnosticInfoToString(LLVMDiagnosticInfoRef DI,
 882                                                     RustStringRef Str) {
 883   RawRustStringOstream OS(Str);
 884   DiagnosticPrinterRawOStream DP(OS);
 885   unwrap(DI)->print(DP);
 886 }
 887
 888 enum class LLVMRustDiagnosticKind {
 889   Other,
 890   InlineAsm,
 891   StackSize,
 892   DebugMetadataVersion,
 893   SampleProfile,
 894   OptimizationRemark,
 895   OptimizationRemarkMissed,
 896   OptimizationRemarkAnalysis,
 897   OptimizationRemarkAnalysisFPCommute,
 898   OptimizationRemarkAnalysisAliasing,
 899   OptimizationRemarkOther,
 900   OptimizationFailure,
 901 };
 902
 903 static LLVMRustDiagnosticKind toRust(DiagnosticKind Kind) {
 904   switch (Kind) {
 905   case DK_InlineAsm:
 906     return LLVMRustDiagnosticKind::InlineAsm;
 907   case DK_StackSize:
 908     return LLVMRustDiagnosticKind::StackSize;
 909   case DK_DebugMetadataVersion:
 910     return LLVMRustDiagnosticKind::DebugMetadataVersion;
 911   case DK_SampleProfile:
 912     return LLVMRustDiagnosticKind::SampleProfile;
 913   case DK_OptimizationRemark:
 914     return LLVMRustDiagnosticKind::OptimizationRemark;
 915   case DK_OptimizationRemarkMissed:
 916     return LLVMRustDiagnosticKind::OptimizationRemarkMissed;
 917   case DK_OptimizationRemarkAnalysis:
 918     return LLVMRustDiagnosticKind::OptimizationRemarkAnalysis;
 919 #if LLVM_VERSION_GE(3, 8)
 920   case DK_OptimizationRemarkAnalysisFPCommute:
 921     return LLVMRustDiagnosticKind::OptimizationRemarkAnalysisFPCommute;
 922   case DK_OptimizationRemarkAnalysisAliasing:
 923     return LLVMRustDiagnosticKind::OptimizationRemarkAnalysisAliasing;
 924 #endif
 925   default:
 926 #if LLVM_VERSION_GE(3, 9)
 927     return (Kind >= DK_FirstRemark && Kind <= DK_LastRemark)
 928                ? LLVMRustDiagnosticKind::OptimizationRemarkOther
 929                : LLVMRustDiagnosticKind::Other;
 930 #else
 931     return LLVMRustDiagnosticKind::Other;
 932 #endif
 933   }
 934 }
 935
 936 extern "C" LLVMRustDiagnosticKind
 937 LLVMRustGetDiagInfoKind(LLVMDiagnosticInfoRef DI) {
 938   return toRust((DiagnosticKind)unwrap(DI)->getKind());
 939 }
 940 // This is kept distinct from LLVMGetTypeKind, because when
 941 // a new type kind is added, the Rust-side enum must be
 942 // updated or UB will result.
 943 extern "C" LLVMTypeKind LLVMRustGetTypeKind(LLVMTypeRef Ty) {
 944   switch (unwrap(Ty)->getTypeID()) {
 945   case Type::VoidTyID:
 946     return LLVMVoidTypeKind;
 947   case Type::HalfTyID:
 948     return LLVMHalfTypeKind;
 949   case Type::FloatTyID:
 950     return LLVMFloatTypeKind;
 951   case Type::DoubleTyID:
 952     return LLVMDoubleTypeKind;
 953   case Type::X86_FP80TyID:
 954     return LLVMX86_FP80TypeKind;
 955   case Type::FP128TyID:
 956     return LLVMFP128TypeKind;
 957   case Type::PPC_FP128TyID:
 958     return LLVMPPC_FP128TypeKind;
 959   case Type::LabelTyID:
 960     return LLVMLabelTypeKind;
 961   case Type::MetadataTyID:
 962     return LLVMMetadataTypeKind;
 963   case Type::IntegerTyID:
 964     return LLVMIntegerTypeKind;
 965   case Type::FunctionTyID:
 966     return LLVMFunctionTypeKind;
 967   case Type::StructTyID:
 968     return LLVMStructTypeKind;
 969   case Type::ArrayTyID:
 970     return LLVMArrayTypeKind;
 971   case Type::PointerTyID:
 972     return LLVMPointerTypeKind;
 973   case Type::VectorTyID:
 974     return LLVMVectorTypeKind;
 975   case Type::X86_MMXTyID:
 976     return LLVMX86_MMXTypeKind;
 977 #if LLVM_VERSION_GE(3, 8)
 978   case Type::TokenTyID:
 979     return LLVMTokenTypeKind;
 980 #endif
 981   }
 982   llvm_unreachable("Unhandled TypeID.");
 983 }
 984
 985 extern "C" void LLVMRustWriteDebugLocToString(LLVMContextRef C,
 986                                               LLVMDebugLocRef DL,
 987                                               RustStringRef Str) {
 988   RawRustStringOstream OS(Str);
 989   unwrap(DL)->print(OS);
 990 }
 991
 992 DEFINE_SIMPLE_CONVERSION_FUNCTIONS(SMDiagnostic, LLVMSMDiagnosticRef)
 993
 994 extern "C" void LLVMRustSetInlineAsmDiagnosticHandler(
 995     LLVMContextRef C, LLVMContext::InlineAsmDiagHandlerTy H, void *CX) {
 996   unwrap(C)->setInlineAsmDiagnosticHandler(H, CX);
 997 }
 998
 999 extern "C" void LLVMRustWriteSMDiagnosticToString(LLVMSMDiagnosticRef D,
1000                                                   RustStringRef Str) {
1001   RawRustStringOstream OS(Str);
1002   unwrap(D)->print("", OS);
1003 }
1004
1005 extern "C" LLVMValueRef
1006 LLVMRustBuildLandingPad(LLVMBuilderRef B, LLVMTypeRef Ty,
1007                         LLVMValueRef PersFn, unsigned NumClauses,
1008                         const char *Name, LLVMValueRef F) {
1009   return LLVMBuildLandingPad(B, Ty, PersFn, NumClauses, Name);
1010 }
1011
1012 extern "C" LLVMValueRef LLVMRustBuildCleanupPad(LLVMBuilderRef B,
1013                                                 LLVMValueRef ParentPad,
1014                                                 unsigned ArgCount,
1015                                                 LLVMValueRef *LLArgs,
1016                                                 const char *Name) {
1017 #if LLVM_VERSION_GE(3, 8)
1018   Value **Args = unwrap(LLArgs);
1019   if (ParentPad == nullptr) {
1020     Type *Ty = Type::getTokenTy(unwrap(B)->getContext());
1021     ParentPad = wrap(Constant::getNullValue(Ty));
1022   }
1023   return wrap(unwrap(B)->CreateCleanupPad(
1024       unwrap(ParentPad), ArrayRef<Value *>(Args, ArgCount), Name));
1025 #else
1026   return nullptr;
1027 #endif
1028 }
1029
1030 extern "C" LLVMValueRef LLVMRustBuildCleanupRet(LLVMBuilderRef B,
1031                                                 LLVMValueRef CleanupPad,
1032                                                 LLVMBasicBlockRef UnwindBB) {
1033 #if LLVM_VERSION_GE(3, 8)
1034   CleanupPadInst *Inst = cast<CleanupPadInst>(unwrap(CleanupPad));
1035   return wrap(unwrap(B)->CreateCleanupRet(Inst, unwrap(UnwindBB)));
1036 #else
1037   return nullptr;
1038 #endif
1039 }
1040
1041 extern "C" LLVMValueRef
1042 LLVMRustBuildCatchPad(LLVMBuilderRef B, LLVMValueRef ParentPad,
1043                       unsigned ArgCount, LLVMValueRef *LLArgs, const char *Name) {
1044 #if LLVM_VERSION_GE(3, 8)
1045   Value **Args = unwrap(LLArgs);
1046   return wrap(unwrap(B)->CreateCatchPad(
1047       unwrap(ParentPad), ArrayRef<Value *>(Args, ArgCount), Name));
1048 #else
1049   return nullptr;
1050 #endif
1051 }
1052
1053 extern "C" LLVMValueRef LLVMRustBuildCatchRet(LLVMBuilderRef B,
1054                                               LLVMValueRef Pad,
1055                                               LLVMBasicBlockRef BB) {
1056 #if LLVM_VERSION_GE(3, 8)
1057   return wrap(unwrap(B)->CreateCatchRet(cast<CatchPadInst>(unwrap(Pad)),
1058                                               unwrap(BB)));
1059 #else
1060   return nullptr;
1061 #endif
1062 }
1063
1064 extern "C" LLVMValueRef LLVMRustBuildCatchSwitch(LLVMBuilderRef B,
1065                                                  LLVMValueRef ParentPad,
1066                                                  LLVMBasicBlockRef BB,
1067                                                  unsigned NumHandlers,
1068                                                  const char *Name) {
1069 #if LLVM_VERSION_GE(3, 8)
1070   if (ParentPad == nullptr) {
1071     Type *Ty = Type::getTokenTy(unwrap(B)->getContext());
1072     ParentPad = wrap(Constant::getNullValue(Ty));
1073   }
1074   return wrap(unwrap(B)->CreateCatchSwitch(unwrap(ParentPad), unwrap(BB),
1075                                                  NumHandlers, Name));
1076 #else
1077   return nullptr;
1078 #endif
1079 }
1080
1081 extern "C" void LLVMRustAddHandler(LLVMValueRef CatchSwitchRef,
1082                                    LLVMBasicBlockRef Handler) {
1083 #if LLVM_VERSION_GE(3, 8)
1084   Value *CatchSwitch = unwrap(CatchSwitchRef);
1085   cast<CatchSwitchInst>(CatchSwitch)->addHandler(unwrap(Handler));
1086 #endif
1087 }
1088
1089 #if LLVM_VERSION_GE(3, 8)
1090 extern "C" OperandBundleDef *LLVMRustBuildOperandBundleDef(const char *Name,
1091                                                            LLVMValueRef *Inputs,
1092                                                            unsigned NumInputs) {
1093   return new OperandBundleDef(Name, makeArrayRef(unwrap(Inputs), NumInputs));
1094 }
1095
1096 extern "C" void LLVMRustFreeOperandBundleDef(OperandBundleDef *Bundle) {
1097   delete Bundle;
1098 }
1099
1100 extern "C" LLVMValueRef LLVMRustBuildCall(LLVMBuilderRef B, LLVMValueRef Fn,
1101                                           LLVMValueRef *Args, unsigned NumArgs,
1102                                           OperandBundleDef *Bundle,
1103                                           const char *Name) {
1104   unsigned Len = Bundle ? 1 : 0;
1105   ArrayRef<OperandBundleDef> Bundles = makeArrayRef(Bundle, Len);
1106   return wrap(unwrap(B)->CreateCall(
1107       unwrap(Fn), makeArrayRef(unwrap(Args), NumArgs), Bundles, Name));
1108 }
1109
1110 extern "C" LLVMValueRef
1111 LLVMRustBuildInvoke(LLVMBuilderRef B, LLVMValueRef Fn, LLVMValueRef *Args,
1112                     unsigned NumArgs, LLVMBasicBlockRef Then,
1113                     LLVMBasicBlockRef Catch, OperandBundleDef *Bundle,
1114                     const char *Name) {
1115   unsigned Len = Bundle ? 1 : 0;
1116   ArrayRef<OperandBundleDef> Bundles = makeArrayRef(Bundle, Len);
1117   return wrap(unwrap(B)->CreateInvoke(unwrap(Fn), unwrap(Then), unwrap(Catch),
1118                                       makeArrayRef(unwrap(Args), NumArgs),
1119                                       Bundles, Name));
1120 }
1121 #else
1122 extern "C" void *LLVMRustBuildOperandBundleDef(const char *Name,
1123                                                LLVMValueRef *Inputs,
1124                                                unsigned NumInputs) {
1125   return nullptr;
1126 }
1127
1128 extern "C" void LLVMRustFreeOperandBundleDef(void *Bundle) {}
1129
1130 extern "C" LLVMValueRef LLVMRustBuildCall(LLVMBuilderRef B, LLVMValueRef Fn,
1131                                           LLVMValueRef *Args, unsigned NumArgs,
1132                                           void *Bundle, const char *Name) {
1133   return LLVMBuildCall(B, Fn, Args, NumArgs, Name);
1134 }
1135
1136 extern "C" LLVMValueRef
1137 LLVMRustBuildInvoke(LLVMBuilderRef B, LLVMValueRef Fn, LLVMValueRef *Args,
1138                     unsigned NumArgs, LLVMBasicBlockRef Then,
1139                     LLVMBasicBlockRef Catch, void *Bundle, const char *Name) {
1140   return LLVMBuildInvoke(B, Fn, Args, NumArgs, Then, Catch, Name);
1141 }
1142 #endif
1143
1144 extern "C" void LLVMRustPositionBuilderAtStart(LLVMBuilderRef B,
1145                                                LLVMBasicBlockRef BB) {
1146   auto Point = unwrap(BB)->getFirstInsertionPt();
1147   unwrap(B)->SetInsertPoint(unwrap(BB), Point);
1148 }
1149
1150 extern "C" void LLVMRustSetComdat(LLVMModuleRef M, LLVMValueRef V,
1151                                   const char *Name) {
1152   Triple TargetTriple(unwrap(M)->getTargetTriple());
1153   GlobalObject *GV = unwrap<GlobalObject>(V);
1154   if (!TargetTriple.isOSBinFormatMachO()) {
1155     GV->setComdat(unwrap(M)->getOrInsertComdat(Name));
1156   }
1157 }
1158
1159 extern "C" void LLVMRustUnsetComdat(LLVMValueRef V) {
1160   GlobalObject *GV = unwrap<GlobalObject>(V);
1161   GV->setComdat(nullptr);
1162 }
1163
1164 enum class LLVMRustLinkage {
1165   ExternalLinkage = 0,
1166   AvailableExternallyLinkage = 1,
1167   LinkOnceAnyLinkage = 2,
1168   LinkOnceODRLinkage = 3,
1169   WeakAnyLinkage = 4,
1170   WeakODRLinkage = 5,
1171   AppendingLinkage = 6,
1172   InternalLinkage = 7,
1173   PrivateLinkage = 8,
1174   ExternalWeakLinkage = 9,
1175   CommonLinkage = 10,
1176 };
1177
1178 static LLVMRustLinkage toRust(LLVMLinkage Linkage) {
1179   switch (Linkage) {
1180   case LLVMExternalLinkage:
1181     return LLVMRustLinkage::ExternalLinkage;
1182   case LLVMAvailableExternallyLinkage:
1183     return LLVMRustLinkage::AvailableExternallyLinkage;
1184   case LLVMLinkOnceAnyLinkage:
1185     return LLVMRustLinkage::LinkOnceAnyLinkage;
1186   case LLVMLinkOnceODRLinkage:
1187     return LLVMRustLinkage::LinkOnceODRLinkage;
1188   case LLVMWeakAnyLinkage:
1189     return LLVMRustLinkage::WeakAnyLinkage;
1190   case LLVMWeakODRLinkage:
1191     return LLVMRustLinkage::WeakODRLinkage;
1192   case LLVMAppendingLinkage:
1193     return LLVMRustLinkage::AppendingLinkage;
1194   case LLVMInternalLinkage:
1195     return LLVMRustLinkage::InternalLinkage;
1196   case LLVMPrivateLinkage:
1197     return LLVMRustLinkage::PrivateLinkage;
1198   case LLVMExternalWeakLinkage:
1199     return LLVMRustLinkage::ExternalWeakLinkage;
1200   case LLVMCommonLinkage:
1201     return LLVMRustLinkage::CommonLinkage;
1202   default:
1203     llvm_unreachable("Invalid LLVMRustLinkage value!");
1204   }
1205 }
1206
1207 static LLVMLinkage fromRust(LLVMRustLinkage Linkage) {
1208   switch (Linkage) {
1209   case LLVMRustLinkage::ExternalLinkage:
1210     return LLVMExternalLinkage;
1211   case LLVMRustLinkage::AvailableExternallyLinkage:
1212     return LLVMAvailableExternallyLinkage;
1213   case LLVMRustLinkage::LinkOnceAnyLinkage:
1214     return LLVMLinkOnceAnyLinkage;
1215   case LLVMRustLinkage::LinkOnceODRLinkage:
1216     return LLVMLinkOnceODRLinkage;
1217   case LLVMRustLinkage::WeakAnyLinkage:
1218     return LLVMWeakAnyLinkage;
1219   case LLVMRustLinkage::WeakODRLinkage:
1220     return LLVMWeakODRLinkage;
1221   case LLVMRustLinkage::AppendingLinkage:
1222     return LLVMAppendingLinkage;
1223   case LLVMRustLinkage::InternalLinkage:
1224     return LLVMInternalLinkage;
1225   case LLVMRustLinkage::PrivateLinkage:
1226     return LLVMPrivateLinkage;
1227   case LLVMRustLinkage::ExternalWeakLinkage:
1228     return LLVMExternalWeakLinkage;
1229   case LLVMRustLinkage::CommonLinkage:
1230     return LLVMCommonLinkage;
1231   }
1232   llvm_unreachable("Invalid LLVMRustLinkage value!");
1233 }
1234
1235 extern "C" LLVMRustLinkage LLVMRustGetLinkage(LLVMValueRef V) {
1236   return toRust(LLVMGetLinkage(V));
1237 }
1238
1239 extern "C" void LLVMRustSetLinkage(LLVMValueRef V,
1240                                    LLVMRustLinkage RustLinkage) {
1241   LLVMSetLinkage(V, fromRust(RustLinkage));
1242 }
1243
1244 // Returns true if both high and low were successfully set. Fails in case constant wasn’t any of
1245 // the common sizes (1, 8, 16, 32, 64, 128 bits)
1246 extern "C" bool LLVMRustConstInt128Get(LLVMValueRef CV, bool sext, uint64_t *high, uint64_t *low)
1247 {
1248     auto C = unwrap<llvm::ConstantInt>(CV);
1249     if (C->getBitWidth() > 128) { return false; }
1250     APInt AP;
1251     if (sext) {
1252         AP = C->getValue().sextOrSelf(128);
1253     } else {
1254         AP = C->getValue().zextOrSelf(128);
1255     }
1256     *low = AP.getLoBits(64).getZExtValue();
1257     *high = AP.getHiBits(64).getZExtValue();
1258     return true;
1259 }
1260
1261 extern "C" LLVMContextRef LLVMRustGetValueContext(LLVMValueRef V) {
1262   return wrap(&unwrap(V)->getContext());
1263 }
1264
1265 enum class LLVMRustVisibility {
1266   Default = 0,
1267   Hidden = 1,
1268   Protected = 2,
1269 };
1270
1271 static LLVMRustVisibility toRust(LLVMVisibility Vis) {
1272   switch (Vis) {
1273   case LLVMDefaultVisibility:
1274     return LLVMRustVisibility::Default;
1275   case LLVMHiddenVisibility:
1276     return LLVMRustVisibility::Hidden;
1277   case LLVMProtectedVisibility:
1278     return LLVMRustVisibility::Protected;
1279   }
1280   llvm_unreachable("Invalid LLVMRustVisibility value!");
1281 }
1282
1283 static LLVMVisibility fromRust(LLVMRustVisibility Vis) {
1284   switch (Vis) {
1285   case LLVMRustVisibility::Default:
1286     return LLVMDefaultVisibility;
1287   case LLVMRustVisibility::Hidden:
1288     return LLVMHiddenVisibility;
1289   case LLVMRustVisibility::Protected:
1290     return LLVMProtectedVisibility;
1291   }
1292   llvm_unreachable("Invalid LLVMRustVisibility value!");
1293 }
1294
1295 extern "C" LLVMRustVisibility LLVMRustGetVisibility(LLVMValueRef V) {
1296   return toRust(LLVMGetVisibility(V));
1297 }
1298
1299 extern "C" void LLVMRustSetVisibility(LLVMValueRef V,
1300                                       LLVMRustVisibility RustVisibility) {
1301   LLVMSetVisibility(V, fromRust(RustVisibility));
1302 }