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

1.12    ! schwarze    1: /*     $OpenBSD: tbl_opts.c,v 1.11 2015/01/28 15:02:25 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.12    ! schwarze   81:                mandoc_vmsg(MANDOCERR_TBLOPT_EQN, tbl->parse,
        !            82:                    ln, *pos, "%.*s", len, p + *pos);
1.9       schwarze   83:                want = 2;
1.1       schwarze   84:                break;
1.5       schwarze   85:        case KEY_TAB:
1.9       schwarze   86:                want = 1;
                     87:                if (len == want)
                     88:                        tbl->opts.tab = p[*pos];
                     89:                break;
1.5       schwarze   90:        case KEY_LINESIZE:
1.9       schwarze   91:                want = 0;
                     92:                break;
1.5       schwarze   93:        case KEY_DPOINT:
1.9       schwarze   94:                want = 1;
                     95:                if (len == want)
                     96:                        tbl->opts.decimal = p[*pos];
                     97:                break;
1.1       schwarze   98:        default:
                     99:                abort();
                    100:                /* NOTREACHED */
                    101:        }
                    102:
1.9       schwarze  103:        if (len == 0)
                    104:                mandoc_msg(MANDOCERR_TBLOPT_NOARG,
1.10      schwarze  105:                    tbl->parse, ln, *pos, keys[key].name);
1.9       schwarze  106:        else if (want && len != want)
                    107:                mandoc_vmsg(MANDOCERR_TBLOPT_ARGSZ,
1.10      schwarze  108:                    tbl->parse, ln, *pos, "%s want %d have %d",
                    109:                    keys[key].name, want, len);
1.1       schwarze  110:
1.9       schwarze  111:        *pos += len;
                    112:        if (p[*pos] == ')')
                    113:                (*pos)++;
1.1       schwarze  114: }
                    115:
1.9       schwarze  116: /*
                    117:  * Parse one line of options up to the semicolon.
                    118:  * Each option can be preceded by blanks and/or commas,
                    119:  * and some options are followed by arguments.
                    120:  */
                    121: void
1.11      schwarze  122: tbl_option(struct tbl_node *tbl, int ln, const char *p, int *offs)
1.1       schwarze  123: {
1.9       schwarze  124:        int              i, pos, len;
1.1       schwarze  125:
1.11      schwarze  126:        pos = *offs;
1.9       schwarze  127:        for (;;) {
1.10      schwarze  128:                while (p[pos] == ' ' || p[pos] == '\t' || p[pos] == ',')
1.9       schwarze  129:                        pos++;
1.1       schwarze  130:
1.11      schwarze  131:                if (p[pos] == ';') {
                    132:                        *offs = pos + 1;
1.9       schwarze  133:                        return;
1.11      schwarze  134:                }
1.1       schwarze  135:
1.9       schwarze  136:                /* Parse one option name. */
1.1       schwarze  137:
1.9       schwarze  138:                len = 0;
                    139:                while (isalpha((unsigned char)p[pos + len]))
                    140:                        len++;
                    141:
                    142:                if (len == 0) {
                    143:                        mandoc_vmsg(MANDOCERR_TBLOPT_ALPHA,
                    144:                            tbl->parse, ln, pos, "%c", p[pos]);
                    145:                        pos++;
                    146:                        continue;
                    147:                }
1.1       schwarze  148:
1.9       schwarze  149:                /* Look up the option name. */
1.1       schwarze  150:
1.9       schwarze  151:                i = 0;
                    152:                while (i < KEY_MAXKEYS &&
                    153:                    (strncasecmp(p + pos, keys[i].name, len) ||
                    154:                     keys[i].name[len] != '\0'))
                    155:                        i++;
                    156:
                    157:                if (i == KEY_MAXKEYS) {
                    158:                        mandoc_vmsg(MANDOCERR_TBLOPT_BAD, tbl->parse,
                    159:                            ln, pos, "%.*s", len, p + pos);
                    160:                        pos += len;
1.1       schwarze  161:                        continue;
1.9       schwarze  162:                }
1.1       schwarze  163:
1.9       schwarze  164:                /* Handle the option. */
1.1       schwarze  165:
1.9       schwarze  166:                pos += len;
1.5       schwarze  167:                if (keys[i].key)
1.1       schwarze  168:                        tbl->opts.opts |= keys[i].key;
1.9       schwarze  169:                else
1.10      schwarze  170:                        arg(tbl, ln, p, &pos, i);
1.1       schwarze  171:        }
                    172: }