private static void walkTests(List<String> args, boolean verbose)
throws UserError, IOException, Throwable {
boolean _verbose = verbose;
if (args.size() == 0) {
throw new UserError("Need a file to run through the Fortress interpreter.");
}
String s = args.get(0);
List<String> rest = args.subList(1, args.size());
if (s.startsWith("-")) {
if (s.equals("-debug")) {
rest = Debug.parseOptions(rest);
} else if (s.equals("-verbose")) {
_verbose = true;
} else invalidFlag(s, "test");
walkTests(rest, _verbose);
} else {
for (String file : args) {
try {
Iterable<? extends StaticError> errors = IterUtil.empty();
try {
if (!isComponent(file)) throw new UserError(file + " is not a component file.");
APIName name = NodeUtil.apiName(file);
Path path = sourcePath(file, name);
GraphRepository bcr = specificInterpreterRepository(path);
ComponentIndex cu = bcr.getLinkedComponent(name);
Driver.runTests(bcr, cu, _verbose);
} catch (Throwable th) {
// TODO FIXME what is the proper treatment of errors/exceptions etc.?
if (th instanceof FortressException) {
FortressException pe = (FortressException) th;
if (pe.getStaticErrors() != null) errors = pe.getStaticErrors();
}
if (th instanceof RuntimeException) throw (RuntimeException) th;
if (th instanceof Error) throw (Error) th;
throw new WrappedException(th, Debug.stackTraceOn());
}
for (StaticError error : errors) {
System.err.println(error);
}
// If there are no errors,
// all components will have been written to disk
// by the CacheBasedRepository.
} catch (StaticError e) {
System.err.println(e);
if (Debug.stackTraceOn()) {
e.printStackTrace();
}
} catch (RepositoryError e) {
System.err.println(e.getMessage());
} catch (FortressException e) {
failureBoilerplate(e);
System.exit(1);
}
}
}
}
private static Iterable<? extends StaticError> compilerPhases(
Path path, String file, Option<String> out, boolean link) throws UserError {
GraphRepository bcr = null;
Debug.debug(Debug.Type.FORTRESS, 2, "Compiling file ", file);
APIName name = null;
try {
bcr = specificRepository(path);
name = cuName(file);
if (isApi(file)) {
Api a = (Api) bcr.getApi(name).ast();
if (out.isSome())
ASTIO.writeJavaAst(
a, // defaultRepository.getApi(name).ast(),
out.unwrap());
} else if (isComponent(file)) {
Component c;
if (link) c = (Component) bcr.getLinkedComponent(name).ast();
else c = (Component) bcr.getComponent(name).ast();
if (out.isSome()) {
ASTIO.writeJavaAst(
c, // defaultRepository.getComponent(name).ast(),
out.unwrap());
bcr.deleteComponent(name, true);
}
} else {
throw new UserError(
"What kind of file is " + file + "? Name should end with .fsi or .fss.");
}
} catch (ProgramError pe) {
Iterable<? extends StaticError> se = pe.getStaticErrors();
if (se == null) return IterUtil.singleton(new WrappedException(pe, Debug.stackTraceOn()));
else return flattenErrors(se);
} catch (RepositoryError ex) {
throw ex;
} catch (FileNotFoundException ex) {
throw new WrappedException(ex);
} catch (IOException e) {
throw new WrappedException(e);
} catch (StaticError ex) {
return flattenErrors(ex);
} catch (CompilerBug e) {
return IterUtil.singleton(new WrappedException(e, Debug.stackTraceOn()));
} catch (InterpreterBug e) {
return IterUtil.singleton(new WrappedException(e, Debug.stackTraceOn()));
} catch (FortressException e) {
failureBoilerplate(e);
System.exit(1);
} finally {
if (bcr != null && name != null) bcr.deleteComponent(name, false);
}
if (bcr != null && bcr.verbose()) System.err.println("Compiling done.");
return IterUtil.empty();
}
private static List<? extends StaticError> flattenErrors(StaticError ex) {
List<StaticError> result = new LinkedList<StaticError>();
if (ex instanceof MultipleStaticError) {
for (StaticError err : (MultipleStaticError) ex) result.addAll(flattenErrors(err));
} else result.add(new WrappedException(ex, Debug.stackTraceOn()));
return result;
}
/**
* @param out
* @param path
* @param file_name
* @param doLink
* @return
* @throws UserError
* @throws IOException
*/
private static int compileWithErrorHandling(String s, Option<String> out, boolean doLink)
throws UserError, IOException {
int return_code = 0;
try {
APIName name = NodeUtil.apiName(s);
Path path = sourcePath(s, name);
String file_name = name.toString() + (s.endsWith(".fss") ? ".fss" : ".fsi");
List<StaticError> errors = new ArrayList<StaticError>();
for (StaticError error :
IterUtil.sort(compilerPhases(path, file_name, out, doLink), StaticError.comparator)) {
if (!error.toString().equals("")) errors.add(error);
}
return_code = reportErrors(errors, file_name);
} catch (StaticError e) {
return_code = reportErrors(flattenErrors(e), new File(s).getName());
} catch (ProgramError e) {
System.err.println(e.getMessage());
e.printInterpreterStackTrace(System.err);
if (Debug.stackTraceOn()) {
e.printStackTrace();
} else {
System.err.println(turnOnDebugMessage);
}
return_code = 1;
}
return return_code;
}
private static void walk(String fileName, List<String> args) throws UserError, Throwable {
try {
Iterable<? extends StaticError> errors = IterUtil.empty();
try {
eval(fileName, args, false);
} catch (Throwable th) {
// TODO FIXME what is the proper treatment of errors/exceptions etc.?
if (th instanceof FortressException) {
FortressException pe = (FortressException) th;
if (pe.getStaticErrors() != null) errors = pe.getStaticErrors();
}
if (th instanceof RuntimeException) throw (RuntimeException) th;
if (th instanceof Error) throw (Error) th;
throw new WrappedException(th, Debug.stackTraceOn());
}
if (!IterUtil.isEmpty(errors)) {
for (StaticError error : errors) {
System.err.println(error);
}
System.exit(-1);
}
// If there are no errors,
// all components will have been written to disk
// by the CacheBasedRepository.
} catch (StaticError e) {
System.err.println(e);
if (Debug.stackTraceOn()) {
e.printStackTrace();
}
System.exit(-1);
} catch (RepositoryError e) {
throw e;
} catch (LabelException e) {
System.err.println(e.getMessage());
if (Debug.stackTraceOn()) {
e.printStackTrace();
} else {
System.err.println(turnOnDebugMessage);
}
System.exit(1);
} catch (FortressException e) {
failureBoilerplate(e);
System.exit(1);
}
}
/** @param e */
private static void failureBoilerplate(FortressException e) {
System.err.println(e.getMessage());
e.printInterpreterStackTrace(System.err);
if (Debug.stackTraceOn()) {
e.printStackTrace();
} else {
System.err.println(turnOnDebugMessage);
}
(new Throwable()).printStackTrace();
}
private static int parse(String file, Option<String> out) throws UserError, IOException {
int return_code = 0;
try {
CompilationUnit unit = Parser.parseFileConvertExn(new File(file));
System.out.println("Ok");
if (out.isSome()) {
try {
ASTIO.writeJavaAst(unit, out.unwrap());
System.out.println("Dumped parse tree to " + out.unwrap());
} catch (IOException e) {
throw new IOException("IOException " + e + "while writing " + out.unwrap());
}
}
} catch (ParserError e) {
if (Debug.stackTraceOn()) {
System.err.println(e.getMessage());
e.printStackTrace();
} else {
System.err.println(turnOnDebugMessage);
}
return_code = 1;
} catch (ProgramError e) {
failureBoilerplate(e);
return_code = 1;
} catch (CompilerBug e) {
failureBoilerplate(e);
return_code = 1;
} catch (InterpreterBug e) {
failureBoilerplate(e);
return_code = 1;
} catch (FileNotFoundException f) {
throw new UserError(file + " not found");
} finally {
try {
Files.rm(ProjectProperties.preparserErrorLog(file));
} catch (IOException e) {
}
}
return return_code;
}
/**
* @param tokens
* @return
* @throws InterruptedException
* @throws Throwable
*/
public static int subMain(String[] tokens) throws InterruptedException, Throwable {
int return_code = 0;
// Now match the assembled string.
try {
String what = tokens[0];
List<String> args = Arrays.asList(tokens).subList(1, tokens.length);
if (what.equals("compile")) {
useCompilerLibraries();
setTypeChecking(true);
setPhaseOrder(PhaseOrder.compilerPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("junit")) {
return_code = junit(args);
} else if (what.equals("link")) {
useCompilerLibraries();
setTypeChecking(true);
setPhaseOrder(PhaseOrder.compilerPhaseOrder);
return_code = link(args);
} else if (what.equals("build")) {
useCompilerLibraries();
setTypeChecking(true);
setPhaseOrder(PhaseOrder.compilerPhaseOrder);
return_code = link(args);
} else if (what.equals("walk")) {
useInterpreterLibraries();
setScala(false);
setPhaseOrder(PhaseOrder.interpreterPhaseOrder);
walk(args);
} else if (what.equals("api")) {
useCompilerLibraries();
api(args, Option.<String>none(), Option.<String>none());
} else if (what.equals("compare")) {
useCompilerLibraries();
compare(args);
} else if (what.equals("parse")) {
useCompilerLibraries();
return_code = parse(args, Option.<String>none());
} else if (what.equals("unparse")) {
useCompilerLibraries();
unparse(args, Option.<String>none(), false, false);
} else if (what.equals("disambiguate")) {
useCompilerLibraries();
setPhaseOrder(PhaseOrder.disambiguatePhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("desugar")) {
useCompilerLibraries();
setTypeChecking(true);
setObjExprDesugaring(true);
setPhaseOrder(PhaseOrder.desugarPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("grammar")) {
useCompilerLibraries();
setPhaseOrder(PhaseOrder.grammarPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("typecheck")) {
useCompilerLibraries();
setTypeChecking(true);
setPhaseOrder(PhaseOrder.typecheckPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("test-coercion")) {
useCompilerLibraries();
setTypeChecking(true);
setPhaseOrder(PhaseOrder.typecheckPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("typecheck-old")) {
useInterpreterLibraries();
setScala(false);
/* TODO: remove the next line once type checking is permanently turned on */
setTypeChecking(true);
setPhaseOrder(PhaseOrder.typecheckPhaseOrder);
return_code = compilerPhases(args, Option.<String>none(), what);
} else if (what.equals("test")) {
useInterpreterLibraries();
setScala(false);
setPhaseOrder(PhaseOrder.interpreterPhaseOrder);
walkTests(args, false);
} else if (what.contains(ProjectProperties.COMP_SOURCE_SUFFIX)
|| (what.startsWith("-") && tokens.length > 1)) {
useInterpreterLibraries();
setScala(false);
setPhaseOrder(PhaseOrder.interpreterPhaseOrder);
walk(Arrays.asList(tokens));
} else if (what.equals("help")) {
useCompilerLibraries();
printHelpMessage();
} else if (what.equals("expand") && tokens.length == 2) {
System.out.println(ProjectProperties.get(tokens[1], ""));
} else {
useCompilerLibraries();
printUsageMessage();
}
} catch (StaticError e) {
System.err.println(e);
if (Debug.stackTraceOn()) {
e.printStackTrace();
}
return_code = -1;
} catch (UserError error) {
System.err.println(error.getMessage());
return_code = -1;
} catch (IOException error) {
System.err.println(error.getMessage());
return_code = -2;
} catch (CompilerBug error) {
System.err.println(error.getMessage());
if (Debug.stackTraceOn()) {
error.printStackTrace();
}
return_code = -3;
}
Init.allowForLeakChecks();
return return_code;
}
