=================================================================== RCS file: /cvs/mandoc/Attic/mdocterm.c,v retrieving revision 1.42 retrieving revision 1.48 diff -u -p -r1.42 -r1.48 --- mandoc/Attic/mdocterm.c 2009/03/14 12:35:02 1.42 +++ mandoc/Attic/mdocterm.c 2009/03/17 13:35:46 1.48 @@ -1,6 +1,6 @@ -/* $Id: mdocterm.c,v 1.42 2009/03/14 12:35:02 kristaps Exp $ */ +/* $Id: mdocterm.c,v 1.48 2009/03/17 13:35:46 kristaps Exp $ */ /* - * Copyright (c) 2008 Kristaps Dzonsons + * Copyright (c) 2008, 2009 Kristaps Dzonsons * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the @@ -25,16 +25,25 @@ #include #include #include +#include #include "mmain.h" #include "term.h" -struct termseq { - const char *enc; - int sym; +struct nroffopt { + int fl_h; + int fl_i; + char *arg_m; + char *arg_n; + char *arg_o; + char *arg_r; + char *arg_T; + struct termp *termp; /* Ephemeral. */ }; -static int option(void *, int, const char *); +__dead void punt(struct nroffopt *, char *); +static int option(void *, int, char *); +static int optsopt(struct termp *, char *); static void body(struct termp *, struct termpair *, const struct mdoc_meta *, @@ -52,152 +61,50 @@ static void nescape(struct termp *, static void chara(struct termp *, char); static void stringa(struct termp *, const char *, size_t); -static void symbola(struct termp *, enum tsym); static void sanity(const struct mdoc_node *); -#ifdef __linux__ -extern size_t strlcat(char *, const char *, size_t); -extern size_t strlcpy(char *, const char *, size_t); -#endif - -static struct termseq termenc1[] = { - { "\\", TERMSYM_SLASH }, - { "\'", TERMSYM_RSQUOTE }, - { "`", TERMSYM_LSQUOTE }, - { "-", TERMSYM_HYPHEN }, - { " ", TERMSYM_SPACE }, - { ".", TERMSYM_PERIOD }, - { "&", TERMSYM_BREAK }, - { "e", TERMSYM_SLASH }, - { "q", TERMSYM_DQUOTE }, - { "|", TERMSYM_BREAK }, - { NULL, 0 } -}; - -static struct termseq termenc2[] = { - { "rC", TERMSYM_RBRACE }, - { "lC", TERMSYM_LBRACE }, - { "rB", TERMSYM_RBRACK }, - { "lB", TERMSYM_LBRACK }, - { "ra", TERMSYM_RANGLE }, - { "la", TERMSYM_LANGLE }, - { "Lq", TERMSYM_LDQUOTE }, - { "lq", TERMSYM_LDQUOTE }, - { "Rq", TERMSYM_RDQUOTE }, - { "rq", TERMSYM_RDQUOTE }, - { "oq", TERMSYM_LSQUOTE }, - { "aq", TERMSYM_RSQUOTE }, - - { "<-", TERMSYM_LARROW }, - { "->", TERMSYM_RARROW }, - { "ua", TERMSYM_UARROW }, - { "da", TERMSYM_DARROW }, - - { "bu", TERMSYM_BULLET }, - { "Ba", TERMSYM_BAR }, - { "ba", TERMSYM_BAR }, - { "co", TERMSYM_COPY }, - { "Am", TERMSYM_AMP }, - - { "Le", TERMSYM_LE }, - { "<=", TERMSYM_LE }, - { "Ge", TERMSYM_GE }, - { ">=", TERMSYM_GE }, - { "==", TERMSYM_EQ }, - { "Ne", TERMSYM_NEQ }, - { "!=", TERMSYM_NEQ }, - { "Pm", TERMSYM_PLUSMINUS }, - { "+-", TERMSYM_PLUSMINUS }, - { "If", TERMSYM_INF2 }, - { "if", TERMSYM_INF }, - { "Na", TERMSYM_NAN }, - { "na", TERMSYM_NAN }, - { "**", TERMSYM_ASTERISK }, - { "Gt", TERMSYM_GT }, - { "Lt", TERMSYM_LT }, - - { "aa", TERMSYM_ACUTE }, - { "ga", TERMSYM_GRAVE }, - - { "en", TERMSYM_EN }, - { "em", TERMSYM_EM }, - - { "Pi", TERMSYM_PI }, - { NULL, 0 } -}; - -static struct termsym termsym_ascii[TERMSYM_MAX] = { - { "]", 1 }, /* TERMSYM_RBRACK */ - { "[", 1 }, /* TERMSYM_LBRACK */ - { "<-", 2 }, /* TERMSYM_LARROW */ - { "->", 2 }, /* TERMSYM_RARROW */ - { "^", 1 }, /* TERMSYM_UARROW */ - { "v", 1 }, /* TERMSYM_DARROW */ - { "`", 1 }, /* TERMSYM_LSQUOTE */ - { "\'", 1 }, /* TERMSYM_RSQUOTE */ - { "\'", 1 }, /* TERMSYM_SQUOTE */ - { "``", 2 }, /* TERMSYM_LDQUOTE */ - { "\'\'", 2 }, /* TERMSYM_RDQUOTE */ - { "\"", 1 }, /* TERMSYM_DQUOTE */ - { "<", 1 }, /* TERMSYM_LT */ - { ">", 1 }, /* TERMSYM_GT */ - { "<=", 2 }, /* TERMSYM_LE */ - { ">=", 2 }, /* TERMSYM_GE */ - { "==", 2 }, /* TERMSYM_EQ */ - { "!=", 2 }, /* TERMSYM_NEQ */ - { "\'", 1 }, /* TERMSYM_ACUTE */ - { "`", 1 }, /* TERMSYM_GRAVE */ - { "pi", 2 }, /* TERMSYM_PI */ - { "+=", 2 }, /* TERMSYM_PLUSMINUS */ - { "oo", 2 }, /* TERMSYM_INF */ - { "infinity", 8 }, /* TERMSYM_INF2 */ - { "NaN", 3 }, /* TERMSYM_NAN */ - { "|", 1 }, /* TERMSYM_BAR */ - { "o", 1 }, /* TERMSYM_BULLET */ - { "&", 1 }, /* TERMSYM_AMP */ - { "--", 2 }, /* TERMSYM_EM */ - { "-", 1 }, /* TERMSYM_EN */ - { "(C)", 3 }, /* TERMSYM_COPY */ - { "*", 1 }, /* TERMSYM_ASTERISK */ - { "\\", 1 }, /* TERMSYM_SLASH */ - { "-", 1 }, /* TERMSYM_HYPHEN */ - { " ", 1 }, /* TERMSYM_SPACE */ - { ".", 1 }, /* TERMSYM_PERIOD */ - { "", 0 }, /* TERMSYM_BREAK */ - { "<", 1 }, /* TERMSYM_LANGLE */ - { ">", 1 }, /* TERMSYM_RANGLE */ - { "{", 1 }, /* TERMSYM_LBRACE */ - { "}", 1 }, /* TERMSYM_RBRACE */ -}; - - int main(int argc, char *argv[]) { struct mmain *p; - int c; const struct mdoc *mdoc; + struct nroffopt nroff; struct termp termp; + int c; + char *in; (void)memset(&termp, 0, sizeof(struct termp)); + (void)memset(&nroff, 0, sizeof(struct nroffopt)); - termp.maxrmargin = termp.rmargin = 78; /* XXX */ - termp.maxcols = 1024; - termp.offset = termp.col = 0; + termp.maxrmargin = termp.rmargin = 78; /* FIXME */ + termp.maxcols = 1024; /* FIXME */ termp.flags = TERMP_NOSPACE; - termp.symtab = termsym_ascii; - termp.enc = TERMENC_ANSI; + termp.symtab = ascii2htab(); + nroff.termp = &termp; + p = mmain_alloc(); + c = mmain_getopt(p, argc, argv, "[-Ooption...]", - "O:", &termp, option); + "[infile]", "him:n:o:r:T:O:", &nroff, option); - if (1 != c) - mmain_exit(p, -1 == c ? 1 : 0); + /* FIXME: this needs to accept multiple outputs. */ + argv += c; + if ((argc -= c) > 0) + in = *argv++; + else + in = "-"; - if (NULL == (mdoc = mmain_mdoc(p))) - mmain_exit(p, 1); + mmain_prepare(p, in); + if (NULL == (mdoc = mmain_process(p))) { + if (TERMP_NOPUNT & termp.iflags) + mmain_exit(p, 1); + mmain_free(p); + punt(&nroff, in); + /* NOTREACHED */ + } + if (NULL == (termp.buf = malloc(termp.maxcols))) err(1, "malloc"); @@ -206,29 +113,71 @@ main(int argc, char *argv[]) footer(&termp, mdoc_meta(mdoc)); free(termp.buf); + asciifree(termp.symtab); mmain_exit(p, 0); /* NOTREACHED */ } -int -option(void *ptr, int c, const char *arg) +static int +optsopt(struct termp *p, char *arg) { - struct termp *p; + char *v; + char *toks[] = { "nopunt", NULL }; - p = (struct termp *)ptr; + while (*arg) + switch (getsubopt(&arg, toks, &v)) { + case (0): + p->iflags |= TERMP_NOPUNT; + break; + default: + warnx("unknown -O argument"); + return(0); + } - if (0 == strcmp(arg, "nroff")) { - p->enc = TERMENC_NROFF; - return(1); - } else if (0 == strcmp(arg, "ansi")) { - p->enc = TERMENC_ANSI; - return(1); + return(1); +} + + +static int +option(void *ptr, int c, char *arg) +{ + struct termp *termp; + struct nroffopt *nroff; + + nroff = (struct nroffopt *)ptr; + termp = nroff->termp; + + switch (c) { + case ('h'): + nroff->fl_h = 1; + break; + case ('i'): + nroff->fl_i = 1; + break; + case ('m'): + nroff->arg_m = arg; + break; + case ('n'): + nroff->arg_n = arg; + break; + case ('o'): + nroff->arg_o = arg; + break; + case ('r'): + nroff->arg_r = arg; + break; + case ('T'): + nroff->arg_T = arg; + break; + case ('O'): + return(optsopt(termp, arg)); + default: + break; } - warnx("unknown option: -O%s", arg); - return(0); + return(1); } @@ -303,17 +252,11 @@ flushln(struct termp *p) /* LINTED */ for (j = i, vsz = 0; j < p->col; j++) { - if (isspace((u_char)p->buf[j])) { + if (' ' == p->buf[j]) break; - } else if (27 == p->buf[j]) { - assert(TERMENC_ANSI == p->enc); - assert(j + 5 <= p->col); - j += 4; - } else if (8 == p->buf[j]) { - assert(TERMENC_NROFF == p->enc); - assert(j + 2 <= p->col); + else if (8 == p->buf[j]) j += 1; - } else + else vsz++; } @@ -355,7 +298,7 @@ flushln(struct termp *p) */ for ( ; i < p->col; i++) { - if (isspace((u_char)p->buf[i])) + if (' ' == p->buf[i]) break; putchar(p->buf[i]); } @@ -458,14 +401,13 @@ word(struct termp *p, const char *word) /* LINTED */ for (j = i = 0; i < len; i++) { - if ( ! isspace((u_char)word[i])) { + if (' ' != word[i]) { j++; continue; } /* Escaped spaces don't delimit... */ - if (i > 0 && isspace((u_char)word[i]) && - '\\' == word[i - 1]) { + if (i && ' ' == word[i] && '\\' == word[i - 1]) { j++; continue; } @@ -672,27 +614,15 @@ header(struct termp *p, const struct mdoc_meta *meta) static void nescape(struct termp *p, const char *word, size_t len) { - struct termseq *enc; + const char *rhs; + size_t sz; - switch (len) { - case (1): - enc = termenc1; - break; - case (2): - enc = termenc2; - break; - default: + if (NULL == (rhs = a2ascii(p->symtab, word, len, &sz))) { warnx("unsupported %zu-byte escape sequence", len); return; } - for ( ; enc->enc; enc++) - if (0 == memcmp(enc->enc, word, len)) { - symbola(p, enc->sym); - return; - } - - warnx("unsupported %zu-byte escape sequence", len); + stringa(p, rhs, sz); } @@ -783,49 +713,13 @@ pword(struct termp *p, const char *word, size_t len) * before the word. */ - if (TERMENC_ANSI == p->enc && TERMP_STYLE & p->flags) { - if (TERMP_BOLD & p->flags) { - chara(p, 27); - stringa(p, "[01m", 4); - } - if (TERMP_UNDER & p->flags) { - chara(p, 27); - stringa(p, "[04m", 4); - } - if (TERMP_RED & p->flags) { - chara(p, 27); - stringa(p, "[31m", 4); - } - if (TERMP_GREEN & p->flags) { - chara(p, 27); - stringa(p, "[32m", 4); - } - if (TERMP_YELLOW & p->flags) { - chara(p, 27); - stringa(p, "[33m", 4); - } - if (TERMP_BLUE & p->flags) { - chara(p, 27); - stringa(p, "[34m", 4); - } - if (TERMP_MAGENTA & p->flags) { - chara(p, 27); - stringa(p, "[35m", 4); - } - if (TERMP_CYAN & p->flags) { - chara(p, 27); - stringa(p, "[36m", 4); - } - } - for (i = 0; i < len; i++) { if ('\\' == word[i]) { pescape(p, word, &i, len); continue; } - if (TERMENC_NROFF == p->enc && - TERMP_STYLE & p->flags) { + if (TERMP_STYLE & p->flags) { if (TERMP_BOLD & p->flags) { chara(p, word[i]); chara(p, 8); @@ -838,27 +732,10 @@ pword(struct termp *p, const char *word, size_t len) chara(p, word[i]); } - - if (TERMENC_ANSI == p->enc && TERMP_STYLE & p->flags) { - chara(p, 27); - stringa(p, "[00m", 4); - } } /* - * Add a symbol to the output line buffer. - */ -static void -symbola(struct termp *p, enum tsym sym) -{ - - assert(p->symtab[sym].sym); - stringa(p, p->symtab[sym].sym, p->symtab[sym].sz); -} - - -/* * Like chara() but for arbitrary-length buffers. Resize the buffer by * a factor of two (if the buffer is less than that) or the buffer's * size. @@ -1012,5 +889,40 @@ sanity(const struct mdoc_node *n) } break; } +} + + +__dead void +punt(struct nroffopt *nroff, char *in) +{ + char *args[32]; + char arg0[32], argm[32]; + int i; + + warnx("punting to nroff!"); + + i = 0; + + (void)strlcpy(arg0, "nroff", 32); + args[i++] = arg0; + + if (nroff->fl_h) + args[i++] = "-h"; + if (nroff->fl_i) + args[i++] = "-i"; + + if (nroff->arg_m) { + (void)strlcpy(argm, "-m", 32); + (void)strlcat(argm, nroff->arg_m, 32); + args[i++] = argm; + } else + args[i++] = "-mandoc"; + + args[i++] = in; + args[i++] = (char *)NULL; + + (void)execvp("nroff", args); + errx(1, "exec"); + /* NOTREACHED */ }