For PR950:
[oota-llvm.git] / lib / Transforms / IPO / IndMemRemoval.cpp
1 //===-- IndMemRemoval.cpp - Remove indirect allocations and frees ----------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file was developed by the LLVM research group and is distributed under
6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This pass finds places where memory allocation functions may escape into
11 // indirect land.  Some transforms are much easier (aka possible) only if free 
12 // or malloc are not called indirectly.
13 // Thus find places where the address of memory functions are taken and construct
14 // bounce functions with direct calls of those functions.
15 //
16 //===----------------------------------------------------------------------===//
17
18 #define DEBUG_TYPE "indmemrem"
19 #include "llvm/Transforms/IPO.h"
20 #include "llvm/Pass.h"
21 #include "llvm/Module.h"
22 #include "llvm/Instructions.h"
23 #include "llvm/Type.h"
24 #include "llvm/ADT/Statistic.h"
25 using namespace llvm;
26
27 STATISTIC(NumBounceSites, "Number of sites modified");
28 STATISTIC(NumBounce     , "Number of bounce functions created");
29
30 namespace {
31   class IndMemRemPass : public ModulePass {
32   public:
33     virtual bool runOnModule(Module &M);
34   };
35   RegisterPass<IndMemRemPass> X("indmemrem","Indirect Malloc and Free Removal");
36 } // end anonymous namespace
37
38
39 bool IndMemRemPass::runOnModule(Module &M) {
40   //in Theory, all direct calls of malloc and free should be promoted
41   //to intrinsics.  Therefor, this goes through and finds where the
42   //address of free or malloc are taken and replaces those with bounce
43   //functions, ensuring that all malloc and free that might happen
44   //happen through intrinsics.
45   bool changed = false;
46   if (Function* F = M.getNamedFunction("free")) {
47     assert(F->isExternal() && "free not external?");
48     if (!F->use_empty()) {
49       Function* FN = new Function(F->getFunctionType(), 
50                                   GlobalValue::LinkOnceLinkage, 
51                                   "free_llvm_bounce", &M);
52       BasicBlock* bb = new BasicBlock("entry",FN);
53       Instruction* R = new ReturnInst(bb);
54       new FreeInst(FN->arg_begin(), R);
55       ++NumBounce;
56       NumBounceSites += F->getNumUses();
57       F->replaceAllUsesWith(FN);
58       changed = true;
59     }
60   }
61   if (Function* F = M.getNamedFunction("malloc")) {
62     assert(F->isExternal() && "malloc not external?");
63     if (!F->use_empty()) {
64       Function* FN = new Function(F->getFunctionType(), 
65                                   GlobalValue::LinkOnceLinkage, 
66                                   "malloc_llvm_bounce", &M);
67       BasicBlock* bb = new BasicBlock("entry",FN);
68       Instruction* c = CastInst::createIntegerCast(
69           FN->arg_begin(), Type::Int32Ty, false, "c", bb);
70       Instruction* a = new MallocInst(Type::Int8Ty, c, "m", bb);
71       new ReturnInst(a, bb);
72       ++NumBounce;
73       NumBounceSites += F->getNumUses();
74       F->replaceAllUsesWith(FN);
75       changed = true;
76     }
77   }
78   return changed;
79 }
80
81 ModulePass *llvm::createIndMemRemPass() {
82   return new IndMemRemPass();
83 }