ca87b3c5e9
This commit refactors the project using a single, consistent coding style, derived from the Linux Kernel Coding Style, available here: https://www.kernel.org/doc/Documentation/CodingStyle This includes, but is not limited to: * Removal of typedefs, especially for structs * Limiting lines to a reasonable length, 80 characters, mostly * K&R style braces * Removal of CamelCase
87 lines
2.6 KiB
C
87 lines
2.6 KiB
C
#ifndef TVM_H_
|
|
#define TVM_H_
|
|
|
|
#include <stddef.h>
|
|
|
|
#include "tvm_file.h"
|
|
#include "tvm_preprocessor.h"
|
|
#include "tvm_stack.h"
|
|
|
|
#include "tvm_memory.h"
|
|
#include "tvm_program.h"
|
|
#include "tvm_tokens.h"
|
|
|
|
struct tvm_ctx {
|
|
struct tvm_prog *prog;
|
|
struct tvm_mem *mem;
|
|
};
|
|
|
|
struct tvm_ctx *tvm_vm_create();
|
|
void tvm_vm_destroy(struct tvm_ctx *vm);
|
|
|
|
int tvm_vm_interpret(struct tvm_ctx *vm, char *filename);
|
|
void tvm_vm_run(struct tvm_ctx *vm);
|
|
|
|
static inline void tvm_step(struct tvm_ctx *vm, int *instr_idx)
|
|
{
|
|
int *arg0 = vm->prog->args[*instr_idx][0],
|
|
*arg1 = vm->prog->args[*instr_idx][1];
|
|
|
|
switch (vm->prog->instr[*instr_idx]) {
|
|
/* nop */ case 0x0: break;
|
|
/* int */ case 0x1: /* unimplemented */ break;
|
|
/* mov */ case 0x2: *arg0 = *arg1; break;
|
|
/* push */ case 0x3: tvm_stack_push(vm->mem, arg0); break;
|
|
/* pop */ case 0x4: tvm_stack_pop(vm->mem, arg0); break;
|
|
/* pushf */ case 0x5: tvm_stack_push(vm->mem, &vm->mem->FLAGS); break;
|
|
/* popf */ case 0x6: tvm_stack_pop(vm->mem, arg0); break;
|
|
/* inc */ case 0x7: ++(*arg0); break;
|
|
/* dec */ case 0x8: --(*arg0); break;
|
|
/* add */ case 0x9: *arg0 += *arg1; break;
|
|
/* sub */ case 0xA: *arg0 -= *arg1; break;
|
|
/* mul */ case 0xB: *arg0 *= *arg1; break;
|
|
/* div */ case 0xC: *arg0 /= *arg1; break;
|
|
/* mod */ case 0xD: vm->mem->remainder = *arg0 % *arg1; break;
|
|
/* rem */ case 0xE: *arg0 = vm->mem->remainder; break;
|
|
/* not */ case 0xF: *arg0 = ~(*arg0); break;
|
|
/* xor */ case 0x10: *arg0 ^= *arg1; break;
|
|
/* or */ case 0x11: *arg0 |= *arg1; break;
|
|
/* and */ case 0x12: *arg0 &= *arg1; break;
|
|
/* shl */ case 0x13: *arg0 <<= *arg1; break;
|
|
/* shr */ case 0x14: *arg0 >>= *arg1; break;
|
|
/* cmp */ case 0x15: vm->mem->FLAGS =
|
|
((*arg0 == *arg1) | (*arg0 > *arg1) << 1);
|
|
break;
|
|
/* call */ case 0x17: tvm_stack_push(vm->mem, instr_idx);
|
|
/* jmp */ case 0x16: *instr_idx = *arg0 - 1; break;
|
|
/* ret */ case 0x18: tvm_stack_pop(vm->mem, instr_idx);
|
|
break;
|
|
/* je */ case 0x19:
|
|
*instr_idx = (vm->mem->FLAGS & 0x1)
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* jne */ case 0x1A:
|
|
*instr_idx = (!(vm->mem->FLAGS & 0x1))
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* jg */ case 0x1B:
|
|
*instr_idx = (vm->mem->FLAGS & 0x2)
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* jge */ case 0x1C:
|
|
*instr_idx = (vm->mem->FLAGS & 0x3)
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* jl */ case 0x1D:
|
|
*instr_idx = (!(vm->mem->FLAGS & 0x3))
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* jle */ case 0x1E:
|
|
*instr_idx = (!(vm->mem->FLAGS & 0x2))
|
|
? *arg0 - 1 : *instr_idx;
|
|
break;
|
|
/* prn */ case 0x1F: printf("%i\n", *arg0);
|
|
};
|
|
}
|
|
|
|
#endif
|