2 * Copyright (c) 2009, 2010 Aggelos Economopoulos. All rights reserved.
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in
12 * the documentation and/or other materials provided with the
14 * 3. Neither the name of The DragonFly Project nor the names of its
15 * contributors may be used to endorse or promote products derived
16 * from this software without specific, prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
21 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
22 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
24 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
26 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
27 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
28 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
40 xml_document_create(const char *file)
44 if ((doc = malloc(sizeof(struct xml_document))) == NULL)
47 if ((doc->file = fopen(file, "w")) == NULL) {
51 STAILQ_INIT(&doc->open_elems);
55 fprintf(doc->file, "<?xml version=\"1.0\" encoding=\"UTF-8\" "
56 "standalone=\"no\"?>\n");
57 fprintf(doc->file, "<!-- Created by evtranalyze -->\n");
63 xml_document_close(xml_document_t doc)
72 indent(xml_document_t doc)
76 for (i = 0; i < doc->nr_open; ++i) {
77 fprintf(doc->file, " ");
83 xml_elem_compile(xml_element_t el)
89 if (!(buf = malloc(bufsize))) {
94 ret = snprintf(p, sizeof(buf), "<%s ", el->name);
95 if (ret > sizeof(buf)) {
97 buf = realloc(bufsize);
110 xml_elem_print(xml_document_t doc, xml_element_t el, int closed, int nl)
113 fprintf(doc->file, "<%s", el->name);
114 STAILQ_FOREACH(at, &el->attributes, next) {
115 fprintf(doc->file, " %s=\"%s\"", at->name, at->value);
117 fprintf(doc->file, "%s%s", closed ? "/>" : ">", nl ? "\n" : "");
123 _xml_elem_begin(xml_document_t doc, xml_element_t el, int closed, int nl)
125 STAILQ_INSERT_HEAD(&doc->open_elems, el, link);
128 xml_elem_print(doc, el, closed, nl);
134 _xml_elem_close(xml_document_t doc, xml_element_t el, int do_indent)
136 if (el != STAILQ_FIRST(&doc->open_elems)) {
140 STAILQ_REMOVE_HEAD(&doc->open_elems, link);
144 fprintf(doc->file, "</%s>\n", el->name);
149 xml_elem_close(xml_document_t doc, xml_element_t el)
151 return _xml_elem_close(doc, el, !0);
155 xml_elem_begin(xml_document_t doc, xml_element_t el)
160 return _xml_elem_begin(doc, el, 0, !0);
164 xml_elem_closed(xml_document_t doc, xml_element_t el)
167 _xml_elem_begin(doc, el, 0, 0);
168 fprintf(doc->file, "%s", el->value);
169 _xml_elem_close(doc, el, 0);
173 return xml_elem_print(doc, el, !0, !0);