/*
read/write ini file with c function
@file testini.c
chinayaosir
blog:?? ?http://blog.csdn.net/chinayaosir
connect.ini
[database]
此程序有些BUG
當ini文件不存在時，第一次建立connect.ini文件時，
在[database]前面會多一個空格.
*/
#include? "stdio.h"
#include? "inifile.h"
#define? BUF_SIZE 256


int? main()
{
?? ?const char? * file = "connect.ini"; ?
??? char? severname[BUF_SIZE] = {0};
?? ?int?? port=0;

??? printf( "1. write/read ini file testting .../n" );? ?
?? ?
?? ?printf( "2. write data into ini file.../n" );
?? ?
?? ?if (! write_profile_string("database", "sever" , "192.168.1.2",file))
?? ??? ?
??? {?? ?printf( "2.1 server write %s file fail/n",file );??? }
???? else
??? {
??????? printf( "2.1 server write %s file ok/n",file );
??? }
?? ?if (! write_profile_string("database", "port" , "5000",file))
??? {?? ?printf( "2.2 port write %s file fail/n",file );??? }
???? else
??? {
??????? printf( "2.2 port write %s file ok/n",file );
??? }

?? ?printf( "3. read data from ini file.../n" );

?? ?if ( ! read_profile_string("database", "sever", severname,BUF_SIZE,file))
?? ??? ?{?? printf( "3.1 sever read? %s file fail/n",file );??? }
??? else
?? ??? ?{?? ?printf( "3.1 sever = %s/n" ,severname);}

?? ?if ( ! read_profile_int("database", "port", port,file))
?? ??? ?{?? printf( "3.2 port read %s file fail/n",file );? }
??? else
?? ?{?? ?port=read_profile_int("database", "port", port,file);?? ?
??????? printf( "3.2 port = %d/n" ,port);
??? }?? ?

???? return?? 0 ;

}

/*
run value:
1. write/read ini file testting ...
2. write data into ini file...
2.1 server write connect.ini file ok
2.2 port write connect.ini file ok
3. read data from ini file...
3.1 sever = 192.168.1.2
3.2 port = 5000
*/

/
/* *
*@file??????? inifile.h
*@cpright???? (C)2007 GEC
*@auther????? dengyangjun
*@email?????? dyj057@gmail.com
*@version???? 0.1
*@create????? 2007-1-14
*@modify????? 2007-1-14
*@brief?????? declare ini file operation
*@note
*@history???
*/

#ifndef INI_FILE_H_
#define? INI_FILE_H_

#ifdef __cplusplus
extern?? " C "
{
#endif

int? read_profile_string(const char * section,const char * key,char * value,int? size,const char * file);
int? read_profile_int( const?? char * section,const char * key, int default_value,const char * file);
int? write_profile_string(const char?? * section,const char * key,const? char * value,? const char * file);

#ifdef __cplusplus
};? // end of extern "C" {
#endif

#endif?? // end of INI_FILE_H_

//
/* *
*@file????????? inifile.c
*@cpright?????? (C)2007 GEC
*@auther??????? dengyangjun
*@email???????? dyj057@gmail.com
*@version?????? 0.1
*@create??????? 2007-1-14
*@modify??????? 2007-1-14
*@brief???????? implement ini file operation
*@note
*@history???
*/
#include? <stdio.h>
#include? <stdlib.h>
#include? <assert.h>
#include? <string.h>
#include? <ctype.h>

#include? "inifile.h"

