ivrdemo_读取xml

ivrdemo.c

/*

 * Asterisk -- An open source telephony toolkit.
 *
 * Copyright (C) 1999 - 2005, Digium, Inc.
 *
 * Mark Spencer <markster@digium.com>
 *
 * See http://www.asterisk.org for more information about
 * the Asterisk project. Please do not directly contact
 * any of the maintainers of this project for assistance;
 * the project provides a web site, mailing lists and IRC
 * channels for your use.
 *
 * This program is free software, distributed under the terms of
 * the GNU General Public License Version 2. See the LICENSE file
 * at the top of the source tree.
 */


/*! \file
 *
 * \brief IVR Demo application
 *
 * \author Mark Spencer <markster@digium.com>
 * 
 * \ingroup applications
 */


/*** MODULEINFO
<defaultenabled>no</defaultenabled>
 ***/


#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <assert.h>


#include <mxml.h>


#define XML_FILE_PATH "./menu.xml"




//define for menu attr
#define TITLE   "title"
#define FLAGS   "flags"
//define for option attr
#define OPTION   "option"
#define ACTION          "action"




typedef enum {False = 0, True = 1} BOOL;




typedef enum {
AST_ACTION_UPONE,       /*!< adata is unused */
AST_ACTION_EXIT,        /*!< adata is the return value for ast_ivr_menu_run if channel was not hungup */
AST_ACTION_CALLBACK,    /*!< adata is an ast_ivr_callback */
AST_ACTION_PLAYBACK,    /*!< adata is file to play */
AST_ACTION_BACKGROUND,  /*!< adata is file to play */
AST_ACTION_PLAYLIST,    /*!< adata is list of files, separated by ; to play */
AST_ACTION_MENU,        /*!< adata is a pointer to an ast_ivr_menu */
AST_ACTION_REPEAT,      /*!< adata is max # of repeats, cast to a pointer */
AST_ACTION_RESTART,     /*!< adata is like repeat, but resets repeats to 0 */
AST_ACTION_TRANSFER,    /*!< adata is a string with exten\verbatim[@context]\endverbatim */
AST_ACTION_WAITOPTION,  /*!< adata is a timeout, or 0 for defaults */
AST_ACTION_NOOP,        /*!< adata is unused */
AST_ACTION_BACKLIST,    /*!< adata is list of files separated by ; allows interruption */
} ast_ivr_action;  




//define for the last option attr flag 
typedef enum {
STR_ATTR,
SUBMENU_ATTR,
ULONG_ATTR,
FUN_ATTR
} option_last_attr_flag;




struct ast_ivr_option {
        char *option;
        ast_ivr_action action;
        void *adata;
};


typedef struct ast_ivr_option ast_ivr_option_t ;


 struct ast_ivr_menu {
       char *title;            /*!< Title of menu */
       unsigned int flags;     /*!< Flags */                                                          
       struct ast_ivr_option *options; /*!< All options */                                            
};  


typedef struct ast_ivr_menu ast_ivr_menu_t ;


/*************************************************************************************************
* use to parse : <mainmenu falgs=0 options="mainmenu" title="IVR Demo Main Menu">
*                <submenu1 falgs=0 options="submenu1" title="IVR Demo Sub Menu1">
*/
typedef struct ivr_menu_des_s {
const char *title_str ; // title str 
const char *flags_str ;        // flag str 
//const char *options_str ;     // options str   unused 
} ivr_menu_des_t ;




typedef struct _value_string {
        int  value;
        const char   *string;
} value_string;




typedef int (*ivr_demo_func)(const char *chan, void *data);




typedef struct _string_2_fun {
        const char   *string;
ivr_demo_func fun;
} string_2_fun;


typedef struct _string_2_menu {
const char   *string;
ast_ivr_menu_t * menu_ptr;
} string_2_menu;






