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