1 package edu.berkeley.fleet.two;
3 import edu.berkeley.fleet.api.*;
4 import edu.berkeley.fleet.util.*;
5 import edu.berkeley.fleet.api.Instruction.Set;
6 import static edu.berkeley.fleet.api.Instruction.Set.*;
7 import static edu.berkeley.fleet.api.Instruction.*;
8 import static edu.berkeley.fleet.api.Predicate.*;
10 /** common subclass for the "FleetTwo" generation of processors, all 37-bit wide, with AM33 encoding */
11 public abstract class FleetTwoFleet extends Fleet {
13 public static final Mask PACKET_TOKEN = new Mask("v.................................................");
14 public static final Mask PACKET_DATA = new Mask(".vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv............");
15 public static final Mask PACKET_SIGNAL = new Mask("......................................v...........");
16 public static final Mask PACKET_DEST = new Mask(".......................................vvvvvvvvvvv");
18 public static final Mask CBD_SIZE = new Mask("...............................vvvvvv");
19 public static final Mask CBD_OFFSET = new Mask("vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv......");
21 public static final int WIDTH_WORD = PACKET_DATA.valmaskwidth;
22 public static final int WIDTH_PACKET = PACKET_TOKEN.width;
24 public static final Mask WHOLE_WORD = new Mask("vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv");
25 public static final Mask DISPATCH_PATH = new Mask("vvvvvvvvvvv..........................");
26 public static final Mask DISPATCH_INSTR = new Mask("...........vvvvvvvvvvvvvvvvvvvvvvvvvv");
27 public static final Mask I = new Mask("...........1.........................");
28 public static final Mask OS = new Mask("............1........................");
29 public static final Mask P = new Mask(".............vvv.....................");
30 public static final Mask P_NOT_A = new Mask(".............000.....................");
31 public static final Mask P_A = new Mask(".............001.....................");
32 public static final Mask P_NOT_B = new Mask(".............010.....................");
33 public static final Mask P_B = new Mask(".............011.....................");
34 public static final Mask P_UNUSED = new Mask(".............100.....................");
35 public static final Mask P_OLC_ZERO = new Mask(".............101.....................");
36 public static final Mask P_OLC_NONZERO = new Mask(".............110.....................");
37 public static final Mask P_ALWAYS = new Mask(".............111.....................");
39 public static final Mask SHIFT = new Mask("................00vvvvvvvvvvvvvvvvvvv");
41 public static final Mask TAIL = new Mask("................11...................");
43 public static final Mask MOVE = new Mask("................01...................");
44 public static final Mask TI = new Mask("................011..................");
45 public static final Mask DI = new Mask("................01.1.................");
46 public static final Mask FLUSH = new Mask("................01.01................");
47 public static final Mask DC = new Mask("................01.11................");
48 public static final Mask DO = new Mask("................01...1...............");
49 public static final Mask TO = new Mask("................01....1..............");
50 public static final Mask PATH_IMMEDIATE = new Mask("................01.....1vvvvvvvvvvvvv");
51 public static final Mask PATH_DATA = new Mask("................01.....01............");
52 public static final Mask PATH_NOCHANGE = new Mask("................01.....00............");
54 public static final Mask SET_OLC_FROM_IMMEDIATE = new Mask("................101000100......vvvvvv");
55 public static final Mask SET_OLC_FROM_DATA_LATCH = new Mask("................101000010............");
56 public static final Mask SET_OLC_FROM_OLC_MINUS_ONE = new Mask("................101000001............");
58 public static final Mask SET_ILC_FROM_IMMEDIATE = new Mask("................10010010......0vvvvvv");
59 public static final Mask SET_ILC_FROM_INFINITY = new Mask("................10010010......1......");
60 public static final Mask SET_ILC_FROM_DATA_LATCH = new Mask("................10010001.............");
62 public static final Mask SET_IMMEDIATE = new Mask("................100010.vvvvvvvvvvvvvv");
63 public static final Mask SET_IMMEDIATE_EXTEND = new Mask("................100010v..............");
65 public static final Mask SET_FLAGS = new Mask("................100001...............");
66 public static final Mask SET_FLAGS_A = new Mask("................100001...vvvvvv......");
67 public static final Mask SET_FLAGS_B = new Mask("................100001.........vvvvvv");
68 public static final Mask SET_FLAGS_VALUE_A = new Mask("1.....");
69 public static final Mask SET_FLAGS_VALUE_NOT_A = new Mask(".1....");
70 public static final Mask SET_FLAGS_VALUE_B = new Mask("..1...");
71 public static final Mask SET_FLAGS_VALUE_NOT_B = new Mask("...1..");
72 public static final Mask SET_FLAGS_VALUE_C = new Mask("....1.");
73 public static final Mask SET_FLAGS_VALUE_NOT_C = new Mask(".....1");
75 // Misc //////////////////////////////////////////////////////////////////////////////
77 public static final long DataLatch_WIDTH = SET_IMMEDIATE.valmaskmax-SET_IMMEDIATE.valmaskmin+1; // FIXME: this is an abstraction breakage
78 private static final long mask = ~(-1L << DataLatch_WIDTH);
79 public static boolean isSmallEnoughToFit(long immediate) {
80 if ((immediate & ~mask) == 0) return true;
81 if ((immediate | mask) == -1L) return true;
85 public int getWordWidth() { return 37; }
87 //////////////////////////////////////////////////////////////////////////////
89 /** get the bits describing this box's location on the DESTINATION HORN */
90 // FIXME this should use a BitVector not a long!
91 protected abstract long getDestAddr(Path box);
93 private static final BitVector SIGNAL_ZERO = new BitVector(1);
94 private static final BitVector SIGNAL_ONE = new BitVector(1);
96 SIGNAL_ONE.set(0,true);
99 /** decode a path, given the starting point and the bits that comprise it */
100 // FIXME this should use a BitVector not a long!
101 //protected abstract Path getPathByAddr(Dock source, long dest);
102 public Path getPathByAddr(Dock source, long dest) {
103 for(Ship ship : this)
104 for(Dock bb : ship) {
105 for(Destination d : new Destination[] { bb.getInstructionDestination(), bb.getDataDestination() }) {
106 for(BitVector signal : new BitVector[] { SIGNAL_ZERO, SIGNAL_ONE }) {
107 Path p = (Path)source.getPath(d, signal);
108 if (getDestAddr(p) == dest) return p;
115 /** read a machine-formatted instruction from a file (into a Java object) */
116 public Instruction readInstruction(DataInputStream is, Dock dispatchFrom) throws IOException {
119 inst = (inst << 8) | (is.readByte() & 0xff);
120 inst = (inst << 8) | (is.readByte() & 0xff);
121 inst = (inst << 8) | (is.readByte() & 0xff);
122 inst = (inst << 8) | (is.readByte() & 0xff);
123 inst = (inst << 8) | (is.readByte() & 0xff);
124 inst = (inst << 8) | (is.readByte() & 0xff);
125 return readInstruction(inst, dispatchFrom);
126 } catch (EOFException eof) {
131 public int getShiftWidth() { return SHIFT.valmaskwidth; }
132 public int getSetWidth() { return SET_IMMEDIATE.valmaskwidth+1; }
134 // FIXME: should use BitVector here
135 public Instruction readInstruction(long inst, Dock dispatchFrom) {
136 Dock dock = getPathByAddr(dispatchFrom, DISPATCH_PATH.getval(inst)).getDestination().getDock();
138 if (TAIL.get(inst)) return new Tail(dock);
140 Predicate predicate = Default;
141 if (P_ALWAYS.get(inst)) predicate = IgnoreOLC;
142 if (P_OLC_NONZERO.get(inst)) predicate = Default;
143 if (P_OLC_ZERO.get(inst)) predicate = OLCZero;
144 if (P_A.get(inst)) predicate = FlagA;
145 if (P_B.get(inst)) predicate = FlagB;
146 if (P_NOT_A.get(inst)) predicate = NotFlagA;
147 if (P_NOT_B.get(inst)) predicate = NotFlagB;
149 boolean looping = !OS.get(inst);
151 return new Flush(dock, looping, predicate);
152 if (SHIFT.get(inst)) return new Shift(dock, looping, predicate, new BitVector(dock.getShip().getFleet().getWordWidth()).set(SHIFT.getval(inst)));
153 if (SET_IMMEDIATE.get(inst)) {
154 boolean extend = SET_IMMEDIATE_EXTEND.getval(inst) != 0;
155 long immediate = SET_IMMEDIATE.getval(inst);
156 if (extend) immediate |= (-1L << DataLatch_WIDTH);
157 return new Set(dock, looping, predicate, SetDest.DataLatch, (immediate));
160 if (SET_OLC_FROM_OLC_MINUS_ONE.get(inst))
161 return new Set(dock, looping, predicate, SetDest.OuterLoopCounter, SetSource.Decrement);
162 if (SET_OLC_FROM_IMMEDIATE.get(inst))
163 return new Set(dock, looping, predicate, SetDest.OuterLoopCounter, (SET_OLC_FROM_IMMEDIATE.getval(inst)));
164 if (SET_ILC_FROM_IMMEDIATE.get(inst))
165 return new Set(dock, looping, predicate, SetDest.InnerLoopCounter, (SET_ILC_FROM_IMMEDIATE.getval(inst)));
166 if (SET_OLC_FROM_DATA_LATCH.get(inst))
167 return new Set(dock, looping, predicate, SetDest.OuterLoopCounter, SetSource.DataLatch);
168 if (SET_ILC_FROM_DATA_LATCH.get(inst))
169 return new Set(dock, looping, predicate, SetDest.InnerLoopCounter, SetSource.DataLatch);
170 if (SET_ILC_FROM_INFINITY.get(inst))
171 return new Set(dock, looping, predicate, SetDest.InnerLoopCounter, SetSource.Infinity);
172 if (SET_FLAGS.get(inst)) {
173 long flag_a = SET_FLAGS_A.getval(inst);
174 long flag_b = SET_FLAGS_B.getval(inst);
175 FlagFunction ap = FlagFunction.ZERO;
176 FlagFunction bp = FlagFunction.ZERO;
177 if (SET_FLAGS_VALUE_A .get(flag_a)) ap = ap.add(FlagA );
178 if (SET_FLAGS_VALUE_NOT_A.get(flag_a)) ap = ap.add(NotFlagA );
179 if (SET_FLAGS_VALUE_B .get(flag_a)) ap = ap.add(FlagB );
180 if (SET_FLAGS_VALUE_NOT_B.get(flag_a)) ap = ap.add(NotFlagB );
181 if (SET_FLAGS_VALUE_C .get(flag_a)) ap = ap.add(FlagC );
182 if (SET_FLAGS_VALUE_NOT_C.get(flag_a)) ap = ap.add(NotFlagC );
183 if (SET_FLAGS_VALUE_A .get(flag_b)) bp = bp.add(FlagA );
184 if (SET_FLAGS_VALUE_NOT_A.get(flag_b)) bp = bp.add(NotFlagA );
185 if (SET_FLAGS_VALUE_B .get(flag_b)) bp = bp.add(FlagB );
186 if (SET_FLAGS_VALUE_NOT_B.get(flag_b)) bp = bp.add(NotFlagB );
187 if (SET_FLAGS_VALUE_C .get(flag_b)) bp = bp.add(FlagC );
188 if (SET_FLAGS_VALUE_NOT_C.get(flag_b)) bp = bp.add(NotFlagC );
189 return new Set(dock, looping, predicate, ap, bp);
192 return new Move(dock,
196 getPathByAddr(dock, PATH_IMMEDIATE.getval(inst)),
204 throw new RuntimeException("unknown instruction: 0x" + Long.toString(inst, 16));
207 public long writeInstruction(Instruction d, Dock dispatchFrom) {
211 instr = DISPATCH_PATH.setval(instr, getDestAddr(dispatchFrom.getPath(d.dock.getInstructionDestination(),null)));
215 if (!pi.looping) instr = OS.set(instr);
216 switch(pi.predicate) {
217 case IgnoreOLC: instr = P_ALWAYS.set(instr); break;
218 case OLCZero: instr = P_OLC_ZERO.set(instr); break;
219 case Default: instr = P_OLC_NONZERO.set(instr); break;
220 case FlagA: instr = P_A.set(instr); break;
221 case FlagB: instr = P_B.set(instr); break;
222 case NotFlagA: instr = P_NOT_A.set(instr); break;
223 case NotFlagB: instr = P_NOT_B.set(instr); break;
224 default: throw new RuntimeException("error!");
227 if (d instanceof Tail) {
228 instr = TAIL.set(instr);
230 } else if (d instanceof Shift) {
231 Shift shift = (Shift)d;
232 instr = SHIFT.set(instr);
233 instr = SHIFT.setval(instr, shift.immediate);
235 } else if (d instanceof Flush) {
236 instr = FLUSH.set(instr);
238 } else if (d instanceof Set) {
241 case InnerLoopCounter:
244 instr = SET_ILC_FROM_DATA_LATCH.set(instr);
247 instr = SET_ILC_FROM_IMMEDIATE.setval(SET_ILC_FROM_IMMEDIATE.set(instr), s.immediate);
250 instr = SET_ILC_FROM_INFINITY.set(instr);
254 case OuterLoopCounter:
257 instr = SET_OLC_FROM_OLC_MINUS_ONE.set(instr);
260 instr = SET_OLC_FROM_DATA_LATCH.set(instr);
263 instr = SET_OLC_FROM_IMMEDIATE.setval(SET_OLC_FROM_IMMEDIATE.set(instr), s.immediate);
268 instr = SET_FLAGS.set(instr);
269 instr = SET_FLAGS_A.setval(instr, flagFunctionToLong(s.newFlagA));
270 instr = SET_FLAGS_B.setval(instr, flagFunctionToLong(s.newFlagB));
274 instr = SET_IMMEDIATE.set(instr);
275 instr = SET_IMMEDIATE_EXTEND.setval(instr, s.immediate < 0 ? 1 : 0);
276 instr = SET_IMMEDIATE.setval(instr, s.immediate & ~(-1L << DataLatch_WIDTH));
281 } else if (d instanceof Move) {
283 instr = MOVE.set(instr);
284 if (inst.tokenIn) instr = TI.set(instr);
285 if (inst.dataIn) instr = DI.set(instr);
286 if (inst.latchData) instr = DC.set(instr);
287 if (inst.dataOut) instr = DO.set(instr);
288 if (inst.tokenOut) instr = TO.set(instr);
289 if (inst.interruptible) instr = I.set(instr);
291 if (inst.latchPath) instr = PATH_DATA.set(instr);
293 instr = PATH_IMMEDIATE.set(instr);
294 instr = PATH_IMMEDIATE.setval(instr, inst.path==null?0:getDestAddr(inst.path));
298 throw new RuntimeException("unrecognized instruction " + d.getClass().getName());
304 public void writeInstruction(DataOutputStream os, Dock dispatchFrom, Instruction d) throws IOException {
305 long instr = writeInstruction(d, dispatchFrom);
306 for(int i=5; i>=0; i--)
307 os.write(BitManipulations.getIntField(i*8+7, i*8, instr));
310 private static long flagFunctionToLong(FlagFunction ff) {
312 for(Predicate p : ff)
314 case FlagA : ret = SET_FLAGS_VALUE_A .set(ret); break;
315 case NotFlagA : ret = SET_FLAGS_VALUE_NOT_A.set(ret); break;
316 case FlagB : ret = SET_FLAGS_VALUE_B .set(ret); break;
317 case NotFlagB : ret = SET_FLAGS_VALUE_NOT_B.set(ret); break;
318 case FlagC : ret = SET_FLAGS_VALUE_C .set(ret); break;
319 case NotFlagC : ret = SET_FLAGS_VALUE_NOT_C.set(ret); break;
320 default: throw new RuntimeException();