Archived
1
0
This repository has been archived on 2026-02-06. You can view files and clone it. You cannot open issues or pull requests or push a commit.
Files
tyvm/tyvm.c
T
2022-02-01 00:38:35 +01:00

195 lines
4.5 KiB
C

/*
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 <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include <string.h>
#include <signal.h>
/* unix only libraries */
// FIXME: solve include errors
#ifdef __UNIX
#include <unistd.h>
#include <fcntl.h>
/* sys libraries */
#include <sys/time.h>
#include <sys/types.h>
#include <termios.h>
#include <mman.h>
#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 function for immediate add mode (imm5[0:4])
transforms 5bit number to 8bit number preserving sign*/
uint16_t sign_extend(uint16_t n, int bit_count) {
if((n >> (bit_count - 1)) & 1) {
n |= (0xFFFF << bit_count);
}
return n;
}
/* Flag update function
Every time a value is written to a register the flag will be updated */
void update_flags(uint16_t r) {
if (reg[r] == 0) reg[RG_COND] = FL_Z;
else if (reg[r] >> 15) reg[RG_COND] = FL_N;
else reg[RG_COND] = FL_P;
}
/* 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
}