Jonny007-MKD/NB6_Hazards
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Clean up

Browse source
This commit is contained in:
Jonny007-MKD 2013-12-02 01:39:45 +01:00
parent ad2c8050a9
commit f509a9b95f
9 changed files with 23 additions and 541 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

77
GDE_3_2008/Cparser.cpp
View file

@ -1,77 +0,0 @@
#include <string>
#include <vector>
#include<map>
#include "stdafx.h"
#include "Cparser.h"
using namespace std;
#define Getc(s) getc(s)
#define Ungetc(c) ungetc(c,IP_Input)
/* Lexical analyser states. */
enum lexstate{L_START,L_INT,L_IDENT};
int Cparser::yylex(){
int c;
lexstate s;
for(s=L_START, yytext="";1;){
c= Getc(IP_Input);
yytext=yytext+(char)c;
switch (s){
case L_START:
if(isdigit(c)){
if((char)c!='x'){
s=L_INT;
}else{
Ungetc(c);
yytext=yytext.substr(0,yytext.size()-1);
yytext1+='1';
yytext+='0';// ab hier gut überlegen falls x auftritte
break;
}
}else if (isspace(c)||isalpha(c)){
s=L_IDENT;
}else if(c==EOF){
return 0;
}else if (c=='\n'){ LineNumber+=1;
}else { return 0;
}
break;
case L_INT:
if(isdigit(c)){ break;
}else {
Ungetc(c);
yylval.s=yytext.substr(0,yytext.size()-1);
}
break;
case L_IDENT:
if(isalpha(c)){
yylval.s=yytext.substr(0,yytext.size()-1);
yylval.i=atoi(yylval.s.c_str());
yytext="";
}
break;
default:
printf("*** Fatal Error!!!!!*** Wrong case label in yylex\n");
}
}
}

49
GDE_3_2008/Cparser.h
View file

@ -1,49 +0,0 @@
#ifndef CPARSER
#define CPARSER
#include <string>
#include "PrimImplikanten.h"
using namespace std;
class Cparser{
private:
PrimImplikant implikant;
public:
string yytext;
string yytext1;
int LineNumber;
struct tyylval{
string s;
int i;
}yylval;
FILE* IP_Input;
void pr_tokentable();
void load_tokenentry(string s ,int x);
int yylex();
};
#endif

24
GDE_3_2008/PrimImplikantCollection.h
View file

@ -1,24 +0,0 @@
#ifndef PRIMIMPLIKANTCOLLEC
#define PRIMIMPLIKANTCOLLEC
#include <string>
#include <vector>
#include "PrimImplikanten.h"
using namespace std;
class PrimImplikantCollection{
public:
void Add(PrimImplikant &pi);
//void Add(string input);
void Add(int input);
bool ValueAt(int position);
PrimImplikant SolveNextHazard();
private:
vector<PrimImplikant> PIVector;
}
#endif

25
GDE_3_2008/PrimImplikanten.h
View file

@ -1,25 +0,0 @@
#ifndef PRIMIMPLIKANTEN
#define PRIMIMPLIKANTEN
#include <string>
#include <vector>
#include <map>
using namespace std;
class PrimImplikant
{
public:
PrimImplikant(string input);
//PrimImplikant(int input);
bool valueAt(int position);
private:
map<string,int> implikant;
}
#endif

344
GDE_3_2008/k7scan1.cpp
View file

