mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-21 18:29:46 +00:00
just argv[0]. And remove the code for searching the current working directory and for searching PATH; the point of FindExecutable is not to find whatever version of the executable can be found by searching around, but to find an executable that accompanies the current executable. Update the tools to use sys::Program::FindProgramByName when they want PATH searching. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@78240 91177308-0d34-0410-b5e6-96231b3b80d8
473 lines
17 KiB
C++
473 lines
17 KiB
C++
//===- ExecutionDriver.cpp - Allow execution of LLVM program --------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file contains code used to execute the program utilizing one of the
|
|
// various ways of running LLVM bitcode.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "BugDriver.h"
|
|
#include "ToolRunner.h"
|
|
#include "llvm/Support/CommandLine.h"
|
|
#include "llvm/Support/Debug.h"
|
|
#include "llvm/Support/FileUtilities.h"
|
|
#include "llvm/Support/SystemUtils.h"
|
|
#include <fstream>
|
|
|
|
using namespace llvm;
|
|
|
|
namespace {
|
|
// OutputType - Allow the user to specify the way code should be run, to test
|
|
// for miscompilation.
|
|
//
|
|
enum OutputType {
|
|
AutoPick, RunLLI, RunJIT, RunLLC, RunCBE, CBE_bug, LLC_Safe, Custom
|
|
};
|
|
|
|
cl::opt<double>
|
|
AbsTolerance("abs-tolerance", cl::desc("Absolute error tolerated"),
|
|
cl::init(0.0));
|
|
cl::opt<double>
|
|
RelTolerance("rel-tolerance", cl::desc("Relative error tolerated"),
|
|
cl::init(0.0));
|
|
|
|
cl::opt<OutputType>
|
|
InterpreterSel(cl::desc("Specify the \"test\" i.e. suspect back-end:"),
|
|
cl::values(clEnumValN(AutoPick, "auto", "Use best guess"),
|
|
clEnumValN(RunLLI, "run-int",
|
|
"Execute with the interpreter"),
|
|
clEnumValN(RunJIT, "run-jit", "Execute with JIT"),
|
|
clEnumValN(RunLLC, "run-llc", "Compile with LLC"),
|
|
clEnumValN(RunCBE, "run-cbe", "Compile with CBE"),
|
|
clEnumValN(CBE_bug,"cbe-bug", "Find CBE bugs"),
|
|
clEnumValN(LLC_Safe, "llc-safe", "Use LLC for all"),
|
|
clEnumValN(Custom, "run-custom",
|
|
"Use -exec-command to define a command to execute "
|
|
"the bitcode. Useful for cross-compilation."),
|
|
clEnumValEnd),
|
|
cl::init(AutoPick));
|
|
|
|
cl::opt<OutputType>
|
|
SafeInterpreterSel(cl::desc("Specify \"safe\" i.e. known-good backend:"),
|
|
cl::values(clEnumValN(AutoPick, "safe-auto", "Use best guess"),
|
|
clEnumValN(RunLLC, "safe-run-llc", "Compile with LLC"),
|
|
clEnumValN(RunCBE, "safe-run-cbe", "Compile with CBE"),
|
|
clEnumValN(Custom, "safe-run-custom",
|
|
"Use -exec-command to define a command to execute "
|
|
"the bitcode. Useful for cross-compilation."),
|
|
clEnumValEnd),
|
|
cl::init(AutoPick));
|
|
|
|
cl::opt<std::string>
|
|
SafeInterpreterPath("safe-path",
|
|
cl::desc("Specify the path to the \"safe\" backend program"),
|
|
cl::init(""));
|
|
|
|
cl::opt<bool>
|
|
AppendProgramExitCode("append-exit-code",
|
|
cl::desc("Append the exit code to the output so it gets diff'd too"),
|
|
cl::init(false));
|
|
|
|
cl::opt<std::string>
|
|
InputFile("input", cl::init("/dev/null"),
|
|
cl::desc("Filename to pipe in as stdin (default: /dev/null)"));
|
|
|
|
cl::list<std::string>
|
|
AdditionalSOs("additional-so",
|
|
cl::desc("Additional shared objects to load "
|
|
"into executing programs"));
|
|
|
|
cl::list<std::string>
|
|
AdditionalLinkerArgs("Xlinker",
|
|
cl::desc("Additional arguments to pass to the linker"));
|
|
|
|
cl::opt<std::string>
|
|
CustomExecCommand("exec-command", cl::init("simulate"),
|
|
cl::desc("Command to execute the bitcode (use with -run-custom) "
|
|
"(default: simulate)"));
|
|
}
|
|
|
|
namespace llvm {
|
|
// Anything specified after the --args option are taken as arguments to the
|
|
// program being debugged.
|
|
cl::list<std::string>
|
|
InputArgv("args", cl::Positional, cl::desc("<program arguments>..."),
|
|
cl::ZeroOrMore, cl::PositionalEatsArgs);
|
|
}
|
|
|
|
namespace {
|
|
cl::list<std::string>
|
|
ToolArgv("tool-args", cl::Positional, cl::desc("<tool arguments>..."),
|
|
cl::ZeroOrMore, cl::PositionalEatsArgs);
|
|
|
|
cl::list<std::string>
|
|
SafeToolArgv("safe-tool-args", cl::Positional,
|
|
cl::desc("<safe-tool arguments>..."),
|
|
cl::ZeroOrMore, cl::PositionalEatsArgs);
|
|
|
|
cl::list<std::string>
|
|
GCCToolArgv("gcc-tool-args", cl::Positional,
|
|
cl::desc("<gcc-tool arguments>..."),
|
|
cl::ZeroOrMore, cl::PositionalEatsArgs);
|
|
}
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// BugDriver method implementation
|
|
//
|
|
|
|
/// initializeExecutionEnvironment - This method is used to set up the
|
|
/// environment for executing LLVM programs.
|
|
///
|
|
bool BugDriver::initializeExecutionEnvironment() {
|
|
outs() << "Initializing execution environment: ";
|
|
|
|
// Create an instance of the AbstractInterpreter interface as specified on
|
|
// the command line
|
|
SafeInterpreter = 0;
|
|
std::string Message;
|
|
|
|
switch (InterpreterSel) {
|
|
case AutoPick:
|
|
InterpreterSel = RunCBE;
|
|
Interpreter =
|
|
AbstractInterpreter::createCBE(getToolName(), Message, &ToolArgv,
|
|
&GCCToolArgv);
|
|
if (!Interpreter) {
|
|
InterpreterSel = RunJIT;
|
|
Interpreter = AbstractInterpreter::createJIT(getToolName(), Message,
|
|
&ToolArgv);
|
|
}
|
|
if (!Interpreter) {
|
|
InterpreterSel = RunLLC;
|
|
Interpreter = AbstractInterpreter::createLLC(getToolName(), Message,
|
|
&ToolArgv, &GCCToolArgv);
|
|
}
|
|
if (!Interpreter) {
|
|
InterpreterSel = RunLLI;
|
|
Interpreter = AbstractInterpreter::createLLI(getToolName(), Message,
|
|
&ToolArgv);
|
|
}
|
|
if (!Interpreter) {
|
|
InterpreterSel = AutoPick;
|
|
Message = "Sorry, I can't automatically select an interpreter!\n";
|
|
}
|
|
break;
|
|
case RunLLI:
|
|
Interpreter = AbstractInterpreter::createLLI(getToolName(), Message,
|
|
&ToolArgv);
|
|
break;
|
|
case RunLLC:
|
|
case LLC_Safe:
|
|
Interpreter = AbstractInterpreter::createLLC(getToolName(), Message,
|
|
&ToolArgv, &GCCToolArgv);
|
|
break;
|
|
case RunJIT:
|
|
Interpreter = AbstractInterpreter::createJIT(getToolName(), Message,
|
|
&ToolArgv);
|
|
break;
|
|
case RunCBE:
|
|
case CBE_bug:
|
|
Interpreter = AbstractInterpreter::createCBE(getToolName(), Message,
|
|
&ToolArgv, &GCCToolArgv);
|
|
break;
|
|
case Custom:
|
|
Interpreter = AbstractInterpreter::createCustom(Message, CustomExecCommand);
|
|
break;
|
|
default:
|
|
Message = "Sorry, this back-end is not supported by bugpoint right now!\n";
|
|
break;
|
|
}
|
|
if (!Interpreter)
|
|
errs() << Message;
|
|
else // Display informational messages on stdout instead of stderr
|
|
outs() << Message;
|
|
|
|
std::string Path = SafeInterpreterPath;
|
|
if (Path.empty())
|
|
Path = getToolName();
|
|
std::vector<std::string> SafeToolArgs = SafeToolArgv;
|
|
switch (SafeInterpreterSel) {
|
|
case AutoPick:
|
|
// In "cbe-bug" mode, default to using LLC as the "safe" backend.
|
|
if (!SafeInterpreter &&
|
|
InterpreterSel == CBE_bug) {
|
|
SafeInterpreterSel = RunLLC;
|
|
SafeToolArgs.push_back("--relocation-model=pic");
|
|
SafeInterpreter = AbstractInterpreter::createLLC(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
}
|
|
|
|
// In "llc-safe" mode, default to using LLC as the "safe" backend.
|
|
if (!SafeInterpreter &&
|
|
InterpreterSel == LLC_Safe) {
|
|
SafeInterpreterSel = RunLLC;
|
|
SafeToolArgs.push_back("--relocation-model=pic");
|
|
SafeInterpreter = AbstractInterpreter::createLLC(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
}
|
|
|
|
// Pick a backend that's different from the test backend. The JIT and
|
|
// LLC backends share a lot of code, so prefer to use the CBE as the
|
|
// safe back-end when testing them.
|
|
if (!SafeInterpreter &&
|
|
InterpreterSel != RunCBE) {
|
|
SafeInterpreterSel = RunCBE;
|
|
SafeInterpreter = AbstractInterpreter::createCBE(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
}
|
|
if (!SafeInterpreter &&
|
|
InterpreterSel != RunLLC &&
|
|
InterpreterSel != RunJIT) {
|
|
SafeInterpreterSel = RunLLC;
|
|
SafeToolArgs.push_back("--relocation-model=pic");
|
|
SafeInterpreter = AbstractInterpreter::createLLC(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
}
|
|
if (!SafeInterpreter) {
|
|
SafeInterpreterSel = AutoPick;
|
|
Message = "Sorry, I can't automatically select an interpreter!\n";
|
|
}
|
|
break;
|
|
case RunLLC:
|
|
SafeToolArgs.push_back("--relocation-model=pic");
|
|
SafeInterpreter = AbstractInterpreter::createLLC(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
break;
|
|
case RunCBE:
|
|
SafeInterpreter = AbstractInterpreter::createCBE(Path.c_str(), Message,
|
|
&SafeToolArgs,
|
|
&GCCToolArgv);
|
|
break;
|
|
case Custom:
|
|
SafeInterpreter = AbstractInterpreter::createCustom(Message,
|
|
CustomExecCommand);
|
|
break;
|
|
default:
|
|
Message = "Sorry, this back-end is not supported by bugpoint as the "
|
|
"\"safe\" backend right now!\n";
|
|
break;
|
|
}
|
|
if (!SafeInterpreter) { outs() << Message << "\nExiting.\n"; exit(1); }
|
|
|
|
gcc = GCC::create(Message, &GCCToolArgv);
|
|
if (!gcc) { outs() << Message << "\nExiting.\n"; exit(1); }
|
|
|
|
// If there was an error creating the selected interpreter, quit with error.
|
|
return Interpreter == 0;
|
|
}
|
|
|
|
/// compileProgram - Try to compile the specified module, throwing an exception
|
|
/// if an error occurs, or returning normally if not. This is used for code
|
|
/// generation crash testing.
|
|
///
|
|
void BugDriver::compileProgram(Module *M) {
|
|
// Emit the program to a bitcode file...
|
|
sys::Path BitcodeFile ("bugpoint-test-program.bc");
|
|
std::string ErrMsg;
|
|
if (BitcodeFile.makeUnique(true,&ErrMsg)) {
|
|
errs() << ToolName << ": Error making unique filename: " << ErrMsg
|
|
<< "\n";
|
|
exit(1);
|
|
}
|
|
if (writeProgramToFile(BitcodeFile.toString(), M)) {
|
|
errs() << ToolName << ": Error emitting bitcode to file '"
|
|
<< BitcodeFile << "'!\n";
|
|
exit(1);
|
|
}
|
|
|
|
// Remove the temporary bitcode file when we are done.
|
|
FileRemover BitcodeFileRemover(BitcodeFile, !SaveTemps);
|
|
|
|
// Actually compile the program!
|
|
Interpreter->compileProgram(BitcodeFile.toString());
|
|
}
|
|
|
|
|
|
/// executeProgram - This method runs "Program", capturing the output of the
|
|
/// program to a file, returning the filename of the file. A recommended
|
|
/// filename may be optionally specified.
|
|
///
|
|
std::string BugDriver::executeProgram(std::string OutputFile,
|
|
std::string BitcodeFile,
|
|
const std::string &SharedObj,
|
|
AbstractInterpreter *AI,
|
|
bool *ProgramExitedNonzero) {
|
|
if (AI == 0) AI = Interpreter;
|
|
assert(AI && "Interpreter should have been created already!");
|
|
bool CreatedBitcode = false;
|
|
std::string ErrMsg;
|
|
if (BitcodeFile.empty()) {
|
|
// Emit the program to a bitcode file...
|
|
sys::Path uniqueFilename("bugpoint-test-program.bc");
|
|
if (uniqueFilename.makeUnique(true, &ErrMsg)) {
|
|
errs() << ToolName << ": Error making unique filename: "
|
|
<< ErrMsg << "!\n";
|
|
exit(1);
|
|
}
|
|
BitcodeFile = uniqueFilename.toString();
|
|
|
|
if (writeProgramToFile(BitcodeFile, Program)) {
|
|
errs() << ToolName << ": Error emitting bitcode to file '"
|
|
<< BitcodeFile << "'!\n";
|
|
exit(1);
|
|
}
|
|
CreatedBitcode = true;
|
|
}
|
|
|
|
// Remove the temporary bitcode file when we are done.
|
|
sys::Path BitcodePath (BitcodeFile);
|
|
FileRemover BitcodeFileRemover(BitcodePath, CreatedBitcode && !SaveTemps);
|
|
|
|
if (OutputFile.empty()) OutputFile = "bugpoint-execution-output";
|
|
|
|
// Check to see if this is a valid output filename...
|
|
sys::Path uniqueFile(OutputFile);
|
|
if (uniqueFile.makeUnique(true, &ErrMsg)) {
|
|
errs() << ToolName << ": Error making unique filename: "
|
|
<< ErrMsg << "\n";
|
|
exit(1);
|
|
}
|
|
OutputFile = uniqueFile.toString();
|
|
|
|
// Figure out which shared objects to run, if any.
|
|
std::vector<std::string> SharedObjs(AdditionalSOs);
|
|
if (!SharedObj.empty())
|
|
SharedObjs.push_back(SharedObj);
|
|
|
|
int RetVal = AI->ExecuteProgram(BitcodeFile, InputArgv, InputFile,
|
|
OutputFile, AdditionalLinkerArgs, SharedObjs,
|
|
Timeout, MemoryLimit);
|
|
|
|
if (RetVal == -1) {
|
|
errs() << "<timeout>";
|
|
static bool FirstTimeout = true;
|
|
if (FirstTimeout) {
|
|
outs() << "\n"
|
|
"*** Program execution timed out! This mechanism is designed to handle\n"
|
|
" programs stuck in infinite loops gracefully. The -timeout option\n"
|
|
" can be used to change the timeout threshold or disable it completely\n"
|
|
" (with -timeout=0). This message is only displayed once.\n";
|
|
FirstTimeout = false;
|
|
}
|
|
}
|
|
|
|
if (AppendProgramExitCode) {
|
|
std::ofstream outFile(OutputFile.c_str(), std::ios_base::app);
|
|
outFile << "exit " << RetVal << '\n';
|
|
outFile.close();
|
|
}
|
|
|
|
if (ProgramExitedNonzero != 0)
|
|
*ProgramExitedNonzero = (RetVal != 0);
|
|
|
|
// Return the filename we captured the output to.
|
|
return OutputFile;
|
|
}
|
|
|
|
/// executeProgramSafely - Used to create reference output with the "safe"
|
|
/// backend, if reference output is not provided.
|
|
///
|
|
std::string BugDriver::executeProgramSafely(std::string OutputFile) {
|
|
bool ProgramExitedNonzero;
|
|
std::string outFN = executeProgram(OutputFile, "", "", SafeInterpreter,
|
|
&ProgramExitedNonzero);
|
|
return outFN;
|
|
}
|
|
|
|
std::string BugDriver::compileSharedObject(const std::string &BitcodeFile) {
|
|
assert(Interpreter && "Interpreter should have been created already!");
|
|
sys::Path OutputFile;
|
|
|
|
// Using the known-good backend.
|
|
GCC::FileType FT = SafeInterpreter->OutputCode(BitcodeFile, OutputFile);
|
|
|
|
std::string SharedObjectFile;
|
|
if (gcc->MakeSharedObject(OutputFile.toString(), FT,
|
|
SharedObjectFile, AdditionalLinkerArgs))
|
|
exit(1);
|
|
|
|
// Remove the intermediate C file
|
|
OutputFile.eraseFromDisk();
|
|
|
|
return "./" + SharedObjectFile;
|
|
}
|
|
|
|
/// createReferenceFile - calls compileProgram and then records the output
|
|
/// into ReferenceOutputFile. Returns true if reference file created, false
|
|
/// otherwise. Note: initializeExecutionEnvironment should be called BEFORE
|
|
/// this function.
|
|
///
|
|
bool BugDriver::createReferenceFile(Module *M, const std::string &Filename) {
|
|
try {
|
|
compileProgram(Program);
|
|
} catch (ToolExecutionError &) {
|
|
return false;
|
|
}
|
|
try {
|
|
ReferenceOutputFile = executeProgramSafely(Filename);
|
|
outs() << "\nReference output is: " << ReferenceOutputFile << "\n\n";
|
|
} catch (ToolExecutionError &TEE) {
|
|
errs() << TEE.what();
|
|
if (Interpreter != SafeInterpreter) {
|
|
errs() << "*** There is a bug running the \"safe\" backend. Either"
|
|
<< " debug it (for example with the -run-cbe bugpoint option,"
|
|
<< " if CBE is being used as the \"safe\" backend), or fix the"
|
|
<< " error some other way.\n";
|
|
}
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/// diffProgram - This method executes the specified module and diffs the
|
|
/// output against the file specified by ReferenceOutputFile. If the output
|
|
/// is different, true is returned. If there is a problem with the code
|
|
/// generator (e.g., llc crashes), this will throw an exception.
|
|
///
|
|
bool BugDriver::diffProgram(const std::string &BitcodeFile,
|
|
const std::string &SharedObject,
|
|
bool RemoveBitcode) {
|
|
bool ProgramExitedNonzero;
|
|
|
|
// Execute the program, generating an output file...
|
|
sys::Path Output(executeProgram("", BitcodeFile, SharedObject, 0,
|
|
&ProgramExitedNonzero));
|
|
|
|
std::string Error;
|
|
bool FilesDifferent = false;
|
|
if (int Diff = DiffFilesWithTolerance(sys::Path(ReferenceOutputFile),
|
|
sys::Path(Output.toString()),
|
|
AbsTolerance, RelTolerance, &Error)) {
|
|
if (Diff == 2) {
|
|
errs() << "While diffing output: " << Error << '\n';
|
|
exit(1);
|
|
}
|
|
FilesDifferent = true;
|
|
}
|
|
else {
|
|
// Remove the generated output if there are no differences.
|
|
Output.eraseFromDisk();
|
|
}
|
|
|
|
// Remove the bitcode file if we are supposed to.
|
|
if (RemoveBitcode)
|
|
sys::Path(BitcodeFile).eraseFromDisk();
|
|
return FilesDifferent;
|
|
}
|
|
|
|
bool BugDriver::isExecutingJIT() {
|
|
return InterpreterSel == RunJIT;
|
|
}
|
|
|