//static BOOL load_xml_file(const char *filename);
static inline int strlen_zero(const char *s);
static BOOL load_xml_file(const char *filename,const char *menuname,ast_ivr_menu_t *ivr_menu) ;
static BOOL parse_menu_attrs(mxml_node_t *node,ivr_menu_des_t *menu_des);
static BOOL parse_option_attrs(mxml_node_t *node,int num_attrs,ast_ivr_option_t *option);
static ast_ivr_action str_2_action(const char *str);
static int ivr_demo_function(const char *chan, void *data);
static ivr_demo_func string_2_fun_pointer( const char * str);
static ast_ivr_menu_t* string_2_menu_pointer(const char * str);
static BOOL parse_last_option_attr(mxml_node_t *node,ast_ivr_option_t *option);
static ast_ivr_option_t *init_ivr_option(int *argc);
static ast_ivr_option_t *add_ivr_option(ast_ivr_option_t *option_ptr,int *argc,ast_ivr_option_t option);


//this table use to change string to  ast_ivr_action
static const value_string option_vals[] = {
{ AST_ACTION_UPONE,                    "AST_ACTION_UPONE" },
{ AST_ACTION_EXIT,                     "AST_ACTION_EXIT" },
{ AST_ACTION_CALLBACK,                 "AST_ACTION_CALLBACK" },
{ AST_ACTION_PLAYBACK,                 "AST_ACTION_PLAYBACK" },
{ AST_ACTION_BACKGROUND,               "AST_ACTION_BACKGROUND" },
{ AST_ACTION_PLAYLIST,                 "AST_ACTION_PLAYLIST" },
{ AST_ACTION_MENU,                     "AST_ACTION_MENU" },
{ AST_ACTION_REPEAT,                   "AST_ACTION_REPEAT" },
{ AST_ACTION_RESTART,                  "AST_ACTION_RESTART" },
{ AST_ACTION_TRANSFER,                 "AST_ACTION_TRANSFER" },
{ AST_ACTION_WAITOPTION,               "AST_ACTION_WAITOPTION" },
{ AST_ACTION_NOOP,                     "AST_ACTION_NOOP" },
{ AST_ACTION_BACKLIST,                 "AST_ACTION_BACKLIST" }
};




static value_string option_last_attr_vals[] = {
{ STR_ATTR,                     "str" },
{ SUBMENU_ATTR,                         "submenu" },
{ ULONG_ATTR,                     "ulong" },
{ FUN_ATTR,                 "fun" }
};






//the ivr_menu 
static ast_ivr_menu_t ivr_menu ; 
static ast_ivr_menu_t ivr_submenu ;


//this table use to change string to function pointer 
static string_2_fun string_fun_vals[] = {
{ "ivr_demo_func",                     ivr_demo_function }
};


//this table use to change string to menu pointer
static string_2_menu string_menu_vals[] = {
{ "ivr_submenu", &ivr_submenu}
};






static int ivr_demo_function(const char *chan, void *data)
{
fprintf(stderr, "Open the file %s error!\n",(char *)data);
return 1;
}




/*! \brief returns non-zero if the string is not defined, or has zero length */                              
static inline int strlen_zero(const char *s)
{
        return (!s || (*s == '\0'));                                                                         
}




