From 767a1e462dc281965fc3df2316f209bf2aca68e0 Mon Sep 17 00:00:00 2001 From: Chris Lattner Date: Sun, 23 Nov 2003 18:01:26 +0000 Subject: [PATCH] Checkin the stacker compiler git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@10184 91177308-0d34-0410-b5e6-96231b3b80d8 --- projects/Stacker/tools/stkrc/Makefile | 26 +++++ projects/Stacker/tools/stkrc/stkrc.cpp | 155 +++++++++++++++++++++++++ 2 files changed, 181 insertions(+) create mode 100644 projects/Stacker/tools/stkrc/Makefile create mode 100644 projects/Stacker/tools/stkrc/stkrc.cpp diff --git a/projects/Stacker/tools/stkrc/Makefile b/projects/Stacker/tools/stkrc/Makefile new file mode 100644 index 00000000000..b7e08c412fa --- /dev/null +++ b/projects/Stacker/tools/stkrc/Makefile @@ -0,0 +1,26 @@ +##===- projects/sample/lib/sample/Makefile -----------------*- Makefile -*-===## + +# +# Indicate where we are relative to the top of the source tree. +# +LEVEL=../../../.. + +# +# Give the name of a library. This will build a dynamic version. +# +TOOLNAME=stkrc +USEDLIBS=stkr_compiler asmparser bcwriter vmcore support.a + +ifdef PARSE_DEBUG +CPPFLAGS = -DPARSE_DEBUG=1 +endif + +ifdef FLEX_DEBUG +CPPFLAGS += -DFLEX_DEBUG=1 +endif + +# +# Include Makefile.common so we know what to do. +# +include $(LEVEL)/Makefile.common + diff --git a/projects/Stacker/tools/stkrc/stkrc.cpp b/projects/Stacker/tools/stkrc/stkrc.cpp new file mode 100644 index 00000000000..930ee8df753 --- /dev/null +++ b/projects/Stacker/tools/stkrc/stkrc.cpp @@ -0,0 +1,155 @@ +//===--- stkrc.cpp --- The Stacker Compiler -------------------------------===// +// +// The LLVM Compiler Infrastructure +// +// This file was developed by Reid Spencer and donated to the LLVM research +// group and is distributed under the University of Illinois Open Source +// License. See LICENSE.TXT for details. +// +//===----------------------------------------------------------------------===// +// +// This is the "main" program for the Stacker Compiler. It is simply a utility +// that invokes the StackerCompiler::compile method (see StackerCompiler.cpp) +// +// To get help using this utility, you can invoke it with: +// stkrc --help - Output information about command line switches +// +// +//===------------------------------------------------------------------------=== + +#include "../../lib/compiler/StackerCompiler.h" +#include "llvm/Assembly/Parser.h" +#include "llvm/Bytecode/Writer.h" +#include "llvm/Analysis/Verifier.h" +#include "Support/CommandLine.h" +#include "Support/Signals.h" +#include +#include + +using namespace llvm; + +static cl::opt +InputFilename(cl::Positional, cl::desc(""), cl::init("-")); + +static cl::opt +OutputFilename("o", cl::desc("Override output filename"), + cl::value_desc("filename")); + +static cl::opt +Force("f", cl::desc("Overwrite output files")); + +static cl::opt +DumpAsm("d", cl::desc("Print LLVM Assembly as parsed"), cl::Hidden); + +static cl::opt +StackSize("s", cl::desc("Specify program maximum stack size"), + cl::value_desc("stacksize")); + +#ifdef PARSE_DEBUG +static cl::opt +ParseDebug("g", cl::desc("Turn on Bison Debugging"), cl::Hidden); +#endif + +#ifdef FLEX_DEBUG +static cl::opt +FlexDebug("x", cl::desc("Turn on Flex Debugging"), cl::Hidden); +#endif + +static cl::opt +EchoSource("e", cl::desc("Print Stacker Source as parsed"), + cl::value_desc("echo")); + +int main(int argc, char **argv) +{ + cl::ParseCommandLineOptions(argc, argv, " stacker .st -> .bc compiler\n"); + + std::ostream *Out = 0; + StackerCompiler compiler; + try + { +#ifdef PARSE_DEBUG + { + extern int Stackerdebug; + Stackerdebug = ParseDebug; + } +#endif +#ifdef FLEX_DEBUG + { + extern int Stacker_flex_debug; + Stacker_flex_debug = FlexDebug; + } +#endif + // Parse the file now... + + std::auto_ptr M ( + compiler.compile(InputFilename,EchoSource, 1024) ); + if (M.get() == 0) { + std::cerr << argv[0] << ": assembly didn't read correctly.\n"; + return 1; + } + + if (verifyModule(*M.get())) { + std::cerr << argv[0] + << ": assembly parsed, but does not verify as correct!\n"; + return 1; + } + + if (DumpAsm) std::cerr << "Here's the assembly:\n" << M.get(); + + if (OutputFilename != "") { // Specified an output filename? + if (OutputFilename != "-") { // Not stdout? + if (!Force && std::ifstream(OutputFilename.c_str())) { + // If force is not specified, make sure not to overwrite a file! + std::cerr << argv[0] << ": error opening '" << OutputFilename + << "': file exists!\n" + << "Use -f command line argument to force output\n"; + return 1; + } + Out = new std::ofstream(OutputFilename.c_str()); + } else { // Specified stdout + Out = &std::cout; + } + } else { + if (InputFilename == "-") { + OutputFilename = "-"; + Out = &std::cout; + } else { + std::string IFN = InputFilename; + int Len = IFN.length(); + if (IFN[Len-3] == '.' && IFN[Len-2] == 's' && IFN[Len-1] == 't') { + // Source ends in .ll + OutputFilename = std::string(IFN.begin(), IFN.end()-3); + } else { + OutputFilename = IFN; // Append a .bc to it + } + OutputFilename += ".bc"; + + if (!Force && std::ifstream(OutputFilename.c_str())) { + // If force is not specified, make sure not to overwrite a file! + std::cerr << argv[0] << ": error opening '" << OutputFilename + << "': file exists!\n" + << "Use -f command line argument to force output\n"; + return 1; + } + + Out = new std::ofstream(OutputFilename.c_str()); + // Make sure that the Out file gets unlinked from the disk if we get a + // SIGINT + RemoveFileOnSignal(OutputFilename); + } + } + + if (!Out->good()) { + std::cerr << argv[0] << ": error opening " << OutputFilename << "!\n"; + return 1; + } + + WriteBytecodeToFile(M.get(), *Out); + } catch (const ParseException &E) { + std::cerr << argv[0] << ": " << E.getMessage() << "\n"; + return 1; + } + + if (Out != &std::cout) delete Out; + return 0; +} -- 2.34.1