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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 270 - (show annotations)
Tue Nov 15 15:52:34 2005 UTC (18 years, 4 months ago) by frodo
File MIME type: text/plain
File size: 31037 byte(s)
(Frodo) Updated all copyright notices for 2005
        Changed email addresses
        Made the examples part of the archive

1 /*
2 parse_driver.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999-2005 Frodo Looijaard <frodo@frodo.looijaard.name>
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
23 #include <stdlib.h>
24 #include <string.h>
25
26 #include "parse.h"
27 #include "parse_routines.h"
28 #include "unicode.h"
29
30 #ifdef DMALLOC
31 #include <dmalloc.h>
32 #endif
33
34 /* Compare whether application id names match.
35 Sought must be lower case; the comparison is case insensitive */
36 static psiconv_bool_t applid_matches(psiconv_string_t found,
37 const char *sought)
38 {
39 int i;
40 if (psiconv_unicode_strlen(found) != strlen(sought))
41 return psiconv_bool_false;
42 for (i = 0; i < strlen(sought); i++)
43 if ((found[i] != sought[i]) &&
44 ((sought[i] < 'a') || (sought[i] > 'z') ||
45 (found[i] != sought[i] + 'A' - 'a')))
46 return psiconv_bool_false;
47 return psiconv_bool_true;
48 }
49
50 psiconv_file_type_t psiconv_file_type(const psiconv_config config,
51 psiconv_buffer buf,int *length,
52 psiconv_header_section *result)
53 {
54 psiconv_header_section header;
55 psiconv_file_type_t res;
56 int leng;
57
58 if ((psiconv_parse_header_section(config,buf,0,0,&leng,&header)))
59 return psiconv_unknown_file;
60 res = header->file;
61 if (result)
62 *result = header;
63 else
64 psiconv_free_header_section(header);
65 if (length)
66 *length = leng;
67 return res;
68 }
69
70 int psiconv_parse(const psiconv_config config,const psiconv_buffer buf,
71 psiconv_file *result)
72 {
73 int res=0;
74 int lev=0;
75 int off=0;
76 int leng;
77
78 if (!((*result) = malloc(sizeof(**result))))
79 goto ERROR1;
80
81 (*result)->type = psiconv_file_type(config,buf,&leng,NULL);
82 if ((*result)->type == psiconv_unknown_file) {
83 psiconv_warn(config,lev+1,off,"Unknown file type: can't parse!");
84 (*result)->file = NULL;
85 } else if ((*result)->type == psiconv_word_file)
86 res = psiconv_parse_word_file(config,buf,lev+2,leng,
87 (psiconv_word_f *)(&((*result)->file)));
88 else if ((*result)->type == psiconv_texted_file)
89 res = psiconv_parse_texted_file(config,buf,lev+2,leng,
90 (psiconv_texted_f *)(&((*result)->file)));
91 else if ((*result)->type == psiconv_mbm_file)
92 res = psiconv_parse_mbm_file(config,buf,lev+2,leng,
93 (psiconv_mbm_f *)(&((*result)->file)));
94 else if ((*result)->type == psiconv_sketch_file)
95 res = psiconv_parse_sketch_file(config,buf,lev+2,leng,
96 (psiconv_sketch_f *)(&((*result)->file)));
97 else if ((*result)->type == psiconv_clipart_file)
98 res = psiconv_parse_clipart_file(config,buf,lev+2,leng,
99 (psiconv_clipart_f *)(&((*result)->file)));
100 else if ((*result)->type == psiconv_sheet_file)
101 res = psiconv_parse_sheet_file(config,buf,lev+2,leng,
102 (psiconv_sheet_f *)(&((*result)->file)));
103 else {
104 psiconv_warn(config,lev+1,off,"Can't parse this file yet!");
105 (*result)->file = NULL;
106 }
107 if (res)
108 goto ERROR2;
109 return 0;
110
111 ERROR2:
112 free(*result);
113 ERROR1:
114 psiconv_error(config,lev+1,off,"Reading of Psion File failed");
115 if (res == 0)
116 return -PSICONV_E_NOMEM;
117 else
118 return res;
119 }
120
121 int psiconv_parse_clipart_file(const psiconv_config config,
122 const psiconv_buffer buf,int lev,
123 psiconv_u32 off, psiconv_clipart_f *result)
124 {
125 int res=0;
126 int i;
127 psiconv_jumptable_section table;
128 psiconv_clipart_section clipart;
129 psiconv_u32 *entry;
130
131 psiconv_progress(config,lev+1,off,"Going to read a clipart file");
132 if (!((*result) = malloc(sizeof(**result))))
133 goto ERROR1;
134
135 psiconv_progress(config,lev+2,off,"Going to read the MBM jumptable");
136 if ((res = psiconv_parse_jumptable_section(config,buf,lev+2,off, NULL,&table)))
137 goto ERROR2;
138
139 psiconv_progress(config,lev+2,off,"Going to read the clipart sections");
140 if (!((*result)->sections = psiconv_list_new(sizeof(*clipart))))
141 goto ERROR3;
142 for (i = 0; i < psiconv_list_length(table); i ++) {
143 if (!(entry = psiconv_list_get(table,i)))
144 goto ERROR4;
145 psiconv_progress(config,lev+3,off,"Going to read clipart section %i",i);
146 if ((res = psiconv_parse_clipart_section(config,buf,lev+3,*entry,NULL,&clipart)))
147 goto ERROR4;
148 if ((res = psiconv_list_add((*result)->sections,clipart)))
149 goto ERROR5;
150 free(clipart);
151 }
152
153 psiconv_free_jumptable_section(table);
154 psiconv_progress(config,lev+1,off,"End of clipart file");
155 return res;
156 ERROR5:
157 psiconv_free_clipart_section(clipart);
158 ERROR4:
159 for (i = 0; i < psiconv_list_length((*result)->sections); i++) {
160 if (!(clipart = psiconv_list_get((*result)->sections,i))) {
161 psiconv_error(config,lev+1,off,"Data structure corruption");
162 goto ERROR3;
163 }
164 psiconv_free_clipart_section(clipart);
165 }
166 psiconv_list_free((*result)->sections);
167 ERROR3:
168 psiconv_free_jumptable_section(table);
169 ERROR2:
170 free(*result);
171 ERROR1:
172 psiconv_error(config,lev+1,off,"Reading of Clipart File failed");
173 if (res == 0)
174 return -PSICONV_E_NOMEM;
175 else
176 return res;
177 }
178
179 int psiconv_parse_mbm_file(const psiconv_config config,
180 const psiconv_buffer buf,int lev, psiconv_u32 off,
181 psiconv_mbm_f *result)
182 {
183 int res=0;
184 int i;
185 psiconv_jumptable_section table;
186 psiconv_paint_data_section paint;
187 psiconv_u32 *entry;
188 psiconv_u32 sto;
189
190 psiconv_progress(config,lev+1,off,"Going to read a mbm file");
191 if (!(*result = malloc(sizeof(**result))))
192 goto ERROR1;
193
194 psiconv_progress(config,lev+2,off,"Going to read the offset of the MBM jumptable");
195 sto = psiconv_read_u32(config,buf,lev+2,off,&res);
196 if (res)
197 goto ERROR2;
198 psiconv_debug(config,lev+2,off,"Offset: %08x",sto);
199
200 psiconv_progress(config,lev+2,off,"Going to read the MBM jumptable");
201 if ((res = psiconv_parse_jumptable_section(config,buf,lev+2,sto, NULL,&table)))
202 goto ERROR2;
203
204 psiconv_progress(config,lev+2,off,"Going to read the picture sections");
205 if (!((*result)->sections = psiconv_list_new(sizeof(*paint))))
206 goto ERROR3;
207 for (i = 0; i < psiconv_list_length(table); i ++) {
208 if (!(entry = psiconv_list_get(table,i)))
209 goto ERROR4;
210 psiconv_progress(config,lev+3,off,"Going to read picture section %i",i);
211 if ((res = psiconv_parse_paint_data_section(config,buf,lev+3,*entry,NULL,
212 0,&paint)))
213 goto ERROR4;
214 if ((res = psiconv_list_add((*result)->sections,paint)))
215 goto ERROR5;
216 free(paint);
217 }
218
219 psiconv_free_jumptable_section(table);
220 psiconv_progress(config,lev+1,off,"End of mbm file");
221 return 0;
222 ERROR5:
223 psiconv_free_paint_data_section(paint);
224 ERROR4:
225 for (i = 0; i < psiconv_list_length((*result)->sections); i++) {
226 if (!(paint = psiconv_list_get((*result)->sections,i))) {
227 psiconv_error(config,lev+1,off,"Data structure corruption");
228 goto ERROR3;
229 }
230 psiconv_free_paint_data_section(paint);
231 }
232 psiconv_list_free((*result)->sections);
233 ERROR3:
234 psiconv_free_jumptable_section(table);
235 ERROR2:
236 free(*result);
237 ERROR1:
238 psiconv_error(config,lev+1,off,"Reading of MBM File failed");
239 if (res == 0)
240 return -PSICONV_E_NOMEM;
241 else
242 return res;
243 }
244
245 int psiconv_parse_sketch_file(const psiconv_config config,
246 const psiconv_buffer buf,int lev,
247 psiconv_u32 off,
248 psiconv_sketch_f *result)
249 {
250 psiconv_section_table_section table;
251 psiconv_application_id_section appl_id;
252 psiconv_u32 applid_sec = 0;
253 psiconv_u32 sketch_sec = 0;
254 psiconv_u32 sto;
255 psiconv_section_table_entry entry;
256 int i;
257 int res=0;
258 char *temp_str;
259
260 psiconv_progress(config,lev+1,off,"Going to read a sketch file");
261 if (!(*result = malloc(sizeof(**result))))
262 goto ERROR1;
263
264 psiconv_progress(config,lev+2,off,
265 "Going to read the offset of the section table section");
266 sto = psiconv_read_u32(config,buf,lev+2,off,&res);
267 if (res)
268 goto ERROR2;
269 psiconv_debug(config,lev+2,off,"Offset: %08x",sto);
270
271 psiconv_progress(config,lev+2,sto, "Going to read the section table section");
272 if ((res = psiconv_parse_section_table_section(config,buf,lev+2,sto, NULL,&table)))
273 goto ERROR2;
274
275 for (i = 0; i < psiconv_list_length(table); i ++) {
276 psiconv_progress(config,lev+2,sto, "Going to read entry %d",i);
277 if (!(entry = psiconv_list_get(table,i)))
278 goto ERROR3;
279 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
280 applid_sec = entry->offset;
281 psiconv_debug(config,lev+3,sto,
282 "Found the Application ID section at %08x",applid_sec);
283 } else if (entry->id == PSICONV_ID_SKETCH_SECTION) {
284 sketch_sec = entry->offset;
285 psiconv_debug(config,lev+3,sto,
286 "Found the Sketch section at %08x",sketch_sec);
287 } else {
288 psiconv_warn(config,lev+3,sto,
289 "Found unknown section in the Section Table (ignoring)");
290 psiconv_debug(config,lev+3,sto,
291 "Section ID %08x, offset %08x",entry->id,entry->offset);
292 }
293 }
294
295 psiconv_progress(config,lev+2,sto, "Looking for the Application ID section");
296 if (! applid_sec) {
297 psiconv_error(config,lev+2,sto,
298 "Application ID section not found in the section table");
299 res = -PSICONV_E_PARSE;
300 goto ERROR3;
301 } else {
302 psiconv_debug(config,lev+2,sto,
303 "Application ID section at offset %08x",applid_sec);
304 if ((res = psiconv_parse_application_id_section(config,buf,lev+2,applid_sec,NULL,
305 &appl_id)))
306 goto ERROR3;
307 }
308 if ((appl_id->id != PSICONV_ID_SKETCH) ||
309 !applid_matches(appl_id->name,"paint.app")) {
310 psiconv_warn(config,lev+2,applid_sec,
311 "Application ID section contains unexpected data");
312 psiconv_debug(config,lev+2,applid_sec,"ID: %08x expected, %08x found",
313 PSICONV_ID_SKETCH,appl_id->id);
314 if (!(temp_str = psiconv_make_printable(config,appl_id->name)))
315 goto ERROR4;
316 psiconv_debug(config,lev+2,applid_sec,"Name: `%s' expected, `%s' found",
317 "Paint.app",temp_str);
318 free(temp_str);
319 res = -PSICONV_E_PARSE;
320 goto ERROR4;
321 }
322
323 psiconv_progress(config,lev+2,sto, "Looking for the Sketch section");
324 if (! sketch_sec) {
325 psiconv_warn(config,lev+2,sto,
326 "Sketch section not found in the section table");
327 } else {
328 psiconv_debug(config,lev+2,sto,
329 "Sketch section at offset %08x",applid_sec);
330 if ((res = psiconv_parse_sketch_section(config,buf,lev+2,sketch_sec,NULL,
331 &(*result)->sketch_sec)))
332 goto ERROR4;
333 }
334
335 psiconv_free_application_id_section(appl_id);
336 psiconv_free_section_table_section(table);
337
338 psiconv_progress(config,lev+1,off,"End of sketch file");
339 return res;
340
341 ERROR4:
342 psiconv_free_application_id_section(appl_id);
343 ERROR3:
344 free(table);
345 ERROR2:
346 free(*result);
347 ERROR1:
348 psiconv_error(config,lev+1,off,"Reading of Sketch File failed");
349 if (res == 0)
350 return -PSICONV_E_NOMEM;
351 else
352 return res;
353 }
354
355
356 int psiconv_parse_texted_file(const psiconv_config config,
357 const psiconv_buffer buf,int lev,
358 psiconv_u32 off,
359 psiconv_texted_f *result)
360 {
361 int res=0;
362 psiconv_section_table_section table;
363 psiconv_application_id_section appl_id;
364 char *temp_str;
365 psiconv_character_layout base_char;
366 psiconv_paragraph_layout base_para;
367 psiconv_u32 page_sec = 0;
368 psiconv_u32 texted_sec = 0;
369 psiconv_u32 applid_sec = 0;
370 psiconv_u32 sto;
371 psiconv_section_table_entry entry;
372 int i;
373
374 psiconv_progress(config,lev+1,off,"Going to read a texted file");
375 if (!(*result = malloc(sizeof(**result))))
376 goto ERROR1;
377
378 psiconv_progress(config,lev+2,off,
379 "Going to read the offset of the section table section");
380 sto = psiconv_read_u32(config,buf,lev+2,off,&res);
381 if (res)
382 goto ERROR2;
383 psiconv_debug(config,lev+2,off,"Offset: %08x",sto);
384
385 psiconv_progress(config,lev+2,sto, "Going to read the section table section");
386 if ((res = psiconv_parse_section_table_section(config,buf,lev+2,sto, NULL,&table)))
387 goto ERROR2;
388
389 for (i = 0; i < psiconv_list_length(table); i ++) {
390 psiconv_progress(config,lev+2,sto, "Going to read entry %d",i);
391 if (!(entry = psiconv_list_get(table,i)))
392 goto ERROR3;
393 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
394 applid_sec = entry->offset;
395 psiconv_debug(config,lev+3,sto,
396 "Found the Application ID section at %08x",applid_sec);
397 } else if (entry->id == PSICONV_ID_PAGE_LAYOUT_SECTION) {
398 page_sec = entry->offset;
399 psiconv_debug(config,lev+3,sto,
400 "Found the Page Layout section at %08x",page_sec);
401 } else if (entry->id == PSICONV_ID_TEXTED) {
402 texted_sec = entry->offset;
403 psiconv_debug(config,lev+3,sto,
404 "Found the TextEd section at %08x",texted_sec);
405 } else {
406 psiconv_warn(config,lev+3,sto,
407 "Found unknown section in the Section Table (ignoring)");
408 psiconv_debug(config,lev+3,sto,
409 "Section ID %08x, offset %08x",entry->id,entry->offset);
410 }
411 }
412
413 psiconv_progress(config,lev+2,sto, "Looking for the Application ID section");
414 if (! applid_sec) {
415 psiconv_error(config,lev+2,sto,
416 "Application ID section not found in the section table");
417 res = -PSICONV_E_PARSE;
418 goto ERROR3;
419 } else {
420 psiconv_debug(config,lev+2,sto,
421 "Application ID section at offset %08x",applid_sec);
422 if ((res = psiconv_parse_application_id_section(config,buf,lev+2,applid_sec,NULL,
423 &appl_id)))
424 goto ERROR3;
425 }
426
427 if ((appl_id->id != PSICONV_ID_TEXTED) ||
428 !applid_matches(appl_id->name,"texted.app")) {
429 psiconv_warn(config,lev+2,applid_sec,
430 "Application ID section contains unexpected data");
431 psiconv_debug(config,lev+2,applid_sec,"ID: %08x expected, %08x found",
432 PSICONV_ID_TEXTED,appl_id->id);
433 if (!(temp_str = psiconv_make_printable(config,appl_id->name)))
434 goto ERROR4;
435 psiconv_debug(config,lev+2,applid_sec,"Name: `%s' expected, `%s' found",
436 "TextEd.app",temp_str);
437 free(temp_str);
438 res = -PSICONV_E_PARSE;
439 goto ERROR4;
440 }
441
442 psiconv_progress(config,lev+2,sto,
443 "Looking for the Page layout section");
444 if (! page_sec) {
445 psiconv_error(config,lev+2,sto,
446 "Page layout section not found in the section table");
447 res = -PSICONV_E_PARSE;
448 goto ERROR4;
449 } else {
450 psiconv_debug(config,lev+2,sto,
451 "Page layout section at offset %08x",page_sec);
452 if ((res = psiconv_parse_page_layout_section(config,buf,lev+2,page_sec,NULL,
453 &(*result)->page_sec)))
454 goto ERROR4;
455 }
456
457 if (!(base_char = psiconv_basic_character_layout()))
458 goto ERROR5;
459 if (!(base_para = psiconv_basic_paragraph_layout()))
460 goto ERROR6;
461
462 psiconv_progress(config,lev+2,sto,
463 "Looking for the TextEd section");
464 if (! texted_sec) {
465 psiconv_error(config,lev+2,sto,
466 "TextEd section not found in the section table");
467 res = -PSICONV_E_PARSE;
468 goto ERROR7;
469 } else {
470 psiconv_debug(config,lev+2,sto, "TextEd section at offset %08x",texted_sec);
471 if ((res = psiconv_parse_texted_section(config,buf,lev+2,texted_sec,NULL,
472 &(*result)->texted_sec,
473 base_char,base_para)))
474 goto ERROR7;
475 }
476 psiconv_free_character_layout(base_char);
477 psiconv_free_paragraph_layout(base_para);
478
479 psiconv_free_application_id_section(appl_id);
480 psiconv_free_section_table_section(table);
481
482 psiconv_progress(config,lev+1,off,"End of TextEd file");
483 return 0;
484
485 ERROR7:
486 psiconv_free_paragraph_layout(base_para);
487 ERROR6:
488 psiconv_free_character_layout(base_char);
489 ERROR5:
490 psiconv_free_page_layout_section((*result)->page_sec);
491 ERROR4:
492 psiconv_free_application_id_section(appl_id);
493 ERROR3:
494 psiconv_free_section_table_section(table);
495 ERROR2:
496 free(*result);
497 ERROR1:
498 psiconv_error(config,lev+1,off,"Reading of TextEd File failed");
499 if (res == 0)
500 return -PSICONV_E_NOMEM;
501 else
502 return res;
503 }
504
505 int psiconv_parse_word_file(const psiconv_config config,
506 const psiconv_buffer buf,int lev, psiconv_u32 off,
507 psiconv_word_f *result)
508 {
509 int res=0;
510 psiconv_section_table_section table;
511 psiconv_application_id_section appl_id;
512 char *temp_str;
513 psiconv_u32 pwd_sec = 0;
514 psiconv_u32 status_sec = 0;
515 psiconv_u32 styles_sec = 0;
516 psiconv_u32 page_sec = 0;
517 psiconv_u32 text_sec = 0;
518 psiconv_u32 layout_sec = 0;
519 psiconv_u32 applid_sec = 0;
520 psiconv_section_table_entry entry;
521 psiconv_u32 sto;
522 int i;
523
524 psiconv_progress(config,lev+1,off,"Going to read a word file");
525 if (!(*result = malloc(sizeof(**result))))
526 goto ERROR1;
527
528 psiconv_progress(config,lev+2,off,
529 "Going to read the offset of the section table section");
530 sto = psiconv_read_u32(config,buf,lev+2,off,&res);
531 if (res)
532 goto ERROR2;
533 psiconv_debug(config,lev+2,off,"Offset: %08x",sto);
534
535 psiconv_progress(config,lev+2,sto,
536 "Going to read the section table section");
537 if ((res = psiconv_parse_section_table_section(config,buf,lev+2,sto, NULL,&table)))
538 goto ERROR2;
539
540 for (i = 0; i < psiconv_list_length(table); i ++) {
541 psiconv_progress(config,lev+2,sto, "Going to read entry %d",i);
542 if (!(entry = psiconv_list_get(table,i)))
543 goto ERROR3;
544 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
545 applid_sec = entry->offset;
546 psiconv_debug(config,lev+3,sto,
547 "Found the Application ID section at %08x",applid_sec);
548 } else if (entry->id == PSICONV_ID_PAGE_LAYOUT_SECTION) {
549 page_sec = entry->offset;
550 psiconv_debug(config,lev+3,sto,
551 "Found the Page Layout section at %08x",page_sec);
552 } else if (entry->id == PSICONV_ID_TEXT_SECTION) {
553 text_sec = entry->offset;
554 psiconv_debug(config,lev+3,sto, "Found the Text section at %08x",text_sec);
555 } else if (entry->id == PSICONV_ID_PASSWORD_SECTION) {
556 pwd_sec = entry->offset;
557 psiconv_debug(config,lev+3,sto,
558 "Found the Password section at %08x",pwd_sec);
559 psiconv_error(config,lev+3,sto,
560 "Password section found - can't read encrypted data");
561 res = -PSICONV_E_PARSE;
562 goto ERROR3;
563 } else if (entry->id == PSICONV_ID_WORD_STATUS_SECTION) {
564 status_sec = entry->offset;
565 psiconv_debug(config,lev+3,sto,
566 "Found the Word Status section at %08x",status_sec);
567 } else if (entry->id == PSICONV_ID_WORD_STYLES_SECTION) {
568 styles_sec = entry->offset;
569 psiconv_debug(config,lev+3,sto,
570 "Found the Word Styles section at %08x",styles_sec);
571 } else if (entry->id == PSICONV_ID_LAYOUT_SECTION) {
572 layout_sec = entry->offset;
573 psiconv_debug(config,lev+3,sto,
574 "Found the Layout section at %08x",layout_sec);
575 } else {
576 psiconv_warn(config,lev+3,sto,
577 "Found unknown section in the Section Table (ignoring)");
578 psiconv_debug(config,lev+3,sto,
579 "Section ID %08x, offset %08x",entry->id,entry->offset);
580 }
581 }
582
583
584 psiconv_progress(config,lev+2,sto,
585 "Looking for the Status section");
586 if (!status_sec) {
587 psiconv_error(config,lev+2,sto, "Status section not found in the section table");
588 res = -PSICONV_E_PARSE;
589 goto ERROR3;
590 } else {
591 psiconv_debug(config,lev+2,sto, "Status section at offset %08x",status_sec);
592 if ((res = psiconv_parse_word_status_section(config,buf,lev+2,status_sec,NULL,
593 &((*result)->status_sec))))
594 goto ERROR3;
595 }
596
597 psiconv_progress(config,lev+2,sto, "Looking for the Application ID section");
598 if (! applid_sec) {
599 psiconv_error(config,lev+2,sto,
600 "Application ID section not found in the section table");
601 res = -PSICONV_E_PARSE;
602 goto ERROR4;
603 } else {
604 psiconv_debug(config,lev+2,sto,
605 "Application ID section at offset %08x",applid_sec);
606 if ((res = psiconv_parse_application_id_section(config,buf,lev+2,applid_sec,NULL,
607 &appl_id)))
608 goto ERROR4;
609 }
610 if ((appl_id->id != PSICONV_ID_WORD) ||
611 !applid_matches(appl_id->name,"word.app")) {
612 psiconv_warn(config,lev+2,applid_sec,
613 "Application ID section contains unexpected data");
614 psiconv_debug(config,lev+2,applid_sec,"ID: %08x expected, %08x found",
615 PSICONV_ID_WORD,appl_id->id);
616 if (!(temp_str = psiconv_make_printable(config,appl_id->name)))
617 goto ERROR5;
618 psiconv_debug(config,lev+2,applid_sec,"Name: `%s' expected, `%s' found",
619 "Word.app",temp_str);
620 free(temp_str);
621 res = -PSICONV_E_PARSE;
622 goto ERROR5;
623 }
624
625 psiconv_progress(config,lev+2,sto,
626 "Looking for the Page layout section");
627 if (! page_sec) {
628 psiconv_error(config,lev+2,sto,
629 "Page layout section not found in the section table");
630 res = -PSICONV_E_PARSE;
631 goto ERROR5;
632 } else {
633 psiconv_debug(config,lev+2,sto,
634 "Page layout section at offset %08x",page_sec);
635 if ((res = psiconv_parse_page_layout_section(config,buf,lev+2,page_sec,NULL,
636 &(*result)->page_sec)))
637 goto ERROR5;
638 }
639
640 psiconv_progress(config,lev+2,sto,
641 "Looking for the Word Style section");
642 if (!styles_sec) {
643 psiconv_error(config,lev+2,sto,
644 "Word styles section not found in the section table");
645 res = -PSICONV_E_PARSE;
646 goto ERROR6;
647 } else {
648 psiconv_debug(config,lev+2,sto,
649 "Word styles section at offset %08x",styles_sec);
650 if ((res = psiconv_parse_word_styles_section(config,buf,lev+2,styles_sec,NULL,
651 &(*result)->styles_sec)))
652 goto ERROR6;
653 }
654
655 psiconv_progress(config,lev+2,sto,
656 "Looking for the Text section");
657 if (!text_sec) {
658 psiconv_error(config,lev+2,sto, "Text section not found in the section table");
659 res = -PSICONV_E_PARSE;
660 goto ERROR7;
661 } else {
662 psiconv_debug(config,lev+2,sto,
663 "Text section at offset %08x",text_sec);
664 if ((res = psiconv_parse_text_section(config,buf,lev+2,text_sec,NULL,
665 &(*result)->paragraphs)))
666 goto ERROR7;
667 }
668
669 psiconv_progress(config,lev+2,sto, "Looking for the Layout section");
670 if (!layout_sec) {
671 psiconv_debug(config,lev+2,sto, "No layout section today");
672 } else {
673 psiconv_debug(config,lev+2,sto,
674 "Layout section at offset %08x",layout_sec);
675 if ((res = psiconv_parse_styled_layout_section(config,buf,lev+2,layout_sec,NULL,
676 (*result)->paragraphs,
677 (*result)->styles_sec)))
678 goto ERROR8;
679 }
680
681 psiconv_free_application_id_section(appl_id);
682 psiconv_free_section_table_section(table);
683
684 psiconv_progress(config,lev+1,off,"End of word file");
685 return 0;
686
687
688 ERROR8:
689 psiconv_free_text_and_layout((*result)->paragraphs);
690 ERROR7:
691 psiconv_free_word_styles_section((*result)->styles_sec);
692 ERROR6:
693 psiconv_free_page_layout_section((*result)->page_sec);
694 ERROR5:
695 psiconv_free_application_id_section(appl_id);
696 ERROR4:
697 psiconv_free_word_status_section((*result)->status_sec);
698 ERROR3:
699 psiconv_free_section_table_section(table);
700 ERROR2:
701 free(*result);
702 ERROR1:
703 psiconv_error(config,lev+1,off,"Reading of Word File failed");
704 if (res == 0)
705 return -PSICONV_E_NOMEM;
706 else
707 return res;
708 }
709
710 int psiconv_parse_sheet_file(const psiconv_config config,
711 const psiconv_buffer buf,int lev, psiconv_u32 off,
712 psiconv_sheet_f *result)
713 {
714 int res=0;
715 psiconv_section_table_section table;
716 psiconv_application_id_section appl_id;
717 char *temp_str;
718 psiconv_u32 pwd_sec = 0;
719 psiconv_u32 status_sec = 0;
720 psiconv_u32 page_sec = 0;
721 psiconv_u32 applid_sec = 0;
722 psiconv_u32 workbook_sec = 0;
723 psiconv_section_table_entry entry;
724 psiconv_u32 sto;
725 int i;
726
727 psiconv_progress(config,lev+1,off,"Going to read a sheet file");
728 if (!(*result = malloc(sizeof(**result))))
729 goto ERROR1;
730
731 psiconv_progress(config,lev+2,off,
732 "Going to read the offset of the section table section");
733 sto = psiconv_read_u32(config,buf,lev+2,off,&res);
734 if (res)
735 goto ERROR2;
736 psiconv_debug(config,lev+2,off,"Offset: %08x",sto);
737
738 psiconv_progress(config,lev+2,sto,
739 "Going to read the section table section");
740 if ((res = psiconv_parse_section_table_section(config,buf,lev+2,sto, NULL,&table)))
741 goto ERROR2;
742
743 for (i = 0; i < psiconv_list_length(table); i ++) {
744 psiconv_progress(config,lev+2,sto, "Going to read entry %d",i);
745 if (!(entry = psiconv_list_get(table,i)))
746 goto ERROR3;
747 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
748 applid_sec = entry->offset;
749 psiconv_debug(config,lev+3,sto,
750 "Found the Application ID section at %08x",applid_sec);
751 } else if (entry->id == PSICONV_ID_PAGE_LAYOUT_SECTION) {
752 page_sec = entry->offset;
753 psiconv_debug(config,lev+3,sto,
754 "Found the Page Layout section at %08x",page_sec);
755 } else if (entry->id == PSICONV_ID_PASSWORD_SECTION) {
756 pwd_sec = entry->offset;
757 psiconv_debug(config,lev+3,sto,
758 "Found the Password section at %08x",pwd_sec);
759 psiconv_error(config,lev+3,sto,
760 "Password section found - can't read encrypted data");
761 res = -PSICONV_E_PARSE;
762 goto ERROR3;
763 } else if (entry->id == PSICONV_ID_SHEET_WORKBOOK_SECTION) {
764 workbook_sec = entry->offset;
765 psiconv_debug(config,lev+3,sto,
766 "Found the Sheet Workbook section at %08x",workbook_sec);
767 } else if (entry->id == PSICONV_ID_SHEET_STATUS_SECTION) {
768 status_sec = entry->offset;
769 psiconv_debug(config,lev+3,sto,
770 "Found the Sheet Status section at %08x",status_sec);
771 } else {
772 psiconv_warn(config,lev+3,sto,
773 "Found unknown section in the Section Table (ignoring)");
774 psiconv_debug(config,lev+3,sto,
775 "Section ID %08x, offset %08x",entry->id,entry->offset);
776 }
777 }
778
779
780 psiconv_progress(config,lev+2,sto,
781 "Looking for the Status section");
782 if (!status_sec) {
783 psiconv_error(config,lev+2,sto, "Status section not found in the section table");
784 res = -PSICONV_E_PARSE;
785 goto ERROR3;
786 } else {
787 psiconv_debug(config,lev+2,sto, "Status section at offset %08x",status_sec);
788 if ((res = psiconv_parse_sheet_status_section(config,buf,lev+2,status_sec,NULL,
789 &((*result)->status_sec))))
790 goto ERROR3;
791 }
792
793 psiconv_progress(config,lev+2,sto, "Looking for the Application ID section");
794 if (! applid_sec) {
795 psiconv_error(config,lev+2,sto,
796 "Application ID section not found in the section table");
797 res = -PSICONV_E_PARSE;
798 goto ERROR4;
799 } else {
800 psiconv_debug(config,lev+2,sto,
801 "Application ID section at offset %08x",applid_sec);
802 if ((res = psiconv_parse_application_id_section(config,buf,lev+2,applid_sec,NULL,
803 &appl_id)))
804 goto ERROR4;
805 }
806 if ((appl_id->id != PSICONV_ID_SHEET) ||
807 !applid_matches(appl_id->name,"sheet.app")) {
808 psiconv_warn(config,lev+2,applid_sec,
809 "Application ID section contains unexpected data");
810 psiconv_debug(config,lev+2,applid_sec,"ID: %08x expected, %08x found",
811 PSICONV_ID_SHEET,appl_id->id);
812 if (!(temp_str = psiconv_make_printable(config,appl_id->name)))
813 goto ERROR5;
814 psiconv_debug(config,lev+2,applid_sec,"Name: `%s' expected, `%s' found",
815 "Sheet.app",temp_str);
816 free(temp_str);
817 res = -PSICONV_E_PARSE;
818 goto ERROR5;
819 }
820
821 psiconv_progress(config,lev+2,sto,
822 "Looking for the Page layout section");
823 if (! page_sec) {
824 psiconv_error(config,lev+2,sto,
825 "Page layout section not found in the section table");
826 res = -PSICONV_E_PARSE;
827 goto ERROR5;
828 } else {
829 psiconv_debug(config,lev+2,sto,
830 "Page layout section at offset %08x",page_sec);
831 if ((res = psiconv_parse_page_layout_section(config,buf,lev+2,page_sec,NULL,
832 &(*result)->page_sec)))
833 goto ERROR5;
834 }
835
836 psiconv_progress(config,lev+2,sto,
837 "Looking for the Sheet Workbook section");
838 if (! workbook_sec) {
839 psiconv_error(config,lev+2,sto,
840 "Sheet workbook section not found in the section table");
841 res = -PSICONV_E_PARSE;
842 goto ERROR6;
843 } else {
844 psiconv_debug(config,lev+2,sto,
845 "Sheet workbook section at offset %08x",page_sec);
846 if ((res = psiconv_parse_sheet_workbook_section(config,buf,lev+2,workbook_sec,NULL,
847 &(*result)->workbook_sec)))
848 goto ERROR6;
849 }
850
851 psiconv_free_application_id_section(appl_id);
852 psiconv_free_section_table_section(table);
853
854 psiconv_progress(config,lev+1,off,"End of Sheet file");
855 return 0;
856
857 ERROR6:
858 psiconv_free_page_layout_section((*result)->page_sec);
859 ERROR5:
860 psiconv_free_application_id_section(appl_id);
861 ERROR4:
862 psiconv_free_sheet_status_section((*result)->status_sec);
863 ERROR3:
864 psiconv_free_section_table_section(table);
865 ERROR2:
866 free(*result);
867 ERROR1:
868 psiconv_error(config,lev+1,off,"Reading of Sheet File failed");
869 if (res == 0)
870 return -PSICONV_E_NOMEM;
871 else
872 return res;
873 }

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