version 1.21, 2009/07/20 14:12:27 |
version 1.24, 2009/08/20 09:07:24 |
|
|
* There's no limit to the number or arguments that may be allocated. |
* There's no limit to the number or arguments that may be allocated. |
*/ |
*/ |
|
|
/* FIXME .Bf Li raises "macro-like parameter". */ |
|
|
|
#define ARGS_DELIM (1 << 1) |
|
#define ARGS_TABSEP (1 << 2) |
|
|
|
#define ARGV_NONE (1 << 0) |
#define ARGV_NONE (1 << 0) |
#define ARGV_SINGLE (1 << 1) |
#define ARGV_SINGLE (1 << 1) |
#define ARGV_MULTI (1 << 2) |
#define ARGV_MULTI (1 << 2) |
Line 327 mdoc_argv_free(struct mdoc_arg *p) |
|
Line 322 mdoc_argv_free(struct mdoc_arg *p) |
|
|
|
|
|
int |
int |
mdoc_zargs(struct mdoc *m, int line, int *pos, char *buf, char **v) |
mdoc_zargs(struct mdoc *m, int line, int *pos, |
|
char *buf, int flags, char **v) |
{ |
{ |
|
|
return(args(m, line, pos, buf, 0, v)); |
return(args(m, line, pos, buf, flags, v)); |
} |
} |
|
|
|
|
Line 379 args(struct mdoc *m, int line, int *pos, |
|
Line 375 args(struct mdoc *m, int line, int *pos, |
|
int i; |
int i; |
char *p, *pp; |
char *p, *pp; |
|
|
|
/* |
|
* Parse out the terms (like `val' in `.Xx -arg val' or simply |
|
* `.Xx val'), which can have all sorts of properties: |
|
* |
|
* ARGS_DELIM: use special handling if encountering trailing |
|
* delimiters in the form of [[::delim::][ ]+]+. |
|
* |
|
* ARGS_NOWARN: don't post warnings. This is only used when |
|
* re-parsing delimiters, as the warnings have already been |
|
* posted. |
|
* |
|
* ARGS_TABSEP: use special handling for tab/`Ta' separated |
|
* phrases like in `Bl -column'. |
|
*/ |
|
|
assert(*pos); |
assert(*pos); |
assert(' ' != buf[*pos]); |
assert(' ' != buf[*pos]); |
|
|
Line 403 args(struct mdoc *m, int line, int *pos, |
|
Line 414 args(struct mdoc *m, int line, int *pos, |
|
i++; |
i++; |
} |
} |
|
|
/* FIXME: warn about trailing whitespace. */ |
|
|
|
if (0 == buf[i]) { |
if (0 == buf[i]) { |
*v = &buf[*pos]; |
*v = &buf[*pos]; |
|
if (' ' != buf[i - 1]) |
|
return(ARGS_PUNCT); |
|
if (ARGS_NOWARN & fl) |
|
return(ARGS_PUNCT); |
|
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
|
return(ARGS_ERROR); |
return(ARGS_PUNCT); |
return(ARGS_PUNCT); |
} |
} |
} |
} |
Line 450 args(struct mdoc *m, int line, int *pos, |
|
Line 465 args(struct mdoc *m, int line, int *pos, |
|
p = strchr(*v, 0); |
p = strchr(*v, 0); |
|
|
/* Whitespace check for eoln case... */ |
/* Whitespace check for eoln case... */ |
if (0 == *p && ' ' == *(p - 1)) |
if (0 == *p && ' ' == *(p - 1) && ! (ARGS_NOWARN & fl)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
return(ARGS_ERROR); |
return(ARGS_ERROR); |
|
|
Line 490 args(struct mdoc *m, int line, int *pos, |
|
Line 505 args(struct mdoc *m, int line, int *pos, |
|
} |
} |
|
|
if (0 == buf[*pos]) { |
if (0 == buf[*pos]) { |
|
if (ARGS_NOWARN & fl) |
|
return(ARGS_QWORD); |
if ( ! mdoc_pwarn(m, line, *pos, EQUOTTERM)) |
if ( ! mdoc_pwarn(m, line, *pos, EQUOTTERM)) |
return(ARGS_ERROR); |
return(ARGS_ERROR); |
return(ARGS_QWORD); |
return(ARGS_QWORD); |
Line 503 args(struct mdoc *m, int line, int *pos, |
|
Line 520 args(struct mdoc *m, int line, int *pos, |
|
while (' ' == buf[*pos]) |
while (' ' == buf[*pos]) |
(*pos)++; |
(*pos)++; |
|
|
if (0 == buf[*pos]) |
if (0 == buf[*pos] && ! (ARGS_NOWARN & fl)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
return(ARGS_ERROR); |
return(ARGS_ERROR); |
|
|
Line 527 args(struct mdoc *m, int line, int *pos, |
|
Line 544 args(struct mdoc *m, int line, int *pos, |
|
while (' ' == buf[*pos]) |
while (' ' == buf[*pos]) |
(*pos)++; |
(*pos)++; |
|
|
if (0 == buf[*pos]) |
if (0 == buf[*pos] && ! (ARGS_NOWARN & fl)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
if ( ! mdoc_pwarn(m, line, *pos, ETAILWS)) |
return(ARGS_ERROR); |
return(ARGS_ERROR); |
|
|