diff options
Diffstat (limited to 'xml.c')
| -rw-r--r-- | xml.c | 235 |
1 files changed, 0 insertions, 235 deletions
@@ -1,235 +0,0 @@ -/* $Id: xml.c,v 1.25 2008/12/10 17:31:58 kristaps Exp $ */ -/* - * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se> - * - * Permission to use, copy, modify, and distribute this software for any - * purpose with or without fee is hereby granted, provided that the - * above copyright notice and this permission notice appear in all - * copies. - * - * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL - * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED - * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE - * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL - * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR - * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER - * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR - * PERFORMANCE OF THIS SOFTWARE. - */ -#include <assert.h> -#include <stdlib.h> -#include <string.h> - -#include "private.h" -#include "ml.h" - - -static int xml_alloc(void **); -static void xml_free(void *); -static ssize_t xml_beginstring(struct ml_args *, - const char *, size_t); -static ssize_t xml_endstring(struct ml_args *, - const char *, size_t); -static int xml_begin(struct ml_args *, const struct tm *, - const char *, const char *, - enum roffmsec, enum roffvol); -static int xml_end(struct ml_args *, const struct tm *, - const char *, const char *, - enum roffmsec, enum roffvol); -static ssize_t xml_printtagname(struct ml_args *, - enum md_ns, int); -static ssize_t xml_printtagargs(struct ml_args *, - const int *, const char **); -static ssize_t xml_endtag(struct ml_args *, enum md_ns, int); -static ssize_t xml_begintag(struct ml_args *, enum md_ns, int, - const int *, const char **); - - -static ssize_t -xml_printtagargs(struct ml_args *p, const int *argc, const char **argv) -{ - int i, c; - size_t res; - - if (NULL == argc || NULL == argv) - return(0); - assert(argc && argv); - - /* LINTED */ - for (res = 0, i = 0; ROFF_ARGMAX != (c = argc[i]); i++) { - if ( ! ml_nputs(p->mbuf, " ", 1, &res)) - return(-1); - - /* FIXME: should puke on some, no? */ - - if ( ! ml_puts(p->mbuf, tokargnames[c], &res)) - return(-1); - if ( ! ml_nputs(p->mbuf, "=\"", 2, &res)) - return(-1); - if (argv[i]) { - if ( ! ml_putstring(p->mbuf, argv[i], &res)) - return(-1); - } else if ( ! ml_nputs(p->mbuf, "true", 4, &res)) - return(-1); - if ( ! ml_nputs(p->mbuf, "\"", 1, &res)) - return(-1); - } - - return((ssize_t)res); -} - - -static ssize_t -xml_printtagname(struct ml_args *p, enum md_ns ns, int tok) -{ - size_t res; - - res = 0; - switch (ns) { - case (MD_NS_BLOCK): - if ( ! ml_nputs(p->mbuf, "block:", 6, &res)) - return(-1); - break; - case (MD_NS_INLINE): - if ( ! ml_nputs(p->mbuf, "inline:", 7, &res)) - return(-1); - break; - case (MD_NS_BODY): - if ( ! ml_nputs(p->mbuf, "body:", 5, &res)) - return(-1); - break; - case (MD_NS_HEAD): - if ( ! ml_nputs(p->mbuf, "head:", 5, &res)) - return(-1); - break; - default: - break; - } - - if ( ! ml_puts(p->mbuf, toknames[tok], &res)) - return(-1); - return((ssize_t)res); -} - - -/* ARGSUSED */ -static int -xml_begin(struct ml_args *p, const struct tm *tm, const char *os, - const char *title, enum roffmsec sec, enum roffvol vol) -{ - - if ( ! ml_puts(p->mbuf, "<?xml version=\"1.0\" " - "encoding=\"UTF-8\"?>\n", NULL)) - return(0); - return(ml_puts(p->mbuf, "<mdoc xmlns:block=\"block\" " - "xmlns:body=\"body\" " - "xmlns:head=\"head\" " - "xmlns:inline=\"inline\">", NULL)); -} - - -/* ARGSUSED */ -static int -xml_end(struct ml_args *p, const struct tm *tm, const char *os, - const char *title, enum roffmsec sec, enum roffvol vol) -{ - - return(ml_puts(p->mbuf, "</mdoc>", NULL)); -} - - -/* ARGSUSED */ -static ssize_t -xml_beginstring(struct ml_args *p, const char *buf, size_t sz) -{ - - return(0); -} - - -/* ARGSUSED */ -static ssize_t -xml_endstring(struct ml_args *p, const char *buf, size_t sz) -{ - - return(0); -} - - -/* ARGSUSED */ -static ssize_t -xml_begintag(struct ml_args *p, enum md_ns ns, - int tok, const int *argc, const char **argv) -{ - ssize_t res, sz; - - if (-1 == (res = xml_printtagname(p, ns, tok))) - return(-1); - if (-1 == (sz = xml_printtagargs(p, argc, argv))) - return(-1); - return(res + sz); -} - - -/* ARGSUSED */ -static ssize_t -xml_endtag(struct ml_args *p, enum md_ns ns, int tok) -{ - - return(xml_printtagname(p, ns, tok)); -} - - -/* ARGSUSED */ -int -xml_alloc(void **p) -{ - - *p = NULL; - return(1); -} - - -/* ARGSUSED */ -void -xml_free(void *p) -{ - - /* Do nothing. */ -} - - -int -md_line_xml(void *data, char *buf) -{ - - return(mlg_line((struct md_mlg *)data, buf)); -} - - -int -md_exit_xml(void *data, int flush) -{ - - return(mlg_exit((struct md_mlg *)data, flush)); -} - - -void * -md_init_xml(const struct md_args *args, - struct md_mbuf *mbuf, const struct md_rbuf *rbuf) -{ - struct ml_cbs cbs; - - cbs.ml_alloc = xml_alloc; - cbs.ml_free = xml_free; - cbs.ml_begintag = xml_begintag; - cbs.ml_endtag = xml_endtag; - cbs.ml_begin = xml_begin; - cbs.ml_end = xml_end; - cbs.ml_beginstring = xml_beginstring; - cbs.ml_endstring = xml_endstring; - - return(mlg_alloc(args, rbuf, mbuf, &cbs)); -} - |