n-inioper.c

工厂环境污染控制数据采集器

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "inioper.h"


char CFG_ssl = '[', CFG_ssr = ']';  /* 项标志符Section Symbol --可根据特殊需要进行定义更改，如 { }等*/
char CFG_nis = ':';                 /*name 与 index 之间的分隔符 */
char CFG_nts = '#';                 /*注释符*/
int  CFG_section_line_no, CFG_key_line_no, CFG_key_lines; 

/*********************************************************************
* 版权所有 (C)2005, 中兴通讯股份有限公司。
*
* 文件名称： INIFileOP.C
* 文件标识： 
* 其它说明： INI文件的操作
* 当前版本： V1.0
* 作    者： 廖月旺
* 完成日期： 
*
* 修改记录1：
*    修改日期：2005年6月23日
*    版 本 号：V1.0
*    修 改 人：廖月旺
*    修改内容：创建
**********************************************************************/

/**********************************************************************
* 函数名称： strtrimr
* 功能描述： 去除字符串右边的空字符
* 访问的表： 无
* 修改的表： 无
* 输入参数： char * buf 字符串指针
* 输出参数： 无
* 返 回 值： 字符串指针
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
char * strtrimr(char * buf)
{
 int len,i;
 char * tmp = NULL;
 len = strlen(buf);
 tmp = (char*)malloc(len);
 
 memset(tmp,0x00,len);
 for(i = 0;i < len;i++)
 {
  if (buf[i] !=' ')
   break;
 }
 if (i < len) {
  strncpy(tmp,(buf+i),(len-i));
 }
 strncpy(buf,tmp,len);
 free(tmp);
 return buf;
}
/**********************************************************************
* 函数名称： strtriml
* 功能描述： 去除字符串左边的空字符
* 访问的表： 无
* 修改的表： 无
* 输入参数： char * buf 字符串指针
* 输出参数： 无
* 返 回 值： 字符串指针
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
char * strtriml(char * buf)
{
 int len,i; 
 char * tmp=NULL;
 len = strlen(buf);
 tmp = (char*)malloc(len);
 memset(tmp,0x00,len);
 for(i = 0;i < len;i++)
 {
  if (buf[len-i-1] !=' ')
   break;
 }
 if (i < len) {
  strncpy(tmp,buf,len-i);
 }
 strncpy(buf,tmp,len);
 free(tmp);
 return buf;
}
/**********************************************************************
* 函数名称： FileGetLine
* 功能描述： 从文件中读取一行
* 访问的表： 无
* 修改的表： 无
* 输入参数： FILE *fp 文件句柄；int maxlen 缓冲区最大长度
* 输出参数： char *buffer 一行字符串
* 返 回 值： 实际读的长度
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  FileGetLine(FILE *fp, char *buffer, int maxlen)
{
 int  i, j; 
 char ch1; 
 
 for(i = 0, j = 0; i < maxlen; j++) 
 { 
  if(fread(&ch1, sizeof(char), 1, fp) != 1) 
  { 
   if(feof(fp) != 0) 
   { 
    if(j == 0) return -1;               /* 文件结束 */ 
    else break; 
   } 
   if(ferror(fp) != 0) return -2;        /* 读文件出错 */ 
   return -2; 
  } 
  else 
  { 
   if(ch1 == '\n' || ch1 == 0x00) break; /* 换行 */ 
   if(ch1 == '\f' || ch1 == 0x1A)        /* '\f':换页符也算有效字符 */ 
   { 
    buffer[i++] = ch1; 
    break; 
   } 
   if(ch1 != '\r') buffer[i++] = ch1;    /* 忽略回车符 */ 
  } 
 } 
 buffer[i] = '\0'; 
 return i; 
} 
/**********************************************************************
* 函数名称： FileCopy
* 功能描述： 文件拷贝
* 访问的表： 无
* 修改的表： 无
* 输入参数： void *source_file　源文件　void *dest_file　目标文件
* 输出参数： 无
* 返 回 值： 0 -- OK,非0－－失败
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  FileCopy(void *source_file, void *dest_file)
{ 
 FILE *fp1, *fp2; 
 char buf[1024+1]; 
 int  ret; 
 
 if((fp1 = fopen((char *)source_file, "r")) == NULL) 
  return COPYF_ERR_OPEN_FILE; 
 ret = COPYF_ERR_CREATE_FILE; 
 
 if((fp2 = fopen((char *)dest_file, "w")) == NULL) goto copy_end; 
 
 while(1) 
 { 
  ret = COPYF_ERR_READ_FILE; 
  memset(buf, 0x00, 1024+1); 
  if(fgets((char *)buf, 1024, fp1) == NULL) 
  { 
   if(strlen(buf) == 0) 
   { 
    if(ferror(fp1) != 0) goto copy_end; 
    break;                                   /* 文件尾 */ 
   } 
  } 
  ret = COPYF_ERR_WRITE_FILE; 
  if(fputs((char *)buf, fp2) == EOF) goto copy_end; 
 } 
 ret = COPYF_OK; 
