===================================================================
RCS file: /cvs/mandoc/tbl.c,v
retrieving revision 1.4
retrieving revision 1.10
diff -u -p -r1.4 -r1.10
--- mandoc/tbl.c	2010/12/28 13:47:38	1.4
+++ mandoc/tbl.c	2010/12/31 14:52:41	1.10
@@ -1,4 +1,4 @@
-/*	$Id: tbl.c,v 1.4 2010/12/28 13:47:38 kristaps Exp $ */
+/*	$Id: tbl.c,v 1.10 2010/12/31 14:52:41 kristaps Exp $ */
 /*
  * Copyright (c) 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
  *
@@ -25,28 +25,6 @@
 #include "libmandoc.h"
 #include "libroff.h"
 
-static	const char	 tbl_toks[TBL_TOK__MAX] = {
-	'(',	')',	',',	';',	'.',
-	' ',	'\t',	'\0'
-};
-
-static	void		 tbl_init(struct tbl *);
-static	void		 tbl_clear(struct tbl *);
-static	enum tbl_tok	 tbl_next_char(char);
-
-static void
-tbl_clear(struct tbl *tbl)
-{
-
-}
-
-static void
-tbl_init(struct tbl *tbl)
-{
-
-	tbl->part = TBL_PART_OPTS;
-}
-
 enum rofferr
 tbl_read(struct tbl *tbl, int ln, const char *p, int offs)
 {
@@ -56,90 +34,89 @@ 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));
-	tbl_init(p);
+	p = mandoc_calloc(1, sizeof(struct tbl));
+	p->data = data;
+	p->msg = msg;
+	p->part = TBL_PART_OPTS;
+	p->tab = '\t';
+	p->linesize = 12;
+	p->decimal = '.';
 	return(p);
 }
 
 void
 tbl_free(struct tbl *p)
 {
+	struct tbl_row	*rp;
+	struct tbl_cell	*cp;
+	struct tbl_span	*sp;
+	struct tbl_dat	*dp;
 
-	tbl_clear(p);
+	while (p->first_row) {
+		rp = p->first_row;
+		p->first_row = rp->next;
+		while (rp->first) {
+			cp = rp->first;
+			rp->first = cp->next;
+			free(cp);
+		}
+		free(rp);
+	}
+
+	while (p->first_span) {
+		sp = p->first_span;
+		p->first_span = sp->next;
+		while (sp->first) {
+			dp = sp->first;
+			sp->first = dp->next;
+			if (dp->string)
+				free(dp->string);
+			free(dp);
+		}
+		free(sp);
+	}
+
 	free(p);
 }
 
 void
-tbl_reset(struct tbl *tbl)
+tbl_restart(struct tbl *tbl)
 {
 
-	tbl_clear(tbl);
-	tbl_init(tbl);
+	tbl->part = TBL_PART_LAYOUT;
 }
-
-static enum tbl_tok
-tbl_next_char(char c)
-{
-	int		 i;
-
-	/*
-	 * These are delimiting tokens.  They separate out words in the
-	 * token stream.
-	 *
-	 * FIXME: make this into a hashtable for faster lookup.
-	 */
-	for (i = 0; i < TBL_TOK__MAX; i++)
-		if (c == tbl_toks[i])
-			return((enum tbl_tok)i);
-
-	return(TBL_TOK__MAX);
-}
-
-enum tbl_tok
-tbl_next(struct tbl *tbl, const char *p, int *pos)
-{
-	int		 i;
-	enum tbl_tok	 c;
-
-	tbl->buf[0] = '\0';
-
-	if (TBL_TOK__MAX != (c = tbl_next_char(p[*pos]))) {
-		if (TBL_TOK_NIL != c) {
-			tbl->buf[0] = p[*pos];
-			tbl->buf[1] = '\0';
-			(*pos)++;
-		}
-		return(c);
-	}
-
-	/*
-	 * Copy words into a nil-terminated buffer.  For now, we use a
-	 * static buffer.  FIXME: eventually this should be made into a
-	 * dynamic one living in struct tbl.
-	 */
-
-	for (i = 0; i < BUFSIZ; i++, (*pos)++)
-		if (TBL_TOK__MAX == tbl_next_char(p[*pos]))
-			tbl->buf[i] = p[*pos];
-		else
-			break;
-
-	assert(i < BUFSIZ);
-	tbl->buf[i] = '\0';
-
-	return(TBL_TOK__MAX);
-}
-