tools/llvm-ar/Archive.cpp

   1 //===-- Archive.cpp - Generic LLVM archive functions ------------*- C++ -*-===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file contains the implementation of the Archive and ArchiveMember
  11 // classes that is common to both reading and writing archives..
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "Archive.h"
  16 #include "ArchiveInternals.h"
  17 #include "llvm/Bitcode/ReaderWriter.h"
  18 #include "llvm/IR/Module.h"
  19 #include "llvm/Support/FileSystem.h"
  20 #include "llvm/Support/MemoryBuffer.h"
  21 #include "llvm/Support/Process.h"
  22 #include "llvm/Support/system_error.h"
  23 #include <cstring>
  24 #include <memory>
  25 using namespace llvm;
  26
  27 // getMemberSize - compute the actual physical size of the file member as seen
  28 // on disk. This isn't the size of member's payload. Use getSize() for that.
  29 unsigned
  30 ArchiveMember::getMemberSize() const {
  31   // Basically its the file size plus the header size
  32   unsigned result =  info.fileSize + sizeof(ArchiveMemberHeader);
  33
  34   // If it has a long filename, include the name length
  35   if (hasLongFilename())
  36     result += path.length() + 1;
  37
  38   // If its now odd lengthed, include the padding byte
  39   if (result % 2 != 0 )
  40     result++;
  41
  42   return result;
  43 }
  44
  45 // This default constructor is only use by the ilist when it creates its
  46 // sentry node. We give it specific static values to make it stand out a bit.
  47 ArchiveMember::ArchiveMember()
  48   : parent(0), path("--invalid--"), flags(0), data(0)
  49 {
  50   info.user = sys::Process::GetCurrentUserId();
  51   info.group = sys::Process::GetCurrentGroupId();
  52   info.mode = 0777;
  53   info.fileSize = 0;
  54   info.modTime = sys::TimeValue::now();
  55 }
  56
  57 // This is the constructor that the Archive class uses when it is building or
  58 // reading an archive. It just defaults a few things and ensures the parent is
  59 // set for the iplist. The Archive class fills in the ArchiveMember's data.
  60 // This is required because correctly setting the data may depend on other
  61 // things in the Archive.
  62 ArchiveMember::ArchiveMember(Archive* PAR)
  63   : parent(PAR), path(), flags(0), data(0)
  64 {
  65 }
  66
  67 // This method allows an ArchiveMember to be replaced with the data for a
  68 // different file, presumably as an update to the member. It also makes sure
  69 // the flags are reset correctly.
  70 bool ArchiveMember::replaceWith(StringRef newFile, std::string* ErrMsg) {
  71   bool Exists;
  72   if (sys::fs::exists(newFile.str(), Exists) || !Exists) {
  73     if (ErrMsg)
  74       *ErrMsg = "Can not replace an archive member with a non-existent file";
  75     return true;
  76   }
  77
  78   data = 0;
  79   path = newFile.str();
  80
  81   // SVR4 symbol tables have an empty name
  82   if (path == ARFILE_SVR4_SYMTAB_NAME)
  83     flags |= SVR4SymbolTableFlag;
  84   else
  85     flags &= ~SVR4SymbolTableFlag;
  86
  87   // BSD4.4 symbol tables have a special name
  88   if (path == ARFILE_BSD4_SYMTAB_NAME)
  89     flags |= BSD4SymbolTableFlag;
  90   else
  91     flags &= ~BSD4SymbolTableFlag;
  92
  93   // String table name
  94   if (path == ARFILE_STRTAB_NAME)
  95     flags |= StringTableFlag;
  96   else
  97     flags &= ~StringTableFlag;
  98
  99   // If it has a slash then it has a path
 100   bool hasSlash = path.find('/') != std::string::npos;
 101   if (hasSlash)
 102     flags |= HasPathFlag;
 103   else
 104     flags &= ~HasPathFlag;
 105
 106   // If it has a slash or its over 15 chars then its a long filename format
 107   if (hasSlash || path.length() > 15)
 108     flags |= HasLongFilenameFlag;
 109   else
 110     flags &= ~HasLongFilenameFlag;
 111
 112   // Get the signature and status info
 113   const char* signature = (const char*) data;
 114   SmallString<4> magic;
 115   if (!signature) {
 116     sys::fs::get_magic(path, magic.capacity(), magic);
 117     signature = magic.c_str();
 118     sys::PathWithStatus PWS(path);
 119     const sys::FileStatus *FSinfo = PWS.getFileStatus(false, ErrMsg);
 120     if (FSinfo)
 121       info = *FSinfo;
 122     else
 123       return true;
 124   }
 125
 126   // Determine what kind of file it is.
 127   if (sys::fs::identify_magic(StringRef(signature, 4)) ==
 128       sys::fs::file_magic::bitcode)
 129     flags |= BitcodeFlag;
 130   else
 131     flags &= ~BitcodeFlag;
 132
 133   return false;
 134 }
 135
 136 // Archive constructor - this is the only constructor that gets used for the
 137 // Archive class. Everything else (default,copy) is deprecated. This just
 138 // initializes and maps the file into memory, if requested.
 139 Archive::Archive(StringRef filename, LLVMContext &C)
 140     : archPath(filename), members(), mapfile(0), base(0), symTab(), strtab(),
 141       symTabSize(0), firstFileOffset(0), modules(), foreignST(0), Context(C) {}
 142
 143 bool
 144 Archive::mapToMemory(std::string* ErrMsg) {
 145   OwningPtr<MemoryBuffer> File;
 146   if (error_code ec = MemoryBuffer::getFile(archPath.c_str(), File)) {
 147     if (ErrMsg)
 148       *ErrMsg = ec.message();
 149     return true;
 150   }
 151   mapfile = File.take();
 152   base = mapfile->getBufferStart();
 153   return false;
 154 }
 155
 156 void Archive::cleanUpMemory() {
 157   // Shutdown the file mapping
 158   delete mapfile;
 159   mapfile = 0;
 160   base = 0;
 161
 162   // Forget the entire symbol table
 163   symTab.clear();
 164   symTabSize = 0;
 165
 166   firstFileOffset = 0;
 167
 168   // Free the foreign symbol table member
 169   if (foreignST) {
 170     delete foreignST;
 171     foreignST = 0;
 172   }
 173
 174   // Delete any Modules and ArchiveMember's we've allocated as a result of
 175   // symbol table searches.
 176   for (ModuleMap::iterator I=modules.begin(), E=modules.end(); I != E; ++I ) {
 177     delete I->second.first;
 178     delete I->second.second;
 179   }
 180 }
 181
 182 // Archive destructor - just clean up memory
 183 Archive::~Archive() {
 184   cleanUpMemory();
 185 }
 186
 187
 188
 189 static void getSymbols(Module*M, std::vector<std::string>& symbols) {
 190   // Loop over global variables
 191   for (Module::global_iterator GI = M->global_begin(), GE=M->global_end(); GI != GE; ++GI)
 192     if (!GI->isDeclaration() && !GI->hasLocalLinkage())
 193       if (!GI->getName().empty())
 194         symbols.push_back(GI->getName());
 195
 196   // Loop over functions
 197   for (Module::iterator FI = M->begin(), FE = M->end(); FI != FE; ++FI)
 198     if (!FI->isDeclaration() && !FI->hasLocalLinkage())
 199       if (!FI->getName().empty())
 200         symbols.push_back(FI->getName());
 201
 202   // Loop over aliases
 203   for (Module::alias_iterator AI = M->alias_begin(), AE = M->alias_end();
 204        AI != AE; ++AI) {
 205     if (AI->hasName())
 206       symbols.push_back(AI->getName());
 207   }
 208 }
 209
 210 // Get just the externally visible defined symbols from the bitcode
 211 bool llvm::GetBitcodeSymbols(const sys::Path& fName,
 212                              LLVMContext& Context,
 213                              std::vector<std::string>& symbols,
 214                              std::string* ErrMsg) {
 215   OwningPtr<MemoryBuffer> Buffer;
 216   if (error_code ec = MemoryBuffer::getFileOrSTDIN(fName.c_str(), Buffer)) {
 217     if (ErrMsg) *ErrMsg = "Could not open file '" + fName.str() + "'" + ": "
 218                         + ec.message();
 219     return true;
 220   }
 221
 222   Module *M = ParseBitcodeFile(Buffer.get(), Context, ErrMsg);
 223   if (!M)
 224     return true;
 225
 226   // Get the symbols
 227   getSymbols(M, symbols);
 228
 229   // Done with the module.
 230   delete M;
 231   return true;
 232 }
 233
 234 Module*
 235 llvm::GetBitcodeSymbols(const char *BufPtr, unsigned Length,
 236                         const std::string& ModuleID,
 237                         LLVMContext& Context,
 238                         std::vector<std::string>& symbols,
 239                         std::string* ErrMsg) {
 240   // Get the module.
 241   OwningPtr<MemoryBuffer> Buffer(
 242     MemoryBuffer::getMemBufferCopy(StringRef(BufPtr, Length),ModuleID.c_str()));
 243
 244   Module *M = ParseBitcodeFile(Buffer.get(), Context, ErrMsg);
 245   if (!M)
 246     return 0;
 247
 248   // Get the symbols
 249   getSymbols(M, symbols);
 250
 251   // Done with the module. Note that it's the caller's responsibility to delete
 252   // the Module.
 253   return M;
 254 }