/*
程序版本: 專業(yè)的C文件格式化源碼 1.0

安全性能: 只對(duì)行首的空格和Tab操作，不添加空行，
          不操作單行注釋語(yǔ)句/多行注釋段，不修改任何執(zhí)行語(yǔ)句

程序功能:
	
	 僅對(duì)C源文件行首空格及Tab進(jìn)行整理，不拖拽大括號(hào)改變?cè)酗L(fēng)格:
	 1).格式對(duì)齊, 刪除行首的Tab或空格
	 2).格式縮進(jìn), 以Tab或空格填充行首

命令行參數(shù):
		 參數(shù)1       參數(shù)2     參數(shù)3    參數(shù)4    參數(shù)5    參數(shù)6 
	 inorder.exe   source.c  temp1.c  temp2.c  temp3.c  object.c  

命令行參數(shù)說明:
	 參數(shù)1:  執(zhí)行的程序名
	 參數(shù)2:  縮進(jìn)不規(guī)范的C程序
	 參數(shù)3:  臨時(shí)文件1
	 參數(shù)4:  臨時(shí)文件2
	 參數(shù)5:  臨時(shí)文件3
	 參數(shù)6:  格式化后的C程序

格式整理規(guī)則:
	
1). 規(guī)則1: 通過檢查'{'和'}', 層次縮進(jìn)c程序. 

2). 規(guī)則2: 當(dāng)前行出現(xiàn)"if", "else", "else if", "for", "do",  "while",  "switch"時(shí),  
	 要求下一段復(fù)合語(yǔ)句或相關(guān)語(yǔ)句層次縮進(jìn).
	 
3). 規(guī)則3: 當(dāng)前行出現(xiàn)"if", "else", "else if", "for", "do",  "while",  "switch"時(shí),  
	 要求下一行執(zhí)行語(yǔ)句縮進(jìn)
	 
4). 執(zhí)行以上步驟時(shí)跳過\* *\及\\的注釋段.

5). 其它規(guī)則

通過上述3個(gè)規(guī)則，一般C程序的整理都可以完成，因此可以放心使用。

另外，因?yàn)橐?guī)則2、3的實(shí)現(xiàn)比較復(fù)雜，所以給出源碼，希望眾多網(wǎng)友

能發(fā)揮集體智慧，改進(jìn)或代替我笨拙的實(shí)現(xiàn)思路。

*/

#if 0

下列注釋類型將會(huì)引起程序出錯(cuò):

1./*/-------------------------------------------------*/
   2./*----------------------------//--------------------*/
   3./*----------------------------
     * if(*str==0){
     *    return 1;
     * }
     *--------------------*/if(*str==0){
return 1;
}
下列字符串將會(huì)引起程序出錯(cuò):

/*
   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所指字符串跟一個(gè)字符串常量比較，相等返回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;
}
}

/* 判斷此行是否存在地址標(biāo)號(hào)，存在返回1 */
unsigned char label_chr(char *str)
{
char *p=str;
unsigned char i=0;
if(str_cmp("default",p))return 0;	// default:是特例, 不作為地址標(biāo)號(hào)
while(1){
if(*p==0x20){ // 空格
return i;
}
if(*p==0x0D){ // 回車
return i;
}
if(*p==0x09){ // Tab
return i;
}
if(*p==0x22){ // 雙引號(hào)
return i;
}
if(*p==0x3F){ // 問號(hào)
return i;
}
if(*p==0x27){ // 分號(hào)'
return i;
}
if(*p==':'){
i=1;
}
++p;
}
}

void main(char argc, char* argv[])
{
   /*
     程序執(zhí)行時(shí), 命令行參數(shù)的個(gè)數(shù)記錄在 argc 里
     命令行第一個(gè)參數(shù)(字符串)的地址被賦給argv[0]
     命令行第二個(gè)參數(shù)(字符串)的地址被賦給argv[1]
     命令行第三個(gè)參數(shù)(字符串)的地址被賦給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)      // 讀取一個(gè)指定名稱的文件, 文件名決定于argv[1]所指字符串
{
printf("\n 讀取的文件不存在");
getch();
return;
}
if((fp2=fopen(argv[2],"wb"))==NULL)      // 新建一個(gè)文件, 文件名決定于argv[2]所指字符串, 文件若存在則內(nèi)容被清空
{
printf("\n 不能建立目標(biāo)文件");
getch();
return;
}
if((fp3=fopen(argv[3],"wb"))==NULL)      // 新建一個(gè)文件, 文件名決定于argv[3]所指字符串, 文件若存在則內(nèi)容被清空
{
printf("\n 不能建立目標(biāo)文件");
getch();
return;
}
if((fp4=fopen(argv[4],"wb"))==NULL)      // 新建一個(gè)文件, 文件名決定于argv[4]所指字符串, 文件若存在則內(nèi)容被清空
{
printf("\n 不能建立目標(biāo)文件");
getch();
return;
}
if((fp5=fopen(argv[5],"wb"))==NULL)      // 新建一個(gè)文件, 文件名決定于argv[5]所指字符串, 文件若存在則內(nèi)容被清空
{
printf("\n 不能建立目標(biāo)文件");
getch();
return;
}
/*
	if((fp6=fopen(argv[6],"wb"))==NULL)      // 新建一個(gè)文件, 文件名決定于argv[6]所指字符串, 文件若存在則內(nèi)容被清空
	{
	  printf("\n 不能建立目標(biāo)文件");
	  getch();
	  return;
	}
*/

//************************************************************************************************************
// 第一步處理：去掉行首的空格及Tab，執(zhí)行后生成的臨時(shí)文件所有行的行首都沒有了空格和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;
}
//----------------------------------------------------
// 檢測(cè)此行有無跨行的注釋，有則標(biāo)志j置1
for(j=0,i=0,k=0;i<255;++i){
if(str[i]==0x22){
if(k==0)k=1;
else k=0;
}
// 在檢測(cè)注釋標(biāo)志時(shí)跳過"字符串常量"
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){
// 將行字符串寫入臨時(shí)文件，忽略行首的空格以及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 {
// 跨行的/* */注釋不縮進(jìn)，直接寫入臨時(shí)文件
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);

