Annotation of mandoc/argv.c, Revision 1.23
1.23 ! kristaps 1: /* $Id: argv.c,v 1.22 2009/01/20 20:56:21 kristaps Exp $ */
1.1 kristaps 2: /*
3: * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the
7: * above copyright notice and this permission notice appear in all
8: * copies.
9: *
10: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
11: * WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
12: * WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
13: * AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
14: * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
15: * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
16: * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
17: * PERFORMANCE OF THIS SOFTWARE.
18: */
19: #include <assert.h>
20: #include <ctype.h>
21: #include <err.h>
22: #include <stdlib.h>
23: #include <stdio.h>
24: #include <string.h>
25:
26: #include "private.h"
27:
1.20 kristaps 28: /*
29: * Parse arguments and parameters of macros. Arguments follow the
30: * syntax of `-arg [val [valN...]]', while parameters are free-form text
31: * following arguments (if any). This file must correctly handle the
32: * strange punctuation rules dictated by groff.
33: */
34:
1.15 kristaps 35: /* FIXME: .It called with -column and quoted arguments. */
36:
1.2 kristaps 37: static int lookup(int, const char *);
1.16 kristaps 38: static int parse(struct mdoc *, int,
1.2 kristaps 39: struct mdoc_arg *, int *, char *);
1.12 kristaps 40: static int parse_single(struct mdoc *, int,
41: struct mdoc_arg *, int *, char *);
42: static int parse_multi(struct mdoc *, int,
43: struct mdoc_arg *, int *, char *);
1.2 kristaps 44: static int postparse(struct mdoc *, int,
45: const struct mdoc_arg *, int);
1.1 kristaps 46:
1.22 kristaps 47: #define ARGS_QUOTED (1 << 0)
48: #define ARGS_DELIM (1 << 1)
49: #define ARGS_TABSEP (1 << 2)
50:
51: static int mdoc_argflags[MDOC_MAX] = {
52: 0, /* \" */
53: 0, /* Dd */
54: 0, /* Dt */
55: 0, /* Os */
56: 0, /* Sh */
57: 0, /* Ss */
58: ARGS_DELIM, /* Pp */
59: ARGS_DELIM, /* D1 */
60: ARGS_DELIM, /* Dl */
61: 0, /* Bd */
62: 0, /* Ed */
63: 0, /* Bl */
64: 0, /* El */
65: ARGS_DELIM, /* It */
66: ARGS_DELIM, /* Ad */
67: ARGS_DELIM, /* An */
68: ARGS_DELIM, /* Ar */
69: ARGS_QUOTED, /* Cd */
70: ARGS_DELIM, /* Cm */
71: ARGS_DELIM, /* Dv */
72: ARGS_DELIM, /* Er */
73: ARGS_DELIM, /* Ev */
74: 0, /* Ex */
75: ARGS_DELIM | ARGS_QUOTED, /* Fa */
76: 0, /* Fd */
77: ARGS_DELIM, /* Fl */
78: ARGS_DELIM | ARGS_QUOTED, /* Fn */
79: ARGS_DELIM | ARGS_QUOTED, /* Ft */
80: ARGS_DELIM, /* Ic */
81: 0, /* In */
82: ARGS_DELIM, /* Li */
83: 0, /* Nd */
84: ARGS_DELIM, /* Nm */
85: ARGS_DELIM, /* Op */
86: 0, /* Ot */
87: ARGS_DELIM, /* Pa */
88: 0, /* Rv */
89: ARGS_DELIM, /* St */
90: ARGS_DELIM, /* Va */
91: ARGS_DELIM, /* Vt */
92: ARGS_DELIM, /* Xr */
93: ARGS_QUOTED, /* %A */
94: ARGS_QUOTED, /* %B */
95: ARGS_QUOTED, /* %D */
96: ARGS_QUOTED, /* %I */
97: ARGS_QUOTED, /* %J */
98: ARGS_QUOTED, /* %N */
99: ARGS_QUOTED, /* %O */
100: ARGS_QUOTED, /* %P */
101: ARGS_QUOTED, /* %R */
102: ARGS_QUOTED, /* %T */
103: ARGS_QUOTED, /* %V */
104: ARGS_DELIM, /* Ac */
105: 0, /* Ao */
106: ARGS_DELIM, /* Aq */
107: ARGS_DELIM, /* At */
108: ARGS_DELIM, /* Bc */
109: 0, /* Bf */
110: 0, /* Bo */
111: ARGS_DELIM, /* Bq */
112: ARGS_DELIM, /* Bsx */
113: ARGS_DELIM, /* Bx */
114: 0, /* Db */
115: ARGS_DELIM, /* Dc */
116: 0, /* Do */
117: ARGS_DELIM, /* Dq */
118: ARGS_DELIM, /* Ec */
119: 0, /* Ef */
120: ARGS_DELIM, /* Em */
121: 0, /* Eo */
122: ARGS_DELIM, /* Fx */
123: ARGS_DELIM, /* Ms */
124: ARGS_DELIM, /* No */
125: ARGS_DELIM, /* Ns */
126: ARGS_DELIM, /* Nx */
127: ARGS_DELIM, /* Ox */
128: ARGS_DELIM, /* Pc */
129: ARGS_DELIM, /* Pf */
130: 0, /* Po */
131: ARGS_DELIM, /* Pq */
132: ARGS_DELIM, /* Qc */
133: ARGS_DELIM, /* Ql */
134: 0, /* Qo */
135: ARGS_DELIM, /* Qq */
136: 0, /* Re */
137: 0, /* Rs */
138: ARGS_DELIM, /* Sc */
139: 0, /* So */
140: ARGS_DELIM, /* Sq */
141: 0, /* Sm */
142: ARGS_DELIM, /* Sx */
143: ARGS_DELIM, /* Sy */
144: ARGS_DELIM, /* Tn */
145: ARGS_DELIM, /* Ux */
146: ARGS_DELIM, /* Xc */
147: 0, /* Xo */
148: 0, /* Fo */
149: 0, /* Fc */
150: 0, /* Oo */
151: ARGS_DELIM, /* Oc */
152: 0, /* Bk */
153: 0, /* Ek */
154: 0, /* Bt */
155: 0, /* Hf */
156: 0, /* Fr */
157: 0, /* Ud */
158: };
159:
1.1 kristaps 160:
1.2 kristaps 161: int
1.22 kristaps 162: mdoc_args(struct mdoc *mdoc, int line,
163: int *pos, char *buf, int tok, char **v)
1.1 kristaps 164: {
1.22 kristaps 165: int i, fl;
166: struct mdoc_node *n;
167:
168: fl = 0 == tok ? 0 : mdoc_argflags[tok];
169: if (MDOC_It == tok) {
170: n = mdoc->last->parent;
171: /* FIXME: scan for ARGS_TABSEP. */
172: }
1.1 kristaps 173:
174: if (0 == buf[*pos])
1.2 kristaps 175: return(ARGS_EOLN);
176:
177: if ('\"' == buf[*pos] && ! (fl & ARGS_QUOTED))
1.14 kristaps 178: if ( ! mdoc_pwarn(mdoc, line, *pos, WARN_SYNTAX, "unexpected quoted parameter"))
1.2 kristaps 179: return(ARGS_ERROR);
180:
181: if ('-' == buf[*pos])
1.14 kristaps 182: if ( ! mdoc_pwarn(mdoc, line, *pos, WARN_SYNTAX, "argument-like parameter"))
1.2 kristaps 183: return(ARGS_ERROR);
184:
185: if ((fl & ARGS_DELIM) && mdoc_iscdelim(buf[*pos])) {
1.12 kristaps 186: /*
187: * If ARGS_DELIM, return ARGS_PUNCT if only space-separated
188: * punctuation remains.
189: */
1.2 kristaps 190: for (i = *pos; buf[i]; ) {
191: if ( ! mdoc_iscdelim(buf[i]))
192: break;
193: i++;
1.21 kristaps 194: if (0 == buf[i] || ! isspace((int)buf[i]))
1.2 kristaps 195: break;
196: i++;
1.21 kristaps 197: while (buf[i] && isspace((int)buf[i]))
1.2 kristaps 198: i++;
199: }
200: if (0 == buf[i]) {
201: *v = &buf[*pos];
202: return(ARGS_PUNCT);
203: }
204: }
205:
1.12 kristaps 206: /* Parse routine for non-quoted string. */
1.1 kristaps 207:
1.17 kristaps 208: assert(*pos > 0);
209: if ('\"' != buf[*pos] || ! (ARGS_QUOTED & fl)) {
1.1 kristaps 210: *v = &buf[*pos];
211:
1.12 kristaps 212: /* FIXME: UGLY tab-sep processing. */
213:
214: if (ARGS_TABSEP & fl)
215: while (buf[*pos]) {
216: if ('\t' == buf[*pos])
217: break;
218: if ('T' == buf[*pos]) {
219: (*pos)++;
220: if (0 == buf[*pos])
221: break;
222: if ('a' == buf[*pos]) {
223: buf[*pos - 1] = 0;
224: break;
225: }
226: }
227: (*pos)++;
228: }
1.17 kristaps 229: else {
230: while (buf[*pos]) {
1.21 kristaps 231: if (isspace((int)buf[*pos]))
1.17 kristaps 232: if ('\\' != buf[*pos - 1])
233: break;
1.12 kristaps 234: (*pos)++;
1.17 kristaps 235: }
236: }
1.1 kristaps 237:
238: if (0 == buf[*pos])
1.2 kristaps 239: return(ARGS_WORD);
1.1 kristaps 240:
241: buf[(*pos)++] = 0;
1.12 kristaps 242:
1.1 kristaps 243: if (0 == buf[*pos])
1.2 kristaps 244: return(ARGS_WORD);
1.1 kristaps 245:
1.12 kristaps 246: if ( ! (ARGS_TABSEP & fl))
1.21 kristaps 247: while (buf[*pos] && isspace((int)buf[*pos]))
1.12 kristaps 248: (*pos)++;
1.1 kristaps 249:
250: if (buf[*pos])
1.2 kristaps 251: return(ARGS_WORD);
1.1 kristaps 252:
1.14 kristaps 253: if ( ! mdoc_pwarn(mdoc, line, *pos, WARN_COMPAT, "whitespace at end-of-line"))
1.2 kristaps 254: return(ARGS_ERROR);
1.1 kristaps 255:
1.2 kristaps 256: return(ARGS_WORD);
257: }
258:
259: /*
260: * If we're a quoted string (and quoted strings are allowed),
261: * then parse ahead to the next quote. If none's found, it's an
1.4 kristaps 262: * error. After, parse to the next word.
1.2 kristaps 263: */
1.1 kristaps 264:
265: *v = &buf[++(*pos)];
266:
267: while (buf[*pos] && '\"' != buf[*pos])
268: (*pos)++;
269:
270: if (0 == buf[*pos]) {
1.14 kristaps 271: (void)mdoc_perr(mdoc, line, *pos, "unterminated quoted parameter");
1.2 kristaps 272: return(ARGS_ERROR);
1.1 kristaps 273: }
274:
275: buf[(*pos)++] = 0;
276: if (0 == buf[*pos])
1.19 kristaps 277: return(ARGS_QWORD);
1.1 kristaps 278:
1.21 kristaps 279: while (buf[*pos] && isspace((int)buf[*pos]))
1.1 kristaps 280: (*pos)++;
281:
282: if (buf[*pos])
1.19 kristaps 283: return(ARGS_QWORD);
1.1 kristaps 284:
1.14 kristaps 285: if ( ! mdoc_pwarn(mdoc, line, *pos, WARN_COMPAT, "whitespace at end-of-line"))
1.2 kristaps 286: return(ARGS_ERROR);
287:
1.19 kristaps 288: return(ARGS_QWORD);
1.1 kristaps 289: }
290:
291:
1.2 kristaps 292: static int
293: lookup(int tok, const char *argv)
1.1 kristaps 294: {
295:
296: switch (tok) {
1.6 kristaps 297: case (MDOC_An):
298: if (xstrcmp(argv, "split"))
299: return(MDOC_Split);
300: else if (xstrcmp(argv, "nosplit"))
301: return(MDOC_Nosplit);
302: break;
303:
1.2 kristaps 304: case (MDOC_Bd):
1.1 kristaps 305: if (xstrcmp(argv, "ragged"))
306: return(MDOC_Ragged);
307: else if (xstrcmp(argv, "unfilled"))
308: return(MDOC_Unfilled);
1.13 kristaps 309: else if (xstrcmp(argv, "filled"))
310: return(MDOC_Filled);
1.1 kristaps 311: else if (xstrcmp(argv, "literal"))
312: return(MDOC_Literal);
313: else if (xstrcmp(argv, "file"))
314: return(MDOC_File);
315: else if (xstrcmp(argv, "offset"))
316: return(MDOC_Offset);
1.2 kristaps 317: break;
318:
1.8 kristaps 319: case (MDOC_Bf):
320: if (xstrcmp(argv, "emphasis"))
321: return(MDOC_Emphasis);
322: else if (xstrcmp(argv, "literal"))
323: return(MDOC_Literal);
324: else if (xstrcmp(argv, "symbolic"))
325: return(MDOC_Symbolic);
326: break;
327:
1.7 kristaps 328: case (MDOC_Bk):
329: if (xstrcmp(argv, "words"))
330: return(MDOC_Words);
331: break;
332:
1.2 kristaps 333: case (MDOC_Bl):
334: if (xstrcmp(argv, "bullet"))
1.1 kristaps 335: return(MDOC_Bullet);
336: else if (xstrcmp(argv, "dash"))
337: return(MDOC_Dash);
338: else if (xstrcmp(argv, "hyphen"))
339: return(MDOC_Hyphen);
340: else if (xstrcmp(argv, "item"))
341: return(MDOC_Item);
342: else if (xstrcmp(argv, "enum"))
343: return(MDOC_Enum);
344: else if (xstrcmp(argv, "tag"))
345: return(MDOC_Tag);
346: else if (xstrcmp(argv, "diag"))
347: return(MDOC_Diag);
348: else if (xstrcmp(argv, "hang"))
349: return(MDOC_Hang);
350: else if (xstrcmp(argv, "ohang"))
351: return(MDOC_Ohang);
352: else if (xstrcmp(argv, "inset"))
353: return(MDOC_Inset);
354: else if (xstrcmp(argv, "column"))
355: return(MDOC_Column);
356: else if (xstrcmp(argv, "width"))
357: return(MDOC_Width);
1.2 kristaps 358: else if (xstrcmp(argv, "offset"))
359: return(MDOC_Offset);
1.1 kristaps 360: else if (xstrcmp(argv, "compact"))
361: return(MDOC_Compact);
1.2 kristaps 362: break;
1.3 kristaps 363:
364: case (MDOC_Rv):
365: /* FALLTHROUGH */
366: case (MDOC_Ex):
367: if (xstrcmp(argv, "std"))
368: return(MDOC_Std);
369: break;
1.5 kristaps 370:
371: case (MDOC_St):
372: if (xstrcmp(argv, "p1003.1-88"))
373: return(MDOC_p1003_1_88);
374: else if (xstrcmp(argv, "p1003.1-90"))
375: return(MDOC_p1003_1_90);
376: else if (xstrcmp(argv, "p1003.1-96"))
377: return(MDOC_p1003_1_96);
378: else if (xstrcmp(argv, "p1003.1-2001"))
379: return(MDOC_p1003_1_2001);
380: else if (xstrcmp(argv, "p1003.1-2004"))
381: return(MDOC_p1003_1_2004);
382: else if (xstrcmp(argv, "p1003.1"))
383: return(MDOC_p1003_1);
384: else if (xstrcmp(argv, "p1003.1b"))
385: return(MDOC_p1003_1b);
386: else if (xstrcmp(argv, "p1003.1b-93"))
387: return(MDOC_p1003_1b_93);
388: else if (xstrcmp(argv, "p1003.1c-95"))
389: return(MDOC_p1003_1c_95);
390: else if (xstrcmp(argv, "p1003.1g-2000"))
391: return(MDOC_p1003_1g_2000);
392: else if (xstrcmp(argv, "p1003.2-92"))
393: return(MDOC_p1003_2_92);
394: else if (xstrcmp(argv, "p1003.2-95"))
395: return(MDOC_p1387_2_95);
396: else if (xstrcmp(argv, "p1003.2"))
397: return(MDOC_p1003_2);
398: else if (xstrcmp(argv, "p1387.2-95"))
399: return(MDOC_p1387_2);
400: else if (xstrcmp(argv, "isoC-90"))
401: return(MDOC_isoC_90);
402: else if (xstrcmp(argv, "isoC-amd1"))
403: return(MDOC_isoC_amd1);
404: else if (xstrcmp(argv, "isoC-tcor1"))
405: return(MDOC_isoC_tcor1);
406: else if (xstrcmp(argv, "isoC-tcor2"))
407: return(MDOC_isoC_tcor2);
408: else if (xstrcmp(argv, "isoC-99"))
409: return(MDOC_isoC_99);
410: else if (xstrcmp(argv, "ansiC"))
411: return(MDOC_ansiC);
412: else if (xstrcmp(argv, "ansiC-89"))
413: return(MDOC_ansiC_89);
414: else if (xstrcmp(argv, "ansiC-99"))
415: return(MDOC_ansiC_99);
416: else if (xstrcmp(argv, "ieee754"))
417: return(MDOC_ieee754);
418: else if (xstrcmp(argv, "iso8802-3"))
419: return(MDOC_iso8802_3);
420: else if (xstrcmp(argv, "xpg3"))
421: return(MDOC_xpg3);
422: else if (xstrcmp(argv, "xpg4"))
423: return(MDOC_xpg4);
424: else if (xstrcmp(argv, "xpg4.2"))
425: return(MDOC_xpg4_2);
426: else if (xstrcmp(argv, "xpg4.3"))
427: return(MDOC_xpg4_3);
428: else if (xstrcmp(argv, "xbd5"))
429: return(MDOC_xbd5);
430: else if (xstrcmp(argv, "xcu5"))
431: return(MDOC_xcu5);
432: else if (xstrcmp(argv, "xsh5"))
433: return(MDOC_xsh5);
434: else if (xstrcmp(argv, "xns5"))
435: return(MDOC_xns5);
436: else if (xstrcmp(argv, "xns5.2d2.0"))
437: return(MDOC_xns5_2d2_0);
438: else if (xstrcmp(argv, "xcurses4.2"))
439: return(MDOC_xcurses4_2);
440: else if (xstrcmp(argv, "susv2"))
441: return(MDOC_susv2);
442: else if (xstrcmp(argv, "susv3"))
443: return(MDOC_susv3);
444: else if (xstrcmp(argv, "svid4"))
445: return(MDOC_svid4);
446: break;
1.1 kristaps 447:
448: default:
1.8 kristaps 449: break;
1.1 kristaps 450: }
451:
452: return(MDOC_ARG_MAX);
453: }
454:
455:
1.2 kristaps 456: static int
1.9 kristaps 457: postparse(struct mdoc *mdoc, int line, const struct mdoc_arg *v, int pos)
1.2 kristaps 458: {
459:
460: switch (v->arg) {
461: case (MDOC_Offset):
462: assert(v->value);
463: assert(v->value[0]);
464: if (xstrcmp(v->value[0], "left"))
465: break;
466: if (xstrcmp(v->value[0], "right"))
467: break;
468: if (xstrcmp(v->value[0], "center"))
469: break;
470: if (xstrcmp(v->value[0], "indent"))
471: break;
472: if (xstrcmp(v->value[0], "indent-two"))
473: break;
1.14 kristaps 474: return(mdoc_perr(mdoc, line, pos, "invalid offset value"));
1.2 kristaps 475: default:
476: break;
477: }
478:
479: return(1);
480: }
481:
482:
483: static int
1.12 kristaps 484: parse_multi(struct mdoc *mdoc, int line,
485: struct mdoc_arg *v, int *pos, char *buf)
486: {
487: int c, ppos;
488: char *p;
489:
490: v->sz = 0;
491: v->value = xcalloc(MDOC_LINEARG_MAX, sizeof(char *));
492:
493: ppos = *pos;
494:
495: for (v->sz = 0; v->sz < MDOC_LINEARG_MAX; v->sz++) {
496: if ('-' == buf[*pos])
497: break;
498: c = mdoc_args(mdoc, line, pos, buf, ARGS_QUOTED, &p);
499: if (ARGS_ERROR == c) {
500: free(v->value);
501: return(0);
502: } else if (ARGS_EOLN == c)
503: break;
504: v->value[v->sz] = p;
505: }
506:
507: if (0 < v->sz && v->sz < MDOC_LINEARG_MAX)
508: return(1);
509:
510: free(v->value);
1.14 kristaps 511: return(mdoc_perr(mdoc, line, ppos, 0 == v->sz ?
512: "argument requires a value" :
513: "too many values to argument"));
1.12 kristaps 514: }
515:
516:
517: static int
518: parse_single(struct mdoc *mdoc, int line,
1.1 kristaps 519: struct mdoc_arg *v, int *pos, char *buf)
520: {
1.12 kristaps 521: int c, ppos;
1.1 kristaps 522: char *p;
523:
524: ppos = *pos;
525:
1.12 kristaps 526: c = mdoc_args(mdoc, line, pos, buf, ARGS_QUOTED, &p);
527: if (ARGS_ERROR == c)
528: return(0);
529: if (ARGS_EOLN == c)
1.14 kristaps 530: return(mdoc_perr(mdoc, line, ppos, "argument requires a value"));
1.12 kristaps 531:
532: v->sz = 1;
533: v->value = xcalloc(1, sizeof(char *));
534: v->value[0] = p;
535: return(1);
536: }
537:
538:
539: static int
1.16 kristaps 540: parse(struct mdoc *mdoc, int line,
1.12 kristaps 541: struct mdoc_arg *v, int *pos, char *buf)
542: {
543:
544: v->sz = 0;
545: v->value = NULL;
546:
1.2 kristaps 547: switch (v->arg) {
1.3 kristaps 548: case(MDOC_Std):
549: /* FALLTHROUGH */
1.1 kristaps 550: case(MDOC_Width):
551: /* FALLTHROUGH */
552: case(MDOC_Offset):
1.12 kristaps 553: return(parse_single(mdoc, line, v, pos, buf));
1.1 kristaps 554: case(MDOC_Column):
1.12 kristaps 555: return(parse_multi(mdoc, line, v, pos, buf));
1.1 kristaps 556: default:
1.6 kristaps 557: break;
1.1 kristaps 558: }
559:
560: return(1);
561: }
562:
563:
1.2 kristaps 564: int
1.9 kristaps 565: mdoc_argv(struct mdoc *mdoc, int line, int tok,
1.2 kristaps 566: struct mdoc_arg *v, int *pos, char *buf)
567: {
568: int i, ppos;
569: char *argv;
570:
571: (void)memset(v, 0, sizeof(struct mdoc_arg));
572:
573: if (0 == buf[*pos])
1.5 kristaps 574: return(ARGV_EOLN);
1.2 kristaps 575:
1.21 kristaps 576: assert( ! isspace((int)buf[*pos]));
1.2 kristaps 577:
1.5 kristaps 578: if ('-' != buf[*pos])
579: return(ARGV_WORD);
1.2 kristaps 580:
581: i = *pos;
582: argv = &buf[++(*pos)];
583:
1.11 kristaps 584: v->line = line;
585: v->pos = *pos;
586:
1.17 kristaps 587: assert(*pos > 0);
588: while (buf[*pos]) {
1.21 kristaps 589: if (isspace((int)buf[*pos]))
1.17 kristaps 590: if ('\\' != buf[*pos - 1])
591: break;
1.2 kristaps 592: (*pos)++;
1.17 kristaps 593: }
1.2 kristaps 594:
595: if (buf[*pos])
596: buf[(*pos)++] = 0;
597:
598: if (MDOC_ARG_MAX == (v->arg = lookup(tok, argv))) {
1.14 kristaps 599: if ( ! mdoc_pwarn(mdoc, line, i, WARN_SYNTAX, "argument-like parameter"))
600: return(ARGV_ERROR);
1.10 kristaps 601: return(ARGV_WORD);
1.2 kristaps 602: }
603:
1.21 kristaps 604: while (buf[*pos] && isspace((int)buf[*pos]))
1.2 kristaps 605: (*pos)++;
606:
607: /* FIXME: whitespace if no value. */
608:
609: ppos = *pos;
1.16 kristaps 610: if ( ! parse(mdoc, line, v, pos, buf))
1.5 kristaps 611: return(ARGV_ERROR);
1.9 kristaps 612: if ( ! postparse(mdoc, line, v, ppos))
1.5 kristaps 613: return(ARGV_ERROR);
1.2 kristaps 614:
1.5 kristaps 615: return(ARGV_ARG);
1.2 kristaps 616: }
617:
618:
1.1 kristaps 619: void
620: mdoc_argv_free(int sz, struct mdoc_arg *arg)
621: {
622: int i;
623:
624: for (i = 0; i < sz; i++) {
625: if (0 == arg[i].sz) {
626: assert(NULL == arg[i].value);
627: continue;
628: }
629: assert(arg[i].value);
630: free(arg[i].value);
631: }
632: }
1.2 kristaps 633:
CVSweb