main.c

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "common.h"
#include "chunk.h"
#include "debug.h"
#include "vm.h"


static void repl() {
	char line[1024];
	for (;;) {
		printf("> ");

		if (!fgets(line, sizeof(line), stdin)) {
			printf("\n");
			break;
		}

		interpret(line);
	}
}

static char* readFile(const char* path) {
	FILE* file = fopen(path, "rb");

	if (file == NULL) {
		fprintf(stderr, "Failed to open file \"%s\"\n", path);
		exit(74);
	}

	// seeks end of file and ftell to get number of bytes required for file
	fseek(file, 0L, SEEK_END);
	size_t fileSize = ftell(file);
	rewind(file);

	char* buffer = (char*)malloc(fileSize + 1);
	if (buffer == NULL) {
		fprintf(stderr, "Not enough memory to open \"%s\"\n", path);
		exit(74);
	}

	size_t bytesRead = fread(buffer, sizeof(char), fileSize, file);
	if (bytesRead < fileSize) {
		fprintf(stderr, "Could not read file \"%s\".\n", path);
		exit(74);
	}

	buffer[bytesRead] = '\0';

	fclose(file);
    

	printf("buffer %d: %x\n", 0, buffer[0]);
	/* for (int i= 0; i<bytesRead + 1; i++) { */
	/* 	printf("buffer %d: %x\n", i, buffer[i]); */
	/* } */

	return buffer;
}

static void runFile(const char* path) {
	char* source = readFile(path);
	InterpretResult result = interpret(source);
	free(source);

	if (result == INTERPRET_COMPILE_ERROR) exit(65);
	if (result == INTERPRET_RUNTIME_ERROR) exit(70);
}

int main (int argc, const char* argv[]) {
	initVM();

	if (argc == 1) {
		repl();
	} else if (argc == 2) {
		runFile(argv[1]);
	} else {
		fprintf(stderr, "Usage: jolt [path]\n");
		exit(64);
	}

	// Chunk chunk;
	// initChunk(&chunk);

	// int constant = addConstant(&chunk, 1.2);
	// writeChunk(&chunk, OP_CONSTANT, 123);
	// writeChunk(&chunk, constant, 123);

	// constant = addConstant(&chunk, 3.4);
	// writeChunk(&chunk, OP_CONSTANT, 123);
	// writeChunk(&chunk, constant, 123);

	// writeChunk(&chunk, OP_ADD, 123);

	// constant = addConstant(&chunk, 5.6);
	// writeChunk(&chunk, OP_CONSTANT, 123);
	// writeChunk(&chunk, constant, 123);

	// writeChunk(&chunk, OP_DIVIDE, 123);
	// writeChunk(&chunk, OP_NEGATE, 123);

	// writeChunk(&chunk, OP_RETURN, 123);
	// disassembleChunk(&chunk, "test chunk");
	// interpret(&chunk);
	freeVM();
	// freeChunk(&chunk);
	return 0;
}