added fleet api classes
[fleet.git] / src / edu / berkeley / fleet / FleetParser.java
index 7cd3dee..209889c 100644 (file)
@@ -9,51 +9,221 @@ import edu.berkeley.sbp.util.*;
 import java.util.*;
 import java.io.*;
 
+/**
+ *  @author Adam Megacz <megacz@cs.berkeley.edu>
+ *  @author Thomas Kho <tkho@eecs.berkeley.edu>
+ */
 public class FleetParser {
 
+    public static boolean dump_fabric = false;
+    public static boolean dump_code = false;
+
     public static void main(String[] s) throws Exception {
+        for(int i=0; i<s.length; i++) {
+            if (s[i].startsWith("--color=")) {
+                String val = s[i].substring(s[i].indexOf('=')+1);
+                if (val.equals("on")) {
+                    Log.ansi_color = true;
+                    continue;
+                } else if (val.equals("off")) {
+                    Log.ansi_color = false;
+                    continue;
+                }
+            } else if (s[i].startsWith("--dump-fabric")) {
+                dump_fabric = true;
+                continue;
+            } else if (s[i].startsWith("--dump-code")) {
+                dump_code = true;
+                continue;
+
+            } else if (s[i].startsWith("--memory=")) {
+                String val = s[i].substring(s[i].indexOf('=')+1);
+                if (val.equals("hide")) {
+                    debugMemory = false;
+                    continue;
+                } else if (val.equals("show")) {
+                    debugMemory = true;
+                    continue;
+                }
+            }
+            System.out.println("Fleeterpreter usage:");
+            System.out.println("");
+            System.out.println("  --dump-fabric");
+            System.out.println("  --dump-code");
+            System.out.println("  --color={on|off}");
+            System.out.println("  --inboxes={configured|unconfigured}");
+            System.out.println("  --memory={hide|show}");
+            System.exit(-1);
+        }
+        go(new InputStreamReader(System.in));
+    }
+
+    public static void go(Reader r) throws Exception {
+        Fleet fleet = new Fleet();
+        FleetParser fp = new FleetParser(fleet);
+        fp.walk((Tree<String>)parse(r));
+        fp.done();
+    }
 
+    public static Tree<String> parse(Reader r) throws Exception {
         InputStream grammarStream =
             FleetParser.class.getClassLoader().getResourceAsStream("fleet.g");
-
         Parser metaGrammarParser   = new CharParser(MetaGrammar.newInstance());
         Tree<String> parsedGrammar = metaGrammarParser.parse(new CharInput(grammarStream)).expand1();
-        Grammar.Bindings gbr       = new AnnotationGrammarBindings(Program.class);
-        Union   mathGrammar        = Grammar.create(parsedGrammar, "s", gbr);
-        Parser  mathParser         = new CharParser(mathGrammar);
+        Union   grammar            = Grammar.create(parsedGrammar, "s", new Grammar.Bindings() { });
+        Parser  parser             = new CharParser(grammar);
+        Tree tree = parser.parse(new CharInput(r)).expand1();
+        return tree;
+    }
+
+    private Fleet fleet;
+    private ArrayList<String> imports = new ArrayList<String>();
+    private CodeBag rootCodeBag;
+    private static boolean debugMemory = true;
 
-        System.out.println("about to parse: tests/test.fleet");
-        Tree tree = mathParser.parse(new CharInput(System.in)).expand1();
+    public FleetParser(Fleet fleet) {
+        this.fleet = fleet;
+    }
 
-        // below is ugly voodoo which will go away very soon.  ignore it.
-        TreeFunctor tf = (TreeFunctor)tree.head();
-        Program program = (Program)tf.invoke(tree);
-        // above is ugly voodoo which will go away very soon.  ignore it.
+    public void done() {
+        if (dump_fabric) {
+            fleet.dumpFabric(false);
 
-        System.out.println();
-        System.out.println("dispatching root codebag:");
-        System.out.println(program.root);
+        } else if (dump_code) {
+            fleet.dumpFabric(true);
+            try {
+                rootCodeBag.dump(fleet);
+            } catch (Exception e) { throw new RuntimeException(e); }
 
-        Fleet fleet = new Fleet();
-        program.configure(fleet);
+        } else if (rootCodeBag != null) {
+            if (debugMemory) { fleet.dumpMem(); }
+            System.out.println(rootCodeBag);
+            rootCodeBag.dispatch(fleet);
+            fleet.go();
+            if (debugMemory) { fleet.dumpMem(); }
+        }
+    }
 
-        System.out.println("memory before execution:");
-        System.out.print("  ");
-        for(int i=0; i<fleet.mem.length; i++)
-            System.out.print(fleet.mem[i] + " ");
-        System.out.println();
+    public void walk(Tree<String> t) {
+        String head = t.head();
+        if (head==null) {
+        } else if (head.equals("Program")) {
+            for(Tree<String> tc : t.child(0))
+                walk(tc);
+            CodeBag cb = new CodeBag(null, null);
+            if (t.size()>1)
+                for(Tree<String> statement : t.child(1))
+                    fillCodeBag(statement, cb);
+            rootCodeBag = cb;
+   
+        } else if (head.equals("Import")) {
+            imports.add(string(t.child(0)));
 
-        System.out.println();
-        System.out.println("enabling execution...");
-        fleet.go();
-        System.out.println("execution halted.");
+        } else if (head.equals("Ship")) {
+            String name = name(t.child(0));
+            String classname = string(t.child(1));
+            boolean good = false;
+            for(String s : imports)
+                if (fleet.tryCreate(s+"."+classname, name)) {
+                    good = true;
+                    break;
+                }
+            if (!good)
+                throw new RuntimeException("couldn't find a ship called \""+classname+"\"");
 
-        System.out.println();
-        System.out.println("memory after execution:");
-        System.out.print("  ");
-        for(int i=0; i<fleet.mem.length; i++)
-            System.out.print(fleet.mem[i] + " ");
-        System.out.println();
+        } else if (head.equals("Include")) {
+            try {
+                walk(parse(new InputStreamReader(new FileInputStream(string(t.child(0))))));
+            } catch (Exception e) {
+                throw new RuntimeException(e);
+            }
+            
+        } else if (head.equals("Memory")) {
+            if (fleet.mem.length != 0)
+                throw new RuntimeException("multiple memory directives found");
+            Tree<String> m = t.child(0);
+            int[] mem = new int[m.size()];
+            for(int i=0; i<mem.length; i++)
+                mem[i] = Integer.parseInt(string(m.child(i)));
+            fleet.mem = mem;
+        }
     }
 
+    public String string(Tree<String> t) {
+        String ret = "";
+        if (t.head() != null) ret += t.head();
+        for(Tree<String> c : t)
+            ret += string(c);
+        return ret;
+    }
+
+    public String name(Tree<String> t) {
+        return string(t.child(0))+string(t.child(1));
+    }
+
+    public PortReference portReference(Tree<String> t) {
+        if (!"Port".equals(t.head())) return null;
+        return new PortReference(name(t.child(0)), name(t.child(1)));
+    }
+
+    public void fillCodeBag(Tree<String> t, CodeBag cb) {
+        if (t.head()==null) return;
+        else if (t.head().equals("NamedCodeBag")) {
+            CodeBag cb2 = new CodeBag(cb, name(t.child(0)));
+            for(Tree<String> statement : t.child(1))
+                fillCodeBag(statement, cb2);
+
+        } else if (t.head().equals("Literal")) {
+            int literal = Integer.parseInt(string(t.child(0)));
+            PortReference benkobox = portReference(t.child(1));
+            cb.add(new Literal.LiteralDatum(literal, benkobox, false, 1));
+
+        } else if (t.head().equals("Fiber")) {
+            PortReference benkobox = portReference(t.child(0));
+            
+            for(Tree tt : t.child(1)) {
+                int count = 1;
+                Tree ttx = null;
+                if (tt.size() > 1 && tt.child(0).size()>0) {
+                    System.out.println(tt.child(0));
+                    if (tt.child(0).size() > 0 && "Star".equals(tt.child(0).child(0).head())) count=Integer.MAX_VALUE;
+                    else count = Integer.parseInt(string(tt.child(0)));
+                }
+                ttx = tt.child(1);
+                boolean tokenIn = false;
+                boolean dataIn = false;
+                boolean latch = false;
+                boolean dataOut = false;
+                boolean tokenOut = false;
+                PortReference dest = null;
+                for(int i=0; i<ttx.size(); i++) {
+                    Tree ttt = ttx.child(i);
+                    if      ("Wait".equals(ttt.head()))    { tokenIn = true; }
+                    else if ("Discard".equals(ttt.head())) { dataIn = true; latch = false; }
+                    else if ("Take".equals(ttt.head()))    { dataIn = true; latch = true; }
+                    else if ("SendTo".equals(ttt.head()))  { dataOut = true; dest = portReference(ttt.child(0)); }
+                    else if ("Accept".equals(ttt.head()))  { dataOut = true;  }
+                    else if ("Ack".equals(ttt.head()))     { tokenOut = true; dest = portReference(ttt.child(0)); }
+                }
+                cb.add(new Instruction(benkobox, dest, count, dataIn, latch, tokenOut, tokenIn, dataOut));
+            }
+        }
+            /*
+            if (t.child(1).head() == null) {
+                int literal = Integer.parseInt(string(t.child(1)));
+                cb.add(new Literal.LiteralDatum(literal, d, false, count));
+
+            } else if ("AnonymousCodeBag".equals(t.child(1).head())) {
+                CodeBag cb3 = new CodeBag(cb, null);
+                for(Tree<String> tc : t.child(1).child(0))
+                    fillCodeBag(tc, cb3);
+                cb.add(new Literal.LiteralDatum(cb3.getDescriptor(), d, true));
+
+            } else if ("CodeBagRef".equals(t.child(1).head())) {
+                cb.add(new Literal.CodeBagRef(name(t.child(1).child(0)), cb, d));
+
+            } else if ("ShipSpecific".equals(t.child(1).head())) {
+                cb.add(new Literal.ShipSpecific(string(t.child(1).child(0)), d, count));
+            */
+    }
 }