tern-assembler/asm_rules.c

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

void trit_flip(char *in, char *instruction) {
	for (int i = 0; i<(sizeof(in)/sizeof(in[0])); i++) {
		in[i] = instruction[i];
	}
}
int asm_rules(char *in, char _asm[27]){
	
	for (int i = 0; i < 27; i++) {
		_asm[i] = 0;
	}
	int pass = 0;

	char *word = strtok(in, " ");
	while(word != NULL) {

		if (strcmp(word, "nop") == 0) {
			//keeps the default value (0) if nop
		} else if (word[0] == ';') {
			//comments
			break;
		} else {
			if(word[0] == 'i') {
				//integer
				_asm[7] = '0'; 
			} else if(word[0] == 'f') {
				//floating
				_asm[7] = '-'; 
			}
			if (word[0] == '$' || word[0] == '@') {

			//cases make larger checks harder to read
			} else if (strstr(word, "max")) { 
				trit_flip(_asm, "+00000+000000");
			} else if (strstr(word, "min")) {
				trit_flip(_asm, "-00000+000000");
			} else if (strstr(word, "any")) {
				trit_flip(_asm, "000000+000000");
			} else if (strstr(word, "cons")) {
				trit_flip(_asm, "-+0000+000000");
			} else if (strstr(word, "add")) {
				trit_flip(_asm, "+-+000+000000");
			} else if (strstr(word, "sub")) {
				trit_flip(_asm, "+--000+000000");
			} else if (strstr(word, "mul")) {
				trit_flip(_asm, "+0+000+000000");
			} else if (strstr(word, "div")) {
				trit_flip(_asm, "+0-000+000000");
			} else if (strstr(word, "dec")) {
				trit_flip(_asm, "--0000+000000");
			} else if (strstr(word, "inc")) {
				trit_flip(_asm, "-+0000+000000");
			} else if (strstr(word, "iou")) {
				trit_flip(_asm, "--0000-000000");
			} else if (strstr(word, "ieq")) {
				trit_flip(_asm, "+-0000-000000");
			} else if (strstr(word, "jmp")) {
				trit_flip(_asm, "000000-000000");
			} else if (strstr(word, "jec")) {
				trit_flip(_asm, "+00000-000000");
			} else if (strstr(word, "mov")) {
				trit_flip(_asm, "+000000000000");
			} else if (strstr(word, "Nst")) { //underflow test
				trit_flip(_asm, "-------------");
			} else if (strstr(word, "Pst")) { //overflow test
				trit_flip(_asm, "+++++++++++++");
			}



		}

		word = strtok(NULL, " ");
	}
	pass = 0;
	return 0;
}