mirror of
https://github.com/krgamestudios/Toy.git
synced 2026-04-15 23:04:08 +10:00
Moved repl's tools into their own file
This commit is contained in:
134
repl/repl_main.c
134
repl/repl_main.c
@@ -1,3 +1,6 @@
|
|||||||
|
#include "repl_tools.h"
|
||||||
|
#include "lib_standard.h"
|
||||||
|
|
||||||
#include "console_colors.h"
|
#include "console_colors.h"
|
||||||
|
|
||||||
#include "lexer.h"
|
#include "lexer.h"
|
||||||
@@ -9,137 +12,6 @@
|
|||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
|
|
||||||
//extra libraries
|
|
||||||
#include "lib_standard.h"
|
|
||||||
|
|
||||||
//IO functions
|
|
||||||
char* readFile(char* path, size_t* fileSize) {
|
|
||||||
FILE* file = fopen(path, "rb");
|
|
||||||
|
|
||||||
if (file == NULL) {
|
|
||||||
fprintf(stderr, ERROR "Could not open file \"%s\"\n" RESET, path);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
|
|
||||||
fseek(file, 0L, SEEK_END);
|
|
||||||
*fileSize = ftell(file);
|
|
||||||
rewind(file);
|
|
||||||
|
|
||||||
char* buffer = (char*)malloc(*fileSize + 1);
|
|
||||||
|
|
||||||
if (buffer == NULL) {
|
|
||||||
fprintf(stderr, ERROR "Not enough memory to read \"%s\"\n" RESET, path);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
|
|
||||||
size_t bytesRead = fread(buffer, sizeof(char), *fileSize, file);
|
|
||||||
|
|
||||||
buffer[*fileSize] = '\0'; //NOTE: fread doesn't append this
|
|
||||||
|
|
||||||
if (bytesRead < *fileSize) {
|
|
||||||
fprintf(stderr, ERROR "Could not read file \"%s\"\n" RESET, path);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
|
|
||||||
fclose(file);
|
|
||||||
|
|
||||||
return buffer;
|
|
||||||
}
|
|
||||||
|
|
||||||
void writeFile(char* path, unsigned char* bytes, size_t size) {
|
|
||||||
FILE* file = fopen(path, "wb");
|
|
||||||
|
|
||||||
if (file == NULL) {
|
|
||||||
fprintf(stderr, ERROR "Could not open file \"%s\"\n" RESET, path);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
|
|
||||||
int written = fwrite(bytes, size, 1, file);
|
|
||||||
|
|
||||||
if (written != 1) {
|
|
||||||
fprintf(stderr, ERROR "Could not write file \"%s\"\n" RESET, path);
|
|
||||||
exit(-1);
|
|
||||||
}
|
|
||||||
|
|
||||||
fclose(file);
|
|
||||||
}
|
|
||||||
|
|
||||||
unsigned char* compileString(char* source, size_t* size) {
|
|
||||||
Lexer lexer;
|
|
||||||
Parser parser;
|
|
||||||
Compiler compiler;
|
|
||||||
|
|
||||||
initLexer(&lexer, source);
|
|
||||||
initParser(&parser, &lexer);
|
|
||||||
initCompiler(&compiler);
|
|
||||||
|
|
||||||
//run the parser until the end of the source
|
|
||||||
ASTNode* node = scanParser(&parser);
|
|
||||||
while(node != NULL) {
|
|
||||||
//pack up and leave
|
|
||||||
if (node->type == AST_NODEERROR) {
|
|
||||||
printf(ERROR "error node detected\n" RESET);
|
|
||||||
freeNode(node);
|
|
||||||
freeCompiler(&compiler);
|
|
||||||
freeParser(&parser);
|
|
||||||
return NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
writeCompiler(&compiler, node);
|
|
||||||
freeNode(node);
|
|
||||||
node = scanParser(&parser);
|
|
||||||
}
|
|
||||||
|
|
||||||
//get the bytecode dump
|
|
||||||
unsigned char* tb = collateCompiler(&compiler, (int*)(size));
|
|
||||||
|
|
||||||
//cleanup
|
|
||||||
freeCompiler(&compiler);
|
|
||||||
freeParser(&parser);
|
|
||||||
//no lexer to clean up
|
|
||||||
|
|
||||||
//finally
|
|
||||||
return tb;
|
|
||||||
}
|
|
||||||
|
|
||||||
void runBinary(unsigned char* tb, size_t size) {
|
|
||||||
Interpreter interpreter;
|
|
||||||
initInterpreter(&interpreter);
|
|
||||||
|
|
||||||
//inject the libs
|
|
||||||
injectNativeHook(&interpreter, "standard", hookStandard);
|
|
||||||
|
|
||||||
runInterpreter(&interpreter, tb, size);
|
|
||||||
freeInterpreter(&interpreter);
|
|
||||||
}
|
|
||||||
|
|
||||||
void runBinaryFile(char* fname) {
|
|
||||||
size_t size = 0; //not used
|
|
||||||
unsigned char* tb = (unsigned char*)readFile(fname, &size);
|
|
||||||
if (!tb) {
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
runBinary(tb, size);
|
|
||||||
//interpreter takes ownership of the binary data
|
|
||||||
}
|
|
||||||
|
|
||||||
void runSource(char* source) {
|
|
||||||
size_t size = 0;
|
|
||||||
unsigned char* tb = compileString(source, &size);
|
|
||||||
if (!tb) {
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
runBinary(tb, size);
|
|
||||||
}
|
|
||||||
|
|
||||||
void runSourceFile(char* fname) {
|
|
||||||
size_t size = 0; //not used
|
|
||||||
char* source = readFile(fname, &size);
|
|
||||||
runSource(source);
|
|
||||||
free((void*)source);
|
|
||||||
}
|
|
||||||
|
|
||||||
void repl() {
|
void repl() {
|
||||||
//repl does it's own thing for now
|
//repl does it's own thing for now
|
||||||
bool error = false;
|
bool error = false;
|
||||||
|
|||||||
141
repl/repl_tools.c
Normal file
141
repl/repl_tools.c
Normal file
@@ -0,0 +1,141 @@
|
|||||||
|
#include "repl_tools.h"
|
||||||
|
#include "lib_standard.h"
|
||||||
|
|
||||||
|
#include "console_colors.h"
|
||||||
|
|
||||||
|
#include "lexer.h"
|
||||||
|
#include "parser.h"
|
||||||
|
#include "compiler.h"
|
||||||
|
#include "interpreter.h"
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
|
||||||
|
//IO functions
|
||||||
|
char* readFile(char* path, size_t* fileSize) {
|
||||||
|
FILE* file = fopen(path, "rb");
|
||||||
|
|
||||||
|
if (file == NULL) {
|
||||||
|
fprintf(stderr, ERROR "Could not open file \"%s\"\n" RESET, path);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
fseek(file, 0L, SEEK_END);
|
||||||
|
*fileSize = ftell(file);
|
||||||
|
rewind(file);
|
||||||
|
|
||||||
|
char* buffer = (char*)malloc(*fileSize + 1);
|
||||||
|
|
||||||
|
if (buffer == NULL) {
|
||||||
|
fprintf(stderr, ERROR "Not enough memory to read \"%s\"\n" RESET, path);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t bytesRead = fread(buffer, sizeof(char), *fileSize, file);
|
||||||
|
|
||||||
|
buffer[*fileSize] = '\0'; //NOTE: fread doesn't append this
|
||||||
|
|
||||||
|
if (bytesRead < *fileSize) {
|
||||||
|
fprintf(stderr, ERROR "Could not read file \"%s\"\n" RESET, path);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
fclose(file);
|
||||||
|
|
||||||
|
return buffer;
|
||||||
|
}
|
||||||
|
|
||||||
|
void writeFile(char* path, unsigned char* bytes, size_t size) {
|
||||||
|
FILE* file = fopen(path, "wb");
|
||||||
|
|
||||||
|
if (file == NULL) {
|
||||||
|
fprintf(stderr, ERROR "Could not open file \"%s\"\n" RESET, path);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
int written = fwrite(bytes, size, 1, file);
|
||||||
|
|
||||||
|
if (written != 1) {
|
||||||
|
fprintf(stderr, ERROR "Could not write file \"%s\"\n" RESET, path);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
fclose(file);
|
||||||
|
}
|
||||||
|
|
||||||
|
//repl functions
|
||||||
|
unsigned char* compileString(char* source, size_t* size) {
|
||||||
|
Lexer lexer;
|
||||||
|
Parser parser;
|
||||||
|
Compiler compiler;
|
||||||
|
|
||||||
|
initLexer(&lexer, source);
|
||||||
|
initParser(&parser, &lexer);
|
||||||
|
initCompiler(&compiler);
|
||||||
|
|
||||||
|
//run the parser until the end of the source
|
||||||
|
ASTNode* node = scanParser(&parser);
|
||||||
|
while(node != NULL) {
|
||||||
|
//pack up and leave
|
||||||
|
if (node->type == AST_NODEERROR) {
|
||||||
|
printf(ERROR "error node detected\n" RESET);
|
||||||
|
freeNode(node);
|
||||||
|
freeCompiler(&compiler);
|
||||||
|
freeParser(&parser);
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
writeCompiler(&compiler, node);
|
||||||
|
freeNode(node);
|
||||||
|
node = scanParser(&parser);
|
||||||
|
}
|
||||||
|
|
||||||
|
//get the bytecode dump
|
||||||
|
unsigned char* tb = collateCompiler(&compiler, (int*)(size));
|
||||||
|
|
||||||
|
//cleanup
|
||||||
|
freeCompiler(&compiler);
|
||||||
|
freeParser(&parser);
|
||||||
|
//no lexer to clean up
|
||||||
|
|
||||||
|
//finally
|
||||||
|
return tb;
|
||||||
|
}
|
||||||
|
|
||||||
|
void runBinary(unsigned char* tb, size_t size) {
|
||||||
|
Interpreter interpreter;
|
||||||
|
initInterpreter(&interpreter);
|
||||||
|
|
||||||
|
//inject the libs
|
||||||
|
injectNativeHook(&interpreter, "standard", hookStandard);
|
||||||
|
|
||||||
|
runInterpreter(&interpreter, tb, size);
|
||||||
|
freeInterpreter(&interpreter);
|
||||||
|
}
|
||||||
|
|
||||||
|
void runBinaryFile(char* fname) {
|
||||||
|
size_t size = 0; //not used
|
||||||
|
unsigned char* tb = (unsigned char*)readFile(fname, &size);
|
||||||
|
if (!tb) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
runBinary(tb, size);
|
||||||
|
//interpreter takes ownership of the binary data
|
||||||
|
}
|
||||||
|
|
||||||
|
void runSource(char* source) {
|
||||||
|
size_t size = 0;
|
||||||
|
unsigned char* tb = compileString(source, &size);
|
||||||
|
if (!tb) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
runBinary(tb, size);
|
||||||
|
}
|
||||||
|
|
||||||
|
void runSourceFile(char* fname) {
|
||||||
|
size_t size = 0; //not used
|
||||||
|
char* source = readFile(fname, &size);
|
||||||
|
runSource(source);
|
||||||
|
free((void*)source);
|
||||||
|
}
|
||||||
14
repl/repl_tools.h
Normal file
14
repl/repl_tools.h
Normal file
@@ -0,0 +1,14 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include "common.h"
|
||||||
|
|
||||||
|
char* readFile(char* path, size_t* fileSize);
|
||||||
|
void writeFile(char* path, unsigned char* bytes, size_t size);
|
||||||
|
|
||||||
|
unsigned char* compileString(char* source, size_t* size);
|
||||||
|
|
||||||
|
void runBinary(unsigned char* tb, size_t size);
|
||||||
|
void runBinaryFile(char* fname);
|
||||||
|
void runSource(char* source);
|
||||||
|
void runSourceFile(char* fname);
|
||||||
|
|
||||||
Reference in New Issue
Block a user