@ -1,344 +0,0 @@
// k7scan1.cpp : Definiert den Einsprungpunkt für die Konsolenanwendung.
//
#include "stdafx.h"
#pragma warning(disable:4786)
#include <string>
#include <map>
using namespace std;
#define Getc(s) getc(s)
#define Ungetc(c) {ungetc(c,IP_Input); ugetflag=1;}
/*
* Lexical analyzer states.
*/
enum lexstate{L_START,L_INT,L_IDENT,L_STRING,L_STRING2,
L_COMMENT,L_TEXT_COMMENT,L_LINE_COMMENT,L_END_TEXT_COMMENT};
const int STRING1=3;
const int IDENTIFIER=4;
const int INTEGER1=5;
const int TOKENSTART=300;
class CParser
{
public:
string yytext; //input buffer
struct tyylval{ //value return
string s; //structure
int i;
}yylval;
FILE *IP_Input; //Input File
FILE *IP_Error; //Error Output
FILE *IP_List; //List Output
int IP_LineNumber; //Line counter
int ugetflag; //checks ungets
int prflag; //controls printing
map<string,int> IP_Token_table; //Tokendefinitions
map<int,string> IP_revToken_table; //reverse Tokendefinitions
int CParser::yylex(); //lexial analyser
void CParser::yyerror(char *ers); //error reporter
int CParser::IP_MatchToken(string &tok); //checks the token
void CParser::InitParse(FILE *inp,FILE *err,FILE *lst);
int CParser::yyparse(); //parser
void CParser::pr_tokentable(); //test output for tokens
void CParser::IP_init_token_table(); //loads the tokens
void CParser::Load_tokenentry(string str,int index);//load one token
void CParser::PushString(char c); //Used for dtring assembly
CParser(){IP_LineNumber = 1;ugetflag=0;prflag=0;}; //Constructor
};
//------------------------------------------------------------------------
// Adds a character to the string value
void CParser::PushString(char c)
{
yylval.s += c;
}
//------------------------------------------------------------------------
void CParser::Load_tokenentry(string str,int index)
{
IP_Token_table[str]=index;
IP_revToken_table[index]=str;
}
void CParser::IP_init_token_table()
{
Load_tokenentry("STRING1",3);
Load_tokenentry("IDENTIFIER",4);
Load_tokenentry("INTEGER1",5);
int ii=TOKENSTART;
Load_tokenentry("AND",ii++);
Load_tokenentry("OR",ii++);
Load_tokenentry("Begin",ii++);
Load_tokenentry("End",ii++);
}
//------------------------------------------------------------------------
void CParser::pr_tokentable()
{
typedef map<string,int>::const_iterator CI;
const char* buf;
printf( "Symbol Table ---------------------------------------------\n");
for(CI p=IP_Token_table.begin(); p!=IP_Token_table.end(); ++p){
buf = p->first.c_str();
printf(" key:%s", buf);
printf(" val:%d\n", p->second);;
}
}
//------------------------------------------------------------------------
int CParser::yyparse()
{
int tok;
if(prflag)fprintf(IP_List,"%5d ",(int)IP_LineNumber);
/*
* Go parse things!
*/
while ((tok=yylex())!=0){
printf("%d ",tok);
if(tok==STRING1)
printf("%s %s ",IP_revToken_table[tok].c_str(),yylval.s.c_str());
else
if(tok==INTEGER1)
printf("%s %d ",IP_revToken_table[tok].c_str(),yylval.i);
else
if(tok==IDENTIFIER)
printf("%s %s ",IP_revToken_table[tok].c_str(),yylval.s.c_str());
else
if(tok>=TOKENSTART)
printf("%s ",IP_revToken_table[tok].c_str());
else
printf("%c ",tok);
if(!prflag)printf("\n");
}
return 0;
}
//------------------------------------------------------------------------
/*
* Parse Initfile:
*
* This builds the context tree and then calls the real parser.
* It is passed two file streams, the first is where the input comes
* from; the second is where error messages get printed.
*/
void CParser::InitParse(FILE *inp,FILE *err,FILE *lst)
{
/*
* Set up the file state to something useful.
*/
IP_Input = inp;
IP_Error = err;
IP_List = lst;
IP_LineNumber = 1;
ugetflag=0;
/*
* Define both the enabled token and keyword strings.
*/
IP_init_token_table();
}
//------------------------------------------------------------------------
/*
* yyerror:
*
* Standard error reporter, it prints out the passed string
* preceeded by the current filename and line number.
*/
void CParser::yyerror(char *ers)
{
fprintf(IP_Error,"line %d: %s\n",IP_LineNumber,ers);
}
//------------------------------------------------------------------------
int CParser::IP_MatchToken(string &tok)
{
int retval;
if( IP_Token_table.find(tok) != IP_Token_table.end()){
retval = (IP_Token_table[tok]);
}else{
retval = (0);
}
return retval;
}
//------------------------------------------------------------------------
/*
* yylex:
*
*/
int CParser::yylex()
{
//Locals
int c;
lexstate s;
/*
* Keep on sucking up characters until we find something which
* explicitly forces us out of this function.
*/
for (s = L_START; 1;){
c = Getc(IP_Input);
yytext = yytext + (char)c;
if(!ugetflag) {
if(c != EOF)if(prflag)fprintf(IP_List,"%c",c);
}else ugetflag = 0;
switch (s){
//Starting state, look for something resembling a token.
case L_START:
if (isdigit(c)){
s = L_INT;
}else if (isalpha(c) || c == '\\' ){
s = L_IDENT;
}else if (isspace(c)){
if (c == '\n'){
IP_LineNumber += 1;
if(prflag)
fprintf(IP_List,"%5d ",(int)IP_LineNumber);
}
yytext = "";
}else if (c == '/'){
yytext = "";
s = L_COMMENT;
}else if (c == '"'){
s = L_STRING;
}else if (c == EOF){
return ('\0');
}else{
return (c);
}
break;
case L_COMMENT:
if (c == '/')
s = L_LINE_COMMENT;
else if(c == '*')
s = L_TEXT_COMMENT;
else{
Ungetc(c);
return('/'); /* its the division operator not a comment */
}
break;
case L_LINE_COMMENT:
if ( c == '\n'){
s = L_START;
Ungetc(c);
}
yytext = "";
break;
case L_TEXT_COMMENT:
if ( c == '\n'){
IP_LineNumber += 1;
}else if (c == '*')
s = L_END_TEXT_COMMENT;
yytext = "";
break;
case L_END_TEXT_COMMENT:
if (c == '/'){
s = L_START;
}else{
s = L_TEXT_COMMENT;
}
yytext = "";
break;
/*
* Suck up the integer digits.
*/
case L_INT:
if (isdigit(c)){
break;
}else {
Ungetc(c);
yylval.s = yytext.substr(0,yytext.size()-1);
yylval.i = atoi(yylval.s.c_str());
return (INTEGER1);
}
break;
/*
* Grab an identifier, see if the current context enables
* it with a specific token value.
*/
case L_IDENT:
if (isalpha(c) || isdigit(c) || c == '_')
break;
Ungetc(c);
yytext = yytext.substr(0,yytext.size()-1);
yylval.s = yytext;
if (c = IP_MatchToken(yytext)){
return (c);
}else{
return (IDENTIFIER);
}
/*
* Suck up string characters but once resolved they should
* be deposited in the string bucket because they can be
* arbitrarily long.
*/
case L_STRING2:
s = L_STRING;
if(c == '"'){
PushString((char)c);
}else{
if(c == '\\'){
PushString((char)c);
}else{
PushString((char)'\\');
PushString((char)c);
}
}
break;
case L_STRING:
if (c == '\n')
IP_LineNumber += 1;
else if (c == '\r')
;
else if (c == '"' || c == EOF){
return (STRING1);
} else if(c=='\\'){
s = L_STRING2;
//PushString((char)c);
}else
PushString((char)c);
break;
default: printf("***Fatal Error*** Wrong case label in yylex\n");
}
}
}
//------------------------------------------------------------------------
int main(int argc, char* argv[])
{
FILE *inf;
char fistr[100];
printf("Enter filename:\n");
gets(fistr);
inf = fopen(fistr,"r");
if(inf==NULL){
printf("Cannot open input file %s\n",fistr);
return 0;
}
CParser obj;
obj.InitParse(inf,stderr,stdout);
// obj.pr_tokentable();
obj.yyparse();
return 0;
}

