2017-06-08 19:29:07 +00:00
|
|
|
/* $Id: tbl.c,v 1.41 2017/06/08 18:11:22 schwarze Exp $ */
|
2012-10-18 09:55:16 +00:00
|
|
|
/*
|
|
|
|
* Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
|
2015-03-02 16:45:41 +00:00
|
|
|
* Copyright (c) 2011, 2015 Ingo Schwarze <schwarze@openbsd.org>
|
2012-10-18 09:55:16 +00:00
|
|
|
*
|
|
|
|
* 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 "config.h"
|
2014-12-02 07:34:06 +00:00
|
|
|
|
|
|
|
#include <sys/types.h>
|
2012-10-18 09:55:16 +00:00
|
|
|
|
|
|
|
#include <assert.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <time.h>
|
|
|
|
|
|
|
|
#include "mandoc.h"
|
2014-11-22 18:08:25 +00:00
|
|
|
#include "mandoc_aux.h"
|
2012-10-18 09:55:16 +00:00
|
|
|
#include "libmandoc.h"
|
|
|
|
#include "libroff.h"
|
|
|
|
|
2014-11-22 18:08:25 +00:00
|
|
|
|
2012-10-18 09:55:16 +00:00
|
|
|
enum rofferr
|
2015-03-02 16:45:41 +00:00
|
|
|
tbl_read(struct tbl_node *tbl, int ln, const char *p, int pos)
|
2012-10-18 09:55:16 +00:00
|
|
|
{
|
|
|
|
const char *cp;
|
2015-03-02 16:45:41 +00:00
|
|
|
int active;
|
2012-10-18 09:55:16 +00:00
|
|
|
|
|
|
|
/*
|
2015-03-02 16:45:41 +00:00
|
|
|
* In the options section, proceed to the layout section
|
|
|
|
* after a semicolon, or right away if there is no semicolon.
|
|
|
|
* Ignore semicolons in arguments.
|
2012-10-18 09:55:16 +00:00
|
|
|
*/
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
if (tbl->part == TBL_PART_OPTS) {
|
|
|
|
tbl->part = TBL_PART_LAYOUT;
|
|
|
|
active = 1;
|
|
|
|
for (cp = p + pos; *cp != '\0'; cp++) {
|
|
|
|
switch (*cp) {
|
|
|
|
case '(':
|
|
|
|
active = 0;
|
|
|
|
continue;
|
|
|
|
case ')':
|
|
|
|
active = 1;
|
|
|
|
continue;
|
|
|
|
case ';':
|
|
|
|
if (active)
|
|
|
|
break;
|
|
|
|
continue;
|
|
|
|
default:
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (*cp == ';') {
|
|
|
|
tbl_option(tbl, ln, p, &pos);
|
|
|
|
if (p[pos] == '\0')
|
2016-01-15 23:08:59 +00:00
|
|
|
return ROFF_IGN;
|
2015-03-02 16:45:41 +00:00
|
|
|
}
|
|
|
|
}
|
2012-10-18 09:55:16 +00:00
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
/* Process the other section types. */
|
2012-10-18 09:55:16 +00:00
|
|
|
|
|
|
|
switch (tbl->part) {
|
2014-11-22 18:08:25 +00:00
|
|
|
case TBL_PART_LAYOUT:
|
2015-03-02 16:45:41 +00:00
|
|
|
tbl_layout(tbl, ln, p, pos);
|
2016-01-15 23:08:59 +00:00
|
|
|
return ROFF_IGN;
|
2014-11-22 18:08:25 +00:00
|
|
|
case TBL_PART_CDATA:
|
2016-01-15 23:08:59 +00:00
|
|
|
return tbl_cdata(tbl, ln, p, pos) ? ROFF_TBL : ROFF_IGN;
|
2012-10-18 09:55:16 +00:00
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
tbl_data(tbl, ln, p, pos);
|
2016-01-15 23:08:59 +00:00
|
|
|
return ROFF_TBL;
|
2012-10-18 09:55:16 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
struct tbl_node *
|
|
|
|
tbl_alloc(int pos, int line, struct mparse *parse)
|
|
|
|
{
|
2014-01-31 19:59:03 +00:00
|
|
|
struct tbl_node *tbl;
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
tbl = mandoc_calloc(1, sizeof(*tbl));
|
2014-01-31 19:59:03 +00:00
|
|
|
tbl->line = line;
|
|
|
|
tbl->pos = pos;
|
|
|
|
tbl->parse = parse;
|
|
|
|
tbl->part = TBL_PART_OPTS;
|
|
|
|
tbl->opts.tab = '\t';
|
|
|
|
tbl->opts.decimal = '.';
|
2016-01-15 23:08:59 +00:00
|
|
|
return tbl;
|
2012-10-18 09:55:16 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2014-01-31 19:59:03 +00:00
|
|
|
tbl_free(struct tbl_node *tbl)
|
2012-10-18 09:55:16 +00:00
|
|
|
{
|
|
|
|
struct tbl_row *rp;
|
|
|
|
struct tbl_cell *cp;
|
|
|
|
struct tbl_span *sp;
|
|
|
|
struct tbl_dat *dp;
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
while ((rp = tbl->first_row) != NULL) {
|
2014-01-31 19:59:03 +00:00
|
|
|
tbl->first_row = rp->next;
|
2015-03-02 16:45:41 +00:00
|
|
|
while (rp->first != NULL) {
|
2012-10-18 09:55:16 +00:00
|
|
|
cp = rp->first;
|
|
|
|
rp->first = cp->next;
|
2017-06-08 19:29:07 +00:00
|
|
|
free(cp->wstr);
|
2012-10-18 09:55:16 +00:00
|
|
|
free(cp);
|
|
|
|
}
|
|
|
|
free(rp);
|
|
|
|
}
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
while ((sp = tbl->first_span) != NULL) {
|
2014-01-31 19:59:03 +00:00
|
|
|
tbl->first_span = sp->next;
|
2015-03-02 16:45:41 +00:00
|
|
|
while (sp->first != NULL) {
|
2012-10-18 09:55:16 +00:00
|
|
|
dp = sp->first;
|
|
|
|
sp->first = dp->next;
|
2015-03-02 16:45:41 +00:00
|
|
|
free(dp->string);
|
2012-10-18 09:55:16 +00:00
|
|
|
free(dp);
|
|
|
|
}
|
|
|
|
free(sp);
|
|
|
|
}
|
|
|
|
|
2014-01-31 19:59:03 +00:00
|
|
|
free(tbl);
|
2012-10-18 09:55:16 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
tbl_restart(int line, int pos, struct tbl_node *tbl)
|
|
|
|
{
|
2015-03-02 16:45:41 +00:00
|
|
|
if (tbl->part == TBL_PART_CDATA)
|
|
|
|
mandoc_msg(MANDOCERR_TBLDATA_BLK, tbl->parse,
|
|
|
|
line, pos, "T&");
|
2012-10-18 09:55:16 +00:00
|
|
|
|
|
|
|
tbl->part = TBL_PART_LAYOUT;
|
|
|
|
tbl->line = line;
|
|
|
|
tbl->pos = pos;
|
|
|
|
}
|
|
|
|
|
|
|
|
const struct tbl_span *
|
|
|
|
tbl_span(struct tbl_node *tbl)
|
|
|
|
{
|
|
|
|
struct tbl_span *span;
|
|
|
|
|
|
|
|
assert(tbl);
|
|
|
|
span = tbl->current_span ? tbl->current_span->next
|
|
|
|
: tbl->first_span;
|
|
|
|
if (span)
|
|
|
|
tbl->current_span = span;
|
2016-01-15 23:08:59 +00:00
|
|
|
return span;
|
2012-10-18 09:55:16 +00:00
|
|
|
}
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
int
|
2012-10-18 09:55:16 +00:00
|
|
|
tbl_end(struct tbl_node **tblp)
|
|
|
|
{
|
|
|
|
struct tbl_node *tbl;
|
2015-03-02 16:45:41 +00:00
|
|
|
struct tbl_span *sp;
|
2012-10-18 09:55:16 +00:00
|
|
|
|
|
|
|
tbl = *tblp;
|
|
|
|
*tblp = NULL;
|
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
if (tbl->part == TBL_PART_CDATA)
|
|
|
|
mandoc_msg(MANDOCERR_TBLDATA_BLK, tbl->parse,
|
|
|
|
tbl->line, tbl->pos, "TE");
|
2012-10-18 09:55:16 +00:00
|
|
|
|
2015-03-02 16:45:41 +00:00
|
|
|
sp = tbl->first_span;
|
|
|
|
while (sp != NULL && sp->first == NULL)
|
|
|
|
sp = sp->next;
|
|
|
|
if (sp == NULL) {
|
|
|
|
mandoc_msg(MANDOCERR_TBLDATA_NONE, tbl->parse,
|
2014-11-22 18:08:25 +00:00
|
|
|
tbl->line, tbl->pos, NULL);
|
2016-01-15 23:08:59 +00:00
|
|
|
return 0;
|
2015-03-02 16:45:41 +00:00
|
|
|
}
|
2016-01-15 23:08:59 +00:00
|
|
|
return 1;
|
2012-10-18 09:55:16 +00:00
|
|
|
}
|