version 1.25, 2009/01/12 12:52:21 |
version 1.32, 2009/01/16 12:23:25 |
Line 41 static int pre_prologue(struct mdoc *, struct mdoc_nod |
|
Line 41 static int pre_prologue(struct mdoc *, struct mdoc_nod |
|
static int pre_prologue(struct mdoc *, struct mdoc_node *); |
static int pre_prologue(struct mdoc *, struct mdoc_node *); |
|
|
static int headchild_err_ge1(struct mdoc *); |
static int headchild_err_ge1(struct mdoc *); |
|
static int headchild_warn_ge1(struct mdoc *); |
static int headchild_err_eq0(struct mdoc *); |
static int headchild_err_eq0(struct mdoc *); |
|
static int elemchild_err_eq0(struct mdoc *); |
static int elemchild_err_ge1(struct mdoc *); |
static int elemchild_err_ge1(struct mdoc *); |
static int elemchild_warn_eq0(struct mdoc *); |
static int elemchild_warn_eq0(struct mdoc *); |
static int bodychild_warn_ge1(struct mdoc *); |
static int bodychild_warn_ge1(struct mdoc *); |
|
static int bodychild_err_eq0(struct mdoc *); |
|
static int elemchild_warn_ge1(struct mdoc *); |
static int post_sh(struct mdoc *); |
static int post_sh(struct mdoc *); |
static int post_bl(struct mdoc *); |
static int post_bl(struct mdoc *); |
static int post_it(struct mdoc *); |
static int post_it(struct mdoc *); |
Line 54 static v_pre pres_d1[] = { pre_display, NULL }; |
|
Line 58 static v_pre pres_d1[] = { pre_display, NULL }; |
|
static v_pre pres_bd[] = { pre_display, pre_bd, NULL }; |
static v_pre pres_bd[] = { pre_display, pre_bd, NULL }; |
static v_pre pres_bl[] = { pre_bl, NULL }; |
static v_pre pres_bl[] = { pre_bl, NULL }; |
static v_pre pres_it[] = { pre_it, NULL }; |
static v_pre pres_it[] = { pre_it, NULL }; |
static v_post posts_bd[] = { headchild_err_eq0, |
|
bodychild_warn_ge1, NULL }; |
|
|
|
static v_post posts_sh[] = { headchild_err_ge1, |
static v_post posts_bd[] = { headchild_err_eq0, bodychild_warn_ge1, NULL }; |
bodychild_warn_ge1, post_sh, NULL }; |
static v_post posts_text[] = { elemchild_err_ge1, NULL }; |
static v_post posts_bl[] = { headchild_err_eq0, |
static v_post posts_wtext[] = { elemchild_warn_ge1, NULL }; |
bodychild_warn_ge1, post_bl, NULL }; |
static v_post posts_notext[] = { elemchild_err_eq0, NULL }; |
|
static v_post posts_wline[] = { headchild_warn_ge1, bodychild_err_eq0, NULL }; |
|
static v_post posts_sh[] = { headchild_err_ge1, bodychild_warn_ge1, post_sh, NULL }; |
|
static v_post posts_bl[] = { headchild_err_eq0, bodychild_warn_ge1, post_bl, NULL }; |
static v_post posts_it[] = { post_it, NULL }; |
static v_post posts_it[] = { post_it, NULL }; |
static v_post posts_ss[] = { headchild_err_ge1, NULL }; |
static v_post posts_ss[] = { headchild_err_ge1, NULL }; |
static v_post posts_pp[] = { elemchild_warn_eq0, NULL }; |
static v_post posts_pp[] = { elemchild_warn_eq0, NULL }; |
static v_post posts_dd[] = { elemchild_err_ge1, NULL }; |
|
static v_post posts_d1[] = { headchild_err_ge1, NULL }; |
static v_post posts_d1[] = { headchild_err_ge1, NULL }; |
|
|
|
|
const struct valids mdoc_valids[MDOC_MAX] = { |
const struct valids mdoc_valids[MDOC_MAX] = { |
{ NULL, NULL }, /* \" */ |
{ NULL, NULL }, /* \" */ |
{ pres_prologue, posts_dd }, /* Dd */ |
{ pres_prologue, posts_text }, /* Dd */ |
{ pres_prologue, NULL }, /* Dt */ |
{ pres_prologue, NULL }, /* Dt */ |
{ pres_prologue, NULL }, /* Os */ |
{ pres_prologue, NULL }, /* Os */ |
{ NULL, posts_sh }, /* Sh */ /* FIXME: preceding Pp. */ |
/* FIXME: preceding Pp. */ |
{ NULL, posts_ss }, /* Ss */ /* FIXME: preceding Pp. */ |
/* FIXME: NAME section internal ordering. */ |
{ NULL, posts_pp }, /* Pp */ /* FIXME: proceeding... */ |
/* FIXME: can only be a child of root. */ |
|
{ NULL, posts_sh }, /* Sh */ |
|
/* FIXME: preceding Pp. */ |
|
/* FIXME: can only be a child of Sh. */ |
|
{ NULL, posts_ss }, /* Ss */ |
|
/* FIXME: proceeding... */ |
|
{ NULL, posts_pp }, /* Pp */ |
{ pres_d1, posts_d1 }, /* D1 */ |
{ pres_d1, posts_d1 }, /* D1 */ |
{ pres_d1, posts_d1 }, /* Dl */ |
{ pres_d1, posts_d1 }, /* Dl */ |
{ pres_bd, posts_bd }, /* Bd */ /* FIXME: preceding Pp. */ |
/* FIXME: preceding Pp. */ |
|
{ pres_bd, posts_bd }, /* Bd */ |
{ NULL, NULL }, /* Ed */ |
{ NULL, NULL }, /* Ed */ |
{ pres_bl, posts_bl }, /* Bl */ /* FIXME: preceding Pp. */ |
/* FIXME: preceding Pp. */ |
|
{ pres_bl, posts_bl }, /* Bl */ |
{ NULL, NULL }, /* El */ |
{ NULL, NULL }, /* El */ |
{ pres_it, posts_it }, /* It */ |
{ pres_it, posts_it }, /* It */ |
{ NULL, NULL }, /* Ad */ |
{ NULL, posts_text }, /* Ad */ |
{ NULL, NULL }, /* An */ |
/* FIXME */ |
|
{ NULL, NULL }, /* An */ |
{ NULL, NULL }, /* Ar */ |
{ NULL, NULL }, /* Ar */ |
{ NULL, NULL }, /* Cd */ |
|
|
{ NULL, posts_text }, /* Cd */ /* FIXME: section 4 only. */ |
{ NULL, NULL }, /* Cm */ |
{ NULL, NULL }, /* Cm */ |
{ NULL, NULL }, /* Dv */ |
{ NULL, posts_text }, /* Dv */ |
{ NULL, NULL }, /* Er */ |
{ NULL, posts_text }, /* Er */ /* FIXME: section 2 only. */ |
{ NULL, NULL }, /* Ev */ |
{ NULL, posts_text }, /* Ev */ |
{ NULL, NULL }, /* Ex */ |
{ NULL, posts_notext }, /* Ex */ /* FIXME: sections 1,6,8 only. */ /* -std required */ |
{ NULL, NULL }, /* Fa */ |
{ NULL, posts_text }, /* Fa */ |
{ NULL, NULL }, /* Fd */ |
{ NULL, NULL }, /* Fd */ /* FIXME: SYNOPSIS section. */ |
{ NULL, NULL }, /* Fl */ |
{ NULL, NULL }, /* Fl */ |
{ NULL, NULL }, /* Fn */ |
{ NULL, posts_text }, /* Fn */ |
{ NULL, NULL }, /* Ft */ |
{ NULL, NULL }, /* Ft */ |
{ NULL, NULL }, /* Ic */ |
{ NULL, posts_text }, /* Ic */ |
{ NULL, NULL }, /* In */ |
{ NULL, posts_wtext }, /* In */ |
{ NULL, NULL }, /* Li */ |
{ NULL, posts_text }, /* Li */ |
{ NULL, NULL }, /* Nd */ |
{ NULL, posts_wtext }, /* Nd */ |
{ NULL, NULL }, /* Nm */ |
{ NULL, NULL }, /* Nm */ /* FIXME: If name not set? */ |
{ NULL, NULL }, /* Op */ |
{ NULL, posts_wline }, /* Op */ |
{ NULL, NULL }, /* Ot */ |
{ NULL, NULL }, /* Ot */ |
{ NULL, NULL }, /* Pa */ |
{ NULL, NULL }, /* Pa */ |
{ NULL, NULL }, /* Rv */ |
{ NULL, posts_notext }, /* Rv */ /* -std required */ |
{ NULL, NULL }, /* St */ |
{ NULL, posts_notext }, /* St */ /* arg required */ |
{ NULL, NULL }, /* Va */ |
{ NULL, posts_text }, /* Va */ |
{ NULL, NULL }, /* Vt */ |
{ NULL, posts_text }, /* Vt */ |
{ NULL, NULL }, /* Xr */ |
{ NULL, NULL }, /* Xr */ /* FIXME */ |
{ NULL, NULL }, /* %A */ |
{ NULL, posts_text }, /* %A */ |
{ NULL, NULL }, /* %B */ |
{ NULL, posts_text }, /* %B */ |
{ NULL, NULL }, /* %D */ |
{ NULL, posts_text }, /* %D */ |
{ NULL, NULL }, /* %I */ |
{ NULL, posts_text }, /* %I */ |
{ NULL, NULL }, /* %J */ |
{ NULL, posts_text }, /* %J */ |
{ NULL, NULL }, /* %N */ |
{ NULL, posts_text }, /* %N */ |
{ NULL, NULL }, /* %O */ |
{ NULL, posts_text }, /* %O */ |
{ NULL, NULL }, /* %P */ |
{ NULL, posts_text }, /* %P */ |
{ NULL, NULL }, /* %R */ |
{ NULL, posts_text }, /* %R */ |
{ NULL, NULL }, /* %T */ |
{ NULL, posts_text }, /* %T */ |
{ NULL, NULL }, /* %V */ |
{ NULL, posts_text }, /* %V */ |
{ NULL, NULL }, /* Ac */ |
{ NULL, NULL }, /* Ac */ |
{ NULL, NULL }, /* Ao */ |
{ NULL, NULL }, /* Ao */ |
{ NULL, NULL }, /* Aq */ |
{ NULL, posts_wline }, /* Aq */ |
{ NULL, NULL }, /* At */ /* FIXME */ |
{ NULL, NULL }, /* At */ /* FIXME */ |
{ NULL, NULL }, /* Bc */ |
{ NULL, NULL }, /* Bc */ |
{ NULL, NULL }, /* Bf */ |
{ NULL, NULL }, /* Bf */ |
{ NULL, NULL }, /* Bo */ |
{ NULL, NULL }, /* Bo */ |
{ NULL, NULL }, /* Bq */ |
{ NULL, posts_wline }, /* Bq */ |
{ NULL, NULL }, /* Bsx */ |
{ NULL, NULL }, /* Bsx */ |
{ NULL, NULL }, /* Bx */ |
{ NULL, NULL }, /* Bx */ |
{ NULL, NULL }, /* Db */ |
{ NULL, NULL }, /* Db */ /* FIXME: boolean */ |
{ NULL, NULL }, /* Dc */ |
{ NULL, NULL }, /* Dc */ |
{ NULL, NULL }, /* Do */ |
{ NULL, NULL }, /* Do */ |
{ NULL, NULL }, /* Dq */ |
{ NULL, posts_wline }, /* Dq */ |
{ NULL, NULL }, /* Ec */ |
{ NULL, NULL }, /* Ec */ |
{ NULL, NULL }, /* Ef */ /* -symbolic, etc. */ |
{ NULL, NULL }, /* Ef */ /* -symbolic, etc. */ |
{ NULL, NULL }, /* Em */ |
{ NULL, posts_text }, /* Em */ |
{ NULL, NULL }, /* Eo */ |
{ NULL, NULL }, /* Eo */ |
{ NULL, NULL }, /* Fx */ |
{ NULL, NULL }, /* Fx */ |
{ NULL, NULL }, /* Ms */ |
{ NULL, posts_text }, /* Ms */ /* FIXME: which symbols? */ |
{ NULL, NULL }, /* No */ |
{ NULL, posts_notext }, /* No */ |
{ NULL, NULL }, /* Ns */ |
{ NULL, posts_notext }, /* Ns */ |
{ NULL, NULL }, /* Nx */ |
{ NULL, NULL }, /* Nx */ |
{ NULL, NULL }, /* Ox */ |
{ NULL, NULL }, /* Ox */ |
{ NULL, NULL }, /* Pc */ |
{ NULL, NULL }, /* Pc */ |
{ NULL, NULL }, /* Pf */ /* 2 or more arguments */ |
{ NULL, NULL }, /* Pf */ /* FIXME: 2 or more arguments */ |
{ NULL, NULL }, /* Po */ |
{ NULL, NULL }, /* Po */ |
{ NULL, NULL }, /* Pq */ /* FIXME: ignore following Sh/Ss */ |
{ NULL, posts_wline }, /* Pq */ /* FIXME: ignore following Sh/Ss */ |
{ NULL, NULL }, /* Qc */ |
{ NULL, NULL }, /* Qc */ |
{ NULL, NULL }, /* Ql */ |
{ NULL, posts_wline }, /* Ql */ |
{ NULL, NULL }, /* Qo */ |
{ NULL, NULL }, /* Qo */ |
{ NULL, NULL }, /* Qq */ |
{ NULL, posts_wline }, /* Qq */ |
{ NULL, NULL }, /* Re */ |
{ NULL, NULL }, /* Re */ |
{ NULL, NULL }, /* Rs */ |
{ NULL, NULL }, /* Rs */ |
{ NULL, NULL }, /* Sc */ |
{ NULL, NULL }, /* Sc */ |
{ NULL, NULL }, /* So */ |
{ NULL, NULL }, /* So */ |
{ NULL, NULL }, /* Sq */ |
{ NULL, posts_wline }, /* Sq */ |
{ NULL, NULL }, /* Sm */ |
{ NULL, NULL }, /* Sm */ /* FIXME: boolean */ |
{ NULL, NULL }, /* Sx */ |
{ NULL, posts_text }, /* Sx */ |
{ NULL, NULL }, /* Sy */ |
{ NULL, posts_text }, /* Sy */ |
{ NULL, NULL }, /* Tn */ |
{ NULL, posts_text }, /* Tn */ |
{ NULL, NULL }, /* Ux */ |
{ NULL, NULL }, /* Ux */ |
{ NULL, NULL }, /* Xc */ |
{ NULL, NULL }, /* Xc */ |
{ NULL, NULL }, /* Xo */ |
{ NULL, NULL }, /* Xo */ |
Line 171 const struct valids mdoc_valids[MDOC_MAX] = { |
|
Line 185 const struct valids mdoc_valids[MDOC_MAX] = { |
|
{ NULL, NULL }, /* Oc */ |
{ NULL, NULL }, /* Oc */ |
{ NULL, NULL }, /* Bk */ |
{ NULL, NULL }, /* Bk */ |
{ NULL, NULL }, /* Ek */ |
{ NULL, NULL }, /* Ek */ |
{ NULL, NULL }, /* Bt */ |
{ NULL, posts_notext }, /* Bt */ |
{ NULL, NULL }, /* Hf */ |
{ NULL, NULL }, /* Hf */ |
{ NULL, NULL }, /* Fr */ |
{ NULL, NULL }, /* Fr */ |
{ NULL, NULL }, /* Ud */ |
{ NULL, posts_notext }, /* Ud */ |
}; |
}; |
|
|
|
|
static int |
static int |
|
bodychild_err_eq0(struct mdoc *mdoc) |
|
{ |
|
|
|
if (MDOC_BODY != mdoc->last->type) |
|
return(1); |
|
if (NULL == mdoc->last->child) |
|
return(1); |
|
return(mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests no body children")); |
|
} |
|
|
|
|
|
static int |
bodychild_warn_ge1(struct mdoc *mdoc) |
bodychild_warn_ge1(struct mdoc *mdoc) |
{ |
{ |
|
|
Line 186 bodychild_warn_ge1(struct mdoc *mdoc) |
|
Line 212 bodychild_warn_ge1(struct mdoc *mdoc) |
|
return(1); |
return(1); |
if (mdoc->last->child) |
if (mdoc->last->child) |
return(1); |
return(1); |
return(mdoc_warn(mdoc, WARN_ARGS_GE1)); |
return(mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests one or more body children")); |
} |
} |
|
|
|
|
Line 198 elemchild_warn_eq0(struct mdoc *mdoc) |
|
Line 224 elemchild_warn_eq0(struct mdoc *mdoc) |
|
if (NULL == mdoc->last->child) |
if (NULL == mdoc->last->child) |
return(1); |
return(1); |
return(mdoc_pwarn(mdoc, mdoc->last->child->line, |
return(mdoc_pwarn(mdoc, mdoc->last->child->line, |
mdoc->last->child->pos, WARN_ARGS_EQ0)); |
mdoc->last->child->pos, WARN_SYNTAX, "macro suggests no parameters")); |
} |
} |
|
|
|
|
static int |
static int |
|
elemchild_warn_ge1(struct mdoc *mdoc) |
|
{ |
|
|
|
assert(MDOC_ELEM == mdoc->last->type); |
|
if (mdoc->last->child) |
|
return(1); |
|
return(mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests one or more parameters")); |
|
} |
|
|
|
|
|
static int |
|
elemchild_err_eq0(struct mdoc *mdoc) |
|
{ |
|
|
|
assert(MDOC_ELEM == mdoc->last->type); |
|
if (NULL == mdoc->last->child) |
|
return(1); |
|
return(mdoc_err(mdoc, "macro expects no parameters")); |
|
} |
|
|
|
|
|
static int |
elemchild_err_ge1(struct mdoc *mdoc) |
elemchild_err_ge1(struct mdoc *mdoc) |
{ |
{ |
|
|
assert(MDOC_ELEM == mdoc->last->type); |
assert(MDOC_ELEM == mdoc->last->type); |
if (mdoc->last->child) |
if (mdoc->last->child) |
return(1); |
return(1); |
return(mdoc_err(mdoc, ERR_ARGS_GE1)); |
return(mdoc_err(mdoc, "macro expects one or more parameters")); |
} |
} |
|
|
|
|
Line 222 headchild_err_eq0(struct mdoc *mdoc) |
|
Line 270 headchild_err_eq0(struct mdoc *mdoc) |
|
if (NULL == mdoc->last->child) |
if (NULL == mdoc->last->child) |
return(1); |
return(1); |
return(mdoc_perr(mdoc, mdoc->last->child->line, |
return(mdoc_perr(mdoc, mdoc->last->child->line, |
mdoc->last->child->pos, ERR_ARGS_EQ0)); |
mdoc->last->child->pos, "macro expects no parameters")); |
} |
} |
|
|
|
|
static int |
static int |
|
headchild_warn_ge1(struct mdoc *mdoc) |
|
{ |
|
|
|
if (MDOC_HEAD != mdoc->last->type) |
|
return(1); |
|
if (mdoc->last->child) |
|
return(1); |
|
return(mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests one or more parameters")); |
|
} |
|
|
|
|
|
static int |
headchild_err_ge1(struct mdoc *mdoc) |
headchild_err_ge1(struct mdoc *mdoc) |
{ |
{ |
|
|
Line 234 headchild_err_ge1(struct mdoc *mdoc) |
|
Line 294 headchild_err_ge1(struct mdoc *mdoc) |
|
return(1); |
return(1); |
if (mdoc->last->child) |
if (mdoc->last->child) |
return(1); |
return(1); |
return(mdoc_err(mdoc, ERR_ARGS_GE1)); |
return(mdoc_err(mdoc, "macro expects one or more parameters")); |
} |
} |
|
|
|
|
Line 246 pre_display(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 306 pre_display(struct mdoc *mdoc, struct mdoc_node *node) |
|
if (MDOC_BLOCK != node->type) |
if (MDOC_BLOCK != node->type) |
return(1); |
return(1); |
|
|
for (n = mdoc->last; n; n = n->parent) |
assert(mdoc->last); |
|
for (n = mdoc->last->parent; n; n = n->parent) |
if (MDOC_BLOCK == n->type) |
if (MDOC_BLOCK == n->type) |
if (MDOC_Bd == n->tok) |
if (MDOC_Bd == n->tok) |
break; |
break; |
if (NULL == n) |
if (NULL == n) |
return(1); |
return(1); |
return(mdoc_verr(mdoc, node, ERR_SCOPE_NONEST)); |
return(mdoc_nerr(mdoc, node, "displays may not be nested")); |
} |
} |
|
|
|
|
Line 293 pre_bl(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 354 pre_bl(struct mdoc *mdoc, struct mdoc_node *node) |
|
case (MDOC_Ohang): |
case (MDOC_Ohang): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Inset): |
case (MDOC_Inset): |
|
/* FALLTHROUGH */ |
|
case (MDOC_Column): |
if (type) |
if (type) |
err++; |
err++; |
type++; |
type++; |
Line 302 pre_bl(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 365 pre_bl(struct mdoc *mdoc, struct mdoc_node *node) |
|
} |
} |
} |
} |
if (0 == type) |
if (0 == type) |
return(mdoc_err(mdoc, ERR_SYNTAX_ARGMISS)); |
return(mdoc_err(mdoc, "no list type specified")); |
if (0 == err) |
if (0 == err) |
return(1); |
return(1); |
assert(argv); |
assert(argv); |
return(mdoc_perr(mdoc, argv->line, |
return(mdoc_perr(mdoc, argv->line, |
argv->pos, ERR_SYNTAX_ARGBAD)); |
argv->pos, "only one list type possible")); |
} |
} |
|
|
|
|
Line 333 pre_bd(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 396 pre_bd(struct mdoc *mdoc, struct mdoc_node *node) |
|
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Unfilled): |
case (MDOC_Unfilled): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
|
case (MDOC_Filled): |
|
/* FALLTHROUGH */ |
case (MDOC_Literal): |
case (MDOC_Literal): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_File): |
case (MDOC_File): |
Line 345 pre_bd(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 410 pre_bd(struct mdoc *mdoc, struct mdoc_node *node) |
|
} |
} |
} |
} |
if (0 == type) |
if (0 == type) |
return(mdoc_err(mdoc, ERR_SYNTAX_ARGMISS)); |
return(mdoc_err(mdoc, "no display type specified")); |
if (0 == err) |
if (0 == err) |
return(1); |
return(1); |
assert(argv); |
assert(argv); |
return(mdoc_perr(mdoc, argv->line, |
return(mdoc_perr(mdoc, argv->line, |
argv->pos, ERR_SYNTAX_ARGBAD)); |
argv->pos, "only one display type possible")); |
} |
} |
|
|
|
|
Line 363 pre_it(struct mdoc *mdoc, struct mdoc_node *node) |
|
Line 428 pre_it(struct mdoc *mdoc, struct mdoc_node *node) |
|
assert(MDOC_It == mdoc->last->tok); |
assert(MDOC_It == mdoc->last->tok); |
|
|
if (MDOC_BODY != mdoc->last->parent->type) |
if (MDOC_BODY != mdoc->last->parent->type) |
return(mdoc_verr(mdoc, node, ERR_SYNTAX_PARENTBAD)); |
return(mdoc_nerr(mdoc, node, "invalid macro parent `%s'", mdoc_macronames[mdoc->last->parent->tok])); |
if (MDOC_Bl != mdoc->last->parent->tok) |
if (MDOC_Bl != mdoc->last->parent->tok) |
return(mdoc_verr(mdoc, node, ERR_SYNTAX_PARENTBAD)); |
return(mdoc_nerr(mdoc, node, "invalid macro parent `%s'", mdoc_macronames[mdoc->last->parent->tok])); |
|
|
return(1); |
return(1); |
} |
} |
Line 376 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
Line 441 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
{ |
{ |
|
|
if (SEC_PROLOGUE != mdoc->sec_lastn) |
if (SEC_PROLOGUE != mdoc->sec_lastn) |
return(mdoc_verr(mdoc, node, ERR_SEC_NPROLOGUE)); |
return(mdoc_nerr(mdoc, node, "macro may only be invoked in the prologue")); |
assert(MDOC_ELEM == node->type); |
assert(MDOC_ELEM == node->type); |
|
|
/* Check for ordering. */ |
/* Check for ordering. */ |
Line 385 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
Line 450 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
case (MDOC_Os): |
case (MDOC_Os): |
if (mdoc->meta.title[0] && mdoc->meta.date) |
if (mdoc->meta.title[0] && mdoc->meta.date) |
break; |
break; |
return(mdoc_verr(mdoc, node, ERR_SEC_PROLOGUE_OO)); |
return(mdoc_nerr(mdoc, node, "prologue macro out-of-order")); |
case (MDOC_Dt): |
case (MDOC_Dt): |
if (0 == mdoc->meta.title[0] && mdoc->meta.date) |
if (0 == mdoc->meta.title[0] && mdoc->meta.date) |
break; |
break; |
return(mdoc_verr(mdoc, node, ERR_SEC_PROLOGUE_OO)); |
return(mdoc_nerr(mdoc, node, "prologue macro out-of-order")); |
case (MDOC_Dd): |
case (MDOC_Dd): |
if (0 == mdoc->meta.title[0] && 0 == mdoc->meta.date) |
if (0 == mdoc->meta.title[0] && 0 == mdoc->meta.date) |
break; |
break; |
return(mdoc_verr(mdoc, node, ERR_SEC_PROLOGUE_OO)); |
return(mdoc_nerr(mdoc, node, "prologue macro out-of-order")); |
default: |
default: |
abort(); |
abort(); |
/* NOTREACHED */ |
/* NOTREACHED */ |
Line 419 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
Line 484 pre_prologue(struct mdoc *mdoc, struct mdoc_node *node |
|
/* NOTREACHED */ |
/* NOTREACHED */ |
} |
} |
|
|
return(mdoc_verr(mdoc, node, ERR_SEC_PROLOGUE_REP)); |
return(mdoc_nerr(mdoc, node, "prologue macro repeated")); |
} |
} |
|
|
|
|
Line 449 post_it(struct mdoc *mdoc) |
|
Line 514 post_it(struct mdoc *mdoc) |
|
|
|
argc = n->data.block.argc; |
argc = n->data.block.argc; |
type = TYPE_NONE; |
type = TYPE_NONE; |
|
|
|
/* Some types require block-head, some not. */ |
|
|
for (i = 0; TYPE_NONE == type && i < argc; i++) |
for (i = 0; TYPE_NONE == type && i < argc; i++) |
switch (n->data.block.argv[(int)i].arg) { |
switch (n->data.block.argv[(int)i].arg) { |
Line 486 post_it(struct mdoc *mdoc) |
|
Line 553 post_it(struct mdoc *mdoc) |
|
|
|
if (TYPE_HEAD == type) { |
if (TYPE_HEAD == type) { |
if (NULL == (n = mdoc->last->data.block.head)) { |
if (NULL == (n = mdoc->last->data.block.head)) { |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYHEAD)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests line parameters")) |
return(0); |
return(0); |
} else if (NULL == n->child) |
} else if (NULL == n->child) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYHEAD)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests line parameters")) |
return(0); |
return(0); |
|
|
if (NULL == (n = mdoc->last->data.block.body)) { |
if (NULL == (n = mdoc->last->data.block.body)) { |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYBODY)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests body children")) |
return(0); |
return(0); |
} else if (NULL == n->child) |
} else if (NULL == n->child) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYBODY)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests body children")) |
return(0); |
return(0); |
|
|
return(1); |
return(1); |
} |
} |
|
|
if (NULL == (n = mdoc->last->data.block.head)) { |
if (NULL == (n = mdoc->last->data.block.head)) { |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYHEAD)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests line parameters")) |
return(0); |
return(0); |
} else if (NULL == n->child) |
} else if (NULL == n->child) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_EMPTYHEAD)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests line parameters")) |
return(0); |
return(0); |
|
|
if ((n = mdoc->last->data.block.body) && n->child) |
if ((n = mdoc->last->data.block.body) && n->child) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX_NOBODY)) |
if ( ! mdoc_warn(mdoc, WARN_SYNTAX, "macro suggests body children")) |
return(0); |
return(0); |
|
|
/* TODO: make sure columns are aligned. */ |
if (MDOC_Column != sv) |
assert(MDOC_Column != sv); |
return(1); |
|
|
return(1); |
/* Make sure the number of columns is sane. */ |
|
|
|
sv = mdoc->last->parent->parent->data.block.argv->sz; |
|
n = mdoc->last->data.block.head->child; |
|
|
|
for (i = 0; n; n = n->next) |
|
i++; |
|
|
|
if (i == (size_t)sv) |
|
return(1); |
|
return(mdoc_err(mdoc, "expected %d list columns, have %d", sv, (int)i)); |
|
|
#undef TYPE_NONE |
#undef TYPE_NONE |
#undef TYPE_BODY |
#undef TYPE_BODY |
#undef TYPE_HEAD |
#undef TYPE_HEAD |
Line 542 post_bl(struct mdoc *mdoc) |
|
Line 619 post_bl(struct mdoc *mdoc) |
|
} |
} |
if (NULL == n) |
if (NULL == n) |
return(1); |
return(1); |
return(mdoc_verr(mdoc, n, ERR_SYNTAX_CHILDBAD)); |
return(mdoc_nerr(mdoc, n, "invalid child of parent macro `Bl'")); |
} |
} |
|
|
|
|
Line 577 post_sh(struct mdoc *mdoc) |
|
Line 654 post_sh(struct mdoc *mdoc) |
|
return(1); |
return(1); |
|
|
if (sec == mdoc->sec_lastn) |
if (sec == mdoc->sec_lastn) |
return(mdoc_warn(mdoc, WARN_SEC_REP)); |
return(mdoc_warn(mdoc, WARN_SYNTAX, "section repeated")); |
return(mdoc_warn(mdoc, WARN_SEC_OO)); |
return(mdoc_warn(mdoc, WARN_SYNTAX, "section out of conventional order")); |
} |
} |
|
|
|
|