xmllib2库函数-xmlHasProp函数

编译命令

cc -I /home/eas/src/libxml/libxml2-2.6.30/include/ -I /home/eas/src/libiconv/libiconv-1.13.1/include/ -L/home/eas/src/libxml/libxml2-2.6.30/.libs -L/home/eas/src/libiconv/libiconv-1.13.1/lib/.libs/ -lxml2 -liconv -lz -lpthread -lm -o xmHasProp xmHasProp.c

#include    <stdio.h>
#include    <stdlib.h>
#include    <string.h>
#include    <math.h>
#include    <ctype.h>
#include    <sys/stat.h>
#include    <unistd.h>
#include    <stdbool.h>

#include    <libxml/parser.h>                /* LIBXML2 Header File */
#include    <libxml/tree.h>                    /* LIBXML2 Header File */
#include     <libxml/xmlmemory.h>            /* LIBXML2 Header File */
#include    <libxml/xpath.h>                /* LIBXML2 Header File */
#include    <iconv.h>                        /* LIBXML2 Header File */

#define FMLFLD_NOTARRAY 0 /* 非数组（用于下标参数） */
#define FMLFLD_OPTIONAL 0 /* 可选域 */
#define FMLFLD_REQUIRED 1 /* 必需域 */
#define    SYM_FML_FS    0x40    /* 域分隔符0x1E*/
#define    SYM_FML_NV    ':'     /* 名值分隔符*/
#define    SYM_FML_AN    '#'     /* 数组下标起始符*/
#define RC_SUCC 0
#define RC_NFND -1
#define RC_NSPC -2

#define SZ_DATA_BUS (32*1024)            /* 数据总线宽度 */
typedef char    T_DATABUS[SZ_DATA_BUS];    /* 数据总线 */

void FmlDataClear(char *    cFmlData);
char *FmlFieldSeek(const char *cFmlData, const char *cFieldName,int    iIndex);
int    FmlFieldPut(char *cFmlData,int iBufSize,char *cFieldName,int iIndex,char *cFieldValue);
int FmlFieldGet(const char *cFmlData,const char *cFieldName,int    iIndex,    char *cFieldValue,int iValueSize);
int    FmlFieldNum(const char *cFmlData, const char *cFieldName, int *iNum);

int CodeConvert(char* from_charset, char* to_charset, char* inbuf,size_t inlen, char* outbuf, size_t outlen);
char* u2g(char *inbuf);
char* g2u(char *inbuf);
char * StrTrim(char * pstr);
int JugeFileExist(char *lFileName);

