lib/Target/SparcV9/EmitBytecodeToAssembly.cpp

   1 //===-- EmitBytecodeToAssembly.cpp - Emit bytecode to Sparc .s File --------==//
   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 //===----------------------------------------------------------------------===//
   9 //
  10 // This file implements the pass that writes LLVM bytecode as data to a sparc
  11 // assembly file.  The bytecode gets assembled into a special bytecode section
  12 // of the executable for use at runtime later.
  13 //
  14 //===----------------------------------------------------------------------===//
  15
  16 #include "SparcInternals.h"
  17 #include "llvm/Pass.h"
  18 #include "llvm/Bytecode/Writer.h"
  19 #include <iostream>
  20
  21 using std::ostream;
  22
  23 namespace {
  24
  25   // sparcasmbuf - stream buf for encoding output bytes as .byte directives for
  26   // the sparc assembler.
  27   //
  28   class sparcasmbuf : public std::streambuf {
  29     std::ostream &BaseStr;
  30   public:
  31     typedef char           char_type;
  32     typedef int            int_type;
  33     typedef std::streampos pos_type;
  34     typedef std::streamoff off_type;
  35
  36     sparcasmbuf(std::ostream &On) : BaseStr(On) {}
  37
  38     virtual int_type overflow(int_type C) {
  39       if (C != EOF)
  40         BaseStr << "\t.byte " << C << "\n"; // Output C;
  41       return C;
  42     }
  43   };
  44
  45
  46   // osparcasmstream - Define an ostream implementation that uses a sparcasmbuf
  47   // as the underlying streambuf to write the data to.  This streambuf formats
  48   // the output as .byte directives for sparc output.
  49   //
  50   class osparcasmstream : public std::ostream {
  51     sparcasmbuf sb;
  52   public:
  53     typedef char           char_type;
  54     typedef int            int_type;
  55     typedef std::streampos pos_type;
  56     typedef std::streamoff off_type;
  57
  58     explicit osparcasmstream(std::ostream &On) : std::ostream(&sb), sb(On) { }
  59
  60     sparcasmbuf *rdbuf() const {
  61       return const_cast<sparcasmbuf*>(&sb);
  62     }
  63   };
  64
  65   static void writePrologue (std::ostream &Out, const std::string &comment,
  66                              const std::string &symName) {
  67     // Prologue:
  68     // Output a comment describing the object.
  69     Out << "!" << comment << "\n";
  70     // Switch the current section to .rodata in the assembly output:
  71     Out << "\t.section \".rodata\"\n\t.align 8\n";
  72     // Output a global symbol naming the object:
  73     Out << "\t.global " << symName << "\n";
  74     Out << "\t.type " << symName << ",#object\n";
  75     Out << symName << ":\n";
  76   }
  77
  78   static void writeEpilogue (std::ostream &Out, const std::string &symName) {
  79     // Epilogue:
  80     // Output a local symbol marking the end of the object:
  81     Out << ".end_" << symName << ":\n";
  82     // Output size directive giving the size of the object:
  83     Out << "\t.size " << symName << ", .end_" << symName << "-" << symName
  84         << "\n";
  85   }
  86
  87   // SparcBytecodeWriter - Write bytecode out to a stream that is sparc'ified
  88   class SparcBytecodeWriter : public Pass {
  89     std::ostream &Out;
  90   public:
  91     SparcBytecodeWriter(std::ostream &out) : Out(out) {}
  92
  93     const char *getPassName() const { return "Emit Bytecode to Sparc Assembly";}
  94
  95     virtual bool run(Module &M) {
  96       // Write an object containing the bytecode to the SPARC assembly stream
  97       writePrologue (Out, "LLVM BYTECODE OUTPUT", "LLVMBytecode");
  98       osparcasmstream OS(Out);
  99       WriteBytecodeToFile(&M, OS);
 100       writeEpilogue (Out, "LLVMBytecode");
 101
 102       // Write an object containing its length as an integer to the
 103       // SPARC assembly stream
 104       writePrologue (Out, "LLVM BYTECODE LENGTH", "llvm_length");
 105       Out <<"\t.word\t.end_LLVMBytecode-LLVMBytecode\n";
 106       writeEpilogue (Out, "llvm_length");
 107
 108       return false;
 109     }
 110   };
 111 }  // end anonymous namespace
 112
 113 Pass *UltraSparc::getBytecodeAsmPrinterPass(std::ostream &Out) {
 114   return new SparcBytecodeWriter(Out);
 115 }