version 1.1, 2008/11/23 16:53:18 |
version 1.6, 2008/11/25 16:49:57 |
|
|
* PERFORMANCE OF THIS SOFTWARE. |
* PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
#include <assert.h> |
#include <assert.h> |
|
#include <err.h> |
|
#include <stdio.h> |
#include <stdlib.h> |
#include <stdlib.h> |
|
#include <string.h> |
|
|
#include "libmdocml.h" |
#include "libmdocml.h" |
#include "private.h" |
#include "private.h" |
|
|
|
#ifdef __linux__ |
|
#define strlcat strncat |
|
#endif |
|
|
int |
static int md_dummy_blk_in(int); |
md_line_dummy(const struct md_args *args, |
static int md_dummy_blk_out(int); |
struct md_mbuf *out, const struct md_rbuf *in, |
static int md_dummy_text_in(int, int *, char **); |
const char *buf, size_t sz, void *data) |
static int md_dummy_text_out(int); |
|
|
|
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; |
|
}; |
|
|
|
static void |
|
dbg_prologue(const char *p) |
{ |
{ |
|
int i; |
|
|
assert(buf); |
(void)snprintf(dbg_line, sizeof(dbg_line) - 1, "%6s", p); |
assert(out); |
(void)strlcat(dbg_line, ": ", sizeof(dbg_line) - 1); |
assert(in); |
/* LINTED */ |
assert(args); |
for (i = 0; i < dbg_lvl; i++) |
assert(NULL == data); |
(void)strlcat(dbg_line, " ", sizeof(dbg_line) - 1); |
|
} |
|
|
if ( ! md_buf_puts(out, buf, sz)) |
|
return(0); |
|
if ( ! md_buf_putchar(out, '\n')) |
|
return(0); |
|
|
|
|
static void |
|
dbg_epilogue(void) |
|
{ |
|
|
|
assert(0 != dbg_line[0]); |
|
(void)printf("%s\n", dbg_line); |
|
} |
|
|
|
|
|
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); |
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); |
|
} |
|
|
|
|
|
int |
|
md_line_dummy(void *arg, char *buf, size_t sz) |
|
{ |
|
struct md_dummy *p; |
|
|
|
p = (struct md_dummy *)arg; |
|
return(roff_engine(p->tree, buf, sz)); |
|
} |
|
|
|
|
|
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->tree = roff_alloc(args, mbuf, rbuf, |
|
md_dummy_text_in, md_dummy_text_out, |
|
md_dummy_blk_in, md_dummy_blk_out); |
|
|
|
if (NULL == p->tree) { |
|
free(p); |
|
return(NULL); |
|
} |
|
|
|
return(p); |
} |
} |