[BACK]Return to tbl_opts.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / mandoc

Annotation of src/usr.bin/mandoc/tbl_opts.c, Revision 1.11

1.11    ! schwarze    1: /*     $OpenBSD: tbl_opts.c,v 1.10 2015/01/26 13:02:53 schwarze Exp $ */
1.1       schwarze    2: /*
1.2       schwarze    3:  * Copyright (c) 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
1.9       schwarze    4:  * Copyright (c) 2015 Ingo Schwarze <schwarze@openbsd.org>
1.1       schwarze    5:  *
                      6:  * Permission to use, copy, modify, and distribute this software for any
                      7:  * purpose with or without fee is hereby granted, provided that the above
                      8:  * copyright notice and this permission notice appear in all copies.
                      9:  *
                     10:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     11:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     12:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     13:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     14:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     15:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     16:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
                     17:  */
1.7       schwarze   18: #include <sys/types.h>
                     19:
1.1       schwarze   20: #include <ctype.h>
                     21: #include <stdio.h>
                     22: #include <stdlib.h>
                     23: #include <string.h>
                     24:
                     25: #include "mandoc.h"
1.4       schwarze   26: #include "libmandoc.h"
1.1       schwarze   27: #include "libroff.h"
                     28:
1.10      schwarze   29: #define        KEY_DPOINT      0
                     30: #define        KEY_DELIM       1
                     31: #define        KEY_LINESIZE    2
                     32: #define        KEY_TAB         3
1.1       schwarze   33:
                     34: struct tbl_phrase {
                     35:        const char      *name;
                     36:        int              key;
                     37: };
                     38:
1.10      schwarze   39: static const struct tbl_phrase keys[] = {
                     40:        {"decimalpoint", 0},
                     41:        {"delim",        0},
                     42:        {"linesize",     0},
                     43:        {"tab",          0},
                     44:        {"allbox",       TBL_OPT_ALLBOX | TBL_OPT_BOX},
                     45:        {"box",          TBL_OPT_BOX},
                     46:        {"frame",        TBL_OPT_BOX},
                     47:        {"center",       TBL_OPT_CENTRE},
                     48:        {"centre",       TBL_OPT_CENTRE},
                     49:        {"doublebox",    TBL_OPT_DBOX},
                     50:        {"doubleframe",  TBL_OPT_DBOX},
                     51:        {"expand",       TBL_OPT_EXPAND},
                     52:        {"nokeep",       TBL_OPT_NOKEEP},
                     53:        {"nospaces",     TBL_OPT_NOSPACE},
                     54:        {"nowarn",       TBL_OPT_NOWARN},
                     55: };
1.1       schwarze   56:
1.10      schwarze   57: #define KEY_MAXKEYS ((int)(sizeof(keys)/sizeof(keys[0])))
1.1       schwarze   58:
1.10      schwarze   59: static void     arg(struct tbl_node *, int, const char *, int *, int);
1.1       schwarze   60:
1.5       schwarze   61:
1.9       schwarze   62: static void
1.10      schwarze   63: arg(struct tbl_node *tbl, int ln, const char *p, int *pos, int key)
1.1       schwarze   64: {
1.9       schwarze   65:        int              len, want;
1.1       schwarze   66:
1.10      schwarze   67:        while (p[*pos] == ' ' || p[*pos] == '\t')
1.1       schwarze   68:                (*pos)++;
                     69:
1.9       schwarze   70:        /* Arguments are enclosed in parentheses. */
1.1       schwarze   71:
1.9       schwarze   72:        len = 0;
                     73:        if (p[*pos] == '(') {
                     74:                (*pos)++;
                     75:                while (p[*pos + len] != ')')
                     76:                        len++;
1.1       schwarze   77:        }
                     78:
                     79:        switch (key) {
1.5       schwarze   80:        case KEY_DELIM:
1.10      schwarze   81:                mandoc_msg(MANDOCERR_TBLEQN, tbl->parse, ln, *pos, NULL);
1.9       schwarze   82:                want = 2;
1.1       schwarze   83:                break;
1.5       schwarze   84:        case KEY_TAB:
1.9       schwarze   85:                want = 1;
                     86:                if (len == want)
                     87:                        tbl->opts.tab = p[*pos];
                     88:                break;
1.5       schwarze   89:        case KEY_LINESIZE:
1.9       schwarze   90:                want = 0;
                     91:                break;
1.5       schwarze   92:        case KEY_DPOINT:
1.9       schwarze   93:                want = 1;
                     94:                if (len == want)
                     95:                        tbl->opts.decimal = p[*pos];
                     96:                break;
1.1       schwarze   97:        default:
                     98:                abort();
                     99:                /* NOTREACHED */
                    100:        }
                    101:
1.9       schwarze  102:        if (len == 0)
                    103:                mandoc_msg(MANDOCERR_TBLOPT_NOARG,
1.10      schwarze  104:                    tbl->parse, ln, *pos, keys[key].name);
1.9       schwarze  105:        else if (want && len != want)
                    106:                mandoc_vmsg(MANDOCERR_TBLOPT_ARGSZ,
1.10      schwarze  107:                    tbl->parse, ln, *pos, "%s want %d have %d",
                    108:                    keys[key].name, want, len);
1.1       schwarze  109:
1.9       schwarze  110:        *pos += len;
                    111:        if (p[*pos] == ')')
                    112:                (*pos)++;
1.1       schwarze  113: }
                    114:
