X-Git-Url: http://demsky.eecs.uci.edu/git/?a=blobdiff_plain;f=CDSPass.cpp;h=108d4deadd54bceb020085519ea88db0f9ed4a2f;hb=69766a32e8dfde732b4d0194c23a15da398f1969;hp=81d7d4ebb954a0f402b9943837891613154718a7;hpb=b3ce03be63eb654f9f36664795d1b60fe410cae8;p=c11llvm.git diff --git a/CDSPass.cpp b/CDSPass.cpp index 81d7d4e..108d4de 100644 --- a/CDSPass.cpp +++ b/CDSPass.cpp @@ -1,11 +1,8 @@ -<<<<<<< HEAD //===-- CDSPass.cpp - xxx -------------------------------===// -======= -//===-- CdsPass.cpp - xxx -------------------------------===// ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec -// -// The LLVM Compiler Infrastructure // +// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. +// See https://llvm.org/LICENSE.txt for license information. +// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // @@ -29,7 +26,6 @@ #include "llvm/Analysis/ValueTracking.h" #include "llvm/Analysis/CaptureTracking.h" #include "llvm/IR/BasicBlock.h" -#include "llvm/IR/CFG.h" #include "llvm/IR/Function.h" #include "llvm/IR/IRBuilder.h" #include "llvm/IR/Instructions.h" @@ -46,17 +42,33 @@ #include "llvm/Transforms/Utils/Local.h" #include "llvm/Transforms/Utils/BasicBlockUtils.h" #include "llvm/Transforms/IPO/PassManagerBuilder.h" -#include +#include "llvm/Transforms/Utils/EscapeEnumerator.h" #include -// #include "llvm/Support/MathExtras.h" -#define DEBUG_TYPE "CDS" using namespace llvm; -#define FUNCARRAYSIZE 4 +#define DEBUG_TYPE "CDS" +#include + +Value *getPosition( Instruction * I, IRBuilder <> IRB, bool print = false) +{ + const DebugLoc & debug_location = I->getDebugLoc (); + std::string position_string; + { + llvm::raw_string_ostream position_stream (position_string); + debug_location . print (position_stream); + } + + if (print) { + errs() << position_string << "\n"; + } + + return IRB.CreateGlobalStringPtr (position_string); +} STATISTIC(NumInstrumentedReads, "Number of instrumented reads"); STATISTIC(NumInstrumentedWrites, "Number of instrumented writes"); +STATISTIC(NumAccessesWithBadSize, "Number of accesses with bad size"); // STATISTIC(NumInstrumentedVtableWrites, "Number of vtable ptr writes"); // STATISTIC(NumInstrumentedVtableReads, "Number of vtable ptr reads"); @@ -67,10 +79,6 @@ STATISTIC(NumOmittedReadsFromConstantGlobals, STATISTIC(NumOmittedReadsFromVtable, "Number of vtable reads"); STATISTIC(NumOmittedNonCaptured, "Number of accesses ignored due to capturing"); -Type * Int8Ty; -Type * Int16Ty; -Type * Int32Ty; -Type * Int64Ty; Type * OrdTy; Type * Int8PtrTy; @@ -80,424 +88,376 @@ Type * Int64PtrTy; Type * VoidTy; -<<<<<<< HEAD -Constant * CDSLoad[FUNCARRAYSIZE]; -Constant * CDSStore[FUNCARRAYSIZE]; -Constant * CDSAtomicLoad[FUNCARRAYSIZE]; -Constant * CDSAtomicStore[FUNCARRAYSIZE]; -Constant * CDSAtomicRMW[AtomicRMWInst::LAST_BINOP + 1][FUNCARRAYSIZE]; -Constant * CDSAtomicCAS[FUNCARRAYSIZE]; -Constant * CDSAtomicThreadFence; - -bool start = false; -======= -Constant * CdsLoad[FUNCARRAYSIZE]; -Constant * CdsStore[FUNCARRAYSIZE]; -Constant * CdsAtomicLoad[FUNCARRAYSIZE]; -Constant * CdsAtomicStore[FUNCARRAYSIZE]; -Constant * CdsAtomicRMW[AtomicRMWInst::LAST_BINOP + 1][FUNCARRAYSIZE]; -Constant * CdsAtomicCAS[FUNCARRAYSIZE]; -Constant * CdsAtomicThreadFence; ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec +static const size_t kNumberOfAccessSizes = 4; int getAtomicOrderIndex(AtomicOrdering order){ - switch (order) { - case AtomicOrdering::Monotonic: - return (int)AtomicOrderingCABI::relaxed; -// case AtomicOrdering::Consume: // not specified yet -// return AtomicOrderingCABI::consume; - case AtomicOrdering::Acquire: - return (int)AtomicOrderingCABI::acquire; - case AtomicOrdering::Release: - return (int)AtomicOrderingCABI::release; - case AtomicOrdering::AcquireRelease: - return (int)AtomicOrderingCABI::acq_rel; - case AtomicOrdering::SequentiallyConsistent: - return (int)AtomicOrderingCABI::seq_cst; - default: - // unordered or Not Atomic - return -1; - } + switch (order) { + case AtomicOrdering::Monotonic: + return (int)AtomicOrderingCABI::relaxed; + // case AtomicOrdering::Consume: // not specified yet + // return AtomicOrderingCABI::consume; + case AtomicOrdering::Acquire: + return (int)AtomicOrderingCABI::acquire; + case AtomicOrdering::Release: + return (int)AtomicOrderingCABI::release; + case AtomicOrdering::AcquireRelease: + return (int)AtomicOrderingCABI::acq_rel; + case AtomicOrdering::SequentiallyConsistent: + return (int)AtomicOrderingCABI::seq_cst; + default: + // unordered or Not Atomic + return -1; + } } -int getTypeSize(Type* type) { - if (type==Int32PtrTy) { - return sizeof(int)*8; - } else if (type==Int8PtrTy) { - return sizeof(char)*8; - } else if (type==Int16PtrTy) { - return sizeof(short)*8; - } else if (type==Int64PtrTy) { - return sizeof(long long int)*8; - } else { - return sizeof(void*)*8; - } - - return -1; +namespace { + struct CDSPass : public FunctionPass { + static char ID; + CDSPass() : FunctionPass(ID) {} + bool runOnFunction(Function &F) override; + StringRef getPassName() const override; + + private: + void initializeCallbacks(Module &M); + bool instrumentLoadOrStore(Instruction *I, const DataLayout &DL); + bool instrumentVolatile(Instruction *I, const DataLayout &DL); + bool isAtomicCall(Instruction *I); + bool instrumentAtomic(Instruction *I, const DataLayout &DL); + bool instrumentAtomicCall(CallInst *CI, const DataLayout &DL); + void chooseInstructionsToInstrument(SmallVectorImpl &Local, + SmallVectorImpl &All, + const DataLayout &DL); + bool addrPointsToConstantData(Value *Addr); + int getMemoryAccessFuncIndex(Value *Addr, const DataLayout &DL); + + // Callbacks to run-time library are computed in doInitialization. + Constant * CDSFuncEntry; + Constant * CDSFuncExit; + + Constant * CDSLoad[kNumberOfAccessSizes]; + Constant * CDSStore[kNumberOfAccessSizes]; + Constant * CDSVolatileLoad[kNumberOfAccessSizes]; + Constant * CDSVolatileStore[kNumberOfAccessSizes]; + Constant * CDSAtomicInit[kNumberOfAccessSizes]; + Constant * CDSAtomicLoad[kNumberOfAccessSizes]; + Constant * CDSAtomicStore[kNumberOfAccessSizes]; + Constant * CDSAtomicRMW[AtomicRMWInst::LAST_BINOP + 1][kNumberOfAccessSizes]; + Constant * CDSAtomicCAS_V1[kNumberOfAccessSizes]; + Constant * CDSAtomicCAS_V2[kNumberOfAccessSizes]; + Constant * CDSAtomicThreadFence; + + std::vector AtomicFuncNames; + std::vector PartialAtomicFuncNames; + }; } -static int sizetoindex(int size) { - switch(size) { - case 8: return 0; - case 16: return 1; - case 32: return 2; - case 64: return 3; - } - return -1; +StringRef CDSPass::getPassName() const { + return "CDSPass"; } -namespace { -<<<<<<< HEAD - struct CDSPass : public FunctionPass { - static char ID; - CDSPass() : FunctionPass(ID) {} -======= - struct CdsPass : public FunctionPass { - static char ID; - CdsPass() : FunctionPass(ID) {} ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - bool runOnFunction(Function &F) override; - - private: - void initializeCallbacks(Module &M); - bool instrumentLoadOrStore(Instruction *I, const DataLayout &DL); - bool instrumentAtomic(Instruction *I); - void chooseInstructionsToInstrument(SmallVectorImpl &Local, - SmallVectorImpl &All, - const DataLayout &DL); - bool addrPointsToConstantData(Value *Addr); - }; +static bool isVtableAccess(Instruction *I) { + if (MDNode *Tag = I->getMetadata(LLVMContext::MD_tbaa)) + return Tag->isTBAAVtableAccess(); + return false; } -<<<<<<< HEAD void CDSPass::initializeCallbacks(Module &M) { -======= -void CdsPass::initializeCallbacks(Module &M) { ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - LLVMContext &Ctx = M.getContext(); - - Int8Ty = Type::getInt8Ty(Ctx); - Int16Ty = Type::getInt16Ty(Ctx); - Int32Ty = Type::getInt32Ty(Ctx); - Int64Ty = Type::getInt64Ty(Ctx); - OrdTy = Type::getInt32Ty(Ctx); - - Int8PtrTy = Type::getInt8PtrTy(Ctx); - Int16PtrTy = Type::getInt16PtrTy(Ctx); - Int32PtrTy = Type::getInt32PtrTy(Ctx); - Int64PtrTy = Type::getInt64PtrTy(Ctx); - - VoidTy = Type::getVoidTy(Ctx); - - - // Get the function to call from our untime library. - for (unsigned i = 0; i < FUNCARRAYSIZE; i++) { - const unsigned ByteSize = 1U << i; - const unsigned BitSize = ByteSize * 8; -// errs() << BitSize << "\n"; - std::string ByteSizeStr = utostr(ByteSize); - std::string BitSizeStr = utostr(BitSize); - - Type *Ty = Type::getIntNTy(Ctx, BitSize); - Type *PtrTy = Ty->getPointerTo(); - - // uint8_t cds_atomic_load8 (void * obj, int atomic_index) - // void cds_atomic_store8 (void * obj, int atomic_index, uint8_t val) - SmallString<32> LoadName("cds_load" + BitSizeStr); - SmallString<32> StoreName("cds_store" + BitSizeStr); - SmallString<32> AtomicLoadName("cds_atomic_load" + BitSizeStr); - SmallString<32> AtomicStoreName("cds_atomic_store" + BitSizeStr); - -<<<<<<< HEAD -// CDSLoad[i] = M.getOrInsertFunction(LoadName, Ty, PtrTy); -// CDSStore[i] = M.getOrInsertFunction(StoreName, VoidTy, PtrTy, Ty); - CDSLoad[i] = M.getOrInsertFunction(LoadName, VoidTy, PtrTy); - CDSStore[i] = M.getOrInsertFunction(StoreName, VoidTy, PtrTy); - CDSAtomicLoad[i] = M.getOrInsertFunction(AtomicLoadName, Ty, PtrTy, OrdTy); - CDSAtomicStore[i] = M.getOrInsertFunction(AtomicStoreName, VoidTy, PtrTy, OrdTy, Ty); - - for (int op = AtomicRMWInst::FIRST_BINOP; op <= AtomicRMWInst::LAST_BINOP; ++op) { - CDSAtomicRMW[op][i] = nullptr; -======= -// CdsLoad[i] = M.getOrInsertFunction(LoadName, Ty, PtrTy); -// CdsStore[i] = M.getOrInsertFunction(StoreName, VoidTy, PtrTy, Ty); - CdsLoad[i] = M.getOrInsertFunction(LoadName, VoidTy, PtrTy); - CdsStore[i] = M.getOrInsertFunction(StoreName, VoidTy, PtrTy); - CdsAtomicLoad[i] = M.getOrInsertFunction(AtomicLoadName, Ty, PtrTy, OrdTy); - CdsAtomicStore[i] = M.getOrInsertFunction(AtomicStoreName, VoidTy, PtrTy, OrdTy, Ty); - - for (int op = AtomicRMWInst::FIRST_BINOP; op <= AtomicRMWInst::LAST_BINOP; ++op) { - CdsAtomicRMW[op][i] = nullptr; ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - std::string NamePart; - - if (op == AtomicRMWInst::Xchg) - NamePart = "_exchange"; - else if (op == AtomicRMWInst::Add) - NamePart = "_fetch_add"; - else if (op == AtomicRMWInst::Sub) - NamePart = "_fetch_sub"; - else if (op == AtomicRMWInst::And) - NamePart = "_fetch_and"; - else if (op == AtomicRMWInst::Or) - NamePart = "_fetch_or"; - else if (op == AtomicRMWInst::Xor) - NamePart = "_fetch_xor"; - else - continue; - - SmallString<32> AtomicRMWName("cds_atomic" + NamePart + BitSizeStr); -<<<<<<< HEAD - CDSAtomicRMW[op][i] = M.getOrInsertFunction(AtomicRMWName, Ty, PtrTy, OrdTy, Ty); -======= - CdsAtomicRMW[op][i] = M.getOrInsertFunction(AtomicRMWName, Ty, PtrTy, OrdTy, Ty); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - } - - // only supportes strong version - SmallString<32> AtomicCASName("cds_atomic_compare_exchange" + BitSizeStr); -<<<<<<< HEAD - CDSAtomicCAS[i] = M.getOrInsertFunction(AtomicCASName, Ty, PtrTy, Ty, Ty, OrdTy, OrdTy); - } - - CDSAtomicThreadFence = M.getOrInsertFunction("cds_atomic_thread_fence", VoidTy, OrdTy); -======= - CdsAtomicCAS[i] = M.getOrInsertFunction(AtomicCASName, Ty, PtrTy, Ty, Ty, OrdTy, OrdTy); - } - - CdsAtomicThreadFence = M.getOrInsertFunction("cds_atomic_thread_fence", VoidTy, OrdTy); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec -} - -static bool isVtableAccess(Instruction *I) { - if (MDNode *Tag = I->getMetadata(LLVMContext::MD_tbaa)) - return Tag->isTBAAVtableAccess(); - return false; + LLVMContext &Ctx = M.getContext(); + + Type * Int1Ty = Type::getInt1Ty(Ctx); + OrdTy = Type::getInt32Ty(Ctx); + + Int8PtrTy = Type::getInt8PtrTy(Ctx); + Int16PtrTy = Type::getInt16PtrTy(Ctx); + Int32PtrTy = Type::getInt32PtrTy(Ctx); + Int64PtrTy = Type::getInt64PtrTy(Ctx); + + VoidTy = Type::getVoidTy(Ctx); + + CDSFuncEntry = M.getOrInsertFunction("cds_func_entry", + VoidTy, Int8PtrTy); + CDSFuncExit = M.getOrInsertFunction("cds_func_exit", + VoidTy, Int8PtrTy); + + // Get the function to call from our untime library. + for (unsigned i = 0; i < kNumberOfAccessSizes; i++) { + const unsigned ByteSize = 1U << i; + const unsigned BitSize = ByteSize * 8; + + std::string ByteSizeStr = utostr(ByteSize); + std::string BitSizeStr = utostr(BitSize); + + Type *Ty = Type::getIntNTy(Ctx, BitSize); + Type *PtrTy = Ty->getPointerTo(); + + // uint8_t cds_atomic_load8 (void * obj, int atomic_index) + // void cds_atomic_store8 (void * obj, int atomic_index, uint8_t val) + SmallString<32> LoadName("cds_load" + BitSizeStr); + SmallString<32> StoreName("cds_store" + BitSizeStr); + SmallString<32> VolatileLoadName("cds_volatile_load" + BitSizeStr); + SmallString<32> VolatileStoreName("cds_volatile_store" + BitSizeStr); + SmallString<32> AtomicInitName("cds_atomic_init" + BitSizeStr); + SmallString<32> AtomicLoadName("cds_atomic_load" + BitSizeStr); + SmallString<32> AtomicStoreName("cds_atomic_store" + BitSizeStr); + + CDSLoad[i] = M.getOrInsertFunction(LoadName, VoidTy, PtrTy); + CDSStore[i] = M.getOrInsertFunction(StoreName, VoidTy, PtrTy); + CDSVolatileLoad[i] = M.getOrInsertFunction(VolatileLoadName, + Ty, PtrTy, Int8PtrTy); + CDSVolatileStore[i] = M.getOrInsertFunction(VolatileStoreName, + VoidTy, PtrTy, Ty, Int8PtrTy); + CDSAtomicInit[i] = M.getOrInsertFunction(AtomicInitName, + VoidTy, PtrTy, Ty, Int8PtrTy); + CDSAtomicLoad[i] = M.getOrInsertFunction(AtomicLoadName, + Ty, PtrTy, OrdTy, Int8PtrTy); + CDSAtomicStore[i] = M.getOrInsertFunction(AtomicStoreName, + VoidTy, PtrTy, Ty, OrdTy, Int8PtrTy); + + for (int op = AtomicRMWInst::FIRST_BINOP; + op <= AtomicRMWInst::LAST_BINOP; ++op) { + CDSAtomicRMW[op][i] = nullptr; + std::string NamePart; + + if (op == AtomicRMWInst::Xchg) + NamePart = "_exchange"; + else if (op == AtomicRMWInst::Add) + NamePart = "_fetch_add"; + else if (op == AtomicRMWInst::Sub) + NamePart = "_fetch_sub"; + else if (op == AtomicRMWInst::And) + NamePart = "_fetch_and"; + else if (op == AtomicRMWInst::Or) + NamePart = "_fetch_or"; + else if (op == AtomicRMWInst::Xor) + NamePart = "_fetch_xor"; + else + continue; + + SmallString<32> AtomicRMWName("cds_atomic" + NamePart + BitSizeStr); + CDSAtomicRMW[op][i] = M.getOrInsertFunction(AtomicRMWName, + Ty, PtrTy, Ty, OrdTy, Int8PtrTy); + } + + // only supportes strong version + SmallString<32> AtomicCASName_V1("cds_atomic_compare_exchange" + BitSizeStr + "_v1"); + SmallString<32> AtomicCASName_V2("cds_atomic_compare_exchange" + BitSizeStr + "_v2"); + CDSAtomicCAS_V1[i] = M.getOrInsertFunction(AtomicCASName_V1, + Ty, PtrTy, Ty, Ty, OrdTy, OrdTy, Int8PtrTy); + CDSAtomicCAS_V2[i] = M.getOrInsertFunction(AtomicCASName_V2, + Int1Ty, PtrTy, PtrTy, Ty, OrdTy, OrdTy, Int8PtrTy); + } + + CDSAtomicThreadFence = M.getOrInsertFunction("cds_atomic_thread_fence", + VoidTy, OrdTy, Int8PtrTy); } static bool shouldInstrumentReadWriteFromAddress(const Module *M, Value *Addr) { - // Peel off GEPs and BitCasts. - Addr = Addr->stripInBoundsOffsets(); - - if (GlobalVariable *GV = dyn_cast(Addr)) { - if (GV->hasSection()) { - StringRef SectionName = GV->getSection(); - // Check if the global is in the PGO counters section. - auto OF = Triple(M->getTargetTriple()).getObjectFormat(); - if (SectionName.endswith( - getInstrProfSectionName(IPSK_cnts, OF, /*AddSegmentInfo=*/false))) - return false; - } - - // Check if the global is private gcov data. - if (GV->getName().startswith("__llvm_gcov") || - GV->getName().startswith("__llvm_gcda")) - return false; - } - - // Do not instrument acesses from different address spaces; we cannot deal - // with them. - if (Addr) { - Type *PtrTy = cast(Addr->getType()->getScalarType()); - if (PtrTy->getPointerAddressSpace() != 0) - return false; - } - - return true; + // Peel off GEPs and BitCasts. + Addr = Addr->stripInBoundsOffsets(); + + if (GlobalVariable *GV = dyn_cast(Addr)) { + if (GV->hasSection()) { + StringRef SectionName = GV->getSection(); + // Check if the global is in the PGO counters section. + auto OF = Triple(M->getTargetTriple()).getObjectFormat(); + if (SectionName.endswith( + getInstrProfSectionName(IPSK_cnts, OF, /*AddSegmentInfo=*/false))) + return false; + } + + // Check if the global is private gcov data. + if (GV->getName().startswith("__llvm_gcov") || + GV->getName().startswith("__llvm_gcda")) + return false; + } + + // Do not instrument acesses from different address spaces; we cannot deal + // with them. + if (Addr) { + Type *PtrTy = cast(Addr->getType()->getScalarType()); + if (PtrTy->getPointerAddressSpace() != 0) + return false; + } + + return true; } -<<<<<<< HEAD bool CDSPass::addrPointsToConstantData(Value *Addr) { -======= -bool CdsPass::addrPointsToConstantData(Value *Addr) { ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - // If this is a GEP, just analyze its pointer operand. - if (GetElementPtrInst *GEP = dyn_cast(Addr)) - Addr = GEP->getPointerOperand(); - - if (GlobalVariable *GV = dyn_cast(Addr)) { - if (GV->isConstant()) { - // Reads from constant globals can not race with any writes. - NumOmittedReadsFromConstantGlobals++; - return true; - } - } else if (LoadInst *L = dyn_cast(Addr)) { - if (isVtableAccess(L)) { - // Reads from a vtable pointer can not race with any writes. - NumOmittedReadsFromVtable++; - return true; - } - } - return false; + // If this is a GEP, just analyze its pointer operand. + if (GetElementPtrInst *GEP = dyn_cast(Addr)) + Addr = GEP->getPointerOperand(); + + if (GlobalVariable *GV = dyn_cast(Addr)) { + if (GV->isConstant()) { + // Reads from constant globals can not race with any writes. + NumOmittedReadsFromConstantGlobals++; + return true; + } + } else if (LoadInst *L = dyn_cast(Addr)) { + if (isVtableAccess(L)) { + // Reads from a vtable pointer can not race with any writes. + NumOmittedReadsFromVtable++; + return true; + } + } + return false; } -<<<<<<< HEAD bool CDSPass::runOnFunction(Function &F) { - if (F.getName() == "main") { - F.setName("user_main"); - errs() << "main replaced by user_main\n"; - - initializeCallbacks( *F.getParent() ); - - SmallVector AllLoadsAndStores; - SmallVector LocalLoadsAndStores; - SmallVector AtomicAccesses; - - std::vector worklist; - - bool Res = false; - const DataLayout &DL = F.getParent()->getDataLayout(); - - errs() << "Before\n"; - F.dump(); - - for (auto &B : F) { - for (auto &I : B) { - if ( (&I)->isAtomic() ) { - AtomicAccesses.push_back(&I); - } else if (isa(I) || isa(I)) { - LocalLoadsAndStores.push_back(&I); - } else if (isa(I) || isa(I)) { - // not implemented yet - } - } - chooseInstructionsToInstrument(LocalLoadsAndStores, AllLoadsAndStores, DL); - } - - for (auto Inst : AllLoadsAndStores) { -// Res |= instrumentLoadOrStore(Inst, DL); -// errs() << "load and store are not replaced\n"; - } - - for (auto Inst : AtomicAccesses) { - Res |= instrumentAtomic(Inst); - } - - if (Res) { - errs() << F.getName(); - errs() << " has above instructions replaced\n"; - } - } -// errs() << "After\n"; -// F.dump(); -======= -bool CdsPass::runOnFunction(Function &F) { - if (F.getName() == "main") - F.setName("user_main"); - - initializeCallbacks( *F.getParent() ); - - SmallVector AllLoadsAndStores; - SmallVector LocalLoadsAndStores; - SmallVector AtomicAccesses; - - std::vector worklist; - - bool Res = false; - const DataLayout &DL = F.getParent()->getDataLayout(); - - errs() << "Before\n"; - F.dump(); - - for (auto &B : F) { - for (auto &I : B) { - if ( (&I)->isAtomic() ) { - AtomicAccesses.push_back(&I); - } else if (isa(I) || isa(I)) { - LocalLoadsAndStores.push_back(&I); - } - } - chooseInstructionsToInstrument(LocalLoadsAndStores, AllLoadsAndStores, DL); - } - - for (auto Inst : AllLoadsAndStores) { - Res |= instrumentLoadOrStore(Inst, DL); - } - - for (auto Inst : AtomicAccesses) { - Res |= instrumentAtomic(Inst); - } - - errs() << "After\n"; - F.dump(); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - - return false; + if (F.getName() == "main") { + F.setName("user_main"); + errs() << "main replaced by user_main\n"; + } + + if (true) { + initializeCallbacks( *F.getParent() ); + + AtomicFuncNames = + { + "atomic_init", "atomic_load", "atomic_store", + "atomic_fetch_", "atomic_exchange", "atomic_compare_exchange_" + }; + + PartialAtomicFuncNames = + { + "load", "store", "fetch", "exchange", "compare_exchange_" + }; + + SmallVector AllLoadsAndStores; + SmallVector LocalLoadsAndStores; + SmallVector VolatileLoadsAndStores; + SmallVector AtomicAccesses; + + std::vector worklist; + + bool Res = false; + bool HasAtomic = false; + bool HasVolatile = false; + const DataLayout &DL = F.getParent()->getDataLayout(); + + // errs() << "--- " << F.getName() << "---\n"; + + for (auto &B : F) { + for (auto &I : B) { + if ( (&I)->isAtomic() || isAtomicCall(&I) ) { + AtomicAccesses.push_back(&I); + HasAtomic = true; + } else if (isa(I) || isa(I)) { + LoadInst *LI = dyn_cast(&I); + StoreInst *SI = dyn_cast(&I); + bool isVolatile = ( LI ? LI->isVolatile() : SI->isVolatile() ); + + if (isVolatile) { + VolatileLoadsAndStores.push_back(&I); + HasVolatile = true; + } else + LocalLoadsAndStores.push_back(&I); + } else if (isa(I) || isa(I)) { + // not implemented yet + } + } + + chooseInstructionsToInstrument(LocalLoadsAndStores, AllLoadsAndStores, DL); + } + + for (auto Inst : AllLoadsAndStores) { + Res |= instrumentLoadOrStore(Inst, DL); + } + + for (auto Inst : VolatileLoadsAndStores) { + Res |= instrumentVolatile(Inst, DL); + } + + for (auto Inst : AtomicAccesses) { + Res |= instrumentAtomic(Inst, DL); + } + + // only instrument functions that contain atomics + if (Res && ( HasAtomic || HasVolatile) ) { + IRBuilder<> IRB(F.getEntryBlock().getFirstNonPHI()); + /* Unused for now + Value *ReturnAddress = IRB.CreateCall( + Intrinsic::getDeclaration(F.getParent(), Intrinsic::returnaddress), + IRB.getInt32(0)); + */ + + Value * FuncName = IRB.CreateGlobalStringPtr(F.getName()); + IRB.CreateCall(CDSFuncEntry, FuncName); + + EscapeEnumerator EE(F, "cds_cleanup", true); + while (IRBuilder<> *AtExit = EE.Next()) { + AtExit->CreateCall(CDSFuncExit, FuncName); + } + + Res = true; + } + } + + return false; } -<<<<<<< HEAD void CDSPass::chooseInstructionsToInstrument( -======= -void CdsPass::chooseInstructionsToInstrument( ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - SmallVectorImpl &Local, SmallVectorImpl &All, - const DataLayout &DL) { - SmallPtrSet WriteTargets; - // Iterate from the end. - for (Instruction *I : reverse(Local)) { - if (StoreInst *Store = dyn_cast(I)) { - Value *Addr = Store->getPointerOperand(); - if (!shouldInstrumentReadWriteFromAddress(I->getModule(), Addr)) - continue; - WriteTargets.insert(Addr); - } else { - LoadInst *Load = cast(I); - Value *Addr = Load->getPointerOperand(); - if (!shouldInstrumentReadWriteFromAddress(I->getModule(), Addr)) - continue; - if (WriteTargets.count(Addr)) { - // We will write to this temp, so no reason to analyze the read. - NumOmittedReadsBeforeWrite++; - continue; - } - if (addrPointsToConstantData(Addr)) { - // Addr points to some constant data -- it can not race with any writes. - continue; - } - } - Value *Addr = isa(*I) - ? cast(I)->getPointerOperand() - : cast(I)->getPointerOperand(); - if (isa(GetUnderlyingObject(Addr, DL)) && - !PointerMayBeCaptured(Addr, true, true)) { - // The variable is addressable but not captured, so it cannot be - // referenced from a different thread and participate in a data race - // (see llvm/Analysis/CaptureTracking.h for details). - NumOmittedNonCaptured++; - continue; - } - All.push_back(I); - } - Local.clear(); + SmallVectorImpl &Local, SmallVectorImpl &All, + const DataLayout &DL) { + SmallPtrSet WriteTargets; + // Iterate from the end. + for (Instruction *I : reverse(Local)) { + if (StoreInst *Store = dyn_cast(I)) { + Value *Addr = Store->getPointerOperand(); + if (!shouldInstrumentReadWriteFromAddress(I->getModule(), Addr)) + continue; + WriteTargets.insert(Addr); + } else { + LoadInst *Load = cast(I); + Value *Addr = Load->getPointerOperand(); + if (!shouldInstrumentReadWriteFromAddress(I->getModule(), Addr)) + continue; + if (WriteTargets.count(Addr)) { + // We will write to this temp, so no reason to analyze the read. + NumOmittedReadsBeforeWrite++; + continue; + } + if (addrPointsToConstantData(Addr)) { + // Addr points to some constant data -- it can not race with any writes. + continue; + } + } + Value *Addr = isa(*I) + ? cast(I)->getPointerOperand() + : cast(I)->getPointerOperand(); + if (isa(GetUnderlyingObject(Addr, DL)) && + !PointerMayBeCaptured(Addr, true, true)) { + // The variable is addressable but not captured, so it cannot be + // referenced from a different thread and participate in a data race + // (see llvm/Analysis/CaptureTracking.h for details). + NumOmittedNonCaptured++; + continue; + } + All.push_back(I); + } + Local.clear(); } -<<<<<<< HEAD bool CDSPass::instrumentLoadOrStore(Instruction *I, -======= -bool CdsPass::instrumentLoadOrStore(Instruction *I, ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - const DataLayout &DL) { - IRBuilder<> IRB(I); - bool IsWrite = isa(*I); - Value *Addr = IsWrite - ? cast(I)->getPointerOperand() - : cast(I)->getPointerOperand(); - - // swifterror memory addresses are mem2reg promoted by instruction selection. - // As such they cannot have regular uses like an instrumentation function and - // it makes no sense to track them as memory. - if (Addr->isSwiftError()) - return false; - - int size = getTypeSize(Addr->getType()); - int index = sizetoindex(size); - -<<<<<<< HEAD + const DataLayout &DL) { + IRBuilder<> IRB(I); + bool IsWrite = isa(*I); + Value *Addr = IsWrite + ? cast(I)->getPointerOperand() + : cast(I)->getPointerOperand(); + + // swifterror memory addresses are mem2reg promoted by instruction selection. + // As such they cannot have regular uses like an instrumentation function and + // it makes no sense to track them as memory. + if (Addr->isSwiftError()) + return false; + + int Idx = getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + // not supported by CDS yet -======= -// not supported by Cds yet ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec /* if (IsWrite && isVtableAccess(I)) { LLVM_DEBUG(dbgs() << " VPTR : " << *I << "\n"); Value *StoredValue = cast(I)->getValueOperand(); @@ -525,176 +485,442 @@ bool CdsPass::instrumentLoadOrStore(Instruction *I, } */ - Value *OnAccessFunc = nullptr; -<<<<<<< HEAD - OnAccessFunc = IsWrite ? CDSStore[index] : CDSLoad[index]; - - Type *ArgType = IRB.CreatePointerCast(Addr, Addr->getType())->getType(); - - if ( ArgType != Int8PtrTy && ArgType != Int16PtrTy && - ArgType != Int32PtrTy && ArgType != Int64PtrTy ) { - //errs() << "A load or store of type "; - //errs() << *ArgType; - //errs() << " is passed in\n"; - return false; // if other types of load or stores are passed in - } -======= - OnAccessFunc = IsWrite ? CdsStore[index] : CdsLoad[index]; - ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - IRB.CreateCall(OnAccessFunc, IRB.CreatePointerCast(Addr, Addr->getType())); - if (IsWrite) NumInstrumentedWrites++; - else NumInstrumentedReads++; - return true; + Value *OnAccessFunc = nullptr; + OnAccessFunc = IsWrite ? CDSStore[Idx] : CDSLoad[Idx]; + + Type *ArgType = IRB.CreatePointerCast(Addr, Addr->getType())->getType(); + + if ( ArgType != Int8PtrTy && ArgType != Int16PtrTy && + ArgType != Int32PtrTy && ArgType != Int64PtrTy ) { + // if other types of load or stores are passed in + return false; + } + IRB.CreateCall(OnAccessFunc, IRB.CreatePointerCast(Addr, Addr->getType())); + if (IsWrite) NumInstrumentedWrites++; + else NumInstrumentedReads++; + return true; } +bool CDSPass::instrumentVolatile(Instruction * I, const DataLayout &DL) { + IRBuilder<> IRB(I); + Value *position = getPosition(I, IRB); + + if (LoadInst *LI = dyn_cast(I)) { + assert( LI->isVolatile() ); + Value *Addr = LI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + Value *args[] = {Addr, position}; + Instruction* funcInst=CallInst::Create(CDSVolatileLoad[Idx], args); + ReplaceInstWithInst(LI, funcInst); + } else if (StoreInst *SI = dyn_cast(I)) { + assert( SI->isVolatile() ); + Value *Addr = SI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + Value *val = SI->getValueOperand(); + Value *args[] = {Addr, val, position}; + Instruction* funcInst=CallInst::Create(CDSVolatileStore[Idx], args); + ReplaceInstWithInst(SI, funcInst); + } else { + return false; + } + + return true; +} -<<<<<<< HEAD -bool CDSPass::instrumentAtomic(Instruction * I) { -======= -bool CdsPass::instrumentAtomic(Instruction * I) { ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - IRBuilder<> IRB(I); - // LLVMContext &Ctx = IRB.getContext(); - - if (StoreInst *SI = dyn_cast(I)) { - int atomic_order_index = getAtomicOrderIndex(SI->getOrdering()); - - Value *val = SI->getValueOperand(); - Value *ptr = SI->getPointerOperand(); - Value *order = ConstantInt::get(OrdTy, atomic_order_index); - Value *args[] = {ptr, order, val}; - - int size=getTypeSize(ptr->getType()); - int index=sizetoindex(size); - -<<<<<<< HEAD - Instruction* funcInst=CallInst::Create(CDSAtomicStore[index], args,""); -======= - Instruction* funcInst=CallInst::Create(CdsAtomicStore[index], args,""); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - ReplaceInstWithInst(SI, funcInst); - errs() << "Store replaced\n"; - } else if (LoadInst *LI = dyn_cast(I)) { - int atomic_order_index = getAtomicOrderIndex(LI->getOrdering()); - - Value *ptr = LI->getPointerOperand(); - Value *order = ConstantInt::get(OrdTy, atomic_order_index); - Value *args[] = {ptr, order}; - - int size=getTypeSize(ptr->getType()); - int index=sizetoindex(size); - -<<<<<<< HEAD - Instruction* funcInst=CallInst::Create(CDSAtomicLoad[index], args, ""); -======= - Instruction* funcInst=CallInst::Create(CdsAtomicLoad[index], args, ""); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - ReplaceInstWithInst(LI, funcInst); - errs() << "Load Replaced\n"; - } else if (AtomicRMWInst *RMWI = dyn_cast(I)) { - int atomic_order_index = getAtomicOrderIndex(RMWI->getOrdering()); - - Value *val = RMWI->getValOperand(); - Value *ptr = RMWI->getPointerOperand(); - Value *order = ConstantInt::get(OrdTy, atomic_order_index); - Value *args[] = {ptr, order, val}; - - int size = getTypeSize(ptr->getType()); - int index = sizetoindex(size); - -<<<<<<< HEAD - Instruction* funcInst = CallInst::Create(CDSAtomicRMW[RMWI->getOperation()][index], args, ""); -======= - Instruction* funcInst = CallInst::Create(CdsAtomicRMW[RMWI->getOperation()][index], args, ""); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - ReplaceInstWithInst(RMWI, funcInst); - errs() << RMWI->getOperationName(RMWI->getOperation()); - errs() << " replaced\n"; - } else if (AtomicCmpXchgInst *CASI = dyn_cast(I)) { - IRBuilder<> IRB(CASI); - - Value *Addr = CASI->getPointerOperand(); - - int size = getTypeSize(Addr->getType()); - int index = sizetoindex(size); - const unsigned ByteSize = 1U << index; - const unsigned BitSize = ByteSize * 8; - Type *Ty = Type::getIntNTy(IRB.getContext(), BitSize); - Type *PtrTy = Ty->getPointerTo(); - - Value *CmpOperand = IRB.CreateBitOrPointerCast(CASI->getCompareOperand(), Ty); - Value *NewOperand = IRB.CreateBitOrPointerCast(CASI->getNewValOperand(), Ty); - - int atomic_order_index_succ = getAtomicOrderIndex(CASI->getSuccessOrdering()); - int atomic_order_index_fail = getAtomicOrderIndex(CASI->getFailureOrdering()); - Value *order_succ = ConstantInt::get(OrdTy, atomic_order_index_succ); - Value *order_fail = ConstantInt::get(OrdTy, atomic_order_index_fail); - - Value *Args[] = {IRB.CreatePointerCast(Addr, PtrTy), - CmpOperand, NewOperand, - order_succ, order_fail}; - -<<<<<<< HEAD - CallInst *funcInst = IRB.CreateCall(CDSAtomicCAS[index], Args); -======= - CallInst *funcInst = IRB.CreateCall(CdsAtomicCAS[index], Args); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - Value *Success = IRB.CreateICmpEQ(funcInst, CmpOperand); - - Value *OldVal = funcInst; - Type *OrigOldValTy = CASI->getNewValOperand()->getType(); - if (Ty != OrigOldValTy) { - // The value is a pointer, so we need to cast the return value. - OldVal = IRB.CreateIntToPtr(funcInst, OrigOldValTy); - } - - Value *Res = - IRB.CreateInsertValue(UndefValue::get(CASI->getType()), OldVal, 0); - Res = IRB.CreateInsertValue(Res, Success, 1); - - I->replaceAllUsesWith(Res); - I->eraseFromParent(); - } else if (FenceInst *FI = dyn_cast(I)) { - int atomic_order_index = getAtomicOrderIndex(FI->getOrdering()); - Value *order = ConstantInt::get(OrdTy, atomic_order_index); - Value *Args[] = {order}; - -<<<<<<< HEAD - CallInst *funcInst = CallInst::Create(CDSAtomicThreadFence, Args); -======= - CallInst *funcInst = CallInst::Create(CdsAtomicThreadFence, Args); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec - ReplaceInstWithInst(FI, funcInst); - errs() << "Thread Fences replaced\n"; - } - return true; +bool CDSPass::instrumentAtomic(Instruction * I, const DataLayout &DL) { + IRBuilder<> IRB(I); + + if (auto *CI = dyn_cast(I)) { + return instrumentAtomicCall(CI, DL); + } + + Value *position = getPosition(I, IRB); + + if (LoadInst *LI = dyn_cast(I)) { + Value *Addr = LI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + int atomic_order_index = getAtomicOrderIndex(LI->getOrdering()); + Value *order = ConstantInt::get(OrdTy, atomic_order_index); + Value *args[] = {Addr, order, position}; + Instruction* funcInst=CallInst::Create(CDSAtomicLoad[Idx], args); + ReplaceInstWithInst(LI, funcInst); + } else if (StoreInst *SI = dyn_cast(I)) { + Value *Addr = SI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + int atomic_order_index = getAtomicOrderIndex(SI->getOrdering()); + Value *val = SI->getValueOperand(); + Value *order = ConstantInt::get(OrdTy, atomic_order_index); + Value *args[] = {Addr, val, order, position}; + Instruction* funcInst=CallInst::Create(CDSAtomicStore[Idx], args); + ReplaceInstWithInst(SI, funcInst); + } else if (AtomicRMWInst *RMWI = dyn_cast(I)) { + Value *Addr = RMWI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + int atomic_order_index = getAtomicOrderIndex(RMWI->getOrdering()); + Value *val = RMWI->getValOperand(); + Value *order = ConstantInt::get(OrdTy, atomic_order_index); + Value *args[] = {Addr, val, order, position}; + Instruction* funcInst = CallInst::Create(CDSAtomicRMW[RMWI->getOperation()][Idx], args); + ReplaceInstWithInst(RMWI, funcInst); + } else if (AtomicCmpXchgInst *CASI = dyn_cast(I)) { + IRBuilder<> IRB(CASI); + + Value *Addr = CASI->getPointerOperand(); + int Idx=getMemoryAccessFuncIndex(Addr, DL); + if (Idx < 0) + return false; + + const unsigned ByteSize = 1U << Idx; + const unsigned BitSize = ByteSize * 8; + Type *Ty = Type::getIntNTy(IRB.getContext(), BitSize); + Type *PtrTy = Ty->getPointerTo(); + + Value *CmpOperand = IRB.CreateBitOrPointerCast(CASI->getCompareOperand(), Ty); + Value *NewOperand = IRB.CreateBitOrPointerCast(CASI->getNewValOperand(), Ty); + + int atomic_order_index_succ = getAtomicOrderIndex(CASI->getSuccessOrdering()); + int atomic_order_index_fail = getAtomicOrderIndex(CASI->getFailureOrdering()); + Value *order_succ = ConstantInt::get(OrdTy, atomic_order_index_succ); + Value *order_fail = ConstantInt::get(OrdTy, atomic_order_index_fail); + + Value *Args[] = {IRB.CreatePointerCast(Addr, PtrTy), + CmpOperand, NewOperand, + order_succ, order_fail, position}; + + CallInst *funcInst = IRB.CreateCall(CDSAtomicCAS_V1[Idx], Args); + Value *Success = IRB.CreateICmpEQ(funcInst, CmpOperand); + + Value *OldVal = funcInst; + Type *OrigOldValTy = CASI->getNewValOperand()->getType(); + if (Ty != OrigOldValTy) { + // The value is a pointer, so we need to cast the return value. + OldVal = IRB.CreateIntToPtr(funcInst, OrigOldValTy); + } + + Value *Res = + IRB.CreateInsertValue(UndefValue::get(CASI->getType()), OldVal, 0); + Res = IRB.CreateInsertValue(Res, Success, 1); + + I->replaceAllUsesWith(Res); + I->eraseFromParent(); + } else if (FenceInst *FI = dyn_cast(I)) { + int atomic_order_index = getAtomicOrderIndex(FI->getOrdering()); + Value *order = ConstantInt::get(OrdTy, atomic_order_index); + Value *Args[] = {order, position}; + + CallInst *funcInst = CallInst::Create(CDSAtomicThreadFence, Args); + ReplaceInstWithInst(FI, funcInst); + // errs() << "Thread Fences replaced\n"; + } + return true; +} + +bool CDSPass::isAtomicCall(Instruction *I) { + if ( auto *CI = dyn_cast(I) ) { + Function *fun = CI->getCalledFunction(); + if (fun == NULL) + return false; + + StringRef funName = fun->getName(); + + // todo: come up with better rules for function name checking + for (StringRef name : AtomicFuncNames) { + if ( funName.contains(name) ) + return true; + } + + for (StringRef PartialName : PartialAtomicFuncNames) { + if (funName.contains(PartialName) && + funName.contains("atomic") ) + return true; + } + } + + return false; } +bool CDSPass::instrumentAtomicCall(CallInst *CI, const DataLayout &DL) { + IRBuilder<> IRB(CI); + Function *fun = CI->getCalledFunction(); + StringRef funName = fun->getName(); + std::vector parameters; + + User::op_iterator begin = CI->arg_begin(); + User::op_iterator end = CI->arg_end(); + for (User::op_iterator it = begin; it != end; ++it) { + Value *param = *it; + parameters.push_back(param); + } + + // obtain source line number of the CallInst + Value *position = getPosition(CI, IRB); + + // the pointer to the address is always the first argument + Value *OrigPtr = parameters[0]; + + int Idx = getMemoryAccessFuncIndex(OrigPtr, DL); + if (Idx < 0) + return false; + + const unsigned ByteSize = 1U << Idx; + const unsigned BitSize = ByteSize * 8; + Type *Ty = Type::getIntNTy(IRB.getContext(), BitSize); + Type *PtrTy = Ty->getPointerTo(); + + // atomic_init; args = {obj, order} + if (funName.contains("atomic_init")) { + Value *OrigVal = parameters[1]; + + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *val; + if (OrigVal->getType()->isPtrOrPtrVectorTy()) + val = IRB.CreatePointerCast(OrigVal, Ty); + else + val = IRB.CreateIntCast(OrigVal, Ty, true); + + Value *args[] = {ptr, val, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicInit[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } + + // atomic_load; args = {obj, order} + if (funName.contains("atomic_load")) { + bool isExplicit = funName.contains("atomic_load_explicit"); + + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *order; + if (isExplicit) + order = IRB.CreateBitOrPointerCast(parameters[1], OrdTy); + else + order = ConstantInt::get(OrdTy, + (int) AtomicOrderingCABI::seq_cst); + Value *args[] = {ptr, order, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicLoad[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } else if (funName.contains("atomic") && + funName.contains("load") ) { + // does this version of call always have an atomic order as an argument? + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *order = IRB.CreateBitOrPointerCast(parameters[1], OrdTy); + Value *args[] = {ptr, order, position}; + + if (!CI->getType()->isPointerTy()) { + return false; + } + + CallInst *funcInst = IRB.CreateCall(CDSAtomicLoad[Idx], args); + Value *RetVal = IRB.CreateIntToPtr(funcInst, CI->getType()); + + CI->replaceAllUsesWith(RetVal); + CI->eraseFromParent(); + + return true; + } + + // atomic_store; args = {obj, val, order} + if (funName.contains("atomic_store")) { + bool isExplicit = funName.contains("atomic_store_explicit"); + Value *OrigVal = parameters[1]; + + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *val = IRB.CreatePointerCast(OrigVal, Ty); + Value *order; + if (isExplicit) + order = IRB.CreateBitOrPointerCast(parameters[2], OrdTy); + else + order = ConstantInt::get(OrdTy, + (int) AtomicOrderingCABI::seq_cst); + Value *args[] = {ptr, val, order, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicStore[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } else if (funName.contains("atomic") && + funName.contains("store") ) { + // does this version of call always have an atomic order as an argument? + Value *OrigVal = parameters[1]; + + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *val; + if (OrigVal->getType()->isPtrOrPtrVectorTy()) + val = IRB.CreatePointerCast(OrigVal, Ty); + else + val = IRB.CreateIntCast(OrigVal, Ty, true); + + Value *order = IRB.CreateBitOrPointerCast(parameters[2], OrdTy); + Value *args[] = {ptr, val, order, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicStore[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } + + // atomic_fetch_*; args = {obj, val, order} + if (funName.contains("atomic_fetch_") || + funName.contains("atomic_exchange")) { + + /* TODO: implement stricter function name checking */ + if (funName.contains("non")) + return false; + + bool isExplicit = funName.contains("_explicit"); + Value *OrigVal = parameters[1]; + + int op; + if ( funName.contains("_fetch_add") ) + op = AtomicRMWInst::Add; + else if ( funName.contains("_fetch_sub") ) + op = AtomicRMWInst::Sub; + else if ( funName.contains("_fetch_and") ) + op = AtomicRMWInst::And; + else if ( funName.contains("_fetch_or") ) + op = AtomicRMWInst::Or; + else if ( funName.contains("_fetch_xor") ) + op = AtomicRMWInst::Xor; + else if ( funName.contains("atomic_exchange") ) + op = AtomicRMWInst::Xchg; + else { + errs() << "Unknown atomic read-modify-write operation\n"; + return false; + } + + Value *ptr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *val; + if (OrigVal->getType()->isPtrOrPtrVectorTy()) + val = IRB.CreatePointerCast(OrigVal, Ty); + else + val = IRB.CreateIntCast(OrigVal, Ty, true); + + Value *order; + if (isExplicit) + order = IRB.CreateBitOrPointerCast(parameters[2], OrdTy); + else + order = ConstantInt::get(OrdTy, + (int) AtomicOrderingCABI::seq_cst); + Value *args[] = {ptr, val, order, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicRMW[op][Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } else if (funName.contains("fetch")) { + errs() << "atomic exchange captured. Not implemented yet. "; + errs() << "See source file :"; + getPosition(CI, IRB, true); + } else if (funName.contains("exchange") && + !funName.contains("compare_exchange") ) { + errs() << "atomic exchange captured. Not implemented yet. "; + errs() << "See source file :"; + getPosition(CI, IRB, true); + } + + /* atomic_compare_exchange_*; + args = {obj, expected, new value, order1, order2} + */ + if ( funName.contains("atomic_compare_exchange_") ) { + bool isExplicit = funName.contains("_explicit"); + + Value *Addr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *CmpOperand = IRB.CreatePointerCast(parameters[1], PtrTy); + Value *NewOperand = IRB.CreateBitOrPointerCast(parameters[2], Ty); + + Value *order_succ, *order_fail; + if (isExplicit) { + order_succ = IRB.CreateBitOrPointerCast(parameters[3], OrdTy); + order_fail = IRB.CreateBitOrPointerCast(parameters[4], OrdTy); + } else { + order_succ = ConstantInt::get(OrdTy, + (int) AtomicOrderingCABI::seq_cst); + order_fail = ConstantInt::get(OrdTy, + (int) AtomicOrderingCABI::seq_cst); + } + + Value *args[] = {Addr, CmpOperand, NewOperand, + order_succ, order_fail, position}; + + Instruction* funcInst = CallInst::Create(CDSAtomicCAS_V2[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } else if ( funName.contains("compare_exchange_strong") || + funName.contains("compare_exchange_weak") ) { + Value *Addr = IRB.CreatePointerCast(OrigPtr, PtrTy); + Value *CmpOperand = IRB.CreatePointerCast(parameters[1], PtrTy); + Value *NewOperand = IRB.CreateBitOrPointerCast(parameters[2], Ty); + + Value *order_succ, *order_fail; + order_succ = IRB.CreateBitOrPointerCast(parameters[3], OrdTy); + order_fail = IRB.CreateBitOrPointerCast(parameters[4], OrdTy); + + Value *args[] = {Addr, CmpOperand, NewOperand, + order_succ, order_fail, position}; + Instruction* funcInst = CallInst::Create(CDSAtomicCAS_V2[Idx], args); + ReplaceInstWithInst(CI, funcInst); + + return true; + } + + return false; +} + +int CDSPass::getMemoryAccessFuncIndex(Value *Addr, + const DataLayout &DL) { + Type *OrigPtrTy = Addr->getType(); + Type *OrigTy = cast(OrigPtrTy)->getElementType(); + assert(OrigTy->isSized()); + uint32_t TypeSize = DL.getTypeStoreSizeInBits(OrigTy); + if (TypeSize != 8 && TypeSize != 16 && + TypeSize != 32 && TypeSize != 64 && TypeSize != 128) { + NumAccessesWithBadSize++; + // Ignore all unusual sizes. + return -1; + } + size_t Idx = countTrailingZeros(TypeSize / 8); + //assert(Idx < kNumberOfAccessSizes); + if (Idx >= kNumberOfAccessSizes) { + return -1; + } + return Idx; +} -<<<<<<< HEAD char CDSPass::ID = 0; // Automatically enable the pass. -// http://adriansampson.net/blog/clangpass.html static void registerCDSPass(const PassManagerBuilder &, - legacy::PassManagerBase &PM) { - PM.add(new CDSPass()); + legacy::PassManagerBase &PM) { + PM.add(new CDSPass()); } + +/* Enable the pass when opt level is greater than 0 */ static RegisterStandardPasses - RegisterMyPass(PassManagerBuilder::EP_EarlyAsPossible, + RegisterMyPass1(PassManagerBuilder::EP_OptimizerLast, registerCDSPass); -======= -char CdsPass::ID = 0; -// Automatically enable the pass. -// http://adriansampson.net/blog/clangpass.html -static void registerCdsPass(const PassManagerBuilder &, - legacy::PassManagerBase &PM) { - PM.add(new CdsPass()); -} +/* Enable the pass when opt level is 0 */ static RegisterStandardPasses - RegisterMyPass(PassManagerBuilder::EP_EarlyAsPossible, -registerCdsPass); ->>>>>>> 0d737ead79278a1a67c5829f9c6bf84ee6a90cec + RegisterMyPass2(PassManagerBuilder::EP_EnabledOnOptLevel0, +registerCDSPass);