int main(int argc, char **argv)
{
    bool bflag = true;
    int i=0;
    char *nodeName = NULL;
    char *nodeValue = NULL;
    char *eleName;
    char *eleValue;
    xmlChar* szAttr;
    xmlAttrPtr attrPtr;

    /* 定义解析文档指针 */
    xmlDocPtr doc;
    /* 定义结点指针 */
    xmlNodePtr curNode;


    FILE *    fp = NULL;
    int        iRet = -1;
    char    filename[1024];
    char    sParsefile[1024];
    char    sXmlBuf[1024*1000*8];    /*从报文文件中读取的内容*/
    char    sChildBuf[10240];        /*存放一次读取的文件内容*/
    int        iXmlByteNum = 0;

    if(argc < 2)
    {
        printf("参数个数不对，应为2个！\n");
        return -1;
    }

    T_DATABUS tDataBus;
    FmlDataClear(tDataBus);

    memset(filename, 0x00, sizeof(filename));
    memset(sParsefile, 0x00, sizeof(sParsefile));
    memset(sXmlBuf, 0x00, sizeof(sXmlBuf));
    memset(sChildBuf, 0x00, sizeof(sChildBuf));

    strcpy(filename, argv[1]);
    StrTrim(filename);
    sprintf(sParsefile, "%s%s%s", getenv("HOME"), "/src/xml_fun/", filename);
    StrTrim(sParsefile);

    printf("***************************************************\n");
    if((fp = fopen(sParsefile, "r")) == NULL)
    {
        printf("打开dmz文件[%s]失败\n", sParsefile);
        return -1;
    }
    while(NULL != fgets(sChildBuf, sizeof(sChildBuf), fp))
    {
        strcat(sXmlBuf, sChildBuf);
        memset(sChildBuf, 0, sizeof(sChildBuf));
    }
    iXmlByteNum = strlen(sXmlBuf);
    printf("读取文件[%s]，文件长度=[%d]\n", sParsefile, iXmlByteNum);
    printf("文件数据如下:\n[%s]", sXmlBuf);

    printf("***************************************************\n");

    /* 解析文件 */
    doc = xmlParseFile(sParsefile);
    if (NULL == doc)
    {
        printf("未指定文件名\n");
        return -1;
    }

    /*
    xmlParseFile函数等同于下面的函数
    doc = xmlReadFile(pFilename,"GBK",XML_PARSE_NOBLANKS);
    if (NULL == doc)
    {
        printf("未指定文件名\n");
        return -1;
    }
    */

    /* 确定文档根元素 */

    curNode = xmlDocGetRootElement(doc);
    if (NULL == curNode)
    {
        xmlFreeDoc(doc);
        return -1;
    }

    /* xmlHasProp获取节点中某个属性的指针 */
    attrPtr = xmlHasProp(curNode,BAD_CAST "req_time");
    if(attrPtr != NULL)
    {
        //szAttr = xmlGetProp(curNode,attrPtr->name);
        szAttr = xmlGetProp(curNode,"from");
        //eleName = u2g((char*)attrPtr->name);
        eleName = u2g("from");
        eleValue = u2g((char*)szAttr);
        if(eleValue != NULL)
            FmlFieldPut(tDataBus, SZ_DATA_BUS, eleName, 0, eleValue);
        else
            FmlFieldPut(tDataBus, SZ_DATA_BUS, eleName, 0, "");
        xmlFree(szAttr);
        if( eleName != NULL )
        {
            free(eleName);
            eleName = NULL;
        }
        if( eleValue != NULL )
        {
            free(eleValue);
            eleValue = NULL;
        }
    }
    else
    {
        printf("1111111111111111111\n");
    }
    printf("总线tDataBus=\n[%s]\n", tDataBus);

    attrPtr = attrPtr->prev;
    if(attrPtr != NULL)
    {
        szAttr = xmlGetProp(curNode,attrPtr->name);
        eleName = u2g((char*)attrPtr->name);
        eleValue = u2g((char*)szAttr);
        if(eleValue != NULL)
            FmlFieldPut(tDataBus, SZ_DATA_BUS, eleName, 0, eleValue);
        else
            FmlFieldPut(tDataBus, SZ_DATA_BUS, eleName, 0, "");
        xmlFree(szAttr);
        if( eleName != NULL )
        {
            free(eleName);
            eleName = NULL;
        }
        if( eleValue != NULL )
        {
            free(eleValue);
            eleValue = NULL;
        }
    }
    else
    {
        printf("22222222222222222222\n");
    }

    if(bflag)
    {
        printf("55555555555\n");
    }
    else
    {
        printf("66666666666\n");
    }
    printf("总线tDataBus=\n[%s]\n", tDataBus);

    printf("***************************************************\n");

    return 0;
}

int CodeConvert(char* from_charset, char* to_charset, char* inbuf,size_t inlen, char* outbuf, size_t outlen)
{
    iconv_t cd;
    char** pin = &inbuf;
    char** pout = &outbuf;
    cd = iconv_open(to_charset,from_charset);
    if(cd == (iconv_t)-1)
        return -1;
    memset(outbuf,0,outlen);
    if(iconv(cd,(char**)pin,(size_t *)&inlen,(char**)pout,(size_t*)&outlen) == -1)
        return -1;
    iconv_close(cd);
    return 0;
}

/*************************************************************
 * 函 数 名：u2g()
 * 功能描述: UTF-8码转成GBK码
 * 输入参数：inbuf    - 转入字符
 * 输出参数：
 * 返    回：szOut - 成功; NULL - 失败
 * 说    明：成功则返回一个动态分配的char*变量，需要在使用
 *              完毕后手动free，失败返回NULL，使用有风险，调用需谨慎
 ************************************************************/
char* u2g(char *inbuf)
{
    size_t nOutLen = 0;
    char* szOut = NULL;
    if(!strlen(inbuf))
        return NULL;
    nOutLen = 2 * strlen(inbuf) - 1;
    szOut = (char*)malloc(nOutLen);
    if (-1 == CodeConvert("UTF-8","GBK",inbuf,strlen(inbuf),szOut,nOutLen))
    {
        free(szOut);
        szOut = NULL;
    }
    return szOut;
}

