version 1.270, 2018/12/04 02:53:51 |
version 1.275, 2020/04/06 10:16:17 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
|
* Copyright (c) 2010, 2012-2018, 2020 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010, 2012-2018 Ingo Schwarze <schwarze@openbsd.org> |
|
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
|
|
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
|
* |
|
* Top level and utility functions of the mdoc(7) parser for mandoc(1). |
*/ |
*/ |
#include "config.h" |
#include "config.h" |
|
|
Line 210 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 212 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
* Strip trailing tabs in literal context only; |
* Strip trailing tabs in literal context only; |
* outside, they affect the next line. |
* outside, they affect the next line. |
*/ |
*/ |
if (MDOC_LITERAL & mdoc->flags) |
if (mdoc->flags & ROFF_NOFILL) |
continue; |
continue; |
break; |
break; |
case '\\': |
case '\\': |
Line 227 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 229 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
*end = '\0'; |
*end = '\0'; |
|
|
if (ws) |
if (ws) |
mandoc_msg(MANDOCERR_SPACE_EOL, mdoc->parse, |
mandoc_msg(MANDOCERR_SPACE_EOL, line, (int)(ws - buf), NULL); |
line, (int)(ws-buf), NULL); |
|
|
|
/* |
/* |
* Blank lines are allowed in no-fill mode |
* Blank lines are allowed in no-fill mode |
Line 236 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 237 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
* but add a single vertical space elsewhere. |
* but add a single vertical space elsewhere. |
*/ |
*/ |
|
|
if (buf[offs] == '\0' && ! (mdoc->flags & MDOC_LITERAL)) { |
if (buf[offs] == '\0' && (mdoc->flags & ROFF_NOFILL) == 0) { |
switch (mdoc->last->type) { |
switch (mdoc->last->type) { |
case ROFFT_TEXT: |
case ROFFT_TEXT: |
sp = mdoc->last->string; |
sp = mdoc->last->string; |
Line 252 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 253 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
default: |
default: |
break; |
break; |
} |
} |
mandoc_msg(MANDOCERR_FI_BLANK, mdoc->parse, |
mandoc_msg(MANDOCERR_FI_BLANK, line, (int)(c - buf), NULL); |
line, (int)(c - buf), NULL); |
|
roff_elem_alloc(mdoc, line, offs, ROFF_sp); |
roff_elem_alloc(mdoc, line, offs, ROFF_sp); |
mdoc->last->flags |= NODE_VALID | NODE_ENDED; |
mdoc->last->flags |= NODE_VALID | NODE_ENDED; |
mdoc->next = ROFF_NEXT_SIBLING; |
mdoc->next = ROFF_NEXT_SIBLING; |
Line 262 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 262 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
|
|
roff_word_alloc(mdoc, line, offs, buf+offs); |
roff_word_alloc(mdoc, line, offs, buf+offs); |
|
|
if (mdoc->flags & MDOC_LITERAL) |
if (mdoc->flags & ROFF_NOFILL) |
return 1; |
return 1; |
|
|
/* |
/* |
Line 293 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
Line 293 mdoc_ptext(struct roff_man *mdoc, int line, char *buf, |
|
if (*c == ' ') |
if (*c == ' ') |
c++; |
c++; |
if (isupper((unsigned char)(*c))) |
if (isupper((unsigned char)(*c))) |
mandoc_msg(MANDOCERR_EOS, mdoc->parse, |
mandoc_msg(MANDOCERR_EOS, line, (int)(c - buf), NULL); |
line, (int)(c - buf), NULL); |
|
} |
} |
|
|
return 1; |
return 1; |
Line 322 mdoc_pmacro(struct roff_man *mdoc, int ln, char *buf, |
|
Line 321 mdoc_pmacro(struct roff_man *mdoc, int ln, char *buf, |
|
if (sz == 2 || sz == 3) |
if (sz == 2 || sz == 3) |
tok = roffhash_find(mdoc->mdocmac, buf + sv, sz); |
tok = roffhash_find(mdoc->mdocmac, buf + sv, sz); |
if (tok == TOKEN_NONE) { |
if (tok == TOKEN_NONE) { |
mandoc_msg(MANDOCERR_MACRO, mdoc->parse, |
mandoc_msg(MANDOCERR_MACRO, ln, sv, "%s", buf + sv - 1); |
ln, sv, buf + sv - 1); |
|
return 1; |
return 1; |
} |
} |
|
|
Line 353 mdoc_pmacro(struct roff_man *mdoc, int ln, char *buf, |
|
Line 351 mdoc_pmacro(struct roff_man *mdoc, int ln, char *buf, |
|
*/ |
*/ |
|
|
if ('\0' == buf[offs] && ' ' == buf[offs - 1]) |
if ('\0' == buf[offs] && ' ' == buf[offs - 1]) |
mandoc_msg(MANDOCERR_SPACE_EOL, mdoc->parse, |
mandoc_msg(MANDOCERR_SPACE_EOL, ln, offs - 1, NULL); |
ln, offs - 1, NULL); |
|
|
|
/* |
/* |
* If an initial macro or a list invocation, divert directly |
* If an initial or transparent macro or a list invocation, |
* into macro processing. |
* divert directly into macro processing. |
*/ |
*/ |
|
|
n = mdoc->last; |
n = mdoc->last; |
if (n == NULL || tok == MDOC_It || tok == MDOC_El) { |
if (n == NULL || tok == MDOC_It || tok == MDOC_El || |
|
roff_tok_transparent(tok)) { |
(*mdoc_macro(tok)->fp)(mdoc, tok, ln, sv, &offs, buf); |
(*mdoc_macro(tok)->fp)(mdoc, tok, ln, sv, &offs, buf); |
return 1; |
return 1; |
} |
} |
Line 432 mdoc_isdelim(const char *p) |
|
Line 430 mdoc_isdelim(const char *p) |
|
return DELIM_MIDDLE; |
return DELIM_MIDDLE; |
|
|
return DELIM_NONE; |
return DELIM_NONE; |
} |
|
|
|
void |
|
mdoc_validate(struct roff_man *mdoc) |
|
{ |
|
|
|
mdoc->last = mdoc->first; |
|
mdoc_node_validate(mdoc); |
|
mdoc_state_reset(mdoc); |
|
} |
} |