1 //===-- Module.cpp - Implement the Module class ---------------------------===//
3 // The LLVM Compiler Infrastructure
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.
8 //===----------------------------------------------------------------------===//
10 // This file implements the Module class for the VMCore library.
12 //===----------------------------------------------------------------------===//
14 #include "llvm/Module.h"
15 #include "llvm/InstrTypes.h"
16 #include "llvm/Constants.h"
17 #include "llvm/DerivedTypes.h"
18 #include "llvm/ADT/STLExtras.h"
19 #include "llvm/ADT/StringExtras.h"
20 #include "llvm/Support/LeakDetector.h"
21 #include "SymbolTableListTraitsImpl.h"
22 #include "llvm/TypeSymbolTable.h"
29 //===----------------------------------------------------------------------===//
30 // Methods to implement the globals and functions lists.
33 Function *ilist_traits<Function>::createSentinel() {
35 FunctionType::get(Type::VoidTy, std::vector<const Type*>(), false,
36 std::vector<FunctionType::ParameterAttributes>() );
37 Function *Ret = new Function(FTy, GlobalValue::ExternalLinkage);
38 // This should not be garbage monitored.
39 LeakDetector::removeGarbageObject(Ret);
42 GlobalVariable *ilist_traits<GlobalVariable>::createSentinel() {
43 GlobalVariable *Ret = new GlobalVariable(Type::Int32Ty, false,
44 GlobalValue::ExternalLinkage);
45 // This should not be garbage monitored.
46 LeakDetector::removeGarbageObject(Ret);
50 iplist<Function> &ilist_traits<Function>::getList(Module *M) {
51 return M->getFunctionList();
53 iplist<GlobalVariable> &ilist_traits<GlobalVariable>::getList(Module *M) {
54 return M->getGlobalList();
57 // Explicit instantiations of SymbolTableListTraits since some of the methods
58 // are not in the public header file.
59 template class SymbolTableListTraits<GlobalVariable, Module, Module>;
60 template class SymbolTableListTraits<Function, Module, Module>;
62 //===----------------------------------------------------------------------===//
63 // Primitive Module methods.
66 Module::Module(const std::string &MID)
67 : ModuleID(MID), DataLayout("") {
68 FunctionList.setItemParent(this);
69 FunctionList.setParent(this);
70 GlobalList.setItemParent(this);
71 GlobalList.setParent(this);
72 ValSymTab = new SymbolTable();
73 TypeSymTab = new TypeSymbolTable();
79 GlobalList.setParent(0);
81 FunctionList.setParent(0);
87 // Module::dump() - Allow printing from debugger
88 void Module::dump() const {
89 print(*cerr.stream());
92 /// Target endian information...
93 Module::Endianness Module::getEndianness() const {
94 std::string temp = DataLayout;
95 Module::Endianness ret = AnyEndianness;
97 while (!temp.empty()) {
98 std::string token = getToken(temp, "-");
100 if (token[0] == 'e') {
102 } else if (token[0] == 'E') {
110 void Module::setEndianness(Endianness E) {
111 if (!DataLayout.empty() && E != AnyEndianness)
114 if (E == LittleEndian)
116 else if (E == BigEndian)
120 /// Target Pointer Size information...
121 Module::PointerSize Module::getPointerSize() const {
122 std::string temp = DataLayout;
123 Module::PointerSize ret = AnyPointerSize;
125 while (!temp.empty()) {
126 std::string token = getToken(temp, "-");
127 char signal = getToken(token, ":")[0];
130 int size = atoi(getToken(token, ":").c_str());
141 void Module::setPointerSize(PointerSize PS) {
142 if (!DataLayout.empty() && PS != AnyPointerSize)
146 DataLayout += "p:32:32";
147 else if (PS == Pointer64)
148 DataLayout += "p:64:64";
151 //===----------------------------------------------------------------------===//
152 // Methods for easy access to the functions in the module.
155 Constant *Module::getOrInsertFunction(const std::string &Name,
156 const FunctionType *Ty) {
157 SymbolTable &SymTab = getValueSymbolTable();
159 // See if we have a definitions for the specified function already.
161 dyn_cast_or_null<Function>(SymTab.lookup(PointerType::get(Ty), Name));
164 Function *New = new Function(Ty, GlobalVariable::ExternalLinkage, Name);
165 FunctionList.push_back(New);
166 return New; // Return the new prototype.
169 // Okay, the function exists. Does it have externally visible linkage?
170 if (F->hasInternalLinkage()) {
171 // Rename the function.
172 F->setName(SymTab.getUniqueName(F->getType(), F->getName()));
173 // Retry, now there won't be a conflict.
174 return getOrInsertFunction(Name, Ty);
177 // If the function exists but has the wrong type, return a bitcast to the
179 if (F->getFunctionType() != Ty)
180 return ConstantExpr::getBitCast(F, PointerType::get(Ty));
182 // Otherwise, we just found the existing function or a prototype.
186 // getOrInsertFunction - Look up the specified function in the module symbol
187 // table. If it does not exist, add a prototype for the function and return it.
188 // This version of the method takes a null terminated list of function
189 // arguments, which makes it easier for clients to use.
191 Constant *Module::getOrInsertFunction(const std::string &Name,
192 const Type *RetTy, ...) {
194 va_start(Args, RetTy);
196 // Build the list of argument types...
197 std::vector<const Type*> ArgTys;
198 while (const Type *ArgTy = va_arg(Args, const Type*))
199 ArgTys.push_back(ArgTy);
203 // Build the function type and chain to the other getOrInsertFunction...
204 return getOrInsertFunction(Name, FunctionType::get(RetTy, ArgTys, false));
208 // getFunction - Look up the specified function in the module symbol table.
209 // If it does not exist, return null.
211 Function *Module::getFunction(const std::string &Name, const FunctionType *Ty) {
212 SymbolTable &SymTab = getValueSymbolTable();
213 return cast_or_null<Function>(SymTab.lookup(PointerType::get(Ty), Name));
217 /// getMainFunction - This function looks up main efficiently. This is such a
218 /// common case, that it is a method in Module. If main cannot be found, a
219 /// null pointer is returned.
221 Function *Module::getMainFunction() {
222 std::vector<const Type*> Params;
225 if (Function *F = getFunction("main", FunctionType::get(Type::Int32Ty,
229 // void main(void)...
230 if (Function *F = getFunction("main", FunctionType::get(Type::VoidTy,
234 Params.push_back(Type::Int32Ty);
236 // int main(int argc)...
237 if (Function *F = getFunction("main", FunctionType::get(Type::Int32Ty,
241 // void main(int argc)...
242 if (Function *F = getFunction("main", FunctionType::get(Type::VoidTy,
246 for (unsigned i = 0; i != 2; ++i) { // Check argv and envp
247 Params.push_back(PointerType::get(PointerType::get(Type::Int8Ty)));
249 // int main(int argc, char **argv)...
250 if (Function *F = getFunction("main", FunctionType::get(Type::Int32Ty,
254 // void main(int argc, char **argv)...
255 if (Function *F = getFunction("main", FunctionType::get(Type::VoidTy,
260 // Ok, try to find main the hard way...
261 return getNamedFunction("main");
264 /// getNamedFunction - Return the first function in the module with the
265 /// specified name, of arbitrary type. This method returns null if a function
266 /// with the specified name is not found.
268 Function *Module::getNamedFunction(const std::string &Name) const {
269 // Loop over all of the functions, looking for the function desired
270 const Function *Found = 0;
271 for (const_iterator I = begin(), E = end(); I != E; ++I)
272 if (I->getName() == Name)
276 return const_cast<Function*>(&(*I));
277 return const_cast<Function*>(Found); // Non-external function not found...
280 //===----------------------------------------------------------------------===//
281 // Methods for easy access to the global variables in the module.
284 /// getGlobalVariable - Look up the specified global variable in the module
285 /// symbol table. If it does not exist, return null. The type argument
286 /// should be the underlying type of the global, i.e., it should not have
287 /// the top-level PointerType, which represents the address of the global.
288 /// If AllowInternal is set to true, this function will return types that
289 /// have InternalLinkage. By default, these types are not returned.
291 GlobalVariable *Module::getGlobalVariable(const std::string &Name,
292 const Type *Ty, bool AllowInternal) {
293 if (Value *V = getValueSymbolTable().lookup(PointerType::get(Ty), Name)) {
294 GlobalVariable *Result = cast<GlobalVariable>(V);
295 if (AllowInternal || !Result->hasInternalLinkage())
301 /// getNamedGlobal - Return the first global variable in the module with the
302 /// specified name, of arbitrary type. This method returns null if a global
303 /// with the specified name is not found.
305 GlobalVariable *Module::getNamedGlobal(const std::string &Name) const {
306 // FIXME: This would be much faster with a symbol table that doesn't
307 // discriminate based on type!
308 for (const_global_iterator I = global_begin(), E = global_end();
310 if (I->getName() == Name)
311 return const_cast<GlobalVariable*>(&(*I));
317 //===----------------------------------------------------------------------===//
318 // Methods for easy access to the types in the module.
322 // addTypeName - Insert an entry in the symbol table mapping Str to Type. If
323 // there is already an entry for this name, true is returned and the symbol
324 // table is not modified.
326 bool Module::addTypeName(const std::string &Name, const Type *Ty) {
327 TypeSymbolTable &ST = getTypeSymbolTable();
329 if (ST.lookup(Name)) return true; // Already in symtab...
331 // Not in symbol table? Set the name with the Symtab as an argument so the
332 // type knows what to update...
338 /// getTypeByName - Return the type with the specified name in this module, or
339 /// null if there is none by that name.
340 const Type *Module::getTypeByName(const std::string &Name) const {
341 const TypeSymbolTable &ST = getTypeSymbolTable();
342 return cast_or_null<Type>(ST.lookup(Name));
345 // getTypeName - If there is at least one entry in the symbol table for the
346 // specified type, return it.
348 std::string Module::getTypeName(const Type *Ty) const {
349 const TypeSymbolTable &ST = getTypeSymbolTable();
351 TypeSymbolTable::const_iterator TI = ST.begin();
352 TypeSymbolTable::const_iterator TE = ST.end();
353 if ( TI == TE ) return ""; // No names for types
355 while (TI != TE && TI->second != Ty)
358 if (TI != TE) // Must have found an entry!
360 return ""; // Must not have found anything...
363 //===----------------------------------------------------------------------===//
364 // Other module related stuff.
368 // dropAllReferences() - This function causes all the subelementss to "let go"
369 // of all references that they are maintaining. This allows one to 'delete' a
370 // whole module at a time, even though there may be circular references... first
371 // all references are dropped, and all use counts go to zero. Then everything
372 // is deleted for real. Note that no operations are valid on an object that
373 // has "dropped all references", except operator delete.
375 void Module::dropAllReferences() {
376 for(Module::iterator I = begin(), E = end(); I != E; ++I)
377 I->dropAllReferences();
379 for(Module::global_iterator I = global_begin(), E = global_end(); I != E; ++I)
380 I->dropAllReferences();