#ifdef __cplusplus
extern?? " C "
{
#endif

#define? MAX_FILE_SIZE 8096

#define? LEFT_BRACE '['
#define? RIGHT_BRACE ']'

static int load_ini_file(const? char * file,? char * buf, int * file_size)
{
??? int? i = 0 ;
??? FILE? * in = NULL;
??? *file_size = 0 ;
??? assert(file? != NULL);
??? assert(buf? != NULL);

??? in?? =? fopen(file, "r" );
??? if ( NULL? == in ) {
???????? return?? 0 ;
??? }

???? // load initialization file
???? while ((buf[i] = fgetc(in)) != EOF) {
??????? i ++ ;
??????? assert( i < MAX_FILE_SIZE);? // file too big
??? }
???
??? buf[i] = '/0' ;
??? *file_size? =? i;

??? fclose(in);
??? return?? 1 ;
}

/*
*<summary></summary>
* <returns>Result of the addtion(int)</returns>
* <param name="x"></param>
* <param name="y"></param>
*/

static? int isnewline( char? c)
{
???? return? ( '/n'?? ==? c? ||??? '/r'?? ==? c ) ?? 1? :? 0 ;
}
static?? int? isend( char? c)
{
???? return?? '/0' == c ?? 1? :? 0 ;
}
static?? int? isleftbarce( char? c)
{
???? return? LEFT_BRACE? ==? c ??? 1? :? 0 ;
}
static?? int? isrightbrace( char? c )
{
???? return? RIGHT_BRACE? ==? c ??? 1? :? 0 ;
}

static? int? parse_file(const?? char?? * section,?
??? ??? ??? ??? ??? ??? const?? char?? * key,?
??? ??? ??? ??? ??? ??? const?? char?? * buf,
??? ??? ??? ??? ??? ??? int?? * sec_s,
??? ??? ??? ??? ??? ??? int?? * sec_e,
??? ??? ??? ??? ??? ??? int?? * key_s,
??? ??? ??? ??? ??? ??? int?? * key_e,?
??? ??? ??? ??? ??? ??? int?? * value_s,?
??? ??? ??? ??? ??? ??? int?? * value_e)
{
???? const?? char?? * p? =? buf;
???? int? i = 0 ;

??? assert(buf != NULL);
??? assert(section? !=? NULL? &&? strlen(section));
??? assert(key? !=? NULL? &&? strlen(key));

???? * sec_e? =?? * sec_s? =?? * key_e? =?? * key_s? =?? * value_s? =?? * value_e? =?? - 1 ;

???? while (? ! isend(p[i]) )
??? {
???????? // find the section
???????? if ( (? 0 == i? ||?? isnewline(p[i - 1 ]) )? &&? isleftbarce(p[i]) )
??????? {
???????????? int? section_start = i + 1 ;

???????????? // find the ']'
???????????? do
??????????? {
??????????????? i ++ ;
??????????? } while (? ! isrightbrace(p[i])? &&?? ! isend(p[i]));

???????????? if (? 0?? ==? strncmp(p + section_start,section, i - section_start))
??????????? {
???????????????? int? newline_start = 0 ;

??????????????? i ++ ;

???????????????? // Skip over space char after ']'
???????????????? while (isspace(p[i]))
??????????????? {
??????????????????? i ++ ;
??????????????? }

???????????????? // find the section
???????????????? * sec_s? =? section_start;
???????????????? * sec_e? =? i;

???????????????? while (? !? (isnewline(p[i - 1 ])? &&? isleftbarce(p[i]))? &&?? ! isend(p[i]) )
??????????????? {
???????????????????? int? j = 0 ;
???????????????????? // get a new line
??????????????????? newline_start? =? i;

???????????????????? while (? ! isnewline(p[i])? &&??? ! isend(p[i]) )
??????????????????? {
??????????????????????? i ++ ;
??????????????????? }
???????????????????? // now i? is equal to end of the line

??????????????????? j = newline_start;

???????????????????? if ( ';'?? !=? p[j])? // skip over comment
??????????????????? {
???????????????????????? while (j? <? i? &&? p[j] != '=' )
??????????????????????? {
??????????????????????????? j ++ ;
???????????????????????????? if ( '='?? ==? p[j])
??????????????????????????? {
???????????????????????????????? if (strncmp(key,p + newline_start,j - newline_start) == 0 )
??????????????????????????????? {
???????????????????????????????????? // find the key ok
???????????????????????????????????? * key_s? =? newline_start;
???????????????????????????????????? * key_e? =? j - 1 ;

???????????????????????????????????? * value_s? =? j + 1 ;
???????????????????????????????????? * value_e? =? i;

???????????????????????????????????? return?? 1 ;
??????????????????????????????? }
??????????????????????????? }
??????????????????????? }
??????????????????? }

??????????????????? i ++ ;
??????????????? }
??????????? }
??????? }
???????? else
??????? {
??????????? i ++ ;
??????? }
??? }
???? return?? 0 ;
}

/* *
* @brief read_profile_string <d>retrieves a string from the specified section in an initialization file.
* @param section? <t>const char * <in> <d>name of the section containing the key name.
* @param key? <t>const char *? <in><d>the name of the key whose associated string is to be retrieved.
* @param value <t>char * <out><d>pointer to the buffer that receives the retrieved string.?????
* @return <t>int? <n>1 : read success; 0 : read fail.
*/??????
int? read_profile_string(
??? ??? ??? ??? ??? ??? ?const?? char?? * section,?
??? ??? ??? ??? ??? ??? ?const?? char?? * key,
??? ??? ??? ??? ??? ??? ?char?? * value,??
??? ??? ??? ??? ??? ??? ?int? size,?
??? ??? ??? ??? ??? ??? ?const?? char?? * file)
{
???? char? buf[MAX_FILE_SIZE] = { 0 };
???? int? file_size;
???? int? sec_s,sec_e,key_s,key_e, value_s, value_e;

???? // check parameters
??? assert(section? !=? NULL? &&? strlen(section));
??? assert(key? !=? NULL? &&? strlen(key));
??? assert(value? !=? NULL);
??? assert(size? >?? 0 );
??? assert(file? != NULL? && strlen(key));

???? if (? ! load_ini_file(file,buf, & file_size))
???????? return?? 0 ;

???? if ( ! parse_file(section,key,buf, & sec_s, & sec_e, & key_s, & key_e, & value_s, & value_e))
??? {
???????? return?? 0 ;? // not find the key
??? }
???? else
??? {
???????? int? cpcount? =? value_e? - value_s;

???????? if ( size - 1?? <? cpcount)
??????? {
??????????? cpcount? =?? size - 1 ;
??????? }
???
??????? memset(value,? 0 , size);
??????? memcpy(value,buf + value_s, cpcount );
??????? value[cpcount]? =?? '/0' ;

???????? return?? 1 ;
??? }
}


int? read_profile_int(const? char *section,
??? ??? ??? ??? ??? ? const? char? *key,
??? ??? ??? ??? ??? ? int default_value,?
??? ??? ??? ??? ??? ? const char *file)
{
???? char? value[ 32 ]? =? { 0 };
???? if ( ! read_profile_string(section,key,value,? sizeof (value),file))
??? {
???????? return? default_value;
??? }
???? else
??? {
???????? return? atoi(value);
??? }
}

int? write_profile_string(const?? char?? * section,?
??? ??? ??? ??? ??? ??? ? const?? char?? * key,
??? ??? ??? ??? ??? ??? ? const?? char?? * value,?
??? ??? ??? ??? ??? ??? ? const?? char?? * file)
{
???? char? buf[MAX_FILE_SIZE] = { 0 };
???? char? w_buf[MAX_FILE_SIZE] = { 0 };
???? int? sec_s,sec_e,key_s,key_e, value_s, value_e;
???? int? value_len? =? ( int )strlen(value);
???? int? file_size;
??? ?FILE? * out ;

???? // check parameters
??? assert(section? !=? NULL? &&? strlen(section));
??? assert(key? !=? NULL? &&? strlen(key));
??? assert(value? !=? NULL);
??? assert(file? != NULL? && strlen(key));

???? if (!load_ini_file(file,buf, & file_size))
??? {
??????? sec_s? =?? - 1 ;
??? }
???? else
??? {
??????? parse_file(section,key,buf, & sec_s, & sec_e, & key_s, & key_e, & value_s, & value_e);
??? }

???? if (? - 1?? ==? sec_s)
??? {
???????
???????? if ( 0 == file_size)
??????? {
??????????? sprintf(w_buf + file_size, " [%s]/n%s=%s/n" ,section,key,value);
??????? }
???????? else
??????? {
???????????? // not find the section, then add the new section at end of the file
??????????? memcpy(w_buf,buf,file_size);
??????????? sprintf(w_buf + file_size, "/n[%s]/n%s=%s/n" ,section,key,value);
??????? }
???????
???????
??? }
???? else?? if ( - 1?? ==? key_s)
??? {
???????? // not find the key, then add the new key & value at end of the section
??????? memcpy(w_buf,buf,sec_e);
??????? sprintf(w_buf + sec_e, "%s=%s/n" ,key,value);
??????? sprintf(w_buf + sec_e + strlen(key) + strlen(value) + 2 ,buf + sec_e, file_size? -? sec_e);
??? }
???? else
??? {
???????? // update value with new value
??????? memcpy(w_buf,buf,value_s);
??????? memcpy(w_buf + value_s,value, value_len);
??????? memcpy(w_buf + value_s + value_len, buf + value_e, file_size? -? value_e);
??? }
???
???? out?? =? fopen(file, "w" );
???? if (NULL? ==?? out )
??? {
???????? return?? 0 ;
??? }
???
???? if ( - 1?? ==? fputs(w_buf, out ) )
??? {
??????? fclose( out );
???????? return?? 0 ;
??? }

??? fclose( out );
???
???? return?? 1 ;
}


#ifdef __cplusplus
};? // end of extern "C" {
#endif