/*************************************************************
 * 函 数 名：g2u()
 * 功能描述: GBK码转成UTF-8码
 * 输入参数：inbuf    - 转入字符
 * 输出参数：
 * 返    回：szOut - 成功; NULL - 失败
 * 说    明：成功则返回一个动态分配的char*变量，需要在使用
 *              完毕后手动free，失败返回NULL，使用有风险，调用需谨慎
 ************************************************************/
char* g2u(char *inbuf)
{
    size_t nOutLen = 0;
    char* szOut = NULL;
    if(!strlen(inbuf))
        return NULL;
    nOutLen = 2 * strlen(inbuf) - 1;
    szOut = (char*)malloc(nOutLen);
    if (-1 == CodeConvert("GBK","UTF-8",inbuf,strlen(inbuf),szOut,nOutLen))
    {
        free(szOut);
        szOut = NULL;
    }
    return szOut;
}

/*FmlDataClear 函数功能：清空数据总线函数*/
void FmlDataClear(char *    cFmlData)
{
    cFmlData[0] = 0;
}

/*FmlFieldErase函数：擦除总线数据中的指定域，没有这个域就不擦除*/
void    FmlFieldErase(char *cFmlData, const char *cFieldName,int iIndex)
{
    char    *p, *q;
    if ( ( p = FmlFieldSeek( cFmlData, cFieldName, iIndex ) ) == NULL )
        return; /*p指向指定的域名的起始地址*/
    if ( ( q = strchr( p, SYM_FML_FS ) ) == NULL ) /*SYM_FML_FS:域分割符^^*/
        q = p + strlen( p );
    else
        q ++; /*q指向域尾*/
    strcpy( p, q ); /*p到q之间的被跳过*/
}

/*FmlFieldSeek函数功能：检索总线中指定域函数，返回指定域的起始地址*/
char *FmlFieldSeek(const char *cFmlData, const char *cFieldName,int    iIndex)
{
    char    *p = (char *) cFmlData;
    char    *n, *q, *v;
    int    r;

    while ( ( n = strchr( p, SYM_FML_FS ) ) != NULL )/*SYM_FML_FS:域分割符^^*/
    {
        *n = 0; /*n指向下一个域分割符^^，并截断*/
        q = strchr( p, SYM_FML_NV ); /*SYM_FML_NV:名值分割符：*/
        *n = SYM_FML_FS; /*恢复域分割符，重新连上总线*/
        if ( q != NULL )
        {
            *q = 0; /*q指向名值分割符：，并截断*/
            if ( ( v = strchr( p, SYM_FML_AN ) ) != NULL ) /*0下标时，v=NULL*/
                *v = 0; /*v指向数组下标起始符#，并截断*/
            if ( ( r = strcmp( p, cFieldName ) ) == 0 ) /*比较p指向的是不是待检索的域名*/
            {
                if ( v == NULL && iIndex != FMLFLD_NOTARRAY || v != NULL && atoi( v + 1 ) != iIndex )
                    r = -1; /*对下标值的检查，出错时r=-1*/
            }
            if ( v != NULL )
                *v = SYM_FML_AN; /*重新连上总线*/
            *q = SYM_FML_NV; /*重新连上总线*/
            if ( r == 0 ) /*域名匹配，下标也正确时，查找完毕*/
                return p; /*返回域名起始地址*/
        }
        p = n + 1; /*p指向下一个域名起始地址，继续循环查找*/
    }
    return NULL;
}

