1 /* PSPP - a program for statistical analysis.
2 Copyright (C) 2009, 2011, 2014 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
19 #include "output/table-provider.h"
23 #include "libpspp/assertion.h"
24 #include "libpspp/cast.h"
25 #include "output/driver.h"
26 #include "output/output-item-provider.h"
27 #include "output/pivot-table.h"
28 #include "output/table-item.h"
29 #include "output/table-provider.h"
31 #include "gl/xalloc.h"
34 #define _(msgid) gettext (msgid)
36 struct table_item_text *
37 table_item_text_create (const char *content)
42 struct table_item_text *text = xmalloc (sizeof *text);
43 *text = (struct table_item_text) { .content = xstrdup (content) };
47 struct table_item_text *
48 table_item_text_clone (const struct table_item_text *old)
53 struct table_item_text *new = xmalloc (sizeof *new);
54 *new = (struct table_item_text) {
55 .content = xstrdup (old->content),
56 .footnotes = xmemdup (old->footnotes,
57 old->n_footnotes * sizeof *old->footnotes),
58 .n_footnotes = old->n_footnotes,
59 .style = table_area_style_clone (NULL, old->style),
65 table_item_text_destroy (struct table_item_text *text)
70 free (text->footnotes);
71 table_area_style_free (text->style);
77 table_item_layer_copy (struct table_item_layer *dst,
78 const struct table_item_layer *src)
80 dst->content = xstrdup (src->content);
81 dst->footnotes = xmemdup (src->footnotes,
82 src->n_footnotes * sizeof *src->footnotes);
83 dst->n_footnotes = src->n_footnotes;
87 table_item_layer_uninit (struct table_item_layer *layer)
91 free (layer->content);
92 free (layer->footnotes);
96 struct table_item_layers *
97 table_item_layers_clone (const struct table_item_layers *old)
102 struct table_item_layers *new = xmalloc (sizeof *new);
103 *new = (struct table_item_layers) {
104 .layers = xnmalloc (old->n_layers, sizeof *new->layers),
105 .n_layers = old->n_layers,
106 .style = table_area_style_clone (NULL, old->style),
108 for (size_t i = 0; i < new->n_layers; i++)
109 table_item_layer_copy (&new->layers[i], &old->layers[i]);
114 table_item_layers_destroy (struct table_item_layers *layers)
118 for (size_t i = 0; i < layers->n_layers; i++)
119 table_item_layer_uninit (&layers->layers[i]);
120 free (layers->layers);
121 table_area_style_free (layers->style);
126 /* Initializes ITEM as a table item for rendering TABLE. Takes ownership of
129 table_item_create (struct table *table)
131 struct table_item *item = xmalloc (sizeof *item);
132 *item = (struct table_item) {
133 .output_item = OUTPUT_ITEM_INITIALIZER (&table_item_class),
139 /* Returns the table contained by TABLE_ITEM. The caller must not modify or
140 unref the returned table. */
142 table_item_get_table (const struct table_item *table_item)
144 return table_item->table;
147 /* Returns ITEM's title, which is a null pointer if no title has been
149 const struct table_cell *
150 table_item_get_title (const struct table_item *item)
155 /* Sets ITEM's title to TITLE, replacing any previous title. Specify NULL for
156 TITLE to clear any title from ITEM. The caller retains ownership of TITLE.
158 This function may only be used on a table_item that is unshared. */
160 table_item_set_title (struct table_item *item, const struct table_cell *title)
162 assert (!table_item_is_shared (item));
163 table_cell_destroy (item->title);
164 item->title = table_cell_clone (title);
167 /* Returns ITEM's layers, which will be a null pointer if no layers have been
169 const struct table_item_layers *
170 table_item_get_layers (const struct table_item *item)
175 /* Sets ITEM's layers to LAYERS, replacing any previous layers. Specify NULL
176 for LAYERS to clear any layers from ITEM. The caller retains ownership of
179 This function may only be used on a table_item that is unshared. */
181 table_item_set_layers (struct table_item *item,
182 const struct table_item_layers *layers)
184 assert (!table_item_is_shared (item));
185 table_item_layers_destroy (item->layers);
186 item->layers = table_item_layers_clone (layers);
189 /* Returns ITEM's caption, which is a null pointer if no caption has been
191 const struct table_item_text *
192 table_item_get_caption (const struct table_item *item)
194 return item->caption;
197 /* Sets ITEM's caption to CAPTION, replacing any previous caption. Specify
198 NULL for CAPTION to clear any caption from ITEM. The caller retains
199 ownership of CAPTION.
201 This function may only be used on a table_item that is unshared. */
203 table_item_set_caption (struct table_item *item,
204 const struct table_item_text *caption)
206 assert (!table_item_is_shared (item));
207 table_item_text_destroy (item->caption);
208 item->caption = table_item_text_clone (caption);
211 /* Returns ITEM's notes, which is a null pointer if ITEM has no notes. */
213 table_item_get_notes (const struct table_item *item)
218 /* Sets ITEM's notes to NOTES, replacing any previous notes. Specify NULL for
219 NOTES to clear any notes from ITEM. The caller retains ownership of
222 This function may only be used on a table_item that is unshared.*/
224 table_item_set_notes (struct table_item *item, const char *notes)
226 assert (!table_item_is_shared (item));
228 item->notes = notes ? xstrdup (notes) : NULL;
231 /* Submits TABLE_ITEM to the configured output drivers, and transfers ownership
232 to the output subsystem. */
234 table_item_submit (struct table_item *table_item)
236 output_submit (&table_item->output_item);
240 table_item_get_label (const struct output_item *output_item)
242 const struct table_item *item = to_table_item (output_item);
243 return (item->title && item->title->text
249 table_item_destroy (struct output_item *output_item)
251 struct table_item *item = to_table_item (output_item);
252 table_cell_destroy (item->title);
253 table_item_text_destroy (item->caption);
254 table_item_layers_destroy (item->layers);
256 pivot_table_unref (item->pt);
257 table_unref (item->table);
261 const struct output_item_class table_item_class =
263 table_item_get_label,