/***********************************************************************************************
filename : the xml file name (including path)
menuname : such as :
<mainmenu flags=0 title="IVR Demo Main Menu">   --------->   the menuname is  mainmenu 
.......
</mainmenu>
<submenu1 flags=0 title="IVR Demo Sub Menu1">   --------->   the menuname is  submenu1
.......
</submenu1>
ivr_menu_ptr: the pointer of the ast_ivr_menu_t 
*/
static BOOL load_xml_file(const char *filename,const char *menuname,ast_ivr_menu_t *ivr_menu_ptr)
{
FILE *fp = NULL;
mxml_node_t *tree;
mxml_node_t *menu;
mxml_node_t *mainmenu;
mxml_node_t *option;

ivr_menu_des_t menu_des ;

int option_num ;
ast_ivr_option_t *ivr_option ;


fp = fopen(filename, "r");
if( fp == NULL )
{
fprintf(stderr, "Open the file %s error!\n",filename);
return False;
}
fprintf(stderr, "##########Here load_xml_file!############\n");
tree = mxmlLoadFile(NULL, fp, MXML_TEXT_CALLBACK);
if( tree != False )
{
    if ((menu = mxmlFindElement(tree, tree, "menu", NULL, NULL,
                                MXML_DESCEND)) == NULL)
{
fprintf(stderr, "Unable to find first <menu> element in XML tree!\n");
return False;
}
if ((mainmenu = mxmlFindElement(menu, menu, menuname, NULL, NULL,
                                MXML_DESCEND)) == NULL)
{
fprintf(stderr, "Unable to find first <%s> element in XML tree!\n",menuname);
return False;
}

if( !parse_menu_attrs(mainmenu,&menu_des) )
{
fprintf(stderr,"Parse menu attrs error !\n");
return False;
}

//fprintf(stderr,"The menu_des.title_str is %s  \n",menu_des.title_str);
//fprintf(stderr,"The menu_des.flags_str is %s  \n",menu_des.flags_str);

ivr_option = init_ivr_option(&option_num);
if( !ivr_option )
{
fprintf(stderr,"init_ivr_option error!\n");
return False;
}


for(option=mxmlFindElement(mainmenu, mainmenu, "option", NULL, NULL,MXML_DESCEND_FIRST);
option;
option=mxmlFindElement(option, mainmenu, "option", NULL, NULL,MXML_NO_DESCEND))
{
ast_ivr_option_t ast_option ;
ast_option.option = NULL ;    //init 
ast_option.action = -1 ;
ast_option.adata = NULL ;
int num_attrs = option->value.element.num_attrs ;
//fprintf(stderr,"The num_attrs is %d\n",num_attrs);
if( !parse_option_attrs(option,num_attrs,&ast_option) )
{
fprintf(stderr,"parse_option_attrs error!\n");
return False ;
}
//option_num += 1 ;
ivr_option = add_ivr_option(ivr_option,&option_num,ast_option);
if( !ivr_option )
{
fprintf(stderr,"add_ivr_option error!\n");
return False;
}


}
ivr_menu_ptr->title = (char *)menu_des.title_str;
ivr_menu_ptr->flags = atoi( menu_des.flags_str );
ivr_menu_ptr->options = ivr_option ;

}



fclose(fp);
return True;
}




/**********************************************************************
such as : 
<mainmenu flags=0 title="IVR Demo Main Menu">   
.......
</mainmenu>
to parse the "flags=0 " and "title="IVR Demo Main Menu""
*/
static BOOL parse_menu_attrs(mxml_node_t *node,ivr_menu_des_t *menu_des)
{
assert( node != NULL );
const char *tmp = NULL ;


tmp = mxmlElementGetAttr(node,TITLE) ;
if( strlen_zero(tmp) )
{
return False;

}
menu_des->title_str = tmp ;
tmp = mxmlElementGetAttr(node,FLAGS) ;
if( strlen_zero(tmp) )
{
return False;
}
menu_des->flags_str = tmp ;
return True;
}


/**************************************************************************************
such as :
<option option="s" action=AST_ACTION_BACKGROUND str="demo-abouttotry"></option>
<option option="s" action=AST_ACTION_WAITOPTION></option>
to parse all the attrs 
*/
static BOOL parse_option_attrs(mxml_node_t *node,int num_attrs,ast_ivr_option_t *option)
{
//fprintf(stderr,"The num_attrs is %d \n",num_attrs);
const char *tmp = NULL;
ast_ivr_action flags ;
tmp = mxmlElementGetAttr(node,OPTION) ;
if( strlen_zero(tmp) )
{
return False;
}
option->option = (char *)tmp ;
tmp = mxmlElementGetAttr(node,ACTION) ;
if( strlen_zero(tmp) )
{
return False;
}
flags = str_2_action(tmp);
//fprintf(stderr,"The flags is %d\n",flags);
if( flags == -1 )
{
return False;
}
option->action = flags;

if( num_attrs == 3 )   //some options have 3 attrs 
{
if( !parse_last_option_attr(node,option) )
{
fprintf(stderr,"parse_last_option_attr error!\n");
return False;
}
}
return True;
}


