blob: d86b9d48bec5c5655bf985e533ce5f8de8fdebe4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
//===-- ModuleUtil.cpp ----------------------------------------------------===//
//
// The KLEE Symbolic Virtual Machine
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
#include "klee/Internal/Support/ModuleUtil.h"
#include "llvm/Function.h"
#include "llvm/Instructions.h"
#include "llvm/IntrinsicInst.h"
#include "llvm/Linker.h"
#include "llvm/Module.h"
#include "llvm/Assembly/AsmAnnotationWriter.h"
#include "llvm/Support/CFG.h"
#include "llvm/Support/InstIterator.h"
#include "llvm/Support/raw_ostream.h"
#include "llvm/Analysis/ValueTracking.h"
#include <map>
#include <iostream>
#include <fstream>
#include <sstream>
#include <string>
using namespace llvm;
using namespace klee;
Module *klee::linkWithLibrary(Module *module,
const std::string &libraryName) {
try {
Linker linker("klee", module, false);
llvm::sys::Path libraryPath(libraryName);
bool native = false;
if (linker.LinkInFile(libraryPath, native)) {
assert(0 && "linking in library failed!");
}
return linker.releaseModule();
} catch (...) {
assert(0 && "error during linking");
}
}
Function *klee::getDirectCallTarget(const Instruction *i) {
assert(isa<CallInst>(i) || isa<InvokeInst>(i));
Value *v = i->getOperand(0);
if (Function *f = dyn_cast<Function>(v)) {
return f;
} else if (llvm::ConstantExpr *ce = dyn_cast<llvm::ConstantExpr>(v)) {
if (ce->getOpcode()==Instruction::BitCast)
if (Function *f = dyn_cast<Function>(ce->getOperand(0)))
return f;
// NOTE: This assert may fire, it isn't necessarily a problem and
// can be disabled, I just wanted to know when and if it happened.
assert(0 && "FIXME: Unresolved direct target for a constant expression.");
}
return 0;
}
static bool valueIsOnlyCalled(const Value *v) {
for (Value::use_const_iterator it = v->use_begin(), ie = v->use_end();
it != ie; ++it) {
if (const Instruction *instr = dyn_cast<Instruction>(*it)) {
if (instr->getOpcode()==0) continue; // XXX function numbering inst
if (!isa<CallInst>(instr) && !isa<InvokeInst>(instr)) return false;
// Make sure that the value is only the target of this call and
// not an argument.
for (unsigned i=1,e=instr->getNumOperands(); i!=e; ++i)
if (instr->getOperand(i)==v)
return false;
} else if (const llvm::ConstantExpr *ce =
dyn_cast<llvm::ConstantExpr>(*it)) {
if (ce->getOpcode()==Instruction::BitCast)
if (valueIsOnlyCalled(ce))
continue;
return false;
} else if (const GlobalAlias *ga = dyn_cast<GlobalAlias>(*it)) {
// XXX what about v is bitcast of aliasee?
if (v==ga->getAliasee() && !valueIsOnlyCalled(ga))
return false;
} else {
return false;
}
}
return true;
}
bool klee::functionEscapes(const Function *f) {
return !valueIsOnlyCalled(f);
}
|
