语法分析程序

语法分析程序

#include<stdio.h>
#include <stdlib.h>
typedef struct link          //字符链表
{
    char data;
    struct link *next;
}Link;

char special[10];
void specialchar(Link *charhead);

main()
{
    char n;
    Link *charhead;                             //定义头结点
    Link *p,*q;
    charhead=q=(Link *)malloc(sizeof(Link));    //申请空间
    charhead->next=q;                           //初始化链表
    q->next=NULL;
    printf("请输入一个字符串：");
    do
    {
        scanf("%c",&n);
        if(n=='
')
            break;
        p=(Link *)malloc(sizeof(Link));
        p->data=n;                        //把输入的字符存入链表中
        p->next=NULL;
        q->next=p;
        q=p;
    }while(n!='
');
    q=charhead->next;
    /*while(q!=NULL)
    {
        printf("%c",q->data);
        q=q->next;
    }*/
     printf("语法分析：
");
    specialchar(charhead);
}

void specialchar(Link *charhead)
{
    Link *q,*p;
    int i;
    q=charhead->next;
    while(q!=NULL)
    {
    switch(q->data)
    {
    case 'b':              //判断是否是标识符begin
    special[0]=q->data;    //一步一步存入数组
     q=q->next;
     if(q->data=='e')
     {
        special[1]=q->data;
        q=q->next;
        if(q->data=='g')
        {
            special[2]=q->data;
            q=q->next;
            if(q->data=='i')
            {
                special[3]=q->data;
                q=q->next;
                if(q->data=='n')
                {
                special[4]=q->data;
                printf("<标识符> ");
                for(i=0;i<5;i++)
                    printf("%c",special[i]);
                printf("
");
                }
            }
        }
     }
     break;
    case 'i':               //判断是否是标识符if
        special[0]=q->data;
        q=q->next;
        if(q->data=='f')
        {
        special[1]=q->data;
        printf("<标识符> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        printf("
");
        }
        break;
    case 't':
        special[0]=q->data;
        q=q->next;
        if(q->data=='h')
        {
            special[1]=q->data;
            q=q->next;
            if(q->data=='e')
            {
            special[2]=q->data;
            q=q->next;
            if(q->data=='n')
            {
            special[3]=q->data;
            printf("<标识符> ");
            for(i=0;i<4;i++)
            printf("%c",special[i]);
            printf("
");
            }
            }
        }
        break;
    case 'w':
     special[0]=q->data;    //一步一步存入数组
     q=q->next;
     if(q->data=='h')
     {
        special[1]=q->data;
        q=q->next;
        if(q->data=='i')
        {
            special[2]=q->data;
            q=q->next;
            if(q->data=='l')
            {
                special[3]=q->data;
                q=q->next;
                if(q->data=='e')
                {
                special[4]=q->data;
                printf("<标识符> ");
                for(i=0;i<5;i++)
                    printf("%c",special[i]);
                printf("
");
                }
            }
        }
     }
     break;
    case 'd':
        special[0]=q->data;
        q=q->next;
        if(q->data=='o')
        {
        special[1]=q->data;
        printf("<标识符> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        printf("
");
        }
        if(q->data=='d')
        {
         special[1]=q->data;
         q=q->next;
         if(q->data=='*')
         {
         special[2]=q->data;
         printf("<标识符> ");
         for(i=0;i<3;i++)
            printf("%c",special[i]);
         printf("
");
         }
        }
        break;
    case 'e':
        special[0]=q->data;
        q=q->next;
        if(q->data=='f')
        {
         special[1]=q->data;
         q=q->next;
         if(q->data=='f')
         {
         special[2]=q->data;
         printf("<标识符> ");
         for(i=0;i<3;i++)
            printf("%c",special[i]);
         printf("
");
         }
        }
        break;
    case 'l':
     special[0]=q->data;    //一步一步存入数组
     q=q->next;
     if(q->data=='(')
     {
        special[1]=q->data;
        q=q->next;
        if(q->data=='l')
        {
            special[2]=q->data;
            q=q->next;
            if(q->data=='|')
            {
                special[3]=q->data;
                q=q->next;
                if(q->data=='d')
                {
                special[4]=q->data;
                q=q->next;
                if(q->data==')')
                {
                special[5]=q->data;
                q=q->next;
                if(q->data=='*')
                {
                special[6]=q->data;
                printf("<标识符> ");
                for(i=0;i<7;i++)
                    printf("%c",special[i]);
                printf("
");
                }
                }
                }
             }
        }
     }
       break;
    case '+':
        printf("<加号> %c",q->data);
        printf("
");
        break;
    case '-':
        printf("<减号> %c",q->data);
        printf("
");
        break;
    case '*':
        printf("<乘号> %c",q->data);
        printf("
");
        break;
    case '/':
        printf("<标识符> %c",q->data);
        printf("
");
        break;
    case ':':
        special[0]=q->data;
        q=q->next;
        if(q->data=='=')
        {
        special[1]=q->data;
        printf("<赋值号> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        }
        else
            printf("<赋值号> %c",special[0]);
        printf("
");
        break;
    case '<':
        special[0]=q->data;
        q=q->next;
        if(q->data=='=')
        {
        special[1]=q->data;
        printf("<标识符> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        printf("
");
        }
        else if(q->data=='>')
        {
        special[1]=q->data;
        printf("<标识符> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        printf("
");
        }
        else{
            printf("<小于号> ");
            printf("%c",special[0]);
            printf("
");
        }
        break;
    case '>':
        special[0]=q->data;
        q=q->next;
        if(q->data=='=')
        {
        special[1]=q->data;
        printf("<标识符> ");
        for(i=0;i<2;i++)
           printf("%c",special[i]);
        printf("
");
        }
        else{
            printf("<大于号> ");
            printf("%c",special[0]);
            printf("
");
        }
        break;
    case '=':
        printf("<赋值符> %c",q->data);
        printf("
");
        break;
    case ';':
        printf("<分号> %c",q->data);
        printf("
");
        break;
    case '(':
        printf("<左括号> %c",q->data);
        printf("
");
        break;
    case ')':
        printf("<右括号> %c",q->data);
        printf("
");
        break;
    case '#':
        printf("<井号> %c",q->data);
        printf("
");
        break;

 }
 q=q->next;

  }
}