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
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
|
/*
* Nome: Leonardo Koosuke Azuma
* SO: Arch Linux x86_64
* Compilador: gcc (GCC) 13.2.1 20230801
*/
#include <stdio.h>
#include <stdlib.h>
#include "include/map.h"
#include "include/lexical.h"
#define EXT_ERR_PARAMS 1
extern string_map special_char;
extern string_map simbolos_especiais;
extern string_map simbolos_especiais_composto;
extern string_map simbolos_especiais_composto_negrito;
extern int is_EOF;
extern FILE *fout;
int main(int argc, char *argv[]){
if(argc != 2){
fprintf(stderr, "passe o nome do arquivo\n");
exit(EXT_ERR_PARAMS);
}
init_all_map();
char *file_path = argv[1];
//char *file_path = "asd.asd";
FILE *fp = fopen(file_path, "r");
if(fp == NULL){
fprintf(stderr, "Nao foi possivel abrir o arquivo\n");
exit(2);
}
fout = fopen("out.txt", "w");
if(fout == NULL){
fprintf(stderr, "Nao foi possivel abrir o arquivo de saida\n");
exit(3);
}
extern char proximo;
char *simbolo;
char atomo[4096];
PROXIMO(fp);
while(is_EOF == 0){
/*while(proximo == ' ' || proximo == 9 || proximo == '\r'){
PROXIMO(fp);
}*/
while((proximo == ' ' || proximo == 9 || proximo == '\r' || proximo == '\n') && is_EOF == 0){
//printf("\n");
//fprintf(fout, "\n");
PROXIMO(fp);
}
if(is_EOF) break;
char tmp[2] = "\0";/* "\0\0" */ tmp[0] = proximo;
if(get_value(tmp, simbolos_especiais) != NULL){
char s[3] = "\0"; s[0] = proximo;
PROXIMO(fp);
if(s[0] == ':' && proximo == '='){
s[1] = '=';
PROXIMO(fp);
}
simbolo = CODIGO(s);
}else if(is_caracter(proximo)){
int indice = 0;
while(is_caracter(proximo) || is_numero(proximo)){
atomo[indice++] = proximo;
PROXIMO(fp);
}
atomo[indice] = '\0';
// printf("atomo: %s\n", atomo);
//se atomo pertence a palavra reservada
if(get_value(atomo, simbolos_especiais_composto_negrito) != NULL ||
get_value(atomo, simbolos_identificadores) != NULL){
simbolo = CODIGO(atomo);
}else{
/* criar codigo identificador */
char *ci = malloc(sizeof(char) * 256);
ci[0] = 'i'; ci[1] = 'd';
int _i = 2;
extern int identificador_num;
int aux = identificador_num++;
while(aux > 0){
int n = aux%10;
aux /= 10;
ci[_i++] = '0' + n;
}
ci[_i] = '\0';
simbolo = ci;
// printf("atomo: %s\t ci: %s\n", atomo, ci);
insert_map(atomo, ci, simbolos_identificadores);
}
}else if(is_numero(proximo)){
int indice = 0;
while(is_numero(proximo)){
atomo[indice++] = proximo;
PROXIMO(fp);
}
atomo[indice] = '\0';
if(is_caracter(proximo)){
ERRO(IDENTIFICAR_NUMERO_MAL_FORMADO);
}
char *tmpp;
if((tmpp = get_value(atomo, simbolos_numeros)) != NULL){
simbolo = tmpp;
}else{
char *ni = malloc(sizeof(char) * 128);
ni[0] = 'n'; ni[1] = 'u'; ni[2] = 'm';
for(int i=0; i<=strlen(atomo); ++i){
ni[i+3] = atomo[i];
}
simbolo = ni;
insert_map(atomo, ni, simbolos_numeros);
// printf("ni: %s\n", ni);
}
}else{
ERRO(SIMBOLO_ESPECIAL_DESCONHECIDO);
}
printf("%s ", simbolo);
fprintf(fout, "%s ", simbolo);
}
// printf("nu: %s\n", get_value("123123", simbolos_numeros));
// printf("linha: %d\n", linha);
fclose(fp);
fclose(fout);
return 0;
}
|
