/[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 24 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.
21#include "compat.h" 21#include "compat.h"
22#include <stdlib.h> 22#include <stdlib.h>
23#include <string.h> 23#include <string.h>
24#include "data.h" 24#include "data.h"
25#include "list.h" 25#include "list.h"
26#include "general.h" 26
27#ifdef DMALLOC
28#include <dmalloc.h>
29#endif
27 30
28static psiconv_color clone_color(psiconv_color color); 31static psiconv_color clone_color(psiconv_color color);
29static psiconv_font clone_font(psiconv_font font); 32static psiconv_font clone_font(psiconv_font font);
30static psiconv_border clone_border(psiconv_border border); 33static psiconv_border clone_border(psiconv_border border);
31static psiconv_bullet clone_bullet(psiconv_bullet bullet); 34static psiconv_bullet clone_bullet(psiconv_bullet bullet);
32static psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs); 35static psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs);
33static void psiconv_free_style_aux(void *style); 36static void psiconv_free_style_aux(void *style);
34static void psiconv_free_in_line_layout_aux(void * layout); 37static void psiconv_free_in_line_layout_aux(void * layout);
35static void psiconv_free_paragraph_aux(void * paragraph); 38static void psiconv_free_paragraph_aux(void * paragraph);
36static void psiconv_free_paint_data_section_aux(void * section); 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);
37 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. */
38psiconv_character_layout psiconv_basic_character_layout(void) 69psiconv_character_layout psiconv_basic_character_layout(void)
39{ 70{
40 /* Make the structures static, to oblige IRIX */ 71 /* Make the structures static, to oblige IRIX */
41 static struct psiconv_color black = 72 static struct psiconv_color_s black =
42 { 73 {
43 0x00, /* red */ 74 0x00, /* red */
44 0x00, /* green */ 75 0x00, /* green */
45 0x00, /* blue */ 76 0x00, /* blue */
46 }; 77 };
47 static struct psiconv_color white = 78 static struct psiconv_color_s white =
48 { 79 {
49 0xff, /* red */ 80 0xff, /* red */
50 0xff, /* green */ 81 0xff, /* green */
51 0xff, /* blue */ 82 0xff, /* blue */
52 }; 83 };
53 static struct psiconv_font font = 84 static struct psiconv_font_s font =
54 { 85 {
55 "Times New Roman", /* name */ 86 "Times New Roman", /* name */
56 3 /* screenfont */ 87 3 /* screenfont */
57 }; 88 };
58 struct psiconv_character_layout cl = 89 struct psiconv_character_layout_s cl =
59 { 90 {
60 &black, /* color */ 91 &black, /* color */
61 &white, /* back_color */ 92 &white, /* back_color */
62 10.0, /* font_size */ 93 10.0, /* font_size */
63 psiconv_bool_false, /* italic */ 94 psiconv_bool_false, /* italic */
64 psiconv_bool_false, /* bold */ 95 psiconv_bool_false, /* bold */
65 psiconv_normalscript, /* super_sub */ 96 psiconv_normalscript, /* super_sub */
66 psiconv_bool_false, /* underline */ 97 psiconv_bool_false, /* underline */
67 psiconv_bool_false, /* strike_out */ 98 psiconv_bool_false, /* strikethrough */
68 &font, /* font */ 99 &font, /* font */
69 }; 100 };
70 101
71 return psiconv_clone_character_layout(&cl); 102 return psiconv_clone_character_layout(&cl);
72} 103}
73 104
105/* Note: these defaults seem to be hard-coded somewhere outside the
106 files themself. */
74psiconv_paragraph_layout psiconv_basic_paragraph_layout(void) 107psiconv_paragraph_layout psiconv_basic_paragraph_layout(void)
75{ 108{
76 static struct psiconv_font font = 109 static struct psiconv_font_s font =
77 { 110 {
78 "Times New Roman", /* name */ 111 "Times New Roman", /* name */
79 2 /* screenfont */ 112 2 /* screenfont */
80 }; 113 };
81 static struct psiconv_color black = 114 static struct psiconv_color_s black =
82 { 115 {
83 0x00, /* red */ 116 0x00, /* red */
84 0x00, /* green */ 117 0x00, /* green */
85 0x00, /* blue */ 118 0x00, /* blue */
86 }; 119 };
87 static struct psiconv_color white = 120 static struct psiconv_color_s white =
88 { 121 {
89 0xff, /* red */ 122 0xff, /* red */
90 0xff, /* green */ 123 0xff, /* green */
91 0xff, /* blue */ 124 0xff, /* blue */
92 }; 125 };
93 static struct psiconv_border no_border = 126 static struct psiconv_border_s no_border =
94 { 127 {
95 psiconv_border_none, /* kind */ 128 psiconv_border_none, /* kind */
96 1, /* thickness */ 129 1, /* thickness */
97 &black /* color */ 130 &black /* color */
98 }; 131 };
99 static struct psiconv_bullet bullet = 132 static struct psiconv_bullet_s bullet =
100 { 133 {
101 psiconv_bool_false, /* on */ 134 psiconv_bool_false, /* on */
102 10.0, /* font_size */ 135 10.0, /* font_size */
103 0x95, /* character */ 136 0x95, /* character */
104 psiconv_bool_true, /* indent */ 137 psiconv_bool_true, /* indent */
105 &black, /* color */ 138 &black, /* color */
106 &font, /* font */ 139 &font, /* font */
107 }; 140 };
108 static struct psiconv_all_tabs tabs = 141 static struct psiconv_all_tabs_s tabs =
109 { 142 {
110 0.64, /* normal */ 143 0.64, /* normal */
111 NULL /* kind */ 144 NULL /* kind */
112 }; 145 };
113 struct psiconv_paragraph_layout pl = 146 struct psiconv_paragraph_layout_s pl =
114 { 147 {
115 &white, /* back_color */ 148 &white, /* back_color */
116 0.0, /* indent_left */ 149 0.0, /* indent_left */
117 0.0, /* indent_right */ 150 0.0, /* indent_right */
118 0.0, /* indent_first */ 151 0.0, /* indent_first */
119 psiconv_justify_left, /* justify_hor */ 152 psiconv_justify_left, /* justify_hor */
120 psiconv_justify_middle,/* justify_ver */ 153 psiconv_justify_middle,/* justify_ver */
121 0.0, /* interline */ 154 10.0, /* linespacing */
122 psiconv_bool_false, /* interline_exact */ 155 psiconv_bool_false, /* linespacing_exact */
123 0.0, /* top_space */ 156 0.0, /* space_above */
124 0.0, /* bottom_space */ 157 0.0, /* space_below */
125 psiconv_bool_false, /* on_one_page */
126 psiconv_bool_false, /* together_with */ 158 psiconv_bool_false, /* keep_together */
159 psiconv_bool_false, /* keep_with_next */
127 psiconv_bool_false, /* on_next_page */ 160 psiconv_bool_false, /* on_next_page */
128 psiconv_bool_false, /* no_widow_protection */ 161 psiconv_bool_false, /* no_widow_protection */
162 psiconv_bool_false, /* wrap_to_fit_cell */
129 0.0, /* left_margin */ 163 0.0, /* left_margin */
130 &bullet, /* bullet */ 164 &bullet, /* bullet */
131 &no_border, /* left_border */ 165 &no_border, /* left_border */
132 &no_border, /* right_border */ 166 &no_border, /* right_border */
133 &no_border, /* top_border */ 167 &no_border, /* top_border */
134 &no_border, /* bottom_border */ 168 &no_border, /* bottom_border */
135 &tabs, /* tabs */ 169 &tabs, /* tabs */
136 }; 170 };
137 psiconv_paragraph_layout res; 171 psiconv_paragraph_layout res;
138 172
139 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;
140 res = psiconv_clone_paragraph_layout(&pl); 175 res = psiconv_clone_paragraph_layout(&pl);
141 psiconv_list_free(pl.tabs->extras); 176 psiconv_list_free(pl.tabs->extras);
142 return res; 177 return res;
143} 178}
144 179
145psiconv_color clone_color(psiconv_color color) 180psiconv_color clone_color(psiconv_color color)
146{ 181{
147 psiconv_color result; 182 psiconv_color result;
148 result = malloc(sizeof(*result)); 183 if (!(result = malloc(sizeof(*result))))
184 return NULL;
149 *result = *color; 185 *result = *color;
150 return result; 186 return result;
151} 187}
152 188
153psiconv_font clone_font(psiconv_font font) 189psiconv_font clone_font(psiconv_font font)
154{ 190{
155 psiconv_font result; 191 psiconv_font result;
156 result = malloc(sizeof(*result)); 192 if(!(result = malloc(sizeof(*result))))
193 goto ERROR1;
157 *result = *font; 194 *result = *font;
158 result->name = strdup(result->name); 195 if (!(result->name = strdup(result->name)))
196 goto ERROR2;
159 return result; 197 return result;
198ERROR2:
199 free(result);
200ERROR1:
201 return NULL;
160} 202}
161 203
162psiconv_border clone_border(psiconv_border border) 204psiconv_border clone_border(psiconv_border border)
163{ 205{
164 psiconv_border result; 206 psiconv_border result;
165 result = malloc(sizeof(*result)); 207 if (!(result = malloc(sizeof(*result))))
208 goto ERROR1;
166 *result = *border; 209 *result = *border;
167 result->color = clone_color(result->color); 210 if(!(result->color = clone_color(result->color)))
211 goto ERROR2;
168 return result; 212 return result;
213ERROR2:
214 free(result);
215ERROR1:
216 return NULL;
169} 217}
170 218
171psiconv_bullet clone_bullet(psiconv_bullet bullet) 219psiconv_bullet clone_bullet(psiconv_bullet bullet)
172{ 220{
173 psiconv_bullet result; 221 psiconv_bullet result;
174 result = malloc(sizeof(*result)); 222 if (!(result = malloc(sizeof(*result))))
223 goto ERROR1;
175 *result = *bullet; 224 *result = *bullet;
176 result->font = clone_font(result->font); 225 if (!(result->font = clone_font(result->font)))
226 goto ERROR2;
177 result->color = clone_color(result->color); 227 if (!(result->color = clone_color(result->color)))
228 goto ERROR3;
178 return result; 229 return result;
230ERROR3:
231 psiconv_free_font(result->font);
232ERROR2:
233 free(result);
234ERROR1:
235 return NULL;
179} 236}
180 237
181psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs) 238psiconv_all_tabs clone_all_tabs(psiconv_all_tabs all_tabs)
182{ 239{
183 psiconv_all_tabs result; 240 psiconv_all_tabs result;
184 result = malloc(sizeof(*result)); 241 if (!(result = malloc(sizeof(*result))))
242 goto ERROR1;
185 *result = *all_tabs; 243 *result = *all_tabs;
186 result->extras = psiconv_list_clone(result->extras); 244 if (!(result->extras = psiconv_list_clone(result->extras)))
245 goto ERROR2;
187 return result; 246 return result;
247ERROR2:
248 free(result);
249ERROR1:
250 return NULL;
188} 251}
189 252
190psiconv_character_layout psiconv_clone_character_layout 253psiconv_character_layout psiconv_clone_character_layout
191 (psiconv_character_layout ls) 254 (psiconv_character_layout ls)
192{ 255{
193 psiconv_character_layout result; 256 psiconv_character_layout result;
194 257
195 result = malloc(sizeof(*result)); 258 if (!(result = malloc(sizeof(*result))))
259 goto ERROR1;
196 *result = *ls; 260 *result = *ls;
197 result->color = clone_color(result->color); 261 if (!(result->color = clone_color(result->color)))
262 goto ERROR2;
198 result->back_color = clone_color(result->back_color); 263 if (!(result->back_color = clone_color(result->back_color)))
264 goto ERROR3;
199 result->font = clone_font(result->font); 265 if (!(result->font = clone_font(result->font)))
266 goto ERROR4;
200 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;
201} 276}
202 277
203psiconv_paragraph_layout psiconv_clone_paragraph_layout 278psiconv_paragraph_layout psiconv_clone_paragraph_layout
204 (psiconv_paragraph_layout ls) 279 (psiconv_paragraph_layout ls)
205{ 280{
206 psiconv_paragraph_layout result; 281 psiconv_paragraph_layout result;
207 282
208 result = malloc(sizeof(*result)); 283 if (!(result = malloc(sizeof(*result))))
284 goto ERROR1;
209 *result = *ls; 285 *result = *ls;
210 result->back_color = clone_color(result->back_color); 286 if (!(result->back_color = clone_color(result->back_color)))
287 goto ERROR2;
211 result->bullet = clone_bullet(result->bullet); 288 if (!(result->bullet = clone_bullet(result->bullet)))
289 goto ERROR3;
212 result->left_border = clone_border(result->left_border); 290 if (!(result->left_border = clone_border(result->left_border)))
291 goto ERROR4;
213 result->right_border = clone_border(result->right_border); 292 if (!(result->right_border = clone_border(result->right_border)))
293 goto ERROR5;
214 result->top_border = clone_border(result->top_border); 294 if (!(result->top_border = clone_border(result->top_border)))
295 goto ERROR6;
215 result->bottom_border = clone_border(result->bottom_border); 296 if (!(result->bottom_border = clone_border(result->bottom_border)))
297 goto ERROR7;
216 result->tabs = clone_all_tabs(result->tabs); 298 if (!(result->tabs = clone_all_tabs(result->tabs)))
299 goto ERROR8;
217 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;
218} 317}
219 318
220psiconv_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)
221{ 320{
222 if (nr == 0) 321 if (nr == 0)
223 return ss->normal; 322 return ss->normal;
224 else 323 else
225 return psiconv_list_get(ss->styles,0xff - nr); 324 return psiconv_list_get(ss->styles,0xff - nr);
226} 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
227 354
228void psiconv_free_color (psiconv_color color) 355void psiconv_free_color (psiconv_color color)
229{ 356{
230 if (color) 357 if (color)
231 free(color); 358 free(color);
315{ 442{
316 if (styles) { 443 if (styles) {
317 psiconv_free_word_style(styles->normal); 444 psiconv_free_word_style(styles->normal);
318 if (styles->styles) 445 if (styles->styles)
319 psiconv_list_free_el(styles->styles,psiconv_free_style_aux); 446 psiconv_list_free_el(styles->styles,psiconv_free_style_aux);
447 free(styles);
320 } 448 }
321} 449}
322 450
323void psiconv_free_header_section(psiconv_header_section header) 451void psiconv_free_header_section(psiconv_header_section header)
324{ 452{
345 free(section->name); 473 free(section->name);
346 free(section); 474 free(section);
347 } 475 }
348} 476}
349 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
350void psiconv_free_in_line_layout_aux(void * layout) 503void psiconv_free_in_line_layout_aux(void * layout)
351{ 504{
352 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);
353} 507}
354 508
355void psiconv_free_in_line_layout(psiconv_in_line_layout layout) 509void psiconv_free_in_line_layout(psiconv_in_line_layout layout)
356{ 510{
357 if (layout) { 511 if (layout) {
448 psiconv_free_word_styles_section(file->styles_sec); 602 psiconv_free_word_styles_section(file->styles_sec);
449 free(file); 603 free(file);
450 } 604 }
451} 605}
452 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
453void psiconv_free_texted_f(psiconv_texted_f file) 819void psiconv_free_texted_f(psiconv_texted_f file)
454{ 820{
455 if (file) { 821 if (file) {
456 psiconv_free_page_layout_section(file->page_sec); 822 psiconv_free_page_layout_section(file->page_sec);
457 psiconv_free_texted_section(file->texted_sec); 823 psiconv_free_texted_section(file->texted_sec);
481{ 847{
482 if (section) 848 if (section)
483 psiconv_list_free_el(section,&psiconv_free_paint_data_section_aux); 849 psiconv_list_free_el(section,&psiconv_free_paint_data_section_aux);
484} 850}
485 851
486void psiconv_free_mbm_jumptable_section (psiconv_mbm_jumptable_section section) 852void psiconv_free_jumptable_section (psiconv_jumptable_section section)
487{ 853{
488 if (section) 854 if (section)
489 psiconv_list_free(section); 855 psiconv_list_free(section);
490} 856}
491 857
507 873
508void psiconv_free_sketch_f(psiconv_sketch_f file) 874void psiconv_free_sketch_f(psiconv_sketch_f file)
509{ 875{
510 if (file) { 876 if (file) {
511 psiconv_free_sketch_section(file->sketch_sec); 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);
512 free(file); 906 free(file);
513 } 907 }
514} 908}
515 909
516void psiconv_free_file(psiconv_file file) 910void psiconv_free_file(psiconv_file file)
522 psiconv_free_texted_f((psiconv_texted_f) file->file); 916 psiconv_free_texted_f((psiconv_texted_f) file->file);
523 else if (file->type == psiconv_mbm_file) 917 else if (file->type == psiconv_mbm_file)
524 psiconv_free_mbm_f((psiconv_mbm_f) file->file); 918 psiconv_free_mbm_f((psiconv_mbm_f) file->file);
525 else if (file->type == psiconv_sketch_file) 919 else if (file->type == psiconv_sketch_file)
526 psiconv_free_sketch_f((psiconv_sketch_f) file->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);
527 free(file); 925 free(file);
528 } 926 }
529} 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.24  
changed lines
  Added in v.163

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