From a64464beda90fdb69b422370ddf0eafe6fd61e0a Mon Sep 17 00:00:00 2001
From: Olof hagsand <olof@hagsand.se>
Date: Mon, 15 Nov 2021 13:11:56 +0100
Subject: [PATCH] -* xml_dump debug function

---
 lib/clixon/clixon_xml_io.h |  1 +
 lib/src/clixon_xml_io.c    | 43 ++++++++++++++++++++++++++++++++++++++
 2 files changed, 44 insertions(+)

diff --git a/lib/clixon/clixon_xml_io.h b/lib/clixon/clixon_xml_io.h
index 4863ea68..83ead228 100644
--- a/lib/clixon/clixon_xml_io.h
+++ b/lib/clixon/clixon_xml_io.h
@@ -46,6 +46,7 @@
 int clicon_xml2file_cb(FILE *f, cxobj *x, int level, int prettyprint, clicon_output_cb *fn);
 int clicon_xml2file(FILE *f, cxobj *x, int level, int prettyprint);
 int xml_print(FILE *f, cxobj *xn);
+int xml_dump(FILE  *f, cxobj *x);
 int clicon_xml2cbuf(cbuf *cb, cxobj *x, int level, int prettyprint, int32_t depth);
 char *clicon_xml2str(cxobj *x);
 int xmltree2cbuf(cbuf *cb, cxobj *x, int level);
diff --git a/lib/src/clixon_xml_io.c b/lib/src/clixon_xml_io.c
index d51bdc60..e79e1060 100644
--- a/lib/src/clixon_xml_io.c
+++ b/lib/src/clixon_xml_io.c
@@ -245,6 +245,49 @@ xml_print(FILE  *f,
     return xml2file_recurse(f, x, 0, 1, fprintf);
 }
 
+static int
+xml_dump1(FILE  *f, 
+	  cxobj *x,
+	  int    indent)
+{
+    cxobj *xc;
+    
+    if (xml_type(x) != CX_ELMNT)
+	return 0;
+    fprintf(stderr, "%*s %s(%s)",
+	    indent*3, "",
+	    //	    x,
+	    xml_name(x),
+	    xml_type2str(xml_type(x)));
+    if (xml_flag(x, XML_FLAG_ADD))
+	fprintf(stderr, " add");
+    if (xml_flag(x, XML_FLAG_DEL))
+	fprintf(stderr, " delete");
+    if (xml_flag(x, XML_FLAG_CHANGE))
+	fprintf(stderr, " change");
+    if (xml_flag(x, XML_FLAG_MARK))
+	fprintf(stderr, " mark");
+    fprintf(stderr, "\n");
+    xc = NULL;
+    while ((xc = xml_child_each(x, xc, -1)) != NULL) {
+	xml_dump1(f, xc, indent+1);
+    }
+    return 0;
+}
+	 
+/*! Dump cxobj structure with pointers and flags for debugging
+ *
+ * @param[in]   f    UNIX output stream
+ * @param[in]   x    Clixon xml tree
+ * @see xml_print
+ */
+int
+xml_dump(FILE  *f, 
+	 cxobj *x)
+{
+    return xml_dump1(f, x, 0);
+}
+
 /*! Print an XML tree structure to a cligen buffer and encode chars "<>&"
  *
  * @param[in,out] cb          Cligen buffer to write to