Compare commits

..

No commits in common. "master" and "Compilateur_non_securise" have entirely different histories.

6 changed files with 16 additions and 105 deletions

View file

@ -41,7 +41,7 @@ yyerror (char const *s)
"]" { return tCCROCH; } // Token crochet ouvrante
"get" { return tGET; } // Token fonction get
"print" { return tPRINT; } // Token fonction print
"printf" { return tPRINTF; } // Token fonction print
"stop" { return tSTOP; } // Token fonction stop
"+" { return tADD; } // Token addition
@ -57,8 +57,6 @@ yyerror (char const *s)
[0-9]+ { yylval.nombre = atoi(yytext); return tNB; } // Token nombre au format classique
[0-9]+e[0-9]+ { yylval.nombre = -1; return tNB; } // Token nombre au format exponentiel
["][^"]*["] { strcpy(yylval.str, yytext); return tSTR; }
[a-zA-Z][a-zA-Z0-9_]* { strcpy(yylval.id, yytext); return tID; } // Chaine de caractère (identifiant variable, fonction..)

View file

@ -10,8 +10,7 @@
%union {
int nombre;
struct symbole_t symbole;
char id[30];
char str[300];
char id[30];
struct while_t my_while;
}
%{
@ -21,7 +20,6 @@
#include <stdlib.h>
#include "../Tables/Instructions/tab_instruc.h"
#define TAILLE 1024
#define SECURED (1)
struct type_t type_courant;
struct type_t return_type_fonc;
@ -46,8 +44,7 @@ int first_etoile = 1;
%token tMUL tDIV tADD tSUB tEQ
%token<nombre> tNB tNBEXP
%token<id> tID
%token<str> tSTR
%token tPRINT tGET tSTOP
%token tPRINTF tGET tSTOP
%token<nombre> tIF tELSE
%token<my_while> tWHILE
%token tRETURN
@ -118,88 +115,10 @@ Get : tGET tOBRACE tCBRACE {int addr = push("0_TEMPORARY", 0, integer);
};
// Print, une fonction particulière
Print : tPRINT tOBRACE E tCBRACE {add_operation(PRI,$3,0,0); // On ajoute l'instruction PRI
pop(); // On supprime la variable temporaire
Print : tPRINTF tOBRACE E tCBRACE {add_operation(PRI,$3,0,0); // On ajoute l'instruction PRI
pop(); // On supprime la variable temporaire
};
// Print, une fonction particulière
Print : tPRINT tOBRACE tSTR tCBRACE {int i = 0;
int decalage = 0;
char previous = 'a';
while ($3[i] != '\0') {
if (previous == '\\' && $3[i] == 'n') {
$3[i - decalage - 1] = '\n';
previous = 'a';
decalage++;
} else if (previous == '\\' && $3[i] == '0') {
$3[i - decalage - 1] = '\0';
previous = 'a';
decalage++;
} else {
$3[i-decalage] = $3[i];
previous = $3[i];
}
i++;
}
$3[i-decalage] = $3[i];
i=0;
int termine = $3[i+1] == '"';
int addr = push("0_TEMPORARY", 0, integer);
while (!termine) {
if ($3[i+1] != '"') {
add_operation(AFC, addr + i, $3[i+1], 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(AFC, addr + i, $3[i+1], 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(AFC, addr + i, $3[i+1], 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(AFC, addr + i, $3[i+1], 0);
} else {
termine = 1;
}
i = i - 3;
termine = 0;
if ($3[i+1] != '"') {
add_operation(PRIC, addr + i, 0, 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(PRIC, addr + i, 0, 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(PRIC, addr + i, 0, 0);
} else {
termine = 1;
}
i++;
if (!termine && $3[i+1] != '"') {
add_operation(PRIC, addr + i, 0, 0);
} else {
termine = 1;
}
i++;
}
pop(); // On supprime la variable temporaire
};
// Stop, une fonction particulière
Stop : tSTOP tOBRACE tNB tCBRACE {add_operation(STOP,$3,0,0); // On ajoute juste l'instruction stop
};
@ -298,17 +217,11 @@ Instruction : Print tPV;
/*************************************/
/*************************************/
Invocation : tID tOBRACE {if (!SECURED) {
push("0_TEMPORARY_CTX", 0, integer); // On reserve la place du contexte
push("0_TEMPORARY_ADDR_RT", 0, pointer); // On reserve la place de l'adresse de retour
}
Invocation : tID tOBRACE {push("0_TEMPORARY_CTX", 0, integer); // On reserve la place du contexte
push("0_TEMPORARY_ADDR_RT", 0, pointer); // On reserve la place de l'adresse de retour
}
Params tCBRACE {struct fonction_t fonc = get_fonction($1); // On récupère la fonction
if (!SECURED) {
multiple_pop($4 + 2); // On pop les paramètres de la table des symboles
} else {
multiple_pop($4); // On pop les paramètres de la table des symboles
}
multiple_pop($4 + 2); // On pop les paramètres de la table des symboles
add_operation(CALL,fonc.first_instruction_line, get_last_addr(),0); // On écrit le CALL
// On renvoi l'adresse de la valeur retour de la fonction
if (fonc.return_type.pointeur_level > 0 || fonc.return_type.isTab) {
@ -775,6 +688,6 @@ SuiteInitTab : {$$ = 0;
%%
void main(void) {
init();
init();
yyparse();
}

View file

@ -7,7 +7,7 @@ default :
### NETTOYAGE ###
###########################
clean : clean_Symboles clean_Instructions clean_Lex_Yacc clean_Fonctions
@rm -f compiler
@rm -f rondoudou_gcc
@rm -f output.txt
clean_Symboles:
@ -31,7 +31,7 @@ clean_Lex_Yacc:
### COMPILATION ###
###########################
build : clean build_Symboles build_Instructions build_Lex_Yacc build_Fonctions
gcc Lex_Yacc/as.tab.o Lex_Yacc/lex.yy.o Tables/Instructions/tab_instruc.o Tables/Symboles/table_symboles.o Tables/Fonctions/tab_fonctions.o -o compiler
gcc Lex_Yacc/as.tab.o Lex_Yacc/lex.yy.o Tables/Instructions/tab_instruc.o Tables/Symboles/table_symboles.o Tables/Fonctions/tab_fonctions.o -ll -o rondoudou_gcc
build_Symboles: clean_Symboles
gcc -c Tables/Symboles/table_symboles.c -o Tables/Symboles/table_symboles.o
@ -69,7 +69,7 @@ test_Fonctions: build_Fonctions
Tables/Fonctions/test
test: build
cat Fichiers_Tests/progC | ./compiler
cat Fichiers_Tests/progC | ./rondoudou_gcc

3
README.md Normal file
View file

@ -0,0 +1,3 @@
# Projet Système Informatique - Elies TALI et Paul FAURE
Plop

View file

@ -75,9 +75,6 @@ char * get_asm_line_from_op(struct operation_t op){
case (PRI):
sprintf(buffer,"PRI %d\n",op.arg1);
break;
case (PRIC):
sprintf(buffer,"PRIC %d\n",op.arg1);
break;
case (READ):
sprintf(buffer,"READ %d %d\n",op.arg1, op.arg2);
break;

View file

@ -8,7 +8,7 @@
// Liste de codes des instruction
enum opcode_t {ADD,MUL,SOU,DIV,COP,AFC,AFCA,JMP,JMF,INF,SUP,EQU,PRI,PRIC,READ,WR,CALL,RET,GET,STOP};
enum opcode_t {ADD,MUL,SOU,DIV,COP,AFC,AFCA,JMP,JMF,INF,SUP,EQU,PRI,READ,WR,CALL,RET,GET,STOP};
//Ajoute une opération dans la table (à la fin)
void add_operation(enum opcode_t opcode, int arg1, int arg2, int arg3);