checkpoint
[slipway.git] / src / edu / berkeley / obits / device / atmel / At40k.java
index 5398ec3..350f3fb 100644 (file)
@@ -1,5 +1,8 @@
 package edu.berkeley.obits.device.atmel;
-import static edu.berkeley.obits.device.atmel.AtmelDevice.Constants.*;
+
+import com.atmel.fpslic.*;
+import static com.atmel.fpslic.Fpslic.Constants.*;
+import static com.atmel.fpslic.Fpslic.Util.*;
 import edu.berkeley.obits.*;
 import org.ibex.util.*;
 import java.util.*;
@@ -7,18 +10,18 @@ import java.io.*;
 
 public class At40k {
 
-    /*private*/public final AtmelDevice dev;
+    /*private*/public final Fpslic dev;
     private final int width;
     private final int height;
 
-    public At40k(AtmelDevice dev, int width, int height) {
+    public At40k(Fpslic dev, int width, int height) {
         this.width = width;
         this.height = height;
         this.dev = dev;
     }
 
     public static class At40k10 extends At40k {
-        public At40k10(AtmelDevice dev) { super(dev, 24, 24); }
+        public At40k10(Fpslic dev) { super(dev, 24, 24); }
     }
 
     public final class Sector {
@@ -148,6 +151,13 @@ public class At40k {
         public final int col;
         public final int row;
 
+        public Cell(int col, int row) {
+            this.row = row;
+            this.col = col;
+        }
+        
+        // Accessors for Neighbors //////////////////////////////////////////////////////////////////////////////
+
         public SectorWire hwire(int plane)  { return new SectorWire(true, plane, col, row); }
         public SectorWire vwire(int plane)  { return new SectorWire(false, plane, col, row); }
         public Cell east() { return cell(col+1, row); }
@@ -158,19 +168,14 @@ public class At40k {
         public Cell nw() { return cell(col-1, row+1); }
         public Cell se() { return cell(col+1, row-1); }
         public Cell sw() { return cell(col-1, row-1); }
-
         public Sector sector() { return new Sector(this); }
-        public Cell(int col, int row) {
-            this.row = row;
-            this.col = col;
-        }
 
         /* bit positions mean:  [MSB] zxy z_y zx_ z__ _xy __y _x_ ___ [LSB] */
         public void lut(int xlut, int ylut) { xlut(xlut); ylut(ylut); }
         public void xlut(int table)    { dev.mode4(7, row, col, (byte)(table & 0xff)); }
         public byte xlut()             { return (byte)(dev.mode4(7, row, col) & 0xff); }
         public String printXLut()      { return printLut(xlut(), "x", "y", "t"); }
-        public String printXLutX()     { return printLut(xlut(), str(xi(), "x"), str(yi(), "y"), str(ti(), "t")); }
+        public String printXLutX()     { return printLut(xlut(), str(xi(), "x"), str(yi(), "y"), str(ti_source(), "t")); }
 
         public String str(int x, String def) {
             switch(x) {
@@ -196,11 +201,16 @@ public class At40k {
         public void ylut(int table)    { dev.mode4(6, row, col, (byte)(table & 0xff)); }
         public byte ylut()             { return (byte)(dev.mode4(6, row, col) & 0xff); }
         public String printYLut()      { return printLut(ylut(), "y", "x", "t"); }
-        public String printYLutX()     { return printLut(ylut(), str(yi(), "y"), str(xi(), "x"), str(ti(), "t")) + Integer.toString(ylut() & 0xff, 16); }
+        public String printYLutX()     { return printLut(ylut(), str(yi(), "y"), str(xi(), "x"), str(ti_source(), "t")) + Integer.toString(ylut() & 0xff, 16); }
 
         public void ff_reset_value(boolean value) {
             //dev.mode4( /* FIXME WRONG!!! */, row, col, 3, !value); return;
         }
+        /** FIXME!!! */
+        public boolean ff_reset_value() { return false; }
+        public boolean columnClocked() {
+            return false;
+        }
 
         public void out(int plane, boolean enable) {
             switch(plane) {
@@ -268,7 +278,8 @@ public class At40k {
             }
         }
         
-        public int ti() {
+
+        public int ti_source() {
             switch(dev.mode4(1, row, col) & 0x30) {
                 case 0x20: return zi();
                 case 0x10: return FB;
@@ -276,24 +287,54 @@ public class At40k {
                 default: throw new Error("ack!");
             }
         }
+
+        public int t() {
+            System.err.println("found " + (dev.mode4(1, row, col) & 0x34));
+            switch(dev.mode4(1, row, col) & 0x34) {
+                case 0x20: return TMUX_Z;
+                case 0x24: return TMUX_W_AND_Z;
+                case 0x34: return TMUX_FB;
+                case 0x14: return TMUX_W_AND_FB;
+                case 0x00: return TMUX_W;
+                    //default: throw new RuntimeException("unknown!");
+                default: return TMUX_W; 
+            }
+        }
+
         public void t(int code) {
             int result = 0;
             switch(code) {
-                case TMUX_Z: throw new Error("not implemented, but should be possible");
-                case TMUX_W_AND_Z: result = 0x20; break;
-
-                case TMUX_FB: result = 0x34; break; /* I think this is actually W_AND_FB, sadly */
+                case TMUX_Z:        result = 0x20; break; // TOTALLYBOGUS throw new Error("not implemented, but should be possible");
+                case TMUX_W_AND_Z:  result = 0x24; break;
+                case TMUX_FB:       result = 0x34; break; /* I think this is actually W_AND_FB, sadly */
                 case TMUX_W_AND_FB: result = 0x14; break;
-                case TMUX_W: result = 0x00; break;
+                case TMUX_W:        result = 0x00; break;
+                    //default: throw new RuntimeException("unknown code! " + code);
+                default: result = 0x00; break;
             }
             dev.mode4(1, row, col, result, 0x34);
         }
-        public int t() {
+        /*
+        private void fmux(int source) {
+            switch(source) {
+                case ZMUX:      
+                case FB:        
+                case ALWAYS_ON: 
+                default: throw new Error("unknown argument to fmux()");
+            }
+        }
+
+        public boolean win_easable() {
+        }
+        */
+
+        public int ti() {
             return dev.mode4(1, row, col) & 0x34;
         }
+
         public void t(boolean ignore_z_and_fb, boolean zm_drives_fb, boolean fb_drives_wm) {
             // still not totally satisfied...
-            //     how to we distinguish between z&w vs z or w&fb vs fb? ==> you can't!  this is a false connection in my diagram
+            //     need to find the bit that sets the w-mux off
             //     what does it mean for both bits (0x30) to be set to 1?
             //if (fb && z) throw new RuntimeException("invalid combination");
             int result = 0;
@@ -316,95 +357,6 @@ public class At40k {
             dev.mode4(1, row, col, result, 0x34);
         }
 
-        public boolean xlut_relevant() { return xlut_relevant(true); }
-        public boolean xlut_relevant(boolean recurse) {
-            if ((c()==XLUT || c()==ZMUX) && c_relevant()) return true;
-            if (xo()) return false;
-            if (nw() != null && nw().xi()==SE && nw().xi_relevant() && (recurse || nw().xlut_relevant())) return true;
-            if (ne() != null && ne().xi()==SW && ne().xi_relevant() && (recurse || ne().xlut_relevant())) return true;
-            if (sw() != null && sw().xi()==NE && sw().xi_relevant() && (recurse || sw().xlut_relevant())) return true;
-            if (se() != null && se().xi()==NW && se().xi_relevant() && (recurse || se().xlut_relevant())) return true;
-            return false;
-        }
-        public boolean xi_to_ylut_relevant() {
-            int lut = ylut();
-            if (((lut & 0xcc) >> 2) == (lut & 0x33)) return false;
-            return true;
-        }
-        public boolean yi_to_xlut_relevant() {
-            int lut = xlut();
-            if (((lut & 0xcc) >> 2) == (lut & 0x33)) return false;
-            return true;
-        }
-        public boolean xi_relevant() { return xi_to_xlut_relevant() || xi_to_ylut_relevant(); }
-        public boolean yi_relevant() { return yi_to_xlut_relevant() || yi_to_ylut_relevant(); }
-        public boolean zi_to_xlut_relevant() {
-            int lut = xlut();
-            if (((lut & LUT_Z) >> 4) == (lut & LUT_Z)) return false;
-            return true;
-        }
-        public boolean zi_to_ylut_relevant() {
-            int lut = ylut();
-            if (((lut & LUT_Z) >> 4) == (lut & LUT_Z)) return false;
-            return true;
-        }
-        public boolean xi_to_xlut_relevant() {
-            int lut = xlut();
-            if (((lut & LUT_SELF) >> 1) == (lut & (LUT_SELF >> 1))) return false;
-            return true;
-        }
-        public boolean yi_to_ylut_relevant() {
-            int lut = ylut();
-            if (((lut & LUT_SELF) >> 1) == (lut & (LUT_SELF >> 1))) return false;
-            return true;
-        }
-        public boolean ylut_relevant() {
-            if ((c()==YLUT || c()==ZMUX) && c_relevant()) return true;
-            if (yo()) return false;
-            if (north() != null && north().yi()==SOUTH) return true;
-            if (east() != null  && east().yi()==WEST) return true;
-            if (south() != null && south().yi()==NORTH) return true;
-            if (west() != null  && west().yi()==EAST) return true;
-            return false;
-        }
-        public boolean c_relevant() {
-            // FIXME: feedback line!
-            for(int i=0; i<5; i++)
-                if (out(i)) return true;
-            if (xo() || yo()) return true;
-            return false;
-        }
-
-        public boolean register_relevant() {
-            if (!c_relevant() && !fb_relevant()) return false;
-            if (f() && out_relevant()) return true;
-            if (f() && fb_relevant()) return true;
-            if (b() && xo()) return true;
-            if (b() && yo()) return true;
-            return false;
-        }
-        public boolean out_relevant() {
-            boolean out = false;
-            boolean connect = false;
-            for(int i=0; i<4; i++) {
-                if (out(L0+i)) out = true;
-                if (hx(L0+i)) connect = true;
-                if (vx(L0+i)) connect = true;
-            }
-            return out && connect;
-        }
-        public boolean fb_relevant() {
-            //if (!c_relevant()) return false;
-            if (!(zi_to_xlut_relevant() && xlut_relevant()) ||
-                !(zi_to_ylut_relevant() && ylut_relevant())) return false;
-            switch(t()) {
-                case 0x34: return true;
-                case 0x14: return true;
-                case 0x10: return true;
-                case 0x30: return true;
-            }
-            return false;
-        }
 
         public void c(int source) {
             switch(source) {
@@ -425,10 +377,10 @@ public class At40k {
         }
         public void b(boolean registered) { dev.mode4(1, row, col, 3, !registered); }
         public void f(boolean registered) { dev.mode4(1, row, col, 2, !registered); }
-        public boolean xo()    { return (dev.mode4(1, row, col) & 0x01) != 0; }
-        public boolean yo()    { return (dev.mode4(1, row, col) & 0x02) != 0; }
-        public void xo(boolean center)    { dev.mode4(1, row, col, 1, center); }
-        public void yo(boolean center)    { dev.mode4(1, row, col, 0, center); }
+        public boolean xo()               { return (dev.mode4(1, row, col) & 0x01) != 0; }
+        public boolean yo()               { return (dev.mode4(1, row, col) & 0x02) != 0; }
+        public void xo(boolean center)    { dev.mode4(1, row, col, 0, center); }
+        public void yo(boolean center)    { dev.mode4(1, row, col, 1, center); }
         public boolean b() { return (dev.mode4(1, row, col) & (1 << 3)) == 0; }
         public boolean f() { return (dev.mode4(1, row, col) & (1 << 2)) == 0; }
         public boolean x() { return (dev.mode4(1, row, col) & (1 << 1)) != 0; }
@@ -453,16 +405,16 @@ public class At40k {
 
         public int xi() {
             // FIXME: can be multiple
-            if ((dev.mode4(0x03, row, col) & (1<<4))!=0) return L3;
+            if ((dev.mode4(0x03, row, col) & (1<<4))!=0) return L4;
             switch(dev.mode4(0x05, row, col) & 0xff) {
                 case 0x80: return SW;
                 case (1<<6): return NE;
                 case (1<<5): return SE;
                 case (1<<4): return NW;
-                case (1<<3): return L3;
-                case (1<<2): return L2;
-                case (1<<1): return L1;
-                case (1<<0): return L0;
+                case (1<<3): return L0;
+                case (1<<2): return L1;
+                case (1<<1): return L2;
+                case (1<<0): return L3;
                 case 0: return NONE;
                 default: throw new Error();
             }
@@ -479,6 +431,7 @@ public class At40k {
                 case L2: dev.mode4(0x03, row, col, 4, false); dev.mode4(0x05, row, col, 1<<1); break;
                 case L1: dev.mode4(0x03, row, col, 4, false); dev.mode4(0x05, row, col, 1<<2); break;
                 case L0: dev.mode4(0x03, row, col, 4, false); dev.mode4(0x05, row, col, 1<<3); break;
+                case NONE: dev.mode4(0x03, row, col, 4, false); dev.mode4(0x05, row, col, 0); break;
                 default: throw new RuntimeException("invalid argument");
             }
         }
@@ -490,10 +443,10 @@ public class At40k {
                 case (1<<5): return SOUTH;
                 case (1<<6): return WEST;
                 case (1<<4): return EAST;
-                case (1<<3): return L3;
-                case (1<<2): return L2;
-                case (1<<1): return L1;
-                case (1<<0): return L0;
+                case (1<<3): return L0;
+                case (1<<2): return L1;
+                case (1<<1): return L2;
+                case (1<<0): return L3;
                 case 0: return NONE;
                 default: throw new Error();
             }
@@ -510,6 +463,7 @@ public class At40k {
                 case L2:    dev.mode4(0x02, row, col, 6, false); dev.mode4(0x04, row, col, 1<<1); break;
                 case L1:    dev.mode4(0x02, row, col, 6, false); dev.mode4(0x04, row, col, 1<<2); break;
                 case L0:    dev.mode4(0x02, row, col, 6, false); dev.mode4(0x04, row, col, 1<<3); break;
+                case NONE:  dev.mode4(0x02, row, col, 6, false); dev.mode4(0x04, row, col,    0); break;
                 default: throw new RuntimeException("invalid argument");
             }
         }
@@ -521,6 +475,7 @@ public class At40k {
                 case L2:    dev.mode4(0x03, row, col, 1<<7, 0xEC); break;
                 case L1:    dev.mode4(0x03, row, col, 1<<3, 0xEC); break;
                 case L0:    dev.mode4(0x03, row, col, 1<<2, 0xEC); break;
+                case NONE:  dev.mode4(0x03, row, col,    0, 0xEC); break;
                 default: throw new RuntimeException("invalid argument");
             }
         }
@@ -539,6 +494,7 @@ public class At40k {
             }
         }
 
+       
         public void zi(int source) {
             switch(source) {
                 case L4:    dev.mode4(0x02, row, col, 1<<7, 0xDB); break;
@@ -546,6 +502,7 @@ public class At40k {
                 case L2:    dev.mode4(0x02, row, col, 1<<4, 0xDB); break;
                 case L1:    dev.mode4(0x02, row, col, 1<<3, 0xDB); break;
                 case L0:    dev.mode4(0x02, row, col, 1<<2, 0xDB); break;
+                case NONE:  dev.mode4(0x02, row, col,    0, 0xDB); break;
                 default: throw new RuntimeException("invalid argument");
             }
         }
@@ -557,12 +514,99 @@ public class At40k {
                 case (1<<4): return L2;
                 case (1<<3): return L1;
                 case (1<<2): return L0;
+                case (1<<1): return NONE;  /* huh? */
                 case (1<<0): return NONE;  /* huh? */
                 case 0:      return NONE;
                 default: throw new RuntimeException("invalid argument: zi=="+(dev.mode4(0x02, row, col) & 0xDB));
             }
         }
 
+
+        // Relevance //////////////////////////////////////////////////////////////////////////////
+
+        public boolean xo_relevant() { return xo_relevant(NE) || xo_relevant(SE) || xo_relevant(NW) || xo_relevant(SW); }
+        public boolean xo_relevant(int direction) {
+            switch(direction) {
+                case NE: return ne() != null && ne().xi()==SW /*&& ne().xi_relevant()*/;
+                case NW: return nw() != null && nw().xi()==SE /*&& nw().xi_relevant()*/;
+                case SE: return se() != null && se().xi()==NW /*&& se().xi_relevant()*/;
+                case SW: return sw() != null && sw().xi()==NE /*&& sw().xi_relevant()*/;
+                default: return false;
+            }
+        }
+        public boolean yo_relevant() { return yo_relevant(NORTH) || yo_relevant(SOUTH) || yo_relevant(EAST) || yo_relevant(WEST); }
+        public boolean yo_relevant(int direction) {
+            switch(direction) {
+                case NORTH: return north() != null && north().yi()==SOUTH  /*&& north().yi_relevant()*/;
+                case EAST: return east() != null  && east().yi()==WEST     /*&& east().yi_relevant()*/;
+                case SOUTH: return south() != null && south().yi()==NORTH  /*&& south().yi_relevant()*/;
+                case WEST: return west() != null  && west().yi()==EAST     /*&& west().yi_relevant()*/;
+                default: return false;
+            }
+        }
+        public boolean xi_relevant() { return xi_to_xlut_relevant() || xi_to_ylut_relevant(); }
+        public boolean yi_relevant() { return yi_to_xlut_relevant() || yi_to_ylut_relevant(); }
+        public boolean xi_to_ylut_relevant() { return (((ylut() & 0xcc) >> 2) != (ylut() & 0x33)); }
+        public boolean yi_to_xlut_relevant() { return (((xlut() & 0xcc) >> 2) != (xlut() & 0x33)); }
+        public boolean zi_to_xlut_relevant() { return (((xlut() & LUT_Z) >> 4) != (xlut() & LUT_Z)); }
+        public boolean zi_to_ylut_relevant() { return (((ylut() & LUT_Z) >> 4) != (ylut() & LUT_Z)); }
+        public boolean xi_to_xlut_relevant() { return (((xlut() & LUT_SELF) >> 1) != (xlut() & (LUT_SELF >> 1))); }
+        public boolean yi_to_ylut_relevant() { return (((ylut() & LUT_SELF) >> 1) != (ylut() & (LUT_SELF >> 1))); }
+        public boolean xlut_relevant() {
+            if ((c()==XLUT || c()==ZMUX) && c_relevant()) return true;
+            if (xo()) return false;
+            return xo_relevant();
+        }
+        public boolean ylut_relevant() {
+            if ((c()==YLUT || c()==ZMUX) && c_relevant()) return true;
+            if (yo()) return false;
+            return yo_relevant();
+        }
+        public boolean c_relevant() {
+            switch(ti()) {
+                case 0x34: return true;
+                case 0x14: return true;
+                case 0x10: return true;
+                case 0x30: return true;
+            }
+            for(int i=0; i<5; i++)
+                if (out(i))
+                    return true;
+            if (xo() || yo()) return true;
+            return false;
+        }
+
+        public boolean register_relevant() {
+            if (!c_relevant()) return false;
+            if (f() && out_relevant()) return true;
+            if (f() && fb_relevant()) return true;
+            if (b() && xo()) return true;
+            if (b() && yo()) return true;
+            return false;
+        }
+        public boolean out_relevant() {
+            boolean out = false;
+            boolean connect = false;
+            for(int i=0; i<4; i++) {
+                if (out(L0+i)) out = true;
+                if (hx(L0+i)) connect = true;
+                if (vx(L0+i)) connect = true;
+            }
+            return out && connect;
+        }
+        public boolean fb_relevant() {
+            if (!(zi_to_xlut_relevant()) ||
+                !(zi_to_ylut_relevant())) return false;
+            switch(ti()) {
+                case 0x34: return true;
+                case 0x14: return true;
+                case 0x10: return true;
+                case 0x30: return true;
+            }
+            return false;
+        }
+
+
     }
 
     public IOB iob_bot(int col, boolean primary)   { return new IOB(col, 0, primary, true); }