#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#define LEN sizeof(struct Node)
#define NULL 0
struct Node {
char data;
struct Node *next; /* 定义动态链表数据结构 */
};
void output(struct Node*);/*扫描输出函数*/
void scaner(); /*词法分析*/
void getbc();
void getch();
void concat();
int letter(char ch);
int degit(char ch);
int reserve();
void retract();
void back(int a,char *b);
struct Node *head,*p;
char ch; /*全局变量*/
char *key[]={"int","if","for","while","do","return","break","continue"}; /*关键字表*/
char token[20]; /*字符数组,存放构成单词的符号串*/
int main(void){
head=(struct Node *)malloc(LEN); /*分配头节点存储空间*/
if(!head){
printf("error");exit(1);}
head->next=NULL;
head->data=' ';
p=head;
printf("Please input your codes:(输入$结束)\n");
while(1) {
int i=0;
char temp[256];/*每行长度不超过256个字符*/
gets(temp); /*输入源程序,以行为单位*/
if(temp[0]=='$') break;/*当输入的第一个字符为$时表示输入源代码结束*/
p->next=(struct Node *)malloc(LEN);
if(!(head->next)){
printf("error");exit(1);}
p=p->next;
while(temp[i]!='\0' && i<256) /*将输入的代码以行为单位存入缓冲区*/
{
p->data=temp[i];
p->next=(struct Node *)malloc(LEN);
if(!(p->next)) {printf("error");exit(1);}
p=p->next;
i++;
}
p->data='\n';
p->next=NULL; /*尾结点*/
}
output(head); /*扫描缓冲区,输出结果*/
p=head->next;
while(p->next!=NULL)
scaner(); /*词法分析*/
system("pause");
return 0;
}
void output(struct Node *head) /*扫描缓冲区函数*/
{
if(!head) {printf("error");exit(1);}
p=head->next;
while(p->next!=NULL) {
printf("%c",p->data);
p=p->next;
}
printf("\n");
}
void getbc() /*若ch中是空白字符,则不停调用getch()直到读入的不是空白字符为止*/
{
while (ch==' ')
getch();
}
void getch() /*从缓冲区读入一字符*/
{
ch=p->data;
p=p->next;
}
void concat() /*将ch中的字符连接到token的后面*/
{
unsigned int i;
i=strlen(token);
token[i]=ch;
token[i+1]='\0';
}
int letter(char ch) /*判断ch中的是否是字母*/
{
return isalpha((int)ch);
}
int digit(char ch) /*判断ch中的是否是数字*/
{
return isdigit((int)ch);
}
int reserve() /*判断token中的字符串是否是关键字或是标识符*/
{
int k;
for(k=0;k<8;k++){
if(strcmp(key[k],token)==0) return (k+1);}
return 0;
}
void retract() /*指针回退一个字符*/
{
struct Node *Q;
Q=head->next;
while(Q->next!=p)
Q=Q->next;
p=Q;
}
void back(int a,char *b) /*返回函数,输出序列*/
{
printf("(%d,%s)",a,b);
}
void scaner() /*词法分析函数*/
{
int c;
token[0]=NULL; /*将token清空*/
getch();
getbc(); /*读入一个单词*/
if(letter(ch)) /*处理字符的情况*/
{
while(letter(ch)||digit(ch)){
concat();
getch();
}
retract();
c=reserve();
if(c!=0) back(1,token);
else back(2,token);
}
else if(digit(ch)) /*处理数字的情况*/
{
while(digit(ch)){
concat();
getch();
}
retract();
printf("(3,%d)",atoi(token));
}
else
switch(ch) /*处理特殊符号的情况*/
{
case'+': back(4,"+");break;
case'-': back(4,"-");break;
case'*': back(4,"*");break;
case'/': back(4,"/");break;
case'<': getch();
if(ch=='=') back(4,"<=");
retract();
back(4,"<");
break;
case'>': getch();
if(ch=='=') back(4,">=");
retract();
back(4,">");
break;
case'!':getch();
if(ch=='=') back(4,"!=");
break;
case',': back(5,",");break;
case';': back(5,";");break;
case'{': back(5,"{");break;
case'}': back(5,"}");break;
case'(': back(5,"(");break;
case')': back(5,")");break;
case'=': back(5,"=");break;
case'\n': break;
default: printf("error");break;
}
}
评论0