//parse the last option attr 
static BOOL parse_last_option_attr(mxml_node_t *node,ast_ivr_option_t *option)
{
const char *tmp = NULL;
BOOL found = False ;
int i ;
int num = sizeof(option_last_attr_vals) / sizeof(option_last_attr_vals[0]);
//fprintf(stderr,"The num is %d\n",num);
for(i=0;i<num;i++)
{
tmp = mxmlElementGetAttr(node,option_last_attr_vals[i].string) ;
if( !strlen_zero(tmp) )
{
//fprintf(stderr,"The tmp is %s \n",tmp);
//fprintf(stderr,"The (option_last_attr_flag)i is %d \n",i);
switch((option_last_attr_flag)i)
{

case STR_ATTR:
option->adata = (void *)tmp ;
found = True;
break;
case SUBMENU_ATTR:
{
ast_ivr_menu_t* menu = string_2_menu_pointer(tmp);
if( !menu )
{
found = False ;
}
option->adata = (void *)menu;
found = True;
}
break;
case ULONG_ATTR:
option->adata = (void *)atoi(tmp);
found = True;
break;
case FUN_ATTR:
{
ivr_demo_func fun = string_2_fun_pointer(tmp);
if( !fun )
{
found = False ;
}
option->adata = (void *)fun;
found = True;
}
break;
default:
found = False ;
break;
}
if( found )
{
return True ;
}
}
}
return False;
}


// change string to function pointer 
static ivr_demo_func string_2_fun_pointer( const char * str)
{
int i ;
int num = sizeof(string_fun_vals) / sizeof(string_fun_vals[0]);
//fprintf(stderr,"The num is %d\n",num);
for(i=0;i<num;i++)
{
if( !strcmp(str,string_fun_vals[i].string) )
{
return string_fun_vals[i].fun ;
}
}
return (ivr_demo_func)NULL;
}


//change string to menu pointer
static ast_ivr_menu_t* string_2_menu_pointer(const char * str)
{
int i ;
int num = sizeof(string_menu_vals) / sizeof(string_menu_vals[0]);
//fprintf(stderr,"The num is %d\n",num);
for(i=0;i<num;i++)
{
if( !strcmp(str,string_menu_vals[i].string) )
{
return string_menu_vals[i].menu_ptr ;
}
}
return (ast_ivr_menu_t*)NULL;
}




//change string to  ast_ivr_action
static ast_ivr_action str_2_action(const char *str)
{
int i ;
int action_num = sizeof(option_vals) / sizeof(option_vals[0]);
//fprintf(stderr,"The action_num is %d\n",action_num);
for(i=0;i<action_num;i++)
{
//fprintf(stderr,"The str is %s\n",str);
//fprintf(stderr,"The option_vals[i].string is %s\n",option_vals[i].string);
if( !strcmp(str,option_vals[i].string) )
{
return (ast_ivr_action)i;
}
}
return -1;
}


static ast_ivr_option_t *init_ivr_option(int *argc)
{
ast_ivr_option_t *ivr_option = NULL ;
*argc = 0 ;
ivr_option = calloc(1,sizeof(ast_ivr_option_t));
if( !ivr_option )
{
fprintf(stderr,"No Merrory!\n");
return (ast_ivr_option_t *)NULL ;
}
return ivr_option ;
}


static ast_ivr_option_t *add_ivr_option(ast_ivr_option_t *option_ptr,int *argc,ast_ivr_option_t option)
{
/* 
Grow the array; "*argc" currently contains the number of string
pointers, *not* counting the NULL pointer at the end, so we have
to add 1 in order to get the new size of the array, including the
new pointer and the terminating NULL pointer. 
*/
option_ptr = realloc( option_ptr , ((*argc)+1) * sizeof(ast_ivr_option_t ) );
if( !option_ptr )
{
fprintf(stderr,"No Merrory!\n");
return (ast_ivr_option_t *)NULL ;
}
option_ptr[*argc] = option ;
(*argc)++ ;    //increase the num 
return option_ptr;
}




