| Index: tools/pnacl-bcanalyzer/pnacl-bcanalyzer.cpp
|
| diff --git a/tools/pnacl-bcanalyzer/pnacl-bcanalyzer.cpp b/tools/pnacl-bcanalyzer/pnacl-bcanalyzer.cpp
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..6d6f8ab8639c1950988a08088d1581d8ac5231ec
|
| --- /dev/null
|
| +++ b/tools/pnacl-bcanalyzer/pnacl-bcanalyzer.cpp
|
| @@ -0,0 +1,80 @@
|
| +//===-- pnacl-bcanalyzer.cpp - Bitcode Analyzer -------------------------===//
|
| +//
|
| +// The LLVM Compiler Infrastructure
|
| +//
|
| +// This file is distributed under the University of Illinois Open Source
|
| +// License. See LICENSE.TXT for details.
|
| +//
|
| +//===----------------------------------------------------------------------===//
|
| +//
|
| +// This tool is a thin wrapper over NaClBitcodeAnalyzer; see
|
| +// NaClBitcodeAnalyzer.h for more details.
|
| +//
|
| +// Invoke in the following manner:
|
| +//
|
| +// pnacl-bcanalyzer [options] - Read frozen PNaCl bitcode from stdin
|
| +// pnacl-bcanalyzer [options] x.bc - Read frozen PNaCl bitcode from the x.bc
|
| +// file
|
| +// Run with -help to see supported options.
|
| +//
|
| +//===----------------------------------------------------------------------===//
|
| +
|
| +#define DEBUG_TYPE "pnacl-bcanalyzer"
|
| +
|
| +#include "llvm/Bitcode/NaCl/NaClBitcodeAnalyzer.h"
|
| +#include "llvm/Support/CommandLine.h"
|
| +#include "llvm/Support/Debug.h"
|
| +#include "llvm/Support/ManagedStatic.h"
|
| +#include "llvm/Support/PrettyStackTrace.h"
|
| +#include "llvm/Support/Signals.h"
|
| +#include "llvm/Support/raw_ostream.h"
|
| +using namespace llvm;
|
| +
|
| +
|
| +static cl::opt<std::string>
|
| + InputFilename(cl::Positional, cl::desc("<input bitcode>"), cl::init("-"));
|
| +
|
| +static cl::opt<bool>
|
| + OptDumpRecords(
|
| + "dump-records",
|
| + cl::desc("Dump contents of records in bitcode, leaving out details, "
|
| + "instead of displaying record distributions."),
|
| + cl::init(false));
|
| +
|
| +static cl::opt<bool>
|
| +OptDumpDetails(
|
| + "dump-details",
|
| + cl::desc("Include details when dumping contents of records in bitcode."),
|
| + cl::init(false));
|
| +
|
| +static cl::opt<unsigned> OpsPerLine(
|
| + "operands-per-line",
|
| + cl::desc("Number of operands to print per dump line. 0 implies "
|
| + "all operands will be printed on the same line (default)"),
|
| + cl::init(0));
|
| +
|
| +static cl::opt<bool> OrderBlocksByID(
|
| + "order-blocks-by-id",
|
| + cl::desc("Print blocks statistics based on block id rather than size"),
|
| + cl::init(false));
|
| +
|
| +int main(int argc, char **argv) {
|
| + // Print a stack trace if we signal out.
|
| + sys::PrintStackTraceOnErrorSignal();
|
| + PrettyStackTraceProgram X(argc, argv);
|
| + llvm_shutdown_obj Y; // Call llvm_shutdown() on exit.
|
| + cl::ParseCommandLineOptions(argc, argv, "pnacl-bcanalyzer file analyzer\n");
|
| +
|
| + if (OptDumpDetails && !OptDumpRecords) {
|
| + errs() << "Can't dump details unless records are dumped!\n";
|
| + return 1;
|
| + }
|
| +
|
| + AnalysisDumpOptions DumpOptions;
|
| + DumpOptions.DumpRecords = OptDumpRecords;
|
| + DumpOptions.DumpDetails = OptDumpDetails;
|
| + DumpOptions.OpsPerLine = OpsPerLine;
|
| + DumpOptions.OrderBlocksByID = OrderBlocksByID;
|
| +
|
| + return AnalyzeBitcodeInFile(InputFilename, outs(), DumpOptions);
|
| +}
|
|
|