mild overhaul of Interpreter; now capable of performing MergeSort
[fleet.git] / src / edu / berkeley / fleet / interpreter / InterpreterDock.java
index a0e8dc5..5c7e9ec 100644 (file)
 package edu.berkeley.fleet.interpreter;
-import edu.berkeley.fleet.api.*;
-import edu.berkeley.fleet.api.Dock;
-import edu.berkeley.fleet.two.*;
 import java.util.*;
+import edu.berkeley.fleet.two.*;
+import edu.berkeley.fleet.api.*;
+import edu.berkeley.sbp.util.ANSI;
 
+/** anything that has a source (instruction horn) address on the switch fabric */
+class InterpreterDock extends FleetTwoDock {
 
-/** anything that has a destination address on the switch fabric */
-public abstract class InterpreterDock extends FleetTwoDock {
-        
-    private final InterpreterShip ship;
-    private final Destination[] ports;
-    private final int addr = max_addr++;
+    // Dock State //////////////////////////////////////////////////////////////////////////////
     
-    public InterpreterDock(InterpreterShip ship, String[] ports, DockDescription bbd) {
-        super(ship, bbd);
-        this.ship = ship;
-        this.ports = new Destination[ports.length];
-        for(int i=0; i<ports.length; i++)
-            this.ports[i] =
-                new InterpreterDockDestination(ports[i], this, false);
-    }
+    boolean         flag_a = false;
+    boolean         flag_b = false;
+    boolean         flag_c = false;
+    boolean         flag_d = false;
+    int             ilc    = 1;
+    int             olc    = 1;
+    final BitVector dataLatch = new BitVector(getShip().getFleet().getWordWidth());
+    InterpreterPath pathLatch = null;
+    boolean         requeueStageInCirculatingState = false;
+    boolean         flushing = false;
+
+    LinkedList<Instruction> instructions = new LinkedList<Instruction>();
+    LinkedList<Packet> dataPackets = new LinkedList<Packet>();
+
+    // HACK
+    private LinkedList<Packet> instructionsBackedUpIntoSwitchFabric = new LinkedList<Packet>();
+
+    boolean dataReadyForShip = false;
+    boolean readyForDataFromShip = true;
+
+    // FIXME: should be a BitVector
+    long dataFromShip;
+    boolean flagCFromShip;
 
-    public Path getPath(Destination d, BitVector signal) {
-        throw new RuntimeException();
+    protected void reset() {
+        ilc = 1;
+        olc = 1;
+        flag_a = false;
+        flag_b = false;
+        flag_c = false;
+        flag_d = false;
+        dataLatch.set(0);
+        pathLatch = null;
+        requeueStageInCirculatingState = false;
+        instructions.clear();
+        dataPackets.clear();
+        instructionsBackedUpIntoSwitchFabric.clear();
+        dataReadyForShip = false;
+        readyForDataFromShip = true;
+        flushing = false;
     }
 
-    public Iterable<Destination> getDestinations() {
-        HashSet<Destination> ret = new HashSet<Destination>();
-        for(Destination d : ports) ret.add(d);
-        return ret;
+    // Destinations //////////////////////////////////////////////////////////////////////////////
+
+    /** includes the epilogue fifo */
+    public InterpreterDestination instructionDestination = new InterpreterDestination(this) {
+            public String toString() { return getDock()+":i"; }
+            public void addDataFromFabric(Packet p) { addInstruction(p); }
+        };
+    public InterpreterDestination dataDestination = new InterpreterDestination(this) {
+            public String toString() { return getDock()+""; }
+            public void addDataFromFabric(Packet packet) { dataPackets.add(packet); }
+        };
+
+    InterpreterDock(InterpreterShip ship, DockDescription bbd) {
+        super(ship, bbd);
+        ship.docks.put(bbd.getName(), this);
     }
 
-    public Destination getInstructionDestination() {
-        return ports[0];
+    public Path getPath(Destination d, BitVector signal) { return new InterpreterPath(this, (InterpreterDestination)d, signal); }
+    public Destination getInstructionDestination() { return instructionDestination; }
+    public Destination getDataDestination() { return dataDestination; }
+    public int getInstructionFifoSize() { return Integer.MAX_VALUE; }
+    public Interpreter getInterpreter() { return ((InterpreterShip)getShip()).getInterpreter(); }
+
+    boolean trace = false;
+
+    private void addInstruction(Packet p) {
+        if (p.isToken() ||
+            instructionsBackedUpIntoSwitchFabric.size()!=0 ||
+            requeueStageInCirculatingState ||
+            (p2i(p) instanceof Instruction.Tail)) {
+            instructionsBackedUpIntoSwitchFabric.add(p);
+        } else {
+            instructions.add(p2i(p));
+        }
     }
-    public Destination getDataDestination() {
-        return ports[0];
+    
+    private Instruction p2i(Packet p) {
+        if (p.isToken()) throw new RuntimeException();
+        return getInterpreter().decodeInstruction(p.getValue(), InterpreterDock.this /* this is wrong, but harmless */);
     }
 
+    protected final void service() {
 
-    /** adds the included datum to the port from the switch fabric  side */
-    public abstract void addDataFromFabric(Packet packet);
+        if (dataReadyForShip || flushing) return;
+        if (instructions.size()==0) return;
 
-    abstract void service();
+        if (instructions.peek() instanceof Instruction.Head) {
+            if (requeueStageInCirculatingState) { instructions.remove(); return; }
+            Packet p = instructionsBackedUpIntoSwitchFabric.peek();
+            if (p!=null && !p.isToken() && p2i(p) instanceof Instruction.Tail) {
+                instructionsBackedUpIntoSwitchFabric.remove();
+                requeueStageInCirculatingState = true;
+                instructions.remove();
+            }
+            return;
+        }
 
-    abstract void   shutdown();
+        // in the while..false idiom block below, use "break" to
+        // consume the instruction at instructions.peek(), or "return"
+        // to leave it and retry on the next call.
+        do {
+            if (!instructions.peek().predicate.evaluate(flag_a, flag_b, flag_c, flag_d))
+                break;
 
-    public   Ship   getShip()                  { return ship; }
-    public   Fleet  getFleet()                 { return getShip().getFleet(); }
-    public   String toString()                 { return ship+"."+getName(); }
-    public   int    getInstructionFifoSize() { return 4; }
-    
-    Interpreter getInterpreter() { return ((InterpreterShip)getShip()).getInterpreter(); }
+            if (instructions.peek() instanceof Instruction.Move) {
+                Instruction.Move move = (Instruction.Move)instructions.peek();
 
-    public long getDestAddr() { return addr; }
+                if (ilc==0) { ilc = 1; break; }
 
-    private static int max_addr;
-    private class InterpreterDockDestination extends InterpreterDestination {
-        public String name;
-        public long addr = max_addr++;
-        public InterpreterDockDestination(String name, InterpreterDock id, boolean isInstructionDestination) {
-            super(id, isInstructionDestination);
-            this.name = name;
-        }
-        public String getDestinationName()               { return name; }
-        public Ship getShip()                    { return InterpreterDock.this.getShip(); }
-        public void addDataFromFabric(Packet packet) { InterpreterDock.this.addDataFromFabric(packet); }
-        public String toString()                 { return getShip()+"."+getName(); }
-        public long getDestAddr() { return addr; }
+                if (move.interruptible) {
+                    Packet p = instructionsBackedUpIntoSwitchFabric.peek();
+                    if (p!=null && p.isToken()) {
+                        instructionsBackedUpIntoSwitchFabric.remove();
+                        ilc = 1;
+                        flag_d = true;
+                        break;
+                    }
+                }
+
+                if (move.dataIn  && !isInputDock() && readyForDataFromShip)  return;
+                if (move.dataIn  &&  isInputDock() && dataPackets.size()==0) return;
+                if (move.tokenIn &&                   dataPackets.size()==0) return;
+
+                if (move.tokenIn) {
+                    Packet p = dataPackets.remove();
+                    flag_c = p.getSignal().get(0);
+                }
+                if (move.dataIn) {
+                    BitVector bv = null;
+                    if (isInputDock()) {
+                        Packet p = dataPackets.remove();
+                        bv = new BitVector(p.getValue());
+                        flag_c = p.getSignal().get(0);
+                    } else {
+                        bv = new BitVector(getInterpreter().getWordWidth()).set(dataFromShip);
+                        readyForDataFromShip = true;
+                        if (move.latchData) flag_c = flagCFromShip;
+                    }
+                    if (move.latchData) dataLatch.set(bv);
+                    if (move.latchPath) {
+                        BitVector bvp = ((FleetTwoFleet)getShip().getFleet()).DISPATCH_PATH.getvalAsBitVector(bv);
+                        pathLatch = (InterpreterPath)getInterpreter().getPathByAddr(this, bvp);
+                    }
+                }
+                
+                if (move.path != null) pathLatch = (InterpreterPath)move.path;
+                
+                if (move.dataOut && isInputDock())  dataReadyForShip = true;
+                if (move.dataOut && !isInputDock()) new Packet(pathLatch, new BitVector(dataLatch), false).send();
+                if (move.tokenOut)                  new Packet(pathLatch, new BitVector(getInterpreter().getWordWidth()), true).send();
+                
+                if (ilc==1)  break;
+                if (ilc!=-1) ilc--;
+                return;
+
+            } else if (instructions.peek() instanceof Instruction.Abort) {
+                requeueStageInCirculatingState = false;
+                LinkedList<Packet> temp = new LinkedList<Packet>();
+                while (instructionsBackedUpIntoSwitchFabric.size()!=0)
+                    temp.add(instructionsBackedUpIntoSwitchFabric.remove());
+                while (temp.size()!=0)
+                    addInstruction(temp.remove());
+                break;
+
+            } else if (instructions.peek() instanceof Instruction.Flush) {
+                flushing = true;
+                break;
+
+            } else if (instructions.peek() instanceof Instruction.Shift) {
+                Instruction.Shift shift = (Instruction.Shift)instructions.peek();
+                for(int i=dataLatch.length()-1; i>=getShip().getFleet().getShiftWidth(); i--)
+                    dataLatch.set(i, dataLatch.get(i-getShip().getFleet().getShiftWidth()));
+                BitVector shift_immediate = shift.immediate.getBitVector();
+                for(int i=getShip().getFleet().getShiftWidth()-1; i>=0; i--)
+                    dataLatch.set(i, shift_immediate.get(i));
+                break;
+
+            } else if (instructions.peek() instanceof Instruction.Set) {
+                Instruction.Set set = (Instruction.Set)instructions.peek();
+                switch(set.dest) {
+                    case DataLatch: dataLatch.setAndSignExtend(set.immediate);
+                    break;
+                    case InnerLoopCounter:
+                        switch(set.source) {
+                            case Infinity:  ilc = -1; break;
+                            case Immediate: ilc = (int)set.immediate; break;
+                            case DataLatch:
+                                ilc = 0;
+                                for(int i=0; i<((FleetTwoFleet)getShip().getFleet()).SET_ILC_FROM_IMMEDIATE.valmaskwidth-1; i++)
+                                    if (dataLatch.get(i))
+                                        ilc |= (1 << i);
+                                break;
+                            default: throw new RuntimeException("impossible");
+                        }
+                        break;
+                    case OuterLoopCounter:
+                        switch(set.source) {
+                            case Decrement: olc = Math.max(0,olc-1); break;
+                            case Immediate: olc = (int)set.immediate; break;
+                            case DataLatch:
+                                olc = 0;
+                                for(int i=0; i<getShip().getFleet().getWordWidth(); i++)
+                                    if (dataLatch.get(i))
+                                        olc |= (1 << i);
+                                break;
+                            default: throw new RuntimeException("impossible");
+                        }
+                        flag_d = olc==0;
+                        break;
+                        
+                    case Flags: {
+                        boolean new_flag_a = set.newFlagA.evaluate(flag_a, flag_b, flag_c, flag_d);
+                        boolean new_flag_b = set.newFlagB.evaluate(flag_a, flag_b, flag_c, flag_d);
+                        flag_a = new_flag_a;
+                        flag_b = new_flag_b;
+                        break;
+                    }
+                    default: throw new RuntimeException("FIXME!");
+                }
+            } else {
+                throw new RuntimeException("unimplemented instruction: " + instructions.peek());
+            }
+        } while(false);
+
+        if (requeueStageInCirculatingState)
+            instructions.add(instructions.peek());
+        instructions.remove();
+        return;
     }
+
+    // Interface for use by Subclasses ///////////////////////////////////////////////////////////////////////
+
+    // all the methods below convert 64-bit longs to/from
+    // getWordWidth()-bit BitVectors by truncation and sign-extension.
+
+    protected boolean dataReadyForShip() { return dataReadyForShip; }
+    protected final boolean readyForDataFromShip() { return readyForDataFromShip; }
+    protected long removeDataForShip() {
+        long val = peekDataForShip();
+        dataReadyForShip = false;
+        return val;
+    }
+    protected long peekDataForShip() {
+        if (!dataReadyForShip)
+            throw new RuntimeException("peekDataForShip() invoked when dataReadyForShip()==false");
+        return dataLatch.toLong();
+    }
+    protected void addDataFromShip(long data) { addDataFromShip(data, false); }
+    protected void addDataFromShip(long data, boolean pending_flag_c) {
+        if (!readyForDataFromShip())
+            throw new RuntimeException("addDataFromShip() invoked when readyForDataFromShip()");
+        readyForDataFromShip = false;
+        dataFromShip = data;
+        flagCFromShip = pending_flag_c;
+    }
+
+
+    // Debugging //////////////////////////////////////////////////////////////////////////////
+
+    public void dumpState() {
+        if (instructions.size()==0 &&
+            dataPackets.size()==0 &&
+            instructionsBackedUpIntoSwitchFabric.size()==0 &&
+            !requeueStageInCirculatingState &&
+            !flushing &&
+            !dataReadyForShip &&
+            readyForDataFromShip)
+            return;
+        System.out.println("state of "+ANSI.green(this)+": "+
+                           (ilc==1?"":("[ilc="+(ilc==-1 ? "*" : (ilc+""))+"] "))+
+                           (olc==1?"":("[olc="+olc+"] "))+
+                           (flag_a?"[a] ":"")+
+                           (flag_b?"[b] ":"")+
+                           (flag_c?"[c] ":"")+
+                           (flag_d?"[d] ":"")+
+                           (requeueStageInCirculatingState?"[recirculating] ":"")+
+                           (flushing?"[flushing] ":"")
+                           );
+        if (!readyForDataFromShip)
+            System.out.println(ANSI.cyan("  ship has proffered: " + dataFromShip));
+        if (dataReadyForShip)
+            System.out.println(ANSI.cyan("  waiting for ship to accept: " + dataLatch.toLong()));
+        for(Instruction i : instructions)
+            System.out.println(ANSI.red("  "+i));
+        for(Packet i : instructionsBackedUpIntoSwitchFabric)
+            System.out.println(ANSI.red(ANSI.bold("  "+i+" BACKED UP")));
+        for(Packet p : dataPackets)
+            System.out.println(ANSI.cyan("  "+p));
+    }
+
 }