Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 1 | //===- FunctionResolution.cpp - Resolve declarations to implementations ---===// |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 2 | // |
John Criswell | b576c94 | 2003-10-20 19:43:21 +0000 | [diff] [blame] | 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. |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 7 | // |
John Criswell | b576c94 | 2003-10-20 19:43:21 +0000 | [diff] [blame] | 8 | //===----------------------------------------------------------------------===// |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 9 | // |
| 10 | // Loop over the functions that are in the module and look for functions that |
| 11 | // have the same name. More often than not, there will be things like: |
| 12 | // |
| 13 | // declare void %foo(...) |
| 14 | // void %foo(int, int) { ... } |
| 15 | // |
| 16 | // because of the way things are declared in C. If this is the case, patch |
| 17 | // things up. |
| 18 | // |
| 19 | //===----------------------------------------------------------------------===// |
| 20 | |
Chris Lattner | ff1be26 | 2002-07-23 22:04:02 +0000 | [diff] [blame] | 21 | #include "llvm/Transforms/IPO.h" |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 22 | #include "llvm/Module.h" |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 23 | #include "llvm/DerivedTypes.h" |
| 24 | #include "llvm/Pass.h" |
Misha Brukman | 47b14a4 | 2004-07-29 17:30:56 +0000 | [diff] [blame] | 25 | #include "llvm/Instructions.h" |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 26 | #include "llvm/Constants.h" |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 27 | #include "llvm/Support/CallSite.h" |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 28 | #include "llvm/Target/TargetData.h" |
Chris Lattner | 250d91b | 2003-08-13 22:15:04 +0000 | [diff] [blame] | 29 | #include "llvm/Assembly/Writer.h" |
Reid Spencer | 551ccae | 2004-09-01 22:55:40 +0000 | [diff] [blame] | 30 | #include "llvm/ADT/Statistic.h" |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 31 | #include <algorithm> |
Chris Lattner | dac58ad | 2006-01-22 23:32:06 +0000 | [diff] [blame^] | 32 | #include <iostream> |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 33 | using namespace llvm; |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 34 | |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 35 | namespace { |
Chris Lattner | a92f696 | 2002-10-01 22:38:41 +0000 | [diff] [blame] | 36 | Statistic<>NumResolved("funcresolve", "Number of varargs functions resolved"); |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 37 | Statistic<> NumGlobals("funcresolve", "Number of global variables resolved"); |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 38 | |
Chris Lattner | b12914b | 2004-09-20 04:48:05 +0000 | [diff] [blame] | 39 | struct FunctionResolvingPass : public ModulePass { |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 40 | virtual void getAnalysisUsage(AnalysisUsage &AU) const { |
| 41 | AU.addRequired<TargetData>(); |
| 42 | } |
| 43 | |
Chris Lattner | b12914b | 2004-09-20 04:48:05 +0000 | [diff] [blame] | 44 | bool runOnModule(Module &M); |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 45 | }; |
Chris Lattner | 1e43516 | 2002-07-26 21:12:44 +0000 | [diff] [blame] | 46 | RegisterOpt<FunctionResolvingPass> X("funcresolve", "Resolve Functions"); |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 47 | } |
| 48 | |
Chris Lattner | b12914b | 2004-09-20 04:48:05 +0000 | [diff] [blame] | 49 | ModulePass *llvm::createFunctionResolvingPass() { |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 50 | return new FunctionResolvingPass(); |
| 51 | } |
| 52 | |
Chris Lattner | da902ba | 2003-01-30 18:22:32 +0000 | [diff] [blame] | 53 | static bool ResolveFunctions(Module &M, std::vector<GlobalValue*> &Globals, |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 54 | Function *Concrete) { |
| 55 | bool Changed = false; |
| 56 | for (unsigned i = 0; i != Globals.size(); ++i) |
| 57 | if (Globals[i] != Concrete) { |
| 58 | Function *Old = cast<Function>(Globals[i]); |
Reid Spencer | 2f18907 | 2005-12-13 19:56:51 +0000 | [diff] [blame] | 59 | const FunctionType *OldFT = Old->getFunctionType(); |
| 60 | const FunctionType *ConcreteFT = Concrete->getFunctionType(); |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 61 | |
Reid Spencer | 2f18907 | 2005-12-13 19:56:51 +0000 | [diff] [blame] | 62 | if (OldFT->getNumParams() > ConcreteFT->getNumParams() && |
| 63 | !ConcreteFT->isVarArg()) |
Chris Lattner | 4e2fd75 | 2003-02-27 20:55:48 +0000 | [diff] [blame] | 64 | if (!Old->use_empty()) { |
| 65 | std::cerr << "WARNING: Linking function '" << Old->getName() |
| 66 | << "' is causing arguments to be dropped.\n"; |
| 67 | std::cerr << "WARNING: Prototype: "; |
| 68 | WriteAsOperand(std::cerr, Old); |
| 69 | std::cerr << " resolved to "; |
| 70 | WriteAsOperand(std::cerr, Concrete); |
| 71 | std::cerr << "\n"; |
| 72 | } |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 73 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 74 | // Check to make sure that if there are specified types, that they |
| 75 | // match... |
| 76 | // |
Reid Spencer | 2f18907 | 2005-12-13 19:56:51 +0000 | [diff] [blame] | 77 | unsigned NumArguments = std::min(OldFT->getNumParams(), |
| 78 | ConcreteFT->getNumParams()); |
Chris Lattner | 4e2fd75 | 2003-02-27 20:55:48 +0000 | [diff] [blame] | 79 | |
Chris Lattner | dde601d | 2003-03-03 19:57:46 +0000 | [diff] [blame] | 80 | if (!Old->use_empty() && !Concrete->use_empty()) |
| 81 | for (unsigned i = 0; i < NumArguments; ++i) |
Reid Spencer | 2f18907 | 2005-12-13 19:56:51 +0000 | [diff] [blame] | 82 | if (OldFT->getParamType(i) != ConcreteFT->getParamType(i)) |
| 83 | if (OldFT->getParamType(i)->getTypeID() != |
| 84 | ConcreteFT->getParamType(i)->getTypeID()) { |
Chris Lattner | a0f85e5 | 2003-08-23 20:03:05 +0000 | [diff] [blame] | 85 | std::cerr << "WARNING: Function [" << Old->getName() |
Chris Lattner | 143df9a | 2003-11-20 18:19:35 +0000 | [diff] [blame] | 86 | << "]: Parameter types conflict for: '"; |
Reid Spencer | 2f18907 | 2005-12-13 19:56:51 +0000 | [diff] [blame] | 87 | WriteTypeSymbolic(std::cerr, OldFT, &M); |
| 88 | std::cerr << "' (in " |
| 89 | << Old->getParent()->getModuleIdentifier() << ") and '"; |
| 90 | WriteTypeSymbolic(std::cerr, ConcreteFT, &M); |
| 91 | std::cerr << "'(in " |
| 92 | << Concrete->getParent()->getModuleIdentifier() << ")\n"; |
Chris Lattner | b29170f | 2003-08-20 23:50:38 +0000 | [diff] [blame] | 93 | return Changed; |
Chris Lattner | a0f85e5 | 2003-08-23 20:03:05 +0000 | [diff] [blame] | 94 | } |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 95 | |
Chris Lattner | 1fd95af | 2003-04-28 01:23:29 +0000 | [diff] [blame] | 96 | // Attempt to convert all of the uses of the old function to the concrete |
| 97 | // form of the function. If there is a use of the fn that we don't |
| 98 | // understand here we punt to avoid making a bad transformation. |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 99 | // |
Chris Lattner | 1fd95af | 2003-04-28 01:23:29 +0000 | [diff] [blame] | 100 | // At this point, we know that the return values are the same for our two |
| 101 | // functions and that the Old function has no varargs fns specified. In |
| 102 | // otherwords it's just <retty> (...) |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 103 | // |
Chris Lattner | d514d82 | 2005-02-01 01:23:31 +0000 | [diff] [blame] | 104 | if (!Old->use_empty()) { |
Chris Lattner | 1078d11 | 2003-07-23 22:03:18 +0000 | [diff] [blame] | 105 | Value *Replacement = Concrete; |
| 106 | if (Concrete->getType() != Old->getType()) |
Chris Lattner | d514d82 | 2005-02-01 01:23:31 +0000 | [diff] [blame] | 107 | Replacement = ConstantExpr::getCast(Concrete, Old->getType()); |
| 108 | NumResolved += Old->getNumUses(); |
Chris Lattner | 1078d11 | 2003-07-23 22:03:18 +0000 | [diff] [blame] | 109 | Old->replaceAllUsesWith(Replacement); |
| 110 | } |
Chris Lattner | 12ce59d | 2003-05-31 21:08:45 +0000 | [diff] [blame] | 111 | |
| 112 | // Since there are no uses of Old anymore, remove it from the module. |
| 113 | M.getFunctionList().erase(Old); |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 114 | } |
| 115 | return Changed; |
| 116 | } |
| 117 | |
| 118 | |
Chris Lattner | da902ba | 2003-01-30 18:22:32 +0000 | [diff] [blame] | 119 | static bool ResolveGlobalVariables(Module &M, |
| 120 | std::vector<GlobalValue*> &Globals, |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 121 | GlobalVariable *Concrete) { |
| 122 | bool Changed = false; |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 123 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 124 | for (unsigned i = 0; i != Globals.size(); ++i) |
| 125 | if (Globals[i] != Concrete) { |
Reid Spencer | 518310c | 2004-07-18 00:44:37 +0000 | [diff] [blame] | 126 | Constant *Cast = ConstantExpr::getCast(Concrete, Globals[i]->getType()); |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 127 | Globals[i]->replaceAllUsesWith(Cast); |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 128 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 129 | // Since there are no uses of Old anymore, remove it from the module. |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 130 | M.getGlobalList().erase(cast<GlobalVariable>(Globals[i])); |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 131 | |
| 132 | ++NumGlobals; |
| 133 | Changed = true; |
| 134 | } |
| 135 | return Changed; |
| 136 | } |
| 137 | |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 138 | // Check to see if all of the callers of F ignore the return value. |
| 139 | static bool CallersAllIgnoreReturnValue(Function &F) { |
| 140 | if (F.getReturnType() == Type::VoidTy) return true; |
| 141 | for (Value::use_iterator I = F.use_begin(), E = F.use_end(); I != E; ++I) { |
Reid Spencer | 518310c | 2004-07-18 00:44:37 +0000 | [diff] [blame] | 142 | if (GlobalValue *GV = dyn_cast<GlobalValue>(*I)) { |
| 143 | for (Value::use_iterator I = GV->use_begin(), E = GV->use_end(); |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 144 | I != E; ++I) { |
| 145 | CallSite CS = CallSite::get(*I); |
| 146 | if (!CS.getInstruction() || !CS.getInstruction()->use_empty()) |
| 147 | return false; |
| 148 | } |
| 149 | } else { |
| 150 | CallSite CS = CallSite::get(*I); |
| 151 | if (!CS.getInstruction() || !CS.getInstruction()->use_empty()) |
| 152 | return false; |
| 153 | } |
| 154 | } |
| 155 | return true; |
| 156 | } |
| 157 | |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 158 | static bool ProcessGlobalsWithSameName(Module &M, TargetData &TD, |
Chris Lattner | da902ba | 2003-01-30 18:22:32 +0000 | [diff] [blame] | 159 | std::vector<GlobalValue*> &Globals) { |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 160 | assert(!Globals.empty() && "Globals list shouldn't be empty here!"); |
| 161 | |
| 162 | bool isFunction = isa<Function>(Globals[0]); // Is this group all functions? |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 163 | GlobalValue *Concrete = 0; // The most concrete implementation to resolve to |
| 164 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 165 | for (unsigned i = 0; i != Globals.size(); ) { |
| 166 | if (isa<Function>(Globals[i]) != isFunction) { |
| 167 | std::cerr << "WARNING: Found function and global variable with the " |
| 168 | << "same name: '" << Globals[i]->getName() << "'.\n"; |
| 169 | return false; // Don't know how to handle this, bail out! |
| 170 | } |
| 171 | |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 172 | if (isFunction) { |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 173 | // For functions, we look to merge functions definitions of "int (...)" |
| 174 | // to 'int (int)' or 'int ()' or whatever else is not completely generic. |
| 175 | // |
| 176 | Function *F = cast<Function>(Globals[i]); |
Chris Lattner | 6f23963 | 2002-11-08 00:38:20 +0000 | [diff] [blame] | 177 | if (!F->isExternal()) { |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 178 | if (Concrete && !Concrete->isExternal()) |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 179 | return false; // Found two different functions types. Can't choose! |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 180 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 181 | Concrete = Globals[i]; |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 182 | } else if (Concrete) { |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 183 | if (Concrete->isExternal()) // If we have multiple external symbols... |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 184 | if (F->getFunctionType()->getNumParams() > |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 185 | cast<Function>(Concrete)->getFunctionType()->getNumParams()) |
| 186 | Concrete = F; // We are more concrete than "Concrete"! |
| 187 | |
| 188 | } else { |
| 189 | Concrete = F; |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 190 | } |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 191 | } else { |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 192 | GlobalVariable *GV = cast<GlobalVariable>(Globals[i]); |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 193 | if (!GV->isExternal()) { |
| 194 | if (Concrete) { |
| 195 | std::cerr << "WARNING: Two global variables with external linkage" |
| 196 | << " exist with the same name: '" << GV->getName() |
| 197 | << "'!\n"; |
| 198 | return false; |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 199 | } |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 200 | Concrete = GV; |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 201 | } |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 202 | } |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 203 | ++i; |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 204 | } |
| 205 | |
| 206 | if (Globals.size() > 1) { // Found a multiply defined global... |
Chris Lattner | c16e631 | 2003-05-31 21:57:06 +0000 | [diff] [blame] | 207 | // If there are no external declarations, and there is at most one |
| 208 | // externally visible instance of the global, then there is nothing to do. |
| 209 | // |
| 210 | bool HasExternal = false; |
| 211 | unsigned NumInstancesWithExternalLinkage = 0; |
| 212 | |
| 213 | for (unsigned i = 0, e = Globals.size(); i != e; ++i) { |
| 214 | if (Globals[i]->isExternal()) |
| 215 | HasExternal = true; |
| 216 | else if (!Globals[i]->hasInternalLinkage()) |
| 217 | NumInstancesWithExternalLinkage++; |
| 218 | } |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 219 | |
Chris Lattner | c16e631 | 2003-05-31 21:57:06 +0000 | [diff] [blame] | 220 | if (!HasExternal && NumInstancesWithExternalLinkage <= 1) |
| 221 | return false; // Nothing to do? Must have multiple internal definitions. |
| 222 | |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 223 | // There are a couple of special cases we don't want to print the warning |
| 224 | // for, check them now. |
| 225 | bool DontPrintWarning = false; |
| 226 | if (Concrete && Globals.size() == 2) { |
| 227 | GlobalValue *Other = Globals[Globals[0] == Concrete]; |
| 228 | // If the non-concrete global is a function which takes (...) arguments, |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 229 | // and the return values match (or was never used), do not warn. |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 230 | if (Function *ConcreteF = dyn_cast<Function>(Concrete)) |
| 231 | if (Function *OtherF = dyn_cast<Function>(Other)) |
Chris Lattner | 03fb8b2 | 2003-11-20 21:21:31 +0000 | [diff] [blame] | 232 | if ((ConcreteF->getReturnType() == OtherF->getReturnType() || |
| 233 | CallersAllIgnoreReturnValue(*OtherF)) && |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 234 | OtherF->getFunctionType()->isVarArg() && |
Chris Lattner | d5d8996 | 2004-02-09 04:14:01 +0000 | [diff] [blame] | 235 | OtherF->getFunctionType()->getNumParams() == 0) |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 236 | DontPrintWarning = true; |
Misha Brukman | fd93908 | 2005-04-21 23:48:37 +0000 | [diff] [blame] | 237 | |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 238 | // Otherwise, if the non-concrete global is a global array variable with a |
| 239 | // size of 0, and the concrete global is an array with a real size, don't |
| 240 | // warn. This occurs due to declaring 'extern int A[];'. |
| 241 | if (GlobalVariable *ConcreteGV = dyn_cast<GlobalVariable>(Concrete)) |
Chris Lattner | 4e4c444 | 2004-08-20 00:30:39 +0000 | [diff] [blame] | 242 | if (GlobalVariable *OtherGV = dyn_cast<GlobalVariable>(Other)) { |
| 243 | const Type *CTy = ConcreteGV->getType(); |
| 244 | const Type *OTy = OtherGV->getType(); |
| 245 | |
| 246 | if (CTy->isSized()) |
| 247 | if (!OTy->isSized() || !TD.getTypeSize(OTy) || |
| 248 | TD.getTypeSize(OTy) == TD.getTypeSize(CTy)) |
| 249 | DontPrintWarning = true; |
| 250 | } |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 251 | } |
Chris Lattner | c16e631 | 2003-05-31 21:57:06 +0000 | [diff] [blame] | 252 | |
Chris Lattner | 23367a7 | 2004-09-30 00:12:29 +0000 | [diff] [blame] | 253 | if (0 && !DontPrintWarning) { |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 254 | std::cerr << "WARNING: Found global types that are not compatible:\n"; |
| 255 | for (unsigned i = 0; i < Globals.size(); ++i) { |
Chris Lattner | 143df9a | 2003-11-20 18:19:35 +0000 | [diff] [blame] | 256 | std::cerr << "\t"; |
| 257 | WriteTypeSymbolic(std::cerr, Globals[i]->getType(), &M); |
| 258 | std::cerr << " %" << Globals[i]->getName() << "\n"; |
Chris Lattner | ce9431955 | 2003-10-22 23:03:38 +0000 | [diff] [blame] | 259 | } |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 260 | } |
| 261 | |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 262 | if (!Concrete) |
| 263 | Concrete = Globals[0]; |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 264 | else if (GlobalVariable *GV = dyn_cast<GlobalVariable>(Concrete)) { |
| 265 | // Handle special case hack to change globals if it will make their types |
| 266 | // happier in the long run. The situation we do this is intentionally |
| 267 | // extremely limited. |
| 268 | if (GV->use_empty() && GV->hasInitializer() && |
| 269 | GV->getInitializer()->isNullValue()) { |
| 270 | // Check to see if there is another (external) global with the same size |
| 271 | // and a non-empty use-list. If so, we will make IT be the real |
| 272 | // implementation. |
| 273 | unsigned TS = TD.getTypeSize(Concrete->getType()->getElementType()); |
| 274 | for (unsigned i = 0, e = Globals.size(); i != e; ++i) |
| 275 | if (Globals[i] != Concrete && !Globals[i]->use_empty() && |
| 276 | isa<GlobalVariable>(Globals[i]) && |
| 277 | TD.getTypeSize(Globals[i]->getType()->getElementType()) == TS) { |
| 278 | // At this point we want to replace Concrete with Globals[i]. Make |
| 279 | // concrete external, and Globals[i] have an initializer. |
| 280 | GlobalVariable *NGV = cast<GlobalVariable>(Globals[i]); |
| 281 | const Type *ElTy = NGV->getType()->getElementType(); |
| 282 | NGV->setInitializer(Constant::getNullValue(ElTy)); |
| 283 | cast<GlobalVariable>(Concrete)->setInitializer(0); |
| 284 | Concrete = NGV; |
| 285 | break; |
| 286 | } |
| 287 | } |
| 288 | } |
Chris Lattner | 5858e1e | 2003-10-21 23:17:56 +0000 | [diff] [blame] | 289 | |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 290 | if (isFunction) |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 291 | return ResolveFunctions(M, Globals, cast<Function>(Concrete)); |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 292 | else |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 293 | return ResolveGlobalVariables(M, Globals, |
| 294 | cast<GlobalVariable>(Concrete)); |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 295 | } |
Chris Lattner | ea2294a | 2003-04-19 00:15:27 +0000 | [diff] [blame] | 296 | return false; |
Chris Lattner | a45ec54 | 2002-10-09 21:10:06 +0000 | [diff] [blame] | 297 | } |
| 298 | |
Chris Lattner | b12914b | 2004-09-20 04:48:05 +0000 | [diff] [blame] | 299 | bool FunctionResolvingPass::runOnModule(Module &M) { |
Chris Lattner | da902ba | 2003-01-30 18:22:32 +0000 | [diff] [blame] | 300 | std::map<std::string, std::vector<GlobalValue*> > Globals; |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 301 | |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 302 | // Loop over the globals, adding them to the Globals map. We use a two pass |
| 303 | // algorithm here to avoid problems with iterators getting invalidated if we |
| 304 | // did a one pass scheme. |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 305 | // |
Chris Lattner | 6be5e56 | 2003-10-22 04:43:18 +0000 | [diff] [blame] | 306 | bool Changed = false; |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 307 | for (Module::iterator I = M.begin(), E = M.end(); I != E; ) { |
| 308 | Function *F = I++; |
Chris Lattner | 6be5e56 | 2003-10-22 04:43:18 +0000 | [diff] [blame] | 309 | if (F->use_empty() && F->isExternal()) { |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 310 | M.getFunctionList().erase(F); |
Chris Lattner | 6be5e56 | 2003-10-22 04:43:18 +0000 | [diff] [blame] | 311 | Changed = true; |
Chris Lattner | e5ad50b | 2004-06-18 05:50:48 +0000 | [diff] [blame] | 312 | } else if (!F->hasInternalLinkage() && !F->getName().empty() && |
| 313 | !F->getIntrinsicID()) |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 314 | Globals[F->getName()].push_back(F); |
| 315 | } |
| 316 | |
Chris Lattner | e4d5c44 | 2005-03-15 04:54:21 +0000 | [diff] [blame] | 317 | for (Module::global_iterator I = M.global_begin(), E = M.global_end(); I != E; ) { |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 318 | GlobalVariable *GV = I++; |
Chris Lattner | 6be5e56 | 2003-10-22 04:43:18 +0000 | [diff] [blame] | 319 | if (GV->use_empty() && GV->isExternal()) { |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 320 | M.getGlobalList().erase(GV); |
Chris Lattner | 6be5e56 | 2003-10-22 04:43:18 +0000 | [diff] [blame] | 321 | Changed = true; |
| 322 | } else if (!GV->hasInternalLinkage() && !GV->getName().empty()) |
Chris Lattner | 4cb766a | 2003-10-22 04:42:20 +0000 | [diff] [blame] | 323 | Globals[GV->getName()].push_back(GV); |
| 324 | } |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 325 | |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 326 | TargetData &TD = getAnalysis<TargetData>(); |
| 327 | |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 328 | // Now we have a list of all functions with a particular name. If there is |
| 329 | // more than one entry in a list, merge the functions together. |
| 330 | // |
Chris Lattner | da902ba | 2003-01-30 18:22:32 +0000 | [diff] [blame] | 331 | for (std::map<std::string, std::vector<GlobalValue*> >::iterator |
| 332 | I = Globals.begin(), E = Globals.end(); I != E; ++I) |
Chris Lattner | efd47ba | 2003-10-22 03:35:34 +0000 | [diff] [blame] | 333 | Changed |= ProcessGlobalsWithSameName(M, TD, I->second); |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 334 | |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 335 | // Now loop over all of the globals, checking to see if any are trivially |
| 336 | // dead. If so, remove them now. |
| 337 | |
| 338 | for (Module::iterator I = M.begin(), E = M.end(); I != E; ) |
| 339 | if (I->isExternal() && I->use_empty()) { |
| 340 | Function *F = I; |
| 341 | ++I; |
| 342 | M.getFunctionList().erase(F); |
| 343 | ++NumResolved; |
| 344 | Changed = true; |
| 345 | } else { |
| 346 | ++I; |
| 347 | } |
| 348 | |
Chris Lattner | e4d5c44 | 2005-03-15 04:54:21 +0000 | [diff] [blame] | 349 | for (Module::global_iterator I = M.global_begin(), E = M.global_end(); I != E; ) |
Chris Lattner | a2b8d7b | 2002-11-10 03:36:55 +0000 | [diff] [blame] | 350 | if (I->isExternal() && I->use_empty()) { |
| 351 | GlobalVariable *GV = I; |
| 352 | ++I; |
| 353 | M.getGlobalList().erase(GV); |
| 354 | ++NumGlobals; |
| 355 | Changed = true; |
| 356 | } else { |
| 357 | ++I; |
| 358 | } |
| 359 | |
Chris Lattner | 22ee3eb | 2002-05-24 20:42:13 +0000 | [diff] [blame] | 360 | return Changed; |
| 361 | } |