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

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

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

Revision 79 Revision 232
1/* 1/*
2 generate_common.c - Part of psiconv, a PSION 5 file formats converter 2 generate_common.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 2000 Frodo Looijaard <frodol@dds.nl> 3 Copyright (c) 2000-2004 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.
… …
23#include <string.h> 23#include <string.h>
24 24
25#include "generate_routines.h" 25#include "generate_routines.h"
26#include "error.h" 26#include "error.h"
27 27
28#ifdef DMALLOC
29#include <dmalloc.h>
30#endif
31
28static int psiconv_write_layout_section(psiconv_buffer buf, 32static int psiconv_write_layout_section(const psiconv_config config,
33 psiconv_buffer buf, int lev,
29 const psiconv_text_and_layout value, 34 const psiconv_text_and_layout value,
30 const psiconv_word_styles_section styles, 35 const psiconv_word_styles_section styles,
31 int with_styles); 36 int with_styles);
32 37
33/* Maybe use a psiconv_header_section variable instead? */ 38/* Maybe use a psiconv_header_section variable instead? */
34int psiconv_write_header_section(psiconv_buffer buf,psiconv_u32 uid1, 39int psiconv_write_header_section(const psiconv_config config,
40 psiconv_buffer buf,int lev,psiconv_u32 uid1,
35 psiconv_u32 uid2, psiconv_u32 uid3) 41 psiconv_u32 uid2, psiconv_u32 uid3)
36{ 42{
37 int res; 43 int res;
44 psiconv_progress(config,lev,0,"Writing header section");
38 if ((res = psiconv_write_u32(buf,uid1))) 45 if ((res = psiconv_write_u32(config,buf,lev+1,uid1)))
46 goto ERROR;
47 if ((res = psiconv_write_u32(config,buf,lev+1,uid2)))
48 goto ERROR;
49 if ((res = psiconv_write_u32(config,buf,lev+1,uid3)))
50 goto ERROR;
51 if ((res = psiconv_write_u32(config,buf,lev+1,
52 psiconv_checkuid(uid1,uid2,uid3))))
53 goto ERROR;
54 psiconv_progress(config,lev,0,"End of header section");
55 return 0;
56
57ERROR:
58 psiconv_error(config,lev,0,"Writing of header section failed");
39 return res; 59 return res;
40 if ((res = psiconv_write_u32(buf,uid2)))
41 return res;
42 if ((res = psiconv_write_u32(buf,uid3)))
43 return res;
44 return psiconv_write_u32(buf,psiconv_checkuid(uid1,uid2,uid3));
45} 60}
46 61
47int psiconv_write_section_table_section(psiconv_buffer buf, 62int psiconv_write_section_table_section(const psiconv_config config,
63 psiconv_buffer buf,int lev,
48 const psiconv_section_table_section value) 64 const psiconv_section_table_section value)
49{ 65{
50 int res,i; 66 int res,i;
51 psiconv_section_table_entry entry; 67 psiconv_section_table_entry entry;
52 68
69 psiconv_progress(config,lev,0,"Writing section table section");
53 if (!value) { 70 if (!value) {
54 psiconv_warn(0,psiconv_buffer_length(buf),"Null section table section"); 71 psiconv_error(config,lev,0,"Null section table section");
55 return -PSICONV_E_GENERATE; 72 res = -PSICONV_E_GENERATE;
73 goto ERROR;
56 } 74 }
57 75
58 if ((res = psiconv_write_u8(buf,2 * psiconv_list_length(value)))) 76 if ((res = psiconv_write_u8(config,buf,lev+1,2 * psiconv_list_length(value))))
59 return res; 77 goto ERROR;
60 for (i = 0; i < psiconv_list_length(value); i++) { 78 for (i = 0; i < psiconv_list_length(value); i++) {
61 if (!(entry = psiconv_list_get(value,i))) { 79 if (!(entry = psiconv_list_get(value,i))) {
62 psiconv_warn(0,psiconv_buffer_length(buf),"Massive memory corruption"); 80 psiconv_error(config,lev+1,0,"Massive memory corruption");
63 return -PSICONV_E_NOMEM; 81 res = -PSICONV_E_NOMEM;
82 goto ERROR;
64 } 83 }
65 if ((res = psiconv_write_u32(buf,entry->id))) 84 if ((res = psiconv_write_u32(config,buf,lev+1,entry->id)))
66 return res; 85 goto ERROR;
67 if ((res = psiconv_write_u32(buf,entry->offset))) 86 if ((res = psiconv_write_offset(config,buf,lev+1,entry->offset)))
68 return res; 87 goto ERROR;
69 } 88 }
89 psiconv_progress(config,lev,0,"End of section table section");
70 return -PSICONV_E_OK; 90 return -PSICONV_E_OK;
71}
72 91
92ERROR:
93 psiconv_error(config,lev,0,"Writing of section table section failed");
94 return res;
95}
96
73int psiconv_write_application_id_section(psiconv_buffer buf,psiconv_u32 id, 97int psiconv_write_application_id_section(const psiconv_config config,
98 psiconv_buffer buf,int lev,psiconv_u32 id,
74 const psiconv_string_t text) 99 const psiconv_string_t text)
75{ 100{
76 int res; 101 int res;
102 psiconv_progress(config,lev,0,"Writing application id section");
77 if ((res = psiconv_write_u32(buf,id))) 103 if ((res = psiconv_write_u32(config,buf,lev+1,id)))
104 goto ERROR;
105 if ((res = psiconv_write_string(config,buf,lev+1,text)))
106 goto ERROR;
107 psiconv_progress(config,lev,0,"End of application id section");
108 return 0;
109ERROR:
110 psiconv_error(config,lev,0,"Writing of application id section failed");
78 return res; 111 return res;
79 return psiconv_write_string(buf,text);
80} 112}
81 113
82int psiconv_write_text_section(psiconv_buffer buf, 114int psiconv_write_text_section(const psiconv_config config,
115 psiconv_buffer buf,int lev,
83 const psiconv_text_and_layout value) 116 const psiconv_text_and_layout value)
84{ 117{
85 int res; 118 int res;
86 psiconv_buffer extra_buf; 119 psiconv_buffer extra_buf = NULL;
87 int i,j; 120 int i,j;
88 psiconv_paragraph paragraph; 121 psiconv_paragraph paragraph;
89 122
123 psiconv_progress(config,lev,0,"Writing text section");
90 if (!value) { 124 if (!value) {
91 psiconv_warn(0,psiconv_buffer_length(buf),"Null text section"); 125 psiconv_error(config,lev+1,0,"Null text section");
92 return -PSICONV_E_GENERATE; 126 res = -PSICONV_E_GENERATE;
127 goto ERROR;
93 } 128 }
94 129
130 if (psiconv_list_length(value)) {
95 if (!(extra_buf = psiconv_buffer_new(0))) 131 if (!(extra_buf = psiconv_buffer_new())) {
96 return -PSICONV_E_NOMEM;
97 for (i = 0; i < psiconv_list_length(value); i++) {
98 if (!(paragraph = psiconv_list_get(value,i))) {
99 psiconv_warn(0,psiconv_buffer_length(buf),"Massive memory corruption");
100 res = -PSICONV_E_OTHER; 132 res = -PSICONV_E_NOMEM;
101 goto ERROR; 133 goto ERROR;
102 } 134 }
103 for (j = 0; j < strlen(paragraph->text); j++) 135 for (i = 0; i < psiconv_list_length(value); i++) {
104 if ((res = psiconv_write_u8(extra_buf,paragraph->text[j]))) 136 if (!(paragraph = psiconv_list_get(value,i))) {
137 psiconv_error(config,lev+1,0,"Massive memory corruption");
138 res = -PSICONV_E_NOMEM;
105 goto ERROR; 139 goto ERROR;
106 psiconv_write_u8(extra_buf,0x06); 140 }
141 for (j = 0; j < psiconv_unicode_strlen(paragraph->text); j++)
142 if ((res = psiconv_unicode_write_char(config,extra_buf,lev+1,
143 paragraph->text[j])))
144 goto ERROR;
145 psiconv_unicode_write_char(config,extra_buf,lev+1,0x06);
107 } 146 }
108 if ((res = psiconv_write_X(buf,psiconv_buffer_length(extra_buf)))) 147 if ((res = psiconv_write_X(config,buf,lev+1,psiconv_buffer_length(extra_buf))))
109 goto ERROR; 148 goto ERROR;
110 res = psiconv_buffer_concat(buf,extra_buf); 149 res = psiconv_buffer_concat(buf,extra_buf);
150 } else
151 /* Hack: empty text sections are just not allowed */
152 if ((res = psiconv_write_u16(config,buf,lev+1,0x0602)))
153 goto ERROR;
154
155 psiconv_progress(config,lev,0,"End of text section");
156 return 0;
111 157
112ERROR: 158ERROR:
159 if (extra_buf)
113 psiconv_buffer_free(extra_buf); 160 psiconv_buffer_free(extra_buf);
161 psiconv_error(config,lev,0,"Writing of text section failed");
114 return res; 162 return res;
115} 163}
116 164
117int psiconv_write_layout_section(psiconv_buffer buf, 165int psiconv_write_layout_section(const psiconv_config config,
166 psiconv_buffer buf,int lev,
118 const psiconv_text_and_layout value, 167 const psiconv_text_and_layout value,
119 const psiconv_word_styles_section styles, 168 const psiconv_word_styles_section styles,
120 int with_styles) 169 int with_styles)
121{ 170{
122 typedef struct psiconv_paragraph_type_list_s 171 typedef struct psiconv_paragraph_type_list_s
… …
124 psiconv_character_layout character; 173 psiconv_character_layout character;
125 psiconv_paragraph_layout paragraph; 174 psiconv_paragraph_layout paragraph;
126 psiconv_u8 style; 175 psiconv_u8 style;
127 psiconv_u8 nr; 176 psiconv_u8 nr;
128 } *psiconv_paragraph_type_list; 177 } *psiconv_paragraph_type_list;
178 psiconv_u32 obj_id;
129 psiconv_list paragraph_type_list; /* Of psiconv_paragraph_type_list_s */ 179 psiconv_list paragraph_type_list; /* Of psiconv_paragraph_type_list_s */
130 psiconv_paragraph_type_list paragraph_type; 180 psiconv_paragraph_type_list paragraph_type;
131 struct psiconv_paragraph_type_list_s new_type; 181 struct psiconv_paragraph_type_list_s new_type;
132 psiconv_buffer buf_types,buf_elements,buf_inlines; 182 psiconv_buffer buf_types,buf_elements,buf_inlines,buf_objects;
133 psiconv_paragraph paragraph; 183 psiconv_paragraph paragraph;
134 psiconv_in_line_layout in_line; 184 psiconv_in_line_layout in_line = NULL;
135 psiconv_word_style style; 185 psiconv_word_style style;
136 int i,j,para_type,nr_of_inlines=0,res; 186 psiconv_character_layout para_charlayout;
187 int i,j,para_type,nr_of_inlines=0,res,ptl_length,pel_length,thislen,paralen;
137 188
189 psiconv_progress(config,lev,0,"Writing layout section");
138 if (!value) { 190 if (!value) {
139 psiconv_warn(0,psiconv_buffer_length(buf),"Null text section"); 191 psiconv_error(config,lev,0,"Null text section");
140 return -PSICONV_E_GENERATE; 192 res = -PSICONV_E_GENERATE;
193 goto ERROR1;
141 } 194 }
142 195
143 if (!(paragraph_type_list = psiconv_list_new(sizeof(new_type)))) { 196 if (!(paragraph_type_list = psiconv_list_new(sizeof(new_type)))) {
144 res = -PSICONV_E_NOMEM; 197 res = -PSICONV_E_NOMEM;
145 goto ERROR1; 198 goto ERROR1;
146 } 199 }
147 200
148 if (!(buf_types = psiconv_buffer_new(0))) { 201 if (!(buf_types = psiconv_buffer_new())) {
149 res = -PSICONV_E_NOMEM; 202 res = -PSICONV_E_NOMEM;
150 goto ERROR2; 203 goto ERROR2;
151 } 204 }
152 205
153 if (!(buf_elements = psiconv_buffer_new(0))) { 206 if (!(buf_elements = psiconv_buffer_new())) {
154 res = -PSICONV_E_NOMEM; 207 res = -PSICONV_E_NOMEM;
155 goto ERROR3; 208 goto ERROR3;
156 } 209 }
157 210
158 if (!(buf_inlines = psiconv_buffer_new(0))) { 211 if (!(buf_inlines = psiconv_buffer_new())) {
159 res = -PSICONV_E_NOMEM; 212 res = -PSICONV_E_NOMEM;
160 goto ERROR4; 213 goto ERROR4;
161 } 214 }
162 215
216 if (!(buf_objects = psiconv_buffer_new())) {
217 res = -PSICONV_E_NOMEM;
218 goto ERROR5;
219 }
220
163 for (i = 0; i < psiconv_list_length(value); i++) { 221 for (i = 0; i < psiconv_list_length(value); i++) {
164 if (!(paragraph = psiconv_list_get(value,i))) { 222 if (!(paragraph = psiconv_list_get(value,i))) {
165 psiconv_warn(0,psiconv_buffer_length(buf),"Massive memory corruption"); 223 psiconv_error(config,lev+1,0,"Massive memory corruption");
166 res = -PSICONV_E_OTHER; 224 res = -PSICONV_E_NOMEM;
167 goto ERROR5; 225 goto ERROR6;
168 } 226 }
169 if ((res = psiconv_write_u32(buf_elements,strlen(paragraph->text)+1))) 227 if ((res = psiconv_write_u32(config,buf_elements,lev+1,
228 psiconv_unicode_strlen(paragraph->text)+1)))
170 goto ERROR5; 229 goto ERROR6;
171 230
231 /* We need it for the next if-statement */
172 if (psiconv_list_length(paragraph->in_lines)) { 232 if (psiconv_list_length(paragraph->in_lines) == 1)
233 if (!(in_line = psiconv_list_get(paragraph->in_lines,1))) {
234 res = -PSICONV_E_NOMEM;
235 goto ERROR6;
236 }
237
238 if ((psiconv_list_length(paragraph->in_lines) > 1) ||
239 ((psiconv_list_length(paragraph->in_lines) == 1) &&
240 (in_line->object != NULL))) {
173 /* Inline layouts, so we generate a paragraph element and inline 241 /* Inline layouts, or an object, so we generate a paragraph element
174 elements */ 242 and inline elements */
175 if ((res = psiconv_write_u32(buf_elements,0x00))) 243 if ((res = psiconv_write_u8(config,buf_elements,lev+1,0x00)))
176 goto ERROR5; 244 goto ERROR6;
177 if (!(style = psiconv_get_style(styles,paragraph->base_style))) { 245 if (!(style = psiconv_get_style(styles,paragraph->base_style))) {
178 psiconv_warn(0,psiconv_buffer_length(buf),"Unknown style"); 246 psiconv_error(config,lev+1,0,"Unknown style");
179 res = -PSICONV_E_GENERATE; 247 res = -PSICONV_E_GENERATE;
180 goto ERROR5; 248 goto ERROR6;
181 } 249 }
182 if ((res = psiconv_write_paragraph_layout_list(buf_elements, 250 if ((res = psiconv_write_paragraph_layout_list(config,buf_elements,lev+1,
183 paragraph->base_paragraph, 251 paragraph->base_paragraph,
184 style->paragraph))) 252 style->paragraph)))
185 goto ERROR5; 253 goto ERROR6;
186 if (with_styles) 254 if (with_styles)
187 if ((res = psiconv_write_u8(buf_elements,paragraph->base_style))) 255 if ((res = psiconv_write_u8(config,buf_elements,lev+1,paragraph->base_style)))
188 goto ERROR5; 256 goto ERROR6;
189 if ((res = psiconv_write_u32(buf_elements, 257 if ((res = psiconv_write_u32(config,buf_elements,lev+1,
190 psiconv_list_length(paragraph->in_lines)))) 258 psiconv_list_length(paragraph->in_lines))))
191 goto ERROR5; 259 goto ERROR6;
192 260
193 /* Generate the inlines. NB: Against what are all settings relative?!? */ 261 /* Generate the inlines. NB: Against what are all settings relative?!? */
262 paralen = 0;
194 for (j = 0; j < psiconv_list_length(paragraph->in_lines); j++) { 263 for (j = 0; j < psiconv_list_length(paragraph->in_lines); j++) {
195 nr_of_inlines ++; 264 nr_of_inlines ++;
196 if (!(in_line = psiconv_list_get(paragraph->in_lines,j))) { 265 if (!(in_line = psiconv_list_get(paragraph->in_lines,j))) {
197 psiconv_warn(0,psiconv_buffer_length(buf),"Massive memory corruption"); 266 psiconv_error(config,lev,0,"Massive memory corruption");
198 res = -PSICONV_E_OTHER; 267 res = -PSICONV_E_NOMEM;
199 goto ERROR5; 268 goto ERROR6;
200 } 269 }
201 if ((res = psiconv_write_u8(buf_inlines,0x00))) 270 if ((res = psiconv_write_u8(config,buf_inlines,lev+1,in_line->object?0x01:0x00)))
202 goto ERROR5; 271 goto ERROR6;
272 thislen = in_line->length;
273 paralen += thislen;
274 /* If this is the last in_line, we need to make sure that the
275 complete length of all inlines equals the text length */
276 if (j == psiconv_list_length(paragraph->in_lines)-1) {
277 if (paralen > psiconv_unicode_strlen(paragraph->text)+1) {
278 res = -PSICONV_E_GENERATE;
279 goto ERROR6;
280 }
281 thislen += psiconv_unicode_strlen(paragraph->text)+1-paralen;
282 }
203 if ((res = psiconv_write_u32(buf_inlines,in_line->length))) 283 if ((res = psiconv_write_u32(config,buf_inlines,lev+1,thislen)))
204 goto ERROR5; 284 goto ERROR6;
205 if ((res = psiconv_write_character_layout_list(buf_elements, 285 if ((res = psiconv_write_character_layout_list(config,buf_inlines,lev+1,
206 in_line->layout, 286 in_line->layout,
207 style->character))) 287 style->character)))
208 goto ERROR5; 288 goto ERROR6;
289 if (in_line->object) {
290 if ((res = psiconv_write_u32(config,buf_inlines,lev+1,PSICONV_ID_OBJECT)))
291 goto ERROR6;
292 obj_id = psiconv_buffer_unique_id();
293 if ((res = psiconv_buffer_add_reference(buf_inlines,obj_id)))
294 goto ERROR6;
295 if ((res = psiconv_buffer_add_target(buf_objects,obj_id)))
296 goto ERROR6;
297 if ((res = psiconv_write_embedded_object_section(config,buf_objects,lev+1,
298 in_line->object)))
299 goto ERROR6;
300 if ((res = psiconv_write_length(config,buf_inlines,lev+1,in_line->object_width)))
301 goto ERROR6;
302 if ((res = psiconv_write_length(config,buf_inlines,lev+1,in_line->object_height)))
303 goto ERROR6;
304 }
209 } 305 }
210 } else { 306 } else {
211 /* No inline layouts, so we generate a paragraph type list */ 307 /* No inline layouts (or only 1), so we generate a paragraph type list */
212 para_type = 0; 308 para_type = 0;
309 /* Set para_charlayout to the correct character-level layout */
310 if (psiconv_list_length(paragraph->in_lines) == 0)
311 para_charlayout = paragraph->base_character;
312 else {
313 if (!(in_line = psiconv_list_get(paragraph->in_lines,0))) {
314 psiconv_error(config,lev,0,"Massive memory corruption");
315 res = -PSICONV_E_NOMEM;
316 goto ERROR6;
317 }
318 para_charlayout = in_line->layout;
319 }
213 for (j = 0; j < psiconv_list_length(paragraph_type_list); j++) { 320 for (j = 0; j < psiconv_list_length(paragraph_type_list); j++) {
214 if (!(paragraph_type = psiconv_list_get(paragraph_type_list,j))) { 321 if (!(paragraph_type = psiconv_list_get(paragraph_type_list,j))) {
215 psiconv_warn(0,psiconv_buffer_length(buf),"Massive memory corruption"); 322 psiconv_error(config,lev,0,"Massive memory corruption");
216 res = -PSICONV_E_OTHER; 323 res = -PSICONV_E_NOMEM;
217 goto ERROR5; 324 goto ERROR6;
218 } 325 }
219 if ((paragraph->base_style == paragraph_type->style) && 326 if ((paragraph->base_style == paragraph_type->style) &&
220 !psiconv_compare_character_layout(paragraph->base_character, 327 !psiconv_compare_character_layout(para_charlayout,
221 paragraph_type->character) && 328 paragraph_type->character) &&
222 !psiconv_compare_paragraph_layout(paragraph->base_paragraph, 329 !psiconv_compare_paragraph_layout(paragraph->base_paragraph,
223 paragraph_type->paragraph)) { 330 paragraph_type->paragraph)) {
224 para_type = paragraph_type->nr; 331 para_type = paragraph_type->nr;
225 break; 332 break;
… …
228 if (!para_type) { 335 if (!para_type) {
229 /* We need to add a new entry */ 336 /* We need to add a new entry */
230 para_type = new_type.nr = j+1; 337 para_type = new_type.nr = j+1;
231 /* No need to copy them, we won't change them anyway */ 338 /* No need to copy them, we won't change them anyway */
232 new_type.paragraph = paragraph->base_paragraph; 339 new_type.paragraph = paragraph->base_paragraph;
233 new_type.character = paragraph->base_character; 340 new_type.character = para_charlayout;
234 new_type.style = paragraph->base_style; 341 new_type.style = paragraph->base_style;
235 paragraph_type = &new_type; 342 paragraph_type = &new_type;
236 if ((res = psiconv_list_add(paragraph_type_list,paragraph_type))) 343 if ((res = psiconv_list_add(paragraph_type_list,paragraph_type)))
237 goto ERROR5; 344 goto ERROR6;
238 if ((res = psiconv_write_u32(buf_types,paragraph_type->nr))) 345 if ((res = psiconv_write_u32(config,buf_types,lev+1,paragraph_type->nr)))
239 goto ERROR5; 346 goto ERROR6;
240 if (!(style = psiconv_get_style(styles,paragraph_type->style))) { 347 if (!(style = psiconv_get_style(styles,paragraph_type->style))) {
241 psiconv_warn(0,psiconv_buffer_length(buf),"Unknown style"); 348 psiconv_error(config,lev,0,"Unknown style");
242 res = -PSICONV_E_GENERATE; 349 res = -PSICONV_E_GENERATE;
243 goto ERROR5; 350 goto ERROR6;
244 } 351 }
245 if ((res = psiconv_write_paragraph_layout_list(buf_types, 352 if ((res = psiconv_write_paragraph_layout_list(config,buf_types,lev+1,
246 paragraph_type->paragraph,style->paragraph))) 353 paragraph_type->paragraph,style->paragraph)))
247 goto ERROR5; 354 goto ERROR6;
248 if (with_styles) 355 if (with_styles)
249 if ((res = psiconv_write_u8(buf_types,paragraph_type->style))) 356 if ((res = psiconv_write_u8(config,buf_types,lev+1,paragraph_type->style)))
250 goto ERROR5; 357 goto ERROR6;
251 if ((res = psiconv_write_character_layout_list(buf_types, 358 if ((res = psiconv_write_character_layout_list(config,buf_types,lev+1,
252 paragraph_type->character,style->character))) 359 paragraph_type->character,style->character)))
253 goto ERROR5; 360 goto ERROR6;
254 } 361 }
255 if ((res = psiconv_write_u8(buf_elements,para_type))) 362 if ((res = psiconv_write_u8(config,buf_elements,lev+1,para_type)))
256 goto ERROR5; 363 goto ERROR6;
257 } 364 }
258 } 365 }
259 366
367 /* HACK: special case: no paragraphs at all. We need to improvize. */
368 if (!psiconv_list_length(value)) {
369 if ((res = psiconv_write_u32(config,buf_types,lev+1,1)))
370 goto ERROR6;
371 if ((res = psiconv_write_u32(config,buf_types,lev+1,0)))
372 goto ERROR6;
373 if (with_styles)
374 if ((res = psiconv_write_u8(config,buf_types,lev+1,0)))
375 goto ERROR6;
376 if ((res = psiconv_write_u32(config,buf_types,lev+1,0)))
377 goto ERROR6;
378
379 if ((res = psiconv_write_u32(config,buf_elements,lev+1,1)))
380 goto ERROR6;
381 if ((res = psiconv_write_u8(config,buf_elements,lev+1,1)))
382 goto ERROR6;
383 pel_length = 1;
384 ptl_length = 1;
385 } else {
386 pel_length = psiconv_list_length(value);
387 ptl_length = psiconv_list_length(paragraph_type_list);
388 }
389
260 /* Now append everything */ 390 /* Now append everything */
261 if ((res = psiconv_write_u8(buf,with_styles?0x00:0x01))) 391 if ((res = psiconv_write_u16(config,buf,lev+1,with_styles?0x0001:0x0000)))
262 goto ERROR5; 392 goto ERROR6;
263 if ((res = psiconv_write_u8(buf,0x00))) 393 if ((res = psiconv_write_u8(config,buf,lev+1, ptl_length)))
264 goto ERROR5; 394 goto ERROR6;
265 if ((res = psiconv_write_u8(buf,psiconv_list_length(paragraph_type_list))))
266 goto ERROR5;
267 if ((res = psiconv_buffer_concat(buf,buf_types))) 395 if ((res = psiconv_buffer_concat(buf,buf_types)))
268 goto ERROR5; 396 goto ERROR6;
269 if ((res = psiconv_write_u32(buf,psiconv_list_length(value)))) 397 if ((res = psiconv_write_u32(config,buf,lev+1,pel_length)))
270 goto ERROR5; 398 goto ERROR6;
271 if ((res = psiconv_buffer_concat(buf,buf_elements))) 399 if ((res = psiconv_buffer_concat(buf,buf_elements)))
272 goto ERROR5; 400 goto ERROR6;
273 if ((res = psiconv_write_u32(buf,nr_of_inlines))) 401 if ((res = psiconv_write_u32(config,buf,lev+1,nr_of_inlines)))
274 goto ERROR5; 402 goto ERROR6;
275 res = psiconv_buffer_concat(buf,buf_inlines); 403 if ((res = psiconv_buffer_concat(buf,buf_inlines)))
404 goto ERROR6;
405 if ((res = psiconv_buffer_concat(buf,buf_objects)))
406 goto ERROR6;
276 407
408ERROR6:
409 psiconv_buffer_free(buf_objects);
277ERROR5: 410ERROR5:
278 psiconv_buffer_free(buf_inlines); 411 psiconv_buffer_free(buf_inlines);
279ERROR4: 412ERROR4:
280 psiconv_buffer_free(buf_elements); 413 psiconv_buffer_free(buf_elements);
281ERROR3: 414ERROR3:
282 psiconv_buffer_free(buf_types); 415 psiconv_buffer_free(buf_types);
283ERROR2: 416ERROR2:
284 psiconv_list_free(paragraph_type_list); 417 psiconv_list_free(paragraph_type_list);
285ERROR1: 418ERROR1:
419 if (res)
420 psiconv_error(config,lev,0,"Writing of layout section failed");
421 else
422 psiconv_progress(config,lev,0,"End of layout section");
286 return res; 423 return res;
287} 424}
288 425
289int psiconv_write_styled_layout_section(psiconv_buffer buf, 426int psiconv_write_styled_layout_section(const psiconv_config config,
427 psiconv_buffer buf,int lev,
290 psiconv_text_and_layout result, 428 psiconv_text_and_layout result,
291 psiconv_word_styles_section styles) 429 psiconv_word_styles_section styles)
292{ 430{
431 int res;
432
433 psiconv_progress(config,lev,0,"Writing styled layout section");
293 return psiconv_write_layout_section(buf,result,styles,1); 434 res = psiconv_write_layout_section(config,buf,lev+1,result,styles,1);
435 if (res)
436 psiconv_error(config,lev,0,"Writing of styles layout section failed");
437 else
438 psiconv_progress(config,lev,0,"End of styled layout section");
439 return res;
294} 440}
295 441
296int psiconv_write_styleless_layout_section(psiconv_buffer buf, 442int psiconv_write_styleless_layout_section(const psiconv_config config,
443 psiconv_buffer buf,int lev,
297 const psiconv_text_and_layout value, 444 const psiconv_text_and_layout value,
298 const psiconv_character_layout base_char, 445 const psiconv_character_layout base_char,
299 const psiconv_paragraph_layout base_para) 446 const psiconv_paragraph_layout base_para)
300{ 447{
301 int res = 0; 448 int res = 0;
302 psiconv_word_styles_section styles_section; 449 psiconv_word_styles_section styles_section;
303 450
451 psiconv_progress(config,lev,0,"Writing styleless layout section");
304 if (!(styles_section = malloc(sizeof(*styles_section)))) 452 if (!(styles_section = malloc(sizeof(*styles_section))))
305 goto ERROR1; 453 goto ERROR1;
306 if (!(styles_section->normal = malloc(sizeof(*styles_section->normal)))) 454 if (!(styles_section->normal = malloc(sizeof(*styles_section->normal))))
307 goto ERROR2; 455 goto ERROR2;
308 if (!(styles_section->normal->character = 456 if (!(styles_section->normal->character =
… …
310 goto ERROR3; 458 goto ERROR3;
311 if (!(styles_section->normal->paragraph = 459 if (!(styles_section->normal->paragraph =
312 psiconv_clone_paragraph_layout(base_para))) 460 psiconv_clone_paragraph_layout(base_para)))
313 goto ERROR4; 461 goto ERROR4;
314 styles_section->normal->hotkey = 0; 462 styles_section->normal->hotkey = 0;
315 if (!(styles_section->normal->name = strdup(""))) 463 if (!(styles_section->normal->name = psiconv_unicode_empty_string()))
316 goto ERROR5; 464 goto ERROR5;
317 if (!(styles_section->styles = psiconv_list_new(sizeof( 465 if (!(styles_section->styles = psiconv_list_new(sizeof(
318 struct psiconv_word_style_s)))) 466 struct psiconv_word_style_s))))
319 goto ERROR6; 467 goto ERROR6;
320 468
321 res = psiconv_write_layout_section(buf,value,styles_section,0); 469 res = psiconv_write_layout_section(config,buf,lev+1,value,styles_section,0);
322 psiconv_free_word_styles_section(styles_section); 470 psiconv_free_word_styles_section(styles_section);
471 psiconv_progress(config,lev,0,"End of styleless layout section");
323 return res; 472 return res;
324 473
325ERROR6: 474ERROR6:
326 free(styles_section->normal->name); 475 free(styles_section->normal->name);
327ERROR5: 476ERROR5:
… …
331ERROR3: 480ERROR3:
332 free(styles_section->normal); 481 free(styles_section->normal);
333ERROR2: 482ERROR2:
334 free(styles_section); 483 free(styles_section);
335ERROR1: 484ERROR1:
485 psiconv_error(config,lev,0,"Writing of styleless layout section failed");
336 if (!res) 486 if (!res)
337 return -PSICONV_E_NOMEM; 487 return -PSICONV_E_NOMEM;
338 else 488 else
339 return res; 489 return res;
340} 490}
491
492
493int psiconv_write_embedded_object_section(const psiconv_config config,
494 psiconv_buffer buf,int lev,
495 const psiconv_embedded_object_section value)
496{
497 int res;
498 psiconv_u32 display_id,icon_id,table_id;
499 psiconv_buffer extra_buf;
500
501 psiconv_progress(config,lev,0,"Writing embedded object section");
502 if (!value) {
503 psiconv_error(config,lev,0,"Null Object");
504 res = -PSICONV_E_GENERATE;
505 goto ERROR1;
506 }
507
508 if (!(extra_buf = psiconv_buffer_new())) {
509 res = -PSICONV_E_NOMEM;
510 goto ERROR1;
511 }
512
513 display_id = psiconv_buffer_unique_id();
514 icon_id = psiconv_buffer_unique_id();
515 table_id = psiconv_buffer_unique_id();
516 if ((res = psiconv_write_u8(config,buf,lev+1,0x06)))
517 goto ERROR2;
518 if ((res = psiconv_write_u32(config,buf,lev+1,PSICONV_ID_OBJECT_DISPLAY_SECTION)))
519 goto ERROR2;
520 if ((res = psiconv_buffer_add_reference(buf,display_id)))
521 goto ERROR2;
522 if ((res = psiconv_write_u32(config,buf,lev+1,PSICONV_ID_OBJECT_ICON_SECTION)))
523 goto ERROR2;
524 if ((res = psiconv_buffer_add_reference(buf,icon_id)))
525 goto ERROR2;
526 if ((res = psiconv_write_u32(config,buf,lev+1,PSICONV_ID_OBJECT_SECTION_TABLE_SECTION)))
527 goto ERROR2;
528 if ((res = psiconv_buffer_add_reference(buf,table_id)))
529 goto ERROR2;
530
531 if ((res = psiconv_buffer_add_target(buf,display_id)))
532 goto ERROR2;
533 if ((res = psiconv_write_object_display_section(config,buf,lev+1,value->display)))
534 goto ERROR2;
535 if ((res = psiconv_buffer_add_target(buf,icon_id)))
536 goto ERROR2;
537 if ((res = psiconv_write_object_icon_section(config,buf,lev+1,value->icon)))
538 goto ERROR2;
539 if ((res = psiconv_buffer_add_target(buf,table_id)))
540 goto ERROR2;
541 switch(value->object->type) {
542 case psiconv_word_file:
543 if ((res = psiconv_write_word_file(config,extra_buf,lev+1,
544 (psiconv_word_f) value->object->file)))
545 goto ERROR2;
546 break;
547 case psiconv_sketch_file:
548 if ((res = psiconv_write_sketch_file(config,extra_buf,lev+1,
549 (psiconv_sketch_f) value->object->file)))
550 goto ERROR2;
551 break;
552/*
553 case psiconv_sheet_file:
554 if ((res = psiconv_write_sheet_file(config,extra_buf,lev+1,
555 (psiconv_sheet_f) value->object->file)))
556 goto ERROR2;
557 break;
558*/
559 default:
560 psiconv_error(config,lev,0,"Unknown or unsupported object type");
561 res = -PSICONV_E_GENERATE;
562 goto ERROR2;
563 }
564
565 if ((res = psiconv_buffer_resolve(extra_buf)))
566 goto ERROR2;
567 if ((res = psiconv_buffer_concat(buf,extra_buf)))
568 goto ERROR2;
569 psiconv_buffer_free(extra_buf);
570
571 psiconv_progress(config,lev,0,"End of embedded object section");
572 return 0;
573
574ERROR2:
575 psiconv_buffer_free(extra_buf);
576ERROR1:
577 psiconv_error(config,lev,0,"Writing of embedded object section failed");
578 return res;
579}
580
581
582int psiconv_write_object_display_section(const psiconv_config config,
583 psiconv_buffer buf,int lev,
584 const psiconv_object_display_section value)
585{
586 int res;
587
588 psiconv_progress(config,lev,0,"Writing object display section");
589
590 if (!value) {
591 psiconv_error(config,lev,0,"Null Object Display Section");
592 res = -PSICONV_E_GENERATE;
593 goto ERROR1;
594 }
595
596 if ((res = psiconv_write_u8(config,buf,lev+1,value->show_icon?0x00:0x01)))
597 goto ERROR1;
598 if ((res = psiconv_write_length(config,buf,lev+1,value->width)))
599 goto ERROR1;
600 if ((res = psiconv_write_length(config,buf,lev+1,value->height)))
601 goto ERROR1;
602 if ((res = psiconv_write_u32(config,buf,lev+1,0x00000000)))
603 goto ERROR1;
604
605 psiconv_progress(config,lev,0,"End of object display section");
606
607 return 0;
608
609ERROR1:
610 psiconv_error(config,lev,0,"Writing of object display section failed");
611 return res;
612}
613
614int psiconv_write_object_icon_section(const psiconv_config config,
615 psiconv_buffer buf,int lev,
616 const psiconv_object_icon_section value)
617{
618 int res;
619
620 psiconv_progress(config,lev,0,"Writing object icon section");
621
622 if (!value) {
623 psiconv_error(config,lev,0,"Null Object Icon Section");
624 res = -PSICONV_E_GENERATE;
625 goto ERROR1;
626 }
627
628 if ((res = psiconv_write_string(config,buf,lev+1,value->icon_name)))
629 goto ERROR1;
630 if ((res = psiconv_write_length(config,buf,lev+1,value->icon_width)))
631 goto ERROR1;
632 if ((res = psiconv_write_length(config,buf,lev+1,value->icon_height)))
633 goto ERROR1;
634
635 psiconv_progress(config,lev,0,"End of object icon section");
636 return 0;
637
638ERROR1:
639 psiconv_error(config,lev,0,"Writing of object icon section failed");
640 return res;
641}
Legend:
Removed from v.79  
changed lines
  Added in v.232
frodo@frodo.looijaard.name
 ViewVC Help
Powered by ViewVC 1.1.26