codes/pass1.c at master · eck23/codes · 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
108
109
110
111
112
113
114
115
116
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

void main(){

	FILE *optab,*symtab,*symtabread,*interFile,*prgrmFile,*lenFile,*tempFile;
	remove("symtab.txt");
	//optab=fopen("optab.txt","r");
	symtab=fopen("symtab.txt","a");
	//symtabread=fopen("symtab.txt","r");
	interFile=fopen("interFile.txt","w");
	prgrmFile=fopen("prgrmFile.txt","r");
	lenFile=fopen("lenFile.txt","w");

	char label[10],opcode[10],operand[10],symbol[10],mnemonic[10],temp[10];
	int locctr,start,found_opcode,symflag;


	fscanf(prgrmFile,"%s\t%s\t%s",label,opcode,operand);

	if(strcmp(opcode,"START")==0){

		//locctr=atoi(operand);
		tempFile=fopen("tempFile.txt","w");
		fprintf(tempFile,"%s",operand);
		//printf("oprand :%s",operand);
		fclose(tempFile);
		tempFile=fopen("tempFile.txt","r");
		fscanf(tempFile,"%x",&locctr);
		fclose(tempFile);
		start=locctr;
        //printf("%x %x",locctr,start+(3*4));

		fprintf(interFile,"**\t%s\t%s\t%s\n",label,opcode,operand);
		fscanf(prgrmFile,"%s\t%s\t%s",label,opcode,operand);
	}else{
		locctr=0x0;
		start=0x0;
	}

	while(!feof(prgrmFile)){
		if(strcmp(opcode,"END")!=0)
			fprintf(interFile,"%x\t",locctr);
		else
			fprintf(interFile,"**\t**");
		symflag=0;
		if(strcmp(label,"**")!=0){
			symflag=1;
			//printf("hello world");
			fclose(symtab);
			symtabread=fopen("symtab.txt","r");
			while(!feof(symtabread)){

				fscanf(symtabread,"%s\t%s",symbol,temp);
				//printf("in symtab search : %s\n",symbol);
				if(strcmp(symbol,label)==0){
					printf("error :duplicate symnbol found ; %s",symbol);
					exit(1);
				}
			}
			symtab=fopen("symtab.txt","a");
		}
		if(symflag==1)
			fprintf(symtab,"%s\t%x\n",label,locctr);

		found_opcode=0;
        optab=fopen("optab.txt","r");
		while(!feof(optab)){

			fscanf(optab,"%s",mnemonic);
			//printf("optab search!! : %s\n",mnemonic);
			//printf("optab scan here !!");
			if(strcmp(mnemonic,opcode)==0){
				found_opcode=1;
				locctr+=0x3;
				break;
			}


		}
        fclose(optab);
		if(found_opcode==0 && strcmp(opcode,"END")!=0){

			if(strcmp(opcode,"BYTE")==0)
				locctr+=0x1;
			else if(strcmp(opcode,"RESB")==0)
				locctr+=atoi(operand);
			else if(strcmp(opcode,"WORD")==0)
				locctr+=0x3;
			else if(strcmp(opcode,"RESW")==0)
				locctr+=(atoi(operand)*3);
			else{
				printf("invalid opcode found : %s",opcode);
				exit(1);
			}

		}
		else if(strcmp(opcode,"END")==0){
			fprintf(interFile,"\t%s\t%s",opcode,operand);
			fprintf(lenFile,"%x",locctr-start);
			exit(0);

		}

		fprintf(interFile,"%s\t%s\t%s\n",label,opcode,operand);
		fscanf(prgrmFile,"%s\t%s\t%s",label,opcode,operand);


	}
	fclose(interFile);
	fclose(prgrmFile);
	fclose(symtab);
	fclose(symtabread);
	fclose(optab);
}