X-Git-Url: https://mograsim.net/gitweb/?a=blobdiff_plain;f=net.mograsim.logic.model.am2900%2Fsrc%2Fnet%2Fmograsim%2Flogic%2Fmodel%2Fam2900%2Fmachine%2FAm2900MicroInstructionDefinition.java;h=3657bed91cb18ad494818d301f5da95abb096d1f;hb=8bed58cd47f4e53a0a83e066d38864aa6875502f;hp=a91910db16925cd7a8066293c2455bfd5db50da4;hpb=8f8d098ae4ea1d9a2b6607d52f835b50512cbd7e;p=Mograsim.git diff --git a/net.mograsim.logic.model.am2900/src/net/mograsim/logic/model/am2900/machine/Am2900MicroInstructionDefinition.java b/net.mograsim.logic.model.am2900/src/net/mograsim/logic/model/am2900/machine/Am2900MicroInstructionDefinition.java index a91910db..3657bed9 100644 --- a/net.mograsim.logic.model.am2900/src/net/mograsim/logic/model/am2900/machine/Am2900MicroInstructionDefinition.java +++ b/net.mograsim.logic.model.am2900/src/net/mograsim/logic/model/am2900/machine/Am2900MicroInstructionDefinition.java @@ -1,5 +1,8 @@ package net.mograsim.logic.model.am2900.machine; +import java.util.Arrays; +import java.util.Optional; + import net.mograsim.logic.core.types.Bit; import net.mograsim.logic.core.types.BitVector; import net.mograsim.machine.mi.MicroInstructionDefinition; @@ -11,33 +14,70 @@ import net.mograsim.machine.mi.parameters.ParameterClassification; public class Am2900MicroInstructionDefinition implements MicroInstructionDefinition { - private final static MnemonicFamily am2910Instructions = new MnemonicFamily("JZ", "CJS", "JMAP", "PUSH", "JSRP", "CJV", "JRP", "RFCT", - "RPCT", "CRTN", "CJPP", "LDCT", "LOOP", "CONT", "TWB"); - private final static MnemonicFamily am2904StatusInstructions = new MnemonicFamily( - new String[] { "Zero", "NotZero", "UGTEQ", "ULT", "UGT", "ULTEQ", "SGTEQ", "SLT", "SGT", "SLTEQ" }, - new long[] { 0x5, 0x4, 0xB, 0xA, 0xC, 0xD, 0x2, 0x3, 0x0, 0x1 }, 4); - private final static MnemonicFamily am2904ShiftInstructions = new MnemonicFamily("SL", "SH", "SCONI", "SDH", "SDC", "SDN", "SDL", - "SDCO", "SRCO", "SRCIO", "SR", "SDIC", "SDRCI", "SDRCO", "SDXOR", "SDR"); - private final static MnemonicFamily am2904CarryInstructions = new MnemonicFamily(new String[] { "0", "1", "Cx", "µ", "!µ", "M", "!M" }, - new long[] { 0b000000, 0b010000, 0b100000, 0b110000, 0b110100, 0b111000, 0b111100 }, 6); - private final static MnemonicFamily am2901DestInstructions = new MnemonicFamily( - new MnemonicPair("X", BitVector.of(Bit.ZERO, 4))/* TODO */); - private final static MnemonicFamily am2901FuncInstructions = new MnemonicFamily( - new MnemonicPair("X", BitVector.of(Bit.ZERO, 4))/* TODO */); - private final static MnemonicFamily am2901SrcInstructions = new MnemonicFamily( - new MnemonicPair("X", BitVector.of(Bit.ZERO, 4))/* TODO */); - private final static MnemonicFamily interruptInstructions = new MnemonicFamily( - new MnemonicPair("X", BitVector.of(Bit.ZERO, 4))/* TODO */); - private final static BooleanClassification hL = new BooleanClassification("H", "L"); - private final static BooleanClassification registerSelect = new BooleanClassification("MR", "IR"); - private final static IntegerClassification register = new IntegerClassification(4); - - private final static ParameterClassification[] classes = { new BooleanClassification("R", "W"), hL, new BooleanClassification("H", "E"), - new BooleanClassification("H", "I"), new BooleanClassification("H", "E"), hL, new IntegerClassification(11), am2910Instructions, - new BooleanClassification("PS", "C"), am2904StatusInstructions, hL, hL, am2904ShiftInstructions, am2904CarryInstructions, - new BooleanClassification("H", "DB"), new BooleanClassification("H", "AB"), registerSelect, register, registerSelect, register, - am2901DestInstructions, am2901FuncInstructions, am2901SrcInstructions, new IntegerClassification(16), - new BooleanClassification("D", "K"), interruptInstructions, new BooleanClassification("Dis", "IE") }; + private static final BooleanClassification interruptEnable = new BooleanClassification(false, "IE", "Dis"); + // not implemented, because not documented. + private static final MnemonicFamily interruptInstructions = new MnemonicFamily("X", new MnemonicPair("X", BitVector.of(Bit.ZERO, 4))); + private static final BooleanClassification kmux = new BooleanClassification(false, "D", "K"); + private static final MnemonicFamily am2901SrcInstructions = new MnemonicFamily("AB", "AQ", "AB", "ZQ", "ZB", "ZA", "DA", "DQ", "DZ"); + private static final MnemonicFamily am2901FuncInstructions = new MnemonicFamily("ADD", "ADD", "SUBR", "SUBS", "OR", "AND", "NOTRS", + "EXOR", "EXNOR"); + private static final MnemonicFamily am2901DestInstructions = new MnemonicFamily("NOP", "QREG", "NOP", "RAMA", "RAMF", "RAMQD", "RAMD", + "RAMQU", "RAMU"); + private static final IntegerClassification register = new IntegerClassification(0, 4); + private static final BooleanClassification registerSelect = new BooleanClassification(false, "MR", "IR"); + private static final BooleanClassification abus = new BooleanClassification(true, "H", "AB"); + private static final BooleanClassification dbus = new BooleanClassification(true, "H", "DB"); + private static final MnemonicFamily am2904CarryInstructions = new MnemonicFamily("CI0", "CI0", "CI1", "CIX", "CIC"); + private static final MnemonicFamily am2904ShiftInstructions = new MnemonicFamily("RSL / LSLCO", "RSL / LSLCO", "RSH / LSHCO", + "RSCONI / LSL", "RSDH / LSH", "RSDC / LSDLCO", "RSDN / LSDHCO", "RSDL / LSDL", "RSDCO / LSDH", "RSRCO / LSCRO", + "RSRCIO / LSCRIO", "RSR / LSR", "RSDIC / LSLICI", "RSDRCI / LSDCIO", "RSDRCO / LSDRCO", "RSDXOR / LSDCI", "RSDR / LDSR"); +// private static final MnemonicFamily am2904StatusInstructions = new MnemonicFamily( +// new String[] { "MI_Zero", "MI_NotZero", "MI_UGTEQ", "MI_ULT", "MI_UGT", "MI_ULTEQ", "MI_SGTEQ", "MI_SLT", "MI_SGT", "MI_SLTEQ", +// "MA_Zero", "MA_NotZero", "MA_UGTEQ", "MA_ULT", "MA_UGT", "MA_ULTEQ", "MA_SGTEQ", "MA_SLT", "MA_SGT", "MA_SLTEQ" }, +// new long[] { 0b01_0101, 0b01_0100, 0b01_1101, 0b01_1100, 0b01_1110, 0b01_1111, 0b01_0010, 0b01_0011, 0b01_0000, 0b01_0001, +// 0b10_0101, 0b10_0100, 0b10_1101, 0b10_1100, 0b10_1110, 0b10_1111, 0b10_0010, 0b10_0011, 0b10_0000, 0b10_0001 }, +// 6); + // TODO: Maybe "X" and "notX" are swapped. + private static final MnemonicFamily am2904StatusInstructions = new MnemonicFamily("Load_Load_I_Z", "LoadM_LoadY_µ_NxorOVRorZ", + "Set_Set_µ_NxnorOVRornotZ", "Swap_Swap_µ_NxorOVR", "Reset_Reset_µ_NxnorOVR", "Load_LoadForShiftThroughOvr_µ_Z", + "Load_Invert_µ_notZ", "LoadOvrRetain_Load_µ_OVR", "LoadOvrRetain_Load_µ_notOVR", "ResetZ_LoadCarryInvert_µ_CorZ", + "SetZ_LoadCarryInvert_µ_notCandnotZ", "ResetC_Load_µ_C", "SetC_Load_µ_notC", "ResetN_Load_µ_notCorZ", "SetN_Load_µ_CandnotZ", + "ResetOvr_Load_IM_NxorN", "SetOvr_Load_IM_NxnorN", "Load_Load_µ_NxorOVRorZ", "Load_Load_µ_NxnorOVRornotZ", + "Load_Load_µ_NxorOVR", "Load_Load_µ_NxnorOVR", "Load_Load_µ_Z", "Load_Load_µ_notZ", "Load_Load_µ_OVR", "Load_Load_µ_notOVR", + "LoadCarryInvert_LoadCarryInvert_µ_CorZ", "LoadCarryInvert_LoadCarryInvert_µ_notCandnotZ", "Load_Load_µ_C", "Load_Load_µ_notC", + "Load_Load_µ_notCorZ", "Load_Load_µ_CandnotZ", "Load_Load_µ_N", "Load_Load_µ_notN", "Load_Load_M_NxorOVRorZ", + "Load_Load_M_NxnorOVRornotZ", "Load_Load_M_NxorOVR", "Load_Load_M_NxnorOVR", "Load_Load_M_Z", "Load_Load_M_notZ", + "Load_Load_M_OVR", "Load_Load_M_notOVR", "LoadCarryInvert_LoadCarryInvert_M_CorZ", + "LoadCarryInvert_LoadCarryInvert_M_notCandnotZ", "Load_Load_M_C", "Load_Load_M_notC", "Load_Load_M_notCorZ", + "Load_Load_M_CandnotZ", "Load_Load_M_N", "Load_Load_M_notN", "Load_Load_I_NxorOVRorZ", "Load_Load_I_NxnorOVRornotZ", + "Load_Load_I_NxorOVR", "Load_Load_I_NxnorOVR", "Load_Load_I_Z", "Load_Load_I_notZ", "Load_Load_I_OVR", "Load_Load_I_notOVR", + "LoadCarryInvert_LoadCarryInvert_I_notCorZ", "LoadCarryInvert_LoadCarryInvert_I_CandnotZ", "Load_Load_I_C", "Load_Load_I_notC", + "Load_Load_I_notCorZ", "Load_Load_I_CandnotZ", "Load_Load_I_N", "Load_Load_I_notN"); + private static final BooleanClassification ccen = new BooleanClassification(true, "PS", "C"); + private static final MnemonicFamily am2910Instructions = new MnemonicFamily("CONT", "JZ", "CJS", "JMAP", "CJP", "PUSH", "JSRP", "CJV", + "JRP", "RFCT", "RPCT", "CRTN", "CJPP", "LDCT", "LOOP", "CONT", "TWB"); + + private static final IntegerClassification constant_12bit = new IntegerClassification(0, 12); + private static final IntegerClassification constant_16bit = new IntegerClassification(0, 16); + private static final BooleanClassification hE = new BooleanClassification(true, "H", "E"); + private static final BooleanClassification hI = new BooleanClassification(true, "H", "I"); + private static final BooleanClassification hL = new BooleanClassification(true, "H", "L"); + private static final BooleanClassification rW = new BooleanClassification(true, "R", "W"); + + private static final ParameterClassification[] classes = { interruptEnable, interruptInstructions, kmux, constant_16bit, + am2901SrcInstructions, am2901FuncInstructions, am2901DestInstructions, register, registerSelect, register, registerSelect, abus, + dbus, am2904CarryInstructions, am2904ShiftInstructions, hL, hL, am2904StatusInstructions, ccen, am2910Instructions, + constant_12bit, hL, hE, hI, hE, hL, rW }; + + private static final String[] paramDesc = { "Allow interrupts?", "Interrupt instructions; omitted for simplicity", + "Get D-input from data bus/constant value", "Constant value", "Operand sources for ALU operation", "ALU operation", + "Destination of ALU calculation", "Register for A-operand", "Get A-operand from instruction register/micro instruction?", + "Register for B-operand", "Get B-operand from instruction register/micro instruction?", + "Put data from Y-output on address bus?", "Put data from Y-output on data bus?", "Source for carry-in", "Shift instructions", + "Modify micro status register?", "Modify macro status register?", "Operations on the status register", + "Is conditional jump enabled?", "Instructions for the micro instruction pointer", "Absolute address of a micro instruction", + "Load instruction pointer from data bus?", "Put instruction pointer on data bus?", "Increment instruction pointer?", + "Put instruction pointer on address bus?", "Load instruction register from data bus?", "Read from/Write to main memory?" }; @Override public ParameterClassification[] getParameterClassifications() @@ -51,4 +91,22 @@ public class Am2900MicroInstructionDefinition implements MicroInstructionDefinit return classes[index]; } + @Override + public Optional getParameterDescription(int index) + { + return Optional.of(paramDesc[index]); + } + + public static void main(String[] args) + { + String s = "new BooleanClassification(\"R\", \"W\"), hL, new BooleanClassification(\"H\", \"E\"),\r\n" + + " new BooleanClassification(\"H\", \"I\"), new BooleanClassification(\"H\", \"E\"), hL, new IntegerClassification(12), am2910Instructions,\r\n" + + " new BooleanClassification(\"PS\", \"C\"), am2904StatusInstructions, hL, hL, am2904ShiftInstructions, am2904CarryInstructions,\r\n" + + " new BooleanClassification(\"H\", \"DB\"), new BooleanClassification(\"H\", \"AB\"), registerSelect, register, registerSelect, register,\r\n" + + " am2901DestInstructions, am2901FuncInstructions, am2901SrcInstructions, new IntegerClassification(16),\r\n" + + " new BooleanClassification(\"D\", \"K\"), interruptInstructions, new BooleanClassification(\"Dis\", \"IE\")"; + s = s.replaceAll("[\r\n\t]", ""); + System.out.print(Arrays.stream(s.split(", new")).reduce((a, b) -> b + ", new" + a)); +// System.out.println(Arrays.stream(paramDesc).reduce("", (a, b) -> String.format("\"%s\", %s", b, a))); + } }