aboutsummaryrefslogtreecommitdiff
path: root/llvm_mode/SanitizerCoverageLTO.so.cc
diff options
context:
space:
mode:
authorvanhauser-thc <vh@thc.org>2020-09-05 12:11:48 +0200
committervanhauser-thc <vh@thc.org>2020-09-05 12:11:48 +0200
commit996986bed5f2dd97a3d76f584d8eddc1203f8396 (patch)
tree245d4b208ecb1dcf38c34987aabbd8e44c2703c9 /llvm_mode/SanitizerCoverageLTO.so.cc
parentfac108476c1cb5326cf4339b2a4c846828698816 (diff)
downloadafl++-996986bed5f2dd97a3d76f584d8eddc1203f8396.tar.gz
first batch of changes
Diffstat (limited to 'llvm_mode/SanitizerCoverageLTO.so.cc')
-rw-r--r--llvm_mode/SanitizerCoverageLTO.so.cc1503
1 files changed, 0 insertions, 1503 deletions
diff --git a/llvm_mode/SanitizerCoverageLTO.so.cc b/llvm_mode/SanitizerCoverageLTO.so.cc
deleted file mode 100644
index 1dd65188..00000000
--- a/llvm_mode/SanitizerCoverageLTO.so.cc
+++ /dev/null
@@ -1,1503 +0,0 @@
-/* SanitizeCoverage.cpp ported to afl++ LTO :-) */
-
-#define AFL_LLVM_PASS
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <string.h>
-#include <sys/time.h>
-
-#include <list>
-#include <string>
-#include <fstream>
-#include <set>
-
-#include "llvm/Transforms/Instrumentation/SanitizerCoverage.h"
-#include "llvm/ADT/ArrayRef.h"
-#include "llvm/ADT/SmallVector.h"
-#include "llvm/Analysis/EHPersonalities.h"
-#include "llvm/Analysis/PostDominators.h"
-#include "llvm/Analysis/ValueTracking.h"
-#include "llvm/IR/BasicBlock.h"
-#include "llvm/IR/CFG.h"
-#include "llvm/IR/Constant.h"
-#include "llvm/IR/DataLayout.h"
-#include "llvm/IR/DebugInfo.h"
-#include "llvm/IR/Dominators.h"
-#include "llvm/IR/Function.h"
-#include "llvm/IR/GlobalVariable.h"
-#include "llvm/IR/IRBuilder.h"
-#include "llvm/IR/InlineAsm.h"
-#include "llvm/IR/Instructions.h"
-#include "llvm/IR/IntrinsicInst.h"
-#include "llvm/IR/Intrinsics.h"
-#include "llvm/IR/LegacyPassManager.h"
-#include "llvm/IR/LLVMContext.h"
-#include "llvm/IR/MDBuilder.h"
-#include "llvm/IR/Mangler.h"
-#include "llvm/IR/Module.h"
-#include "llvm/IR/Type.h"
-#include "llvm/InitializePasses.h"
-#include "llvm/Pass.h"
-#include "llvm/Support/CommandLine.h"
-#include "llvm/Support/Debug.h"
-#include "llvm/Support/SpecialCaseList.h"
-#include "llvm/Support/VirtualFileSystem.h"
-#include "llvm/Support/raw_ostream.h"
-#include "llvm/Transforms/Instrumentation.h"
-#include "llvm/Transforms/IPO/PassManagerBuilder.h"
-#include "llvm/Transforms/Utils/BasicBlockUtils.h"
-#include "llvm/Transforms/Utils/BasicBlockUtils.h"
-#include "llvm/Transforms/Utils/ModuleUtils.h"
-
-#include "config.h"
-#include "debug.h"
-#include "afl-llvm-common.h"
-
-using namespace llvm;
-
-#define DEBUG_TYPE "sancov"
-
-static const char *const SanCovTracePCIndirName =
- "__sanitizer_cov_trace_pc_indir";
-static const char *const SanCovTracePCName = "__sanitizer_cov_trace_pc";
-// static const char *const SanCovTracePCGuardName =
-// "__sanitizer_cov_trace_pc_guard";
-static const char *const SanCovGuardsSectionName = "sancov_guards";
-static const char *const SanCovCountersSectionName = "sancov_cntrs";
-static const char *const SanCovBoolFlagSectionName = "sancov_bools";
-static const char *const SanCovPCsSectionName = "sancov_pcs";
-
-static cl::opt<int> ClCoverageLevel(
- "lto-coverage-level",
- cl::desc("Sanitizer Coverage. 0: none, 1: entry block, 2: all blocks, "
- "3: all blocks and critical edges"),
- cl::Hidden, cl::init(3));
-
-static cl::opt<bool> ClTracePC("lto-coverage-trace-pc",
- cl::desc("Experimental pc tracing"), cl::Hidden,
- cl::init(false));
-
-static cl::opt<bool> ClTracePCGuard("lto-coverage-trace-pc-guard",
- cl::desc("pc tracing with a guard"),
- cl::Hidden, cl::init(false));
-
-// If true, we create a global variable that contains PCs of all instrumented
-// BBs, put this global into a named section, and pass this section's bounds
-// to __sanitizer_cov_pcs_init.
-// This way the coverage instrumentation does not need to acquire the PCs
-// at run-time. Works with trace-pc-guard, inline-8bit-counters, and
-// inline-bool-flag.
-static cl::opt<bool> ClCreatePCTable("lto-coverage-pc-table",
- cl::desc("create a static PC table"),
- cl::Hidden, cl::init(false));
-
-static cl::opt<bool> ClInline8bitCounters(
- "lto-coverage-inline-8bit-counters",
- cl::desc("increments 8-bit counter for every edge"), cl::Hidden,
- cl::init(false));
-
-static cl::opt<bool> ClInlineBoolFlag(
- "lto-coverage-inline-bool-flag",
- cl::desc("sets a boolean flag for every edge"), cl::Hidden,
- cl::init(false));
-
-static cl::opt<bool> ClPruneBlocks(
- "lto-coverage-prune-blocks",
- cl::desc("Reduce the number of instrumented blocks"), cl::Hidden,
- cl::init(true));
-
-namespace {
-
-SanitizerCoverageOptions getOptions(int LegacyCoverageLevel) {
-
- SanitizerCoverageOptions Res;
- switch (LegacyCoverageLevel) {
-
- case 0:
- Res.CoverageType = SanitizerCoverageOptions::SCK_None;
- break;
- case 1:
- Res.CoverageType = SanitizerCoverageOptions::SCK_Function;
- break;
- case 2:
- Res.CoverageType = SanitizerCoverageOptions::SCK_BB;
- break;
- case 3:
- Res.CoverageType = SanitizerCoverageOptions::SCK_Edge;
- break;
- case 4:
- Res.CoverageType = SanitizerCoverageOptions::SCK_Edge;
- Res.IndirectCalls = true;
- break;
-
- }
-
- return Res;
-
-}
-
-SanitizerCoverageOptions OverrideFromCL(SanitizerCoverageOptions Options) {
-
- // Sets CoverageType and IndirectCalls.
- SanitizerCoverageOptions CLOpts = getOptions(ClCoverageLevel);
- Options.CoverageType = std::max(Options.CoverageType, CLOpts.CoverageType);
- Options.IndirectCalls |= CLOpts.IndirectCalls;
- Options.TracePC |= ClTracePC;
- Options.TracePCGuard |= ClTracePCGuard;
- Options.Inline8bitCounters |= ClInline8bitCounters;
- Options.InlineBoolFlag |= ClInlineBoolFlag;
- Options.PCTable |= ClCreatePCTable;
- Options.NoPrune |= !ClPruneBlocks;
- if (!Options.TracePCGuard && !Options.TracePC &&
- !Options.Inline8bitCounters && !Options.InlineBoolFlag)
- Options.TracePCGuard = true; // TracePCGuard is default.
- return Options;
-
-}
-
-using DomTreeCallback = function_ref<const DominatorTree *(Function &F)>;
-using PostDomTreeCallback =
- function_ref<const PostDominatorTree *(Function &F)>;
-
-class ModuleSanitizerCoverage {
-
- public:
- ModuleSanitizerCoverage(
- const SanitizerCoverageOptions &Options = SanitizerCoverageOptions())
- : Options(OverrideFromCL(Options)) {
-
- /* ,
- const SpecialCaseList * Allowlist = nullptr,
- const SpecialCaseList * Blocklist = nullptr)
- ,
- Allowlist(Allowlist),
- Blocklist(Blocklist) {
-
- */
-
- }
-
- bool instrumentModule(Module &M, DomTreeCallback DTCallback,
- PostDomTreeCallback PDTCallback);
-
- private:
- void instrumentFunction(Function &F, DomTreeCallback DTCallback,
- PostDomTreeCallback PDTCallback);
- void InjectCoverageForIndirectCalls(Function & F,
- ArrayRef<Instruction *> IndirCalls);
- bool InjectCoverage(Function &F, ArrayRef<BasicBlock *> AllBlocks,
- bool IsLeafFunc = true);
- GlobalVariable *CreateFunctionLocalArrayInSection(size_t NumElements,
- Function &F, Type *Ty,
- const char *Section);
- GlobalVariable *CreatePCArray(Function &F, ArrayRef<BasicBlock *> AllBlocks);
- void CreateFunctionLocalArrays(Function &F, ArrayRef<BasicBlock *> AllBlocks);
- void InjectCoverageAtBlock(Function &F, BasicBlock &BB, size_t Idx,
- bool IsLeafFunc = true);
- std::pair<Value *, Value *> CreateSecStartEnd(Module &M, const char *Section,
- Type *Ty);
-
- void SetNoSanitizeMetadata(Instruction *I) {
-
- I->setMetadata(I->getModule()->getMDKindID("nosanitize"),
- MDNode::get(*C, None));
-
- }
-
- std::string getSectionName(const std::string &Section) const;
- std::string getSectionStart(const std::string &Section) const;
- std::string getSectionEnd(const std::string &Section) const;
- FunctionCallee SanCovTracePCIndir;
- FunctionCallee SanCovTracePC /*, SanCovTracePCGuard*/;
- Type *IntptrTy, *IntptrPtrTy, *Int64Ty, *Int64PtrTy, *Int32Ty, *Int32PtrTy,
- *Int16Ty, *Int8Ty, *Int8PtrTy, *Int1Ty, *Int1PtrTy;
- Module * CurModule;
- std::string CurModuleUniqueId;
- Triple TargetTriple;
- LLVMContext * C;
- const DataLayout *DL;
-
- GlobalVariable *FunctionGuardArray; // for trace-pc-guard.
- GlobalVariable *Function8bitCounterArray; // for inline-8bit-counters.
- GlobalVariable *FunctionBoolArray; // for inline-bool-flag.
- GlobalVariable *FunctionPCsArray; // for pc-table.
- SmallVector<GlobalValue *, 20> GlobalsToAppendToUsed;
- SmallVector<GlobalValue *, 20> GlobalsToAppendToCompilerUsed;
-
- SanitizerCoverageOptions Options;
-
- // afl++ START
- // const SpecialCaseList * Allowlist;
- // const SpecialCaseList * Blocklist;
- uint32_t autodictionary = 1;
- uint32_t inst = 0;
- uint32_t afl_global_id = 0;
- uint64_t map_addr = 0;
- char * skip_nozero = NULL;
- std::vector<BasicBlock *> BlockList;
- DenseMap<Value *, std::string *> valueMap;
- std::vector<std::string> dictionary;
- IntegerType * Int8Tyi = NULL;
- IntegerType * Int32Tyi = NULL;
- IntegerType * Int64Tyi = NULL;
- ConstantInt * Zero = NULL;
- ConstantInt * One = NULL;
- LLVMContext * Ct = NULL;
- Module * Mo = NULL;
- GlobalVariable * AFLMapPtr = NULL;
- Value * MapPtrFixed = NULL;
- FILE * documentFile = NULL;
- // afl++ END
-
-};
-
-class ModuleSanitizerCoverageLegacyPass : public ModulePass {
-
- public:
- static char ID;
- StringRef getPassName() const override {
-
- return "sancov";
-
- }
-
- void getAnalysisUsage(AnalysisUsage &AU) const override {
-
- AU.addRequired<DominatorTreeWrapperPass>();
- AU.addRequired<PostDominatorTreeWrapperPass>();
-
- }
-
- ModuleSanitizerCoverageLegacyPass(
- const SanitizerCoverageOptions &Options = SanitizerCoverageOptions())
- : ModulePass(ID), Options(Options) {
-
- /* ,
- const std::vector<std::string> &AllowlistFiles =
- std::vector<std::string>(),
- const std::vector<std::string> &BlocklistFiles =
- std::vector<std::string>())
- if (AllowlistFiles.size() > 0)
- Allowlist = SpecialCaseList::createOrDie(AllowlistFiles,
- *vfs::getRealFileSystem());
- if (BlocklistFiles.size() > 0)
- Blocklist = SpecialCaseList::createOrDie(BlocklistFiles,
- *vfs::getRealFileSystem());
- */
- initializeModuleSanitizerCoverageLegacyPassPass(
- *PassRegistry::getPassRegistry());
-
- }
-
- bool runOnModule(Module &M) override {
-
- ModuleSanitizerCoverage ModuleSancov(Options);
- // , Allowlist.get(), Blocklist.get());
- auto DTCallback = [this](Function &F) -> const DominatorTree * {
-
- return &this->getAnalysis<DominatorTreeWrapperPass>(F).getDomTree();
-
- };
-
- auto PDTCallback = [this](Function &F) -> const PostDominatorTree * {
-
- return &this->getAnalysis<PostDominatorTreeWrapperPass>(F)
- .getPostDomTree();
-
- };
-
- return ModuleSancov.instrumentModule(M, DTCallback, PDTCallback);
-
- }
-
- private:
- SanitizerCoverageOptions Options;
-
- // std::unique_ptr<SpecialCaseList> Allowlist;
- // std::unique_ptr<SpecialCaseList> Blocklist;
-
-};
-
-} // namespace
-
-PreservedAnalyses ModuleSanitizerCoveragePass::run(Module & M,
- ModuleAnalysisManager &MAM) {
-
- ModuleSanitizerCoverage ModuleSancov(Options);
- // Allowlist.get(), Blocklist.get());
- auto &FAM = MAM.getResult<FunctionAnalysisManagerModuleProxy>(M).getManager();
- auto DTCallback = [&FAM](Function &F) -> const DominatorTree * {
-
- return &FAM.getResult<DominatorTreeAnalysis>(F);
-
- };
-
- auto PDTCallback = [&FAM](Function &F) -> const PostDominatorTree * {
-
- return &FAM.getResult<PostDominatorTreeAnalysis>(F);
-
- };
-
- if (ModuleSancov.instrumentModule(M, DTCallback, PDTCallback))
- return PreservedAnalyses::none();
-
- return PreservedAnalyses::all();
-
-}
-
-std::pair<Value *, Value *> ModuleSanitizerCoverage::CreateSecStartEnd(
- Module &M, const char *Section, Type *Ty) {
-
- GlobalVariable *SecStart =
- new GlobalVariable(M, Ty, false, GlobalVariable::ExternalLinkage, nullptr,
- getSectionStart(Section));
- SecStart->setVisibility(GlobalValue::HiddenVisibility);
- GlobalVariable *SecEnd =
- new GlobalVariable(M, Ty, false, GlobalVariable::ExternalLinkage, nullptr,
- getSectionEnd(Section));
- SecEnd->setVisibility(GlobalValue::HiddenVisibility);
- IRBuilder<> IRB(M.getContext());
- Value * SecEndPtr = IRB.CreatePointerCast(SecEnd, Ty);
- if (!TargetTriple.isOSBinFormatCOFF())
- return std::make_pair(IRB.CreatePointerCast(SecStart, Ty), SecEndPtr);
-
- // Account for the fact that on windows-msvc __start_* symbols actually
- // point to a uint64_t before the start of the array.
- auto SecStartI8Ptr = IRB.CreatePointerCast(SecStart, Int8PtrTy);
- auto GEP = IRB.CreateGEP(Int8Ty, SecStartI8Ptr,
- ConstantInt::get(IntptrTy, sizeof(uint64_t)));
- return std::make_pair(IRB.CreatePointerCast(GEP, Ty), SecEndPtr);
-
-}
-
-bool ModuleSanitizerCoverage::instrumentModule(
- Module &M, DomTreeCallback DTCallback, PostDomTreeCallback PDTCallback) {
-
- if (Options.CoverageType == SanitizerCoverageOptions::SCK_None) return false;
- /*
- if (Allowlist &&
- !Allowlist->inSection("coverage", "src", M.getSourceFileName()))
- return false;
- if (Blocklist &&
- Blocklist->inSection("coverage", "src", M.getSourceFileName()))
- return false;
- */
- BlockList.clear();
- valueMap.clear();
- dictionary.clear();
- C = &(M.getContext());
- DL = &M.getDataLayout();
- CurModule = &M;
- CurModuleUniqueId = getUniqueModuleId(CurModule);
- TargetTriple = Triple(M.getTargetTriple());
- FunctionGuardArray = nullptr;
- Function8bitCounterArray = nullptr;
- FunctionBoolArray = nullptr;
- FunctionPCsArray = nullptr;
- IntptrTy = Type::getIntNTy(*C, DL->getPointerSizeInBits());
- IntptrPtrTy = PointerType::getUnqual(IntptrTy);
- Type * VoidTy = Type::getVoidTy(*C);
- IRBuilder<> IRB(*C);
- Int64PtrTy = PointerType::getUnqual(IRB.getInt64Ty());
- Int32PtrTy = PointerType::getUnqual(IRB.getInt32Ty());
- Int8PtrTy = PointerType::getUnqual(IRB.getInt8Ty());
- Int1PtrTy = PointerType::getUnqual(IRB.getInt1Ty());
- Int64Ty = IRB.getInt64Ty();
- Int32Ty = IRB.getInt32Ty();
- Int16Ty = IRB.getInt16Ty();
- Int8Ty = IRB.getInt8Ty();
- Int1Ty = IRB.getInt1Ty();
-
- /* afl++ START */
- char * ptr;
- LLVMContext &Ctx = M.getContext();
- Ct = &Ctx;
- Int8Tyi = IntegerType::getInt8Ty(Ctx);
- Int32Tyi = IntegerType::getInt32Ty(Ctx);
- Int64Tyi = IntegerType::getInt64Ty(Ctx);
-
- /* Show a banner */
- setvbuf(stdout, NULL, _IONBF, 0);
- if (getenv("AFL_DEBUG")) debug = 1;
-
- if ((isatty(2) && !getenv("AFL_QUIET")) || debug) {
-
- SAYF(cCYA "afl-llvm-lto" VERSION cRST
- " by Marc \"vanHauser\" Heuse <mh@mh-sec.de>\n");
-
- } else
-
- be_quiet = 1;
-
- skip_nozero = getenv("AFL_LLVM_SKIP_NEVERZERO");
-
- if ((ptr = getenv("AFL_LLVM_LTO_STARTID")) != NULL)
- if ((afl_global_id = atoi(ptr)) < 0)
- FATAL("AFL_LLVM_LTO_STARTID value of \"%s\" is negative\n", ptr);
-
- if ((ptr = getenv("AFL_LLVM_DOCUMENT_IDS")) != NULL) {
-
- if ((documentFile = fopen(ptr, "a")) == NULL)
- WARNF("Cannot access document file %s", ptr);
-
- }
-
- // we make this the default as the fixed map has problems with
- // defered forkserver, early constructors, ifuncs and maybe more
- /*if (getenv("AFL_LLVM_MAP_DYNAMIC"))*/
- map_addr = 0;
-
- if ((ptr = getenv("AFL_LLVM_MAP_ADDR"))) {
-
- uint64_t val;
- if (!*ptr || !strcmp(ptr, "0") || !strcmp(ptr, "0x0")) {
-
- map_addr = 0;
-
- } else if (getenv("AFL_LLVM_MAP_DYNAMIC")) {
-
- FATAL(
- "AFL_LLVM_MAP_ADDR and AFL_LLVM_MAP_DYNAMIC cannot be used together");
-
- } else if (strncmp(ptr, "0x", 2) != 0) {
-
- map_addr = 0x10000; // the default
-
- } else {
-
- val = strtoull(ptr, NULL, 16);
- if (val < 0x100 || val > 0xffffffff00000000) {
-
- FATAL(
- "AFL_LLVM_MAP_ADDR must be a value between 0x100 and "
- "0xffffffff00000000");
-
- }
-
- map_addr = val;
-
- }
-
- }
-
- /* Get/set the globals for the SHM region. */
-
- if (!map_addr) {
-
- AFLMapPtr =
- new GlobalVariable(M, PointerType::get(Int8Tyi, 0), false,
- GlobalValue::ExternalLinkage, 0, "__afl_area_ptr");
-
- } else {
-
- ConstantInt *MapAddr = ConstantInt::get(Int64Tyi, map_addr);
- MapPtrFixed =
- ConstantExpr::getIntToPtr(MapAddr, PointerType::getUnqual(Int8Tyi));
-
- }
-
- Zero = ConstantInt::get(Int8Tyi, 0);
- One = ConstantInt::get(Int8Tyi, 1);
-
- scanForDangerousFunctions(&M);
- Mo = &M;
-
- if (autodictionary) {
-
- for (auto &F : M) {
-
- for (auto &BB : F) {
-
- for (auto &IN : BB) {
-
- CallInst *callInst = nullptr;
-
- if ((callInst = dyn_cast<CallInst>(&IN))) {
-
- bool isStrcmp = true;
- bool isMemcmp = true;
- bool isStrncmp = true;
- bool isStrcasecmp = true;
- bool isStrncasecmp = true;
- bool isIntMemcpy = true;
- bool addedNull = false;
- size_t optLen = 0;
-
- Function *Callee = callInst->getCalledFunction();
- if (!Callee) continue;
- if (callInst->getCallingConv() != llvm::CallingConv::C) continue;
- std::string FuncName = Callee->getName().str();
- isStrcmp &= !FuncName.compare("strcmp");
- isMemcmp &= !FuncName.compare("memcmp");
- isStrncmp &= !FuncName.compare("strncmp");
- isStrcasecmp &= !FuncName.compare("strcasecmp");
- isStrncasecmp &= !FuncName.compare("strncasecmp");
- isIntMemcpy &= !FuncName.compare("llvm.memcpy.p0i8.p0i8.i64");
-
- /* we do something different here, putting this BB and the
- successors in a block map */
- if (!FuncName.compare("__afl_persistent_loop")) {
-
- BlockList.push_back(&BB);
- for (succ_iterator SI = succ_begin(&BB), SE = succ_end(&BB);
- SI != SE; ++SI) {
-
- BasicBlock *succ = *SI;
- BlockList.push_back(succ);
-
- }
-
- }
-
- if (!isStrcmp && !isMemcmp && !isStrncmp && !isStrcasecmp &&
- !isStrncasecmp && !isIntMemcpy)
- continue;
-
- /* Verify the strcmp/memcmp/strncmp/strcasecmp/strncasecmp function
- * prototype */
- FunctionType *FT = Callee->getFunctionType();
-
- isStrcmp &= FT->getNumParams() == 2 &&
- FT->getReturnType()->isIntegerTy(32) &&
- FT->getParamType(0) == FT->getParamType(1) &&
- FT->getParamType(0) ==
- IntegerType::getInt8PtrTy(M.getContext());
- isStrcasecmp &= FT->getNumParams() == 2 &&
- FT->getReturnType()->isIntegerTy(32) &&
- FT->getParamType(0) == FT->getParamType(1) &&
- FT->getParamType(0) ==
- IntegerType::getInt8PtrTy(M.getContext());
- isMemcmp &= FT->getNumParams() == 3 &&
- FT->getReturnType()->isIntegerTy(32) &&
- FT->getParamType(0)->isPointerTy() &&
- FT->getParamType(1)->isPointerTy() &&
- FT->getParamType(2)->isIntegerTy();
- isStrncmp &= FT->getNumParams() == 3 &&
- FT->getReturnType()->isIntegerTy(32) &&
- FT->getParamType(0) == FT->getParamType(1) &&
- FT->getParamType(0) ==
- IntegerType::getInt8PtrTy(M.getContext()) &&
- FT->getParamType(2)->isIntegerTy();
- isStrncasecmp &= FT->getNumParams() == 3 &&
- FT->getReturnType()->isIntegerTy(32) &&
- FT->getParamType(0) == FT->getParamType(1) &&
- FT->getParamType(0) ==
- IntegerType::getInt8PtrTy(M.getContext()) &&
- FT->getParamType(2)->isIntegerTy();
-
- if (!isStrcmp && !isMemcmp && !isStrncmp && !isStrcasecmp &&
- !isStrncasecmp && !isIntMemcpy)
- continue;
-
- /* is a str{n,}{case,}cmp/memcmp, check if we have
- * str{case,}cmp(x, "const") or str{case,}cmp("const", x)
- * strn{case,}cmp(x, "const", ..) or strn{case,}cmp("const", x, ..)
- * memcmp(x, "const", ..) or memcmp("const", x, ..) */
- Value *Str1P = callInst->getArgOperand(0),
- *Str2P = callInst->getArgOperand(1);
- std::string Str1, Str2;
- StringRef TmpStr;
- bool HasStr1 = getConstantStringInfo(Str1P, TmpStr);
- if (TmpStr.empty())
- HasStr1 = false;
- else
- Str1 = TmpStr.str();
- bool HasStr2 = getConstantStringInfo(Str2P, TmpStr);
- if (TmpStr.empty())
- HasStr2 = false;
- else
- Str2 = TmpStr.str();
-
- if (debug)
- fprintf(stderr, "F:%s %p(%s)->\"%s\"(%s) %p(%s)->\"%s\"(%s)\n",
- FuncName.c_str(), Str1P, Str1P->getName().str().c_str(),
- Str1.c_str(), HasStr1 == true ? "true" : "false", Str2P,
- Str2P->getName().str().c_str(), Str2.c_str(),
- HasStr2 == true ? "true" : "false");
-
- // we handle the 2nd parameter first because of llvm memcpy
- if (!HasStr2) {
-
- auto *Ptr = dyn_cast<ConstantExpr>(Str2P);
- if (Ptr && Ptr->isGEPWithNoNotionalOverIndexing()) {
-
- if (auto *Var = dyn_cast<GlobalVariable>(Ptr->getOperand(0))) {
-
- if (Var->hasInitializer()) {
-
- if (auto *Array = dyn_cast<ConstantDataArray>(
- Var->getInitializer())) {
-
- HasStr2 = true;
- Str2 = Array->getAsString().str();
-
- }
-
- }
-
- }
-
- }
-
- }
-
- // for the internal memcpy routine we only care for the second
- // parameter and are not reporting anything.
- if (isIntMemcpy == true) {
-
- if (HasStr2 == true) {
-
- Value * op2 = callInst->getArgOperand(2);
- ConstantInt *ilen = dyn_cast<ConstantInt>(op2);
- if (ilen) {
-
- uint64_t literalLength = Str2.size();
- uint64_t optLength = ilen->getZExtValue();
- if (literalLength + 1 == optLength) {
-
- Str2.append("\0", 1); // add null byte
- addedNull = true;
-
- }
-
- }
-
- valueMap[Str1P] = new std::string(Str2);
-
- if (debug)
- fprintf(stderr, "Saved: %s for %p\n", Str2.c_str(), Str1P);
- continue;
-
- }
-
- continue;
-
- }
-
- // Neither a literal nor a global variable?
- // maybe it is a local variable that we saved
- if (!HasStr2) {
-
- std::string *strng = valueMap[Str2P];
- if (strng && !strng->empty()) {
-
- Str2 = *strng;
- HasStr2 = true;
- if (debug)
- fprintf(stderr, "Filled2: %s for %p\n", strng->c_str(),
- Str2P);
-
- }
-
- }
-
- if (!HasStr1) {
-
- auto Ptr = dyn_cast<ConstantExpr>(Str1P);
-
- if (Ptr && Ptr->isGEPWithNoNotionalOverIndexing()) {
-
- if (auto *Var = dyn_cast<GlobalVariable>(Ptr->getOperand(0))) {
-
- if (Var->hasInitializer()) {
-
- if (auto *Array = dyn_cast<ConstantDataArray>(
- Var->getInitializer())) {
-
- HasStr1 = true;
- Str1 = Array->getAsString().str();
-
- }
-
- }
-
- }
-
- }
-
- }
-
- // Neither a literal nor a global variable?
- // maybe it is a local variable that we saved
- if (!HasStr1) {
-
- std::string *strng = valueMap[Str1P];
- if (strng && !strng->empty()) {
-
- Str1 = *strng;
- HasStr1 = true;
- if (debug)
- fprintf(stderr, "Filled1: %s for %p\n", strng->c_str(),
- Str1P);
-
- }
-
- }
-
- /* handle cases of one string is const, one string is variable */
- if (!(HasStr1 ^ HasStr2)) continue;
-
- std::string thestring;
-
- if (HasStr1)
- thestring = Str1;
- else
- thestring = Str2;
-
- optLen = thestring.length();
-
- if (isMemcmp || isStrncmp || isStrncasecmp) {
-
- Value * op2 = callInst->getArgOperand(2);
- ConstantInt *ilen = dyn_cast<ConstantInt>(op2);
- if (ilen) {
-
- uint64_t literalLength = optLen;
- optLen = ilen->getZExtValue();
- if (literalLength + 1 == optLen) { // add null byte
- thestring.append("\0", 1);
- addedNull = true;
-
- }
-
- }
-
- }
-
- // add null byte if this is a string compare function and a null
- // was not already added
- if (!isMemcmp) {
-
- if (addedNull == false) {
-
- thestring.append("\0", 1); // add null byte
- optLen++;
-
- }
-
- // ensure we do not have garbage
- size_t offset = thestring.find('\0', 0);
- if (offset + 1 < optLen) optLen = offset + 1;
- thestring = thestring.substr(0, optLen);
-
- }
-
- if (!be_quiet) {
-
- std::string outstring;
- fprintf(stderr, "%s: length %zu/%zu \"", FuncName.c_str(), optLen,
- thestring.length());
- for (uint8_t i = 0; i < thestring.length(); i++) {
-
- uint8_t c = thestring[i];
- if (c <= 32 || c >= 127)
- fprintf(stderr, "\\x%02x", c);
- else
- fprintf(stderr, "%c", c);
-
- }
-
- fprintf(stderr, "\"\n");
-
- }
-
- // we take the longer string, even if the compare was to a
- // shorter part. Note that depending on the optimizer of the
- // compiler this can be wrong, but it is more likely that this
- // is helping the fuzzer
- if (optLen != thestring.length()) optLen = thestring.length();
- if (optLen > MAX_AUTO_EXTRA) optLen = MAX_AUTO_EXTRA;
- if (optLen < MIN_AUTO_EXTRA) // too short? skip
- continue;
-
- dictionary.push_back(thestring.substr(0, optLen));
-
- }
-
- }
-
- }
-
- }
-
- }
-
- // afl++ END
-
- SanCovTracePCIndir =
- M.getOrInsertFunction(SanCovTracePCIndirName, VoidTy, IntptrTy);
- // Make sure smaller parameters are zero-extended to i64 as required by the
- // x86_64 ABI.
- AttributeList SanCovTraceCmpZeroExtAL;
- if (TargetTriple.getArch() == Triple::x86_64) {
-
- SanCovTraceCmpZeroExtAL =
- SanCovTraceCmpZeroExtAL.addParamAttribute(*C, 0, Attribute::ZExt);
- SanCovTraceCmpZeroExtAL =
- SanCovTraceCmpZeroExtAL.addParamAttribute(*C, 1, Attribute::ZExt);
-
- }
-
- SanCovTracePC = M.getOrInsertFunction(SanCovTracePCName, VoidTy);
-
- // SanCovTracePCGuard =
- // M.getOrInsertFunction(SanCovTracePCGuardName, VoidTy, Int32PtrTy);
-
- for (auto &F : M)
- instrumentFunction(F, DTCallback, PDTCallback);
-
- // afl++ START
- if (documentFile) {
-
- fclose(documentFile);
- documentFile = NULL;
-
- }
-
- if (!getenv("AFL_LLVM_LTO_DONTWRITEID") || dictionary.size() || map_addr) {
-
- // yes we could create our own function, insert it into ctors ...
- // but this would be a pain in the butt ... so we use afl-llvm-rt-lto.o
-
- Function *f = M.getFunction("__afl_auto_init_globals");
-
- if (!f) {
-
- fprintf(stderr,
- "Error: init function could not be found (this should not "
- "happen)\n");
- exit(-1);
-
- }
-
- BasicBlock *bb = &f->getEntryBlock();
- if (!bb) {
-
- fprintf(stderr,
- "Error: init function does not have an EntryBlock (this should "
- "not happen)\n");
- exit(-1);
-
- }
-
- BasicBlock::iterator IP = bb->getFirstInsertionPt();
- IRBuilder<> IRB(&(*IP));
-
- if (map_addr) {
-
- GlobalVariable *AFLMapAddrFixed = new GlobalVariable(
- M, Int64Tyi, true, GlobalValue::ExternalLinkage, 0, "__afl_map_addr");
- ConstantInt *MapAddr = ConstantInt::get(Int64Tyi, map_addr);
- StoreInst * StoreMapAddr = IRB.CreateStore(MapAddr, AFLMapAddrFixed);
- StoreMapAddr->setMetadata(M.getMDKindID("nosanitize"),
- MDNode::get(Ctx, None));
-
- }
-
- if (getenv("AFL_LLVM_LTO_DONTWRITEID") == NULL) {
-
- uint32_t write_loc = afl_global_id;
-
- if (afl_global_id % 8) write_loc = (((afl_global_id + 8) >> 3) << 3);
-
- GlobalVariable *AFLFinalLoc =
- new GlobalVariable(M, Int32Tyi, true, GlobalValue::ExternalLinkage, 0,
- "__afl_final_loc");
- ConstantInt *const_loc = ConstantInt::get(Int32Tyi, write_loc);
- StoreInst * StoreFinalLoc = IRB.CreateStore(const_loc, AFLFinalLoc);
- StoreFinalLoc->setMetadata(M.getMDKindID("nosanitize"),
- MDNode::get(Ctx, None));
-
- }
-
- if (dictionary.size()) {
-
- size_t memlen = 0, count = 0, offset = 0;
- char * ptr;
-
- for (auto token : dictionary) {
-
- memlen += token.length();
- count++;
-
- }
-
- if (!be_quiet)
- printf("AUTODICTIONARY: %lu string%s found\n", count,
- count == 1 ? "" : "s");
-
- if (count) {
-
- if ((ptr = (char *)malloc(memlen + count)) == NULL) {
-
- fprintf(stderr, "Error: malloc for %lu bytes failed!\n",
- memlen + count);
- exit(-1);
-
- }
-
- count = 0;
-
- for (auto token : dictionary) {
-
- if (offset + token.length() < 0xfffff0 && count < MAX_AUTO_EXTRAS) {
-
- ptr[offset++] = (uint8_t)token.length();
- memcpy(ptr + offset, token.c_str(), token.length());
- offset += token.length();
- count++;
-
- }
-
- }
-
- GlobalVariable *AFLDictionaryLen =
- new GlobalVariable(M, Int32Tyi, false, GlobalValue::ExternalLinkage,
- 0, "__afl_dictionary_len");
- ConstantInt *const_len = ConstantInt::get(Int32Tyi, offset);
- StoreInst *StoreDictLen = IRB.CreateStore(const_len, AFLDictionaryLen);
- StoreDictLen->setMetadata(M.getMDKindID("nosanitize"),
- MDNode::get(Ctx, None));
-
- ArrayType *ArrayTy = ArrayType::get(IntegerType::get(Ctx, 8), offset);
- GlobalVariable *AFLInternalDictionary = new GlobalVariable(
- M, ArrayTy, true, GlobalValue::ExternalLinkage,
- ConstantDataArray::get(Ctx,
- *(new ArrayRef<char>((char *)ptr, offset))),
- "__afl_internal_dictionary");
- AFLInternalDictionary->setInitializer(ConstantDataArray::get(
- Ctx, *(new ArrayRef<char>((char *)ptr, offset))));
- AFLInternalDictionary->setConstant(true);
-
- GlobalVariable *AFLDictionary = new GlobalVariable(
- M, PointerType::get(Int8Tyi, 0), false,
- GlobalValue::ExternalLinkage, 0, "__afl_dictionary");
-
- Value *AFLDictOff = IRB.CreateGEP(AFLInternalDictionary, Zero);
- Value *AFLDictPtr =
- IRB.CreatePointerCast(AFLDictOff, PointerType::get(Int8Tyi, 0));
- StoreInst *StoreDict = IRB.CreateStore(AFLDictPtr, AFLDictionary);
- StoreDict->setMetadata(M.getMDKindID("nosanitize"),
- MDNode::get(Ctx, None));
-
- }
-
- }
-
- }
-
- /* Say something nice. */
-
- if (!be_quiet) {
-
- if (!inst)
- WARNF("No instrumentation targets found.");
- else {
-
- char modeline[100];
- snprintf(modeline, sizeof(modeline), "%s%s%s%s%s",
- getenv("AFL_HARDEN") ? "hardened" : "non-hardened",
- getenv("AFL_USE_ASAN") ? ", ASAN" : "",
- getenv("AFL_USE_MSAN") ? ", MSAN" : "",
- getenv("AFL_USE_CFISAN") ? ", CFISAN" : "",
- getenv("AFL_USE_UBSAN") ? ", UBSAN" : "");
- OKF("Instrumented %u locations with no collisions (on average %llu "
- "collisions would be in afl-gcc/afl-clang-fast) (%s mode).",
- inst, calculateCollisions(inst), modeline);
-
- }
-
- }
-
- // afl++ END
-
- // We don't reference these arrays directly in any of our runtime functions,
- // so we need to prevent them from being dead stripped.
- if (TargetTriple.isOSBinFormatMachO()) appendToUsed(M, GlobalsToAppendToUsed);
- appendToCompilerUsed(M, GlobalsToAppendToCompilerUsed);
- return true;
-
-}
-
-// True if block has successors and it dominates all of them.
-static bool isFullDominator(const BasicBlock *BB, const DominatorTree *DT) {
-
- if (succ_begin(BB) == succ_end(BB)) return false;
-
- for (const BasicBlock *SUCC : make_range(succ_begin(BB), succ_end(BB))) {
-
- if (!DT->dominates(BB, SUCC)) return false;
-
- }
-
- return true;
-
-}
-
-// True if block has predecessors and it postdominates all of them.
-static bool isFullPostDominator(const BasicBlock * BB,
- const PostDominatorTree *PDT) {
-
- if (pred_begin(BB) == pred_end(BB)) return false;
-
- for (const BasicBlock *PRED : make_range(pred_begin(BB), pred_end(BB))) {
-
- if (!PDT->dominates(BB, PRED)) return false;
-
- }
-
- return true;
-
-}
-
-static bool shouldInstrumentBlock(const Function &F, const BasicBlock *BB,
- const DominatorTree * DT,
- const PostDominatorTree * PDT,
- const SanitizerCoverageOptions &Options) {
-
- // Don't insert coverage for blocks containing nothing but unreachable: we
- // will never call __sanitizer_cov() for them, so counting them in
- // NumberOfInstrumentedBlocks() might complicate calculation of code coverage
- // percentage. Also, unreachable instructions frequently have no debug
- // locations.
- if (isa<UnreachableInst>(BB->getFirstNonPHIOrDbgOrLifetime())) return false;
-
- // Don't insert coverage into blocks without a valid insertion point
- // (catchswitch blocks).
- if (BB->getFirstInsertionPt() == BB->end()) return false;
-
- // afl++ START
- if (!Options.NoPrune && &F.getEntryBlock() == BB && F.size() > 1)
- return false;
- // afl++ END
-
- if (Options.NoPrune || &F.getEntryBlock() == BB) return true;
-
- if (Options.CoverageType == SanitizerCoverageOptions::SCK_Function &&
- &F.getEntryBlock() != BB)
- return false;
-
- // Do not instrument full dominators, or full post-dominators with multiple
- // predecessors.
- return !isFullDominator(BB, DT) &&
- !(isFullPostDominator(BB, PDT) && !BB->getSinglePredecessor());
-
-}
-
-void ModuleSanitizerCoverage::instrumentFunction(
- Function &F, DomTreeCallback DTCallback, PostDomTreeCallback PDTCallback) {
-
- if (F.empty()) return;
- if (F.getName().find(".module_ctor") != std::string::npos)
- return; // Should not instrument sanitizer init functions.
- if (F.getName().startswith("__sanitizer_"))
- return; // Don't instrument __sanitizer_* callbacks.
- // Don't touch available_externally functions, their actual body is elewhere.
- if (F.getLinkage() == GlobalValue::AvailableExternallyLinkage) return;
- // Don't instrument MSVC CRT configuration helpers. They may run before normal
- // initialization.
- if (F.getName() == "__local_stdio_printf_options" ||
- F.getName() == "__local_stdio_scanf_options")
- return;
- if (isa<UnreachableInst>(F.getEntryBlock().getTerminator())) return;
- // Don't instrument functions using SEH for now. Splitting basic blocks like
- // we do for coverage breaks WinEHPrepare.
- // FIXME: Remove this when SEH no longer uses landingpad pattern matching.
- if (F.hasPersonalityFn() &&
- isAsynchronousEHPersonality(classifyEHPersonality(F.getPersonalityFn())))
- return;
- // if (Allowlist && !Allowlist->inSection("coverage", "fun", F.getName()))
- // return;
- // if (Blocklist && Blocklist->inSection("coverage", "fun", F.getName()))
- // return;
-
- // afl++ START
- if (!F.size()) return;
- if (isIgnoreFunction(&F)) return;
- // afl++ END
-
- if (Options.CoverageType >= SanitizerCoverageOptions::SCK_Edge)
- SplitAllCriticalEdges(
- F, CriticalEdgeSplittingOptions().setIgnoreUnreachableDests());
- SmallVector<Instruction *, 8> IndirCalls;
- SmallVector<BasicBlock *, 16> BlocksToInstrument;
-
- const DominatorTree * DT = DTCallback(F);
- const PostDominatorTree *PDT = PDTCallback(F);
- bool IsLeafFunc = true;
-
- for (auto &BB : F) {
-
- if (shouldInstrumentBlock(F, &BB, DT, PDT, Options))
- BlocksToInstrument.push_back(&BB);
- for (auto &Inst : BB) {
-
- if (Options.IndirectCalls) {
-
- CallBase *CB = dyn_cast<CallBase>(&Inst);
- if (CB && !CB->getCalledFunction()) IndirCalls.push_back(&Inst);
-
- }
-
- }
-
- }
-
- InjectCoverage(F, BlocksToInstrument, IsLeafFunc);
- InjectCoverageForIndirectCalls(F, IndirCalls);
-
-}
-
-GlobalVariable *ModuleSanitizerCoverage::CreateFunctionLocalArrayInSection(
- size_t NumElements, Function &F, Type *Ty, const char *Section) {
-
- ArrayType *ArrayTy = ArrayType::get(Ty, NumElements);
- auto Array = new GlobalVariable(
- *CurModule, ArrayTy, false, GlobalVariable::PrivateLinkage,
- Constant::getNullValue(ArrayTy), "__sancov_gen_");
-
- if (TargetTriple.supportsCOMDAT() && !F.isInterposable())
- if (auto Comdat =
- GetOrCreateFunctionComdat(F, TargetTriple, CurModuleUniqueId))
- Array->setComdat(Comdat);
- Array->setSection(getSectionName(Section));
- Array->setAlignment(Align(DL->getTypeStoreSize(Ty).getFixedSize()));
- GlobalsToAppendToUsed.push_back(Array);
- GlobalsToAppendToCompilerUsed.push_back(Array);
- MDNode *MD = MDNode::get(F.getContext(), ValueAsMetadata::get(&F));
- Array->addMetadata(LLVMContext::MD_associated, *MD);
-
- return Array;
-
-}
-
-GlobalVariable *ModuleSanitizerCoverage::CreatePCArray(
- Function &F, ArrayRef<BasicBlock *> AllBlocks) {
-
- size_t N = AllBlocks.size();
- assert(N);
- SmallVector<Constant *, 32> PCs;
- IRBuilder<> IRB(&*F.getEntryBlock().getFirstInsertionPt());
- for (size_t i = 0; i < N; i++) {
-
- if (&F.getEntryBlock() == AllBlocks[i]) {
-
- PCs.push_back((Constant *)IRB.CreatePointerCast(&F, IntptrPtrTy));
- PCs.push_back((Constant *)IRB.CreateIntToPtr(
- ConstantInt::get(IntptrTy, 1), IntptrPtrTy));
-
- } else {
-
- PCs.push_back((Constant *)IRB.CreatePointerCast(
- BlockAddress::get(AllBlocks[i]), IntptrPtrTy));
- PCs.push_back((Constant *)IRB.CreateIntToPtr(
- ConstantInt::get(IntptrTy, 0), IntptrPtrTy));
-
- }
-
- }
-
- auto *PCArray = CreateFunctionLocalArrayInSection(N * 2, F, IntptrPtrTy,
- SanCovPCsSectionName);
- PCArray->setInitializer(
- ConstantArray::get(ArrayType::get(IntptrPtrTy, N * 2), PCs));
- PCArray->setConstant(true);
-
- return PCArray;
-
-}
-
-void ModuleSanitizerCoverage::CreateFunctionLocalArrays(
- Function &F, ArrayRef<BasicBlock *> AllBlocks) {
-
- if (Options.TracePCGuard)
- FunctionGuardArray = CreateFunctionLocalArrayInSection(
- AllBlocks.size(), F, Int32Ty, SanCovGuardsSectionName);
- if (Options.Inline8bitCounters)
- Function8bitCounterArray = CreateFunctionLocalArrayInSection(
- AllBlocks.size(), F, Int8Ty, SanCovCountersSectionName);
- if (Options.InlineBoolFlag)
- FunctionBoolArray = CreateFunctionLocalArrayInSection(
- AllBlocks.size(), F, Int1Ty, SanCovBoolFlagSectionName);
- if (Options.PCTable) FunctionPCsArray = CreatePCArray(F, AllBlocks);
-
-}
-
-bool ModuleSanitizerCoverage::InjectCoverage(Function & F,
- ArrayRef<BasicBlock *> AllBlocks,
- bool IsLeafFunc) {
-
- if (AllBlocks.empty()) return false;
- CreateFunctionLocalArrays(F, AllBlocks);
- for (size_t i = 0, N = AllBlocks.size(); i < N; i++) {
-
- // afl++ START
- if (BlockList.size()) {
-
- int skip = 0;
- for (uint32_t k = 0; k < BlockList.size(); k++) {
-
- if (AllBlocks[i] == BlockList[k]) {
-
- if (debug)
- fprintf(stderr,
- "DEBUG: Function %s skipping BB with/after __afl_loop\n",
- F.getName().str().c_str());
- skip = 1;
-
- }
-
- }
-
- if (skip) continue;
-
- }
-
- // afl++ END
-
- InjectCoverageAtBlock(F, *AllBlocks[i], i, IsLeafFunc);
-
- }
-
- return true;
-
-}
-
-// On every indirect call we call a run-time function
-// __sanitizer_cov_indir_call* with two parameters:
-// - callee address,
-// - global cache array that contains CacheSize pointers (zero-initialized).
-// The cache is used to speed up recording the caller-callee pairs.
-// The address of the caller is passed implicitly via caller PC.
-// CacheSize is encoded in the name of the run-time function.
-void ModuleSanitizerCoverage::InjectCoverageForIndirectCalls(
- Function &F, ArrayRef<Instruction *> IndirCalls) {
-
- if (IndirCalls.empty()) return;
- assert(Options.TracePC || Options.TracePCGuard ||
- Options.Inline8bitCounters || Options.InlineBoolFlag);
- for (auto I : IndirCalls) {
-
- IRBuilder<> IRB(I);
- CallBase & CB = cast<CallBase>(*I);
- Value * Callee = CB.getCalledOperand();
- if (isa<InlineAsm>(Callee)) continue;
- IRB.CreateCall(SanCovTracePCIndir, IRB.CreatePointerCast(Callee, IntptrTy));
-
- }
-
-}
-
-void ModuleSanitizerCoverage::InjectCoverageAtBlock(Function &F, BasicBlock &BB,
- size_t Idx,
- bool IsLeafFunc) {
-
- BasicBlock::iterator IP = BB.getFirstInsertionPt();
- bool IsEntryBB = &BB == &F.getEntryBlock();
- DebugLoc EntryLoc;
- if (IsEntryBB) {
-
- if (auto SP = F.getSubprogram())
- EntryLoc = DebugLoc::get(SP->getScopeLine(), 0, SP);
- // Keep static allocas and llvm.localescape calls in the entry block. Even
- // if we aren't splitting the block, it's nice for allocas to be before
- // calls.
- IP = PrepareToSplitEntryBlock(BB, IP);
-
- } else {
-
- EntryLoc = IP->getDebugLoc();
-
- }
-
- IRBuilder<> IRB(&*IP);
- IRB.SetCurrentDebugLocation(EntryLoc);
- if (Options.TracePC) {
-
- IRB.CreateCall(SanCovTracePC)
-#if LLVM_VERSION_MAJOR < 12
- ->cannotMerge(); // gets the PC using GET_CALLER_PC.
-#else
- ->setCannotMerge(); // gets the PC using GET_CALLER_PC.
-#endif
-
- }
-
- if (Options.TracePCGuard) {
-
- // afl++ START
- ++afl_global_id;
-
- if (documentFile) {
-
- unsigned long long int moduleID =
- (((unsigned long long int)(rand() & 0xffffffff)) << 32) | getpid();
- fprintf(documentFile, "ModuleID=%llu Function=%s edgeID=%u\n", moduleID,
- F.getName().str().c_str(), afl_global_id);
-
- }
-
- /* Set the ID of the inserted basic block */
-
- ConstantInt *CurLoc = ConstantInt::get(Int32Tyi, afl_global_id);
-
- /* Load SHM pointer */
-
- Value *MapPtrIdx;
-
- if (map_addr) {
-
- MapPtrIdx = IRB.CreateGEP(MapPtrFixed, CurLoc);
-
- } else {
-
- LoadInst *MapPtr = IRB.CreateLoad(AFLMapPtr);
- MapPtr->setMetadata(Mo->getMDKindID("nosanitize"),
- MDNode::get(*Ct, None));
- MapPtrIdx = IRB.CreateGEP(MapPtr, CurLoc);
-
- }
-
- /* Update bitmap */
-
- LoadInst *Counter = IRB.CreateLoad(MapPtrIdx);
- Counter->setMetadata(Mo->getMDKindID("nosanitize"), MDNode::get(*Ct, None));
-
- Value *Incr = IRB.CreateAdd(Counter, One);
-
- if (skip_nozero == NULL) {
-
- auto cf = IRB.CreateICmpEQ(Incr, Zero);
- auto carry = IRB.CreateZExt(cf, Int8Tyi);
- Incr = IRB.CreateAdd(Incr, carry);
-
- }
-
- IRB.CreateStore(Incr, MapPtrIdx)
- ->setMetadata(Mo->getMDKindID("nosanitize"), MDNode::get(*Ct, None));
-
- // done :)
-
- inst++;
- // afl++ END
-
- /*
- XXXXXXXXXXXXXXXXXXX
-
- auto GuardPtr = IRB.CreateIntToPtr(
- IRB.CreateAdd(IRB.CreatePointerCast(FunctionGuardArray, IntptrTy),
- ConstantInt::get(IntptrTy, Idx * 4)),
- Int32PtrTy);
-
- IRB.CreateCall(SanCovTracePCGuard, GuardPtr)->setCannotMerge();
- */
-
- }
-
- if (Options.Inline8bitCounters) {
-
- auto CounterPtr = IRB.CreateGEP(
- Function8bitCounterArray->getValueType(), Function8bitCounterArray,
- {ConstantInt::get(IntptrTy, 0), ConstantInt::get(IntptrTy, Idx)});
- auto Load = IRB.CreateLoad(Int8Ty, CounterPtr);
- auto Inc = IRB.CreateAdd(Load, ConstantInt::get(Int8Ty, 1));
- auto Store = IRB.CreateStore(Inc, CounterPtr);
- SetNoSanitizeMetadata(Load);
- SetNoSanitizeMetadata(Store);
-
- }
-
- if (Options.InlineBoolFlag) {
-
- auto FlagPtr = IRB.CreateGEP(
- FunctionBoolArray->getValueType(), FunctionBoolArray,
- {ConstantInt::get(IntptrTy, 0), ConstantInt::get(IntptrTy, Idx)});
- auto Load = IRB.CreateLoad(Int1Ty, FlagPtr);
- auto ThenTerm =
- SplitBlockAndInsertIfThen(IRB.CreateIsNull(Load), &*IP, false);
- IRBuilder<> ThenIRB(ThenTerm);
- auto Store = ThenIRB.CreateStore(ConstantInt::getTrue(Int1Ty), FlagPtr);
- SetNoSanitizeMetadata(Load);
- SetNoSanitizeMetadata(Store);
-
- }
-
-}
-
-std::string ModuleSanitizerCoverage::getSectionName(
- const std::string &Section) const {
-
- if (TargetTriple.isOSBinFormatCOFF()) {
-
- if (Section == SanCovCountersSectionName) return ".SCOV$CM";
- if (Section == SanCovBoolFlagSectionName) return ".SCOV$BM";
- if (Section == SanCovPCsSectionName) return ".SCOVP$M";
- return ".SCOV$GM"; // For SanCovGuardsSectionName.
-
- }
-
- if (TargetTriple.isOSBinFormatMachO()) return "__DATA,__" + Section;
- return "__" + Section;
-
-}
-
-std::string ModuleSanitizerCoverage::getSectionStart(
- const std::string &Section) const {
-
- if (TargetTriple.isOSBinFormatMachO())
- return "\1section$start$__DATA$__" + Section;
- return "__start___" + Section;
-
-}
-
-std::string ModuleSanitizerCoverage::getSectionEnd(
- const std::string &Section) const {
-
- if (TargetTriple.isOSBinFormatMachO())
- return "\1section$end$__DATA$__" + Section;
- return "__stop___" + Section;
-
-}
-
-char ModuleSanitizerCoverageLegacyPass::ID = 0;
-
-INITIALIZE_PASS_BEGIN(ModuleSanitizerCoverageLegacyPass, "sancov",
- "Pass for instrumenting coverage on functions", false,
- false)
-INITIALIZE_PASS_DEPENDENCY(DominatorTreeWrapperPass)
-INITIALIZE_PASS_DEPENDENCY(PostDominatorTreeWrapperPass)
-INITIALIZE_PASS_END(ModuleSanitizerCoverageLegacyPass, "sancov",
- "Pass for instrumenting coverage on functions", false,
- false)
-
-ModulePass *llvm::createModuleSanitizerCoverageLegacyPassPass(
- const SanitizerCoverageOptions &Options,
- const std::vector<std::string> &AllowlistFiles,
- const std::vector<std::string> &BlocklistFiles) {
-
- return new ModuleSanitizerCoverageLegacyPass(Options);
- //, AllowlistFiles, BlocklistFiles);
-
-}
-
-static void registerLTOPass(const PassManagerBuilder &,
- legacy::PassManagerBase &PM) {
-
- auto p = new ModuleSanitizerCoverageLegacyPass();
- PM.add(p);
-
-}
-
-static RegisterStandardPasses RegisterCompTransPass(
- PassManagerBuilder::EP_OptimizerLast, registerLTOPass);
-
-static RegisterStandardPasses RegisterCompTransPass0(
- PassManagerBuilder::EP_EnabledOnOptLevel0, registerLTOPass);
-
-#if LLVM_VERSION_MAJOR >= 11
-static RegisterStandardPasses RegisterCompTransPassLTO(
- PassManagerBuilder::EP_FullLinkTimeOptimizationLast, registerLTOPass);
-#endif
-