c语言文件操作

#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <stdio.h>
#include "string.h"
#include <malloc.h>




#include <stdio.h>
#include <stdlib.h>






#define i2a(j)  if( j>=0 && j<=9 ){  \
                    j=j+'0';       \
                }else{               \
                    j = j-0x0A+'A'; \
                }                    
//数字转换到字符

#define a2i(j)  if( j>='0' && j<='9' ){  \
                    j=j-'0';       \
                }else{               \
                    j = j+0x0A-'A'; \
                }    
//字符转换到数字




//r+ 具有读写属性，从文件头开始写，保留原文件中没有被覆盖的内容
//w+ 具有读写属性，写的时候如果文件存在，会被清空，从头开始写
//r  打开只读文件，该文件必须存在。 
//r+ 打开可读写的文件，该文件必须存在。 
//w  打开只写文件，若文件存在则文件长度清为0，即该文件内容会消失。若文件不存在则建立该文件。 
//w+ 打开可读写文件，若文件存在则文件长度清为零，即该文件内容会消失。若文件不存在则建立该文件。 
//a  以附加的方式打开只写文件。若文件不存在，则会建立该文件，如果文件存在，写入的数据会被加到文件尾，即文件原先的内容会被保留。 
//a+ 以附加方式打开可读写的文件。若文件不存在，则会建立该文件，如果文件存在，写入的数据会被加到文件尾后，即文件原先的内容会被保留。 
//上述的形态字符串都可以再加一个b字符，如rb、w+b或ab+等组合，
//加入b字符用来告诉函数库打开的文件为二进制文件，而非纯文字文件。不过在POSIX系统，包含Linux都会忽略该字符




int read_char_cnt;
int read_char_off;
int write_char_cnt;
int write_char_off;
char *read_cancel_str;
char *read_match_str;
char *write_match_str;
char *parse_file_name_txt;
char *parse_file_name_bin;




int file_size(char* filename)  
{  
    struct stat statbuf;  
    stat(filename,&statbuf);  
    int size=statbuf.st_size;  
  
    return size;  
}
















//从没有0x的文本文件到有0x的文本文件
int main_add_0x( void )
{  
    int  len;
int tmp_strlen;
    int  c,j,i;
    char line[4096];
    char tmpbuf[1024];
    FILE *fp;
    FILE *fp_temp;
    int ret,filesize,index;
    char *p;
    char kh,kl;
const char *src0 = "const u8 buf[XXXX] = {\r\n";
const char *src1 = "};\r\n";


int num = 9;
    char str[64];



    fp = fopen("testadd.txt", "r+");
    //以普通的方式打开文件
    if( fp == NULL ){
        printf("%s is not exist.\n", parse_file_name_txt ); 
        return -1;
    }
    memset(line,0x00,1024);
    
    j = 0x00;  
    fp_temp = fopen("testadd_result.txt", "w+");
    if( fp_temp == NULL ){
        printf("2.file is not exist.\n" ); 
        return -1;
    }
    //seek to the beginning of the file
    fseek(fp, 0, SEEK_SET);  
    fseek(fp_temp, 0, SEEK_SET);
    len = 0;
    //filesize = file_size("testadd.txt");
//printf("filesize = %d.\n", filesize ); 


fputs(src0, fp_temp);
index = 0x00;
while(1){
      c = fgetc(fp);
      if( feof(fp) ){
          //check for EOF 
          break;  
      }
 if( c == ' ' ){         
          continue;         
 }


 if( c== '\r'){         
          continue;         
 } 
      if(c== '\n'){         
          continue;         
 } 
 
      //printf("c = %x.\n", c ); 
      line[0]='0';
      line[1]='x';
      
      
      line[2] = c;
 c = fgetc(fp);
 
      line[3] = c;
      
      line[4]=',';
 //加入,
      line[5]=' ';
      //加入空格


 if( len%16 == 0x00 ){
   sprintf(str, "    ");
 fputs(str, fp_temp);
 }
      ++len;
 index++;




                                   
      if( len%16 == 0x00 ){
          fwrite( &line[0], 5, 1, fp_temp );
 //每16字节换行
   sprintf(str, "\r\n");
 fputs(str, fp_temp);
      }else{
          fwrite( &line[0], 6, 1, fp_temp );
     //每个字符写一次文件
 }
    }
                                                                
sprintf(str, "const u8 buf[%4d] = {\r\n", index);
    fseek(fp_temp, 0L, SEEK_SET);
fputs(str, fp_temp);
//覆盖开头位置



if( index%16 != 0x00 ){
fseek(fp_temp, -1, SEEK_END);
        sprintf(str, "\r\n");
fputs(str, fp_temp);
}else{
        fseek(fp_temp, 0L, SEEK_END);
}
fputs(src1, fp_temp);

    fclose(fp);
    fclose(fp_temp);
    //清除工作         
}






