/* TVM is a virtual machine for LC-3 based operating systems and it is used for educational purposes. Copyright (c) under MIT license Written by Erick Ahmed, 2022 */ //#define __UNIX /* universal libraries */ #include #include #include #include #include /* unix only libraries */ // FIXME: solve include errors #ifdef __UNIX #include #include /* sys libraries */ #include #include #include #include #endif #define TRUE 1 #define FALSE 0 /* TODO: remember to cancel defines after writing all functions */ #define BR #define ADD #define LD #define ST #define JSR #define AND #define LDR #define STR #define RTI #define NOT #define LDI #define STI #define JMP #define RES #define LEA #define TRAP #define BAD_OPCODE //define handle_interrupt() /* Initializing 10 registers of which: 8 general purpose, 1 program counter, 1 conditional */ enum registers { RG_000 = 0, RG_001, RG_010, RG_011, RG_100, RG_101, RG_110, RG_111, RG_PC, // program counter RG_COND, // condition flag RG_COUNT }; /* Initializing memory and register storages */ uint16_t memory[UINT16_MAX]; uint16_t reg[RG_COUNT]; /* Creating instruction set opcodes */ enum opcodes { OP_BR = 0, // branch, 0001 OP_ADD, // add, 0010 OP_LD, // load, 0011 OP_ST, // store, 0100 OP_JSR, // jump register, 0101 OP_AND, // bitwise add, 0110 OP_LDR, // load register, 0111 OP_STR, // store register, 1000 OP_RTI, // unused opcode OP_NOT, // bitwise not, 1001 OP_LDI, // indirect load, 1010 OP_STI, // indirect store, 1011 OP_JMP, // jump, 1100 OP_RES, // reserved opcode, 1101 OP_LEA, // load effective address, 1110 OP_TRAP, // execute trap, 1111 }; /* Creating condition flags */ enum flags { FL_P = 1, // Positive FL_Z = 1 << 1, // Zero FL_N = 1 << 2, // Negative }; /* sign extension for immediate add mode (imm5[0:4]) transforms 5bit number to 8bit number preserving sign*/ uint16_t sign_extend(uint16_t bin, int bit_count) { if((bin >> (bit_count - 1)) & 1) { bin |= (0xFFFF << bit_count); } return bin; } /* main loop */ int main(int argc, const char* argv[]) { if(argc < 2) { printf("usage: [image-file1] ...\n"); exit(2); } for(int i = 1; i < argc; i++) { printf("failed to load image: %s\n", argv[i]); exit(1); } signal(SIGINT, handle_interrupt()); //FIXME: handle_interrupt may not be correct, gives an error without semicolons (should be without) disable_input_buffering(); reg[RG_COND] = FL_Z; reg[RG_PC] = 0x3000; //0x3000 is default load address int running = TRUE; while(running) { uint16_t instr = mem_read(reg[RG_PC]++); uint16_t op = instr >> 12; switch (op) { case OP_BR: {BR}; break; case OP_ADD: // {ADD}; break; case OP_LD: {LD}; break; case OP_ST: {ST} break; case OP_JSR: {JSR}; break; case OP_AND: {AND}; break; case OP_LDR: {LDR}; break; case OP_STR: {STR}; break; case OP_NOT: {NOT}; break; case OP_LDI: {LDI}; break; case OP_STI: {STI}; break; case OP_JMP: {JMP}; break; case OP_LEA: {LEA}; break; case OP_TRAP: {TRAP}; break; case OP_RES: case OP_RTI: default: {BAD_OPCODE} break; } } restore_input_buffering(); // if shutdown then restore terminal settings }