Merge "core/frame: Fix ast_frdup() and ast_frisolate() for empty text frames"
[asterisk/asterisk.git] / main / xml.c
index 0f93abc..d60dd90 100644 (file)
  * \author Eliel C. Sardanons (LU1ALY) <eliels@gmail.com>
  */
 
+/*** MODULEINFO
+       <support_level>core</support_level>
+ ***/
+
 #include "asterisk.h"
 #include "asterisk/xml.h"
 #include "asterisk/logger.h"
-
-ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
+#include "asterisk/utils.h"
+#include "asterisk/autoconfig.h"
 
 #if defined(HAVE_LIBXML2)
 #include <libxml/parser.h>
 #include <libxml/tree.h>
 #include <libxml/xinclude.h>
+#include <libxml/xpath.h>
 /* libxml2 ast_xml implementation. */
+#ifdef HAVE_LIBXSLT
+       #include <libxslt/xsltInternals.h>
+       #include <libxslt/transform.h>
+#endif /* HAVE_LIBXSLT */
 
 
 int ast_xml_init(void)
@@ -44,6 +53,9 @@ int ast_xml_init(void)
 int ast_xml_finish(void)
 {
        xmlCleanupParser();
+#ifdef HAVE_LIBXSLT_CLEANUP
+       xsltCleanupGlobals();
+#endif
 
        return 0;
 }
@@ -57,17 +69,95 @@ struct ast_xml_doc *ast_xml_open(char *filename)
        }
 
        doc = xmlReadFile(filename, NULL, XML_PARSE_RECOVER);