//文本文件到bin文件 根据匹配条件过滤
int main_r( void )
{  
    int  len;
int tmp_strlen;
    int  c,j,i;
    char line[4096];
    char tmpbuf[1024];
    FILE *fp;
    FILE *fp_temp;
    int ret;
    char *p;
    char kh,kl;
    fp = fopen(parse_file_name_txt, "r+");
    //以普通的方式打开文件
    if( fp == NULL ){
        printf("%s is not exist.\n", parse_file_name_txt ); 
        return -1;
    }
    memset(line,0x00,1024);
    
    j = 0x00;  
    fp_temp = fopen("parse_r.bin", "w+");
    if( fp_temp == NULL ){
        printf("2.file is not exist.\n" ); 
        return -1;
    }
    //seek to the beginning of the file
    fseek(fp, 0, SEEK_SET);  
    fseek(fp_temp, 0, SEEK_SET);
    len = 0;
    while( 1 ){
 p = fgets( line, sizeof(line), fp );
 //从输入文件读取一行字符串
      if( p == NULL ){
          //check for EOF 
          break;  
      }
      if( strncmp( read_match_str, line, strlen(read_match_str) ) == 0x00 ){
          ;
      }else{
          continue;
 }
      
      //printf("%s", line ); 
      //printf("strlen = %d.\n", strlen(line) );
      tmp_strlen = strlen(line);
      //i = 19;
 i = read_char_off;
      j = 0;
      while( 1 ){
      if( i >= tmp_strlen ){
         break;
      }                                                      
        if( line[i] == '\r' || line[i] == '\n' ){                       
      //printf("%d %x\n", i, line[i]);
         break;
      }
      if( line[i] == ' ' ){
      i++;
//忽略空格字符
         continue;
      }
     
      //printf("%d %x\n", i, line[i]); 
      kh = line[i];
      kl = line[i+1];
      a2i(kh);
      a2i(kl);
      tmpbuf[j] = (kh<<4) | (kl<<0);
//提取2个连续的ascll字符合并为一个16进制数
      //printf("%d %x\n", j, tmpbuf[j]);
      j++; 
//16进制数索引
      i = i + 2;
//ascll字符索引
      }
 if( j ){
          fwrite( &tmpbuf[0], read_char_cnt, 1, fp_temp );
          //把16进制数写入bin文件
 } 
      //break; 
    }
    fclose(fp);
    fclose(fp_temp);
    //清除工作         
}






//文本文件到bin文件 根据匹配条件过滤
int main_w( void )
{  
    int  len;
int tmp_strlen;
    int  c,j,i;
    char line[4096];
    char tmpbuf[1024];
    FILE *fp;
    FILE *fp_temp;
    int ret;
    char *p;
    char kh,kl;
char *parse_file_name;
parse_file_name = parse_file_name_txt;



    fp = fopen(parse_file_name, "r+");
    //以普通的方式打开文件
    if( fp == NULL ){
        printf("%s is not exist.\n", parse_file_name ); 
        return -1;
    }
    memset(line, 0x00, sizeof(line) );
    j = 0x00;  
    fp_temp = fopen("parse_w.bin", "wb+");
    //二进制方式
    if( fp_temp == NULL ){
        printf("test_w.bin is not open success.\n" ); 
        return -1;
    }
    //flush(fp);
    //seek to the beginning of the file
    fseek(fp, 0, SEEK_SET);  
    fseek(fp_temp, 0, SEEK_SET);
    len = 0;
    
    while( 1 ){
 p = fgets( line, sizeof(line), fp );
 //从输入文件读取一行字符串
      if( p == NULL ){
          //check for EOF 
          break;  
      }
      
 if( strncmp( write_match_str, line, strlen(write_match_str) ) == 0x00 ){
          ;
      }else{
          continue;
 }
 
      
      //printf("%s", line ); 
      //printf("strlen = %d.\n", strlen(line) );
      
      //printf("123%02x\n", line[0]);
      //printf("%02x\n", line[1]);
      //printf("%02x\n", line[2]);
      //printf("%02x\n", line[3]);
      //printf("%02x\n", line[4]);
            
      //i = 28;
      j = 0;
 i = write_char_off;
 tmp_strlen = strlen(line);
      while( 1 ){
      if( i >= tmp_strlen ){
         break;
      }
      if( line[i] == '\r' || line[i] == '\n' ){
      //printf("%d %x\n", i, line[i]);
         break;
      }
      if( line[i] == ' ' ){
      i++;
         continue;
      }
     
      //printf("%d %x\n", i, line[i]); 
      kh = line[i];
      kl = line[i+1];
      a2i(kh);
      a2i(kl);
      tmpbuf[j] = (kh<<4) | (kl<<0);
      //printf("%d %x\n", j, tmpbuf[j]);
      j++; 
      i = i + 2;
      }
      if( j ){
          fwrite( &tmpbuf[0], write_char_cnt, 1, fp_temp );
      }
      //break; 
    }
    fclose(fp);
    fclose(fp_temp);
    //清除工作         
}


