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

Tidying up code.

Browse Source
main
Deryck Brown 2 years ago
parent 1000524e35
commit fa3eb1f817
2 changed files with 81 additions and 68 deletions
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Show Stats Download Patch File Download Diff File
  1. 32
      Triangle.AbstractMachine.Disassembler/src/main/java/triangle/abstractMachine/Disassembler.java
  2. 117
      Triangle.AbstractMachine.Interpreter/src/main/java/triangle/abstractMachine/Interpreter.java

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

@ -77,10 +77,11 @@ 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(" ");
}
} }
/** /**
@ -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;
boolean finished = false;
try { try (var objectFile = new FileInputStream(objectName)) {
objectFile = new FileInputStream(objectName); var objectStream = new DataInputStream(objectFile);
objectStream = new DataInputStream(objectFile); var addr = Machine.CB;
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
Unescape 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,8 +203,9 @@ 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,8 +214,9 @@ 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) {
@ -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) {