编程实验一 词法分析程序

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

typedef struct node{
    char zifuji[20];
    struct node *next;
}NODE;

typedef struct stack{
    char num[20];
    int size;
}STACK;

void cmp(char *ch);
int shizi(char ch[]);
//字转词
void zizhuanci(NODE *node){
    
    NODE *p;
    p=node->next;

    while(p!=NULL){
        
        cmp(p->zifuji);        

        p=p->next;
    }

}
//判断词义
void cmp(char *ch){
    int key;
    
    if(strcmp(ch,"begin")==0){
        printf("<%s 	 1 >
",ch);
    }

    else if(strcmp(ch,"if")==0){
        printf("<%s 	 2 >
",ch);
    }
    else if(strcmp(ch,"then")==0){
        printf("<%s 	 3 >
",ch);
    }
    else if(strcmp(ch,"while")==0){
        printf("<%s 	 4 >
",ch);
    }
    else if(strcmp(ch,"do")==0){
        printf("<%s 	 5 >
",ch);
    }
    else if(strcmp(ch,"end")==0){
        printf("<%s 	 6 >
",ch);
    }
    else if(strcmp(ch,"+")==0){
        printf("<%s 	 13>
",ch);
    }
    else if(strcmp(ch,"-")==0){
        printf("<%s 	 14>
",ch);
    }
    else if(strcmp(ch,"*")==0){
        printf("<%s 	 15>
",ch);
    }
    else if(strcmp(ch,"/")==0){
        printf("<%s 	 16>
",ch);
    }
    else if(strcmp(ch,":")==0){
        printf("<%s 	 17>
",ch);
    }
    else if(strcmp(ch,":=")==0){
        printf("<%s 	 18>
",ch);
    }
    else if(strcmp(ch,"<")==0){
        printf("<%s 	 20>
",ch);
    }
    else if(strcmp(ch,"<=")==0){
        printf("<%s 	 21>
",ch);
    }
    else if(strcmp(ch,"<>")==0){
        printf("<%s 	 22>
",ch);
    }
    else if(strcmp(ch,">")==0){
        printf("<%s 	 23>
",ch);
    }
    else if(strcmp(ch,">=")==0){
        printf("<%s 	 24>
",ch);
    }
    else if(strcmp(ch,"=")==0){
        printf("<%s 	 25>
",ch);
    }
    else if(strcmp(ch,";")==0){
        printf("<%s 	 26>
",ch);
    }
    else if(strcmp(ch,"(")==0){
        printf("<%s 	 27>
",ch);
    }
    else if(strcmp(ch,")")==0){
        printf("<%s 	 28>
",ch);
    }
    else if(strcmp(ch,"#")==0){
        printf("<%s 	 0>
",ch);
    }
    else{
        
        key=shizi(ch);

        if(key==1)
            printf("<%s 	 12>
",ch,key);
        else if(key==2)
            printf("<%s 	 11>
",ch,key);
        else
            printf("<%s 	 错误>
",ch,key);
    }
}
//判断数字词义
int shizi(char ch[]){
    int i;
    int key=0;
    for(i=0;i<=sizeof(ch);i++)
        if((ch[i]>='0'&&ch[i]<='9')||(ch[i]>='a'&&ch[i]<='z'))
            key=1;            
        else if(ch[i]>='0'&&ch[i]<='9')
            key=2;
    return key;
}
//字分成词
int word_splitter(char* str,NODE *node){

    NODE *p,*q;
    p=node;
    int length = strlen(str);
    char aword[20];
    int number = 0;
    int start = 0;
     
    memset(aword, 0, 20);
    for(int i = start; i < length; ++i){
        if(str[i] == ' '){
            memcpy(aword, str + start, i - start);
            ++number;
            //printf("%d	%s
", number, aword);

            q=(NODE *)malloc(sizeof(NODE));
            q->next=NULL;
            strcpy(q->zifuji,aword);        
            p->next=q;
            p=q;

            memset(aword, 0, 20);
            start = i + 1;
        }
    }
 
    if(start < length)
    {
        memcpy(aword, str + start, length - start);
        ++number;
        //printf("%d	%s
", number, aword);

        q=(NODE *)malloc(sizeof(NODE));
        q->next=NULL;
        strcpy(q->zifuji,aword);        
        p->next=q;
        p=q;
        
        
    }
 
    return number;
}

int main(){

    NODE *node,*p,*q;
    int i;
    STACK *stack;
    int size=-1;

    node = p =(NODE *)malloc(sizeof(NODE));
    stack=(STACK *)malloc(sizeof(STACK));

    printf("请输入：
");
    for(i=0;i<1;i++){
        q=(NODE *)malloc(sizeof(NODE));
        gets(node->zifuji);
        q=p->next;
        puts(node->zifuji);
        //printf("%d",sizeof(node->zifuji));

    }

    i=word_splitter(node->zifuji,node);

/*
    p=node->next;
    while(p){
        
        puts(p->zifuji);
        printf("
");
        p=p->next;
    }
*/
    zizhuanci(node);

    return 0;

}