[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.16

1.16    ! schwarze    1: /*     $OpenBSD: tbl_opts.c,v 1.15 2018/12/13 02:05:57 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.14      schwarze   26: #include "tbl.h"
1.4       schwarze   27: #include "libmandoc.h"
1.15      schwarze   28: #include "tbl_int.h"
1.1       schwarze   29:
1.10      schwarze   30: #define        KEY_DPOINT      0
                     31: #define        KEY_DELIM       1
                     32: #define        KEY_LINESIZE    2
                     33: #define        KEY_TAB         3
1.1       schwarze   34:
                     35: struct tbl_phrase {
                     36:        const char      *name;
                     37:        int              key;
                     38: };
                     39:
1.10      schwarze   40: static const struct tbl_phrase keys[] = {
                     41:        {"decimalpoint", 0},
                     42:        {"delim",        0},
                     43:        {"linesize",     0},
                     44:        {"tab",          0},
                     45:        {"allbox",       TBL_OPT_ALLBOX | TBL_OPT_BOX},
                     46:        {"box",          TBL_OPT_BOX},
                     47:        {"frame",        TBL_OPT_BOX},
                     48:        {"center",       TBL_OPT_CENTRE},
                     49:        {"centre",       TBL_OPT_CENTRE},
                     50:        {"doublebox",    TBL_OPT_DBOX},
                     51:        {"doubleframe",  TBL_OPT_DBOX},
                     52:        {"expand",       TBL_OPT_EXPAND},
                     53:        {"nokeep",       TBL_OPT_NOKEEP},
                     54:        {"nospaces",     TBL_OPT_NOSPACE},
                     55:        {"nowarn",       TBL_OPT_NOWARN},
                     56: };
1.1       schwarze   57:
1.10      schwarze   58: #define KEY_MAXKEYS ((int)(sizeof(keys)/sizeof(keys[0])))
1.1       schwarze   59:
1.10      schwarze   60: static void     arg(struct tbl_node *, int, const char *, int *, int);
1.1       schwarze   61:
1.5       schwarze   62:
1.9       schwarze   63: static void
1.10      schwarze   64: arg(struct tbl_node *tbl, int ln, const char *p, int *pos, int key)
1.1       schwarze   65: {
1.9       schwarze   66:        int              len, want;
1.1       schwarze   67:
1.10      schwarze   68:        while (p[*pos] == ' ' || p[*pos] == '\t')
1.1       schwarze   69:                (*pos)++;
                     70:
1.9       schwarze   71:        /* Arguments are enclosed in parentheses. */
1.1       schwarze   72:
1.9       schwarze   73:        len = 0;
                     74:        if (p[*pos] == '(') {
                     75:                (*pos)++;
                     76:                while (p[*pos + len] != ')')
                     77:                        len++;
1.1       schwarze   78:        }
                     79:
                     80:        switch (key) {
1.5       schwarze   81:        case KEY_DELIM:
1.16    ! schwarze   82:                mandoc_msg(MANDOCERR_TBLOPT_EQN,
1.12      schwarze   83:                    ln, *pos, "%.*s", len, p + *pos);
1.9       schwarze   84:                want = 2;
1.1       schwarze   85:                break;
1.5       schwarze   86:        case KEY_TAB:
1.9       schwarze   87:                want = 1;
                     88:                if (len == want)
                     89:                        tbl->opts.tab = p[*pos];
                     90:                break;
1.5       schwarze   91:        case KEY_LINESIZE:
1.9       schwarze   92:                want = 0;
                     93:                break;
1.5       schwarze   94:        case KEY_DPOINT:
1.9       schwarze   95:                want = 1;
                     96:                if (len == want)
                     97:                        tbl->opts.decimal = p[*pos];
                     98:                break;
1.1       schwarze   99:        default:
                    100:                abort();
                    101:        }
                    102:
1.9       schwarze  103:        if (len == 0)
1.16    ! schwarze  104:                mandoc_msg(MANDOCERR_TBLOPT_NOARG, ln, *pos,
        !           105:                    "%s", keys[key].name);
1.9       schwarze  106:        else if (want && len != want)
1.16    ! schwarze  107:                mandoc_msg(MANDOCERR_TBLOPT_ARGSZ, ln, *pos,
        !           108:                    "%s want %d have %d", 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) {
1.16    ! schwarze  142:                        mandoc_msg(MANDOCERR_TBLOPT_ALPHA,
        !           143:                            ln, pos, "%c", p[pos]);
1.9       schwarze  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) {
1.16    ! schwarze  157:                        mandoc_msg(MANDOCERR_TBLOPT_BAD,
1.9       schwarze  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: }