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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 196 - (hide annotations)
Wed Feb 4 12:19:09 2004 UTC (20 years, 1 month ago) by frodo
File MIME type: text/plain
File size: 30802 byte(s)
(Frodo) Copyright dates update

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

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