first commit
This commit is contained in:
commit
38d62ba8d7
21
.gitignore
vendored
Normal file
21
.gitignore
vendored
Normal file
@ -0,0 +1,21 @@
|
||||
# build results
|
||||
bin/
|
||||
obj/
|
||||
|
||||
# IDE files
|
||||
.vs/
|
||||
.vshistory/
|
||||
.editorconfig
|
||||
*.user
|
||||
*.vcxproj.filters
|
||||
|
||||
# other files
|
||||
.old*/
|
||||
old/
|
||||
tmp/
|
||||
temp/
|
||||
*.tmp
|
||||
*.temp
|
||||
logs/
|
||||
log/
|
||||
*.log
|
||||
1
.vscode/.gitignore
vendored
Normal file
1
.vscode/.gitignore
vendored
Normal file
@ -0,0 +1 @@
|
||||
settings.json
|
||||
29
.vscode/launch.json
vendored
Normal file
29
.vscode/launch.json
vendored
Normal file
@ -0,0 +1,29 @@
|
||||
{
|
||||
"version": "0.2.0",
|
||||
"configurations": [
|
||||
{
|
||||
"name": "(gdb) Debug",
|
||||
"type": "cppdbg",
|
||||
"request": "launch",
|
||||
"program": "${workspaceFolder}/bin/tali",
|
||||
"windows": { "program": "${workspaceFolder}/bin/tali.exe" },
|
||||
"args": [ "--image", "image.bin" ],
|
||||
"cwd": "${workspaceFolder}/bin",
|
||||
"preLaunchTask": "build_exec_dbg",
|
||||
"stopAtEntry": false,
|
||||
"externalConsole": false,
|
||||
"MIMode": "gdb",
|
||||
"miDebuggerPath": "gdb",
|
||||
"setupCommands": [
|
||||
{
|
||||
"text": "-enable-pretty-printing",
|
||||
"ignoreFailures": true
|
||||
},
|
||||
{
|
||||
"text": "-gdb-set disassembly-flavor intel",
|
||||
"ignoreFailures": true
|
||||
}
|
||||
]
|
||||
}
|
||||
]
|
||||
}
|
||||
30
.vscode/tasks.json
vendored
Normal file
30
.vscode/tasks.json
vendored
Normal file
@ -0,0 +1,30 @@
|
||||
{
|
||||
"version": "2.0.0",
|
||||
"tasks": [
|
||||
{
|
||||
"label": "build_exec_dbg",
|
||||
"detail": "build project with debug symbols",
|
||||
"type": "cppbuild",
|
||||
"command": "bash",
|
||||
"args": [
|
||||
"-c",
|
||||
"cbuild build_exec_dbg"
|
||||
],
|
||||
"options": {
|
||||
"cwd": "${workspaceFolder}"
|
||||
},
|
||||
"problemMatcher": ["$gcc"],
|
||||
"group": {
|
||||
"kind": "build"
|
||||
},
|
||||
"presentation": {
|
||||
"echo": true,
|
||||
"reveal": "always",
|
||||
"focus": true,
|
||||
"panel": "shared",
|
||||
"showReuseMessage": false,
|
||||
"clear": true
|
||||
}
|
||||
}
|
||||
]
|
||||
}
|
||||
38
README.md
Normal file
38
README.md
Normal file
@ -0,0 +1,38 @@
|
||||
# TALI
|
||||
Assembly language interpreter written in pure C. Can execute programs up to 1 MEGABYTE (1048576 bytes) in size!!!
|
||||
|
||||
## Building
|
||||
1. Install [cbuild](https://timerix.ddns.net:3322/Timerix/cbuild.git)
|
||||
2. ```sh
|
||||
cbuild build_exec_dbg
|
||||
```
|
||||
|
||||
## Assembly language
|
||||
### Instructions
|
||||
| code | name | arguments | details |
|
||||
|------|------|-----------|---------|
|
||||
| 00 | NOP | | ignored instruction |
|
||||
| 01 | PUSH | `dst_register`, `value_size(bytes)`, `value` | push constant value into `dst_register` |
|
||||
| 02 | MOV | `dst_register`, `src_register` | copy value from `src_register` to `dst_register`
|
||||
| 03 | ADD | `dst_register`, `src_register` | `dst` += `src` |
|
||||
| 04 | SUB | `dst_register`, `src_register` | `dst` -= `src` |
|
||||
| 05 | MUL | `dst_register`, `src_register` | `dst` *= `src` |
|
||||
| 06 | DIV | `dst_register`, `src_register` | `dst` /= `src` |
|
||||
| 07 | MOD | `dst_register`, `src_register` | `dst` %= `src` |
|
||||
| 08 | SYS | | call system function |
|
||||
| 09 | EXIT | | stop the program with exit code in `ax` |
|
||||
|
||||
### Registers
|
||||
| code | name | size (bits) |
|
||||
|------|------|-------------|
|
||||
| 00 | ax | 32 |
|
||||
| 01 | bx | 32 |
|
||||
| 02 | cx | 32 |
|
||||
| 03 | dx | 32 |
|
||||
|
||||
### System functions
|
||||
To call a system function you need to push values to registers and write `SYS` opcode. The return value of a function will will be avaliable in `ax` after call.
|
||||
| `ax` | name | `bx` | `cx` | `dx` | details |
|
||||
|-----------|------|----|----|----|---------|
|
||||
| 0 | read | file number | buffer pointer | buffer size | read data from file |
|
||||
| 1 | write | file number | buffer pointer | buffer size | write data to file |
|
||||
187
project.config
Executable file
187
project.config
Executable file
@ -0,0 +1,187 @@
|
||||
#!/usr/bin/env bash
|
||||
CBUILD_VERSION=2.1.4
|
||||
CONFIG_VERSION=1
|
||||
|
||||
PROJECT="tali"
|
||||
CMP_C="gcc"
|
||||
CMP_CPP="g++"
|
||||
STD_C="c11"
|
||||
STD_CPP="c++11"
|
||||
WARN_C="-Wall -Wextra -Wno-unused-parameter"
|
||||
WARN_CPP="-Wall -Wextra -Wno-unused-parameter"
|
||||
SRC_C="$(find src -name '*.c')"
|
||||
SRC_CPP="$(find src -name '*.cpp')"
|
||||
|
||||
# Directory with dependency configs.
|
||||
# See cbuild/example_dependency_configs
|
||||
DEPENDENCY_CONFIGS_DIR='.'
|
||||
# List of dependency config files in DEPENDENCY_CONFIGS_DIR separated by space.
|
||||
ENABLED_DEPENDENCIES=''
|
||||
|
||||
# OBJDIR structure:
|
||||
# ├── objects/ - Compiled object files. Cleans on each call of build task
|
||||
# ├── static_libs/ - Symbolic links to static libraries used by linker. Cleans on each call of build task.
|
||||
# ├── static_libs/ - Symbolic links to dynamic libraries used by linker. Cleans on each call of build task.
|
||||
# └── profile/ - gcc *.gcda profiling info files
|
||||
OBJDIR="obj"
|
||||
OUTDIR="bin"
|
||||
STATIC_LIB_FILE="lib$PROJECT.a"
|
||||
|
||||
# OS-specific options
|
||||
case "$OS" in
|
||||
WINDOWS)
|
||||
EXEC_FILE="$PROJECT.exe"
|
||||
SHARED_LIB_FILE="$PROJECT.dll"
|
||||
# example: "-I./"
|
||||
INCLUDE=""
|
||||
;;
|
||||
LINUX)
|
||||
EXEC_FILE="$PROJECT"
|
||||
SHARED_LIB_FILE="$PROJECT.so"
|
||||
INCLUDE=""
|
||||
;;
|
||||
*)
|
||||
error "operating system $OS has no configuration variants"
|
||||
;;
|
||||
esac
|
||||
|
||||
# TASKS
|
||||
case "$TASK" in
|
||||
# creates executable using profiling info if it exists
|
||||
build_exec)
|
||||
# -flto applies more optimizations across object files
|
||||
# -flto=auto is needed to multithreaded copilation
|
||||
# -fuse-linker-plugin is required to use static libs with lto
|
||||
# -fprofile-use enables compiler to use profiling info files to optimize executable
|
||||
# -fprofile-prefix-path sets path where profiling info about objects are be saved
|
||||
# -fdata-sections -ffunction-sections -Wl,--gc-sections removes unused code
|
||||
C_ARGS="-O2 -flto=auto -fuse-linker-plugin -fprofile-use -fprofile-prefix-path=$(realpath $OBJDIR)/objects -fdata-sections -ffunction-sections -Wl,--gc-sections"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# creates executable with debug info and no optimizations
|
||||
build_exec_dbg)
|
||||
C_ARGS="-O0 -g3"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# creates shared library
|
||||
build_shared_lib)
|
||||
C_ARGS="-O2 -fpic -flto -shared"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS -Wl,-soname,$SHARED_LIB_FILE"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_shared_lib.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# creates shared library with debug symbols and no optimizations
|
||||
build_shared_lib_dbg)
|
||||
C_ARGS="-O0 -g3 -fpic -shared"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS -Wl,-soname,$SHARED_LIB_FILE"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_shared_lib.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# creates static library
|
||||
build_static_lib)
|
||||
C_ARGS="-O2 -fpic -fdata-sections -ffunction-sections"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_static_lib.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# creates static library with debug symbols and no optimizations
|
||||
build_static_lib_dbg)
|
||||
C_ARGS="-O0 -g3"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
PRE_TASK_SCRIPT=
|
||||
TASK_SCRIPT=cbuild/default_tasks/build_static_lib.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# executes $EXEC_FILE
|
||||
exec)
|
||||
TASK_SCRIPT=cbuild/default_tasks/exec.sh
|
||||
;;
|
||||
# executes $EXEC_FILE with valgrind memory checker
|
||||
valgrind)
|
||||
VALGRIND_ARGS="-s --read-var-info=yes --track-origins=yes --fullpath-after=$(pwd) --leak-check=full --show-leak-kinds=all"
|
||||
TASK_SCRIPT=cbuild/default_tasks/valgrind.sh
|
||||
;;
|
||||
# generates profiling info
|
||||
profile)
|
||||
OUTDIR="$OUTDIR/profile"
|
||||
# -flto applies more optimizations across object files
|
||||
# -flto=auto is needed to multithreaded copilation
|
||||
# -fuse-linker-plugin is required to use static libs with lto
|
||||
# -pg adds code to executable, that generates file containing function call info (gmon.out)
|
||||
# -fprofile-generate generates executable with profiling code
|
||||
# -fprofile-prefix-path sets path where profiling info about objects will be saved
|
||||
C_ARGS="-O2 -flto=auto -fuse-linker-plugin -fprofile-generate -fprofile-prefix-path=$(realpath $OBJDIR)/objects"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
TASK_SCRIPT=cbuild/default_tasks/profile.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# compiles program with -pg and runs it with gprof
|
||||
# uses gprof2dot python script to generate function call tree (pip install gprof2dot)
|
||||
# requires graphviz (https://www.graphviz.org/download/source/)
|
||||
gprof)
|
||||
OUTDIR="$OUTDIR/gprof"
|
||||
# -pg adds code to executable, that generates file containing function call info (gmon.out)
|
||||
C_ARGS="-O2 -flto=auto -fuse-linker-plugin -pg"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
TASK_SCRIPT=cbuild/default_tasks/gprof.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# compiles program and runs it with callgrind (part of valgrind)
|
||||
# uses gprof2dot python script to generate function call tree (pip install gprof2dot)
|
||||
# requires graphviz (https://www.graphviz.org/download/source/)
|
||||
# P.S. detailed results can be viewed in KCacheGrind
|
||||
callgrind)
|
||||
OUTDIR="$OUTDIR/callgrind"
|
||||
# -pg adds code to executable, that generates file containing function call info (gmon.out)
|
||||
C_ARGS="-O2 -flto=auto -fuse-linker-plugin"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
TASK_SCRIPT=cbuild/default_tasks/callgrind.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# compiles executable with sanitizers and executes it to find errors and warnings
|
||||
sanitize)
|
||||
OUTDIR="$OUTDIR/sanitize"
|
||||
C_ARGS="-O0 -g3 -fsanitize=undefined,address"
|
||||
CPP_ARGS="$C_ARGS"
|
||||
LINKER_ARGS="$CPP_ARGS"
|
||||
PRE_TASK_SCRIPT=cbuild/default_tasks/build_exec.sh
|
||||
TASK_SCRIPT=cbuild/default_tasks/exec.sh
|
||||
POST_TASK_SCRIPT=
|
||||
;;
|
||||
# rebuilds specified dependencies
|
||||
# EXAMPLE: `cbuild rebuild_dependencies=libexample1,fonts`
|
||||
# 'all' can be specified to rebuild all dependencies
|
||||
rebuild_dependencies)
|
||||
TASK_SCRIPT=cbuild/default_tasks/rebuild_dependencies.sh
|
||||
;;
|
||||
# deletes generated files
|
||||
clean)
|
||||
TASK_SCRIPT=cbuild/default_tasks/clean.sh
|
||||
;;
|
||||
# nothing to do
|
||||
"" | no_task)
|
||||
;;
|
||||
# unknown task
|
||||
*)
|
||||
error "task <$PROJECT/$TASK> not found"
|
||||
;;
|
||||
esac
|
||||
65
src/VM/VM.c
Normal file
65
src/VM/VM.c
Normal file
@ -0,0 +1,65 @@
|
||||
#include "VM.h"
|
||||
#include "../instructions/instructions.h"
|
||||
|
||||
void VM_init(VM* vm){
|
||||
memset(vm, 0, sizeof(VM));
|
||||
vm->state = VMState_Initialized;
|
||||
}
|
||||
|
||||
bool VM_loadProgram(VM* vm, u8* data, size_t size){
|
||||
if(data == NULL){
|
||||
VM_setErrorMessage(vm, "[VM_loadProgram] can't load program because data == NULL");
|
||||
return false;
|
||||
}
|
||||
if(size == 0){
|
||||
VM_setErrorMessage(vm, "[VM_loadProgram] can't load program because size == 0");
|
||||
return false;
|
||||
}
|
||||
|
||||
vm->data = data;
|
||||
vm->data_size = size;
|
||||
return true;
|
||||
}
|
||||
|
||||
i32 VM_executeProgram(VM* vm){
|
||||
if(vm->data == NULL){
|
||||
VM_setErrorMessage(vm, "[VM_executeProgram] data is null");
|
||||
return -1;
|
||||
}
|
||||
|
||||
size_t pos = 0;
|
||||
while (pos < vm->data_size){
|
||||
u8 opcode = vm->data[pos];
|
||||
|
||||
const Instruction* instr = Instruction_getFromOpcode(opcode);
|
||||
if(instr == NULL){
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
pos++;
|
||||
i32 bytes_read = instr->implementation(vm, pos);
|
||||
if(bytes_read < 0)
|
||||
return -1;
|
||||
|
||||
pos += bytes_read;
|
||||
}
|
||||
|
||||
if(vm->state != VMState_Exited){
|
||||
VM_setErrorMessage(vm, "[%p] unexpected end of program", (void*)pos);
|
||||
return -1;
|
||||
}
|
||||
|
||||
// exit code of the program should be in ax register
|
||||
return vm->ax.i32v;
|
||||
}
|
||||
|
||||
bool VM_dataRead(VM* vm, void* dst, size_t pos, size_t size){
|
||||
if(pos + size >= vm->data_size){
|
||||
VM_setErrorMessage(vm, "[%p] unexpected end of data", (void*)vm->data_size);
|
||||
return false;
|
||||
}
|
||||
|
||||
memcpy(dst, vm->data + pos, size);
|
||||
return true;
|
||||
}
|
||||
71
src/VM/VM.h
Normal file
71
src/VM/VM.h
Normal file
@ -0,0 +1,71 @@
|
||||
#pragma once
|
||||
#include "../std.h"
|
||||
|
||||
typedef union Register {
|
||||
u32 u32v;
|
||||
i32 i32v;
|
||||
f32 f32v;
|
||||
struct {
|
||||
u16 u16v0;
|
||||
u16 u16v1;
|
||||
};
|
||||
struct {
|
||||
i16 i16v0;
|
||||
i16 i16v1;
|
||||
};
|
||||
struct {
|
||||
u8 u8v0;
|
||||
u8 u8v1;
|
||||
u8 u8v2;
|
||||
u8 u8v3;
|
||||
};
|
||||
struct {
|
||||
i8 i8v0;
|
||||
i8 i8v1;
|
||||
i8 i8v2;
|
||||
i8 i8v3;
|
||||
};
|
||||
} Register;
|
||||
|
||||
typedef enum VMState {
|
||||
VMState_Initialized,
|
||||
VMState_Executing,
|
||||
VMState_Exited,
|
||||
} VMState;
|
||||
|
||||
typedef struct VM {
|
||||
union {
|
||||
struct {
|
||||
Register ax;
|
||||
Register bx;
|
||||
Register cx;
|
||||
Register dx;
|
||||
};
|
||||
Register registers[4];
|
||||
};
|
||||
|
||||
VMState state;
|
||||
char* error_message;
|
||||
|
||||
u8* data;
|
||||
size_t data_size;
|
||||
} VM;
|
||||
|
||||
void VM_init(VM* vm);
|
||||
|
||||
/// @brief Loads a program from the buffer.
|
||||
/// @param data buffer with full program code
|
||||
/// @param size size of the program in bytes
|
||||
bool VM_loadProgram(VM* vm, u8* data, size_t size);
|
||||
|
||||
/// @brief Executes the program loaded into VM.
|
||||
/// @return program exit code or -1 on error (check vm.error_message)
|
||||
i32 VM_executeProgram(VM* vm);
|
||||
|
||||
#define VM_setErrorMessage(V, FORMAT, ...) {\
|
||||
char* buf = malloc(256);\
|
||||
sprintf(buf, FORMAT, ##__VA_ARGS__);\
|
||||
vm->error_message = buf;\
|
||||
}
|
||||
|
||||
bool VM_dataRead(VM* vm, void* dst, size_t pos, size_t size);
|
||||
8
src/instructions/impl/EXIT.c
Normal file
8
src/instructions/impl/EXIT.c
Normal file
@ -0,0 +1,8 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
/// EXIT
|
||||
/// ax - exit code
|
||||
i32 EXIT_impl(VM* vm, size_t pos){
|
||||
vm->state = VMState_Exited;
|
||||
return 0;
|
||||
}
|
||||
16
src/instructions/impl/MOV.c
Normal file
16
src/instructions/impl/MOV.c
Normal file
@ -0,0 +1,16 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
/// MOV [dst_register] [src_register]
|
||||
i32 MOV_impl(VM* vm, size_t pos){
|
||||
u8 dst_register_i = 0;
|
||||
readRegisterVar(dst_register_i);
|
||||
u8 src_register_i = 0;
|
||||
readRegisterVar(src_register_i);
|
||||
if(dst_register_i == src_register_i){
|
||||
VM_setErrorMessage(vm, "[%p] dst_register_i == src_register_i (%x) ", (void*)pos, src_register_i);
|
||||
return -1;
|
||||
}
|
||||
|
||||
vm->registers[dst_register_i].u32v = vm->registers[src_register_i].u32v;
|
||||
return sizeof(dst_register_i) + sizeof(src_register_i);
|
||||
}
|
||||
6
src/instructions/impl/NOP.c
Normal file
6
src/instructions/impl/NOP.c
Normal file
@ -0,0 +1,6 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
/// NOP
|
||||
i32 NOP_impl(VM* vm, size_t pos){
|
||||
return 0;
|
||||
}
|
||||
15
src/instructions/impl/PUSH.c
Normal file
15
src/instructions/impl/PUSH.c
Normal file
@ -0,0 +1,15 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
/// PUSH [dst_register] [value_size] [value]
|
||||
i32 PUSH_impl(VM* vm, size_t pos){
|
||||
u8 dst_register_i = 0;
|
||||
readRegisterVar(dst_register_i);
|
||||
u8 value_size = 0;
|
||||
readValueSizeVar(value_size);
|
||||
|
||||
vm->registers[dst_register_i].u32v = 0;
|
||||
if(!VM_dataRead(vm, &vm->registers[dst_register_i].u32v, pos, value_size))
|
||||
return -1;
|
||||
|
||||
return sizeof(dst_register_i) + sizeof(value_size) + value_size;
|
||||
}
|
||||
44
src/instructions/impl/SYS.c
Normal file
44
src/instructions/impl/SYS.c
Normal file
@ -0,0 +1,44 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
FILE* fileFromN(VM* vm, size_t pos, u32 file_n){
|
||||
FILE* f = NULL;
|
||||
switch(file_n){
|
||||
case 0: f = stdin; break;
|
||||
case 1: f = stdout; break;
|
||||
case 2: f = stderr; break;
|
||||
default:
|
||||
VM_setErrorMessage(vm, "[%p] invalid file_n (%x) ", (void*)pos, file_n);
|
||||
break;
|
||||
}
|
||||
|
||||
return f;
|
||||
}
|
||||
|
||||
/// SYS
|
||||
/// ax - func code
|
||||
i32 SYS_impl(VM* vm, size_t pos){
|
||||
u8 func_code = vm->ax.u8v0;
|
||||
size_t result_code = 0;
|
||||
switch(func_code){
|
||||
// sys_read
|
||||
// bx - file n
|
||||
// cx - buffer ptr
|
||||
// dx - buffer size
|
||||
case 0:;
|
||||
result_code = fread(vm->data + vm->cx.u32v, 1, vm->dx.u32v, fileFromN(vm, pos, vm->bx.u32v));
|
||||
break;
|
||||
// sys_write
|
||||
// bx - file n
|
||||
// cx - buffer ptr
|
||||
// dx - buffer size
|
||||
case 1:;
|
||||
result_code = fwrite(vm->data + vm->cx.u32v, 1, vm->dx.u32v, fileFromN(vm, pos, vm->bx.u32v));
|
||||
break;
|
||||
default:
|
||||
VM_setErrorMessage(vm, "[%p] invalid system call (%x) ", (void*)pos, func_code);
|
||||
return -1;
|
||||
}
|
||||
|
||||
vm->ax.u32v = result_code;
|
||||
return 0;
|
||||
}
|
||||
32
src/instructions/impl/impl_macros.h
Normal file
32
src/instructions/impl/impl_macros.h
Normal file
@ -0,0 +1,32 @@
|
||||
#pragma once
|
||||
#include "../instructions.h"
|
||||
|
||||
#define readVar(VAR) {\
|
||||
if(!VM_dataRead(vm, &VAR, pos, sizeof(VAR))) \
|
||||
return -1;\
|
||||
pos += sizeof(VAR);\
|
||||
}
|
||||
|
||||
#define validateRegisterIndex(VAR) {\
|
||||
if(VAR > sizeof(vm->registers)){\
|
||||
VM_setErrorMessage(vm, "[%p] invalid register index (%x)", (void*)pos, VAR);\
|
||||
return -1;\
|
||||
}\
|
||||
}
|
||||
|
||||
#define readRegisterVar(VAR) {\
|
||||
readVar(VAR);\
|
||||
validateRegisterIndex(VAR);\
|
||||
}
|
||||
|
||||
#define validateValueSize(VAR) {\
|
||||
if(VAR < 1 || VAR > 4){\
|
||||
VM_setErrorMessage(vm, "[%p] invalid value_size (%x)", (void*)pos, VAR);\
|
||||
return -1;\
|
||||
}\
|
||||
}
|
||||
|
||||
#define readValueSizeVar(VAR) {\
|
||||
readVar(VAR);\
|
||||
validateValueSize(VAR);\
|
||||
}
|
||||
47
src/instructions/impl/math_operators.c
Normal file
47
src/instructions/impl/math_operators.c
Normal file
@ -0,0 +1,47 @@
|
||||
#include "impl_macros.h"
|
||||
|
||||
#define mathOperatorImpl(OPERATOR){\
|
||||
u8 dst_register_i = 0, src_register_i = 0;\
|
||||
readRegisterVar(dst_register_i);\
|
||||
readRegisterVar(src_register_i);\
|
||||
u8 value_size = 0;\
|
||||
readValueSizeVar(value_size);\
|
||||
\
|
||||
switch(value_size){\
|
||||
case 1: \
|
||||
vm->registers[dst_register_i].u8v0 OPERATOR##= vm->registers[src_register_i].u8v0;\
|
||||
break;\
|
||||
case 2: \
|
||||
vm->registers[dst_register_i].u16v0 OPERATOR##= vm->registers[src_register_i].u16v0;\
|
||||
break;\
|
||||
case 4: \
|
||||
vm->registers[dst_register_i].u32v OPERATOR##= vm->registers[src_register_i].u32v;\
|
||||
break;\
|
||||
}\
|
||||
return sizeof(dst_register_i) + sizeof(src_register_i) + sizeof(value_size);\
|
||||
}
|
||||
|
||||
/// ADD [dst_register] [src_register]
|
||||
i32 ADD_impl(VM* vm, size_t pos){
|
||||
mathOperatorImpl(+);
|
||||
}
|
||||
|
||||
/// SUB [dst_register] [src_register]
|
||||
i32 SUB_impl(VM* vm, size_t pos){
|
||||
mathOperatorImpl(-);
|
||||
}
|
||||
|
||||
/// MUL [dst_register] [src_register]
|
||||
i32 MUL_impl(VM* vm, size_t pos){
|
||||
mathOperatorImpl(*)
|
||||
}
|
||||
|
||||
/// DIV [dst_register] [src_register]
|
||||
i32 DIV_impl(VM* vm, size_t pos){
|
||||
mathOperatorImpl(/)
|
||||
}
|
||||
|
||||
/// MOD [dst_register] [src_register]
|
||||
i32 MOD_impl(VM* vm, size_t pos){
|
||||
mathOperatorImpl(%)
|
||||
}
|
||||
24
src/instructions/instructions.c
Normal file
24
src/instructions/instructions.c
Normal file
@ -0,0 +1,24 @@
|
||||
#include "instructions.h"
|
||||
|
||||
const Instruction instructions[] = {
|
||||
Instruction_construct(NOP),
|
||||
Instruction_construct(PUSH),
|
||||
Instruction_construct(MOV),
|
||||
Instruction_construct(ADD),
|
||||
Instruction_construct(SUB),
|
||||
Instruction_construct(MUL),
|
||||
Instruction_construct(DIV),
|
||||
Instruction_construct(MOD),
|
||||
Instruction_construct(SYS),
|
||||
Instruction_construct(EXIT),
|
||||
// Instruction_construct(JMP),
|
||||
// Instruction_construct(CALL),
|
||||
};
|
||||
const size_t instructions_count = sizeof(instructions)/sizeof(instructions[0]);
|
||||
|
||||
const Instruction* Instruction_getFromOpcode(u8 opcode){
|
||||
if(opcode >= instructions_count)
|
||||
return NULL;
|
||||
|
||||
return instructions + opcode;
|
||||
}
|
||||
34
src/instructions/instructions.h
Normal file
34
src/instructions/instructions.h
Normal file
@ -0,0 +1,34 @@
|
||||
#pragma once
|
||||
#include "../VM/VM.h"
|
||||
|
||||
///@param program_pos position in vm->program next afrer opcode
|
||||
///@returns number of bytes read
|
||||
typedef i32 (*InstructionImplFunc_t)(VM* vm, size_t program_pos);
|
||||
|
||||
typedef struct Instruction {
|
||||
const char* name;
|
||||
InstructionImplFunc_t implementation;
|
||||
} Instruction;
|
||||
|
||||
#define Instruction_construct(NAME) {\
|
||||
.name = #NAME, \
|
||||
.implementation = NAME##_impl \
|
||||
}
|
||||
|
||||
/// @brief get instruction info from table
|
||||
/// @param opcode any byte
|
||||
/// @return ptr to struct or NULL
|
||||
const Instruction* Instruction_getFromOpcode(u8 opcode);
|
||||
|
||||
i32 NOP_impl(VM* vm, size_t pos);
|
||||
i32 PUSH_impl(VM* vm, size_t pos);
|
||||
i32 MOV_impl(VM* vm, size_t pos);
|
||||
i32 ADD_impl(VM* vm, size_t pos);
|
||||
i32 SUB_impl(VM* vm, size_t pos);
|
||||
i32 MUL_impl(VM* vm, size_t pos);
|
||||
i32 DIV_impl(VM* vm, size_t pos);
|
||||
i32 MOD_impl(VM* vm, size_t pos);
|
||||
i32 SYS_impl(VM* vm, size_t pos);
|
||||
i32 EXIT_impl(VM* vm, size_t pos);
|
||||
i32 JMP_impl(VM* vm, size_t pos);
|
||||
i32 CALL_impl(VM* vm, size_t pos);
|
||||
77
src/main.c
Normal file
77
src/main.c
Normal file
@ -0,0 +1,77 @@
|
||||
#include "VM/VM.h"
|
||||
#include "instructions/instructions.h"
|
||||
|
||||
#define arg_is(STR) (strcmp(argv[argi], STR) == 0)
|
||||
|
||||
i32 main(const i32 argc, const char** argv){
|
||||
const char* filename = NULL;
|
||||
|
||||
for(i32 argi = 1; argi < argc; argi++){
|
||||
if(arg_is("-h") || arg_is("--help")){
|
||||
printf(
|
||||
"-h, --help Show this message\n"
|
||||
"-op, --opcodes Shows list of all instructions.\n"
|
||||
"-i, --image [FILE] Boot VM using image file\n"
|
||||
);
|
||||
return 0;
|
||||
}
|
||||
else if(arg_is("-op") || arg_is("--opcodes")){
|
||||
for(u8 opcode = 0; opcode < 255; opcode++){
|
||||
const Instruction* instr = Instruction_getFromOpcode(opcode);
|
||||
if(instr != NULL){
|
||||
printf("%02x %s\n", opcode, instr->name);
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
else if(arg_is("-i") || arg_is("--image")){
|
||||
if(++argi >= argc){
|
||||
printfe("ERROR: no image file specified");
|
||||
return 1;
|
||||
}
|
||||
filename = argv[argi];
|
||||
}
|
||||
else {
|
||||
printfe("ERROR: unknown argument '%s'", argv[argi]);
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
if(filename == NULL){
|
||||
printfe("ERROR: no arguments provided. Use --help to know more.");
|
||||
return 1;
|
||||
}
|
||||
|
||||
FILE* file = fopen(filename, "rb");
|
||||
if(file == NULL){
|
||||
printfe("ERROR: can't open file '%s'", filename);
|
||||
return 1;
|
||||
}
|
||||
|
||||
const size_t buffer_size = 1024*1024;
|
||||
u8* buffer = malloc(buffer_size);
|
||||
memset(buffer, 0, buffer_size);
|
||||
|
||||
size_t bytes_read = fread(buffer, 1, buffer_size, file);
|
||||
fclose(file);
|
||||
if(bytes_read == (size_t)EOF){
|
||||
printfe("ERROR: can't read file '%s'", filename);
|
||||
free(buffer);
|
||||
return 1;
|
||||
}
|
||||
|
||||
VM vm;
|
||||
VM_init(&vm);
|
||||
|
||||
i32 exit_code = 1;
|
||||
if(VM_loadProgram(&vm, buffer, bytes_read)){
|
||||
exit_code = VM_executeProgram(&vm);
|
||||
}
|
||||
if(vm.error_message != NULL){
|
||||
printfe("VM ERROR: %s", vm.error_message);
|
||||
free(vm.error_message);
|
||||
}
|
||||
|
||||
free(buffer);
|
||||
return exit_code;
|
||||
}
|
||||
27
src/std.h
Normal file
27
src/std.h
Normal file
@ -0,0 +1,27 @@
|
||||
#pragma once
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <stdint.h>
|
||||
#include <stdarg.h>
|
||||
#include <stddef.h>
|
||||
#include <time.h>
|
||||
#include <math.h>
|
||||
#include <string.h>
|
||||
|
||||
typedef int8_t i8;
|
||||
typedef uint8_t u8;
|
||||
typedef int16_t i16;
|
||||
typedef uint16_t u16;
|
||||
typedef int32_t i32;
|
||||
typedef uint32_t u32;
|
||||
typedef int64_t i64;
|
||||
typedef uint64_t u64;
|
||||
typedef float f32;
|
||||
typedef double f64;
|
||||
|
||||
typedef u8 bool;
|
||||
#define true 1
|
||||
#define false 0
|
||||
|
||||
#define printfe(FORMAT, ...) fprintf(stderr, FORMAT ,##__VA_ARGS__)
|
||||
Loading…
Reference in New Issue
Block a user