temp1.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 { "的特别处理