Return to tbl_html.c CVS log

Up to [cvsweb.bsd.lv] / mandoc

Annotation of mandoc/tbl_html.c, Revision 1.5

1.5     ! kristaps    1: /*     $Id: tbl_html.c,v 1.4 2011/01/06 11:55:39 kristaps Exp $ */
1.1       kristaps    2: /*
                      3:  * Copyright (c) 2009 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 above
                      7:  * copyright notice and this permission notice appear in all copies.
                      8:  *
                      9:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     10:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     11:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     12:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     13:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     14:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     15:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
                     16:  */
                     17: #ifdef HAVE_CONFIG_H
                     18: #include "config.h"
                     19: #endif
                     20:
                     21: #include <assert.h>
                     22: #include <stdio.h>
                     23: #include <stdlib.h>
                     24: #include <string.h>
                     25:
                     26: #include "mandoc.h"
                     27: #include "out.h"
                     28: #include "html.h"
                     29:
1.4       kristaps   30: static size_t   html_tbl_len(size_t, void *);
                     31: static size_t   html_tbl_strlen(const char *, void *);
                     32:
                     33: /* ARGSUSED */
                     34: static size_t
                     35: html_tbl_len(size_t sz, void *arg)
                     36: {
                     37:
                     38:        return(sz);
                     39: }
                     40:
                     41: /* ARGSUSED */
                     42: static size_t
                     43: html_tbl_strlen(const char *p, void *arg)
                     44: {
                     45:
                     46:        return(strlen(p));
                     47: }
                     48:
1.1       kristaps   49: void
                     50: print_tbl(struct html *h, const struct tbl_span *sp)
                     51: {
                     52:        const struct tbl_head *hp;
                     53:        const struct tbl_dat *dp;
1.3       kristaps   54:        struct tag      *tt;
                     55:        struct htmlpair  tag;
1.4       kristaps   56:        struct roffsu    su;
                     57:        struct roffcol  *col;
1.1       kristaps   58:
                     59:        /* Inhibit printing of spaces: we do padding ourselves. */
                     60:
                     61:        h->flags |= HTML_NONOSPACE;
                     62:        h->flags |= HTML_NOSPACE;
                     63:
1.4       kristaps   64:        /* First pass: calculate widths. */
                     65:
                     66:        if (TBL_SPAN_FIRST & sp->flags) {
                     67:                h->tbl.len = html_tbl_len;
                     68:                h->tbl.slen = html_tbl_strlen;
                     69:                tblcalc(&h->tbl, sp);
                     70:        }
                     71:
1.5     ! kristaps   72:        switch (sp->pos) {
        !            73:        case (TBL_SPAN_HORIZ):
        !            74:                /* FALLTHROUGH */
        !            75:        case (TBL_SPAN_DHORIZ):
        !            76:                break;
        !            77:        default:
        !            78:                PAIR_CLASS_INIT(&tag, "tbl");
        !            79:                print_otag(h, TAG_TABLE, 1, &tag);
        !            80:                print_otag(h, TAG_TR, 0, NULL);
        !            81:
        !            82:                /* Iterate over template headers. */
        !            83:
        !            84:                dp = sp->first;
        !            85:                for (hp = sp->head; hp; hp = hp->next) {
        !            86:                        switch (hp->pos) {
        !            87:                        case (TBL_HEAD_VERT):
        !            88:                                /* FALLTHROUGH */
        !            89:                        case (TBL_HEAD_DVERT):
        !            90:                                continue;
        !            91:                        case (TBL_HEAD_DATA):
        !            92:                                break;
        !            93:                        }
        !            94:
        !            95:                        /*
        !            96:                         * For the time being, use the simplest possible
        !            97:                         * table styling: setting the widths of data
        !            98:                         * columns.
        !            99:                         */
        !           100:
        !           101:                        col = &h->tbl.cols[hp->ident];
        !           102:                        SCALE_HS_INIT(&su, col->width);
        !           103:                        bufcat_su(h, "width", &su);
        !           104:                        PAIR_STYLE_INIT(&tag, h);
        !           105:                        tt = print_otag(h, TAG_TD, 1, &tag);
1.3       kristaps  106:
1.5     ! kristaps  107:                        if (dp && dp->string)
        !           108:                                print_text(h, dp->string);
        !           109:                        if (dp)
        !           110:                                dp = dp->next;
1.1       kristaps  111:
1.5     ! kristaps  112:                        print_tagq(h, tt);
1.1       kristaps  113:                }
1.5     ! kristaps  114:                break;
        !           115:        }
1.4       kristaps  116:
1.1       kristaps  117:        h->flags &= ~HTML_NONOSPACE;
1.4       kristaps  118:
                    119:        /* Close out column specifiers on the last span. */
                    120:
                    121:        if (TBL_SPAN_LAST & sp->flags) {
                    122:                assert(h->tbl.cols);
                    123:                free(h->tbl.cols);
                    124:                h->tbl.cols = NULL;
                    125:        }
1.1       kristaps  126: }