DLX_Simulator/normalizer.c at master · eldron/DLX_Simulator · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
#include <stdio.h>
#include <string.h>

int main(int argc, char ** args){
	if(argc != 7 && argc != 5){
		printf("usage: normalizer -i instruction_file [-m memory_file] -o output_file");
		return 0;
	}

	int ins_idx = 0;
	int mem_idx = 0;
	int out_idx = 0;
	int i;
	for(i = 1;i < argc;i++){
		if(strcmp(args[i], "-i") == 0){
			ins_idx = i + 1;
		}
		if(strcmp(args[i], "-m") == 0){
			mem_idx = i + 1;
		}
		if(strcmp(args[i], "-o") == 0){
			out_idx = i + 1;
		}
	}

	// process instruction file
	FILE * fin = fopen(args[ins_idx], "r");
	FILE * fout = fopen(args[out_idx], "w");
	int seen = 0;
	int new_ins = 1;
	int label = 0;
	char c;
	while((c = fgetc(fin)) != EOF){
		if(c == ' ' || c == '\t' || c == '\n'){
			if(label){
				seen = 0;
			} else {
				seen = 1;
			}
		} else if('a' <= c && c <= 'z'){
			label = 0;
			if(new_ins == 0){
				if(seen){
					fputc(' ', fout);
					seen = 0;
				}
			}
			fputc(c + 'A' - 'a', fout);
			new_ins = 0;
			seen = 0;
		} else if(c == ';'){
			label = 0;
			seen = 0;
			new_ins = 1;
			fputc(c, fout);
			fputc('\n', fout);
		} else if(c == ':'){
			fputc(c, fout);
			new_ins = 0;
			seen = 0;
			label = 1;
		} else {
			if(new_ins == 0){
				if(seen){
					fputc(' ', fout);
					seen = 0;
				}
			}
			label = 0;
			fputc(c, fout);
			new_ins = 0;
			seen = 0;
		}
	}
	fputc('\n', fout);
	fclose(fin);

	// process memory file
	if(mem_idx){
		fin = fopen(args[mem_idx], "r");
		int state = 0;
		while((c = fgetc(fin)) != EOF){
			if(c == ' ' || c == '\t' || c == '\n'){
				if(state == 2){
					fputc('\n', fout);
					state = 0;
				}
			} else if('a' <= c && c <= 'z'){
				fputc(c + 'A' - 'a', fout);
				if(state == 1){
					state = 2;
				}
			} else if(c == ':'){
				fputc(c, fout);
				state = 1;
			} else {
				fputc(c, fout);
				if(state == 1){
					state = 2;
				}
			}
		}
		fclose(fin);
	}
	fclose(fout);
	return 0;
}