Сканер

@Vadja-Son · Регистрация: 17.01.2017

Author24 — интернет-сервис помощи студентам

Здравствуйте! Помогите довести до ума код.

Задание:
1. Произвести анализ заданного программного фрагмента на языке PASCAL и выделить все типы имеющихся в нём лексем.
2. Сформировать таблицу служебных и ключевых слов и разделителей, имеющихся в заданном фрагменте.
3. Для выделенных лексем построить регулярную грамматику.
4. Для полученной грамматики построить диаграмму состояний соответствующего конечного автомата.
5. На основе автомата составить и отладить программу лексического анализатора.

C++

#include <iostream>
#include <iomanip>
#include <stdio.h>
#include <conio.h>
#include <ctype.h>
 
#define NONE 0
#define EOS '\0'
#define BUFSIZE 255
#define IDENTCOUNT 25
#define STRCOUNT 20
 
using namespace std;
 
enum LexEnum {
      // Математические операции (добавить, если не хватает)
      PLUS,      // +
      MINUS,     // -
     // ASTERISK,  // *
    //  SLASH,     // /
 
      // Операции сравнения (добавить, если не хватает)
     // LT,        // <
     // LE,        // <=
     // EQ,        // =
    //  GE,        // >=
      GT,        // >
     // NE,        // <> 
 
      // Пунктуация (добавить, если не хватает)
      SEMICOL,   // ;
      COLON,     // :
      COMA,      // ,
      DOT,       // .
      //DOTDOT,    // ..
      ASSIGN,    // :=
      APOSTR,   // '
 
      // Скобки
      LPAR,   RPAR,     // ( )
      LBRACK, RBRACK,   // [ ]
     // LBRACE, RBRACE, // { }
 
      // Зарезервированные слова (добавить, если не хватает)
      PROGRAM, BEGIN, IF, THEN, PROCEDURE,
      //ELSE, WHILE,
      FOR, TO,
      //DOWNTO,
      DO, END,
      //REPEAT, UNTIL,
      VAR,
      //TYPE, CONST,
      SET, OF, IN,
 
      // Идентификатор
      ID,
 
      // Литералы
      INT, STR, DBL,
 
 
      //Служебные лексемы
      EoF, ILLEGAL
     } CurLex;
 
int LexVal=NONE;
 
char LexBuf[BUFSIZE];
 
char ch;
int lineno=1;
 
struct reservedStruct {
    char keyword[10];
    LexEnum Lex;
};
 
reservedStruct Keywords[] = {
    "program", PROGRAM,
    "begin", BEGIN,
    "if", IF,
    "then", THEN,
    "procedure", PROCEDURE,
    "for", FOR,
    "to", TO,
    "do", DO,
    "end", END,
    "var", VAR,
    "set", SET,
    "of", OF,
    "in", IN
};
 
struct identStruct {
    char ident[20];
    int idvalue;
};
 
identStruct identifiers[IDENTCOUNT];
 
struct dblStruct {
    double number;
    int dblvalue;
};
 
dblStruct doubles [10];
 
int strInd=1;
 
struct strStruct {
    char str[255];
    int strvalue;
};
 
strStruct strings[STRCOUNT];
 
    FILE *fp;
 
void scanner();
int ReturnIDorReserved(const char *str);
 
 
void main()
{
    //char LexBuf[BUFSIZE];
    //char ch;
    //int lineno=1;
    
//  FILE *fp;
    
 
    if((fp=fopen("proba.txt","r"))==0)
        printf("Error!\n");
    else
    {
        while(!feof(fp))
        {
            scanner();
            //ch=getc(fp);
            //if (!feof(fp))
            //printf("%c",c);
        }
        fclose(fp);
    };
    //таблицы
    cout.setf(ios::left, ios::adjustfield);
    cout << "---------------------------------------------" << endl;
    cout << "Tables of lexems:" << endl;
    // таблица идентификаторов
    cout << "---------------------------------------------" << endl;
    cout << "Table of identifiers:" << endl;
    for (int i=0; i<IDENTCOUNT; i++)
    {
        cout << setw(15) << identifiers[i].ident << setw(4) << identifiers[i].idvalue << endl;
    };
    cout << endl;
 
    // таблица ключевых слов
    cout << "---------------------------------------------" << endl;
    cout << "Table of keywords:" << endl;
    for (int i=0; i<sizeof(Keywords)/sizeof(reservedStruct); i++)
    {
        cout << setw(15) << Keywords[i].keyword << setw(4) << Keywords[i].Lex << endl;
    };
    cout << endl;
 
    // таблица сторроковых литералов
    cout << "---------------------------------------------" << endl;
    cout << "Table of string literals:" << endl;
    for (int i=0; i<STRCOUNT; i++)
    {
        cout << setw(15) << strings[i].str << setw(4) << strings[i].strvalue << endl;
    };
    cout << endl;
    
    cout << "Press any key to Exit..." << endl;
    getch();
}
 
