inorder_.c

程序版本: 专业的C文件格式化源码 1.0 程序功能: 仅对C源文件行首空格及Tab进行整理

/*
程序版本: 专业的C文件格式化源码 1.0

安全性能: 只对行首的空格和Tab操作，不添加空行，
          不操作单行注释语句/多行注释段，不修改任何执行语句

程序功能:
	
	 仅对C源文件行首空格及Tab进行整理，不拖拽大括号改变原有风格:
	 1).格式对齐, 删除行首的Tab或空格
	 2).格式缩进, 以Tab或空格填充行首

命令行参数:
		 参数1       参数2     参数3    参数4    参数5    参数6 
	 inorder.exe   source.c  temp1.c  temp2.c  temp3.c  object.c  

命令行参数说明:
	 参数1:  执行的程序名
	 参数2:  缩进不规范的C程序
	 参数3:  临时文件1
	 参数4:  临时文件2
	 参数5:  临时文件3
	 参数6:  格式化后的C程序

格式整理规则:
	
1). 规则1: 通过检查'{'和'}', 层次缩进c程序. 

2). 规则2: 当前行出现"if", "else", "else if", "for", "do",  "while",  "switch"时,  
	 要求下一段复合语句或相关语句层次缩进.
	 
3). 规则3: 当前行出现"if", "else", "else if", "for", "do",  "while",  "switch"时,  
	 要求下一行执行语句缩进
	 
4). 执行以上步骤时跳过\* *\及\\的注释段.

5). 其它规则

通过上述3个规则，一般C程序的整理都可以完成，因此可以放心使用。

另外，因为规则2、3的实现比较复杂，所以给出源码，希望众多网友

能发挥集体智慧，改进或代替我笨拙的实现思路。

*/

#if 0

下列注释类型将会引起程序出错:

1./*/-------------------------------------------------*/
   2./*----------------------------//--------------------*/
   3./*----------------------------
     * if(*str==0){
     *    return 1;
     * }
     *--------------------*/if(*str==0){
   return 1;
}
下列字符串将会引起程序出错:

/*
   1. char str[]="abcdefg
               efghiklmnopqrstuvwxyz123";
   
   2. char str[]="//abcdefghijklmn";
   
   3. char str[]="/*abcdefghijklmn";
   
   4. char str[]="*/abcdefghijklmn";

#endif


#include <conio.h>
#include <stdio.h>

/* 将p所指字符串跟一个字符串常量比较，相等返回1 */
unsigned char str_cmp(const char *str,char *p1)
{
   char *p=p1;
   while(1){
      if(*str==0){
         return 1;
      }
      if(*str==*p){
         ++str;
         ++p;
      }
      else return 0;
   }
}

/* 判断此行是否存在地址标号，存在返回1 */
unsigned char label_chr(char *str)
{
   char *p=str;
   unsigned char i=0;
   if(str_cmp("default",p))return 0;	// default:是特例, 不作为地址标号
   while(1){
      if(*p==0x20){ // 空格
         return i;
      }
      if(*p==0x0D){ // 回车
         return i;
      }
      if(*p==0x09){ // Tab
         return i;
      }
      if(*p==0x22){ // 双引号
         return i;
      }
      if(*p==0x3F){ // 问号
         return i;
      }
      if(*p==0x27){ // 分号'
         return i;
      }
      if(*p==':'){
         i=1;
      }
      ++p;
   }
}

