From aac2dae5cfcd360ad48f265910511c98decbf9e7 Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Tue, 20 Apr 2021 00:54:43 +0200
Subject: Beautiful blub blabs

---
 src/lexer.c | 188 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 188 insertions(+)
 create mode 100644 src/lexer.c

(limited to 'src/lexer.c')

diff --git a/src/lexer.c b/src/lexer.c
new file mode 100644
index 0000000..ecbc613
--- /dev/null
+++ b/src/lexer.c
@@ -0,0 +1,188 @@
+#include <def.h>
+#include <lexer.h>
+#include <stdio.h>
+#include <string.h>
+
+#define CMP(tok) (strncmp(tok " ", str, MIN(strlen(tok) + 1, size)) == 0)
+
+void token_print(struct token *tok)
+{
+	if (!tok->length)
+		return;
+
+	char swp = tok->start[tok->length];
+	tok->start[tok->length] = 0;
+	printf("%s\n", tok->start);
+	tok->start[tok->length] = swp;
+}
+
+struct token token_resolve(char *str, u32 size)
+{
+	enum token_type type = UNKNOWN;
+	u32 length = 0;
+
+	// "Beautiful" ~ Everyone. Probably.
+	if (CMP("nop")) {
+		type = NOP;
+		length = 3;
+	} else if (CMP("jbc")) {
+		type = JBC;
+		length = 3;
+	} else if (CMP("jb")) {
+		type = JB;
+		length = 2;
+	} else if (CMP("jnb")) {
+		type = JNB;
+		length = 3;
+	} else if (CMP("jc")) {
+		type = JC;
+		length = 2;
+	} else if (CMP("jnc")) {
+		type = JNC;
+		length = 3;
+	} else if (CMP("jz")) {
+		type = JZ;
+		length = 2;
+	} else if (CMP("jnz")) {
+		type = JNZ;
+		length = 3;
+	} else if (CMP("sjmp")) {
+		type = SJMP;
+		length = 4;
+	} else if (CMP("mov")) {
+		type = MOV;
+		length = 3;
+	} else if (CMP("orl")) {
+		type = ORL;
+		length = 3;
+	} else if (CMP("anl")) {
+		type = ANL;
+		length = 3;
+	} else if (CMP("push")) {
+		type = PUSH;
+		length = 4;
+	} else if (CMP("pop")) {
+		type = POP;
+		length = 3;
+	} else if (CMP("movx")) {
+		type = MOVX;
+		length = 4;
+	} else if (CMP("ajmp")) {
+		type = AJMP;
+		length = 4;
+	} else if (CMP("acall")) {
+		type = ACALL;
+		length = 5;
+	} else if (CMP("ljmp")) {
+		type = LJMP;
+		length = 4;
+	} else if (CMP("lcall")) {
+		type = LCALL;
+		length = 5;
+	} else if (CMP("reti")) {
+		type = RETI;
+		length = 4;
+	} else if (CMP("ret")) {
+		type = RET;
+		length = 3;
+	} else if (CMP("xrl")) {
+		type = XRL;
+		length = 3;
+	} else if (CMP("cpl")) {
+		type = CPL;
+		length = 3;
+	} else if (CMP("clr")) {
+		type = CLR;
+		length = 3;
+	} else if (CMP("setb")) {
+		type = SETB;
+		length = 4;
+	} else if (CMP("rr")) {
+		type = RR;
+		length = 2;
+	} else if (CMP("rrc")) {
+		type = RRC;
+		length = 3;
+	} else if (CMP("rl")) {
+		type = RL;
+		length = 2;
+	} else if (CMP("rlc")) {
+		type = RLC;
+		length = 3;
+	} else if (CMP("xlr")) {
+		type = XLR;
+		length = 3;
+	} else if (CMP("jmp")) {
+		type = JMP;
+		length = 3;
+	} else if (CMP("movc")) {
+		type = MOVC;
+		length = 4;
+	} else if (CMP("inc")) {
+		type = INC;
+		length = 3;
+	} else if (CMP("dec")) {
+		type = DEC;
+		length = 3;
+	} else if (CMP("add")) {
+		type = ADD;
+		length = 3;
+	} else if (CMP("addc")) {
+		type = ADDC;
+		length = 4;
+	} else if (CMP("div")) {
+		type = DIV;
+		length = 3;
+	} else if (CMP("dubb")) {
+		type = DUBB;
+		length = 4;
+	} else if (CMP("mul")) {
+		type = MUL;
+		length = 3;
+	} else if (CMP("cjne")) {
+		type = CJNE;
+		length = 4;
+	} else if (CMP("swap")) {
+		type = SWAP;
+		length = 4;
+	} else if (CMP("da")) {
+		type = DA;
+		length = 2;
+	} else if (CMP("crl")) {
+		type = CRL;
+		length = 3;
+	} else if (CMP("xch")) {
+		type = XCH;
+		length = 3;
+	} else if (CMP("djnz")) {
+		type = DJNZ;
+		length = 4;
+	} else if (CMP("xchd")) {
+		type = XCHD;
+		length = 4;
+	} else if (CMP("call")) {
+		type = CALL;
+		length = 4;
+	} else if (CMP("org")) {
+		type = ORG;
+		length = 3;
+	} else if (CMP("db")) {
+		type = DB;
+		length = 2;
+	} else if (CMP("dw")) {
+		type = DW;
+		length = 2;
+	} else if (CMP("include")) {
+		type = INCLUDE;
+		length = 7;
+	}
+
+	struct token tok = {
+		.type = type,
+		.start = str,
+		.length = length,
+		.data = 0,
+	};
+
+	return tok;
+}
-- 
cgit v1.2.3