copy_end: 
 if(fp2 != NULL) fclose(fp2); 
 if(fp1 != NULL) fclose(fp1); 
 return ret; 
}
/**********************************************************************
* 函数名称： SplitSectionToNameIndex
* 功能描述： 分离section为name和index
*            [section]
*              /   \
*            name:index
*            jack  :   12 
*         |     |   | 
*            k1    k2  i 
* 访问的表： 无
* 修改的表： 无
* 输入参数： char *section  
* 输出参数： char **name, char **index
* 返 回 值： 1 --- ok 
*    0 --- blank line 
*   -1 --- no name, ":index" 
*   -2 --- only name, no ':' 
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  SplitSectionToNameIndex(char *section, char **name, char **index)
{ 
 int  i, k1, k2, n; 
 
 if((n = strlen((char *)section)) < 1) return 0; 
 for(i = 0; i < n; i++) 
  if(section[i] != ' ' && section[i] != '\t') break; 
  if(i >= n) return 0; 
  if(section[i] == CFG_nis) return -1; 
  k1 = i; 
  for(i++; i < n; i++) 
   if(section[i] == CFG_nis) break; 
   if(i >= n) return -2; 
   k2 = i; 
   for(i++; i < n; i++) 
    if(section[i] != ' ' && section[i] != '\t') break; 
    section[k2] = '\0'; 
    *name = section + k1; 
    *index = section + i; 
    return 1; 
} 
/**********************************************************************
* 函数名称： JoinNameIndexToSection
* 功能描述： 合成name和indexsection为section
*            jack  :   12 
*            name:index
*              \   /
*            [section]
* 访问的表： 无
* 修改的表： 无
* 输入参数： char *name, char *index
* 输出参数： char **section  
* 返 回 值： 1 --- ok 
*    0 --- blank line 
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  JoinNameIndexToSection(char **section, char *name, char *index)
{ 
 int n1,n2; 
 
 if((n1 = strlen((char *)name)) < 1) return 0; 
 if((n2 = strlen((char *)index)) < 1) return 0;
 
 strcat(*section,name);
 strcat(*section+n1,":");
 strcat(*section+n1+1,index);
 *(*section+n1+1+n2) = '\0';
 return 1; 
} 
/**********************************************************************
* 函数名称： SplitKeyValue
* 功能描述： 分离key和value
*　　　　　　key=val
*   jack   =   liaoyuewang 
*   |      |   | 
*   k1     k2  i 
* 访问的表： 无
* 修改的表： 无
* 输入参数： char *buf  
* 输出参数： char **key;char **val
* 返 回 值： 1 --- ok 
*    0 --- blank line 
*   -1 --- no key, "= val" 
*   -2 --- only key, no '=' 
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  SplitKeyValue(char *buf, char **key, char **val)
{
 int  i, k1, k2, n; 
 
 if((n = strlen((char *)buf)) < 1) return 0; 
 for(i = 0; i < n; i++) 
  if(buf[i] != ' ' && buf[i] != '\t') break; 
  if(i >= n) return 0; 
  if(buf[i] == '=') return -1; 
  k1 = i; 
  for(i++; i < n; i++) 
   if(buf[i] == '=') break; 
   if(i >= n) return -2; 
   k2 = i; 
   for(i++; i < n; i++) 
    if(buf[i] != ' ' && buf[i] != '\t') break; 
    buf[k2] = '\0'; 
    *key = buf + k1; 
    *val = buf + i; 
    return 1; 
} 
/**********************************************************************
* 函数名称： ConfigGetKey
* 功能描述： 获得key的值
* 访问的表： 无
* 修改的表： 无
* 输入参数： void *CFG_file　文件；void *section　项值；void *key　键值
* 输出参数： void *buf　key的值
* 返 回 值： 0 --- ok 非0 --- error 
* 其它说明： 无
* 修改日期        版本号     修改人       修改内容
* -----------------------------------------------
* 2005/6/23        V1.0      廖月旺        创建
* 
***********************************************************************/
int  ConfigGetKey(void *CFG_file, void *section, void *key, void *buf)
{ 
 FILE *fp; 
 char buf1[MAX_CFG_BUF + 1], buf2[MAX_CFG_BUF + 1]; 
 char *key_ptr, *val_ptr; 
 int  line_no, n, ret; 
 
 line_no = 0; 
 CFG_section_line_no = 0; 
 CFG_key_line_no = 0; 
 CFG_key_lines = 0; 
 
 if((fp = fopen((char *)CFG_file, "rb")) == NULL) return CFG_ERR_OPEN_FILE; 
 
 while(1)                                       /* 搜找项section */ 
 { 
  ret = CFG_ERR_READ_FILE; 
  n = FileGetLine(fp, buf1, MAX_CFG_BUF); 
  if(n < -1) goto r_cfg_end; 
  ret = CFG_SECTION_NOT_FOUND; 
  if(n < 0) goto r_cfg_end;                    /* 文件尾，未发现 */ 
  line_no++; 
  n = strlen(strtriml(strtrimr(buf1))); 
  if(n == 0 || buf1[0] == CFG_nts) continue;       /* 空行 或 注释行 */ 
  ret = CFG_ERR_FILE_FORMAT; 
  if(n > 2 && ((buf1[0] == CFG_ssl && buf1[n-1] != CFG_ssr))) 
   goto r_cfg_end; 
  if(buf1[0] == CFG_ssl) 
  { 
   buf1[n-1] = 0x00; 
   if(strcmp(buf1+1, (char*)section) == 0) 
    break;                                   /* 找到项section */ 
  } 
 } 
 CFG_section_line_no = line_no; 
 while(1)                                       /* 搜找key */ 
 { 
  ret = CFG_ERR_READ_FILE; 
  n = FileGetLine(fp, buf1, MAX_CFG_BUF);