void main(char argc, char* argv[])
{
   /*
     程序执行时, 命令行参数的个数记录在 argc 里
     命令行第一个参数(字符串)的地址被赋给argv[0]
     命令行第二个参数(字符串)的地址被赋给argv[1]
     命令行第三个参数(字符串)的地址被赋给argv[2]
     ...
   */
   FILE *fp1,*fp2,*fp3,*fp4,*fp5;           // 定义文件指针
   int i,j,k;
   int /*flag_k1,*/flag_k2,flag_k3,flag_d,flag_t1,flag_t2,inorder_f1,inorder_f2,inorder_f3,flag_zhushi,flag_zhushi_e,flag_zhushi_f;
   
   int case_flag1,case_flag2,case_flag3,case_end;
   char m,str[255],*p;
   
   if(argc != 6)
   {  printf("\n USAGE: INORDER.EXE TEMP1.C TEMP2.C TEMP3.C OBJECT.C");
      getch();
      return;
   }
   if((fp1=fopen(argv[1],"rb"))==NULL)      // 读取一个指定名称的文件, 文件名决定于argv[1]所指字符串
   {
      printf("\n 读取的文件不存在");
      getch();
      return;
   }
   if((fp2=fopen(argv[2],"wb"))==NULL)      // 新建一个文件, 文件名决定于argv[2]所指字符串, 文件若存在则内容被清空
   {
      printf("\n 不能建立目标文件");
      getch();
      return;
   }
   if((fp3=fopen(argv[3],"wb"))==NULL)      // 新建一个文件, 文件名决定于argv[3]所指字符串, 文件若存在则内容被清空
   {
      printf("\n 不能建立目标文件");
      getch();
      return;
   }
   if((fp4=fopen(argv[4],"wb"))==NULL)      // 新建一个文件, 文件名决定于argv[4]所指字符串, 文件若存在则内容被清空
   {
      printf("\n 不能建立目标文件");
      getch();
      return;
   }
   if((fp5=fopen(argv[5],"wb"))==NULL)      // 新建一个文件, 文件名决定于argv[5]所指字符串, 文件若存在则内容被清空
   {
      printf("\n 不能建立目标文件");
      getch();
      return;
   }
/*
	if((fp6=fopen(argv[6],"wb"))==NULL)      // 新建一个文件, 文件名决定于argv[6]所指字符串, 文件若存在则内容被清空
	{
	  printf("\n 不能建立目标文件");
	  getch();
	  return;
	}
*/
   
   //************************************************************************************************************
   // 第一步处理：去掉行首的空格及Tab，执行后生成的临时文件所有行的行首都没有了空格和Tab
   do {
      //----------------------------------------------------
      // 字符串缓存清0
      for(i=0;i<255;++i){
         str[i]=0;
      }
      //----------------------------------------------------
      // 取一行字符
      if(fgets(str,255,fp1)==NULL){
         if(!feof(fp1)){
            printf("fgets() error!\n");
            getch();
         }
         break;
      }
      //----------------------------------------------------
      // 检测此行有无跨行的注释，有则标志j置1
      for(j=0,i=0,k=0;i<255;++i){
         if(str[i]==0x22){
            if(k==0)k=1;
            else k=0;
         }
         // 在检测注释标志时跳过"字符串常量"
         if(k==0){
            if((str[i]=='/') && (str[i+1]=='/')){
               break;
            }
            if((str[i]=='/') && (str[i+1]=='*')){
               j=1;
            }
            if((str[i]=='*') && (str[i+1]=='/')){
               j=0;
            }
         }
         if(str[i]==0){
            break;
         }
      }
      //----------------------------------------------------
      if (j==0){
         // 将行字符串写入临时文件，忽略行首的空格以及Tab
         for(i=0,p=str; i<255; ++p,++i){
            if((*p!=0x20) && (*p!=0x09)){
               break;
            }
         }
         if(fputs(p,fp2)==EOF){
            printf("write error. \n");
         }
      }
      else {
         // 跨行的/* */注释不缩进，直接写入临时文件
         if(fputs(str,fp2)==EOF){
            printf("write error. \n");
         }
         do {
            for(i=0;i<255;++i){
               str[i]=0;
            }
            if(fgets(str,255,fp1)==NULL){
               if(!feof(fp1)){
                  printf("fgets() error!\n");
                  getch();
               }
               break;
            }
            for(j=0,i=0;i<255;++i){
               if((str[i]=='*') && (str[i+1]=='/')){
                  j=2;
               }
               if(str[i]==0){
                  break;
               }
            }
            if(fputs(str,fp2)==EOF){
               printf("write error. \n");
            }
            if(j==2){
               break;
            }
         } while(1);
      }
   } while(1);
   fclose(fp2);
   
   //************************************************************************************************************
   // 第二部处理，依照规则1，通过对'{'和'}'的检查，在各行首添加空格进行层次缩进，此规则比较简单
   
   if((fp2=fopen(argv[2],"rb"))==NULL)      // 读取一个指定名称的文件, 文件名决定于argv[2]所指字符串
   {
      printf("\n 读取的文件不存在");
      getch();
      return;
   }
   flag_zhushi=0;
   flag_zhushi_e=0;
   k=0;           // 当前语句行首空格数目为N*k个
   do {
      for(i=0;i<255;++i){
         str[i]=0;
      }
      // 取一行字符
      if(fgets(str,255,fp2)==NULL){
         if(!feof(fp2)){
            printf("fgets() error2!\n");
            getch();
         }
         break;
      }
      p=str;
      for(flag_t1=0,flag_t2=0,inorder_f1=0,inorder_f2=0,/*flag_k1=0,*/flag_k2=0,flag_k3=0; ; ++p){
         if((*p=='"') && (*(p+1) != 0x27)){        // 检测双引号奇偶数,引用的双引号忽略不计
            if(inorder_f2==0)inorder_f2=1;
            else inorder_f2=0;   
         }
         else if(*p==0){
            break;
         }
         if(inorder_f2==0){                        // 检测注释标志时跳过字符串常量
            if((*p=='/')&&(*(p+1)=='*')){
               flag_zhushi=1;
               flag_zhushi_e=1;
               ++inorder_f1;
            }
            else if((*p=='*')&&(*(p+1)=='/')){
               if(flag_zhushi==1){
                  flag_zhushi=0;
                  ++inorder_f1;
               }
            }
            if((*p=='/')&&(*(p+1)=='/')){
               break;
            }
         }
         
         if(*p != 0x20){
            ++flag_k3;
         }
         
         if(flag_k3==1){                           // 从非空白字符的开始处, 只检测一次
            m=label_chr(p);                        // 检测是否存在地址标号
            if(str_cmp("#if",p) || str_cmp("#elif",p) || str_cmp("#else",p) || str_cmp("#endif",p)){
               break;                              // 遇到编译预处理指令则退出
            }
         }
         
         if(flag_zhushi==0){                       // 检测'}'时跳过/* */注释
            if((*p=='{') && (*(p+1) !=0x27)){      // 引用的'}'忽略不计
               //if(flag_t2==0)flag_k1=1;
               ++flag_t1;      //'{'出现次数
            }
            if((*p=='}') && (*(p+1) !=0x27)){
               if(flag_t1==0)flag_k2=1;
               ++flag_t2;      //'}'出现次数
            }
         }
      }
      // --------------------------------------------------------------------
      // '}'出现次数多于'{', 则此行缩进数减
      if(flag_t1<flag_t2){
         k-=(flag_t2-flag_t1);
      }
      // --------------------------------------------------------------------
      // 对于特殊写法" } else { "的特别处理
      
      if(flag_t1==flag_t2){
         if(flag_t1==1)
            if(flag_k2==1)
               --k;
      }
      //----------------------------------------------------------------------
      // 每次读入一行语句, 分析后写入另一文件, 写文件操作只有两部分:
      // 1.写入空格缩进 2.写入省略行首空格的代码部分
      // 不影响原来的风格或更改原来的程序结果, 因此虽然功能单一, 但足够安全.
      
      if(m==1){                              // 单独的地址标号行不缩进
         ;  
      }
      else if(flag_k3==1){                   // 编译预处理暂不缩进
         ;
      }
      else if(flag_zhushi_e==0 || inorder_f1==2)
         for(i=0;i<k;++i)
            if(fputs("   ",fp3)==EOF)       // 在此更改每层缩进几个空格
            {   
               printf("write error. \n");
               printf("write error. \n");
            }
      if(fputs(str,fp3)==EOF)
         printf("write error. \n");
      // --------------------------------------------------------------------
      // 含有/* */的多行注释段段不缩进,直到注释结束为止
      if(flag_zhushi==0)
         flag_zhushi_e=0;
      // --------------------------------------------------------------------
      // '{'的个数多于'}'的个数,则下一行缩进数加
      if(flag_t1>flag_t2){        // '{'出现次数多于'}',增加空格个数
         k+=(flag_t1-flag_t2);
      }
      // --------------------------------------------------------------------
      // 对于特殊写法" } else { "的特别处理