Index: tools/pnacl-freeze/pnacl-freeze.cpp |
diff --git a/tools/pnacl-freeze/pnacl-freeze.cpp b/tools/pnacl-freeze/pnacl-freeze.cpp |
new file mode 100644 |
index 0000000000000000000000000000000000000000..3899c8e1c09238af7b8bd4665987f7d6327acacb |
--- /dev/null |
+++ b/tools/pnacl-freeze/pnacl-freeze.cpp |
@@ -0,0 +1,96 @@ |
+/* Copyright 2013 The Native Client Authors. All rights reserved. |
+ * Use of this source code is governed by a BSD-style license that can |
+ * be found in the LICENSE file. |
+ */ |
+ |
+//===-- pnacl-freeze.cpp - The low-level NaCl bitcode freezer --------===// |
+// |
+//===----------------------------------------------------------------------===// |
+// |
+// Generates NaCl pexe wire format. |
+// |
+//===----------------------------------------------------------------------===// |
+ |
+#include "llvm/Bitcode/NaCl/NaClReaderWriter.h" |
+#include "llvm/Bitcode/ReaderWriter.h" |
+#include "llvm/IR/LLVMContext.h" |
+#include "llvm/IR/Module.h" |
+#include "llvm/Support/CommandLine.h" |
+#include "llvm/Support/DataStream.h" |
+#include "llvm/Support/FileSystem.h" |
+#include "llvm/Support/ManagedStatic.h" |
+#include "llvm/Support/PrettyStackTrace.h" |
+#include "llvm/Support/Signals.h" |
+#include "llvm/Support/StreamingMemoryObject.h" |
+#include "llvm/Support/ToolOutputFile.h" |
+ |
+using namespace llvm; |
+ |
+ |
+static cl::opt<std::string> |
+OutputFilename("o", cl::desc("Specify output filename"), |
+ cl::value_desc("filename"), cl::init("-")); |
+ |
+static cl::opt<std::string> |
+InputFilename(cl::Positional, cl::desc("<pexe file>"), cl::init("-")); |
+ |
+static void WriteOutputFile(const Module *M) { |
+ |
+ std::error_code EC; |
+ std::unique_ptr<tool_output_file> Out( |
+ new tool_output_file(OutputFilename, EC, sys::fs::F_None)); |
+ if (EC) { |
+ errs() << EC.message() << '\n'; |
+ exit(1); |
+ } |
+ |
+ NaClWriteBitcodeToFile(M, Out->os(), /* AcceptSupportedOnly = */ false); |
+ |
+ // Declare success. |
+ Out->keep(); |
+} |
+ |
+int main(int argc, char **argv) { |
+ // Print a stack trace if we signal out. |
+ sys::PrintStackTraceOnErrorSignal(); |
+ PrettyStackTraceProgram X(argc, argv); |
+ |
+ LLVMContext &Context = getGlobalContext(); |
+ llvm_shutdown_obj Y; // Call llvm_shutdown() on exit. |
+ |
+ cl::ParseCommandLineOptions(argc, argv, "Generates NaCl pexe wire format\n"); |
+ |
+ std::string ErrorMessage; |
+ std::auto_ptr<Module> M; |
+ |
+ // Use the bitcode streaming interface |
+ DataStreamer *streamer = getDataFileStreamer(InputFilename, &ErrorMessage); |
+ std::unique_ptr<StreamingMemoryObject> Buffer( |
+ new StreamingMemoryObjectImpl(streamer)); |
+ if (streamer) { |
+ std::string DisplayFilename; |
+ if (InputFilename == "-") |
+ DisplayFilename = "<stdin>"; |
+ else |
+ DisplayFilename = InputFilename; |
+ M.reset(getStreamedBitcodeModule(DisplayFilename, Buffer.release(), Context, |
+ &ErrorMessage)); |
+ if (M.get()) |
+ if (std::error_code EC = M->materializeAllPermanently()) { |
+ ErrorMessage = EC.message(); |
+ M.reset(); |
+ } |
+ } |
+ |
+ if (!M.get()) { |
+ errs() << argv[0] << ": "; |
+ if (ErrorMessage.size()) |
+ errs() << ErrorMessage << "\n"; |
+ else |
+ errs() << "bitcode didn't read correctly.\n"; |
+ return 1; |
+ } |
+ |
+ WriteOutputFile(M.get()); |
+ return 0; |
+} |