//************************************************************************************************************
// 第二部處理，依照規(guī)則1，通過對(duì)'{'和'}'的檢查，在各行首添加空格進(jìn)行層次縮進(jìn)，此規(guī)則比較簡(jiǎn)單

if((fp2=fopen(argv[2],"rb"))==NULL)      // 讀取一個(gè)指定名稱的文件, 文件名決定于argv[2]所指字符串
{
printf("\n 讀取的文件不存在");
getch();
return;
}
flag_zhushi=0;
flag_zhushi_e=0;
k=0;           // 當(dāng)前語(yǔ)句行首空格數(shù)目為N*k個(gè)
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)){        // 檢測(cè)雙引號(hào)奇偶數(shù),引用的雙引號(hào)忽略不計(jì)
if(inorder_f2==0)inorder_f2=1;
else inorder_f2=0;   
}
else if(*p==0){
break;
}
if(inorder_f2==0){                        // 檢測(cè)注釋標(biāo)志時(shí)跳過字符串常量
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){                           // 從非空白字符的開始處, 只檢測(cè)一次
m=label_chr(p);                        // 檢測(cè)是否存在地址標(biāo)號(hào)
if(str_cmp("#if",p) || str_cmp("#elif",p) || str_cmp("#else",p) || str_cmp("#endif",p)){
break;                              // 遇到編譯預(yù)處理指令則退出
}
}

if(flag_zhushi==0){                       // 檢測(cè)'}'時(shí)跳過/* */注釋
if((*p=='{') && (*(p+1) !=0x27)){      // 引用的'}'忽略不計(jì)
//if(flag_t2==0)flag_k1=1;
++flag_t1;      //'{'出現(xiàn)次數(shù)
}
if((*p=='}') && (*(p+1) !=0x27)){
if(flag_t1==0)flag_k2=1;
++flag_t2;      //'}'出現(xiàn)次數(shù)
}
}
}
// --------------------------------------------------------------------
// '}'出現(xiàn)次數(shù)多于'{', 則此行縮進(jìn)數(shù)減
if(flag_t1<flag_t2){
k-=(flag_t2-flag_t1);
}
// --------------------------------------------------------------------
// 對(duì)于特殊寫法" } else { "的特別處理

if(flag_t1==flag_t2){
if(flag_t1==1)
if(flag_k2==1)
--k;
}
//----------------------------------------------------------------------
// 每次讀入一行語(yǔ)句, 分析后寫入另一文件, 寫文件操作只有兩部分:
// 1.寫入空格縮進(jìn) 2.寫入省略行首空格的代碼部分
// 不影響原來的風(fēng)格或更改原來的程序結(jié)果, 因此雖然功能單一, 但足夠安全.

if(m==1){                              // 單獨(dú)的地址標(biāo)號(hào)行不縮進(jìn)
;  
}
else if(flag_k3==1){                   // 編譯預(yù)處理暫不縮進(jìn)
;
}
else if(flag_zhushi_e==0 || inorder_f1==2)
for(i=0;i<k;++i)
if(fputs("   ",fp3)==EOF)       // 在此更改每層縮進(jìn)幾個(gè)空格
{   
printf("write error. \n");
printf("write error. \n");
}
if(fputs(str,fp3)==EOF)
printf("write error. \n");
// --------------------------------------------------------------------
// 含有/* */的多行注釋段段不縮進(jìn),直到注釋結(jié)束為止
if(flag_zhushi==0)
flag_zhushi_e=0;
// --------------------------------------------------------------------
// '{'的個(gè)數(shù)多于'}'的個(gè)數(shù),則下一行縮進(jìn)數(shù)加
if(flag_t1>flag_t2){        // '{'出現(xiàn)次數(shù)多于'}',增加空格個(gè)數(shù)
k+=(flag_t1-flag_t2);
}
// --------------------------------------------------------------------
// 對(duì)于特殊寫法" } else { "的特別處理