Imported pristine psxsdk-20190410 from official repo

1 files changed, 144 insertions, 0 deletions

diff --git a/tools/spasm/codegen.c b/tools/spasm/codegen.c
new file mode 100644
index 0000000..fda456d
--- /dev/null
+++ b/tools/spasm/codegen.c
@@ -0,0 +1,144 @@
+#include "spasm.h"
+
+char curIns[128];
+unsigned int curInsArg;
+unsigned int curInsArgT;
+unsigned int insArgv[64];
+unsigned int insArgc;
+unsigned int insArgt[64];
+unsigned int copn;
+int org_found;
+
+void (*INSFUNC)(void);
+
+volatile unsigned int curPc = 0;
+int curPass = 0;
+unsigned int startAddress = 0;
+unsigned int numLabels;
+unsigned int numLabelsAlloc;
+int first_instruction;
+asm_label *labels;
+static int find_label_status = 1;
+
+void codegen_init(void)
+{
+	curPc = startAddress;
+	curPass = 0;
+	numLabels = 0;
+	numLabelsAlloc = 0;
+	labels = NULL;
+}
+		
+static asm_label *find_label_internal(char *name)
+{
+	int i;
+	
+	for(i = 0; i < numLabels; i++)
+	{
+		if(strcmp(name, labels[i].name) == 0)
+			return &labels[i];
+	}
+	
+	return NULL;
+}
+
+static void add_label_internal(char *name, unsigned int pc)
+{
+	// add labels only if current pass >= 1!
+	asm_label *l;
+	
+/*	if(curPass == )
+		return;
+	
+	if(curPass >= 2)
+		return;*/
+
+	//printf("Name = %s\n", name);
+	
+	l = find_label_internal(name);	
+		
+	if(l)
+	{
+		if(l->pc != pc)
+		{
+			//if(l->pass == curPass)
+			//	assembler_error("Impossible to redefine label %s", name);
+			
+			//printf("Redefining, [%s] = %08X, pass %d\n", l->name, pc, curPass);
+			l->pc = pc;
+		}
+				
+		return;
+	}
+	
+	if(numLabels == numLabelsAlloc)
+	{
+		numLabelsAlloc += 128;
+		labels = realloc(labels, sizeof(asm_label) * numLabelsAlloc);
+	}
+	
+	strncpy(labels[numLabels].name, name, 127);
+	labels[numLabels].pass = curPass;
+	
+	labels[numLabels].pc = pc;
+		
+	numLabels++;
+	
+	//printf("label #%d, [%s] = %08X, pass = %d\n", numLabels, name, pc, curPass);
+	
+	/*while(*name)
+	{
+		printf("%x, \'%c\'\n", *name, *name);
+		name++;
+	}*/
+}
+
+	
+
+void add_label(char *name, unsigned int pc)
+{
+	if(curPass == -1)
+		return;
+	
+	return add_label_internal(name, pc);
+}
+
+void add_label_equ(char *name, unsigned int pc)
+{
+	return add_label_internal(name, pc);
+}
+
+unsigned int find_label(char *name)
+{
+	//printf("find_label(%s)\n", name);
+	
+	asm_label *l = find_label_internal(name);
+	
+	if(l)
+	{
+		//find_label_status = 1;
+		return l->pc;
+	}
+	
+// remember! if pass >= 1, abort if you can't find a label, because that means it was really
+// impossible to find.	
+	
+//	printf(">>DEBUG, PASS = %d << Couldn't find label %s$\n",  curPass, name);
+		
+	find_label_status = 0;
+	
+	if(curPass == 1)
+		instruction_error("Cannot find label %s", name);
+	
+	return 0xFFFFFFFF;
+}
+
+void find_label_reset()
+{
+	find_label_status = 1;
+}
+
+int find_label_ok()
+{
+	return find_label_status;
+}