public static Definition setConfiguration( Definition node, org.kframework.kil.loader.Context context, final Configuration conf) { try { return (Definition) node.accept( new CopyOnWriteTransformer("Configuration setter", context) { @Override public ASTNode transform(Configuration node) { return conf; } @Override public ASTNode transform(org.kframework.kil.Context node) { return node; } @Override public ASTNode transform(Rule node) { return node; } @Override public ASTNode transform(Syntax node) { return node; } }); } catch (TransformerException e) { e.printStackTrace(); } return node; }
public static Term plug(Map<String, Term> args, Context context) throws TransformerException { Configuration cfg = K.kompiled_cfg; ASTNode cfgCleanedNode = null; try { cfgCleanedNode = new ConfigurationCleaner(context).transform(cfg); } catch (TransformerException e) { // TODO Auto-generated catch block e.printStackTrace(); } Term cfgCleaned; if (cfgCleanedNode == null) { cfgCleaned = Bag.EMPTY; } else { if (!(cfgCleanedNode instanceof Configuration)) { GlobalSettings.kem.register( new KException( ExceptionType.ERROR, KExceptionGroup.INTERNAL, "Configuration Cleaner failed.", cfg.getFilename(), cfg.getLocation())); } cfgCleaned = ((Configuration) cfgCleanedNode).getBody(); } if (GlobalSettings.verbose) sw.printIntermediate("Plug configuration variables"); Term configuration = (Term) cfgCleaned.accept(new SubstitutionFilter(args, context)); configuration = (Term) configuration.accept(new Cell2Map(context)); return configuration; }
public Definition transformDefinition(org.kframework.kil.Definition node) { try { return new MacroExpander((Definition) node.accept(this)).processDefinition(); } catch (TransformerException e) { e.printStackTrace(); return null; } }
public String kilToKore(ASTNode node) { try { node.accept(builtinTrans).accept(kappTrans).accept(koreTrans); // node.accept(kappTrans).accept(koreTrans); } catch (TransformerException e) { // TODO Auto-generated catch block e.printStackTrace(); } return koreTrans.getResult(); }
public Term transformTerm(org.kframework.kil.Term node, Definition definition) { this.definition = definition; Term term = null; try { term = new MacroExpander(definition).processTerm((Term) node.accept(this)); } catch (TransformerException e) { e.printStackTrace(); } finally { this.definition = null; } return term; }
public Rule transformRule(org.kframework.kil.Rule node, Definition definition) { this.definition = definition; Rule rule = null; try { rule = new MacroExpander(definition).processRule((Rule) node.accept(this)); } catch (TransformerException e) { e.printStackTrace(); } finally { this.definition = null; } return rule; }
public static Term fillHole( Term t, final Term replacement, org.kframework.kil.loader.Context context) { CopyOnWriteTransformer holeFiller = new CopyOnWriteTransformer("Hole Filling", context) { @Override public ASTNode transform(Hole node) { return replacement; } }; try { Term result = (Term) t.accept(holeFiller); return result; } catch (TransformerException e) { e .printStackTrace(); // To change body of catch statement use File | Settings | File // Templates. } return null; }
@Override public Definition firstStep(Definition javaDef) { String fileSep = System.getProperty("file.separator"); String propPath = KPaths.getKBase(false) + fileSep + "lib" + fileSep + "maude" + fileSep; Properties specialMaudeHooks = new Properties(); Properties maudeHooks = new Properties(); try { FileUtil.loadProperties(maudeHooks, propPath + "MaudeHooksMap.properties"); FileUtil.loadProperties(specialMaudeHooks, propPath + "SpecialMaudeHooks.properties"); } catch (IOException e) { e.printStackTrace(); } MaudeBuiltinsFilter builtinsFilter = new MaudeBuiltinsFilter(maudeHooks, specialMaudeHooks, context); javaDef.accept(builtinsFilter); final String mainModule = javaDef.getMainModule(); StringBuilder builtins = new StringBuilder() .append("mod ") .append(mainModule) .append("-BUILTINS is\n") .append(" including ") .append(mainModule) .append("-BASE .\n") .append(builtinsFilter.getResult()) .append("endm\n"); FileUtil.save(context.dotk.getAbsolutePath() + "/builtins.maude", builtins); if (GlobalSettings.verbose) sw.printIntermediate("Generating equations for hooks"); try { javaDef = (Definition) javaDef.accept(new DeleteFunctionRules(maudeHooks.stringPropertyNames(), context)); } catch (TransformerException e) { e.printStackTrace(); } return super.firstStep(javaDef); }
@Override public ASTNode transform(org.kframework.kil.Definition node) { Definition definition = new Definition(context); this.definition = definition; Module singletonModule = node.getSingletonModule(); for (org.kframework.kil.Rule rule : singletonModule.getRules()) { if (!rule.containsAttribute(SymbolicBackend.SYMBOLIC) || rule.containsAttribute(Attribute.PREDICATE.getKey()) || rule.containsAttribute(Attribute.ANYWHERE.getKey())) { continue; } try { definition.addRule((Rule) rule.accept(this)); } catch (TransformerException e) { System.err.println(rule); System.err.flush(); e.printStackTrace(); } } for (String kLabelName : singletonModule.getModuleKLabels()) { definition.addKLabel(KLabelConstant.of(kLabelName, context)); } /* collect the productions which have the attributes strict and seqstrict */ Set<Production> productions = singletonModule.getSyntaxByTag("strict", context); productions.addAll(singletonModule.getSyntaxByTag("seqstrict", context)); for (Production production : productions) { definition.addFrozenKLabel(KLabelConstant.of(production.getKLabel(), context)); } this.definition = null; return definition; }
/** @param cmds represents the arguments/options given to krun command.. */ public static void execute_Krun(String cmds[]) { Context context = new Context(); K.init(context); CommandlineOptions cmd_options = new CommandlineOptions(); CommandLine cmd = cmd_options.parse(cmds); if (cmd == null) { printKRunUsageS(cmd_options); /* printKRunUsageE(cmd_options); */ /* TODO: Switch to this when the user has tried to use an experimental option. */ System.exit(1); } if (!cmd.hasOption("debug-info")) { Runtime.getRuntime() .addShutdownHook( new Thread() { public void run() { try { deleteDirectory(new File(K.krunTempDir)); } catch (IOException e) { e.printStackTrace(); } } }); } // set verbose if (cmd.hasOption("verbose")) { GlobalSettings.verbose = true; } // set fast-kast if (cmd.hasOption("fast-kast")) { GlobalSettings.fastKast = !GlobalSettings.fastKast; } if (GlobalSettings.verbose) sw.printIntermediate("Deleting temporary krun directory"); try { // Parse the program arguments if (cmd.hasOption("search") || cmd.hasOption("search-final") || cmd.hasOption("search-all") || cmd.hasOption("search-one-step") || cmd.hasOption("search-one-or-more-steps")) { K.maude_cmd = "search"; K.io = false; K.do_search = true; if (cmd.hasOption("search") && cmd.hasOption("depth")) { K.searchType = SearchType.STAR; } } if (cmd.hasOption("search-final")) { K.searchType = SearchType.FINAL; } if (cmd.hasOption("search-all")) { K.searchType = SearchType.STAR; } if (cmd.hasOption("search-one-step")) { K.searchType = SearchType.ONE; } if (cmd.hasOption("search-one-or-more-steps")) { K.searchType = SearchType.PLUS; } if (cmd.hasOption("help")) { K.help = true; } if (cmd.hasOption("help-experimental")) { K.helpExperimental = true; } if (cmd.hasOption("version")) { K.version = true; } // CLEANUP_OPTIONS: The option --directory was added, replacing --k-definition and // --compiled-def. if (cmd.hasOption("directory")) { K.directory = new File(cmd.getOptionValue("directory")).getCanonicalPath(); org.kframework.utils.Error.checkIfInputDirectory(K.directory); } if (cmd.hasOption("main-module")) { K.main_module = cmd.getOptionValue("main-module"); } if (cmd.hasOption("syntax-module")) { K.syntax_module = cmd.getOptionValue("syntax-module"); } if (cmd.hasOption("parser")) { K.customParser = cmd.getOptionValue("parser"); } if (cmd.hasOption("term")) { K.term = cmd.getOptionValue("term"); } if (cmd.hasOption("io")) { String v = cmd.getOptionValue("io"); if (v.equals("on")) K.io = true; else if (v.equals("off")) K.io = false; else Error.report("Unrecognized option: --io " + v + "\nUsage: krun --io [on|off]"); } if (cmd.hasOption("statistics")) { String v = cmd.getOptionValue("statistics"); if (v.equals("on")) K.statistics = true; else if (v.equals("off")) K.statistics = false; else Error.report( "Unrecognized option: --statistics " + v + "\nUsage: krun --statistics [on|off]"); } if (cmd.hasOption("color")) { String v = cmd.getOptionValue("color"); if (v.equals("on")) K.color = ColorSetting.ON; else if (v.equals("off")) K.color = ColorSetting.OFF; else if (v.equals("extended")) K.color = ColorSetting.EXTENDED; else Error.report( "Unrecognized option: --color " + v + "\nUsage: krun --color [on|off|extended]"); } if (cmd.hasOption("terminal-color")) { String v = cmd.getOptionValue("terminal-color"); Color terminalColor = ColorUtil.getColorByName(v); if (terminalColor != null) { K.terminalColor = terminalColor; } else { Error.report("Invalid terminal color: " + v); } } if (cmd.hasOption("parens")) { String v = cmd.getOptionValue("parens"); if (v.equals("greedy")) { K.parens = true; } else if (v.equals("smart")) { K.parens = false; } else { Error.report( "Unrecognized option: --parens " + v + "\nUsage: krun --parens [greedy|smart]"); } } // testcase generation if (cmd.hasOption("generate-tests")) { K.do_testgen = true; K.io = false; K.do_search = true; } if (cmd.hasOption("maude-cmd")) { K.maude_cmd = cmd.getOptionValue("maude-cmd"); } /* * if (cmd.hasOption("xsearch-pattern")) { K.maude_cmd = "search"; * K.do_search = true; K.xsearch_pattern = * cmd.getOptionValue("xsearch-pattern"); // * System.out.println("xsearch-pattern:" + K.xsearch_pattern); } */ if (cmd.hasOption("pattern")) { K.pattern = cmd.getOptionValue("pattern"); } if (cmd.hasOption("bound")) { K.bound = cmd.getOptionValue("bound"); } if (cmd.hasOption("depth")) { K.depth = cmd.getOptionValue("depth"); } if (cmd.hasOption("graph")) { K.showSearchGraph = true; } if (cmd.hasOption("output-mode")) { K.output_mode = cmd.getOptionValue("output-mode"); } if (cmd.hasOption("log-io")) { String v = cmd.getOptionValue("log-io"); if (v.equals("on")) K.log_io = true; else if (v.equals("off")) K.log_io = false; else Error.report("Unrecognized option: --log-io " + v + "\nUsage: krun --log-io [on|off]"); } if (cmd.hasOption("debug")) { K.debug = true; } if (cmd.hasOption("debug-gui")) { K.guidebug = true; } if (cmd.hasOption("trace")) { K.trace = true; } if (cmd.hasOption("profile")) { K.profile = true; } if (cmd.hasOption("ltlmc")) { K.model_checking = cmd.getOptionValue("ltlmc"); } if (cmd.hasOption("prove")) { K.prove = cmd.getOptionValue("prove"); } if (cmd.hasOption("smt")) { K.smt = cmd.getOptionValue("smt"); } if (cmd.hasOption("output")) { if (!cmd.hasOption("color")) { K.color = ColorSetting.OFF; } K.output = new File(cmd.getOptionValue("output")).getCanonicalPath(); } if (cmd.hasOption("c")) { if (K.term != null) { Error.report("You cannot specify both the term and the configuration\nvariables."); } K.configuration_variables = cmd.getOptionProperties("c"); String parser = null; for (Option opt : cmd.getOptions()) { if (opt.equals(cmd_options.getOptions().getOption("c")) && parser != null) { K.cfg_parsers.setProperty(opt.getValue(0), parser); } if (opt.equals(cmd_options.getOptions().getOption("cfg-parser"))) { parser = opt.getValue(); } } } if (cmd.hasOption("backend")) { K.backend = cmd.getOptionValue("backend"); } // printing the output according to the given options if (K.help) { printKRunUsageS(cmd_options); System.exit(0); } if (K.helpExperimental) { printKRunUsageE(cmd_options); System.exit(0); } if (K.version) { String msg = FileUtil.getFileContent(KPaths.getKBase(false) + KPaths.VERSION_FILE); System.out.println(msg); System.exit(0); } String[] remainingArguments = null; if (cmd_options.getCommandLine().getOptions().length > 0) { remainingArguments = cmd.getArgs(); } else { remainingArguments = cmds; } String programArg = new String(); if (remainingArguments.length > 0) { programArg = remainingArguments[0]; K.pgm = programArg; } String lang = null; if (K.pgm != null) { File pgmFile = new File(K.pgm); if (pgmFile.exists()) { lang = FileUtil.getExtension(K.pgm, ".", K.fileSeparator); } } if (GlobalSettings.verbose) sw.printIntermediate("Parsing command line options"); /* CLEANUP_OPTIONS */ if (!cmd.hasOption("directory")) { K.directory = new File(K.userdir).getCanonicalPath(); } { // search for the definition File[] dirs = new File(K.directory) .listFiles( new FilenameFilter() { @Override public boolean accept(File current, String name) { return new File(current, name).isDirectory(); } }); K.compiled_def = null; for (int i = 0; i < dirs.length; i++) { if (dirs[i].getAbsolutePath().endsWith("-kompiled")) { if (K.compiled_def != null) { String msg = "Multiple compiled definitions found."; GlobalSettings.kem.register( new KException( ExceptionType.ERROR, KExceptionGroup.CRITICAL, msg, "command line", new File(".").getAbsolutePath())); } else { K.compiled_def = dirs[i].getAbsolutePath(); } } } if (K.compiled_def == null) { String msg = "Could not find a compiled definition."; GlobalSettings.kem.register( new KException( ExceptionType.ERROR, KExceptionGroup.CRITICAL, msg, "command line", new File(".").getAbsolutePath())); } } if (K.compiled_def == null) { Error.report( "Could not find a compiled K definition. Please ensure that\neither a compiled K definition exists in the current directory with its default\nname, or that --directory has been specified."); } File compiledFile = new File(K.compiled_def); if (!compiledFile.exists()) { Error.report( "\nCould not find compiled definition: " + K.compiled_def + "\nPlease compile the definition by using `kompile'."); } context.dotk = new File(new File(K.compiled_def).getParent() + File.separator + ".k"); if (!context.dotk.exists()) { context.dotk.mkdirs(); } context.kompiled = new File(K.compiled_def); K.kdir = context.dotk.getCanonicalPath(); K.setKDir(); /* * System.out.println("K.k_definition=" + K.k_definition); * System.out.println("K.syntax_module=" + K.syntax_module); * System.out.println("K.main_module=" + K.main_module); * System.out.println("K.compiled_def=" + K.compiled_def); */ if (GlobalSettings.verbose) sw.printIntermediate("Checking compiled definition"); // in KAST variable we obtain the output from running kast process // on a program defined in K Term KAST = null; RunProcess rp = new RunProcess(); if (!context.initialized) { String path = K.compiled_def + "/defx-" + K.backend + ".bin"; Definition javaDef; if (new File(path).exists()) { javaDef = (Definition) BinaryLoader.load(K.compiled_def + "/defx-" + K.backend + ".bin"); } else { GlobalSettings.kem.register( new KException( ExceptionType.ERROR, KExceptionGroup.CRITICAL, "Could not find compiled definition for backend '" + K.backend + "'.\n" + "Please ensure this backend has been kompiled.")); throw new AssertionError("unreachable"); } if (GlobalSettings.verbose) sw.printIntermediate("Reading definition from binary"); // This is essential for generating maude javaDef = new FlattenModules(context).compile(javaDef, null); if (GlobalSettings.verbose) sw.printIntermediate("Flattening modules"); try { javaDef = (Definition) javaDef.accept(new AddTopCellConfig(context)); } catch (TransformerException e) { e.report(); } if (GlobalSettings.verbose) sw.printIntermediate("Adding top cell to configuration"); javaDef.preprocess(context); if (GlobalSettings.verbose) sw.printIntermediate("Preprocessing definition"); K.definition = javaDef; if (GlobalSettings.verbose) sw.printIntermediate("Importing tables"); K.kompiled_cfg = (org.kframework.kil.Configuration) BinaryLoader.load(K.compiled_def + "/configuration.bin"); CommandLine compileOptions = (CommandLine) BinaryLoader.load(K.compiled_def + "/compile-options.bin"); if (compileOptions.hasOption("sortCells")) GlobalSettings.sortedCells = true; if (GlobalSettings.verbose) sw.printIntermediate("Reading configuration from binary"); } if (!cmd.hasOption("main-module")) { K.main_module = K.definition.getMainModule(); } if (!cmd.hasOption("syntax-module")) { K.syntax_module = K.definition.getMainSyntaxModule(); } if (GlobalSettings.verbose) sw.printIntermediate("Resolving main and syntax modules"); if (K.pgm != null) { KAST = rp.runParserOrDie(K.getProgramParser(), K.pgm, false, null, context); } else { KAST = null; } if (GlobalSettings.verbose) sw.printIntermediate("Kast process"); if (K.term != null) { if (K.parser.equals("kast") && !cmd.hasOption("parser")) { if (K.backend.equals("java")) { K.parser = "kast -ruleParser"; } else { K.parser = "kast -groundParser"; } } } GlobalSettings.kem.print(); if (!K.debug && !K.guidebug) { normalExecution(KAST, lang, rp, cmd_options, context); } else { if (K.do_search) { Error.report( "Cannot specify --search with --debug. In order to search\nnside the debugger, use the step-all command."); } if (K.guidebug) guiDebugExecution(KAST, lang, null, context); else debugExecution(KAST, lang, null, context); } } catch (IOException e) { e.printStackTrace(); System.exit(1); } }
// execute krun in normal mode (i.e. not in debug mode) public static void normalExecution( Term KAST, String lang, RunProcess rp, CommandlineOptions cmd_options, Context context) { try { CommandLine cmd = cmd_options.getCommandLine(); KRun krun = obtainKRun(context); KRunResult<?> result = null; // Set<String> varNames = null; Rule patternRule = null; RuleCompilerSteps steps; steps = new RuleCompilerSteps(K.definition, context); try { if (cmd.hasOption("pattern") || "search".equals(K.maude_cmd)) { org.kframework.parser.concrete.KParser.ImportTbl(K.compiled_def + "/def/Concrete.tbl"); ASTNode pattern = DefinitionLoader.parsePattern(K.pattern, "Command line pattern", context); CollectVariablesVisitor vars = new CollectVariablesVisitor(context); pattern.accept(vars); // varNames = vars.getVars().keySet(); try { pattern = steps.compile(new Rule((Sentence) pattern), null); } catch (CompilerStepDone e) { pattern = (ASTNode) e.getResult(); } patternRule = new Rule((Sentence) pattern); if (GlobalSettings.verbose) sw.printIntermediate("Parsing search pattern"); } if (K.do_search) { if ("search".equals(K.maude_cmd)) { BufferedReader br = new BufferedReader(new InputStreamReader(System.in)); String buffer = ""; // detect if the input comes from console or redirected // from a pipeline Console c = System.console(); if (c == null && br.ready()) { try { buffer = br.readLine(); } catch (IOException ioe) { ioe.printStackTrace(); } finally { if (br != null) { try { br.close(); } catch (IOException e) { e.printStackTrace(); } } } } Integer depth = null; Integer bound = null; if (cmd.hasOption("bound") && cmd.hasOption("depth")) { bound = Integer.parseInt(K.bound); depth = Integer.parseInt(K.depth); } else if (cmd.hasOption("bound")) { bound = Integer.parseInt(K.bound); } else if (cmd.hasOption("depth")) { depth = Integer.parseInt(K.depth); } if (K.do_testgen) { result = krun.generate( bound, depth, K.searchType, patternRule, makeConfiguration(KAST, buffer, rp, (K.term != null), context), steps); } else { result = krun.search( bound, depth, K.searchType, patternRule, makeConfiguration(KAST, buffer, rp, (K.term != null), context), steps); } if (GlobalSettings.verbose) sw.printTotal("Search total"); } else { Error.report("For the search option you must specify that --maude-cmd=search"); } } else if (K.model_checking.length() > 0) { // run kast for the formula to be verified File formulaFile = new File(K.model_checking); Term KAST1 = null; if (!formulaFile.exists()) { // Error.silentReport("\nThe specified argument does not exist as a file on the disc; it // may represent a direct formula: " // + K.model_checking); // assume that the specified argument is not a file and // maybe represents a formula KAST1 = rp.runParserOrDie("kast -e", K.model_checking, false, "LtlFormula", context); } else { // the specified argument represents a file KAST1 = rp.runParserOrDie("kast", K.model_checking, false, "LtlFormula", context); } result = krun.modelCheck(KAST1, makeConfiguration(KAST, null, rp, (K.term != null), context)); if (GlobalSettings.verbose) sw.printTotal("Model checking total"); } else if (K.prove.length() > 0) { File proofFile = new File(K.prove); if (!proofFile.exists()) { Error.report("Cannot find the file containing rules to prove"); } String content = FileUtil.getFileContent(proofFile.getAbsoluteFile().toString()); Definition parsed = DefinitionLoader.parseString(content, proofFile.getAbsolutePath(), context); Module mod = parsed.getSingletonModule(); try { mod = new SpecificationCompilerSteps(context).compile(mod, null); } catch (CompilerStepDone e) { assert false : "dead code"; } result = krun.prove(mod); } else if (cmd.hasOption("depth")) { int depth = Integer.parseInt(K.depth); result = krun.step(makeConfiguration(KAST, null, rp, (K.term != null), context), depth); if (GlobalSettings.verbose) sw.printTotal("Bounded execution total"); } else { result = krun.run(makeConfiguration(KAST, null, rp, (K.term != null), context)); if (GlobalSettings.verbose) sw.printTotal("Normal execution total"); } if (cmd.hasOption("pattern") && !K.do_search) { Object krs = result.getResult(); if (krs instanceof KRunState) { Term res = ((KRunState) krs).getRawResult(); krun.setBackendOption("io", false); result = krun.search(null, null, K.searchType, patternRule, res, steps); } else { Error.report( "Pattern matching after execution is not supported by search\nand model checking"); } } } catch (KRunExecutionException e) { rp.printError(e.getMessage(), lang, context); System.exit(1); } catch (TransformerException e) { e.report(); } catch (UnsupportedBackendOptionException e) { Error.report("Backend \"" + K.backend + "\" does not support option " + e.getMessage()); } if ("pretty".equals(K.output_mode)) { String output = result.toString(); if (!cmd.hasOption("output")) { AnsiConsole.out.println(output); } else { writeStringToFile(new File(K.output), output); } // print search graph if ("search".equals(K.maude_cmd) && K.do_search && K.showSearchGraph) { System.out.println(K.lineSeparator + "The search graph is:" + K.lineSeparator); @SuppressWarnings("unchecked") KRunResult<SearchResults> searchResult = (KRunResult<SearchResults>) result; AnsiConsole.out.println(searchResult.getResult().getGraph()); // offer the user the possibility to turn execution into // debug mode while (true) { System.out.print(K.lineSeparator + "Do you want to enter in debug mode? (y/n):"); BufferedReader stdin = new BufferedReader(new InputStreamReader(System.in)); String input = stdin.readLine(); if (input == null) { K.debug = false; K.guidebug = false; System.out.println(); break; } if (input.equals("y")) { K.debug = true; debugExecution(KAST, lang, searchResult, context); } else if (input.equals("n")) { K.debug = false; K.guidebug = false; break; } else { System.out.println("You should specify one of the possible answers:y or n"); } } } } else if ("raw".equals(K.output_mode)) { String output = result.getRawOutput(); ; if (!cmd.hasOption("output")) { System.out.println(output); } else { writeStringToFile(new File(K.output), output); } } else if ("none".equals(K.output_mode)) { System.out.print(""); } else if ("binary".equals(K.output_mode)) { Object krs = result.getResult(); if (krs instanceof KRunState) { Term res = ((KRunState) krs).getRawResult(); if (!cmd.hasOption("output")) { Error.silentReport( "Did not specify an output file. Cannot print output-mode binary to\nstandard out. Saving to .k/krun/krun_output"); BinaryLoader.save(K.krun_output, res); } else { BinaryLoader.save(K.output, res); } } else { Error.report("binary output mode is not supported by search and model\nchecking"); } } else { Error.report(K.output_mode + " is not a valid value for output-mode option"); } System.exit(0); } catch (IOException e) { e.printStackTrace(); System.exit(1); } }