/[public]/psiconv/trunk/lib/psiconv/data.c
ViewVC logotype

Diff of /psiconv/trunk/lib/psiconv/data.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 2 Revision 167
1/* 1/*
2 data.c - Part of psiconv, a PSION 5 file formats converter 2 data.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl> 3 Copyright (c) 1999, 2000 Frodo Looijaard <frodol@dds.nl>
4 4
5 This program is free software; you can redistribute it and/or modify 5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by 6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or 7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version. 8 (at your option) any later version.
16 along with this program; if not, write to the Free Software 16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18*/ 18*/
19 19
20#include "config.h" 20#include "config.h"
21#include "compat.h"
21#include <stdlib.h> 22#include <stdlib.h>
22#include <string.h> 23#include <string.h>
23#include "data.h" 24#include "data.h"
24#include "list.h" 25#include "list.h"
25#include "general.h" 26
27#ifdef DMALLOC
28#include <dmalloc.h>
29#endif
26 30
27static psiconv_color clone_color(psiconv_color color); 31static psiconv_color clone_color(psiconv_color color);
28static psiconv_font clone_font(psiconv_font font); 32static psiconv_font clone_font(psiconv_font font);
29static psiconv_border clone_border(psiconv_border border); 33static psiconv_border clone_border(psiconv_border border);
30static psiconv_bullet clone_bullet(psiconv_bullet bullet); 34static psiconv_bullet clone_bullet(psiconv_bullet bullet);
31static psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs); 35static psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs);
32static void psiconv_free_style_aux(void *style); 36static void psiconv_free_style_aux(void *style);
33static void psiconv_free_in_line_layout_aux(void * layout); 37static void psiconv_free_in_line_layout_aux(void * layout);
34static void psiconv_free_paragraph_aux(void * paragraph); 38static void psiconv_free_paragraph_aux(void * paragraph);
39static void psiconv_free_paint_data_section_aux(void * section);
40static void psiconv_free_clipart_section_aux(void * section);
41static void psiconv_free_formula_aux(void *data);
42static void psiconv_free_sheet_worksheet_aux (void *data);
43static void psiconv_free_sheet_variable_aux(void * variable);
35 44
45static psiconv_word_styles_section psiconv_empty_word_styles_section(void);
46static psiconv_text_and_layout psiconv_empty_text_and_layout(void);
47static psiconv_texted_section psiconv_empty_texted_section(void);
48static psiconv_page_header psiconv_empty_page_header(void);
49static psiconv_page_layout_section psiconv_empty_page_layout_section(void);
50static psiconv_word_status_section psiconv_empty_word_status_section(void);
51static psiconv_word_f psiconv_empty_word_f(void);
52static psiconv_sheet_status_section psiconv_empty_sheet_status_section(void);
53static psiconv_formula_list psiconv_empty_formula_list(void);
54static psiconv_sheet_workbook_section
55 psiconv_empty_sheet_workbook_section(void);
56static psiconv_sheet_f psiconv_empty_sheet_f(void);
57static psiconv_texted_f psiconv_empty_texted_f(void);
58static psiconv_paint_data_section psiconv_empty_paint_data_section(void);
59static psiconv_pictures psiconv_empty_pictures(void);
60static psiconv_mbm_f psiconv_empty_mbm_f(void);
61static psiconv_sketch_section psiconv_empty_sketch_section(void);
62static psiconv_sketch_f psiconv_empty_sketch_f(void);
63static psiconv_clipart_f psiconv_empty_clipart_f(void);
64static psiconv_cliparts psiconv_empty_cliparts(void);
65
66
67/* Note: these defaults seem to be hard-coded somewhere outside the
68 files themself. */
36psiconv_character_layout psiconv_basic_character_layout(void) 69psiconv_character_layout psiconv_basic_character_layout(void)
37{ 70{
71 /* Make the structures static, to oblige IRIX */
38 struct psiconv_color black = 72 static struct psiconv_color_s black =
39 { 73 {
40 0x00, /* red */ 74 0x00, /* red */
41 0x00, /* green */ 75 0x00, /* green */
42 0x00, /* blue */ 76 0x00, /* blue */
43 }; 77 };
44 struct psiconv_color white = 78 static struct psiconv_color_s white =
45 { 79 {
46 0xff, /* red */ 80 0xff, /* red */
47 0xff, /* green */ 81 0xff, /* green */
48 0xff, /* blue */ 82 0xff, /* blue */
49 }; 83 };
84 static struct psiconv_font_s font =
85 {
86 "Times New Roman", /* name */
87 3 /* screenfont */
88 };
50 struct psiconv_character_layout cl = 89 struct psiconv_character_layout_s cl =
51 { 90 {
52 &black, /* color */ 91 &black, /* color */
53 &white, /* back_color */ 92 &white, /* back_color */
54 10.0, /* font_size */ 93 10.0, /* font_size */
55 psiconv_bool_false, /* italic */ 94 psiconv_bool_false, /* italic */
56 psiconv_bool_false, /* bold */ 95 psiconv_bool_false, /* bold */
57 psiconv_normalscript, /* super_sub */ 96 psiconv_normalscript, /* super_sub */
58 psiconv_bool_false, /* underline */ 97 psiconv_bool_false, /* underline */
59 psiconv_bool_false, /* strike_out */ 98 psiconv_bool_false, /* strikethrough */
60 NULL, /* font */ 99 &font, /* font */
61 }; 100 };
62 101
63 cl.color = malloc(sizeof(*cl.color));
64 cl.color->red = 0x00;
65 cl.color->green = 0x00;
66 cl.color->blue = 0x00;
67 cl.back_color = malloc(sizeof(*cl.color));
68 cl.back_color->red = 0xff;
69 cl.back_color->green = 0xff;
70 cl.back_color->blue = 0xff;
71 cl.font = malloc(sizeof(*cl.font));
72 cl.font->name = strdup("Times New Roman");
73 cl.font->screenfont = 3;
74 return psiconv_clone_character_layout(&cl); 102 return psiconv_clone_character_layout(&cl);
75} 103}
76 104
105/* Note: these defaults seem to be hard-coded somewhere outside the
106 files themself. */
77psiconv_paragraph_layout psiconv_basic_paragraph_layout(void) 107psiconv_paragraph_layout psiconv_basic_paragraph_layout(void)
78{ 108{
79 char base_font[] = "Times New Roman";
80
81 struct psiconv_font font = 109 static struct psiconv_font_s font =
82 { 110 {
83 base_font, /* name */ 111 "Times New Roman", /* name */
84 2 /* screenfont */ 112 2 /* screenfont */
85 }; 113 };
86 struct psiconv_color black = 114 static struct psiconv_color_s black =
87 { 115 {
88 0x00, /* red */ 116 0x00, /* red */
89 0x00, /* green */ 117 0x00, /* green */
90 0x00, /* blue */ 118 0x00, /* blue */
91 }; 119 };
92 struct psiconv_color white = 120 static struct psiconv_color_s white =
93 { 121 {
94 0xff, /* red */ 122 0xff, /* red */
95 0xff, /* green */ 123 0xff, /* green */
96 0xff, /* blue */ 124 0xff, /* blue */
97 }; 125 };
98 struct psiconv_border no_border = 126 static struct psiconv_border_s no_border =
99 { 127 {
100 psiconv_border_none, /* kind */ 128 psiconv_border_none, /* kind */
101 1, /* thickness */ 129 1, /* thickness */
102 &black /* color */ 130 &black /* color */
103 }; 131 };
104 struct psiconv_bullet bullet = 132 static struct psiconv_bullet_s bullet =
105 { 133 {
106 psiconv_bool_false, /* on */ 134 psiconv_bool_false, /* on */
107 10.0, /* font_size */ 135 10.0, /* font_size */
108 0x95, /* character */ 136 0x95, /* character */
109 psiconv_bool_true, /* indent */ 137 psiconv_bool_true, /* indent */
110 &black, /* color */ 138 &black, /* color */
111 &font, /* font */ 139 &font, /* font */
112 }; 140 };
113 struct psiconv_all_tabs tabs = 141 static struct psiconv_all_tabs_s tabs =
114 { 142 {
115 0.64, /* normal */ 143 0.64, /* normal */
116 NULL /* kind */ 144 NULL /* kind */
117 }; 145 };
118 struct psiconv_paragraph_layout pl = 146 struct psiconv_paragraph_layout_s pl =
119 { 147 {
120 &white, /* back_color */ 148 &white, /* back_color */
121 0.0, /* indent_left */ 149 0.0, /* indent_left */
122 0.0, /* indent_right */ 150 0.0, /* indent_right */
123 0.0, /* indent_first */ 151 0.0, /* indent_first */
124 psiconv_justify_left, /* justify_hor */ 152 psiconv_justify_left, /* justify_hor */
125 psiconv_justify_middle,/* justify_ver */ 153 psiconv_justify_middle,/* justify_ver */
126 0.0, /* interline */ 154 10.0, /* linespacing */
127 psiconv_bool_false, /* interline_exact */ 155 psiconv_bool_false, /* linespacing_exact */
128 0.0, /* top_space */ 156 0.0, /* space_above */
129 0.0, /* bottom_space */ 157 0.0, /* space_below */
130 psiconv_bool_false, /* on_one_page */
131 psiconv_bool_false, /* together_with */ 158 psiconv_bool_false, /* keep_together */
159 psiconv_bool_false, /* keep_with_next */
132 psiconv_bool_false, /* on_next_page */ 160 psiconv_bool_false, /* on_next_page */
133 psiconv_bool_false, /* no_widow_protection */ 161 psiconv_bool_false, /* no_widow_protection */
162 psiconv_bool_false, /* wrap_to_fit_cell */
134 0.0, /* left_margin */ 163 0.0, /* left_margin */
135 &bullet, /* bullet */ 164 &bullet, /* bullet */
136 &no_border, /* left_border */ 165 &no_border, /* left_border */
137 &no_border, /* right_border */ 166 &no_border, /* right_border */
138 &no_border, /* top_border */ 167 &no_border, /* top_border */
139 &no_border, /* bottom_border */ 168 &no_border, /* bottom_border */
140 &tabs, /* tabs */ 169 &tabs, /* tabs */
141 }; 170 };
142 psiconv_paragraph_layout res; 171 psiconv_paragraph_layout res;
143 172
144 pl.tabs->extras = psiconv_list_new(sizeof(struct psiconv_tab)); 173 if (!(pl.tabs->extras = psiconv_list_new(sizeof(struct psiconv_tab_s))))
174 return NULL;
145 res = psiconv_clone_paragraph_layout(&pl); 175 res = psiconv_clone_paragraph_layout(&pl);
146 psiconv_list_free(pl.tabs->extras); 176 psiconv_list_free(pl.tabs->extras);
147 return res; 177 return res;
148} 178}
149 179
150psiconv_color clone_color(psiconv_color color) 180psiconv_color clone_color(psiconv_color color)
151{ 181{
152 psiconv_color result; 182 psiconv_color result;
153 result = malloc(sizeof(*result)); 183 if (!(result = malloc(sizeof(*result))))
184 return NULL;
154 *result = *color; 185 *result = *color;
155 return result; 186 return result;
156} 187}
157 188
158psiconv_font clone_font(psiconv_font font) 189psiconv_font clone_font(psiconv_font font)
159{ 190{
160 psiconv_font result; 191 psiconv_font result;
161 result = malloc(sizeof(*result)); 192 if(!(result = malloc(sizeof(*result))))
193 goto ERROR1;
162 *result = *font; 194 *result = *font;
163 result->name = strdup(result->name); 195 if (!(result->name = strdup(result->name)))
196 goto ERROR2;
164 return result; 197 return result;
198ERROR2:
199 free(result);
200ERROR1:
201 return NULL;
165} 202}
166 203
167psiconv_border clone_border(psiconv_border border) 204psiconv_border clone_border(psiconv_border border)
168{ 205{
169 psiconv_border result; 206 psiconv_border result;
170 result = malloc(sizeof(*result)); 207 if (!(result = malloc(sizeof(*result))))
208 goto ERROR1;
171 *result = *border; 209 *result = *border;
172 result->color = clone_color(result->color); 210 if(!(result->color = clone_color(result->color)))
211 goto ERROR2;
173 return result; 212 return result;
213ERROR2:
214 free(result);
215ERROR1:
216 return NULL;
174} 217}
175 218
176psiconv_bullet clone_bullet(psiconv_bullet bullet) 219psiconv_bullet clone_bullet(psiconv_bullet bullet)
177{ 220{
178 psiconv_bullet result; 221 psiconv_bullet result;
179 result = malloc(sizeof(*result)); 222 if (!(result = malloc(sizeof(*result))))
223 goto ERROR1;
180 *result = *bullet; 224 *result = *bullet;
181 result->font = clone_font(result->font); 225 if (!(result->font = clone_font(result->font)))
226 goto ERROR2;
182 result->color = clone_color(result->color); 227 if (!(result->color = clone_color(result->color)))
228 goto ERROR3;
183 return result; 229 return result;
230ERROR3:
231 psiconv_free_font(result->font);
232ERROR2:
233 free(result);
234ERROR1:
235 return NULL;
184} 236}
185 237
186psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs) 238psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs)
187{ 239{
188 psiconv_all_tabs result; 240 psiconv_all_tabs result;
189 result = malloc(sizeof(*result)); 241 if (!(result = malloc(sizeof(*result))))
242 goto ERROR1;
190 *result = *all_tabs; 243 *result = *all_tabs;
191 result->extras = psiconv_list_clone(result->extras); 244 if (!(result->extras = psiconv_list_clone(result->extras)))
245 goto ERROR2;
192 return result; 246 return result;
247ERROR2:
248 free(result);
249ERROR1:
250 return NULL;
193} 251}
194 252
195psiconv_character_layout psiconv_clone_character_layout 253psiconv_character_layout psiconv_clone_character_layout
196 (psiconv_character_layout ls) 254 (psiconv_character_layout ls)
197{ 255{
198 psiconv_character_layout result; 256 psiconv_character_layout result;
199 257
200 result = malloc(sizeof(*result)); 258 if (!(result = malloc(sizeof(*result))))
259 goto ERROR1;
201 *result = *ls; 260 *result = *ls;
202 result->color = clone_color(result->color); 261 if (!(result->color = clone_color(result->color)))
262 goto ERROR2;
203 result->back_color = clone_color(result->back_color); 263 if (!(result->back_color = clone_color(result->back_color)))
264 goto ERROR3;
204 result->font = clone_font(result->font); 265 if (!(result->font = clone_font(result->font)))
266 goto ERROR4;
205 return result; 267 return result;
268ERROR4:
269 psiconv_free_color(result->back_color);
270ERROR3:
271 psiconv_free_color(result->color);
272ERROR2:
273 free(result);
274ERROR1:
275 return NULL;
206} 276}
207 277
208psiconv_paragraph_layout psiconv_clone_paragraph_layout 278psiconv_paragraph_layout psiconv_clone_paragraph_layout
209 (psiconv_paragraph_layout ls) 279 (psiconv_paragraph_layout ls)
210{ 280{
211 psiconv_paragraph_layout result; 281 psiconv_paragraph_layout result;
212 282
213 result = malloc(sizeof(*result)); 283 if (!(result = malloc(sizeof(*result))))
284 goto ERROR1;
214 *result = *ls; 285 *result = *ls;
215 result->back_color = clone_color(result->back_color); 286 if (!(result->back_color = clone_color(result->back_color)))
287 goto ERROR2;
216 result->bullet = clone_bullet(result->bullet); 288 if (!(result->bullet = clone_bullet(result->bullet)))
289 goto ERROR3;
217 result->left_border = clone_border(result->left_border); 290 if (!(result->left_border = clone_border(result->left_border)))
291 goto ERROR4;
218 result->right_border = clone_border(result->right_border); 292 if (!(result->right_border = clone_border(result->right_border)))
293 goto ERROR5;
219 result->top_border = clone_border(result->top_border); 294 if (!(result->top_border = clone_border(result->top_border)))
295 goto ERROR6;
220 result->bottom_border = clone_border(result->bottom_border); 296 if (!(result->bottom_border = clone_border(result->bottom_border)))
297 goto ERROR7;
221 result->tabs = clone_all_tabs(result->tabs); 298 if (!(result->tabs = clone_all_tabs(result->tabs)))
299 goto ERROR8;
222 return result; 300 return result;
301ERROR8:
302 psiconv_free_border(result->bottom_border);
303ERROR7:
304 psiconv_free_border(result->top_border);
305ERROR6:
306 psiconv_free_border(result->right_border);
307ERROR5:
308 psiconv_free_border(result->left_border);
309ERROR4:
310 psiconv_free_bullet(result->bullet);
311ERROR3:
312 psiconv_free_color(result->back_color);
313ERROR2:
314 free(result);
315ERROR1:
316 return NULL;
223} 317}
224 318
225psiconv_word_style psiconv_get_style (psiconv_word_styles_section ss, int nr) 319psiconv_word_style psiconv_get_style (psiconv_word_styles_section ss, int nr)
226{ 320{
227 if (nr == 0) 321 if (nr == 0)
228 return ss->normal; 322 return ss->normal;
229 else 323 else
230 return psiconv_list_get(ss->styles,0xff - nr); 324 return psiconv_list_get(ss->styles,0xff - nr);
231} 325}
326
327psiconv_formula psiconv_get_formula (psiconv_formula_list ss, int nr)
328{
329 return psiconv_list_get(ss,psiconv_list_length(ss)-nr-1);
330}
331
332/* TODO: What if a cell is both in a default row and a default column?!? */
333psiconv_sheet_cell_layout psiconv_get_default_layout
334 (psiconv_sheet_line_list row_defaults,
335 psiconv_sheet_line_list col_defaults,
336 psiconv_sheet_cell_layout cell_default,
337 int row,int col)
338{
339 int i;
340 psiconv_sheet_line line;
341 for (i = 0;i < psiconv_list_length(row_defaults);i++) {
342 line = psiconv_list_get(row_defaults,i);
343 if (line->position == row)
344 return line->layout;
345 }
346 for (i = 0;i < psiconv_list_length(col_defaults);i++) {
347 line = psiconv_list_get(col_defaults,i);
348 if (line->position == col)
349 return line->layout;
350 }
351 return cell_default;
352}
353
232 354
233void psiconv_free_color (psiconv_color color) 355void psiconv_free_color (psiconv_color color)
234{ 356{
235 if (color) 357 if (color)
236 free(color); 358 free(color);
320{ 442{
321 if (styles) { 443 if (styles) {
322 psiconv_free_word_style(styles->normal); 444 psiconv_free_word_style(styles->normal);
323 if (styles->styles) 445 if (styles->styles)
324 psiconv_list_free_el(styles->styles,psiconv_free_style_aux); 446 psiconv_list_free_el(styles->styles,psiconv_free_style_aux);
447 free(styles);
325 } 448 }
326} 449}
327 450
328void psiconv_free_header_section(psiconv_header_section header) 451void psiconv_free_header_section(psiconv_header_section header)
329{ 452{
350 free(section->name); 473 free(section->name);
351 free(section); 474 free(section);
352 } 475 }
353} 476}
354 477
478void psiconv_free_object_icon_section(psiconv_object_icon_section section)
479{
480 if (section) {
481 if (section->icon_name)
482 free(section->icon_name);
483 free(section);
484 }
485}
486
487void psiconv_free_object_display_section(psiconv_object_display_section section)
488{
489 if (section)
490 free(section);
491}
492
493void psiconv_free_embedded_object_section
494 (psiconv_embedded_object_section object)
495{
496 if (object) {
497 psiconv_free_object_icon_section(object->icon);
498 psiconv_free_object_display_section(object->display);
499 psiconv_free_file(object->object);
500 free(object);
501 }
502}
503
355void psiconv_free_in_line_layout_aux(void * layout) 504void psiconv_free_in_line_layout_aux(void * layout)
356{ 505{
357 psiconv_free_character_layout(((psiconv_in_line_layout) layout)->layout); 506 psiconv_free_character_layout(((psiconv_in_line_layout) layout)->layout);
507 psiconv_free_embedded_object_section
508 (((psiconv_in_line_layout) layout)->object);
358} 509}
359 510
360void psiconv_free_in_line_layout(psiconv_in_line_layout layout) 511void psiconv_free_in_line_layout(psiconv_in_line_layout layout)
361{ 512{
362 if (layout) { 513 if (layout) {
453 psiconv_free_word_styles_section(file->styles_sec); 604 psiconv_free_word_styles_section(file->styles_sec);
454 free(file); 605 free(file);
455 } 606 }
456} 607}
457 608
609void psiconv_free_sheet_status_section(psiconv_sheet_status_section section)
610{
611 if (section)
612 free(section);
613}
614
615void psiconv_free_sheet_numberformat(psiconv_sheet_numberformat numberformat)
616{
617 if (numberformat)
618 free(numberformat);
619}
620
621void psiconv_free_sheet_cell_layout(psiconv_sheet_cell_layout layout)
622{
623 psiconv_free_paragraph_layout(layout->paragraph);
624 psiconv_free_character_layout(layout->character);
625 psiconv_free_sheet_numberformat(layout->numberformat);
626}
627
628void psiconv_free_sheet_cell_aux(void *cell)
629{
630 psiconv_sheet_cell data = cell;
631
632 psiconv_free_sheet_cell_layout(data->layout);
633
634 if ((data->type == psiconv_cell_string) && (data->data.dat_string))
635 free(data->data.dat_string);
636}
637
638void psiconv_free_sheet_cell(psiconv_sheet_cell cell)
639{
640 if (cell) {
641 psiconv_free_sheet_cell_aux(cell);
642 free(cell);
643 }
644}
645
646void psiconv_free_sheet_cell_list(psiconv_sheet_cell_list list)
647{
648 if (list)
649 psiconv_list_free_el(list,psiconv_free_sheet_cell_aux);
650}
651
652void psiconv_free_sheet_line_aux(void *line)
653{
654 psiconv_sheet_line data = line;
655
656 psiconv_free_sheet_cell_layout(data->layout);
657}
658
659void psiconv_free_sheet_line(psiconv_sheet_line line)
660{
661 if (line) {
662 psiconv_free_sheet_line_aux(line);
663 free(line);
664 }
665}
666
667
668void psiconv_free_sheet_line_list(psiconv_sheet_line_list list)
669{
670 if (list)
671 psiconv_list_free_el(list,psiconv_free_sheet_line_aux);
672}
673
674void psiconv_free_sheet_grid_break_list(psiconv_sheet_grid_break_list list)
675{
676 if (list)
677 psiconv_list_free(list);
678}
679
680void psiconv_free_sheet_grid_size(psiconv_sheet_grid_size s)
681{
682 if (s)
683 free(s);
684}
685
686void psiconv_free_sheet_grid_size_list(psiconv_sheet_grid_size_list list)
687{
688 if (list)
689 psiconv_list_free(list);
690}
691
692void psiconv_free_sheet_grid_section(psiconv_sheet_grid_section sec)
693{
694 if (sec) {
695 psiconv_free_sheet_grid_size_list(sec->row_heights);
696 psiconv_free_sheet_grid_size_list(sec->column_heights);
697 psiconv_free_sheet_grid_break_list(sec->row_page_breaks);
698 psiconv_free_sheet_grid_break_list(sec->column_page_breaks);
699 free(sec);
700 }
701}
702
703void psiconv_free_sheet_worksheet_aux (void *data)
704{
705 psiconv_sheet_worksheet section = data;
706 psiconv_free_sheet_cell_layout(section->default_layout);
707 psiconv_free_sheet_cell_list(section->cells);
708 psiconv_free_sheet_line_list(section->row_default_layouts);
709 psiconv_free_sheet_line_list(section->col_default_layouts);
710 psiconv_free_sheet_grid_section(section->grid);
711}
712
713void psiconv_free_sheet_worksheet(psiconv_sheet_worksheet sheet)
714{
715 if (sheet) {
716 psiconv_free_sheet_worksheet_aux(sheet);
717 free(sheet);
718 }
719}
720
721void psiconv_free_sheet_worksheet_list(psiconv_sheet_worksheet_list list)
722{
723 if (list)
724 psiconv_list_free_el(list,psiconv_free_sheet_worksheet_aux);
725}
726
727void psiconv_free_formula_aux(void *data)
728{
729 psiconv_formula formula;
730 formula = data;
731 if (formula->type == psiconv_formula_dat_string)
732 free(formula->data.dat_string);
733 else if ((formula->type != psiconv_formula_dat_int) &&
734 (formula->type != psiconv_formula_dat_var) &&
735 (formula->type != psiconv_formula_dat_float) &&
736 (formula->type != psiconv_formula_dat_cellref) &&
737 (formula->type != psiconv_formula_dat_cellblock) &&
738 (formula->type != psiconv_formula_dat_vcellblock) &&
739 (formula->type != psiconv_formula_mark_opsep) &&
740 (formula->type != psiconv_formula_mark_opend) &&
741 (formula->type != psiconv_formula_mark_eof) &&
742 (formula->type != psiconv_formula_unknown))
743 psiconv_free_formula_list(formula->data.fun_operands);
744}
745
746void psiconv_free_formula(psiconv_formula formula)
747{
748 if (formula) {
749 psiconv_free_formula_aux(formula);
750 free(formula);
751 }
752}
753
754void psiconv_free_formula_list(psiconv_formula_list list)
755{
756 if (list)
757 psiconv_list_free_el(list,psiconv_free_formula_aux);
758}
759
760void psiconv_free_sheet_name_section(psiconv_sheet_name_section section)
761{
762 if (section) {
763 if(section->name)
764 free(section->name);
765 free(section);
766 }
767}
768
769void psiconv_free_sheet_info_section(psiconv_sheet_info_section section)
770{
771 if (section) {
772 free(section);
773 }
774}
775
776void psiconv_free_sheet_variable_aux(void * variable)
777{
778 psiconv_sheet_variable var = variable;
779 if (var->name)
780 free(var->name);
781 if (var->type == psiconv_var_string)
782 free(var->data.dat_string);
783}
784
785void psiconv_free_sheet_variable(psiconv_sheet_variable var)
786{
787 if (var) {
788 psiconv_free_sheet_variable_aux(var);
789 free(var);
790 }
791}
792
793void psiconv_free_sheet_variable_list(psiconv_sheet_variable_list list)
794{
795 if (list)
796 psiconv_list_free_el(list,psiconv_free_sheet_variable_aux);
797}
798
799void psiconv_free_sheet_workbook_section(psiconv_sheet_workbook_section section)
800{
801 if (section) {
802 psiconv_free_formula_list(section->formulas);
803 psiconv_free_sheet_worksheet_list(section->worksheets);
804 psiconv_free_sheet_name_section(section->name);
805 psiconv_free_sheet_info_section(section->info);
806 psiconv_free_sheet_variable_list(section->variables);
807 free(section);
808 }
809}
810
811void psiconv_free_sheet_f(psiconv_sheet_f file)
812{
813 if (file) {
814 psiconv_free_page_layout_section(file->page_sec);
815 psiconv_free_sheet_status_section(file->status_sec);
816 psiconv_free_sheet_workbook_section(file->workbook_sec);
817 free(file);
818 }
819}
820
821void psiconv_free_texted_f(psiconv_texted_f file)
822{
823 if (file) {
824 psiconv_free_page_layout_section(file->page_sec);
825 psiconv_free_texted_section(file->texted_sec);
826 free(file);
827 }
828}
829
830void psiconv_free_paint_data_section_aux(void * section)
831{
832 if (((psiconv_paint_data_section) section)->red)
833 free(((psiconv_paint_data_section)section) -> red);
834 if (((psiconv_paint_data_section) section)->green)
835 free(((psiconv_paint_data_section)section) -> green);
836 if (((psiconv_paint_data_section) section)->blue)
837 free(((psiconv_paint_data_section)section) -> blue);
838}
839
840void psiconv_free_paint_data_section(psiconv_paint_data_section section)
841{
842 if (section) {
843 psiconv_free_paint_data_section_aux(section);
844 free(section);
845 }
846}
847
848void psiconv_free_pictures(psiconv_pictures section)
849{
850 if (section)
851 psiconv_list_free_el(section,&psiconv_free_paint_data_section_aux);
852}
853
854void psiconv_free_jumptable_section (psiconv_jumptable_section section)
855{
856 if (section)
857 psiconv_list_free(section);
858}
859
860void psiconv_free_mbm_f(psiconv_mbm_f file)
861{
862 if (file) {
863 psiconv_free_pictures(file->sections);
864 free(file);
865 }
866}
867
868void psiconv_free_sketch_section(psiconv_sketch_section sec)
869{
870 if (sec) {
871 psiconv_free_paint_data_section(sec->picture);
872 free(sec);
873 }
874}
875
876void psiconv_free_sketch_f(psiconv_sketch_f file)
877{
878 if (file) {
879 psiconv_free_sketch_section(file->sketch_sec);
880 free(file);
881 }
882}
883
884void psiconv_free_clipart_section_aux(void *section)
885{
886 if (section)
887 free(((psiconv_clipart_section ) section)->picture);
888}
889
890void psiconv_free_clipart_section(psiconv_clipart_section section)
891{
892 if (section) {
893 psiconv_free_clipart_section_aux(section);
894 free(section);
895 }
896}
897
898void psiconv_free_cliparts(psiconv_cliparts section)
899{
900 if (section)
901 psiconv_list_free_el(section,&psiconv_free_clipart_section_aux);
902}
903
904void psiconv_free_clipart_f(psiconv_clipart_f file)
905{
906 if (file) {
907 psiconv_free_cliparts(file->sections);
908 free(file);
909 }
910}
911
458void psiconv_free_file(psiconv_file file) 912void psiconv_free_file(psiconv_file file)
459{ 913{
460 if (file) { 914 if (file) {
461 if (file->type == psiconv_word_file) 915 if (file->type == psiconv_word_file)
462 psiconv_free_word_f((psiconv_word_f) file->file); 916 psiconv_free_word_f((psiconv_word_f) file->file);
917 else if (file->type == psiconv_texted_file)
918 psiconv_free_texted_f((psiconv_texted_f) file->file);
919 else if (file->type == psiconv_mbm_file)
920 psiconv_free_mbm_f((psiconv_mbm_f) file->file);
921 else if (file->type == psiconv_sketch_file)
922 psiconv_free_sketch_f((psiconv_sketch_f) file->file);
923 else if (file->type == psiconv_clipart_file)
924 psiconv_free_clipart_f((psiconv_clipart_f) file->file);
925 else if (file->type == psiconv_sheet_file)
926 psiconv_free_sheet_f((psiconv_sheet_f) file->file);
463 free(file); 927 free(file);
464 } 928 }
465} 929}
930
931int psiconv_compare_color(const psiconv_color value1,
932 const psiconv_color value2)
933{
934 if (!value1 || !value2)
935 return 1;
936 if ((value1->red == value2->red) &&
937 (value1->green == value2->green) &&
938 (value1->blue == value2->blue))
939 return 0;
940 else
941 return 1;
942}
943
944int psiconv_compare_font(const psiconv_font value1,
945 const psiconv_font value2)
946{
947 if (!value1 || !value2 || !value1->name || !value2->name)
948 return 1;
949 if ((value1->screenfont == value2->screenfont) &&
950 !strcmp(value1->name,value2->name))
951 return 0;
952 else
953 return 1;
954}
955
956int psiconv_compare_border(const psiconv_border value1,
957 const psiconv_border value2)
958{
959 if (!value1 || !value2)
960 return 1;
961 if ((value1->kind == value2->kind) &&
962 (value1->thickness == value2->thickness) &&
963 !psiconv_compare_color(value1->color,value2->color))
964 return 0;
965 else
966 return 1;
967}
968
969int psiconv_compare_bullet(const psiconv_bullet value1,
970 const psiconv_bullet value2)
971{
972 if (!value1 || !value2)
973 return 1;
974 if ((value1->on == value2->on) &&
975 (value1->font_size == value2->font_size) &&
976 (value1->character == value2->character) &&
977 (value1->indent == value2->indent) &&
978 !psiconv_compare_color(value1->color,value2->color) &&
979 !psiconv_compare_font(value1->font,value2->font))
980 return 0;
981 else
982 return 1;
983}
984
985int psiconv_compare_tab(const psiconv_tab value1, const psiconv_tab value2)
986{
987 if (!value1 || !value2)
988 return 1;
989 if ((value1->location == value2->location) &&
990 (value1->kind == value2->kind))
991 return 0;
992 else
993 return 1;
994}
995
996int psiconv_compare_all_tabs(const psiconv_all_tabs value1,
997 const psiconv_all_tabs value2)
998{
999 int i;
1000
1001 if (!value1 || !value2 || !value1->extras || !value2->extras)
1002 return 1;
1003
1004 if ((value1->normal != value2->normal) ||
1005 psiconv_list_length(value1->extras) !=
1006 psiconv_list_length(value2->extras))
1007 return 1;
1008 for (i = 0; i < psiconv_list_length(value1->extras); i++)
1009 if (psiconv_compare_tab(psiconv_list_get(value1->extras,i),
1010 psiconv_list_get(value2->extras,i)))
1011
1012 return 1;
1013 return 0;
1014}
1015
1016int psiconv_compare_paragraph_layout(const psiconv_paragraph_layout value1,
1017 const psiconv_paragraph_layout value2)
1018{
1019 if (!value1 || !value2)
1020 return 1;
1021 if ((value1->indent_left == value2->indent_left) &&
1022 (value1->indent_right == value2->indent_right) &&
1023 (value1->indent_first == value2->indent_first) &&
1024 (value1->justify_hor == value2->justify_hor) &&
1025 (value1->justify_ver == value2->justify_ver) &&
1026 (value1->linespacing == value2->linespacing) &&
1027 (value1->space_above == value2->space_above) &&
1028 (value1->space_below == value2->space_below) &&
1029 (value1->keep_together == value2->keep_together) &&
1030 (value1->keep_with_next == value2->keep_with_next) &&
1031 (value1->on_next_page == value2->on_next_page) &&
1032 (value1->no_widow_protection == value2->no_widow_protection) &&
1033 (value1->border_distance == value2->border_distance) &&
1034 !psiconv_compare_color(value1->back_color,value2->back_color) &&
1035 !psiconv_compare_bullet(value1->bullet,value2->bullet) &&
1036 !psiconv_compare_border(value1->left_border,value2->left_border) &&
1037 !psiconv_compare_border(value1->right_border,value2->right_border) &&
1038 !psiconv_compare_border(value1->top_border,value2->top_border) &&
1039 !psiconv_compare_border(value1->bottom_border,value2->bottom_border) &&
1040 !psiconv_compare_all_tabs(value1->tabs,value2->tabs))
1041 return 0;
1042 else
1043 return 1;
1044}
1045
1046
1047int psiconv_compare_character_layout(const psiconv_character_layout value1,
1048 const psiconv_character_layout value2)
1049{
1050 if (!value1 || !value2)
1051 return 1;
1052 if ((value1->font_size == value2->font_size) &&
1053 (value1->italic == value2->italic) &&
1054 (value1->bold == value2->bold) &&
1055 (value1->super_sub == value2->super_sub) &&
1056 (value1->underline == value2->underline) &&
1057 (value1->strikethrough == value2->strikethrough) &&
1058 !psiconv_compare_color(value1->color,value2->color) &&
1059 !psiconv_compare_color(value1->back_color,value2->back_color) &&
1060 !psiconv_compare_font(value1->font,value2->font))
1061 return 0;
1062 else
1063 return 1;
1064}
1065
1066
1067
1068psiconv_word_styles_section psiconv_empty_word_styles_section(void)
1069{
1070 psiconv_word_styles_section result;
1071 if (!(result = malloc(sizeof(*result))))
1072 goto ERROR1;
1073 if (!(result->styles = psiconv_list_new(sizeof(struct psiconv_word_style_s))))
1074 goto ERROR2;
1075 if (!(result->normal = malloc(sizeof(struct psiconv_word_style_s))))
1076 goto ERROR3;
1077 if (!(result->normal->character = psiconv_basic_character_layout()))
1078 goto ERROR4;
1079 if (!(result->normal->paragraph = psiconv_basic_paragraph_layout()))
1080 goto ERROR5;
1081 result->normal->hotkey = 'N';
1082 result->normal->name = NULL;
1083 result->normal->built_in = psiconv_bool_true;
1084 result->normal->outline_level = 0;
1085 return result;
1086ERROR5:
1087 psiconv_free_character_layout(result->normal->character);
1088ERROR4:
1089 free(result->normal);
1090ERROR3:
1091 psiconv_list_free(result->styles);
1092ERROR2:
1093 free(result);
1094ERROR1:
1095 return NULL;
1096}
1097
1098psiconv_text_and_layout psiconv_empty_text_and_layout(void)
1099{
1100 return psiconv_list_new(sizeof(struct psiconv_paragraph_s));
1101}
1102
1103psiconv_texted_section psiconv_empty_texted_section(void)
1104{
1105 psiconv_texted_section result;
1106 if (!(result = malloc(sizeof(*result))))
1107 goto ERROR1;
1108 if (!(result->paragraphs = psiconv_empty_text_and_layout()))
1109 goto ERROR2;
1110 return result;
1111ERROR2:
1112 free(result);
1113ERROR1:
1114 return NULL;
1115}
1116
1117psiconv_page_header psiconv_empty_page_header(void)
1118{
1119 psiconv_page_header result;
1120 if (!(result = malloc(sizeof(*result))))
1121 goto ERROR1;
1122 result->on_first_page = psiconv_bool_true;
1123 if (!(result->base_paragraph_layout = psiconv_basic_paragraph_layout()))
1124 goto ERROR2;
1125 if (!(result->base_character_layout = psiconv_basic_character_layout()))
1126 goto ERROR3;
1127 if (!(result->text = psiconv_empty_texted_section()))
1128 goto ERROR4;
1129 return result;
1130ERROR4:
1131 psiconv_free_character_layout(result->base_character_layout);
1132ERROR3:
1133 psiconv_free_paragraph_layout(result->base_paragraph_layout);
1134ERROR2:
1135 free(result);
1136ERROR1:
1137 return NULL;
1138}
1139
1140psiconv_page_layout_section psiconv_empty_page_layout_section(void)
1141{
1142 psiconv_page_layout_section result;
1143 if (!(result = malloc(sizeof(*result))))
1144 goto ERROR1;
1145 result->first_page_nr = 1;
1146 result->header_dist = result->footer_dist = 1.27;
1147 result->left_margin = result->right_margin = 3.175;
1148 result->top_margin = result->bottom_margin = 2.54;
1149 result->page_width = 21.0;
1150 result->page_height = 29.7;
1151 result->landscape = psiconv_bool_false;
1152 if (!(result->header = psiconv_empty_page_header()))
1153 goto ERROR2;
1154 if (!(result->footer = psiconv_empty_page_header()))
1155 goto ERROR3;
1156 return result;
1157ERROR3:
1158 psiconv_free_page_header(result->header);
1159ERROR2:
1160 free(result);
1161ERROR1:
1162 return NULL;
1163}
1164
1165psiconv_word_status_section psiconv_empty_word_status_section(void)
1166{
1167 psiconv_word_status_section result;
1168 if (!(result = malloc(sizeof(*result))))
1169 return NULL;
1170 result->show_tabs = result->show_spaces = result->show_paragraph_ends =
1171 result->show_hard_minus = result->show_hard_space =
1172 result->fit_lines_to_screen = psiconv_bool_false;
1173 result->show_full_pictures = result->show_full_graphs =
1174 result->show_top_toolbar = result->show_side_toolbar =
1175 psiconv_bool_true;
1176 result->cursor_position = 0;
1177 result->display_size = 1000;
1178 return result;
1179}
1180
1181psiconv_word_f psiconv_empty_word_f(void)
1182{
1183 psiconv_word_f result;
1184 if (!(result = malloc(sizeof(*result))))
1185 goto ERROR1;
1186 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1187 goto ERROR2;
1188 if (!(result->paragraphs = psiconv_empty_text_and_layout()))
1189 goto ERROR3;
1190 if (!(result->status_sec = psiconv_empty_word_status_section()))
1191 goto ERROR4;
1192 if (!(result->styles_sec = psiconv_empty_word_styles_section()))
1193 goto ERROR5;
1194 return result;
1195ERROR5:
1196 psiconv_free_word_status_section(result->status_sec);
1197ERROR4:
1198 psiconv_free_text_and_layout(result->paragraphs);
1199ERROR3:
1200 psiconv_free_page_layout_section(result->page_sec);
1201ERROR2:
1202 free(result);
1203ERROR1:
1204 return NULL;
1205}
1206
1207psiconv_sheet_status_section psiconv_empty_sheet_status_section(void)
1208{
1209 psiconv_sheet_status_section result;
1210 if (!(result = malloc(sizeof(*result))))
1211 return NULL;
1212 result->show_horizontal_scrollbar = result->show_vertical_scrollbar =
1213 psiconv_triple_auto;
1214 result->show_graph = psiconv_bool_false;
1215 result->show_top_sheet_toolbar = result->show_side_sheet_toolbar =
1216 result->show_top_graph_toolbar = result->show_side_graph_toolbar =
1217 psiconv_bool_true;
1218 result->cursor_row = result->cursor_column = 0;
1219 result->sheet_display_size = result->graph_display_size = 1000;
1220 return result;
1221}
1222
1223psiconv_formula_list psiconv_empty_formula_list(void)
1224{
1225 return psiconv_list_new(sizeof(struct psiconv_formula_s));
1226}
1227
1228psiconv_sheet_workbook_section psiconv_empty_sheet_workbook_section(void)
1229{
1230 psiconv_sheet_workbook_section result;
1231 if (!(result = malloc(sizeof(*result))))
1232 goto ERROR1;
1233 if (!(result->formulas = psiconv_empty_formula_list()))
1234 goto ERROR2;
1235 return result;
1236ERROR2:
1237 free(result);
1238ERROR1:
1239 return NULL;
1240}
1241
1242
1243psiconv_sheet_f psiconv_empty_sheet_f(void)
1244{
1245 psiconv_sheet_f result;
1246 if (!(result = malloc(sizeof(*result))))
1247 goto ERROR1;
1248 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1249 goto ERROR2;
1250 if (!(result->status_sec = psiconv_empty_sheet_status_section()))
1251 goto ERROR3;
1252 if (!(result->workbook_sec = psiconv_empty_sheet_workbook_section()))
1253 goto ERROR4;
1254 return result;
1255ERROR4:
1256 psiconv_free_sheet_status_section(result->status_sec);
1257ERROR3:
1258 psiconv_free_page_layout_section(result->page_sec);
1259ERROR2:
1260 free(result);
1261ERROR1:
1262 return NULL;
1263}
1264
1265psiconv_texted_f psiconv_empty_texted_f(void)
1266{
1267 psiconv_texted_f result;
1268 if (!(result = malloc(sizeof(*result))))
1269 goto ERROR1;
1270 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1271 goto ERROR2;
1272 if (!(result->texted_sec = psiconv_empty_texted_section()))
1273 goto ERROR3;
1274 return result;
1275ERROR3:
1276 psiconv_free_page_layout_section(result->page_sec);
1277ERROR2:
1278 free(result);
1279ERROR1:
1280 return NULL;
1281}
1282
1283psiconv_paint_data_section psiconv_empty_paint_data_section(void)
1284{
1285 psiconv_paint_data_section result;
1286 if (!(result = malloc(sizeof(*result))))
1287 goto ERROR1;
1288 /* Is this correct? */
1289 result->xsize = result->ysize = result->pic_xsize = result->pic_ysize = 0;
1290 /* Probably forbidden... */
1291 if (!(result->red = malloc(0)))
1292 goto ERROR2;
1293 if (!(result->green = malloc(0)))
1294 goto ERROR3;
1295 if (!(result->blue = malloc(0)))
1296 goto ERROR4;
1297 return result;
1298ERROR4:
1299 free(result->green);
1300ERROR3:
1301 free(result->red);
1302ERROR2:
1303 free(result);
1304ERROR1:
1305 return NULL;
1306}
1307
1308
1309psiconv_pictures psiconv_empty_pictures(void)
1310{
1311 psiconv_pictures result;
1312 psiconv_paint_data_section pds;
1313 if (!(result = psiconv_list_new(sizeof(struct psiconv_paint_data_section_s))))
1314 goto ERROR1;
1315 if (!(pds = psiconv_empty_paint_data_section()))
1316 goto ERROR2;
1317 if (psiconv_list_add(result,pds))
1318 goto ERROR3;
1319 free(pds);
1320 return result;
1321ERROR3:
1322 psiconv_free_paint_data_section(pds);
1323ERROR2:
1324 psiconv_list_free(result);
1325ERROR1:
1326 return NULL;
1327}
1328
1329psiconv_mbm_f psiconv_empty_mbm_f(void)
1330{
1331 psiconv_mbm_f result;
1332 if (!(result = malloc(sizeof(*result))))
1333 goto ERROR1;
1334 if (!(result->sections = psiconv_empty_pictures()))
1335 goto ERROR2;
1336 return result;
1337ERROR2:
1338 free(result);
1339ERROR1:
1340 return NULL;
1341}
1342
1343psiconv_sketch_section psiconv_empty_sketch_section(void)
1344{
1345 psiconv_sketch_section result;
1346 if (!(result = malloc(sizeof(*result))))
1347 goto ERROR1;
1348 result->displayed_xsize = 320;
1349 result->displayed_ysize = 200;
1350 result->picture_data_x_offset = result->picture_data_y_offset =
1351 result->form_xsize = result->form_ysize =
1352 result->displayed_size_x_offset = result->displayed_size_y_offset = 0;
1353 result->magnification_x = result->magnification_y = 1.0;
1354 result->cut_left = result->cut_right = result->cut_top =
1355 result->cut_bottom = 0.0;
1356 if (!(result->picture = psiconv_empty_paint_data_section()))
1357 goto ERROR2;
1358 return result;
1359ERROR2:
1360 free(result);
1361ERROR1:
1362 return NULL;
1363}
1364
1365psiconv_sketch_f psiconv_empty_sketch_f(void)
1366{
1367 psiconv_sketch_f result;
1368 if (!(result = malloc(sizeof(*result))))
1369 goto ERROR1;
1370 if (!(result->sketch_sec = psiconv_empty_sketch_section()))
1371 goto ERROR2;
1372 return result;
1373ERROR2:
1374 free(result);
1375ERROR1:
1376 return NULL;
1377}
1378
1379psiconv_cliparts psiconv_empty_cliparts(void)
1380{
1381 /* Is this correct? */
1382 return psiconv_list_new(sizeof(struct psiconv_clipart_section_s));
1383}
1384
1385psiconv_clipart_f psiconv_empty_clipart_f(void)
1386{
1387 psiconv_clipart_f result;
1388 if (!(result = malloc(sizeof(*result))))
1389 goto ERROR1;
1390 if (!(result->sections = psiconv_empty_cliparts()))
1391 goto ERROR2;
1392 return result;
1393ERROR2:
1394 free(result);
1395ERROR1:
1396 return NULL;
1397}
1398
1399psiconv_file psiconv_empty_file(psiconv_file_type_t type)
1400{
1401 psiconv_file result;
1402 if (!(result = malloc(sizeof(*result))))
1403 return NULL;
1404 result->type = type;
1405 if (type == psiconv_word_file) {
1406 if (!(result->file = psiconv_empty_word_f()))
1407 goto ERROR;
1408 } else if (type == psiconv_sheet_file) {
1409 if (!(result->file = psiconv_empty_sheet_f()))
1410 goto ERROR;
1411 } else if (type == psiconv_texted_file) {
1412 if (!(result->file = psiconv_empty_texted_f()))
1413 goto ERROR;
1414 } else if (type == psiconv_mbm_file) {
1415 if (!(result->file = psiconv_empty_mbm_f()))
1416 goto ERROR;
1417 } else if (type == psiconv_sketch_file) {
1418 if (!(result->file = psiconv_empty_sketch_f()))
1419 goto ERROR;
1420 } else if (type == psiconv_clipart_file) {
1421 if (!(result->file = psiconv_empty_clipart_f()))
1422 goto ERROR;
1423 } else
1424 goto ERROR;
1425 return result;
1426ERROR:
1427 free(result);
1428 return NULL;
1429}

Legend:
Removed from v.2  
changed lines
  Added in v.167

frodo@frodo.looijaard.name
ViewVC Help
Powered by ViewVC 1.1.26