=================================================================== RCS file: /cvs/mandoc/Attic/dummy.c,v retrieving revision 1.1 retrieving revision 1.8 diff -u -p -r1.1 -r1.8 --- mandoc/Attic/dummy.c 2008/11/23 16:53:18 1.1 +++ mandoc/Attic/dummy.c 2008/11/27 14:02:41 1.8 @@ -1,4 +1,4 @@ -/* $Id: dummy.c,v 1.1 2008/11/23 16:53:18 kristaps Exp $ */ +/* $Id: dummy.c,v 1.8 2008/11/27 14:02:41 kristaps Exp $ */ /* * Copyright (c) 2008 Kristaps Dzonsons * @@ -17,28 +17,196 @@ * PERFORMANCE OF THIS SOFTWARE. */ #include +#include +#include #include +#include #include "libmdocml.h" #include "private.h" +#ifdef __linux__ +#define strlcat strncat +#endif +static int md_dummy_blk_in(int); +static int md_dummy_blk_out(int); +static int md_dummy_text_in(int, int *, char **); +static int md_dummy_text_out(int); +static int md_dummy_special(int); +static int md_dummy_head(void); +static int md_dummy_tail(void); + +static void dbg_prologue(const char *); +static void dbg_epilogue(void); + +static int dbg_lvl = 0; +static char dbg_line[72]; + +struct md_dummy { + struct rofftree *tree; + struct roffcb cb; +}; + + int -md_line_dummy(const struct md_args *args, - struct md_mbuf *out, const struct md_rbuf *in, - const char *buf, size_t sz, void *data) +md_line_dummy(void *arg, char *buf, size_t sz) { + struct md_dummy *p; - assert(buf); - assert(out); - assert(in); - assert(args); - assert(NULL == data); + p = (struct md_dummy *)arg; + return(roff_engine(p->tree, buf, sz)); +} - if ( ! md_buf_puts(out, buf, sz)) - return(0); - if ( ! md_buf_putchar(out, '\n')) - return(0); + +int +md_exit_dummy(void *data, int flush) +{ + int c; + struct md_dummy *p; + + p = (struct md_dummy *)data; + c = roff_free(p->tree, flush); + free(p); + + return(c); +} + + +void * +md_init_dummy(const struct md_args *args, + struct md_mbuf *mbuf, const struct md_rbuf *rbuf) +{ + struct md_dummy *p; + + if (NULL == (p = malloc(sizeof(struct md_dummy)))) { + warn("malloc"); + return(NULL); + } + + p->cb.roffhead = md_dummy_head; + p->cb.rofftail = md_dummy_tail; + p->cb.roffin = md_dummy_text_in; + p->cb.roffout = md_dummy_text_out; + p->cb.roffblkin = md_dummy_blk_in; + p->cb.roffblkout = md_dummy_blk_out; + p->cb.roffspecial = md_dummy_special; + + p->tree = roff_alloc(args, mbuf, rbuf, &p->cb); + + if (NULL == p->tree) { + free(p); + return(NULL); + } + + return(p); +} + + +static void +dbg_prologue(const char *p) +{ + int i; + + (void)snprintf(dbg_line, sizeof(dbg_line) - 1, "%6s", p); + (void)strlcat(dbg_line, ": ", sizeof(dbg_line) - 1); + /* LINTED */ + for (i = 0; i < dbg_lvl; i++) + (void)strlcat(dbg_line, " ", sizeof(dbg_line) - 1); +} + + +static void +dbg_epilogue(void) +{ + + assert(0 != dbg_line[0]); + (void)printf("%s\n", dbg_line); +} + + +static int +md_dummy_head(void) +{ + + return(1); +} + + +static int +md_dummy_tail(void) +{ + + return(1); +} + + +static int +md_dummy_special(int tok) +{ + + dbg_prologue("noop"); + (void)strlcat(dbg_line, toknames[tok], sizeof(dbg_line) - 1); + dbg_epilogue(); + + return(1); +} + + +static int +md_dummy_blk_in(int tok) +{ + + dbg_prologue("blk"); + (void)strlcat(dbg_line, toknames[tok], sizeof(dbg_line) - 1); + dbg_epilogue(); + + dbg_lvl++; + return(1); +} + + +static int +md_dummy_blk_out(int tok) +{ + + dbg_lvl--; + return(1); +} + + +/* ARGSUSED */ +static int +md_dummy_text_in(int tok, int *argcp, char **argvp) +{ + + dbg_prologue("text"); + (void)strlcat(dbg_line, toknames[tok], sizeof(dbg_line) - 1); + (void)strlcat(dbg_line, " ", sizeof(dbg_line) - 1); + while (ROFF_ARGMAX != *argcp) { + (void)strlcat(dbg_line, "[", sizeof(dbg_line) - 1); + (void)strlcat(dbg_line, tokargnames[*argcp], + sizeof(dbg_line) - 1); + if (*argvp) { + (void)strlcat(dbg_line, " [", + sizeof(dbg_line) - 1); + (void)strlcat(dbg_line, *argvp, + sizeof(dbg_line) - 1); + (void)strlcat(dbg_line, "]", + sizeof(dbg_line) - 1); + } + (void)strlcat(dbg_line, "]", sizeof(dbg_line) - 1); + argcp++; + argvp++; + } + dbg_epilogue(); + return(1); +} + + +static int +md_dummy_text_out(int tok) +{ return(1); }