void scanner()
{
    while (1)
    {
        ch=getc(fp);
        if (ch==' ' || ch=='\t');   //отбрасываем разделители и пробелы
        else if (ch=='\n') lineno++;
        else if (isdigit(ch))       //цифра
        {
            int b=0;
            while (isdigit(ch))
            {
                LexBuf[b++]=ch;
                ch=getc(fp);
                if (b>=BUFSIZE) cout << "compiler error" << endl;
            }
            if (ch==' '||ch==']'||ch==')'||ch==';'||ch=='+'||ch=='-'||ch=='>') 
                {   LexBuf[b]=EOS;
                    LexVal=atoi(LexBuf);
                    CurLex=INT;
                    cout << "INT = " << LexVal << " - Lex - " << CurLex << endl;;
                }
            else cout << "compiler error (not a number) in line " << lineno << endl;
            ungetc(ch, fp);
            //fseek(fp,-1,SEEK_CUR);
            return;
        }
        else if (isalpha(ch))       //буква
        {
            int p,b=0;
            while (isalnum(ch))
            {
                LexBuf[b++]=ch;
                ch=getc(fp);
                if (b>=BUFSIZE)
                    {
                        cout << "compiler error" << endl;
                        return;
                    }
            }
                LexBuf[b]=EOS;
                p=ReturnIDorReserved(LexBuf);
            if (p==-1)
                {
                    LexVal=p;
                    cout << "ID = " << LexVal << "  " << "Keyword - " << LexBuf << " - Lex - " << CurLex << endl;
                }
                else if (p>=0)
                {
                    LexVal=p;
                    CurLex=ID;
                    cout << "ID = " << p << "  " << "Ident - " << identifiers[p].ident << " - " << identifiers[p].idvalue << endl;
                }
                else cout << "Compilation Error! Table of Identifiers is Full!" << endl;
                ungetc(ch, fp);
            return;             
        }
        else if (ch=='.') 
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=DOT;
            cout << "DOT - " << LexBuf << "  LexVal = " << LexVal << " - Lex - " << CurLex << endl;
            return;
        }
        else if (ch==',') 
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=COMA;
            cout << "COMA - " << LexBuf << "  LexVal = " << LexVal << " - Lex - " << CurLex << endl;
            return;
        }
        else if (ch==';') 
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=SEMICOL;
            cout << "SEMICOL - " << LexBuf << "  LexVal = " << LexVal << " - Lex - " << CurLex << endl;
            return;
        }
        else if (ch=='\'') 
        {
            int b=0;
            ch=getc(fp);
            while (ch!='\'')
            {
                LexBuf[b++]=ch;
                ch=getc(fp);
                if (b>=BUFSIZE) { cout << "compiler error" << endl;
                return;}
            }
                    LexBuf[b]=EOS;
                    // добавить в таблицу строковых литералов
                    strcpy(strings[strInd].str,LexBuf);
                    strings[strInd].strvalue=strInd;
                    strInd++;
                    CurLex=STR;
                    cout << "STR - " << LexBuf << "  LexVal = " << LexVal << " - Lex - " << CurLex << endl;
            //LexVal=-1;
            //CurLex=APOSTR;
            //cout << "APOSTR = " << "LexVal = " << LexVal << endl;
            ungetc(ch, fp);
            return;
        }
        else if (ch==':') 
        {
            int b=0;
                LexBuf[b++]=ch;
                ch=getc(fp);
            if (ch=='=')
            {
                LexBuf[b++]=ch;
                LexBuf[b]=EOS;
                LexVal = -1;
                CurLex = ASSIGN;
                cout << "ASSIGN - " << LexBuf << "   " << "LexVal = " << LexVal << " - Lex - " << CurLex << endl;
                return;
            }
            else 
                {   LexBuf[b]=EOS;
                    LexVal = -1;
                    CurLex = COLON;
                cout << "COLON - " << LexBuf << "   " << "LexVal = " << LexVal << " - Lex - " << CurLex << endl;
                //ungetc(ch, fp);
                //fseek(fp,-1, SEEK_CUR);
                return;
                };
        }
        else if (ch=='[')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=LBRACK;
            cout << "LBRACK - " << LexBuf << "   " << "LexVal = " << LexVal << "CurLex - " << CurLex << endl;
            return;
        }
        else if (ch==']')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=RBRACK;
            cout << "RBRACK - " << LexBuf << "   " << "LexVal = " << LexVal << "CurLex - " << CurLex << endl;
            return;
        }
        else if (ch=='(')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=LPAR;
            cout << "LPAR - " << LexBuf << "   " << "LexVal = " << LexVal << "CurLex - " << CurLex << endl;
            return;
        }
        else if (ch==')')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=RPAR;
            cout << "RPAR - " << LexBuf << "   " << "LexVal = " << LexVal << "CurLex - " << CurLex << endl;
            return;
        }
        else if (ch=='+')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=PLUS;
            cout << "PLUS - " << LexBuf << "   " << " LexVal =  " << LexVal << "  CurLex - " << CurLex << endl;
            return;
        }
        else if (ch=='-')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=MINUS;
            cout << "MINUS - " << LexBuf << "   " << " LexVal =  " << LexVal << "  CurLex - " << CurLex << endl;
            return;
        }
        else if (ch=='>')
        {
            LexVal=-1;
            int b=0;
            LexBuf[b++]=ch;
            LexBuf[b]=EOS;
            CurLex=GT;
            cout << "GT - " << LexBuf << "   " << "LexVal = " << LexVal << "CurLex - " << CurLex << endl;
            return;
        }
 
        else
        {
            LexVal = NONE;
            cout << "Error. Bad symbol : " << ch << " inLine No. " << lineno << endl;
            return;
        }
    }
}
 
int ReturnIDorReserved(const char *str)
{   
    //  KeyWords?
    for (int i=0; i<sizeof(Keywords)/sizeof(reservedStruct); i++)
    {
        if (strcmp(Keywords[i].keyword, str)==0)
        {
            CurLex = Keywords[i].Lex;
            return -1;
        }
    }   
    // Identifiers ?
    int j=1;
    while(j < IDENTCOUNT && identifiers[j].idvalue != 0)
            {
                if (strcmp(identifiers[j].ident,str)==0) return j;
                j++;
            }
    if (j < IDENTCOUNT)
        {
            strcpy(identifiers[j].ident,str);
            identifiers[j].idvalue=j;
            return j;
        }
    else 
            return 0;
}

	15.01.2019, 14:27