1 /* Copyright (C) 2006, Index Data ApS
2 * See the file LICENSE for details.
4 * $Id: nfaxml.c,v 1.1 2006-07-04 12:59:56 heikki Exp $
9 * \brief Routines for reading a NFA spec from an XML file
17 #include <libxml/parser.h>
18 #include <libxml/tree.h>
19 #include <libxml/xinclude.h>
23 #include <yaz/yconfig.h>
25 #include <yaz/nfaxml.h>
30 /** \brief Log XML errors in yaz_log
34 static void log_xml_error(int errlevel, char *msg) {
35 xmlErrorPtr e=xmlGetLastError();
36 if (!e) /* no error happened */
40 yaz_log(errlevel,"%s %d/%d: %s:%d: '%s' ",
41 msg, e->domain, e->code, e->file, e->line, e->message);
42 if (e->str1 || e->str2 || e->str3 )
43 yaz_log(errlevel,"extra info: '%s' '%s' '%s' %d %d",
44 e->str1, e->str2, e->str3, e->int1, e->int2 );
47 /** \brief Parse the NFA from a XML document
49 yaz_nfa *yaz_nfa_parse_xml_doc(xmlDocPtr doc){
57 /** \brief Parse the NFA from a file
59 yaz_nfa *yaz_nfa_parse_xml_file(char *filepath) {
61 xmlDocPtr doc = xmlParseFile(filepath);
63 log_xml_error(YLOG_FATAL,
64 "Error in parsing charmap file");
67 nSubst=xmlXIncludeProcess(doc);
69 log_xml_error(YLOG_FATAL,
70 "Error handling XIncludes in charmap file");
73 return yaz_nfa_parse_xml_doc(doc);
78 #endif /* HAVE_XML2 */
84 * indent-tabs-mode: nil
86 * vim: shiftwidth=4 tabstop=8 expandtab