void dump_line( char *buf )
{
    int i,len;
    if( buf == NULL ){
        return;
    }
    len = strlen( buf );
for( i=0; i<len; i++ ){
         printf("buf[%d] = 0x%02x.\n", i, buf[i] ); 
    }
}




int get_param_num( char *line, int index )
{
    int i;
int tmp_strlen;
unsigned long ul;
char *stopstring;
    tmp_strlen = strlen(line);
    i = index;
while( 1 ){
 if( i >= tmp_strlen ){
       break;
      }                                              
      if( line[i] == '\r' || line[i] == '\n' ){
       break;
      }
      if( line[i] == ' ' ){
       i++;
       continue;
      }
 if( line[i] == '=' ){
       i++;
       continue;
      }


 //printf("%d %x\n", i, line[i]);
 
 ul = strtol( &line[i], &stopstring, 10 );              
      if( !stopstring ){
          printf("*stopstring %x\n", *stopstring);
 printf("stopstring %p\n", stopstring);
 return 0;
      }
 //printf("%ld\n", ul);
 break;   
    }
return ul;
}




char * get_param_str( char *line, int index )
{
    int i,len,i_backup;
int tmp_strlen;
unsigned long ul;
char *stopstring;
char *ret_buff;
    tmp_strlen = strlen(line);
    i = index;
while( 1 ){
 if( i >= tmp_strlen ){
       break;
      }                                              
      if( line[i] == '\r' || line[i] == '\n' ){
       break;
      }
      if( line[i] == ' ' ){
       i++;
       continue;
      }
 if( line[i] == '=' ){
       i++;
       continue;
      }
 if( line[i] == '"' ){
          //printf("here\n"); 
 }
 len = 0x00;
 i++;
 i_backup = i;
 while( 1 ){
        if( line[i] == '"' ){
            break;
}else{
            len++;
i++;
if( len > 128 ){
                break;
}
}     
 }
      ret_buff = malloc(len+1);
 if( ret_buff == NULL ){
          printf("memory over!\n");
 return NULL;
 }
 
 memcpy(ret_buff, &line[i_backup], len );
 ret_buff[len] = '\0';
 //printf( "%d %s\n", len, ret_buff );
 
 //printf("%ld\n", ul);
 break;   
    }
return ret_buff;
}








