wordanalysis.txt

、该个词法分析器要求至少能够识别以下几类单词： a． 关键字：else if int return void while共6个

//#include "stdafx.h"
#include "stdio.h"
#include "ctype.h"
#include "string.h"

#define wordlen 40 /*单词最大长度*/
/*保留字数量*/
#define keywordSum 6 
char *keyword[keywordSum]={"else","if","int","return","void","while"};

/*纯单分界符*/
char singleword[11]="+-*(){};,:";

/*双分界符*/
char doubleword[5]="<>=!";


char ScanInFile[100];      /*待分析的源程序文件*/
char ScanOutFile[100];      /*词法分析后的输出文件*/

FILE *fin,*fout;         /*输入输出文件的指针*/

int LoadCodeFile()
{
    /* 打开待分析的 源代码文件*/
    
    printf("请输入源程序文件名：");
    scanf("%s",ScanInFile);
    if((fin=fopen(ScanInFile,"r"))==NULL)
    {
        printf("\n找不到文件：%s\n文件打开失败!\n");
        return 0;
    }
    else
    return 1;
}

int CreatWordFile()
{
    /*创建词法分析后结果的输出文件*/
    int len=0;
    int i=0;
	/*？？将原程序文件拷贝到输出文件(当前为空)？*/
    strcpy(ScanOutFile,ScanInFile);
    while(ScanOutFile[i++]!='.');
    ScanOutFile[i+1]='s';
    ScanOutFile[i+2]='c';
    ScanOutFile[i+3]='n';
    ScanOutFile[i+4]='\0';
    if((fout=fopen(ScanOutFile,"w"))==NULL)
    {
        /*文件创建失败*/
        return 0;
    }
    else
        return 1;

}

/*词法分析程序*/
int TScan()
{

    char ch,token[wordlen]; /*ch 为每次读入的字符，token 为识别出来的单词*/

    char ch1; /*处理注释时 用的临时变量*/

    int err=0;              /* 设置错误代码为 0, 表示没有错误 */
    int j,n;                /*临时变量，控制组合单词时的数组下标*/


    if(LoadCodeFile()==0)
        return 1;          /*源代码文件读取失败*/
    if(CreatWordFile()==0)
        return 2;          /*文件创建失败*/

    /*fin输入文件的指针,?getc()函数*/
	ch=getc(fin);
    while(ch!=EOF)
    {
        while(ch==' '||ch=='\n'||ch=='\t')
        {
            ch=getc(fin);
        }
        if(isalpha(ch))
        {
            /*输入的是字母，进行 标示符 处理*/
            token[0]=ch;
            j=0;
            while(isalnum(ch))
            {
                token[j++]=ch;
                ch=getc(fin);
            }/*如果是字母数字则组合，否则结束*/
            token[j]='\0';
            /*查找保留字*/
            n=0;
            while((n<keywordSum) && strcmp(token,keyword[n]))
                n++;
            if(n>=keywordSum)
            {
                /*输出标示符*/
                fprintf(fout,"%s\t%s\n","ID",token);
                printf("%s\t%s\n","ID",token);
            }
            else
            {
                /*输出保留字*/
                fprintf(fout,"%s\t%s\n","keyword",token);
                printf("%s\t%s\n","keyword",token);
            }
        }
        else if(isdigit(ch))
        {
            /*输入的是数字，进行 数字处理*/
            token[0]=ch;
            j=1;
            ch=getc(fin);/*读下一字符*/
            while(isdigit(ch))
            {/*如果是数字则整合数字*/
                token[j++]=ch;
                ch=getc(fin);
            }
            token[j]='\0';/*整数整合结束*/
            fprintf(fout,"%s\t%s\n","NUM",token);
            printf("%s\t%s\n","NUM",token);
        }
        else if(strchr(singleword,ch)>0)
        {
            /*输入的是单分界符*/
            token[0]=ch;
            token[1]='\0';
            ch=getc(fin);
            fprintf(fout,"%s\t%s\n","single",token);
            printf("%s\t%s\n","single",token);
        }
        else if(strchr(doubleword,ch)>0)
        {
            /*输入的是双分界符*/
            token[0]=ch;
            ch=getc(fin);
            if(ch=='=')  /*如果是 = 则组合双分界符*/
            {
                token[1]=ch;token[2]='\0';
                ch=getc(fin);
            }
            else
            {
                token[1]='\0';
            }
            fprintf(fout,"%s\t%s\n","double",token);
            printf("%s\t%s\n","double",token);
        }
        else if(ch=='/')
        {
            /*注释处理*/
            ch=getc(fin);
            if(ch=='*')
            {
                ch1=getc(fin);
                do
                {
                    ch=ch1;
                    ch1=getc(fin);
                }while((ch!='*'||ch1!='/')&&ch1!=EOF);
                ch=getc(fin);
            }
            else
            {
                token[0]='/';
                token[1]='\0';
                fprintf(fout,"%s\t%s\n",token,token);  /*输出单词分界符*/
                printf("%s\t%s\n",token,token);
            }
        }
        else
        {
            /*无法识别的字符 */
            token[0]=ch;
            token[1]='\0';
            ch=getc(fin);
            err=3;
            fprintf(fout,"%s\t%s\n","ERROR",token);  /*输出错误符号*/
            printf("%s\t%s\n","ERROR",token);
        }
    }
    return err;
}

void main()
{
    int e=0;
    e=TScan();
    if(e>0)printf("编译错误！");
    else
        printf("词法分析成功！");

}