-       if (doc) {
-               /* process xinclude elements. */
-               if (xmlXIncludeProcess(doc) < 0) {
+       if (!doc) {
+               return NULL;
+       }
+
+       /* process xinclude elements. */
+       if (xmlXIncludeProcess(doc) < 0) {
+               xmlFreeDoc(doc);
+               return NULL;
+       }
+
+#ifdef HAVE_LIBXSLT
+       {
+               xsltStylesheetPtr xslt = xsltLoadStylesheetPI(doc);
+               if (xslt) {
+                       xmlDocPtr tmpdoc = xsltApplyStylesheet(xslt, doc, NULL);
+                       xsltFreeStylesheet(xslt);
                        xmlFreeDoc(doc);
-                       return NULL;
+                       if (!tmpdoc) {
+                               return NULL;
+                       }
+                       doc = tmpdoc;
                }
        }
+#else /* no HAVE_LIBXSLT */
+       ast_log(LOG_NOTICE, "XSLT support not found. XML documentation may be incomplete.\n");
+#endif /* HAVE_LIBXSLT */
 
+       /* Optimize for XPath */
+       xmlXPathOrderDocElems(doc);
+
+       return (struct ast_xml_doc *) doc;
+}
+
+struct ast_xml_doc *ast_xml_new(void)
+{
+       xmlDoc *doc;
+
+       doc = xmlNewDoc((const xmlChar *) "1.0");
        return (struct ast_xml_doc *) doc;
 }
 
+struct ast_xml_node *ast_xml_new_node(const char *name)
+{
+       xmlNode *node;
+       if (!name) {
+               return NULL;
+       }
+
+       node = xmlNewNode(NULL, (const xmlChar *) name);
+
+       return (struct ast_xml_node *) node;
+}
+
+struct ast_xml_node *ast_xml_new_child(struct ast_xml_node *parent, const char *child_name)
+{
+       xmlNode *child;
+
+       if (!parent || !child_name) {
+               return NULL;
+       }
+
+       child = xmlNewChild((xmlNode *) parent, NULL, (const xmlChar *) child_name, NULL);
+       return (struct ast_xml_node *) child;
+}
+
+struct ast_xml_node *ast_xml_add_child(struct ast_xml_node *parent, struct ast_xml_node *child)
+{
+       if (!parent || !child) {
+               return NULL;
+       }
+       return (struct ast_xml_node *) xmlAddChild((xmlNode *) parent, (xmlNode *) child);
+}
+
+struct ast_xml_node *ast_xml_add_child_list(struct ast_xml_node *parent, struct ast_xml_node *child)
+{
+       if (!parent || !child) {
+               return NULL;
+       }
+       return (struct ast_xml_node *) xmlAddChildList((xmlNode *) parent, (xmlNode *) child);
+}
+
+struct ast_xml_node *ast_xml_copy_node_list(struct ast_xml_node *list)
+{
+       if (!list) {
+               return NULL;
+       }
+       return (struct ast_xml_node *) xmlCopyNodeList((xmlNode *) list);
+}
+
 struct ast_xml_doc *ast_xml_read_memory(char *buffer, size_t size)
 {
        xmlDoc *doc;
@@ -97,6 +187,14 @@ void ast_xml_close(struct ast_xml_doc *doc)
        doc = NULL;
 }
 
+void ast_xml_set_root(struct ast_xml_doc *doc, struct ast_xml_node *node)
+{
+       if (!doc || !node) {
+               return;
+       }
+
+       xmlDocSetRootElement((xmlDoc *) doc, (xmlNode *) node);
+}
 
 struct ast_xml_node *ast_xml_get_root(struct ast_xml_doc *doc)
 {
@@ -152,6 +250,19 @@ const char *ast_xml_get_attribute(struct ast_xml_node *node, const char *attrnam
        return (const char *) attrvalue;
 }
 
+int ast_xml_set_attribute(struct ast_xml_node *node, const char *name, const char *value)
+{
+       if (!name || !value) {
+               return -1;
+       }
+
+       if (!xmlSetProp((xmlNode *) node, (xmlChar *) name, (xmlChar *) value)) {
+               return -1;
+       }
+
+       return 0;
+}
+
 struct ast_xml_node *ast_xml_find_element(struct ast_xml_node *root_node, const char *name, const char *attrname, const char *attrvalue)
 {
        struct ast_xml_node *cur;
@@ -184,6 +295,15 @@ struct ast_xml_node *ast_xml_find_element(struct ast_xml_node *root_node, const
        return NULL;
 }
 
+struct ast_xml_doc *ast_xml_get_doc(struct ast_xml_node *node)
+{
+       if (!node) {
+               return NULL;
+       }
+
+       return (struct ast_xml_doc *) ((xmlNode *)node)->doc;
+}
+
 struct ast_xml_ns *ast_xml_find_namespace(struct ast_xml_doc *doc, struct ast_xml_node *node, const char *ns_name) {
        xmlNsPtr ns = xmlSearchNs((xmlDocPtr) doc, (xmlNodePtr) node, (xmlChar *) ns_name);
        return (struct ast_xml_ns *) ns;
@@ -203,6 +323,20 @@ const char *ast_xml_get_text(struct ast_xml_node *node)
        return (const char *) xmlNodeGetContent((xmlNode *) node);
 }
 
+void ast_xml_set_text(struct ast_xml_node *node, const char *content)
+{
+       if (!node || !content) {
+               return;
+       }
+
+       xmlNodeSetContent((xmlNode *) node, (const xmlChar *) content);
+}
+
+int ast_xml_doc_dump_file(FILE *output, struct ast_xml_doc *doc)
+{
+       return xmlDocDump(output, (xmlDocPtr)doc);
+}
+
 const char *ast_xml_node_get_name(struct ast_xml_node *node)
 {
        return (const char *) ((xmlNode *) node)->name;
@@ -228,5 +362,41 @@ struct ast_xml_node *ast_xml_node_get_parent(struct ast_xml_node *node)
        return (struct ast_xml_node *) ((xmlNode *) node)->parent;
 }
 
-#endif /* defined(HAVE_LIBXML2) */
+struct ast_xml_node *ast_xml_xpath_get_first_result(struct ast_xml_xpath_results *results)
+{
+       return (struct ast_xml_node *) ((xmlXPathObjectPtr) results)->nodesetval->nodeTab[0];
+}
+
+void ast_xml_xpath_results_free(struct ast_xml_xpath_results *results)
+{
+       xmlXPathFreeObject((xmlXPathObjectPtr) results);
+}
+
+int ast_xml_xpath_num_results(struct ast_xml_xpath_results *results)
+{
+       return ((xmlXPathObjectPtr) results)->nodesetval->nodeNr;
+}
+
+struct ast_xml_xpath_results *ast_xml_query(struct ast_xml_doc *doc, const char *xpath_str)
+{
+       xmlXPathContextPtr context;
+       xmlXPathObjectPtr result;
+       if (!(context = xmlXPathNewContext((xmlDoc *) doc))) {
+               ast_log(LOG_ERROR, "Could not create XPath context!\n");
+               return NULL;
+       }
+       result = xmlXPathEvalExpression((xmlChar *) xpath_str, context);
+       xmlXPathFreeContext(context);
+       if (!result) {
+               ast_log(LOG_WARNING, "Error for query: %s\n", xpath_str);
+               return NULL;
+       }
+       if (xmlXPathNodeSetIsEmpty(result->nodesetval)) {
+               xmlXPathFreeObject(result);
+               ast_debug(5, "No results for query: %s\n", xpath_str);
+               return NULL;
+       }
+       return (struct ast_xml_xpath_results *) result;
+}
 
+#endif /* defined(HAVE_LIBXML2) */