[BACK]Return to tbl_html.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Annotation of mandoc/tbl_html.c, Revision 1.6

1.6     ! kristaps    1: /*     $Id: tbl_html.c,v 1.5 2011/01/06 12:31: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.6     ! kristaps  107:                        if (dp) {
        !           108:                                switch (dp->layout->pos) {
        !           109:                                case (TBL_CELL_DOWN):
        !           110:                                        break;
        !           111:                                default:
        !           112:                                        if (NULL == dp->string)
        !           113:                                                break;
        !           114:                                        print_text(h, dp->string);
        !           115:                                        break;
        !           116:                                }
1.5       kristaps  117:                                dp = dp->next;
1.6     ! kristaps  118:                        }
1.1       kristaps  119:
1.5       kristaps  120:                        print_tagq(h, tt);
1.1       kristaps  121:                }
1.5       kristaps  122:                break;
                    123:        }
1.4       kristaps  124:
1.1       kristaps  125:        h->flags &= ~HTML_NONOSPACE;
1.4       kristaps  126:
                    127:        /* Close out column specifiers on the last span. */
                    128:
                    129:        if (TBL_SPAN_LAST & sp->flags) {
                    130:                assert(h->tbl.cols);
                    131:                free(h->tbl.cols);
                    132:                h->tbl.cols = NULL;
                    133:        }
1.1       kristaps  134: }

CVSweb