int main_cfg( char *cfg_file_name )
{  
    int  len;
    int  c,i,j;
    char line[1024];
    FILE *fp;
    FILE *fp_temp;
char *p;
int tmp_strlen;
int get_line_offset;
char kh,kl;
char tmpbuf[12];
unsigned long ul;
char *stopstring;


fp = fopen( cfg_file_name, "r+" );
    //以普通的方式打开文件
    if( fp == NULL ){
        printf("cfg.file is not exist.\n" ); 
        return -1;
    }
memset( line, 0x00, sizeof(line) );           
                                                     
    j = 0x00;
    //seek to the beginning of the file
    fseek(fp, 0, SEEK_SET);  
    len = 0;
while( 1 ){
      p = fgets( line, 100, fp );
 //从输入文件读取一行字符串
      if( p == NULL ){
          //check for EOF 
          break;  
      }
 if( line[0] == ';' ){
   //注释行
          continue; 
 }


 //从配置文件获取相应的配置参数
      if( strncmp( "get_line_offset", line, 15 ) == 0x00 ){
     get_line_offset = get_param_num( &line[0], 15 );
 //printf( "get_line_offset = %d.\n", get_line_offset );
      }else if( strncmp( "read_char_cnt", line, 13 ) == 0x00 ){
          read_char_cnt = get_param_num( &line[0], 13 );   
 printf( "read_char_cnt = 0x%x.\n", read_char_cnt );
 }else if( strncmp( "write_char_cnt", line, 14 ) == 0x00 ){
          write_char_cnt = get_param_num( &line[0], 14 );   
 printf( "write_char_cnt = %d.\n", write_char_cnt );
 }else if( strncmp( "read_char_off", line, 13 ) == 0x00 ){
          read_char_off = get_param_num( &line[0], 13 );   
 printf( "read_char_off = %d.\n", read_char_off );
 }else if( strncmp( "write_char_off", line, 14 ) == 0x00 ){
          write_char_off = get_param_num( &line[0], 14 );   
 printf( "write_char_off = %d.\n", write_char_off );
 }else if( strncmp( "read_cancel_str", line, 15 ) == 0x00 ){
          read_cancel_str = get_param_str( &line[0], 15 );   
 //printf( "read_cancel_str = %s.\n", read_cancel_str );
 }else if( strncmp( "read_match_str", line, 14 ) == 0x00 ){
          read_match_str = get_param_str( &line[0], 14 );   
 printf( "read_match_str = %s.\n", read_match_str );
 }else if( strncmp( "write_match_str", line, 15 ) == 0x00 ){
          write_match_str = get_param_str( &line[0], 15 );   
 printf( "write_match_str = %s.\n", write_match_str );
 }else if( strncmp( "parse_file_name_txt", line, 19 ) == 0x00 ){
          parse_file_name_txt = get_param_str( &line[0], 19 );   
 printf( "parse_file_name_txt = %s.\n", parse_file_name_txt );
 }else if( strncmp( "parse_file_name_bin", line, 19 ) == 0x00 ){
          parse_file_name_bin = get_param_str( &line[0], 19 );   
 printf( "parse_file_name_bin = %s.\n", parse_file_name_bin );
 }


      
      
 
 
} 

}






int main(int argc, char** argv) 
{
    char *cfg_file_name;
int result;
result = 0x00;
//printf( "argc = %d.\n", argc );
    if (argc < 2) {
      usage:
        printf(
            "usage: ./main cfg.txt"
            "\n"
            );
        return 2;
    }


    cfg_file_name = argv[1];
    //printf( "argv[0] = %s.\n", argv[0] );
//printf( "argv[1] = %s.\n", argv[1] );
    
    //main_cfg(cfg_file_name);
    //main_r();
    //main_w();
//main_bin2txt();


main_add_0x();
    
    return result;
}




//2进制文件到ascll数组 0x
int main_bin2txt( void )
{  
    int  len;
    int  c,j;
    char line[4096];
    FILE *fp;
    FILE *fp_temp;
    char *parse_file_name;


parse_file_name = parse_file_name_bin;
    fp = fopen(parse_file_name, "rb+");
    //以二进制的方式打开bin文件
    if( fp == NULL ){
        printf("%s is not exist1.\n", parse_file_name ); 
        return -1;
    }
    memset( line, 0x00, sizeof(line) );                           
                                                   
    j = 0x00;  
    fp_temp = fopen("bin2txt.txt", "w+");
    if( fp_temp == NULL ){
        printf("bin2txt.txt open failed.\n" ); 
        return -1;
    }
    //seek to the beginning of the file
    fseek(fp, 0, SEEK_SET);  
    fseek(fp_temp, 0, SEEK_SET);
    len = 0;
    while(1){
      c = fgetc(fp);
      if( feof(fp) ){
          //check for EOF 
          break;  
      }
      //printf("c = %x.\n", c ); 
      line[0]='0';
      line[1]='x';
      
      j = (c&0xf0) >> 4;
      i2a(j);
      line[2] = j;
      
      j = (c&0x0f) >> 0;
      i2a(j);
      line[3] = j;
      
      line[4]=',';
 //加入,
      line[5]=' ';
      //加入空格
      ++len;
      if( len%16 == 0x00 ){
   //每16字节换行
          line[6] = '\r'; 
          line[7] = '\n'; 
          fwrite( &line[0], 8, 1, fp_temp );
 //每个字符写一次文件
      }else{
          fwrite( &line[0], 6, 1, fp_temp );
 //每个字符写一次文件
      }
    }
    fclose(fp);
    fclose(fp_temp);
    //清除工作         
}