1.9       schwarze  115: /*
                    116:  * Parse one line of options up to the semicolon.
                    117:  * Each option can be preceded by blanks and/or commas,
                    118:  * and some options are followed by arguments.
                    119:  */
                    120: void
1.11    ! schwarze  121: tbl_option(struct tbl_node *tbl, int ln, const char *p, int *offs)
1.1       schwarze  122: {
1.9       schwarze  123:        int              i, pos, len;
1.1       schwarze  124:
1.11    ! schwarze  125:        pos = *offs;
1.9       schwarze  126:        for (;;) {
1.10      schwarze  127:                while (p[pos] == ' ' || p[pos] == '\t' || p[pos] == ',')
1.9       schwarze  128:                        pos++;
1.1       schwarze  129:
1.11    ! schwarze  130:                if (p[pos] == ';') {
        !           131:                        *offs = pos + 1;
1.9       schwarze  132:                        return;
1.11    ! schwarze  133:                }
1.1       schwarze  134:
1.9       schwarze  135:                /* Parse one option name. */
1.1       schwarze  136:
1.9       schwarze  137:                len = 0;
                    138:                while (isalpha((unsigned char)p[pos + len]))
                    139:                        len++;
                    140:
                    141:                if (len == 0) {
                    142:                        mandoc_vmsg(MANDOCERR_TBLOPT_ALPHA,
                    143:                            tbl->parse, ln, pos, "%c", p[pos]);
                    144:                        pos++;
                    145:                        continue;
                    146:                }
1.1       schwarze  147:
1.9       schwarze  148:                /* Look up the option name. */
1.1       schwarze  149:
1.9       schwarze  150:                i = 0;
                    151:                while (i < KEY_MAXKEYS &&
                    152:                    (strncasecmp(p + pos, keys[i].name, len) ||
                    153:                     keys[i].name[len] != '\0'))
                    154:                        i++;
                    155:
                    156:                if (i == KEY_MAXKEYS) {
                    157:                        mandoc_vmsg(MANDOCERR_TBLOPT_BAD, tbl->parse,
                    158:                            ln, pos, "%.*s", len, p + pos);
                    159:                        pos += len;
1.1       schwarze  160:                        continue;
1.9       schwarze  161:                }
1.1       schwarze  162:
1.9       schwarze  163:                /* Handle the option. */
1.1       schwarze  164:
1.9       schwarze  165:                pos += len;
1.5       schwarze  166:                if (keys[i].key)
1.1       schwarze  167:                        tbl->opts.opts |= keys[i].key;
1.9       schwarze  168:                else
1.10      schwarze  169:                        arg(tbl, ln, p, &pos, i);
1.1       schwarze  170:        }
                    171: }