int main( void )
{
if( load_xml_file(XML_FILE_PATH,"mainmenu",&ivr_menu) )
{
int i ;
//ivr_menu_ptr->title = (char *)menu_des.title_str;
//ivr_menu_ptr->flags = atoi( menu_des.flags_str );
fprintf(stderr,"The ivr_menu.title is %s\n",ivr_menu.title);
fprintf(stderr,"The ivr_menu.flags is %d\n",ivr_menu.flags);

for(i=0;i<10;i++)
{
//fprintf(stderr,"The ivr_menu.options[%d]  is %s\n",i,ivr_menu.options[i]);
fprintf(stderr,"The ivr_menu.options[%d] :\n",i);
fprintf(stderr,"\tThe  option %s \n",(char *)ivr_menu.options[i].option);
fprintf(stderr,"\tThe  action %d \n",(ast_ivr_action)ivr_menu.options[i].action);
//fprintf(stderr,"\tThe  adata %s \n",(char *)ivr_menu.options[i].adata);
}

}

if( load_xml_file(XML_FILE_PATH,"submenu1",&ivr_submenu) )
{
int i ;
//ivr_menu_ptr->title = (char *)menu_des.title_str;
//ivr_menu_ptr->flags = atoi( menu_des.flags_str );
fprintf(stderr,"The ivr_menu.title is %s\n",ivr_submenu.title);
fprintf(stderr,"The ivr_menu.flags is %d\n",ivr_submenu.flags);

for(i=0;i<8;i++)
{
//fprintf(stderr,"The ivr_menu.options[%d]  is %s\n",i,ivr_menu.options[i]);
fprintf(stderr,"The ivr_menu.options[%d] :\n",i);
fprintf(stderr,"\tThe  option %s \n",(char *)ivr_submenu.options[i].option);
fprintf(stderr,"\tThe  action %d \n",(ast_ivr_action)ivr_submenu.options[i].action);
//fprintf(stderr,"\tThe  adata %s \n",(char *)ivr_menu.options[i].adata);
}

}

return 0 ;
}

***********************************************************

Makefile

CC = gcc -Wall -O2
LIBS =-L/usr/local/lib -lmxml -lpthread
INCLUDE = -I /usr/local/include
TARGET = ivrdemo
all:$(TARGET)
ivrdemo: ivrdemo.o
$(CC) -o ivrdemo ivrdemo.o $(LIBS)
.c.o:
$(CC) -c $(INCLUDE) $< $(LIBS)


clean:
@rm *.o
@rm ivrdemo

***********************************************************************'

menu.xml

<?xml version="1.0"?>
<menu>
<mainmenu flags=0 title="IVR Demo Main Menu">
<option option="s" action=AST_ACTION_BACKGROUND str="demo-congrats"></option>
<option option="g" action=AST_ACTION_BACKGROUND str="demo-instruct"></option>
<option option="g" action=AST_ACTION_WAITOPTION></option>
<option option="1" action=AST_ACTION_PLAYBACK str="digits/1"></option>
<option option="1" action=AST_ACTION_RESTART></option>
<option option="2" action=AST_ACTION_MENU submenu="ivr_submenu"></option>
<option option="2" action=AST_ACTION_RESTART></option>
<option option="i" action=AST_ACTION_PLAYBACK str="invalid"></option>
<option option="i" action=AST_ACTION_REPEAT ulong=2></option>
<option option="#" action=AST_ACTION_EXIT></option>
</mainmenu>
<submenu1 flags=0 title="IVR Demo Sub Menu1">
<option option="s" action=AST_ACTION_BACKGROUND str="demo-abouttotry"></option>
<option option="s" action=AST_ACTION_WAITOPTION></option>
<option option="1" action=AST_ACTION_PLAYBACK str="digits/1"></option>
<option option="1" action=AST_ACTION_RESTART></option>
<option option="2" action=AST_ACTION_PLAYLIST str="digits/2;digits/3"></option>
<option option="3" action=AST_ACTION_CALLBACK fun="ivr_demo_func"></option>
<option option="*" action=AST_ACTION_REPEAT></option>
<option option="#" action=AST_ACTION_UPONE></option>
</submenu1>
</menu>