/[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 163
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_object(psiconv_object object)
494{
495 if (object) {
496 psiconv_free_object_icon_section(object->icon);
497 psiconv_free_object_display_section(object->display);
498 psiconv_free_file(object->object);
499 free(object);
500 }
501}
502
355void psiconv_free_in_line_layout_aux(void * layout) 503void psiconv_free_in_line_layout_aux(void * layout)
356{ 504{
357 psiconv_free_character_layout(((psiconv_in_line_layout) layout)->layout); 505 psiconv_free_character_layout(((psiconv_in_line_layout) layout)->layout);
506 psiconv_free_object(((psiconv_in_line_layout) layout)->object);
358} 507}
359 508
360void psiconv_free_in_line_layout(psiconv_in_line_layout layout) 509void psiconv_free_in_line_layout(psiconv_in_line_layout layout)
361{ 510{
362 if (layout) { 511 if (layout) {
453 psiconv_free_word_styles_section(file->styles_sec); 602 psiconv_free_word_styles_section(file->styles_sec);
454 free(file); 603 free(file);
455 } 604 }
456} 605}
457 606
607void psiconv_free_sheet_status_section(psiconv_sheet_status_section section)
608{
609 if (section)
610 free(section);
611}
612
613void psiconv_free_sheet_numberformat(psiconv_sheet_numberformat numberformat)
614{
615 if (numberformat)
616 free(numberformat);
617}
618
619void psiconv_free_sheet_cell_layout(psiconv_sheet_cell_layout layout)
620{
621 psiconv_free_paragraph_layout(layout->paragraph);
622 psiconv_free_character_layout(layout->character);
623 psiconv_free_sheet_numberformat(layout->numberformat);
624}
625
626void psiconv_free_sheet_cell_aux(void *cell)
627{
628 psiconv_sheet_cell data = cell;
629
630 psiconv_free_sheet_cell_layout(data->layout);
631
632 if ((data->type == psiconv_cell_string) && (data->data.dat_string))
633 free(data->data.dat_string);
634}
635
636void psiconv_free_sheet_cell(psiconv_sheet_cell cell)
637{
638 if (cell) {
639 psiconv_free_sheet_cell_aux(cell);
640 free(cell);
641 }
642}
643
644void psiconv_free_sheet_cell_list(psiconv_sheet_cell_list list)
645{
646 if (list)
647 psiconv_list_free_el(list,psiconv_free_sheet_cell_aux);
648}
649
650void psiconv_free_sheet_line_aux(void *line)
651{
652 psiconv_sheet_line data = line;
653
654 psiconv_free_sheet_cell_layout(data->layout);
655}
656
657void psiconv_free_sheet_line(psiconv_sheet_line line)
658{
659 if (line) {
660 psiconv_free_sheet_line_aux(line);
661 free(line);
662 }
663}
664
665
666void psiconv_free_sheet_line_list(psiconv_sheet_line_list list)
667{
668 if (list)
669 psiconv_list_free_el(list,psiconv_free_sheet_line_aux);
670}
671
672void psiconv_free_sheet_grid_break_list(psiconv_sheet_grid_break_list list)
673{
674 if (list)
675 psiconv_list_free(list);
676}
677
678void psiconv_free_sheet_grid_size(psiconv_sheet_grid_size s)
679{
680 if (s)
681 free(s);
682}
683
684void psiconv_free_sheet_grid_size_list(psiconv_sheet_grid_size_list list)
685{
686 if (list)
687 psiconv_list_free(list);
688}
689
690void psiconv_free_sheet_grid_section(psiconv_sheet_grid_section sec)
691{
692 if (sec) {
693 psiconv_free_sheet_grid_size_list(sec->row_heights);
694 psiconv_free_sheet_grid_size_list(sec->column_heights);
695 psiconv_free_sheet_grid_break_list(sec->row_page_breaks);
696 psiconv_free_sheet_grid_break_list(sec->column_page_breaks);
697 free(sec);
698 }
699}
700
701void psiconv_free_sheet_worksheet_aux (void *data)
702{
703 psiconv_sheet_worksheet section = data;
704 psiconv_free_sheet_cell_layout(section->default_layout);
705 psiconv_free_sheet_cell_list(section->cells);
706 psiconv_free_sheet_line_list(section->row_default_layouts);
707 psiconv_free_sheet_line_list(section->col_default_layouts);
708 psiconv_free_sheet_grid_section(section->grid);
709}
710
711void psiconv_free_sheet_worksheet(psiconv_sheet_worksheet sheet)
712{
713 if (sheet) {
714 psiconv_free_sheet_worksheet_aux(sheet);
715 free(sheet);
716 }
717}
718
719void psiconv_free_sheet_worksheet_list(psiconv_sheet_worksheet_list list)
720{
721 if (list)
722 psiconv_list_free_el(list,psiconv_free_sheet_worksheet_aux);
723}
724
725void psiconv_free_formula_aux(void *data)
726{
727 psiconv_formula formula;
728 formula = data;
729 if (formula->type == psiconv_formula_dat_string)
730 free(formula->data.dat_string);
731 else if ((formula->type != psiconv_formula_dat_int) &&
732 (formula->type != psiconv_formula_dat_var) &&
733 (formula->type != psiconv_formula_dat_float) &&
734 (formula->type != psiconv_formula_dat_cellref) &&
735 (formula->type != psiconv_formula_dat_cellblock) &&
736 (formula->type != psiconv_formula_dat_vcellblock) &&
737 (formula->type != psiconv_formula_mark_opsep) &&
738 (formula->type != psiconv_formula_mark_opend) &&
739 (formula->type != psiconv_formula_mark_eof) &&
740 (formula->type != psiconv_formula_unknown))
741 psiconv_free_formula_list(formula->data.fun_operands);
742}
743
744void psiconv_free_formula(psiconv_formula formula)
745{
746 if (formula) {
747 psiconv_free_formula_aux(formula);
748 free(formula);
749 }
750}
751
752void psiconv_free_formula_list(psiconv_formula_list list)
753{
754 if (list)
755 psiconv_list_free_el(list,psiconv_free_formula_aux);
756}
757
758void psiconv_free_sheet_name_section(psiconv_sheet_name_section section)
759{
760 if (section) {
761 if(section->name)
762 free(section->name);
763 free(section);
764 }
765}
766
767void psiconv_free_sheet_info_section(psiconv_sheet_info_section section)
768{
769 if (section) {
770 free(section);
771 }
772}
773
774void psiconv_free_sheet_variable_aux(void * variable)
775{
776 psiconv_sheet_variable var = variable;
777 if (var->name)
778 free(var->name);
779 if (var->type == psiconv_var_string)
780 free(var->data.dat_string);
781}
782
783void psiconv_free_sheet_variable(psiconv_sheet_variable var)
784{
785 if (var) {
786 psiconv_free_sheet_variable_aux(var);
787 free(var);
788 }
789}
790
791void psiconv_free_sheet_variable_list(psiconv_sheet_variable_list list)
792{
793 if (list)
794 psiconv_list_free_el(list,psiconv_free_sheet_variable_aux);
795}
796
797void psiconv_free_sheet_workbook_section(psiconv_sheet_workbook_section section)
798{
799 if (section) {
800 psiconv_free_formula_list(section->formulas);
801 psiconv_free_sheet_worksheet_list(section->worksheets);
802 psiconv_free_sheet_name_section(section->name);
803 psiconv_free_sheet_info_section(section->info);
804 psiconv_free_sheet_variable_list(section->variables);
805 free(section);
806 }
807}
808
809void psiconv_free_sheet_f(psiconv_sheet_f file)
810{
811 if (file) {
812 psiconv_free_page_layout_section(file->page_sec);
813 psiconv_free_sheet_status_section(file->status_sec);
814 psiconv_free_sheet_workbook_section(file->workbook_sec);
815 free(file);
816 }
817}
818
819void psiconv_free_texted_f(psiconv_texted_f file)
820{
821 if (file) {
822 psiconv_free_page_layout_section(file->page_sec);
823 psiconv_free_texted_section(file->texted_sec);
824 free(file);
825 }
826}
827
828void psiconv_free_paint_data_section_aux(void * section)
829{
830 if (((psiconv_paint_data_section) section)->red)
831 free(((psiconv_paint_data_section)section) -> red);
832 if (((psiconv_paint_data_section) section)->green)
833 free(((psiconv_paint_data_section)section) -> green);
834 if (((psiconv_paint_data_section) section)->blue)
835 free(((psiconv_paint_data_section)section) -> blue);
836}
837
838void psiconv_free_paint_data_section(psiconv_paint_data_section section)
839{
840 if (section) {
841 psiconv_free_paint_data_section_aux(section);
842 free(section);
843 }
844}
845
846void psiconv_free_pictures(psiconv_pictures section)
847{
848 if (section)
849 psiconv_list_free_el(section,&psiconv_free_paint_data_section_aux);
850}
851
852void psiconv_free_jumptable_section (psiconv_jumptable_section section)
853{
854 if (section)
855 psiconv_list_free(section);
856}
857
858void psiconv_free_mbm_f(psiconv_mbm_f file)
859{
860 if (file) {
861 psiconv_free_pictures(file->sections);
862 free(file);
863 }
864}
865
866void psiconv_free_sketch_section(psiconv_sketch_section sec)
867{
868 if (sec) {
869 psiconv_free_paint_data_section(sec->picture);
870 free(sec);
871 }
872}
873
874void psiconv_free_sketch_f(psiconv_sketch_f file)
875{
876 if (file) {
877 psiconv_free_sketch_section(file->sketch_sec);
878 free(file);
879 }
880}
881
882void psiconv_free_clipart_section_aux(void *section)
883{
884 if (section)
885 free(((psiconv_clipart_section ) section)->picture);
886}
887
888void psiconv_free_clipart_section(psiconv_clipart_section section)
889{
890 if (section) {
891 psiconv_free_clipart_section_aux(section);
892 free(section);
893 }
894}
895
896void psiconv_free_cliparts(psiconv_cliparts section)
897{
898 if (section)
899 psiconv_list_free_el(section,&psiconv_free_clipart_section_aux);
900}
901
902void psiconv_free_clipart_f(psiconv_clipart_f file)
903{
904 if (file) {
905 psiconv_free_cliparts(file->sections);
906 free(file);
907 }
908}
909
458void psiconv_free_file(psiconv_file file) 910void psiconv_free_file(psiconv_file file)
459{ 911{
460 if (file) { 912 if (file) {
461 if (file->type == psiconv_word_file) 913 if (file->type == psiconv_word_file)
462 psiconv_free_word_f((psiconv_word_f) file->file); 914 psiconv_free_word_f((psiconv_word_f) file->file);
915 else if (file->type == psiconv_texted_file)
916 psiconv_free_texted_f((psiconv_texted_f) file->file);
917 else if (file->type == psiconv_mbm_file)
918 psiconv_free_mbm_f((psiconv_mbm_f) file->file);
919 else if (file->type == psiconv_sketch_file)
920 psiconv_free_sketch_f((psiconv_sketch_f) file->file);
921 else if (file->type == psiconv_clipart_file)
922 psiconv_free_clipart_f((psiconv_clipart_f) file->file);
923 else if (file->type == psiconv_sheet_file)
924 psiconv_free_sheet_f((psiconv_sheet_f) file->file);
463 free(file); 925 free(file);
464 } 926 }
465} 927}
928
929int psiconv_compare_color(const psiconv_color value1,
930 const psiconv_color value2)
931{
932 if (!value1 || !value2)
933 return 1;
934 if ((value1->red == value2->red) &&
935 (value1->green == value2->green) &&
936 (value1->blue == value2->blue))
937 return 0;
938 else
939 return 1;
940}
941
942int psiconv_compare_font(const psiconv_font value1,
943 const psiconv_font value2)
944{
945 if (!value1 || !value2 || !value1->name || !value2->name)
946 return 1;
947 if ((value1->screenfont == value2->screenfont) &&
948 !strcmp(value1->name,value2->name))
949 return 0;
950 else
951 return 1;
952}
953
954int psiconv_compare_border(const psiconv_border value1,
955 const psiconv_border value2)
956{
957 if (!value1 || !value2)
958 return 1;
959 if ((value1->kind == value2->kind) &&
960 (value1->thickness == value2->thickness) &&
961 !psiconv_compare_color(value1->color,value2->color))
962 return 0;
963 else
964 return 1;
965}
966
967int psiconv_compare_bullet(const psiconv_bullet value1,
968 const psiconv_bullet value2)
969{
970 if (!value1 || !value2)
971 return 1;
972 if ((value1->on == value2->on) &&
973 (value1->font_size == value2->font_size) &&
974 (value1->character == value2->character) &&
975 (value1->indent == value2->indent) &&
976 !psiconv_compare_color(value1->color,value2->color) &&
977 !psiconv_compare_font(value1->font,value2->font))
978 return 0;
979 else
980 return 1;
981}
982
983int psiconv_compare_tab(const psiconv_tab value1, const psiconv_tab value2)
984{
985 if (!value1 || !value2)
986 return 1;
987 if ((value1->location == value2->location) &&
988 (value1->kind == value2->kind))
989 return 0;
990 else
991 return 1;
992}
993
994int psiconv_compare_all_tabs(const psiconv_all_tabs value1,
995 const psiconv_all_tabs value2)
996{
997 int i;
998
999 if (!value1 || !value2 || !value1->extras || !value2->extras)
1000 return 1;
1001
1002 if ((value1->normal != value2->normal) ||
1003 psiconv_list_length(value1->extras) !=
1004 psiconv_list_length(value2->extras))
1005 return 1;
1006 for (i = 0; i < psiconv_list_length(value1->extras); i++)
1007 if (psiconv_compare_tab(psiconv_list_get(value1->extras,i),
1008 psiconv_list_get(value2->extras,i)))
1009
1010 return 1;
1011 return 0;
1012}
1013
1014int psiconv_compare_paragraph_layout(const psiconv_paragraph_layout value1,
1015 const psiconv_paragraph_layout value2)
1016{
1017 if (!value1 || !value2)
1018 return 1;
1019 if ((value1->indent_left == value2->indent_left) &&
1020 (value1->indent_right == value2->indent_right) &&
1021 (value1->indent_first == value2->indent_first) &&
1022 (value1->justify_hor == value2->justify_hor) &&
1023 (value1->justify_ver == value2->justify_ver) &&
1024 (value1->linespacing == value2->linespacing) &&
1025 (value1->space_above == value2->space_above) &&
1026 (value1->space_below == value2->space_below) &&
1027 (value1->keep_together == value2->keep_together) &&
1028 (value1->keep_with_next == value2->keep_with_next) &&
1029 (value1->on_next_page == value2->on_next_page) &&
1030 (value1->no_widow_protection == value2->no_widow_protection) &&
1031 (value1->border_distance == value2->border_distance) &&
1032 !psiconv_compare_color(value1->back_color,value2->back_color) &&
1033 !psiconv_compare_bullet(value1->bullet,value2->bullet) &&
1034 !psiconv_compare_border(value1->left_border,value2->left_border) &&
1035 !psiconv_compare_border(value1->right_border,value2->right_border) &&
1036 !psiconv_compare_border(value1->top_border,value2->top_border) &&
1037 !psiconv_compare_border(value1->bottom_border,value2->bottom_border) &&
1038 !psiconv_compare_all_tabs(value1->tabs,value2->tabs))
1039 return 0;
1040 else
1041 return 1;
1042}
1043
1044
1045int psiconv_compare_character_layout(const psiconv_character_layout value1,
1046 const psiconv_character_layout value2)
1047{
1048 if (!value1 || !value2)
1049 return 1;
1050 if ((value1->font_size == value2->font_size) &&
1051 (value1->italic == value2->italic) &&
1052 (value1->bold == value2->bold) &&
1053 (value1->super_sub == value2->super_sub) &&
1054 (value1->underline == value2->underline) &&
1055 (value1->strikethrough == value2->strikethrough) &&
1056 !psiconv_compare_color(value1->color,value2->color) &&
1057 !psiconv_compare_color(value1->back_color,value2->back_color) &&
1058 !psiconv_compare_font(value1->font,value2->font))
1059 return 0;
1060 else
1061 return 1;
1062}
1063
1064
1065
1066psiconv_word_styles_section psiconv_empty_word_styles_section(void)
1067{
1068 psiconv_word_styles_section result;
1069 if (!(result = malloc(sizeof(*result))))
1070 goto ERROR1;
1071 if (!(result->styles = psiconv_list_new(sizeof(struct psiconv_word_style_s))))
1072 goto ERROR2;
1073 if (!(result->normal = malloc(sizeof(struct psiconv_word_style_s))))
1074 goto ERROR3;
1075 if (!(result->normal->character = psiconv_basic_character_layout()))
1076 goto ERROR4;
1077 if (!(result->normal->paragraph = psiconv_basic_paragraph_layout()))
1078 goto ERROR5;
1079 result->normal->hotkey = 'N';
1080 result->normal->name = NULL;
1081 result->normal->built_in = psiconv_bool_true;
1082 result->normal->outline_level = 0;
1083 return result;
1084ERROR5:
1085 psiconv_free_character_layout(result->normal->character);
1086ERROR4:
1087 free(result->normal);
1088ERROR3:
1089 psiconv_list_free(result->styles);
1090ERROR2:
1091 free(result);
1092ERROR1:
1093 return NULL;
1094}
1095
1096psiconv_text_and_layout psiconv_empty_text_and_layout(void)
1097{
1098 return psiconv_list_new(sizeof(struct psiconv_paragraph_s));
1099}
1100
1101psiconv_texted_section psiconv_empty_texted_section(void)
1102{
1103 psiconv_texted_section result;
1104 if (!(result = malloc(sizeof(*result))))
1105 goto ERROR1;
1106 if (!(result->paragraphs = psiconv_empty_text_and_layout()))
1107 goto ERROR2;
1108 return result;
1109ERROR2:
1110 free(result);
1111ERROR1:
1112 return NULL;
1113}
1114
1115psiconv_page_header psiconv_empty_page_header(void)
1116{
1117 psiconv_page_header result;
1118 if (!(result = malloc(sizeof(*result))))
1119 goto ERROR1;
1120 result->on_first_page = psiconv_bool_true;
1121 if (!(result->base_paragraph_layout = psiconv_basic_paragraph_layout()))
1122 goto ERROR2;
1123 if (!(result->base_character_layout = psiconv_basic_character_layout()))
1124 goto ERROR3;
1125 if (!(result->text = psiconv_empty_texted_section()))
1126 goto ERROR4;
1127 return result;
1128ERROR4:
1129 psiconv_free_character_layout(result->base_character_layout);
1130ERROR3:
1131 psiconv_free_paragraph_layout(result->base_paragraph_layout);
1132ERROR2:
1133 free(result);
1134ERROR1:
1135 return NULL;
1136}
1137
1138psiconv_page_layout_section psiconv_empty_page_layout_section(void)
1139{
1140 psiconv_page_layout_section result;
1141 if (!(result = malloc(sizeof(*result))))
1142 goto ERROR1;
1143 result->first_page_nr = 1;
1144 result->header_dist = result->footer_dist = 1.27;
1145 result->left_margin = result->right_margin = 3.175;
1146 result->top_margin = result->bottom_margin = 2.54;
1147 result->page_width = 21.0;
1148 result->page_height = 29.7;
1149 result->landscape = psiconv_bool_false;
1150 if (!(result->header = psiconv_empty_page_header()))
1151 goto ERROR2;
1152 if (!(result->footer = psiconv_empty_page_header()))
1153 goto ERROR3;
1154 return result;
1155ERROR3:
1156 psiconv_free_page_header(result->header);
1157ERROR2:
1158 free(result);
1159ERROR1:
1160 return NULL;
1161}
1162
1163psiconv_word_status_section psiconv_empty_word_status_section(void)
1164{
1165 psiconv_word_status_section result;
1166 if (!(result = malloc(sizeof(*result))))
1167 return NULL;
1168 result->show_tabs = result->show_spaces = result->show_paragraph_ends =
1169 result->show_hard_minus = result->show_hard_space =
1170 result->fit_lines_to_screen = psiconv_bool_false;
1171 result->show_full_pictures = result->show_full_graphs =
1172 result->show_top_toolbar = result->show_side_toolbar =
1173 psiconv_bool_true;
1174 result->cursor_position = 0;
1175 result->display_size = 1000;
1176 return result;
1177}
1178
1179psiconv_word_f psiconv_empty_word_f(void)
1180{
1181 psiconv_word_f result;
1182 if (!(result = malloc(sizeof(*result))))
1183 goto ERROR1;
1184 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1185 goto ERROR2;
1186 if (!(result->paragraphs = psiconv_empty_text_and_layout()))
1187 goto ERROR3;
1188 if (!(result->status_sec = psiconv_empty_word_status_section()))
1189 goto ERROR4;
1190 if (!(result->styles_sec = psiconv_empty_word_styles_section()))
1191 goto ERROR5;
1192 return result;
1193ERROR5:
1194 psiconv_free_word_status_section(result->status_sec);
1195ERROR4:
1196 psiconv_free_text_and_layout(result->paragraphs);
1197ERROR3:
1198 psiconv_free_page_layout_section(result->page_sec);
1199ERROR2:
1200 free(result);
1201ERROR1:
1202 return NULL;
1203}
1204
1205psiconv_sheet_status_section psiconv_empty_sheet_status_section(void)
1206{
1207 psiconv_sheet_status_section result;
1208 if (!(result = malloc(sizeof(*result))))
1209 return NULL;
1210 result->show_horizontal_scrollbar = result->show_vertical_scrollbar =
1211 psiconv_triple_auto;
1212 result->show_graph = psiconv_bool_false;
1213 result->show_top_sheet_toolbar = result->show_side_sheet_toolbar =
1214 result->show_top_graph_toolbar = result->show_side_graph_toolbar =
1215 psiconv_bool_true;
1216 result->cursor_row = result->cursor_column = 0;
1217 result->sheet_display_size = result->graph_display_size = 1000;
1218 return result;
1219}
1220
1221psiconv_formula_list psiconv_empty_formula_list(void)
1222{
1223 return psiconv_list_new(sizeof(struct psiconv_formula_s));
1224}
1225
1226psiconv_sheet_workbook_section psiconv_empty_sheet_workbook_section(void)
1227{
1228 psiconv_sheet_workbook_section result;
1229 if (!(result = malloc(sizeof(*result))))
1230 goto ERROR1;
1231 if (!(result->formulas = psiconv_empty_formula_list()))
1232 goto ERROR2;
1233 return result;
1234ERROR2:
1235 free(result);
1236ERROR1:
1237 return NULL;
1238}
1239
1240
1241psiconv_sheet_f psiconv_empty_sheet_f(void)
1242{
1243 psiconv_sheet_f result;
1244 if (!(result = malloc(sizeof(*result))))
1245 goto ERROR1;
1246 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1247 goto ERROR2;
1248 if (!(result->status_sec = psiconv_empty_sheet_status_section()))
1249 goto ERROR3;
1250 if (!(result->workbook_sec = psiconv_empty_sheet_workbook_section()))
1251 goto ERROR4;
1252 return result;
1253ERROR4:
1254 psiconv_free_sheet_status_section(result->status_sec);
1255ERROR3:
1256 psiconv_free_page_layout_section(result->page_sec);
1257ERROR2:
1258 free(result);
1259ERROR1:
1260 return NULL;
1261}
1262
1263psiconv_texted_f psiconv_empty_texted_f(void)
1264{
1265 psiconv_texted_f result;
1266 if (!(result = malloc(sizeof(*result))))
1267 goto ERROR1;
1268 if (!(result->page_sec = psiconv_empty_page_layout_section()))
1269 goto ERROR2;
1270 if (!(result->texted_sec = psiconv_empty_texted_section()))
1271 goto ERROR3;
1272 return result;
1273ERROR3:
1274 psiconv_free_page_layout_section(result->page_sec);
1275ERROR2:
1276 free(result);
1277ERROR1:
1278 return NULL;
1279}
1280
1281psiconv_paint_data_section psiconv_empty_paint_data_section(void)
1282{
1283 psiconv_paint_data_section result;
1284 if (!(result = malloc(sizeof(*result))))
1285 goto ERROR1;
1286 /* Is this correct? */
1287 result->xsize = result->ysize = result->pic_xsize = result->pic_ysize = 0;
1288 /* Probably forbidden... */
1289 if (!(result->red = malloc(0)))
1290 goto ERROR2;
1291 if (!(result->green = malloc(0)))
1292 goto ERROR3;
1293 if (!(result->blue = malloc(0)))
1294 goto ERROR4;
1295 return result;
1296ERROR4:
1297 free(result->green);
1298ERROR3:
1299 free(result->red);
1300ERROR2:
1301 free(result);
1302ERROR1:
1303 return NULL;
1304}
1305
1306
1307psiconv_pictures psiconv_empty_pictures(void)
1308{
1309 psiconv_pictures result;
1310 psiconv_paint_data_section pds;
1311 if (!(result = psiconv_list_new(sizeof(struct psiconv_paint_data_section_s))))
1312 goto ERROR1;
1313 if (!(pds = psiconv_empty_paint_data_section()))
1314 goto ERROR2;
1315 if (psiconv_list_add(result,pds))
1316 goto ERROR3;
1317 free(pds);
1318 return result;
1319ERROR3:
1320 psiconv_free_paint_data_section(pds);
1321ERROR2:
1322 psiconv_list_free(result);
1323ERROR1:
1324 return NULL;
1325}
1326
1327psiconv_mbm_f psiconv_empty_mbm_f(void)
1328{
1329 psiconv_mbm_f result;
1330 if (!(result = malloc(sizeof(*result))))
1331 goto ERROR1;
1332 if (!(result->sections = psiconv_empty_pictures()))
1333 goto ERROR2;
1334 return result;
1335ERROR2:
1336 free(result);
1337ERROR1:
1338 return NULL;
1339}
1340
1341psiconv_sketch_section psiconv_empty_sketch_section(void)
1342{
1343 psiconv_sketch_section result;
1344 if (!(result = malloc(sizeof(*result))))
1345 goto ERROR1;
1346 result->displayed_xsize = 320;
1347 result->displayed_ysize = 200;
1348 result->picture_data_x_offset = result->picture_data_y_offset =
1349 result->form_xsize = result->form_ysize =
1350 result->displayed_size_x_offset = result->displayed_size_y_offset = 0;
1351 result->magnification_x = result->magnification_y = 1.0;
1352 result->cut_left = result->cut_right = result->cut_top =
1353 result->cut_bottom = 0.0;
1354 if (!(result->picture = psiconv_empty_paint_data_section()))
1355 goto ERROR2;
1356 return result;
1357ERROR2:
1358 free(result);
1359ERROR1:
1360 return NULL;
1361}
1362
1363psiconv_sketch_f psiconv_empty_sketch_f(void)
1364{
1365 psiconv_sketch_f result;
1366 if (!(result = malloc(sizeof(*result))))
1367 goto ERROR1;
1368 if (!(result->sketch_sec = psiconv_empty_sketch_section()))
1369 goto ERROR2;
1370 return result;
1371ERROR2:
1372 free(result);
1373ERROR1:
1374 return NULL;
1375}
1376
1377psiconv_cliparts psiconv_empty_cliparts(void)
1378{
1379 /* Is this correct? */
1380 return psiconv_list_new(sizeof(struct psiconv_clipart_section_s));
1381}
1382
1383psiconv_clipart_f psiconv_empty_clipart_f(void)
1384{
1385 psiconv_clipart_f result;
1386 if (!(result = malloc(sizeof(*result))))
1387 goto ERROR1;
1388 if (!(result->sections = psiconv_empty_cliparts()))
1389 goto ERROR2;
1390 return result;
1391ERROR2:
1392 free(result);
1393ERROR1:
1394 return NULL;
1395}
1396
1397psiconv_file psiconv_empty_file(psiconv_file_type_t type)
1398{
1399 psiconv_file result;
1400 if (!(result = malloc(sizeof(*result))))
1401 return NULL;
1402 result->type = type;
1403 if (type == psiconv_word_file) {
1404 if (!(result->file = psiconv_empty_word_f()))
1405 goto ERROR;
1406 } else if (type == psiconv_sheet_file) {
1407 if (!(result->file = psiconv_empty_sheet_f()))
1408 goto ERROR;
1409 } else if (type == psiconv_texted_file) {
1410 if (!(result->file = psiconv_empty_texted_f()))
1411 goto ERROR;
1412 } else if (type == psiconv_mbm_file) {
1413 if (!(result->file = psiconv_empty_mbm_f()))
1414 goto ERROR;
1415 } else if (type == psiconv_sketch_file) {
1416 if (!(result->file = psiconv_empty_sketch_f()))
1417 goto ERROR;
1418 } else if (type == psiconv_clipart_file) {
1419 if (!(result->file = psiconv_empty_clipart_f()))
1420 goto ERROR;
1421 } else
1422 goto ERROR;
1423 return result;
1424ERROR:
1425 free(result);
1426 return NULL;
1427}

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

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