", table_nc (t));
- *tfoot = true;
+ next_style (style);
+ fprintf (style->file, "border-%s: %s", border_name, css);
+
+ char buf[32];
+ if (format_color (color, (struct cell_color) CELL_COLOR_BLACK,
+ buf, sizeof buf))
+ fprintf (style->file, " %s", buf);
}
- else
- fputs ("\n ", html->file);
}
static void
-html_output_table (struct html_driver *html, const struct table_item *item)
+html_put_table_cell (struct html_driver *html, const struct pivot_table *pt,
+ const struct table_cell *cell,
+ const char *tag, const struct table *t)
{
- const struct table *t = table_item_get_table (item);
- const char *title = table_item_get_title (item);
- const char *caption = table_item_get_caption (item);
- int footnote_idx = 0;
- bool tfoot = false;
- int y;
+ fprintf (html->file, "<%s", tag);
+
+ struct css_style style;
+ style_start (&style, html->file);
+
+ struct string body = DS_EMPTY_INITIALIZER;
+ bool numeric = pivot_value_format_body (cell->value, pt, &body);
+
+ enum table_halign halign = table_halign_interpret (cell->cell_style->halign,
+ numeric);
- fputs ("", html->file);
+ switch (halign)
+ {
+ case TABLE_HALIGN_RIGHT:
+ put_style (&style, "text-align", "right");
+ break;
+ case TABLE_HALIGN_CENTER:
+ put_style (&style, "text-align", "center");
+ break;
+ default:
+ /* Do nothing */
+ break;
+ }
+
+ if (cell->options & TAB_ROTATE)
+ put_style (&style, "writing-mode", "sideways-lr");
+
+ if (cell->cell_style->valign != TABLE_VALIGN_TOP)
+ {
+ put_style (&style, "vertical-align",
+ (cell->cell_style->valign == TABLE_VALIGN_BOTTOM
+ ? "bottom" : "middle"));
+ }
- if (caption)
+ const struct font_style *fs = cell->font_style;
+ char bgcolor[32];
+ if (format_color (fs->bg[cell->d[V][0] % 2],
+ (struct cell_color) CELL_COLOR_WHITE,
+ bgcolor, sizeof bgcolor))
+ put_style (&style, "background", bgcolor);
+
+ char fgcolor[32];
+ if (format_color (fs->fg[cell->d[V][0] % 2],
+ (struct cell_color) CELL_COLOR_BLACK,
+ fgcolor, sizeof fgcolor))
+ put_style (&style, "color", fgcolor);
+
+ if (fs->typeface)
{
- put_tfoot (html, t, &tfoot);
- escape_string (html->file, caption, strlen (caption), " ", " ");
+ put_style (&style, "font-family", "\"");
+ escape_string (html->file, fs->typeface, " ", "\n");
+ putc ('"', html->file);
}
- footnote_idx = 0;
- for (y = 0; y < table_nr (t); y++)
+ if (fs->bold)
+ put_style (&style, "font-weight", "bold");
+ if (fs->italic)
+ put_style (&style, "font-style", "italic");
+ if (fs->underline)
+ put_style (&style, "text-decoration", "underline");
+ if (fs->size)
{
- int x;
- for (x = 0; x < table_nc (t); )
- {
- const struct cell_contents *c;
- struct table_cell cell;
+ char buf[32];
+ snprintf (buf, sizeof buf, "%dpt", fs->size);
+ put_style (&style, "font-size", buf);
+ }
- table_get_cell (t, x, y, &cell);
- if (y != cell.d[TABLE_VERT][0])
- goto next_0;
+ if (t && html->borders)
+ {
+ put_border (t, cell, &style, V, 0, 0, "top");
+ put_border (t, cell, &style, H, 0, 0, "left");
- for (c = cell.contents; c < &cell.contents[cell.n_contents]; c++)
+ if (cell->d[V][1] == t->n[V])
+ put_border (t, cell, &style, V, 0, 1, "bottom");
+ if (cell->d[H][1] == t->n[H])
+ put_border (t, cell, &style, H, 1, 0, "right");
+ }
+ style_end (&style);
+
+ int colspan = table_cell_colspan (cell);
+ if (colspan > 1)
+ fprintf (html->file, " colspan=\"%d\"", colspan);
+
+ int rowspan = table_cell_rowspan (cell);
+ if (rowspan > 1)
+ fprintf (html->file, " rowspan=\"%d\"", rowspan);
+
+ putc ('>', html->file);
+
+ const char *s = ds_cstr (&body);
+ s += strspn (s, CC_SPACES);
+ escape_string (html->file, s, " ", " ");
+ ds_destroy (&body);
+
+ if (cell->value->n_subscripts)
+ {
+ fputs ("", html->file);
+ for (size_t i = 0; i < cell->value->n_subscripts; i++)
+ {
+ if (i)
+ putc (',', html->file);
+ escape_string (html->file, cell->value->subscripts[i],
+ " ", " ");
+ }
+ fputs ("", html->file);
+ }
+ if (cell->value->n_footnotes > 0)
+ {
+ fputs ("", html->file);
+ size_t n_footnotes = 0;
+ for (size_t i = 0; i < cell->value->n_footnotes; i++)
+ {
+ const struct pivot_footnote *f
+ = pt->footnotes[cell->value->footnote_indexes[i]];
+ if (f->show)
{
- int i;
-
- for (i = 0; i < c->n_footnotes; i++)
- {
- char marker[16];
-
- put_tfoot (html, t, &tfoot);
- str_format_26adic (++footnote_idx, false, marker, sizeof marker);
- fprintf (html->file, "%s ", marker);
- escape_string (html->file, c->footnotes[i],
- strlen (c->footnotes[i]), " ", " ");
- }
- }
+ if (n_footnotes++ > 0)
+ putc (',', html->file);
- next_0:
- x = cell.d[TABLE_HORZ][1];
- table_cell_free (&cell);
+ char *marker = pivot_footnote_marker_string (f, pt);
+ escape_string (html->file, marker, " ", " ");
+ free (marker);
+ }
}
+ fputs ("", html->file);
}
- if (tfoot)
- fputs ("\n", html->file);
- footnote_idx = 0;
- fputs ("\n", html->file);
+ /* output or . */
+ fprintf (html->file, "%s>\n", tag);
+}
+
+static void
+html_output_table_layer (struct html_driver *html, const struct pivot_table *pt,
+ const size_t *layer_indexes)
+{
+ struct table *title, *layers, *body, *caption, *footnotes;
+ pivot_output (pt, layer_indexes, true, &title, &layers, &body,
+ &caption, &footnotes, NULL, NULL);
- if (title != NULL)
+ fputs ("file);
+ if (pt->notes)
{
- fputs (" ", html->file);
- escape_string (html->file, title, strlen (title), " ", " ");
- fputs ("\n", html->file);
+ fputs (" title=\"", html->file);
+ escape_string (html->file, pt->notes, " ", "\n");
+ putc ('"', html->file);
}
+ fputs (">\n", html->file);
- for (y = 0; y < table_nr (t); y++)
+ if (title)
{
- int x;
+ struct table_cell cell;
+ table_get_cell (title, 0, 0, &cell);
+ html_put_table_cell (html, pt, &cell, "caption", NULL);
+ }
- fputs (" \n", html->file);
- for (x = 0; x < table_nc (t); )
+ if (layers)
+ {
+ fputs ("\n", html->file);
+ for (size_t y = 0; y < layers->n[V]; y++)
{
- const struct cell_contents *c;
+ fputs ("\n", html->file);
+
struct table_cell cell;
- const char *tag;
- bool is_header;
- int alignment, colspan, rowspan;
- int top, left, right, bottom, n_borders;
-
- table_get_cell (t, x, y, &cell);
- if (x != cell.d[TABLE_HORZ][0] || y != cell.d[TABLE_VERT][0])
- goto next_1;
-
- /* Output or | tag. */
- is_header = (y < table_ht (t)
- || y >= table_nr (t) - table_hb (t)
- || x < table_hl (t)
- || x >= table_nc (t) - table_hr (t));
- tag = is_header ? "TH" : "TD";
- fprintf (html->file, " <%s", tag);
-
- alignment = (cell.n_contents > 0
- ? cell.contents[0].options & TAB_ALIGNMENT
- : TAB_LEFT);
- if (alignment != TAB_LEFT)
- fprintf (html->file, " ALIGN=\"%s\"",
- alignment == TAB_RIGHT ? "RIGHT" : "CENTER");
-
- colspan = table_cell_colspan (&cell);
- if (colspan > 1)
- fprintf (html->file, " COLSPAN=\"%d\"", colspan);
-
- rowspan = table_cell_rowspan (&cell);
- if (rowspan > 1)
- fprintf (html->file, " ROWSPAN=\"%d\"", rowspan);
-
- if (html->borders)
- {
- /* Cell borders. */
- n_borders = 0;
-
- top = table_get_rule (t, TABLE_VERT, x, y);
- if (top > TAL_GAP)
- put_border (html->file, n_borders++, top, "top");
-
- if (y + rowspan == table_nr (t))
- {
- bottom = table_get_rule (t, TABLE_VERT, x, y + rowspan);
- if (bottom > TAL_GAP)
- put_border (html->file, n_borders++, bottom, "bottom");
- }
-
- left = table_get_rule (t, TABLE_HORZ, x, y);
- if (left > TAL_GAP)
- put_border (html->file, n_borders++, left, "left");
-
- if (x + colspan == table_nc (t))
- {
- right = table_get_rule (t, TABLE_HORZ, x + colspan, y);
- if (right > TAL_GAP)
- put_border (html->file, n_borders++, right, "right");
- }
-
- if (n_borders > 0)
- fputs ("\"", html->file);
- }
-
- putc ('>', html->file);
-
- /* Output cell contents. */
- for (c = cell.contents; c < &cell.contents[cell.n_contents]; c++)
+ table_get_cell (layers, 0, y, &cell);
+ cell.d[H][1] = body->n[H];
+ html_put_table_cell (html, pt, &cell, "td", NULL);
+
+ fputs (" | \n", html->file);
+ }
+ fputs ("\n", html->file);
+ }
+
+ fputs (" \n", html->file);
+ for (int y = 0; y < body->n[V]; y++)
+ {
+ fputs ("\n", html->file);
+ for (int x = 0; x < body->n[H]; )
+ {
+ struct table_cell cell;
+ table_get_cell (body, x, y, &cell);
+ if (x == cell.d[TABLE_HORZ][0] && y == cell.d[TABLE_VERT][0])
{
- if (c->text)
- {
- const char *s = c->text;
- int i;
-
- if (c->options & TAB_EMPH)
- fputs ("", html->file);
- if (c->options & TAB_FIX)
- {
- fputs ("", html->file);
- escape_string (html->file, s, strlen (s), " ", " ");
- fputs ("", html->file);
- }
- else
- {
- s += strspn (s, CC_SPACES);
- escape_string (html->file, s, strlen (s), " ", " ");
- }
- if (c->options & TAB_EMPH)
- fputs ("", html->file);
-
- if (c->n_footnotes > 0)
- {
- fputs ("", html->file);
- for (i = 0; i < c->n_footnotes; i++)
- {
- char marker[16];
-
- if (i > 0)
- putc (',', html->file);
- str_format_26adic (++footnote_idx, false,
- marker, sizeof marker);
- fputs (marker, html->file);
- }
- fputs ("", html->file);
- }
- }
- else
- html_output_table (html, c->table);
+ bool is_header = (y < body->h[V][0]
+ || y >= body->n[V] - body->h[V][1]
+ || x < body->h[H][0]
+ || x >= body->n[H] - body->h[H][1]);
+ const char *tag = is_header ? "th" : "td";
+ html_put_table_cell (html, pt, &cell, tag, body);
}
- /* Output or . */
- fprintf (html->file, "%s>\n", tag);
-
- next_1:
x = cell.d[TABLE_HORZ][1];
- table_cell_free (&cell);
}
- fputs (" \n", html->file);
+ fputs ("\n", html->file);
}
+ fputs ("\n", html->file);
+
+ if (caption || footnotes)
+ {
+ fprintf (html->file, "\n");
+
+ if (caption)
+ {
+ fputs ("\n", html->file);
+
+ struct table_cell cell;
+ table_get_cell (caption, 0, 0, &cell);
+ cell.d[H][1] = body->n[H];
+ html_put_table_cell (html, pt, &cell, "td", NULL);
- fputs (" \n\n", html->file);
+ fputs ("\n", html->file);
+ }
+
+ if (footnotes)
+ for (size_t y = 0; y < footnotes->n[V]; y++)
+ {
+ fputs ("\n", html->file);
+
+ struct table_cell cell;
+ table_get_cell (footnotes, 0, y, &cell);
+ cell.d[H][1] = body->n[H];
+ html_put_table_cell (html, pt, &cell, "td", NULL);
+
+ fputs (" \n", html->file);
+ }
+ fputs ("\n", html->file);
+ }
+
+ fputs (" \n\n", html->file);
+
+ table_unref (title);
+ table_unref (layers);
+ table_unref (body);
+ table_unref (caption);
+ table_unref (footnotes);
+}
+
+static void
+html_output_table (struct html_driver *html, const struct output_item *item)
+{
+ size_t *layer_indexes;
+ PIVOT_OUTPUT_FOR_EACH_LAYER (layer_indexes, item->table, true)
+ html_output_table_layer (html, item->table, layer_indexes);
}
struct output_driver_factory html_driver_factory =
@@ -586,8 +742,8 @@ struct output_driver_factory html_driver_factory =
static const struct output_driver_class html_driver_class =
{
- "html",
- html_destroy,
- html_submit,
- NULL,
+ .name = "html",
+ .destroy = html_destroy,
+ .submit = html_submit,
+ .handles_groups = true,
};
|