?? word_parser.txt
字號:
#include <stdio.h>
#include <ctype.h>
#include <string.h>
//#define BUFFER_SIZE 512 //預定義緩沖區大小
#define KEY_MOUNT 32 //預定義關鍵字個數
#define ID_SIZE 64 //預定義關鍵字大小
#define MAX_ID 2000
//用來定義關鍵字的集合
#define ANTO 257
#define BREAK 258
#define CASE 259
#define CHAR 260
#define CONST 261
#define CONTINUE 262
#define DEFAULT 263
#define DO 264
#define DOUBLE 265
#define ELSE 266
#define ENUM 267
#define EXTERN 268
#define FLOAT 269
#define FOR 270
#define GOTO 271
#define IF 272
#define INT 273
#define LONG 274
#define REGISTER 275
#define RETURN 276
#define SHORT 277
#define SIGNED 278
#define SIZEOF 279
#define STATIC 280
#define STRUCT 281
#define SWITCH 282
#define TYPEDEF 283
#define UNION 284
#define UNSIGNED 285
#define VOID 286
#define VOLATILE 287
#define WHILE 288
#define ID 289
#define NUMBER 290
#define STRING 291
#define REAL 292
#define RELOP 293
#define LOGIC_OP 294
#define PAIR_MATCH 295
#define SINGLE_CHAR 296
#define PREDEFINE 297
#define PREINCLUDE 298
#define DEPARTOR 299
#define COMMA 300
#define SELF_ADD 301
#define SELF_SUB 302
#define AND 303
#define OR 304
#define BIG_EQUAL 305
#define SMA_EQUAL 306
#define EQUIV 307
#define REF 308
#define REMAIN 309
#define UNEQUAL 310
#define DONE 311
struct symbol
{
char *lexpre;
int field;
} symtable[KEY_MOUNT+1]; //用來存儲符號表
struct stack
{
int pair_list[100];
int top;
} pair;
struct symbol sym_list[MAX_ID];
int lineno=0;
char *lexeme;
FILE *res;
FILE *err;
int token_type;
int token_val;
void init(); //初始化關鍵字列表
int word_parse();
void error(char *s);
int insert(char *q,int token);
int lookup(char *q);
int is_full();
/*void push(char c);
void pop() ;
*/
int main(int argc,char *argv[])
{
int i;
init();
if(argc > 2 || argc < =0 )
{
printf("agc :%d can't find resource file 1",argc);
exit(1);
}
if(strlen(argv[0])<3)
{
printf("can't find resource file 2");
exit(1);
}
if(!strcmp((argv[0]+strlen(argv[0])-2),".c"))
{
printf("undefined file,can't open it");
exit(1);
}
if(!(res=fopen(argv[0],"r")))
{
printf("error,can't open the file,please check the file path");
exit(1);
}
err=fopen("error.txt","w+");
freopen("word_parser_output.txt","w+ ",stdout);
i=word_parse();
while(i!=DONE)
i=word_parse();
putc(EOF,err);
fclose(res);
fclose(err);
}
void init()
{
//lexeme="auto\0break\0case\0char\0const\0continue\0default\0do\0double\0else\0enum\0extern\0float\0for\0goto\0if\0int\0long\0register\0return\0short\0signed\0sizeof\0static\0struct\0switch\0typedef\0union\0unsigned\0void\0volatile\0while\0" ;
symtable[1].field= ANTO;
symtable[1].lexpre=lexeme;
symtable[2].field= BREAK;
symtable[2].lexpre=lexeme+5;
symtable[3].field= CASE;
symtable[3].lexpre=lexeme+11;
symtable[4].field= CHAR;
symtable[4].lexpre=lexeme+16;
symtable[5].field= CONST;
symtable[5].lexpre=lexeme+21;
symtable[6].field= CONTINUE;
symtable[6].lexpre=lexeme+27;
symtable[7].field= DEFAULT;
symtable[7].lexpre=lexeme+36;
symtable[8].field= DO;
symtable[8].lexpre=lexeme+44;
symtable[9].field= DOUBLE;
symtable[9].lexpre=lexeme+47;
symtable[10].field= ELSE;
symtable[10].lexpre=lexeme+54;
symtable[11].field= ENUM;
symtable[11].lexpre=lexeme+59;
symtable[12].field= EXTERN;
symtable[12].lexpre=lexeme+64;
symtable[13].field= FLOAT;
symtable[13].lexpre=lexeme+71;
symtable[14].field= FOR;
symtable[14].lexpre=lexeme+77;
symtable[15].field= GOTO;
symtable[15].lexpre=lexeme+81;
symtable[16].field= IF;
symtable[16].lexpre=lexeme+86;
symtable[17].field= INT;
symtable[17].lexpre=lexeme+89;
symtable[18].field= LONG;
symtable[18].lexpre=lexeme+93;
symtable[19].field= REGISTER;
symtable[19].lexpre=lexeme+98;
symtable[20].field= RETURN;
symtable[20].lexpre=lexeme+107;
symtable[21].field= SHORT;
symtable[21].lexpre=lexeme+114;
symtable[22].field= SIGNED;
symtable[22].lexpre=lexeme+120;
symtable[23].field= SIZEOF;
symtable[23].lexpre=lexeme+127;
symtable[24].field= STATIC;
symtable[24].lexpre=lexeme+134;
symtable[25].field= STRUCT;
symtable[25].lexpre=lexeme+141;
symtable[26].field= SWITCH;
symtable[26].lexpre=lexeme+148;
symtable[27].field= TYPEDEF;
symtable[27].lexpre=lexeme+155;
symtable[28].field= UNION;
symtable[28].lexpre=lexeme+163;
symtable[29].field= UNSIGNED;
symtable[29].lexpre=lexeme+169;
symtable[30].field= VOID;
symtable[30].lexpre=lexeme+178;
symtable[31].field= VOLATILE;
symtable[31].lexpre=lexeme+183;
symtable[32].field= WHILE;
symtable[32].lexpre=lexeme+192;
}
int word_parse()
{
int curr_ch;
int next_ch;
int last_ch;
char *records;
int i,j,k;
while(1)
{
curr_ch=getc(res);
if(curr_ch=='/')
{
next_ch=getc(res);
if(next_ch=='/')
{
while( curr_ch=getc(res) != EOF && curr_ch != '\n');
if(curr_ch==EOF)
return DONE;
lineno++;
continue;
}
else if(next_ch=='*')
{
curr_ch=getc(res);
next_ch=getc(res);
while( curr_ch != EOF && next_ch !=EOF)
{
if(curr_ch == '*' && next_ch == '/')
break;
else
{
curr_ch=getc(res);
next_ch=getc(res);
}
}
if(curr_ch == '*' && next_ch == '/')
continue;
else
return DONE;
}
else if(next_ch=='=')
{
printf("line %d:</RELOP>/=<RELOP>",lineno);
return RELOP;
}
else
{
ungetc(next_ch,res);
printf("line %d:</RELOP>/<RELOP>",lineno);
return RELOP;
}
}
else if(curr_ch==' '|| curr_ch== '\t')
continue;
else if(curr_ch=='\n')
lineno++;
else if(curr_ch=='#')
{
for(i=0;i<=6;i++)
records[i]=getc(res);
records[7]='\0';
if(!strcmp(records,"include"))
{
printf("line %d:</PREINCLUDE>#include<PREINCLUDE>\n",lineno);
token_type=PREINCLUDE;
return PREINCLUDE;
}
curr_ch=records[6];
records[6]='\0';
if(!strcmp(records,"define"))
{
printf("line %d:</PREDEFINE>#define<PREDEFINE>\n",lineno);
token_type=PREDEFINE;
return PREDEFINE;
}
ungetc(curr_ch,res);
for(i=5;i>=0;i--)
ungetc(records[i],res);
error("illegar character in prefine");
continue;
}
else if(isalpha(curr_ch)||curr_ch=='_')
{
i=j=0;
while( isalnum(curr_ch) || curr_ch == '_')
{
records[i++]=curr_ch;
if(i > ID_SIZE)
error("identifier too long ,over the max size");
curr_ch=getc(res);
}
records[i]='\0';
ungetc(curr_ch,res);
k=lookup(records);
if(k)
{
printf("line %d:</KEYWORD>%s<KEYWORD>",lineno,records);
return k;
}
insert(records,ID);
printf("line %d:</ID>%s<ID>",lineno,records);
token_type=ID;
return ID;
}
else if(curr_ch==EOF)
return DONE;
else if(isdigit(curr_ch))
{
while(isdigit(curr_ch))
{
j=k=0;
records[j++]=curr_ch;
curr_ch=getc(res);
}
token_type=NUMBER;
if(curr_ch=='.')
{
curr_ch=getc(res);
if(!isdigit(curr_ch))
{
error("unexpected character in number");
records[j++]='0';
}
else
{
while(isdigit(curr_ch))
{
records[j++]=curr_ch;
curr_ch=getc(res);
}
token_type=REAL;
}
}
if(curr_ch=='e')
{
curr_ch=getc(res);
if(curr_ch=='+' || curr_ch== '-' )
curr_ch=getc(res);
if(!isdigit(curr_ch))
records[j]='0';
while(isdigit(curr_ch))
{
records[j++]=curr_ch;
curr_ch=getc(res);
}
token_type=REAL;
ungetc(curr_ch,res);
}
else
{
error("unexpected character in number");
ungetc(curr_ch,res);
}
records[j]='\0';
insert(records,token_type);
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -