LCC编译器的源程序分析(4)处理文件参数

上面已经介绍选择不同的目标输出的参数处理,那么接着下来,自然的事情就是处理剩下的两个参数的问题,当然LCC是可以处理更多其它参数的,但这里只介绍两个文件参数的处理。命令行如下:
rcc.exe -target=x86/nasm hello.i hello.asm
其中hello.i是输入文件,hello.asm是输出文件。那么LCC是怎么样打开输入文件和输出文件呢?输入文件又有什么技巧呢?要仔细地理解源程序,就知道它的输入处理是非常高效的。
当选择合适的目标输出后,就调用下面的函数来处理:
//
init(argc, argv);
这个函数就是用来处理其它参数的。它的源程序如下:
#001 void init(int argc, char *argv[])
#002 {
#003 {
#004 extern void input_init(int, char *[]);
#005 input_init(argc, argv);
#006 }
#007
#008 {
#009 extern void main_init(int, char *[]);
#010 main_init(argc, argv);
#011 }
#012
#013 {
#014 extern void type_init(int, char *[]);
#015 type_init(argc, argv);
#016 }
#017 }
第1行代码里传入了命令行的参数。
第5行代码是处理参数的处理。如果在第5行里调用没有处理main_init,那么在第10行里会再次调用它进行参数处理。
第15行调函数type_init进行类型初始化,比如C缺省的数据类型初始化,比如int类型,就初始化为4字节的有符号类型,还有很多其C默认的类型定义。

先来分析函数input_init的源程序是做什么工作的,下面就是它的程序:
#001 void input_init(int argc, char *argv[])
#002 {
#003 static int inited;
#004
#005 if (inited)
#006 return;
#007
#008 inited = 1;
#009 main_init(argc, argv);
#010
#011 limit = cp = &buffer[MAXLINE+1];
#012 bsize = -1;
#013 lineno = 0;
#014 file = NULL;
#015
#016 fillbuf();
#017 if (cp >= limit)
#018 cp = limit;
#019
#020 nextline();
#021 }

第5行处理是否初始化,因为只允许初始化一次。第8行设置初始化变量为1,让这段代码不要运行两次。
第9行调用主要参数处理函数。后面再接着介绍。
第11行让当前行指针和缓冲区指针指向输入缓冲区的尾部。
第12行初始化读取文件块大小为-1,也就是读取文件失败的状态。
第13行设置分析的C程序行号为0。
第14行设置当前输入文件名称为空。
第16行是从输入文件里读取数据到输入缓冲区,同时设置当前处理的指针。
第17行判断当前指针是否大于数据缓冲区的指针。
第20行读取下一行源程序到缓冲区里。

调用函数main_init主要处理参数,并且打开输入的文件和输出的文件。它的程序如下:
#001 void main_init(int argc, char *argv[])
#002 {
#003 char *infile = NULL, *outfile = NULL;
#004 int i;
#005 static int inited;
#006
#007 if (inited)
#008 return;
#009
#010 inited = 1;
#011 for (i = 1; i < argc; i++)
#012 if (strcmp(argv[i], "-g") == 0 || strcmp(argv[i], "-g2") == 0)
#013 glevel = 2;
#014 else if (strncmp(argv[i], "-g", 2) == 0)
#015 { /* -gn[,x] */
#016 char *p = strchr(argv[i], ',');
#017 glevel = atoi(argv[i]+2);
#018 if (p)
#019 {
#020 comment = p + 1;
#021 if (glevel == 0)
#022 glevel = 1;
#023 if (stabIR.stabline == NULL)
#024 {
#025 stabIR.stabline = IR->stabline;
#026 stabIR.stabend = IR->stabend;
#027 IR->stabline = stabline;
#028 IR->stabend = stabend;
#029 }
#030 }
#031 }
#032 else if (strcmp(argv[i], "-x") == 0)
#033 xref++;
#034 else if (strcmp(argv[i], "-A") == 0)
#035 {
#036 ++Aflag;
#037 }
#038 else if (strcmp(argv[i], "-P") == 0)
#039 Pflag++;
#040 else if (strcmp(argv[i], "-w") == 0)
#041 wflag++;
#042 else if (strcmp(argv[i], "-v") == 0)
#043 fprint(stderr, "%s %s\n", argv[0], rcsid);
#044 else if (strncmp(argv[i], "-s", 2) == 0)
#045 density = strtod(&argv[i][2], NULL);
#046 else if (strncmp(argv[i], "-errout=", 8) == 0)
#047 {
#048 FILE *f = fopen(argv[i]+8, "w");
#049 if (f == NULL)
#050 {
#051 fprint(stderr, "%s: can't write errors to ‘%s’\n", argv[0], argv[i]+8);
#052 exit(EXIT_FAILURE);
#053 }
#054
#055 fclose(f);
#056 f = freopen(argv[i]+8, "w", stderr);
#057 assert(f);
#058 }
#059 else if (strncmp(argv[i], "-e", 2) == 0)
#060 {
#061 int x;
#062 if ((x = strtol(&argv[i][2], NULL, 0)) > 0)
#063 errlimit = x;
#064 }
#065 else if (strncmp(argv[i], "-little_endian=", 15) == 0)
#066 IR->little_endian = argv[i][15] - '0';
#067 else if (strncmp(argv[i], "-mulops_calls=", 18) == 0)
#068 IR->mulops_calls = argv[i][18] - '0';
#069 else if (strncmp(argv[i], "-wants_callb=", 13) == 0)
#070 IR->wants_callb = argv[i][13] - '0';
#071 else if (strncmp(argv[i], "-wants_argb=", 12) == 0)
#072 IR->wants_argb = argv[i][12] - '0';
#073 else if (strncmp(argv[i], "-left_to_right=", 15) == 0)
#074 IR->left_to_right = argv[i][15] - '0';
#075 else if (strncmp(argv[i], "-wants_dag=", 11) == 0)
#076 IR->wants_dag = argv[i][11] - '0';
#077 else if (*argv[i] != '-' || strcmp(argv[i], "-") == 0)
#078 {
#079 if (infile == NULL)
#080 infile = argv[i];
#081 else if (outfile == NULL)
#082 outfile = argv[i];
#083 }
#084
#085 if (infile != NULL && strcmp(infile, "-") != 0
#086 && freopen(infile, "r", stdin) == NULL)
#087 {
#088 fprint(stderr, "%s: can't read ‘%s’\n", argv[0], infile);
#089 exit(EXIT_FAILURE);
#090 }
#091
#092 if (outfile != NULL && strcmp(outfile, "-") != 0
#093 && freopen(outfile, "w", stdout) == NULL)
#094 {
#095 fprint(stderr, "%s: can't write ‘%s’\n", argv[0], outfile);
#096 exit(EXIT_FAILURE);
#097 }
#098 }

第7行到第10行,同样是让这个函数只运行一次的代码。
第79行到第82行是读取输入文件和输出文件的名称。
第85行到第90行是打开输入的文件,并处理出错的情况。
第92行到第97行是打开输出的文件,并处理出错的情况。
其它代码就是处理其它参数的功能,这里就不详略地介绍了。
OK,到这里就已经把输入的文件和输入的文件打开,准备好处理源程序的基础了。由于在函数input_init里已经调用main_init,后面再调用它已经是不再处理了。

下面再来看看函数input_init里调用的两个函数fillbuf和nextline。先来看函数fillbuf:
#001 void fillbuf(void)
#002 {
#003 if (bsize == 0)
#004 return;
#005
#006 if (cp >= limit)
#007 cp = &buffer[MAXLINE+1];
#008 else
#009 {
#010 int n = limit - cp;
#011 unsigned char *s = &buffer[MAXLINE+1] - n;
#012 assert(s >= buffer);
#013 line = (char *)s - ((char *)cp - line);
#014 while (cp < limit)
#015 *s++ = *cp++;
#016
#017 cp = &buffer[MAXLINE+1] - n;
#018 }
#019
#020 if (feof(stdin))
#021 bsize = 0;
#022 else
#023 bsize = fread(&buffer[MAXLINE+1], 1, BUFSIZE, stdin);
#024
#025 if (bsize < 0)
#026 {
#027 error("read error\n");
#028 exit(EXIT_FAILURE);
#029 }
#030 limit = &buffer[MAXLINE+1+bsize];
#031 *limit = '\n';
#032 }

第3行处理读取数据为0的情况,这时就返回去,因为没有数据处理。
第6行处理在缓冲区里已经可以识别所有单词的情况,如果在行缓冲以后都不能识别出来的单词,这时又需从文件里读取数据出来,那么就需要把缓冲区后面的数据移到行缓冲最前面去,这样就可以把这些字符串可以拼接在一起进行处理了,第10行到17行就是做这样的事情。
第20行是判断是否读完文件,不是的话,在第23行里就读取缓冲区的大小字符串。
第30行调整缓冲区最后的指针,它是指向缓冲区的尾部的。
上面就实现了缓冲文件的输入,并且处理文件的顺序识别,当然也限制了一行代码是512个字节的大小,这也是C标准里定义一行代码最大的大小,所以写C程序时,一行代码是不能超过512个字节的。

已经分析了这么多内容,下一节再分析nextline吧。

Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License