12
GDE_3_2008/res/errorParser.txt
View file

@ -1,12 +0,0 @@
*** FATAL ERROR *** You can only define either KNF or DNF!
In line 8211212: (null)>-1105314512
In line 4: Defined was: DNF, but now shall be changed to KNF
*** FATAL ERROR *** You can only define either KNF or DNF!
In line 4: 7>0
In line 4: Defined was: DNF, but now shall be changed to KNF
*** FATAL ERROR *** You can only define either KNF or DNF!
In line 4: 7>1
In line 4: Defined was: KNF, but now shall be changed to DNF

24
GDE_3_2008/res/listParser.txt
View file

@ -1,20 +1,26 @@
Variable a
Variable bar
Variable char
1 Variables: a,Variable a
bar,Variable bar
char,Variable char
d
Variable d
2 Terms:
Term Key 0010
3 "0010"Term Key 0010
>1
Term Value 1
Term Key 7
4 7>Term Key 7
1
Term Value 1
Term Key 14
5 14>Term Key 14
1
Term Value 1
Term Key 01xx
6 "01xx"Term Key 01xx
>1
Term Value 1
Term Key x000
Term Value 1
7 "x000"Term Key x000
>1Term Value 1

7
GDE_3_2008/stdafx.cpp Normal file
View file

@ -0,0 +1,7 @@
// stdafx.cpp : Quelltextdatei, die nur die Standard-Includes einbindet
// GDE_3.pch ist der vorcompilierte Header
// stdafx.obj enthält die vorcompilierte Typinformation
#include "stdafx.h"

2
Hazard/Hazard/Cparser.h
View file

@ -57,7 +57,7 @@ public:
CParser(){IP_LineNumber = 1;ugetflag=0;prflag=0;}; //Constructor
CParser(FILE * input, FILE * error, FILE * list)
{
parser->IP_init_token_table();
this->IP_init_token_table();
this->InitParse(input, error, list);
}
};