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

Contents of /psiconv/trunk/lib/psiconv/parse_common.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 71 - (show annotations)
Fri Dec 22 22:31:50 2000 UTC (23 years, 3 months ago) by frodo
File MIME type: text/plain
File size: 28827 byte(s)
(Frodo) First generate routines! Reshuffled a few things to make it all work out

1 /*
2 parse_common.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999, 2000 Frodo Looijaard <frodol@dds.nl>
4
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
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19
20 #include "config.h"
21 #include "compat.h"
22 #include <stdlib.h>
23 #include <string.h>
24
25 #include "parse_routines.h"
26 #include "error.h"
27
28 static int psiconv_parse_layout_section(const psiconv_buffer buf,
29 int lev,psiconv_u32 off,
30 int *length,
31 psiconv_text_and_layout result,
32 psiconv_word_styles_section styles,
33 int with_styles);
34
35 int psiconv_parse_header_section(const psiconv_buffer buf,int lev,
36 psiconv_u32 off, int *length,
37 psiconv_header_section *result)
38 {
39 int res=0;
40 int len=0;
41 psiconv_u32 temp;
42
43 psiconv_progress(lev+1,off+len,"Going to read the header section");
44 if (!((*result) = malloc(sizeof(**result))))
45 goto ERROR1;
46
47 psiconv_progress(lev+2,off+len,"Going to read UID1 to UID3");
48 (*result)->uid1 = psiconv_read_u32(buf,lev+2,off+len,&res);
49 if (res)
50 goto ERROR2;
51 psiconv_debug(lev+2,off+len,"UID1: %08x",(*result)->uid1);
52 if ((*result)->uid1 == PSICONV_ID_CLIPART) {
53 /* That's all folks... */
54 (*result)->file = psiconv_clipart_file;
55 (*result)->uid2 = 0;
56 (*result)->uid3 = 0;
57 (*result)->checksum = 0;
58 len += 4;
59 psiconv_debug(lev+2,off+len,"File is a Clipart file");
60 goto DONE;
61 }
62 if ((*result)->uid1 != PSICONV_ID_PSION5) {
63 psiconv_warn(lev+2,off+len,"UID1 has unknown value. This is probably "
64 "not a (parsable) Psion 5 file");
65 res = -PSICONV_E_PARSE;
66 goto ERROR2;
67 }
68 len += 4;
69 (*result)->uid2 = psiconv_read_u32(buf,lev+2,off+len,&res);
70 if (res)
71 goto ERROR2;
72 psiconv_debug(lev+2,off+len,"UID2: %08x",(*result)->uid2);
73 len += 4;
74 (*result)->uid3 = psiconv_read_u32(buf,lev+2,off+len,&res);
75 if (res)
76 goto ERROR2;
77 psiconv_debug(lev+2,off+len,"UID3: %08x",(*result)->uid3);
78 len += 4;
79
80 (*result)->file = psiconv_unknown_file;
81 if ((*result)->uid1 == PSICONV_ID_PSION5) {
82 if ((*result)->uid2 == PSICONV_ID_DATA_FILE) {
83 if ((*result)->uid3 == PSICONV_ID_WORD) {
84 (*result)->file = psiconv_word_file;
85 psiconv_debug(lev+2,off+len,"File is a Word file");
86 } else if ((*result)->uid3 == PSICONV_ID_TEXTED) {
87 (*result)->file = psiconv_texted_file;
88 psiconv_debug(lev+2,off+len,"File is a TextEd file");
89 } else if ((*result)->uid3 == PSICONV_ID_SKETCH) {
90 (*result)->file = psiconv_sketch_file;
91 psiconv_debug(lev+2,off+len,"File is a Sketch file");
92 }
93 } else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) {
94 (*result)->file = psiconv_mbm_file;
95 if ((*result)->uid3 != 0x00)
96 psiconv_warn(lev+2,off+len,"UID3 set in MBM file?!?");
97 psiconv_debug(lev+2,off+len,"File is a MBM file");
98 }
99 }
100 if ((*result)->file == psiconv_unknown_file) {
101 psiconv_warn(lev+2,off+len,"Unknown file type");
102 (*result)->file = psiconv_unknown_file;
103 }
104
105 psiconv_progress(lev+2,off+len,"Checking UID4");
106 temp = psiconv_read_u32(buf,lev+2,off+len,&res);
107 if (res)
108 goto ERROR2;
109 if (temp == psiconv_checkuid((*result)->uid1,(*result)->uid2,
110 (*result)->uid3))
111 psiconv_debug(lev+2,off+len,"Checksum %08x is correct",temp);
112 else {
113 psiconv_warn(lev+2,off+len,"Checksum failed, file corrupted!");
114 psiconv_debug(lev+2,off+len,"Expected checksum %08x, found %08x",
115 psiconv_checkuid((*result)->uid1,(*result)->uid2,
116 (*result)->uid3),temp);
117 res = -PSICONV_E_PARSE;
118 goto ERROR2;
119 }
120 len += 4;
121
122 DONE:
123 if (length)
124 *length = len;
125
126 psiconv_progress(lev+1,off+len-1,
127 "End of Header Section (total length: %08x)",len);
128
129 return res;
130
131 ERROR2:
132 free(*result);
133 ERROR1:
134 psiconv_warn(lev+1,off,"Reading of Header Section failed");
135 if (length)
136 *length = 0;
137 if (res == 0)
138 return -PSICONV_E_NOMEM;
139 else
140 return res;
141 }
142
143 int psiconv_parse_section_table_section(const psiconv_buffer buf, int lev,
144 psiconv_u32 off, int *length,
145 psiconv_section_table_section *result)
146 {
147 int res=0;
148 int len=0;
149 psiconv_section_table_entry entry;
150
151 int i;
152 psiconv_u8 nr;
153
154 psiconv_progress(lev+1,off+len,"Going to read the section table section");
155 if (!(*result = psiconv_list_new(sizeof(*entry))))
156 goto ERROR1;
157
158 psiconv_progress(lev+2,off+len,"Going to read the section table length");
159 nr = psiconv_read_u8(buf,lev+2,off+len,&res);
160 if (res)
161 goto ERROR2;
162 psiconv_debug(lev+2,off+len,"Length: %08x",nr);
163 if (nr & 0x01) {
164 psiconv_warn(lev+2,off+len,
165 "Section table length odd - ignoring last entry");
166 }
167 len ++;
168
169 psiconv_progress(lev+2,off+len,"Going to read the section table entries");
170 entry = malloc(sizeof(*entry));
171 for (i = 0; i < nr / 2; i++) {
172 entry->id = psiconv_read_u32(buf,lev+2,off + len,&res);
173 if (res)
174 goto ERROR3;
175 psiconv_debug(lev+2,off + len,"Entry %d: ID = %08x",i,entry->id);
176 len += 0x04;
177 entry->offset = psiconv_read_u32(buf,lev+2,off + len,&res);
178 if (res)
179 goto ERROR3;
180 psiconv_debug(lev+2,off +len,"Entry %d: Offset = %08x",i,entry->offset);
181 len += 0x04;
182 if ((res=psiconv_list_add(*result,entry)))
183 goto ERROR3;
184 }
185
186 free(entry);
187
188 if (length)
189 *length = len;
190
191 psiconv_progress(lev+1,off+len-1,"End of section table section "
192 "(total length: %08x)", len);
193
194 return 0;
195 ERROR3:
196 free(entry);
197 ERROR2:
198 psiconv_list_free(*result);
199 ERROR1:
200 psiconv_warn(lev+1,off,"Reading of Section Table Section failed");
201 if (length)
202 *length = 0;
203 if (res == 0)
204 return -PSICONV_E_NOMEM;
205 else
206 return res;
207 }
208
209 int psiconv_parse_application_id_section(const psiconv_buffer buf, int lev,
210 psiconv_u32 off, int *length,
211 psiconv_application_id_section *result)
212 {
213 int res=0;
214 int len=0;
215 int leng;
216
217 psiconv_progress(lev+1,off,"Going to read the application id section");
218 if (!(*result = malloc(sizeof(**result))))
219 goto ERROR1;
220
221 psiconv_progress(lev+2,off+len,"Going to read the type identifier");
222 (*result)->id = psiconv_read_u32(buf,lev+2,off+len,&res);
223 if (res)
224 goto ERROR2;
225 psiconv_debug(lev+2,off+len,"Identifier: %08x",(*result)->id);
226 len += 4;
227
228 psiconv_progress(lev+2,off+len,"Going to read the application id string");
229 (*result)->name = psiconv_read_string(buf,lev+2,off+len,&leng,&res);
230 if (res)
231 goto ERROR2;
232 len += leng;
233
234 if (length)
235 *length = len;
236
237 psiconv_progress(lev+1,off+len-1,"End of application id section "
238 "(total length: %08x", len);
239
240 return res;
241 ERROR2:
242 free(*result);
243 ERROR1:
244 psiconv_warn(lev+1,off,"Reading of Application ID Section failed");
245 if (length)
246 *length = 0;
247 if (res == 0)
248 return -PSICONV_E_NOMEM;
249 else
250 return res;
251 }
252
253 int psiconv_parse_text_section(const psiconv_buffer buf,int lev,psiconv_u32 off,
254 int *length,psiconv_text_and_layout *result)
255 {
256
257 int res = 0;
258 int len=0;
259
260 psiconv_u32 text_len;
261 psiconv_paragraph para;
262
263 int nr;
264 int i,j,start,leng,temp;
265 char *str_copy;
266
267 psiconv_progress(lev+1,off,"Going to parse the text section");
268 psiconv_progress(lev+2,off,"Reading the text length");
269
270 if(!(*result = psiconv_list_new(sizeof(*para))))
271 goto ERROR1;
272 if (!(para = malloc(sizeof(*para))))
273 goto ERROR2;
274
275 text_len = psiconv_read_X(buf,lev+2,off,&leng,&res);
276 if (res)
277 goto ERROR3;
278 psiconv_debug(lev+2,off,"Length: %08x",text_len);
279 len += leng;
280
281 psiconv_progress(lev+2,off+len,"Going to read all paragraph text");
282 nr = 0;
283 start = 0;
284 for (i = 0; i < text_len; i++) {
285 temp = psiconv_read_u8(buf,lev+2,off+len+i,&res);
286 if (res)
287 goto ERROR3;
288 if (temp == 0x06) {
289 if (!(para->text = malloc(i - start + 1)))
290 goto ERROR3;
291 for (j = 0; j < i - start; j++) {
292 temp = psiconv_read_u8(buf,lev+1,off + len + start + j,&res);
293 if (res)
294 goto ERROR4;
295 para->text[j] = temp;
296 }
297 para->text[j] = 0;
298
299 if ((res = psiconv_list_add(*result,para)))
300 goto ERROR4;
301
302 if (!(str_copy = psiconv_make_printable(para->text)))
303 goto ERROR3;
304 psiconv_debug(lev+2,off+i+len,"Line %d: %d characters",nr,
305 strlen(str_copy) +1);
306 psiconv_debug(lev+2,off+i+len,"Line %d: `%s'",nr,str_copy);
307 free(str_copy);
308
309 start = i + 1;
310 nr ++;
311 }
312 }
313
314 if (start != text_len) {
315 psiconv_warn(lev+2,off+start+len,
316 "Last line does not end on EOL (%d characters left)", len - start);
317 if (!(para->text = malloc(text_len - start + 1)))
318 goto ERROR3;
319 for (j = 0; j < text_len - start; j++) {
320 temp = psiconv_read_u8(buf,lev+2,off + start + j + len, &res);
321 if (res)
322 goto ERROR4;
323 para->text[j] = temp;
324 }
325 para->text[text_len - start] = 0;
326 if ((res = psiconv_list_add(*result,para)))
327 goto ERROR4;
328 if (!(str_copy = psiconv_make_printable(para->text)))
329 goto ERROR3;
330 psiconv_debug(lev+2,off+start+len,"Last line: %d characters",nr,
331 strlen(str_copy)+1);
332 psiconv_debug(lev+2,off+start+len,"Last line: `%s'",str_copy);
333 free(str_copy);
334 }
335
336 free(para);
337
338 /* Initialize the remaining parts of each paragraph */
339 for (i = 0; i < psiconv_list_length(*result); i ++) {
340 if (!(para = psiconv_list_get(*result,i))) {
341 psiconv_warn(lev+2,off+len,"Massive memory corruption");
342 goto ERROR2_0;
343 }
344 if (!(para->in_lines = psiconv_list_new(sizeof(
345 struct psiconv_in_line_layout_s))))
346 goto ERROR2_0;
347 if (!(para->replacements = psiconv_list_new(sizeof(
348 struct psiconv_replacement_s))))
349 goto ERROR2_1;
350 if (!(para->base_character = psiconv_basic_character_layout()))
351 goto ERROR2_2;
352 if (!(para->base_paragraph = psiconv_basic_paragraph_layout()))
353 goto ERROR2_3;
354 para->base_style = 0;
355 }
356
357
358 len += text_len;
359
360 if (length)
361 *length = len;
362
363 psiconv_progress(lev+1,off+len-1,"End of text section (total length: %08x",
364 len);
365
366 return res;
367
368 ERROR2_3:
369 psiconv_free_character_layout(para->base_character);
370 ERROR2_2:
371 psiconv_list_free(para->replacements);
372 ERROR2_1:
373 psiconv_list_free(para->in_lines);
374 ERROR2_0:
375 for (j = 0; j < i; j++) {
376 if (!(para = psiconv_list_get(*result,j))) {
377 psiconv_warn(lev+1,off,"Massive memory corruption...");
378 break;
379 }
380 psiconv_list_free(para->in_lines);
381 psiconv_list_free(para->replacements);
382 psiconv_free_character_layout(para->base_character);
383 psiconv_free_paragraph_layout(para->base_paragraph);
384 }
385 goto ERROR2;
386
387 ERROR4:
388 free(para->text);
389 ERROR3:
390 free(para);
391 ERROR2:
392 for (i = 0; i < psiconv_list_length(*result);i++) {
393 if (!(para = psiconv_list_get(*result,i))) {
394 psiconv_warn(lev+1,off,"Massive memory corruption...");
395 break;
396 }
397 free(para->text);
398 }
399 psiconv_list_free(*result);
400 ERROR1:
401 psiconv_warn(lev+1,off,"Reading of Text Section failed");
402 if (length)
403 *length = 0;
404 if (!res)
405 return -PSICONV_E_NOMEM;
406 else
407 return res;
408 }
409
410 /* First do a parse_text_section, or you will get into trouble here */
411 int psiconv_parse_layout_section(const psiconv_buffer buf,
412 int lev,psiconv_u32 off,
413 int *length,
414 psiconv_text_and_layout result,
415 psiconv_word_styles_section styles,
416 int with_styles)
417 {
418 int res = 0;
419 int len = 0;
420 psiconv_u32 temp;
421 int parse_styles,nr,i,j,total,leng,line_length;
422
423 typedef struct anon_style_s
424 {
425 int nr;
426 psiconv_s16 base_style;
427 psiconv_character_layout character;
428 psiconv_paragraph_layout paragraph;
429 } *anon_style;
430
431 typedef psiconv_list anon_style_list; /* of struct anon_style */
432
433 anon_style_list anon_styles;
434 struct anon_style_s anon;
435 anon_style anon_ptr=NULL;
436
437 psiconv_character_layout temp_char;
438 psiconv_paragraph_layout temp_para;
439 psiconv_word_style temp_style;
440 psiconv_paragraph para;
441 struct psiconv_in_line_layout_s in_line;
442
443 int *inline_count;
444
445
446 psiconv_progress(lev+1,off,"Going to read the layout section");
447
448 psiconv_progress(lev+2,off,"Going to read the section type");
449 temp = psiconv_read_u16(buf,lev+2,off+len,&res);
450 if (res)
451 goto ERROR1;
452 psiconv_debug(lev+2,off+len,"Type: %02x",temp);
453 parse_styles = with_styles;
454 if ((temp == 0x0001) && !with_styles) {
455 psiconv_warn(lev+2,off+len,"Styleless layout section expected, "
456 "but styled section found!");
457 parse_styles = 1;
458 } else if ((temp == 0x0000) && (with_styles)) {
459 psiconv_warn(lev+2,off+len,"Styled layout section expected, "
460 "but styleless section found!");
461 parse_styles = 0;
462 } else if ((temp != 0x0000) && (temp != 0x0001)) {
463 psiconv_warn(lev+2,off+len,
464 "Layout section type indicator has unknown value!");
465 }
466 len += 0x02;
467
468 psiconv_progress(lev+2,off+len,"Going to read paragraph type list");
469 if (!(anon_styles = psiconv_list_new(sizeof(anon))))
470 goto ERROR1;
471 psiconv_progress(lev+3,off+len,"Going to read paragraph type list length");
472 nr = psiconv_read_u8(buf,lev+3,off+len,&res);
473 if (res)
474 goto ERROR2;
475 psiconv_debug(lev+3,off+len,"Length: %02x",nr);
476 len ++;
477
478 psiconv_progress(lev+3,off+len,
479 "Going to read the paragraph type list elements");
480 for (i = 0; i < nr; i ++) {
481 psiconv_progress(lev+3,off+len,"Element %d",i);
482 anon.nr = psiconv_read_u32(buf,lev+4,off+len,&res);
483 if (res)
484 goto ERROR3;
485 psiconv_debug(lev+4,off+len,"Number: %08x",anon.nr);
486 len += 0x04;
487
488 psiconv_progress(lev+4,off,"Going to determine the base style");
489 if (parse_styles) {
490 temp = psiconv_read_u32(buf,lev+4, off+len,&res);
491 if (res)
492 goto ERROR3;
493 anon.base_style = psiconv_read_u8(buf,lev+3, off+len+4+temp,&res);
494 if (res)
495 goto ERROR3;
496 psiconv_debug(lev+4,off+len+temp,
497 "Style indicator: %02x",anon.base_style);
498 } else
499 anon.base_style = 0;
500 if (!(temp_style = psiconv_get_style(styles,anon.base_style))) {
501 psiconv_warn(lev+4,off,"Unknown Style referenced");
502 if (!(temp_style = psiconv_get_style(styles,anon.base_style))) {
503 psiconv_warn(lev+4,off,"Base style unknown");
504 goto ERROR3;
505 }
506 }
507 if (!(anon.paragraph = psiconv_clone_paragraph_layout
508 (temp_style->paragraph)))
509 goto ERROR3;
510 if (!(anon.character = psiconv_clone_character_layout
511 (temp_style->character)))
512 goto ERROR3_1;
513
514 psiconv_progress(lev+4,off+len,"Going to read the paragraph layout");
515 if ((res = psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,
516 anon.paragraph)))
517 goto ERROR3_2;
518 len += leng;
519 if (parse_styles)
520 len ++;
521
522 psiconv_progress(lev+4,off+len,"Going to read the character layout");
523 if ((res = psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,
524 anon.character)))
525 goto ERROR3_2;
526 len += leng;
527 if ((res = psiconv_list_add(anon_styles,&anon)))
528 goto ERROR3_2;
529 }
530
531 psiconv_progress(lev+2,off+len,"Going to parse the paragraph element list");
532 psiconv_progress(lev+3,off+len,"Going to read the number of paragraphs");
533 nr = psiconv_read_u32(buf,lev+3,off+len,&res);
534 if (res)
535 goto ERROR3;
536 if (nr != psiconv_list_length(result)) {
537 psiconv_warn(lev+3,off+len,
538 "Number of text paragraphs and paragraph elements does not match");
539 psiconv_debug(lev+3,off+len,
540 "%d text paragraphs, %d paragraph elements",
541 psiconv_list_length(result),nr);
542 }
543 psiconv_debug(lev+3,off+len,"Number of paragraphs: %d",nr);
544 len += 4;
545 if (!(inline_count = malloc(nr * sizeof(*inline_count))))
546 goto ERROR3;
547
548 psiconv_progress(lev+3,off+len,"Going to read the paragraph elements");
549 for (i = 0; i < nr; i ++) {
550 psiconv_progress(lev+3,off+len,"Element %d",i);
551 if (i >= psiconv_list_length(result)) {
552 psiconv_debug(lev+4,off+len,"Going to allocate a new element");
553 if (!(para = malloc(sizeof(*para))))
554 goto ERROR4;
555 if (!(para->in_lines = psiconv_list_new(sizeof(
556 struct psiconv_in_line_layout_s))))
557 goto ERROR4_1;
558 para->base_style = 0;
559 if (!(para->base_character = psiconv_basic_character_layout()))
560 goto ERROR4_2;
561 if (!(para->base_paragraph = psiconv_basic_paragraph_layout()))
562 goto ERROR4_3;
563 if ((res = psiconv_list_add(result,para)))
564 goto ERROR4_4;
565 free(para);
566 }
567 if (!(para = psiconv_list_get(result,i)))
568 goto ERROR4;
569
570 psiconv_progress(lev+4,off+len,"Going to read the paragraph length");
571 temp = psiconv_read_u32(buf,lev+4,off+len,&res);
572 if (res)
573 goto ERROR4;
574 if (temp != strlen(para->text)+1) {
575 psiconv_warn(lev+4,off+len,
576 "Disagreement of the length of paragraph in layout section");
577 psiconv_debug(lev+4,off+len,
578 "Paragraph length: layout section says %d, counted %d",
579 temp,strlen(para->text)+1);
580 } else
581 psiconv_debug(lev+4,off+len,"Paragraph length: %d",temp);
582 len += 4;
583
584 psiconv_progress(lev+4,off+len,"Going to read the paragraph type");
585 temp = psiconv_read_u8(buf,lev+4,off+len,&res);
586 if (res)
587 goto ERROR4;
588 if (temp != 0x00) {
589 psiconv_debug(lev+4,off+len,"Type: %02x",temp);
590 for (j = 0; j < psiconv_list_length(anon_styles); j++) {
591 if (!(anon_ptr = psiconv_list_get(anon_styles,j))) {
592 psiconv_warn(lev+4,off+len,"Massive memory curruption");
593 goto ERROR4;
594 }
595 if (temp == anon_ptr->nr)
596 break;
597 }
598 if (j == psiconv_list_length(anon_styles)) {
599 psiconv_warn(lev+4,off+len,"Layout section paragraph type unknown");
600 psiconv_debug(lev+4,off+len,"Unknown type - using base styles instead");
601 para->base_style = 0;
602 if (!(temp_style = psiconv_get_style(styles,0))) {
603 psiconv_warn(lev+4,off,"Base style unknown");
604 goto ERROR4;
605 }
606 if (!(temp_para = psiconv_clone_paragraph_layout
607 (temp_style->paragraph)))
608 goto ERROR4;
609 psiconv_free_paragraph_layout(para->base_paragraph);
610 para->base_paragraph = temp_para;
611
612 if (!(temp_char = psiconv_clone_character_layout
613 (temp_style->character)))
614 goto ERROR4;
615 psiconv_free_character_layout(para->base_character);
616 para->base_character = temp_char;
617 } else {
618 para->base_style = anon_ptr->base_style;
619 if (!(temp_para = psiconv_clone_paragraph_layout (anon_ptr->paragraph)))
620 goto ERROR4;
621 psiconv_free_paragraph_layout(para->base_paragraph);
622 para->base_paragraph = temp_para;
623
624 if (!(temp_char = psiconv_clone_character_layout (anon_ptr->character)))
625 goto ERROR4;
626 psiconv_free_character_layout(para->base_character);
627 para->base_character = temp_char;
628 }
629 inline_count[i] = 0;
630 len += 0x01;
631 } else {
632 psiconv_debug(lev+4,off+len,"Type: %02x (not based on a paragraph type)"
633 ,temp);
634 len += 0x01;
635 if (parse_styles) {
636 temp = psiconv_read_u32(buf,lev+4,off+len,&res);
637 if (res)
638 goto ERROR4;
639 psiconv_progress(lev+4,off+len+temp+4,
640 "Going to read the paragraph element base style");
641 temp = psiconv_read_u8(buf,lev+4, off+len+temp+4,&res);
642 if (res)
643 goto ERROR4;
644 psiconv_debug(lev+4,off+len+temp+4, "Style: %02x",temp);
645 } else
646 temp = 0x00;
647
648 if (!(temp_style = psiconv_get_style (styles,temp))) {
649 psiconv_warn(lev+4,off,"Unknown Style referenced");
650 if (!(temp_style = psiconv_get_style(styles,0))) {
651 psiconv_warn(lev+4,off,"Base style unknown");
652 goto ERROR4;
653 }
654 }
655
656 if (!(temp_para = psiconv_clone_paragraph_layout(temp_style->paragraph)))
657 goto ERROR4;
658 psiconv_free_paragraph_layout(para->base_paragraph);
659 para->base_paragraph = temp_para;
660
661 if (!(temp_char = psiconv_clone_character_layout(temp_style->character)))
662 goto ERROR4;
663 psiconv_free_character_layout(para->base_character);
664 para->base_character = temp_char;
665
666 para->base_style = temp;
667 psiconv_progress(lev+4,off+len,"Going to read paragraph layout");
668 if ((res = psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,
669 para->base_paragraph)))
670 goto ERROR4;
671 len += leng;
672 if (parse_styles)
673 len += 1;
674 psiconv_progress(lev+4,off+len,"Going to read number of in-line "
675 "layout elements");
676 inline_count[i] = psiconv_read_u32(buf,lev+4,off+len,&res);
677 if (res)
678 goto ERROR4;
679 psiconv_debug(lev+4,off+len,"Nr: %08x",inline_count[i]);
680 len += 4;
681 }
682 }
683
684 psiconv_progress(lev+2,off+len,"Going to read the text layout inline list");
685
686 psiconv_progress(lev+3,off+len,"Going to read the number of elements");
687 nr = psiconv_read_u32(buf,lev+3,off+len,&res);
688 if (res)
689 goto ERROR4;
690 psiconv_debug(lev+3,off+len,"Elements: %08x",nr);
691 len += 0x04;
692
693 psiconv_progress(lev+3,off+len,
694 "Going to read the text layout inline elements");
695 total = 0;
696 for (i = 0; i < psiconv_list_length(result); i++) {
697 if (!(para = psiconv_list_get(result,i))) {
698 psiconv_warn(lev+3,off+len,"Massive memory corruption");
699 goto ERROR4;
700 }
701 line_length = -1;
702 for (j = 0; j < inline_count[i]; j++) {
703 psiconv_progress(lev+3,off+len,"Element %d: Paragraph %d, element %d",
704 total,i,j);
705 if (total >= nr) {
706 psiconv_warn(lev+3,off+len,
707 "Layout section inlines: not enough element");
708 psiconv_debug(lev+3,off+len,"Can't read element!");
709 } else {
710 total ++;
711 if (!(in_line.layout = psiconv_clone_character_layout
712 (para->base_character)))
713 goto ERROR4;
714 psiconv_progress(lev+4,off+len,"Going to read the element type");
715 temp = psiconv_read_u8(buf,lev+4,len+off,&res);
716 if (res)
717 goto ERROR4;
718 len += 1;
719 psiconv_debug(lev+4,off+len,"Type: %02x",temp);
720 psiconv_progress(lev+4,off+len,
721 "Going to read the number of characters it applies to");
722 in_line.length = psiconv_read_u32(buf,lev+4,len+off,&res);
723 if (res)
724 goto ERROR4;
725 psiconv_debug(lev+4,off+len,"Length: %02x",in_line.length);
726 len += 4;
727 psiconv_progress(lev+4,off+len,"Going to read the character layout");
728 if ((res = psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,
729 in_line.layout)))
730 goto ERROR4;
731 len += leng;
732
733 if (temp == 0x01) {
734 psiconv_debug(lev+4,off+len,"Skipping object data");
735 len += 0x10;
736 } else if (temp != 0x00) {
737 psiconv_warn(lev+4,off+len,"Layout section unknown inline type");
738 }
739 if (line_length + in_line.length > strlen(para->text)) {
740 psiconv_warn(lev+4,off+len,
741 "Layout section inlines: line length mismatch");
742 res = -1;
743 in_line.length = strlen(para->text) - line_length;
744 }
745 line_length += in_line.length;
746 if ((res = psiconv_list_add(para->in_lines,&in_line)))
747 goto ERROR4;
748 }
749 }
750 }
751
752 if (total != nr) {
753 psiconv_warn(lev+4,off+len,
754 "Layout section too many inlines, skipping remaining");
755 }
756
757 free(inline_count);
758
759 for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) {
760 if (!(anon_ptr = psiconv_list_get(anon_styles,i))) {
761 psiconv_warn(lev+4,off+len,"Massive memory corruption");
762 goto ERROR2;
763 }
764 psiconv_free_character_layout(anon_ptr->character);
765 psiconv_free_paragraph_layout(anon_ptr->paragraph);
766 }
767 psiconv_list_free(anon_styles);
768
769 if (length)
770 *length = len;
771
772 psiconv_progress(lev+1,off+len-1,"End of layout section (total length: %08x)",
773 len);
774
775 return 0;
776
777 ERROR4_4:
778 psiconv_free_paragraph_layout(para->base_paragraph);
779 ERROR4_3:
780 psiconv_free_character_layout(para->base_character);
781 ERROR4_2:
782 psiconv_list_free(para->in_lines);
783 ERROR4_1:
784 free(para);
785 goto ERROR4;
786
787 ERROR3_2:
788 psiconv_free_character_layout(anon.character);
789 ERROR3_1:
790 psiconv_free_paragraph_layout(anon.paragraph);
791 goto ERROR3;
792
793 ERROR4:
794 free(inline_count);
795 ERROR3:
796 for (i = 0; i < psiconv_list_length(anon_styles); i++) {
797 if (!(anon_ptr = psiconv_list_get(anon_styles,i))) {
798 psiconv_warn(lev+1,off,"Massive memory corruption");
799 break;
800 }
801 psiconv_free_paragraph_layout(anon_ptr->paragraph);
802 psiconv_free_character_layout(anon_ptr->character);
803 }
804
805 ERROR2:
806 psiconv_list_free(anon_styles);
807 ERROR1:
808 psiconv_warn(lev+1,off,"Reading of Layout Section failed");
809 if (length)
810 *length = 0;
811 if (!res)
812 return -PSICONV_E_NOMEM;
813 else
814 return res;
815 }
816
817 int psiconv_parse_styled_layout_section(const psiconv_buffer buf,
818 int lev,psiconv_u32 off,
819 int *length,
820 psiconv_text_and_layout result,
821 psiconv_word_styles_section styles)
822 {
823 return psiconv_parse_layout_section(buf,lev,off,length,result,styles,1);
824 }
825
826 int psiconv_parse_styleless_layout_section(const psiconv_buffer buf,
827 int lev,psiconv_u32 off,
828 int *length,
829 psiconv_text_and_layout result,
830 psiconv_character_layout base_char,
831 psiconv_paragraph_layout base_para)
832 {
833 int res = 0;
834 psiconv_word_styles_section styles_section;
835
836 if (!(styles_section = malloc(sizeof(*styles_section))))
837 goto ERROR1;
838 if (!(styles_section->normal = malloc(sizeof(*styles_section->normal))))
839 goto ERROR2;
840 if (!(styles_section->normal->character =
841 psiconv_clone_character_layout(base_char)))
842 goto ERROR3;
843 if (!(styles_section->normal->paragraph =
844 psiconv_clone_paragraph_layout(base_para)))
845 goto ERROR4;
846 styles_section->normal->hotkey = 0;
847 if (!(styles_section->normal->name = strdup("")))
848 goto ERROR5;
849 if (!(styles_section->styles = psiconv_list_new(sizeof(
850 struct psiconv_word_style_s))))
851 goto ERROR6;
852
853 res = psiconv_parse_layout_section(buf,lev,off,length,result,
854 styles_section,0);
855
856 psiconv_free_word_styles_section(styles_section);
857 return res;
858
859 ERROR6:
860 free(styles_section->normal->name);
861 ERROR5:
862 psiconv_free_paragraph_layout(styles_section->normal->paragraph);
863 ERROR4:
864 psiconv_free_character_layout(styles_section->normal->character);
865 ERROR3:
866 free(styles_section->normal);
867 ERROR2:
868 free(styles_section);
869 ERROR1:
870 psiconv_warn(lev+1,off,"Reading of Styleless Layout Section failed");
871 if (length)
872 *length = 0;
873 if (!res)
874 return -PSICONV_E_NOMEM;
875 else
876 return res;
877 }
878

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