/*FmlFieldPut() 功能描述: 为总线中指定域赋值函数*/
int    FmlFieldPut(char *cFmlData,int iBufSize,char *cFieldName,int iIndex,char *cFieldValue)
{
    int    s, l;
    char    a[12];

    FmlFieldErase( cFmlData, cFieldName, iIndex ); /*擦除指定域名域值*/

    if ( iIndex == FMLFLD_NOTARRAY ) /*FMLFLD_NOTARRAY=0,判断是否是0下标*/
        s = 0; /*0下标时，没有数组下标起始符#，也没有小标值0的显示*/
    else
        s = snprintf( a, sizeof( a ), "%d", iIndex ) + 1; /*下标的长度+#号码长度*/
    if ( ( l = strlen( cFmlData ) ) + strlen( cFieldName ) + s + strlen( cFieldValue ) + 2 > iBufSize )
        return RC_NSPC; /*判断是否溢出，其中2=域分隔符+'\0'*/
    if ( l > 0 && cFmlData[l-1] != SYM_FML_FS ) /*SYM_FML_FS域分割符^^，原串没有域分割符时*/
    {
        cFmlData[l] = SYM_FML_FS; /*原串尾加上域分隔符*/
        l ++; /*原串长+1*/
    }

    if ( s != 0 ) /*非0下标时*/
        /*a中保存的是下标值*/
        sprintf( cFmlData + l, "%s%c%s%c%s%c", cFieldName, SYM_FML_AN, a, SYM_FML_NV, cFieldValue, SYM_FML_FS );
    else /*0下标时*/
        sprintf( cFmlData + l, "%s%c%s%c", cFieldName, SYM_FML_NV,
        cFieldValue, SYM_FML_FS );

    return RC_SUCC;
}

/*FmlFieldGet() 功能描述: 从总线中取指定域值函数*/
int FmlFieldGet(const char *cFmlData,const char *cFieldName,int    iIndex,    char *cFieldValue,int iValueSize)
{
    char    *p, *q, *v;
    int    l;

    if ( ( p = FmlFieldSeek( cFmlData, cFieldName, iIndex ) ) == NULL )
        return RC_NFND; /*p指向指定域名的起始地址*/
    q = strchr( p, SYM_FML_NV ) + 1; /*SYM_FML_NV名值分隔符：,q指向域值的起始地址*/
    if ( ( v = strchr( q, SYM_FML_FS ) ) == NULL ) /*SYM_FML_FS域分隔符^^,v指向域值的尾部地址*/
        l = strlen( q ); /*没有串尾符^^的长度*/
    else
        l = v - q; /*l=域值的长度*/
    if ( l >= iValueSize ) /*要放域值的空间不能小于域值的长度*/
        return RC_NSPC;
    memcpy( cFieldValue, q, l );
    cFieldValue[l] = 0; /*域值的地址加字符串的结束符*/
    return RC_SUCC;
}

/*FmlFieldNum() 功能描述: 统计总线中重复域的个数函数*/
int    FmlFieldNum(const char *cFmlData, const char *cFieldName, int *iNum)
{
    char    *p = (char *) cFmlData;
    char    *n, *q, *v;
    int    r;
    int    num,flag;

    num=0;
    flag=0;

    while ( ( n = strchr( p, SYM_FML_FS ) ) != NULL )
    {
        *n = 0;
        q = strchr( p, SYM_FML_NV );
        *n = SYM_FML_FS;
        if ( q != NULL )
        {
            *q = 0;
            if ( ( v = strchr( p, SYM_FML_AN ) ) != NULL )
                *v = 0;
            else
            {
                *iNum=0;
                if( v != NULL)
                    *v=SYM_FML_AN;
                *q=SYM_FML_NV;
                p = n + 1;
                continue;
            }
            if ( ( r = strcmp( p, cFieldName ) ) == 0 )
            {
                num++;
                flag=1;
            }
                *v=SYM_FML_AN;
                *q=SYM_FML_NV;
        }
        p = n + 1;
    }
    *iNum=num;
    if(flag == 1)
        return RC_SUCC;
    else
        return RC_NFND;
}

char * StrTrim(char * pstr)
{
    if(NULL == pstr)
    {
        return NULL;
    }
    char * phead = pstr;
    char * ptail = pstr + strlen(pstr) - 1;
    while((*phead == ' ')&&(phead < ptail)) phead++;
    while((*ptail == ' ')&&(ptail > phead)) ptail--;
    *(ptail + 1) = '\0';
    memcpy(pstr, phead, sizeof(char)*(ptail - phead + 2));
    return pstr;
}

/***********************************************************
 * 函    数: JugeFileExist()
 * 功能描述: 判断文件是否存在
 * 输入参数：lFilename    -    长文件名
 * 返    回：0-文件存在;1-文件不存在
 * 流程描述：
 *    说    明：
 * 修改记录:
 * [修改人] [日期] – [描述]
***********************************************************/
int JugeFileExist(char *lFileName)
{
    struct stat statbuf;
    memset(&statbuf,0,sizeof(statbuf));
    stat(lFileName,&statbuf);
    if(statbuf.st_mode & S_IFREG)
        return 0;
    else
        return 1;
}