simonkellet/Triangle-Tools
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Tidying up code.

Browse Source
This commit is contained in:
Deryck Brown 2022-05-30 20:25:13 +01:00
parent 1000524e35
commit fa3eb1f817
2 changed files with 81 additions and 68 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
Triangle.AbstractMachine.Disassembler/src/main/java/triangle/abstractMachine/Disassembler.java
View File

@ -77,11 +77,12 @@ public class Disassembler {
*/ */
private static void writeN(int n) { private static void writeN(int n) {
System.out.print("(" + n + ") "); System.out.print("(" + n + ") ");
if (n < 10) if (n < 10) {
System.out.print(" "); System.out.print(" ");
else if (n < 100) } else if (n < 100) {
System.out.print(" "); System.out.print(" ");
} }
}
/** /**
* Writes the d-field of an instruction. * Writes the d-field of an instruction.
@ -95,7 +96,7 @@ public class Disassembler {
/** /**
* Writes the name of primitive routine with relative address d. * Writes the name of primitive routine with relative address d.
* *
* @param d the displacment of the primitive routine. * @param d the displacement of the primitive routine.
*/ */
private static void writePrimitive(int d) { private static void writePrimitive(int d) {
var primitive = Primitive.values()[d]; var primitive = Primitive.values()[d];
@ -310,26 +311,20 @@ public class Disassembler {
*/ */
static void loadObjectProgram(String objectName) { static void loadObjectProgram(String objectName) {
FileInputStream objectFile = null; var finished = false;
DataInputStream objectStream = null;
int addr; try (var objectFile = new FileInputStream(objectName)) {
boolean finished = false; var objectStream = new DataInputStream(objectFile);
var addr = Machine.CB;
try {
objectFile = new FileInputStream(objectName);
objectStream = new DataInputStream(objectFile);
addr = Machine.CB;
while (!finished) { while (!finished) {
Machine.code[addr] = Instruction.read(objectStream); Machine.code[addr] = Instruction.read(objectStream);
if (Machine.code[addr] == null) if (Machine.code[addr] == null) {
finished = true; finished = true;
else } else {
addr = addr + 1; addr = addr + 1;
} }
}
CT = addr; CT = addr;
objectFile.close();
} catch (FileNotFoundException s) { } catch (FileNotFoundException s) {
CT = Machine.CB; CT = Machine.CB;
System.err.println("Error opening object file: " + s); System.err.println("Error opening object file: " + s);
@ -344,10 +339,11 @@ public class Disassembler {
public static void main(String[] args) { public static void main(String[] args) {
System.out.println("********** TAM Disassembler (Sun Version 2.1) **********"); System.out.println("********** TAM Disassembler (Sun Version 2.1) **********");
if (args.length == 1) if (args.length == 1) {
objectName = args[0]; objectName = args[0];
else } else {
objectName = "obj.tam"; objectName = "obj.tam";
}
loadObjectProgram(objectName); loadObjectProgram(objectName);
disassembleProgram(); disassembleProgram();

117
Triangle.AbstractMachine.Interpreter/src/main/java/triangle/abstractMachine/Interpreter.java
View File

@ -94,26 +94,27 @@ public class Interpreter {
System.out.println(""); System.out.println("");
System.out.println("State of data store and registers:"); System.out.println("State of data store and registers:");
System.out.println(""); System.out.println("");
if (HT == HB) if (HT == HB) {
System.out.println(" |--------| (heap is empty)"); System.out.println(" |--------| (heap is empty)");
else { } else {
System.out.println(" HB-->"); System.out.println(" HB-->");
System.out.println(" |--------|"); System.out.println(" |--------|");
for (var addr = HB - 1; addr >= HT; addr--) { for (var addr = HB - 1; addr >= HT; addr--) {
System.out.print(addr + ":"); System.out.print(addr + ":");
if (addr == HT) if (addr == HT) {
System.out.print(" HT-->"); System.out.print(" HT-->");
else } else {
System.out.print(" "); System.out.print(" ");
}
System.out.println("|" + data[addr] + "|"); System.out.println("|" + data[addr] + "|");
} }
System.out.println(" |--------|"); System.out.println(" |--------|");
} }
System.out.println(" |////////|"); System.out.println(" |////////|");
System.out.println(" |////////|"); System.out.println(" |////////|");
if (ST == SB) if (ST == SB) {
System.out.println(" |--------| (stack is empty)"); System.out.println(" |--------| (stack is empty)");
else { } else {
var dynamicLink = LB; var dynamicLink = LB;
var staticLink = LB; var staticLink = LB;
var localRegNum = Register.LB; var localRegNum = Register.LB;
@ -121,9 +122,9 @@ public class Interpreter {
System.out.println(" |--------|"); System.out.println(" |--------|");
for (var addr = ST - 1; addr >= SB; addr--) { for (var addr = ST - 1; addr >= SB; addr--) {
System.out.print(addr + ":"); System.out.print(addr + ":");
if (addr == SB) if (addr == SB) {
System.out.print(" SB-->"); System.out.print(" SB-->");
else if (addr == staticLink) { } else if (addr == staticLink) {
switch (localRegNum) { switch (localRegNum) {
case LB: case LB:
System.out.print(" LB-->"); System.out.print(" LB-->");
@ -151,16 +152,18 @@ public class Interpreter {
} }
staticLink = data[addr]; staticLink = data[addr];
localRegNum = Register.values()[localRegNum.ordinal() + 1]; localRegNum = Register.values()[localRegNum.ordinal() + 1];
} else } else {
System.out.print(" "); System.out.print(" ");
if ((addr == dynamicLink) && (dynamicLink != SB)) }
if (addr == dynamicLink && dynamicLink != SB) {
System.out.print("|SL=" + data[addr] + "|"); System.out.print("|SL=" + data[addr] + "|");
else if ((addr == dynamicLink + 1) && (dynamicLink != SB)) } else if (addr == dynamicLink + 1 && dynamicLink != SB) {
System.out.print("|DL=" + data[addr] + "|"); System.out.print("|DL=" + data[addr] + "|");
else if ((addr == dynamicLink + 2) && (dynamicLink != SB)) } else if (addr == dynamicLink + 2 && dynamicLink != SB) {
System.out.print("|RA=" + data[addr] + "|"); System.out.print("|RA=" + data[addr] + "|");
else } else {
System.out.print("|" + data[addr] + "|"); System.out.print("|" + data[addr] + "|");
}
System.out.println(""); System.out.println("");
if (addr == dynamicLink) { if (addr == dynamicLink) {
System.out.println(" |--------|"); System.out.println(" |--------|");
@ -200,9 +203,10 @@ public class Interpreter {
System.out.println("Program has failed due to an IO error."); System.out.println("Program has failed due to an IO error.");
break; break;
} }
if (status != halted) if (status != halted) {
dump(); dump();
} }
}
// INTERPRETATION // INTERPRETATION
@ -210,9 +214,10 @@ public class Interpreter {
// Signals failure if there is not enough space to expand the stack or // Signals failure if there is not enough space to expand the stack or
// heap by spaceNeeded. // heap by spaceNeeded.
if (HT - ST < spaceNeeded) if (HT - ST < spaceNeeded) {
status = failedDataStoreFull; status = failedDataStoreFull;
} }
}
static boolean isTrue(int datum) { static boolean isTrue(int datum) {
// Tests whether the given datum represents true. // Tests whether the given datum represents true.
@ -228,11 +233,14 @@ public class Interpreter {
eq = true; eq = true;
index = 0; index = 0;
while (eq && (index < size)) while (eq && (index < size)) {
if (data[addr1 + index] == data[addr2 + index]) if (data[addr1 + index] == data[addr2 + index]) {
index = index + 1; index = index + 1;
else } else {
eq = false; eq = false;
}
}
return eq; return eq;
} }
@ -240,9 +248,9 @@ public class Interpreter {
// Signals failure if the datum is too large to fit into a single word, // Signals failure if the datum is too large to fit into a single word,
// otherwise returns the datum as a single word. // otherwise returns the datum as a single word.
if ((-Machine.maxintRep <= datum) && (datum <= Machine.maxintRep)) if ((-Machine.maxintRep <= datum) && (datum <= Machine.maxintRep)) {
return (int) datum; return (int) datum;
else { } else {
status = failedOverflow; status = failedOverflow;
return 0; return 0;
} }
@ -262,17 +270,19 @@ public class Interpreter {
currentChar = System.in.read(); currentChar = System.in.read();
} while (Character.isWhitespace((char) currentChar)); } while (Character.isWhitespace((char) currentChar));
if ((currentChar == '-') || (currentChar == '+')) if ((currentChar == '-') || (currentChar == '+')) {
do { do {
sign = (currentChar == '-') ? -1 : 1; sign = (currentChar == '-') ? -1 : 1;
currentChar = System.in.read(); currentChar = System.in.read();
} while ((currentChar == '-') || currentChar == '+'); } while ((currentChar == '-') || currentChar == '+');
}
if (Character.isDigit((char) currentChar)) if (Character.isDigit((char) currentChar)) {
do { do {
temp = temp * 10 + (currentChar - '0'); temp = temp * 10 + (currentChar - '0');
currentChar = System.in.read(); currentChar = System.in.read();
} while (Character.isDigit((char) currentChar)); } while (Character.isDigit((char) currentChar));
}
return sign * temp; return sign * temp;
} }
@ -325,18 +335,20 @@ public class Interpreter {
case DIV: case DIV:
ST = ST - 1; ST = ST - 1;
accumulator = data[ST - 1]; accumulator = data[ST - 1];
if (data[ST] != 0) if (data[ST] != 0) {
data[ST - 1] = (int) (accumulator / data[ST]); data[ST - 1] = (int) (accumulator / data[ST]);
else } else {
status = failedZeroDivide; status = failedZeroDivide;
}
break; break;
case MOD: case MOD:
ST = ST - 1; ST = ST - 1;
accumulator = data[ST - 1]; accumulator = data[ST - 1];
if (data[ST] != 0) if (data[ST] != 0) {
data[ST - 1] = (int) (accumulator % data[ST]); data[ST - 1] = (int) (accumulator % data[ST]);
else } else {
status = failedZeroDivide; status = failedZeroDivide;
}
break; break;
case LT: case LT:
ST = ST - 1; ST = ST - 1;
@ -451,8 +463,9 @@ public class Interpreter {
case LOAD: case LOAD:
addr = d + content(r); addr = d + content(r);
checkSpace(n); checkSpace(n);
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[ST + index] = data[addr + index]; data[ST + index] = data[addr + index];
}
ST = ST + n; ST = ST + n;
CP = CP + 1; CP = CP + 1;
break; break;
@ -467,8 +480,9 @@ public class Interpreter {
ST = ST - 1; ST = ST - 1;
addr = data[ST]; addr = data[ST];
checkSpace(n); checkSpace(n);
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[ST + index] = data[addr + index]; data[ST + index] = data[addr + index];
}
ST = ST + n; ST = ST + n;
CP = CP + 1; CP = CP + 1;
break; break;
@ -481,16 +495,18 @@ public class Interpreter {
case STORE: case STORE:
addr = d + content(r); addr = d + content(r);
ST = ST - n; ST = ST - n;
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[addr + index] = data[ST + index]; data[addr + index] = data[ST + index];
}
CP = CP + 1; CP = CP + 1;
break; break;
case STOREI: case STOREI:
ST = ST - 1; ST = ST - 1;
addr = data[ST]; addr = data[ST];
ST = ST - n; ST = ST - n;
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[addr + index] = data[ST + index]; data[addr + index] = data[ST + index];
}
CP = CP + 1; CP = CP + 1;
break; break;
case CALL: case CALL:
@ -500,10 +516,11 @@ public class Interpreter {
CP = CP + 1; CP = CP + 1;
} else { } else {
checkSpace(3); checkSpace(3);
if (0 <= n && n <= 15) if (0 <= n && n <= 15) {
data[ST] = content(n); // static link data[ST] = content(n); // static link
else } else {
status = failedInvalidInstruction; status = failedInvalidInstruction;
}
data[ST + 1] = LB; // dynamic link data[ST + 1] = LB; // dynamic link
data[ST + 2] = CP + 1; // return address data[ST + 2] = CP + 1; // return address
LB = ST; LB = ST;
@ -531,8 +548,9 @@ public class Interpreter {
CP = data[LB + 2]; CP = data[LB + 2];
LB = data[LB + 1]; LB = data[LB + 1];
ST = ST - n; ST = ST - n;
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[addr + index] = data[ST + index]; data[addr + index] = data[ST + index];
}
ST = addr + n; ST = addr + n;
break; break;
case PUSH: case PUSH:
@ -543,8 +561,9 @@ public class Interpreter {
case POP: case POP:
addr = ST - n - d; addr = ST - n - d;
ST = ST - n; ST = ST - n;
for (var index = 0; index < n; index++) for (var index = 0; index < n; index++) {
data[addr + index] = data[ST + index]; data[addr + index] = data[ST + index];
}
ST = addr + n; ST = addr + n;
CP = CP + 1; CP = CP + 1;
break; break;
@ -557,17 +576,19 @@ public class Interpreter {
break; break;
case JUMPIF: case JUMPIF:
ST = ST - 1; ST = ST - 1;
if (data[ST] == n) if (data[ST] == n) {
CP = d + content(r); CP = d + content(r);
else } else {
CP = CP + 1; CP = CP + 1;
}
break; break;
case HALT: case HALT:
status = halted; status = halted;
break; break;
} }
if ((CP < CB) || (CP >= CT)) if (CP < CB || CP >= CT) {
status = failedInvalidCodeAddress; status = failedInvalidCodeAddress;
}
} while (status == running); } while (status == running);
} }
@ -576,26 +597,21 @@ public class Interpreter {
static void loadObjectProgram(String objectName) { static void loadObjectProgram(String objectName) {
// Loads the TAM object program into code store from the named file. // Loads the TAM object program into code store from the named file.
FileInputStream objectFile = null;
DataInputStream objectStream = null;
int addr;
boolean finished = false; boolean finished = false;
try { try (var objectFile = new FileInputStream(objectName)) {
objectFile = new FileInputStream(objectName); var objectStream = new DataInputStream(objectFile);
objectStream = new DataInputStream(objectFile);
addr = Machine.CB; var addr = Machine.CB;
while (!finished) { while (!finished) {
Machine.code[addr] = Instruction.read(objectStream); Machine.code[addr] = Instruction.read(objectStream);
if (Machine.code[addr] == null) if (Machine.code[addr] == null) {
finished = true; finished = true;
else } else {
addr = addr + 1; addr = addr + 1;
} }
}
CT = addr; CT = addr;
objectFile.close();
} catch (FileNotFoundException s) { } catch (FileNotFoundException s) {
CT = CB; CT = CB;
System.err.println("Error opening object file: " + s); System.err.println("Error opening object file: " + s);
@ -610,10 +626,11 @@ public class Interpreter {
public static void main(String[] args) { public static void main(String[] args) {
System.out.println("********** TAM Interpreter (Java Version 2.1) **********"); System.out.println("********** TAM Interpreter (Java Version 2.1) **********");
if (args.length == 1) if (args.length == 1) {
objectName = args[0]; objectName = args[0];
else } else {
objectName = "obj.tam"; objectName = "obj.tam";
}
loadObjectProgram(objectName); loadObjectProgram(objectName);
if (CT != CB) { if (CT != CB) {