=================================================================== RCS file: /cvs/mandoc/tbl.c,v retrieving revision 1.2 retrieving revision 1.9 diff -u -p -r1.2 -r1.9 --- mandoc/tbl.c 2010/12/28 10:55:24 1.2 +++ mandoc/tbl.c 2010/12/30 09:34:07 1.9 @@ -1,6 +1,6 @@ -/* $Id: tbl.c,v 1.2 2010/12/28 10:55:24 kristaps Exp $ */ +/* $Id: tbl.c,v 1.9 2010/12/30 09:34:07 kristaps Exp $ */ /* - * Copyright (c) 2009, 2010 Kristaps Dzonsons + * Copyright (c) 2009, 2010 Kristaps Dzonsons * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above @@ -15,6 +15,7 @@ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include +#include #include #include #include @@ -24,24 +25,44 @@ #include "libmandoc.h" #include "libroff.h" -enum tbl_part { - TBL_PART_OPTS, /* in options (first line) */ - TBL_PART_LAYOUT, /* describing layout */ - TBL_PART_DATA /* creating data rows */ -}; - - -struct tbl { - enum tbl_part part; -}; - static void tbl_init(struct tbl *); static void tbl_clear(struct tbl *); static void tbl_clear(struct tbl *tbl) { + struct tbl_row *rp; + struct tbl_cell *cp; + struct tbl_span *sp; + struct tbl_dat *dp; + while (tbl->first_row) { + rp = tbl->first_row; + tbl->first_row = rp->next; + while (rp->first) { + cp = rp->first; + rp->first = cp->next; + free(cp); + } + free(rp); + } + + tbl->last_row = NULL; + + while (tbl->first_span) { + sp = tbl->first_span; + tbl->first_span = sp->next; + while (sp->first) { + dp = sp->first; + sp->first = dp->next; + if (dp->string) + free(dp->string); + free(dp); + } + free(sp); + } + + tbl->last_span = NULL; } static void @@ -49,6 +70,9 @@ tbl_init(struct tbl *tbl) { tbl->part = TBL_PART_OPTS; + tbl->tab = '\t'; + tbl->linesize = 12; + tbl->decimal = '.'; } enum rofferr @@ -60,19 +84,43 @@ tbl_read(struct tbl *tbl, int ln, const char *p, int o cp = &p[offs]; len = (int)strlen(cp); - if (len && TBL_PART_OPTS == tbl->part) + /* + * If we're in the options section and we don't have a + * terminating semicolon, assume we've moved directly into the + * layout section. No need to report a warning: this is, + * apparently, standard behaviour. + */ + + if (TBL_PART_OPTS == tbl->part && len) if (';' != cp[len - 1]) tbl->part = TBL_PART_LAYOUT; - - return(ROFF_CONT); + + /* Now process each logical section of the table. */ + + switch (tbl->part) { + case (TBL_PART_OPTS): + return(tbl_option(tbl, ln, p) ? ROFF_IGN : ROFF_ERR); + case (TBL_PART_LAYOUT): + return(tbl_layout(tbl, ln, p) ? ROFF_IGN : ROFF_ERR); + case (TBL_PART_DATA): + break; + } + + /* + * FIXME: allow the original string to slip through for the time + * being. + */ + return(tbl_data(tbl, ln, p) ? ROFF_CONT : ROFF_ERR); } struct tbl * -tbl_alloc(void) +tbl_alloc(void *data, const mandocmsg msg) { struct tbl *p; - p = mandoc_malloc(sizeof(struct tbl)); + p = mandoc_calloc(1, sizeof(struct tbl)); + p->data = data; + p->msg = msg; tbl_init(p); return(p); } @@ -92,3 +140,11 @@ tbl_reset(struct tbl *tbl) tbl_clear(tbl); tbl_init(tbl); } + +void +tbl_restart(struct tbl *tbl) +{ + + tbl->part = TBL_PART_LAYOUT; +} +