tools/yaml2obj/yaml2elf.cpp

   1 //===- yaml2elf - Convert YAML to a ELF object file -----------------------===//
   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 /// \file
  11 /// \brief The ELF component of yaml2obj.
  12 ///
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "yaml2obj.h"
  16 #include "llvm/Object/ELF.h"
  17 #include "llvm/Object/ELFYAML.h"
  18 #include "llvm/Support/ELF.h"
  19 #include "llvm/Support/MemoryBuffer.h"
  20 #include "llvm/Support/YAMLTraits.h"
  21 #include "llvm/Support/raw_ostream.h"
  22
  23 using namespace llvm;
  24
  25 // There is similar code in yaml2coff, but with some slight COFF-specific
  26 // variations like different initial state. Might be able to deduplicate
  27 // some day, but also want to make sure that the Mach-O use case is served.
  28 //
  29 // This class has a deliberately small interface, since a lot of
  30 // implementation variation is possible.
  31 //
  32 // TODO: Use an ordered container with a suffix-based comparison in order
  33 // to deduplicate suffixes. std::map<> with a custom comparator is likely
  34 // to be the simplest implementation, but a suffix trie could be more
  35 // suitable for the job.
  36 namespace {
  37 class StringTableBuilder {
  38   /// \brief Indices of strings currently present in `Buf`.
  39   StringMap<unsigned> StringIndices;
  40   /// \brief The contents of the string table as we build it.
  41   std::string Buf;
  42 public:
  43   StringTableBuilder() {
  44     Buf.push_back('\0');
  45   }
  46   /// \returns Index of string in string table.
  47   unsigned addString(StringRef S) {
  48     StringMapEntry<unsigned> &Entry = StringIndices.GetOrCreateValue(S);
  49     unsigned &I = Entry.getValue();
  50     if (I != 0)
  51       return I;
  52     I = Buf.size();
  53     Buf.append(S.begin(), S.end());
  54     Buf.push_back('\0');
  55     return I;
  56   }
  57   size_t size() const {
  58     return Buf.size();
  59   }
  60   void writeToStream(raw_ostream &OS) {
  61     OS.write(Buf.data(), Buf.size());
  62   }
  63 };
  64 } // end anonymous namespace
  65
  66 // This class is used to build up a contiguous binary blob while keeping
  67 // track of an offset in the output (which notionally begins at
  68 // `InitialOffset`).
  69 namespace {
  70 class ContiguousBlobAccumulator {
  71   const uint64_t InitialOffset;
  72   raw_svector_ostream OS;
  73
  74 public:
  75   ContiguousBlobAccumulator(uint64_t InitialOffset_, SmallVectorImpl<char> &Buf)
  76       : InitialOffset(InitialOffset_), OS(Buf) {}
  77   raw_ostream &getOS() { return OS; }
  78   uint64_t currentOffset() const { return InitialOffset + OS.tell(); }
  79   void writeBlobToStream(raw_ostream &Out) { Out << OS.str(); }
  80 };
  81 } // end anonymous namespace
  82
  83 // Used to keep track of section names, so that in the YAML file sections
  84 // can be referenced by name instead of by index.
  85 namespace {
  86 class SectionNameToIdxMap {
  87   StringMap<int> Map;
  88 public:
  89   /// \returns true if name is already present in the map.
  90   bool addName(StringRef SecName, unsigned i) {
  91     StringMapEntry<int> &Entry = Map.GetOrCreateValue(SecName, -1);
  92     if (Entry.getValue() != -1)
  93       return true;
  94     Entry.setValue((int)i);
  95     return false;
  96   }
  97   /// \returns true if name is not present in the map
  98   bool lookupSection(StringRef SecName, unsigned &Idx) const {
  99     StringMap<int>::const_iterator I = Map.find(SecName);
 100     if (I == Map.end())
 101       return true;
 102     Idx = I->getValue();
 103     return false;
 104   }
 105 };
 106 } // end anonymous namespace
 107
 108 template <class T>
 109 static size_t vectorDataSize(const std::vector<T> &Vec) {
 110   return Vec.size() * sizeof(T);
 111 }
 112
 113 template <class T>
 114 static void writeVectorData(raw_ostream &OS, const std::vector<T> &Vec) {
 115   OS.write((const char *)Vec.data(), vectorDataSize(Vec));
 116 }
 117
 118 template <class T>
 119 static void zero(T &Obj) {
 120   memset(&Obj, 0, sizeof(Obj));
 121 }
 122
 123 /// \brief Create a string table in `SHeader`, which we assume is already
 124 /// zero'd.
 125 template <class Elf_Shdr>
 126 static void createStringTableSectionHeader(Elf_Shdr &SHeader,
 127                                            StringTableBuilder &STB,
 128                                            ContiguousBlobAccumulator &CBA) {
 129   SHeader.sh_type = ELF::SHT_STRTAB;
 130   SHeader.sh_offset = CBA.currentOffset();
 131   SHeader.sh_size = STB.size();
 132   STB.writeToStream(CBA.getOS());
 133   SHeader.sh_addralign = 1;
 134 }
 135
 136 // FIXME: This function is hideous. Between the sheer number of parameters
 137 // and the hideous ELF typenames, it's just a travesty. Factor the ELF
 138 // output into a class (templated on ELFT) and share some typedefs.
 139 template <class ELFT>
 140 static void handleSymtabSectionHeader(
 141     const ELFYAML::Section &Sec,
 142     typename object::ELFObjectFile<ELFT>::Elf_Shdr &SHeader,
 143     StringTableBuilder &StrTab, ContiguousBlobAccumulator &CBA,
 144     unsigned DotStrtabSecNo) {
 145
 146   typedef typename object::ELFObjectFile<ELFT>::Elf_Sym Elf_Sym;
 147   // TODO: Ensure that a manually specified `Link` field is diagnosed as an
 148   // error for SHT_SYMTAB.
 149   SHeader.sh_link = DotStrtabSecNo;
 150   // TODO: Once we handle symbol binding, this should be one greater than
 151   // symbol table index of the last local symbol.
 152   SHeader.sh_info = 0;
 153   SHeader.sh_entsize = sizeof(Elf_Sym);
 154
 155   std::vector<Elf_Sym> Syms;
 156   {
 157     // Ensure STN_UNDEF is present
 158     Elf_Sym Sym;
 159     zero(Sym);
 160     Syms.push_back(Sym);
 161   }
 162   for (unsigned i = 0, e = Sec.Symbols.size(); i != e; ++i) {
 163     const ELFYAML::Symbol &Sym = Sec.Symbols[i];
 164     Elf_Sym Symbol;
 165     zero(Symbol);
 166     if (!Sym.Name.empty())
 167       Symbol.st_name = StrTab.addString(Sym.Name);
 168     Symbol.setBindingAndType(Sym.Binding, Sym.Type);
 169     Syms.push_back(Symbol);
 170   }
 171
 172   SHeader.sh_offset = CBA.currentOffset();
 173   SHeader.sh_size = vectorDataSize(Syms);
 174   writeVectorData(CBA.getOS(), Syms);
 175 }
 176
 177 template <class ELFT>
 178 static int writeELF(raw_ostream &OS, const ELFYAML::Object &Doc) {
 179   using namespace llvm::ELF;
 180   using namespace llvm::object;
 181   typedef typename ELFObjectFile<ELFT>::Elf_Ehdr Elf_Ehdr;
 182   typedef typename ELFObjectFile<ELFT>::Elf_Shdr Elf_Shdr;
 183
 184   const ELFYAML::FileHeader &Hdr = Doc.Header;
 185
 186   Elf_Ehdr Header;
 187   zero(Header);
 188   Header.e_ident[EI_MAG0] = 0x7f;
 189   Header.e_ident[EI_MAG1] = 'E';
 190   Header.e_ident[EI_MAG2] = 'L';
 191   Header.e_ident[EI_MAG3] = 'F';
 192   Header.e_ident[EI_CLASS] = ELFT::Is64Bits ? ELFCLASS64 : ELFCLASS32;
 193   bool IsLittleEndian = ELFT::TargetEndianness == support::little;
 194   Header.e_ident[EI_DATA] = IsLittleEndian ? ELFDATA2LSB : ELFDATA2MSB;
 195   Header.e_ident[EI_VERSION] = EV_CURRENT;
 196   Header.e_ident[EI_OSABI] = Hdr.OSABI;
 197   Header.e_ident[EI_ABIVERSION] = 0;
 198   Header.e_type = Hdr.Type;
 199   Header.e_machine = Hdr.Machine;
 200   Header.e_version = EV_CURRENT;
 201   Header.e_entry = Hdr.Entry;
 202   Header.e_ehsize = sizeof(Elf_Ehdr);
 203
 204   // TODO: Flesh out section header support.
 205   // TODO: Program headers.
 206
 207   Header.e_shentsize = sizeof(Elf_Shdr);
 208   // Immediately following the ELF header.
 209   Header.e_shoff = sizeof(Header);
 210   const std::vector<ELFYAML::Section> &Sections = Doc.Sections;
 211   // "+ 3" for
 212   // - SHT_NULL entry (placed first, i.e. 0'th entry)
 213   // - string table (.strtab) (placed second to last)
 214   // - section header string table. (placed last)
 215   Header.e_shnum = Sections.size() + 3;
 216   // Place section header string table last.
 217   Header.e_shstrndx = Header.e_shnum - 1;
 218   const unsigned DotStrtabSecNo = Header.e_shnum - 2;
 219
 220   SectionNameToIdxMap SN2I;
 221   for (unsigned i = 0, e = Sections.size(); i != e; ++i) {
 222     StringRef Name = Sections[i].Name;
 223     if (Name.empty())
 224       continue;
 225     // "+ 1" to take into account the SHT_NULL entry.
 226     if (SN2I.addName(Name, i + 1)) {
 227       errs() << "error: Repeated section name: '" << Name
 228              << "' at YAML section number " << i << ".\n";
 229       return 1;
 230     }
 231   }
 232
 233   StringTableBuilder SHStrTab;
 234   SmallVector<char, 128> Buf;
 235   // XXX: This offset is tightly coupled with the order that we write
 236   // things to `OS`.
 237   const size_t SectionContentBeginOffset =
 238       Header.e_ehsize + Header.e_shentsize * Header.e_shnum;
 239   ContiguousBlobAccumulator CBA(SectionContentBeginOffset, Buf);
 240   std::vector<Elf_Shdr> SHeaders;
 241   {
 242     // Ensure SHN_UNDEF entry is present. An all-zero section header is a
 243     // valid SHN_UNDEF entry since SHT_NULL == 0.
 244     Elf_Shdr SHdr;
 245     zero(SHdr);
 246     SHeaders.push_back(SHdr);
 247   }
 248   StringTableBuilder DotStrTab;
 249   for (unsigned i = 0, e = Sections.size(); i != e; ++i) {
 250     const ELFYAML::Section &Sec = Sections[i];
 251     Elf_Shdr SHeader;
 252     zero(SHeader);
 253     SHeader.sh_name = SHStrTab.addString(Sec.Name);
 254     SHeader.sh_type = Sec.Type;
 255     SHeader.sh_flags = Sec.Flags;
 256     SHeader.sh_addr = Sec.Address;
 257
 258     SHeader.sh_offset = CBA.currentOffset();
 259     SHeader.sh_size = Sec.Content.binary_size();
 260     Sec.Content.writeAsBinary(CBA.getOS());
 261
 262     if (!Sec.Link.empty()) {
 263       unsigned Index;
 264       if (SN2I.lookupSection(Sec.Link, Index)) {
 265         errs() << "error: Unknown section referenced: '" << Sec.Link
 266                << "' at YAML section number " << i << ".\n";
 267         return 1;
 268       }
 269       SHeader.sh_link = Index;
 270     }
 271     SHeader.sh_info = 0;
 272     SHeader.sh_addralign = Sec.AddressAlign;
 273     SHeader.sh_entsize = 0;
 274     // XXX: Really ugly right now. Need to put common state into a class.
 275     if (Sec.Type == ELFYAML::ELF_SHT(SHT_SYMTAB))
 276       handleSymtabSectionHeader<ELFT>(Sec, SHeader, DotStrTab, CBA,
 277                                       DotStrtabSecNo);
 278     SHeaders.push_back(SHeader);
 279   }
 280
 281   // .strtab string table header.
 282   Elf_Shdr DotStrTabSHeader;
 283   zero(DotStrTabSHeader);
 284   DotStrTabSHeader.sh_name = SHStrTab.addString(StringRef(".strtab"));
 285   createStringTableSectionHeader(DotStrTabSHeader, DotStrTab, CBA);
 286
 287   // Section header string table header.
 288   Elf_Shdr SHStrTabSHeader;
 289   zero(SHStrTabSHeader);
 290   createStringTableSectionHeader(SHStrTabSHeader, SHStrTab, CBA);
 291
 292   OS.write((const char *)&Header, sizeof(Header));
 293   writeVectorData(OS, SHeaders);
 294   OS.write((const char *)&DotStrTabSHeader, sizeof(DotStrTabSHeader));
 295   OS.write((const char *)&SHStrTabSHeader, sizeof(SHStrTabSHeader));
 296   CBA.writeBlobToStream(OS);
 297   return 0;
 298 }
 299
 300 int yaml2elf(llvm::raw_ostream &Out, llvm::MemoryBuffer *Buf) {
 301   yaml::Input YIn(Buf->getBuffer());
 302   ELFYAML::Object Doc;
 303   YIn >> Doc;
 304   if (YIn.error()) {
 305     errs() << "yaml2obj: Failed to parse YAML file!\n";
 306     return 1;
 307   }
 308   if (Doc.Header.Class == ELFYAML::ELF_ELFCLASS(ELF::ELFCLASS64)) {
 309     if (Doc.Header.Data == ELFYAML::ELF_ELFDATA(ELF::ELFDATA2LSB))
 310       return writeELF<object::ELFType<support::little, 8, true> >(outs(), Doc);
 311     else
 312       return writeELF<object::ELFType<support::big, 8, true> >(outs(), Doc);
 313   } else {
 314     if (Doc.Header.Data == ELFYAML::ELF_ELFDATA(ELF::ELFDATA2LSB))
 315       return writeELF<object::ELFType<support::little, 4, false> >(outs(), Doc);
 316     else
 317       return writeELF<object::ELFType<support::big, 4, false> >(outs(), Doc);
 318   }
 319 }