1 |
/* |
2 |
parse_common.c - Part of psiconv, a PSION 5 file formats converter |
3 |
Copyright (c) 1999-2004 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 |
#ifdef DMALLOC |
29 |
#include <dmalloc.h> |
30 |
#endif |
31 |
|
32 |
|
33 |
static int psiconv_parse_layout_section(const psiconv_config config, |
34 |
const psiconv_buffer buf, |
35 |
int lev,psiconv_u32 off, |
36 |
int *length, |
37 |
psiconv_text_and_layout result, |
38 |
psiconv_word_styles_section styles, |
39 |
int with_styles); |
40 |
static psiconv_file_type_t psiconv_determine_embedded_object_type |
41 |
(const psiconv_config config, |
42 |
const psiconv_buffer buf,int lev, |
43 |
int *status); |
44 |
|
45 |
int psiconv_parse_header_section(const psiconv_config config, |
46 |
const psiconv_buffer buf,int lev, |
47 |
psiconv_u32 off, int *length, |
48 |
psiconv_header_section *result) |
49 |
{ |
50 |
int res=0; |
51 |
int len=0; |
52 |
psiconv_u32 temp; |
53 |
|
54 |
psiconv_progress(config,lev+1,off+len,"Going to read the header section"); |
55 |
if (!((*result) = malloc(sizeof(**result)))) |
56 |
goto ERROR1; |
57 |
|
58 |
psiconv_progress(config,lev+2,off+len,"Going to read UID1 to UID3"); |
59 |
(*result)->uid1 = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
60 |
if (res) |
61 |
goto ERROR2; |
62 |
psiconv_debug(config,lev+2,off+len,"UID1: %08x",(*result)->uid1); |
63 |
if ((*result)->uid1 == PSICONV_ID_CLIPART) { |
64 |
/* That's all folks... */ |
65 |
(*result)->file = psiconv_clipart_file; |
66 |
(*result)->uid2 = 0; |
67 |
(*result)->uid3 = 0; |
68 |
(*result)->checksum = 0; |
69 |
len += 4; |
70 |
psiconv_debug(config,lev+2,off+len,"File is a Clipart file"); |
71 |
goto DONE; |
72 |
} |
73 |
if ((*result)->uid1 != PSICONV_ID_PSION5) { |
74 |
psiconv_error(config,lev+2,off+len, |
75 |
"UID1 has unknown value. This is probably " |
76 |
"not a (parsable) Psion 5 file"); |
77 |
res = -PSICONV_E_PARSE; |
78 |
goto ERROR2; |
79 |
} |
80 |
len += 4; |
81 |
(*result)->uid2 = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
82 |
if (res) |
83 |
goto ERROR2; |
84 |
psiconv_debug(config,lev+2,off+len,"UID2: %08x",(*result)->uid2); |
85 |
len += 4; |
86 |
(*result)->uid3 = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
87 |
if (res) |
88 |
goto ERROR2; |
89 |
psiconv_debug(config,lev+2,off+len,"UID3: %08x",(*result)->uid3); |
90 |
len += 4; |
91 |
|
92 |
(*result)->file = psiconv_unknown_file; |
93 |
if ((*result)->uid1 == PSICONV_ID_PSION5) { |
94 |
if ((*result)->uid2 == PSICONV_ID_DATA_FILE) { |
95 |
if ((*result)->uid3 == PSICONV_ID_WORD) { |
96 |
(*result)->file = psiconv_word_file; |
97 |
psiconv_debug(config,lev+2,off+len,"File is a Word file"); |
98 |
} else if ((*result)->uid3 == PSICONV_ID_TEXTED) { |
99 |
(*result)->file = psiconv_texted_file; |
100 |
psiconv_debug(config,lev+2,off+len,"File is a TextEd file"); |
101 |
} else if ((*result)->uid3 == PSICONV_ID_SKETCH) { |
102 |
(*result)->file = psiconv_sketch_file; |
103 |
psiconv_debug(config,lev+2,off+len,"File is a Sketch file"); |
104 |
} else if ((*result)->uid3 == PSICONV_ID_SHEET) { |
105 |
(*result)->file = psiconv_sheet_file; |
106 |
psiconv_debug(config,lev+2,off+len,"File is a Sheet file"); |
107 |
} |
108 |
} else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) { |
109 |
(*result)->file = psiconv_mbm_file; |
110 |
if ((*result)->uid3 != 0x00) |
111 |
psiconv_warn(config,lev+2,off+len,"UID3 set in MBM file?!?"); |
112 |
psiconv_debug(config,lev+2,off+len,"File is a MBM file"); |
113 |
} |
114 |
} |
115 |
if ((*result)->file == psiconv_unknown_file) { |
116 |
psiconv_warn(config,lev+2,off+len,"Unknown file type"); |
117 |
(*result)->file = psiconv_unknown_file; |
118 |
} |
119 |
|
120 |
psiconv_progress(config,lev+2,off+len,"Checking UID4"); |
121 |
temp = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
122 |
if (res) |
123 |
goto ERROR2; |
124 |
if (temp == psiconv_checkuid((*result)->uid1,(*result)->uid2, |
125 |
(*result)->uid3)) |
126 |
psiconv_debug(config,lev+2,off+len,"Checksum %08x is correct",temp); |
127 |
else { |
128 |
psiconv_error(config,lev+2,off+len,"Checksum failed, file corrupted!"); |
129 |
psiconv_debug(config,lev+2,off+len,"Expected checksum %08x, found %08x", |
130 |
psiconv_checkuid((*result)->uid1,(*result)->uid2, |
131 |
(*result)->uid3),temp); |
132 |
res = -PSICONV_E_PARSE; |
133 |
goto ERROR2; |
134 |
} |
135 |
len += 4; |
136 |
|
137 |
DONE: |
138 |
if (length) |
139 |
*length = len; |
140 |
|
141 |
psiconv_progress(config,lev+1,off+len-1, |
142 |
"End of Header Section (total length: %08x)",len); |
143 |
|
144 |
return res; |
145 |
|
146 |
ERROR2: |
147 |
free(*result); |
148 |
ERROR1: |
149 |
psiconv_error(config,lev+1,off,"Reading of Header Section failed"); |
150 |
if (length) |
151 |
*length = 0; |
152 |
if (res == 0) |
153 |
return -PSICONV_E_NOMEM; |
154 |
else |
155 |
return res; |
156 |
} |
157 |
|
158 |
int psiconv_parse_section_table_section(const psiconv_config config, |
159 |
const psiconv_buffer buf, int lev, |
160 |
psiconv_u32 off, int *length, |
161 |
psiconv_section_table_section *result) |
162 |
{ |
163 |
int res=0; |
164 |
int len=0; |
165 |
psiconv_section_table_entry entry; |
166 |
|
167 |
int i; |
168 |
psiconv_u8 nr; |
169 |
|
170 |
psiconv_progress(config,lev+1,off+len,"Going to read the section table section"); |
171 |
if (!(*result = psiconv_list_new(sizeof(*entry)))) |
172 |
goto ERROR1; |
173 |
|
174 |
psiconv_progress(config,lev+2,off+len,"Going to read the section table length"); |
175 |
nr = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
176 |
if (res) |
177 |
goto ERROR2; |
178 |
psiconv_debug(config,lev+2,off+len,"Length: %08x",nr); |
179 |
if (nr & 0x01) { |
180 |
psiconv_warn(config,lev+2,off+len, |
181 |
"Section table length odd - ignoring last entry"); |
182 |
} |
183 |
len ++; |
184 |
|
185 |
psiconv_progress(config,lev+2,off+len,"Going to read the section table entries"); |
186 |
entry = malloc(sizeof(*entry)); |
187 |
for (i = 0; i < nr / 2; i++) { |
188 |
entry->id = psiconv_read_u32(config,buf,lev+2,off + len,&res); |
189 |
if (res) |
190 |
goto ERROR3; |
191 |
psiconv_debug(config,lev+2,off + len,"Entry %d: ID = %08x",i,entry->id); |
192 |
len += 0x04; |
193 |
entry->offset = psiconv_read_u32(config,buf,lev+2,off + len,&res); |
194 |
if (res) |
195 |
goto ERROR3; |
196 |
psiconv_debug(config,lev+2,off +len,"Entry %d: Offset = %08x",i,entry->offset); |
197 |
len += 0x04; |
198 |
if ((res=psiconv_list_add(*result,entry))) |
199 |
goto ERROR3; |
200 |
} |
201 |
|
202 |
free(entry); |
203 |
|
204 |
if (length) |
205 |
*length = len; |
206 |
|
207 |
psiconv_progress(config,lev+1,off+len-1,"End of section table section " |
208 |
"(total length: %08x)", len); |
209 |
|
210 |
return 0; |
211 |
ERROR3: |
212 |
free(entry); |
213 |
ERROR2: |
214 |
psiconv_list_free(*result); |
215 |
ERROR1: |
216 |
psiconv_error(config,lev+1,off,"Reading of Section Table Section failed"); |
217 |
if (length) |
218 |
*length = 0; |
219 |
if (res == 0) |
220 |
return -PSICONV_E_NOMEM; |
221 |
else |
222 |
return res; |
223 |
} |
224 |
|
225 |
int psiconv_parse_application_id_section(const psiconv_config config, |
226 |
const psiconv_buffer buf, int lev, |
227 |
psiconv_u32 off, int *length, |
228 |
psiconv_application_id_section *result) |
229 |
{ |
230 |
int res=0; |
231 |
int len=0; |
232 |
int leng; |
233 |
|
234 |
psiconv_progress(config,lev+1,off,"Going to read the application id section"); |
235 |
if (!(*result = malloc(sizeof(**result)))) |
236 |
goto ERROR1; |
237 |
|
238 |
psiconv_progress(config,lev+2,off+len,"Going to read the type identifier"); |
239 |
(*result)->id = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
240 |
if (res) |
241 |
goto ERROR2; |
242 |
psiconv_debug(config,lev+2,off+len,"Identifier: %08x",(*result)->id); |
243 |
len += 4; |
244 |
|
245 |
psiconv_progress(config,lev+2,off+len,"Going to read the application id string"); |
246 |
(*result)->name = psiconv_read_string(config,buf,lev+2,off+len,&leng,&res); |
247 |
if (res) |
248 |
goto ERROR2; |
249 |
len += leng; |
250 |
|
251 |
if (length) |
252 |
*length = len; |
253 |
|
254 |
psiconv_progress(config,lev+1,off+len-1,"End of application id section " |
255 |
"(total length: %08x", len); |
256 |
|
257 |
return res; |
258 |
ERROR2: |
259 |
free(*result); |
260 |
ERROR1: |
261 |
psiconv_error(config,lev+1,off,"Reading of Application ID Section failed"); |
262 |
if (length) |
263 |
*length = 0; |
264 |
if (res == 0) |
265 |
return -PSICONV_E_NOMEM; |
266 |
else |
267 |
return res; |
268 |
} |
269 |
|
270 |
int psiconv_parse_text_section(const psiconv_config config, |
271 |
const psiconv_buffer buf,int lev,psiconv_u32 off, |
272 |
int *length,psiconv_text_and_layout *result) |
273 |
{ |
274 |
|
275 |
int res = 0; |
276 |
int len=0; |
277 |
|
278 |
psiconv_u32 text_len; |
279 |
psiconv_paragraph para; |
280 |
psiconv_ucs2 temp; |
281 |
psiconv_list line; |
282 |
psiconv_ucs2 *nextcharptr; |
283 |
|
284 |
int nr; |
285 |
int i,j,leng; |
286 |
char *str_copy; |
287 |
|
288 |
psiconv_progress(config,lev+1,off,"Going to parse the text section"); |
289 |
|
290 |
if(!(*result = psiconv_list_new(sizeof(*para)))) |
291 |
goto ERROR1; |
292 |
if (!(para = malloc(sizeof(*para)))) |
293 |
goto ERROR2; |
294 |
|
295 |
psiconv_progress(config,lev+2,off,"Reading the text length"); |
296 |
text_len = psiconv_read_X(config,buf,lev+2,off,&leng,&res); |
297 |
if (res) |
298 |
goto ERROR3; |
299 |
psiconv_debug(config,lev+2,off,"Length: %08x",text_len); |
300 |
len += leng; |
301 |
|
302 |
if (!(line = psiconv_list_new(sizeof(psiconv_ucs2)))) |
303 |
goto ERROR3; |
304 |
|
305 |
i = 0; |
306 |
nr = 0; |
307 |
while (i < text_len) { |
308 |
temp = psiconv_unicode_read_char(config,buf,lev+2,off+len+i,&leng,&res); |
309 |
if (res) |
310 |
goto ERROR4; |
311 |
if (i + leng > text_len) { |
312 |
psiconv_error(config,lev+2,off+len+i,"Malformed text section"); |
313 |
res = PSICONV_E_PARSE; |
314 |
goto ERROR4; |
315 |
} |
316 |
if ((temp == 0x06) || (i + leng == text_len)) { |
317 |
if (!(para->text = psiconv_unicode_from_list(line))) |
318 |
goto ERROR4; |
319 |
|
320 |
if (!(str_copy = psiconv_make_printable(config,para->text))) |
321 |
goto ERROR5; |
322 |
psiconv_debug(config,lev+2,off+i+len,"Line %d: %d characters",nr, |
323 |
strlen(str_copy) +1); |
324 |
psiconv_debug(config,lev+2,off+i+len,"Line %d: `%s'",nr,str_copy); |
325 |
free(str_copy); |
326 |
i += leng; |
327 |
|
328 |
if (!(para->in_lines = psiconv_list_new(sizeof( |
329 |
struct psiconv_in_line_layout_s)))) |
330 |
goto ERROR5; |
331 |
if (!(para->replacements = psiconv_list_new(sizeof( |
332 |
struct psiconv_replacement_s)))) |
333 |
goto ERROR6; |
334 |
if (!(para->base_character = psiconv_basic_character_layout())) |
335 |
goto ERROR7; |
336 |
if (!(para->base_paragraph = psiconv_basic_paragraph_layout())) |
337 |
goto ERROR8; |
338 |
para->base_style = 0; |
339 |
|
340 |
if ((res = psiconv_list_add(*result,para))) |
341 |
goto ERROR9; |
342 |
psiconv_progress(config,lev+2,off+len+i,"Starting a new line"); |
343 |
psiconv_list_empty(line); |
344 |
nr ++; |
345 |
} else { |
346 |
if ((res = psiconv_list_add(line,&temp))) |
347 |
goto ERROR4; |
348 |
i += leng; |
349 |
} |
350 |
} |
351 |
|
352 |
psiconv_list_free(line); |
353 |
free(para); |
354 |
|
355 |
len += text_len; |
356 |
|
357 |
if (length) |
358 |
*length = len; |
359 |
|
360 |
psiconv_progress(config,lev+1,off+len-1, |
361 |
"End of text section (total length: %08x", len); |
362 |
|
363 |
return res; |
364 |
|
365 |
ERROR9: |
366 |
psiconv_free_paragraph_layout(para->base_paragraph); |
367 |
ERROR8: |
368 |
psiconv_free_character_layout(para->base_character); |
369 |
ERROR7: |
370 |
psiconv_list_free(para->replacements); |
371 |
ERROR6: |
372 |
psiconv_list_free(para->in_lines); |
373 |
ERROR5: |
374 |
free(para->text); |
375 |
ERROR4: |
376 |
psiconv_list_free(line); |
377 |
ERROR3: |
378 |
free(para); |
379 |
ERROR2: |
380 |
psiconv_free_text_and_layout(*result); |
381 |
ERROR1: |
382 |
psiconv_error(config,lev+1,off,"Reading of Text Section failed"); |
383 |
if (length) |
384 |
*length = 0; |
385 |
if (!res) |
386 |
return -PSICONV_E_NOMEM; |
387 |
else |
388 |
return res; |
389 |
} |
390 |
|
391 |
/* First do a parse_text_section, or you will get into trouble here */ |
392 |
int psiconv_parse_layout_section(const psiconv_config config, |
393 |
const psiconv_buffer buf, |
394 |
int lev,psiconv_u32 off, |
395 |
int *length, |
396 |
psiconv_text_and_layout result, |
397 |
psiconv_word_styles_section styles, |
398 |
int with_styles) |
399 |
{ |
400 |
int res = 0; |
401 |
int len = 0; |
402 |
psiconv_u32 temp; |
403 |
int parse_styles,nr,i,j,total,leng,line_length; |
404 |
|
405 |
typedef struct anon_style_s |
406 |
{ |
407 |
int nr; |
408 |
psiconv_s16 base_style; |
409 |
psiconv_character_layout character; |
410 |
psiconv_paragraph_layout paragraph; |
411 |
} *anon_style; |
412 |
|
413 |
typedef psiconv_list anon_style_list; /* of struct anon_style */ |
414 |
|
415 |
anon_style_list anon_styles; |
416 |
struct anon_style_s anon; |
417 |
anon_style anon_ptr=NULL; |
418 |
|
419 |
psiconv_character_layout temp_char; |
420 |
psiconv_paragraph_layout temp_para; |
421 |
psiconv_word_style temp_style; |
422 |
psiconv_paragraph para; |
423 |
struct psiconv_in_line_layout_s in_line; |
424 |
|
425 |
int *inline_count; |
426 |
|
427 |
|
428 |
psiconv_progress(config,lev+1,off,"Going to read the layout section"); |
429 |
|
430 |
psiconv_progress(config,lev+2,off,"Going to read the section type"); |
431 |
temp = psiconv_read_u16(config,buf,lev+2,off+len,&res); |
432 |
if (res) |
433 |
goto ERROR1; |
434 |
psiconv_debug(config,lev+2,off+len,"Type: %02x",temp); |
435 |
parse_styles = with_styles; |
436 |
if ((temp == 0x0001) && !with_styles) { |
437 |
psiconv_warn(config,lev+2,off+len,"Styleless layout section expected, " |
438 |
"but styled section found!"); |
439 |
parse_styles = 1; |
440 |
} else if ((temp == 0x0000) && (with_styles)) { |
441 |
psiconv_warn(config,lev+2,off+len,"Styled layout section expected, " |
442 |
"but styleless section found!"); |
443 |
parse_styles = 0; |
444 |
} else if ((temp != 0x0000) && (temp != 0x0001)) { |
445 |
psiconv_warn(config,lev+2,off+len, |
446 |
"Layout section type indicator has unknown value!"); |
447 |
} |
448 |
len += 0x02; |
449 |
|
450 |
psiconv_progress(config,lev+2,off+len,"Going to read paragraph type list"); |
451 |
if (!(anon_styles = psiconv_list_new(sizeof(anon)))) |
452 |
goto ERROR1; |
453 |
psiconv_progress(config,lev+3,off+len,"Going to read paragraph type list length"); |
454 |
nr = psiconv_read_u8(config,buf,lev+3,off+len,&res); |
455 |
if (res) |
456 |
goto ERROR2; |
457 |
psiconv_debug(config,lev+3,off+len,"Length: %02x",nr); |
458 |
len ++; |
459 |
|
460 |
psiconv_progress(config,lev+3,off+len, |
461 |
"Going to read the paragraph type list elements"); |
462 |
for (i = 0; i < nr; i ++) { |
463 |
psiconv_progress(config,lev+3,off+len,"Element %d",i); |
464 |
anon.nr = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
465 |
if (res) |
466 |
goto ERROR3; |
467 |
psiconv_debug(config,lev+4,off+len,"Number: %08x",anon.nr); |
468 |
len += 0x04; |
469 |
|
470 |
psiconv_progress(config,lev+4,off,"Going to determine the base style"); |
471 |
if (parse_styles) { |
472 |
temp = psiconv_read_u32(config,buf,lev+4, off+len,&res); |
473 |
if (res) |
474 |
goto ERROR3; |
475 |
anon.base_style = psiconv_read_u8(config,buf,lev+3, off+len+4+temp,&res); |
476 |
if (res) |
477 |
goto ERROR3; |
478 |
psiconv_debug(config,lev+4,off+len+temp, |
479 |
"Style indicator: %02x",anon.base_style); |
480 |
} else |
481 |
anon.base_style = 0; |
482 |
if (!(temp_style = psiconv_get_style(styles,anon.base_style))) { |
483 |
psiconv_warn(config,lev+4,off,"Unknown Style referenced"); |
484 |
if (!(temp_style = psiconv_get_style(styles,anon.base_style))) { |
485 |
psiconv_warn(config,lev+4,off,"Base style unknown"); |
486 |
goto ERROR3; |
487 |
} |
488 |
} |
489 |
if (!(anon.paragraph = psiconv_clone_paragraph_layout |
490 |
(temp_style->paragraph))) |
491 |
goto ERROR3; |
492 |
if (!(anon.character = psiconv_clone_character_layout |
493 |
(temp_style->character))) |
494 |
goto ERROR3_1; |
495 |
|
496 |
psiconv_progress(config,lev+4,off+len,"Going to read the paragraph layout"); |
497 |
if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+4,off+len,&leng, |
498 |
anon.paragraph))) |
499 |
goto ERROR3_2; |
500 |
len += leng; |
501 |
if (parse_styles) |
502 |
len ++; |
503 |
|
504 |
psiconv_progress(config,lev+4,off+len,"Going to read the character layout"); |
505 |
if ((res = psiconv_parse_character_layout_list(config,buf,lev+4,off+len,&leng, |
506 |
anon.character))) |
507 |
goto ERROR3_2; |
508 |
len += leng; |
509 |
if ((res = psiconv_list_add(anon_styles,&anon))) |
510 |
goto ERROR3_2; |
511 |
} |
512 |
|
513 |
psiconv_progress(config,lev+2,off+len,"Going to parse the paragraph element list"); |
514 |
psiconv_progress(config,lev+3,off+len,"Going to read the number of paragraphs"); |
515 |
nr = psiconv_read_u32(config,buf,lev+3,off+len,&res); |
516 |
if (res) |
517 |
goto ERROR3; |
518 |
if (nr != psiconv_list_length(result)) { |
519 |
psiconv_warn(config,lev+3,off+len, |
520 |
"Number of text paragraphs and paragraph elements does not match"); |
521 |
psiconv_debug(config,lev+3,off+len, |
522 |
"%d text paragraphs, %d paragraph elements", |
523 |
psiconv_list_length(result),nr); |
524 |
} |
525 |
psiconv_debug(config,lev+3,off+len,"Number of paragraphs: %d",nr); |
526 |
len += 4; |
527 |
if (!(inline_count = malloc(nr * sizeof(*inline_count)))) |
528 |
goto ERROR3; |
529 |
|
530 |
psiconv_progress(config,lev+3,off+len,"Going to read the paragraph elements"); |
531 |
for (i = 0; i < nr; i ++) { |
532 |
psiconv_progress(config,lev+3,off+len,"Element %d",i); |
533 |
if (i >= psiconv_list_length(result)) { |
534 |
psiconv_debug(config,lev+4,off+len,"Going to allocate a new element"); |
535 |
if (!(para = malloc(sizeof(*para)))) |
536 |
goto ERROR4; |
537 |
if (!(para->in_lines = psiconv_list_new(sizeof( |
538 |
struct psiconv_in_line_layout_s)))) |
539 |
goto ERROR4_1; |
540 |
para->base_style = 0; |
541 |
if (!(para->base_character = psiconv_basic_character_layout())) |
542 |
goto ERROR4_2; |
543 |
if (!(para->base_paragraph = psiconv_basic_paragraph_layout())) |
544 |
goto ERROR4_3; |
545 |
if ((res = psiconv_list_add(result,para))) |
546 |
goto ERROR4_4; |
547 |
free(para); |
548 |
} |
549 |
if (!(para = psiconv_list_get(result,i))) |
550 |
goto ERROR4; |
551 |
|
552 |
psiconv_progress(config,lev+4,off+len,"Going to read the paragraph length"); |
553 |
temp = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
554 |
if (res) |
555 |
goto ERROR4; |
556 |
if (temp != psiconv_unicode_strlen(para->text)+1) { |
557 |
psiconv_warn(config,lev+4,off+len, |
558 |
"Disagreement of the length of paragraph in layout section"); |
559 |
psiconv_debug(config,lev+4,off+len, |
560 |
"Paragraph length: layout section says %d, counted %d", |
561 |
temp,psiconv_unicode_strlen(para->text)+1); |
562 |
} else |
563 |
psiconv_debug(config,lev+4,off+len,"Paragraph length: %d",temp); |
564 |
len += 4; |
565 |
|
566 |
psiconv_progress(config,lev+4,off+len,"Going to read the paragraph type"); |
567 |
temp = psiconv_read_u8(config,buf,lev+4,off+len,&res); |
568 |
if (res) |
569 |
goto ERROR4; |
570 |
if (temp != 0x00) { |
571 |
psiconv_debug(config,lev+4,off+len,"Type: %02x",temp); |
572 |
for (j = 0; j < psiconv_list_length(anon_styles); j++) { |
573 |
if (!(anon_ptr = psiconv_list_get(anon_styles,j))) { |
574 |
psiconv_error(config,lev+4,off+len,"Data structure corruption"); |
575 |
goto ERROR4; |
576 |
} |
577 |
if (temp == anon_ptr->nr) |
578 |
break; |
579 |
} |
580 |
if (j == psiconv_list_length(anon_styles)) { |
581 |
psiconv_warn(config,lev+4,off+len,"Layout section paragraph type unknown"); |
582 |
psiconv_debug(config,lev+4,off+len,"Unknown type - using base styles instead"); |
583 |
para->base_style = 0; |
584 |
if (!(temp_style = psiconv_get_style(styles,0))) { |
585 |
psiconv_error(config,lev+4,off,"Base style unknown"); |
586 |
goto ERROR4; |
587 |
} |
588 |
if (!(temp_para = psiconv_clone_paragraph_layout |
589 |
(temp_style->paragraph))) |
590 |
goto ERROR4; |
591 |
psiconv_free_paragraph_layout(para->base_paragraph); |
592 |
para->base_paragraph = temp_para; |
593 |
|
594 |
if (!(temp_char = psiconv_clone_character_layout |
595 |
(temp_style->character))) |
596 |
goto ERROR4; |
597 |
psiconv_free_character_layout(para->base_character); |
598 |
para->base_character = temp_char; |
599 |
} else { |
600 |
para->base_style = anon_ptr->base_style; |
601 |
if (!(temp_para = psiconv_clone_paragraph_layout (anon_ptr->paragraph))) |
602 |
goto ERROR4; |
603 |
psiconv_free_paragraph_layout(para->base_paragraph); |
604 |
para->base_paragraph = temp_para; |
605 |
|
606 |
if (!(temp_char = psiconv_clone_character_layout (anon_ptr->character))) |
607 |
goto ERROR4; |
608 |
psiconv_free_character_layout(para->base_character); |
609 |
para->base_character = temp_char; |
610 |
} |
611 |
inline_count[i] = 0; |
612 |
len += 0x01; |
613 |
} else { |
614 |
psiconv_debug(config,lev+4,off+len,"Type: %02x (not based on a paragraph type)" |
615 |
,temp); |
616 |
len += 0x01; |
617 |
if (parse_styles) { |
618 |
temp = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
619 |
if (res) |
620 |
goto ERROR4; |
621 |
psiconv_progress(config,lev+4,off+len+temp+4, |
622 |
"Going to read the paragraph element base style"); |
623 |
temp = psiconv_read_u8(config,buf,lev+4, off+len+temp+4,&res); |
624 |
if (res) |
625 |
goto ERROR4; |
626 |
psiconv_debug(config,lev+4,off+len+temp+4, "Style: %02x",temp); |
627 |
} else |
628 |
temp = 0x00; |
629 |
|
630 |
if (!(temp_style = psiconv_get_style (styles,temp))) { |
631 |
psiconv_warn(config,lev+4,off,"Unknown Style referenced"); |
632 |
if (!(temp_style = psiconv_get_style(styles,0))) { |
633 |
psiconv_error(config,lev+4,off,"Base style unknown"); |
634 |
goto ERROR4; |
635 |
} |
636 |
} |
637 |
|
638 |
if (!(temp_para = psiconv_clone_paragraph_layout(temp_style->paragraph))) |
639 |
goto ERROR4; |
640 |
psiconv_free_paragraph_layout(para->base_paragraph); |
641 |
para->base_paragraph = temp_para; |
642 |
|
643 |
if (!(temp_char = psiconv_clone_character_layout(temp_style->character))) |
644 |
goto ERROR4; |
645 |
psiconv_free_character_layout(para->base_character); |
646 |
para->base_character = temp_char; |
647 |
|
648 |
para->base_style = temp; |
649 |
psiconv_progress(config,lev+4,off+len,"Going to read paragraph layout"); |
650 |
if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+4,off+len,&leng, |
651 |
para->base_paragraph))) |
652 |
goto ERROR4; |
653 |
len += leng; |
654 |
if (parse_styles) |
655 |
len += 1; |
656 |
psiconv_progress(config,lev+4,off+len,"Going to read number of in-line " |
657 |
"layout elements"); |
658 |
inline_count[i] = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
659 |
if (res) |
660 |
goto ERROR4; |
661 |
psiconv_debug(config,lev+4,off+len,"Nr: %08x",inline_count[i]); |
662 |
len += 4; |
663 |
} |
664 |
} |
665 |
|
666 |
psiconv_progress(config,lev+2,off+len,"Going to read the text layout inline list"); |
667 |
|
668 |
psiconv_progress(config,lev+3,off+len,"Going to read the number of elements"); |
669 |
nr = psiconv_read_u32(config,buf,lev+3,off+len,&res); |
670 |
if (res) |
671 |
goto ERROR4; |
672 |
psiconv_debug(config,lev+3,off+len,"Elements: %08x",nr); |
673 |
len += 0x04; |
674 |
|
675 |
psiconv_progress(config,lev+3,off+len, |
676 |
"Going to read the text layout inline elements"); |
677 |
total = 0; |
678 |
for (i = 0; i < psiconv_list_length(result); i++) { |
679 |
if (!(para = psiconv_list_get(result,i))) { |
680 |
psiconv_error(config,lev+3,off+len,"Data structure corruption"); |
681 |
goto ERROR4; |
682 |
} |
683 |
line_length = -1; |
684 |
for (j = 0; j < inline_count[i]; j++) { |
685 |
psiconv_progress(config,lev+3,off+len,"Element %d: Paragraph %d, element %d", |
686 |
total,i,j); |
687 |
if (total >= nr) { |
688 |
psiconv_warn(config,lev+3,off+len, |
689 |
"Layout section inlines: not enough element"); |
690 |
psiconv_debug(config,lev+3,off+len,"Can't read element!"); |
691 |
} else { |
692 |
total ++; |
693 |
in_line.object = NULL; |
694 |
in_line.layout = NULL; |
695 |
if (!(in_line.layout = psiconv_clone_character_layout |
696 |
(para->base_character))) |
697 |
goto ERROR4; |
698 |
psiconv_progress(config,lev+4,off+len,"Going to read the element type"); |
699 |
temp = psiconv_read_u8(config,buf,lev+4,len+off,&res); |
700 |
if (res) |
701 |
goto ERROR5; |
702 |
len += 1; |
703 |
psiconv_debug(config,lev+4,off+len,"Type: %02x",temp); |
704 |
psiconv_progress(config,lev+4,off+len, |
705 |
"Going to read the number of characters it applies to"); |
706 |
in_line.length = psiconv_read_u32(config,buf,lev+4,len+off,&res); |
707 |
if (res) |
708 |
goto ERROR5; |
709 |
psiconv_debug(config,lev+4,off+len,"Length: %02x",in_line.length); |
710 |
len += 4; |
711 |
psiconv_progress(config,lev+4,off+len,"Going to read the character layout"); |
712 |
if ((res = psiconv_parse_character_layout_list(config,buf,lev+4,off+len,&leng, |
713 |
in_line.layout))) |
714 |
goto ERROR5; |
715 |
len += leng; |
716 |
|
717 |
if (temp == 0x01) { |
718 |
psiconv_debug(config,lev+4,off+len,"Found an embedded object"); |
719 |
psiconv_progress(config,lev+4,off+len,"Going to read the object marker " |
720 |
"(0x%08x expected)",PSICONV_ID_OBJECT); |
721 |
temp = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
722 |
if (res) |
723 |
goto ERROR5; |
724 |
if (temp != PSICONV_ID_OBJECT) { |
725 |
psiconv_warn(config,lev+4,off+len,"Unknown id marks embedded object"); |
726 |
psiconv_debug(config,lev+4,off+len,"Marker: read %08x, expected %08x", |
727 |
temp,PSICONV_ID_OBJECT); |
728 |
} |
729 |
len += 4; |
730 |
psiconv_progress(config,lev+4,off+len, |
731 |
"Going to read the Embedded Object Section offset"); |
732 |
temp = psiconv_read_u32(config,buf,lev+4,off+len,&res); |
733 |
if (res) |
734 |
goto ERROR5; |
735 |
psiconv_debug(config,lev+4,off+len, "Offset: %08x",temp); |
736 |
len += 4; |
737 |
psiconv_progress(config,lev+4,off+len, |
738 |
"Going to parse the Embedded Object Section"); |
739 |
if ((res = psiconv_parse_embedded_object_section(config,buf,lev+4,temp, |
740 |
NULL,&(in_line.object)))) |
741 |
goto ERROR5; |
742 |
psiconv_progress(config,lev+4,off+len, |
743 |
"Going to read the object width"); |
744 |
in_line.object_width = psiconv_read_length(config,buf,lev+4,off+len, |
745 |
&leng,&res); |
746 |
if (res) |
747 |
goto ERROR5; |
748 |
psiconv_debug(config,lev+4,off+len,"Object width: %f cm", |
749 |
in_line.object_width); |
750 |
len += leng; |
751 |
psiconv_progress(config,lev+4,off+len, |
752 |
"Going to read the object height"); |
753 |
in_line.object_height = psiconv_read_length(config,buf,lev+4,off+len,&leng, |
754 |
&res); |
755 |
if (res) |
756 |
goto ERROR5; |
757 |
psiconv_debug(config,lev+4,off+len,"Object height: %f cm", |
758 |
in_line.object_height); |
759 |
len += leng; |
760 |
} else if (temp != 0x00) { |
761 |
psiconv_warn(config,lev+4,off+len,"Layout section unknown inline type"); |
762 |
} |
763 |
if (line_length + in_line.length > psiconv_unicode_strlen(para->text)) { |
764 |
psiconv_warn(config,lev+4,off+len, |
765 |
"Layout section inlines: line length mismatch"); |
766 |
res = -1; |
767 |
in_line.length = psiconv_unicode_strlen(para->text) - line_length; |
768 |
} |
769 |
line_length += in_line.length; |
770 |
if ((res = psiconv_list_add(para->in_lines,&in_line))) |
771 |
goto ERROR5; |
772 |
} |
773 |
} |
774 |
} |
775 |
|
776 |
if (total != nr) { |
777 |
psiconv_warn(config,lev+4,off+len, |
778 |
"Layout section too many inlines, skipping remaining"); |
779 |
} |
780 |
|
781 |
free(inline_count); |
782 |
|
783 |
for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) { |
784 |
if (!(anon_ptr = psiconv_list_get(anon_styles,i))) { |
785 |
psiconv_error(config,lev+4,off+len,"Data structure corruption"); |
786 |
goto ERROR2; |
787 |
} |
788 |
psiconv_free_character_layout(anon_ptr->character); |
789 |
psiconv_free_paragraph_layout(anon_ptr->paragraph); |
790 |
} |
791 |
psiconv_list_free(anon_styles); |
792 |
|
793 |
if (length) |
794 |
*length = len; |
795 |
|
796 |
psiconv_progress(config,lev+1,off+len-1,"End of layout section (total length: %08x)", |
797 |
len); |
798 |
|
799 |
return 0; |
800 |
|
801 |
ERROR4_4: |
802 |
psiconv_free_paragraph_layout(para->base_paragraph); |
803 |
ERROR4_3: |
804 |
psiconv_free_character_layout(para->base_character); |
805 |
ERROR4_2: |
806 |
psiconv_list_free(para->in_lines); |
807 |
ERROR4_1: |
808 |
free(para); |
809 |
goto ERROR4; |
810 |
|
811 |
ERROR3_2: |
812 |
psiconv_free_character_layout(anon.character); |
813 |
ERROR3_1: |
814 |
psiconv_free_paragraph_layout(anon.paragraph); |
815 |
goto ERROR3; |
816 |
|
817 |
ERROR5: |
818 |
if (in_line.layout) |
819 |
psiconv_free_character_layout(in_line.layout); |
820 |
if (in_line.object) |
821 |
psiconv_free_embedded_object_section(in_line.object); |
822 |
ERROR4: |
823 |
free(inline_count); |
824 |
ERROR3: |
825 |
for (i = 0; i < psiconv_list_length(anon_styles); i++) { |
826 |
if (!(anon_ptr = psiconv_list_get(anon_styles,i))) { |
827 |
psiconv_error(config,lev+1,off,"Data structure corruption"); |
828 |
break; |
829 |
} |
830 |
psiconv_free_paragraph_layout(anon_ptr->paragraph); |
831 |
psiconv_free_character_layout(anon_ptr->character); |
832 |
} |
833 |
|
834 |
ERROR2: |
835 |
psiconv_list_free(anon_styles); |
836 |
ERROR1: |
837 |
psiconv_error(config,lev+1,off,"Reading of Layout Section failed"); |
838 |
if (length) |
839 |
*length = 0; |
840 |
if (!res) |
841 |
return -PSICONV_E_NOMEM; |
842 |
else |
843 |
return res; |
844 |
} |
845 |
|
846 |
int psiconv_parse_styled_layout_section(const psiconv_config config, |
847 |
const psiconv_buffer buf, |
848 |
int lev,psiconv_u32 off, |
849 |
int *length, |
850 |
psiconv_text_and_layout result, |
851 |
psiconv_word_styles_section styles) |
852 |
{ |
853 |
return psiconv_parse_layout_section(config,buf,lev,off,length,result,styles,1); |
854 |
} |
855 |
|
856 |
int psiconv_parse_styleless_layout_section(const psiconv_config config, |
857 |
const psiconv_buffer buf, |
858 |
int lev,psiconv_u32 off, |
859 |
int *length, |
860 |
psiconv_text_and_layout result, |
861 |
const psiconv_character_layout base_char, |
862 |
const psiconv_paragraph_layout base_para) |
863 |
{ |
864 |
int res = 0; |
865 |
psiconv_word_styles_section styles_section; |
866 |
|
867 |
if (!(styles_section = malloc(sizeof(*styles_section)))) |
868 |
goto ERROR1; |
869 |
if (!(styles_section->normal = malloc(sizeof(*styles_section->normal)))) |
870 |
goto ERROR2; |
871 |
if (!(styles_section->normal->character = |
872 |
psiconv_clone_character_layout(base_char))) |
873 |
goto ERROR3; |
874 |
if (!(styles_section->normal->paragraph = |
875 |
psiconv_clone_paragraph_layout(base_para))) |
876 |
goto ERROR4; |
877 |
styles_section->normal->hotkey = 0; |
878 |
|
879 |
if (!(styles_section->normal->name = psiconv_unicode_empty_string())) |
880 |
goto ERROR5; |
881 |
if (!(styles_section->styles = psiconv_list_new(sizeof( |
882 |
struct psiconv_word_style_s)))) |
883 |
goto ERROR6; |
884 |
|
885 |
res = psiconv_parse_layout_section(config,buf,lev,off,length,result, |
886 |
styles_section,0); |
887 |
|
888 |
psiconv_free_word_styles_section(styles_section); |
889 |
return res; |
890 |
|
891 |
ERROR6: |
892 |
free(styles_section->normal->name); |
893 |
ERROR5: |
894 |
psiconv_free_paragraph_layout(styles_section->normal->paragraph); |
895 |
ERROR4: |
896 |
psiconv_free_character_layout(styles_section->normal->character); |
897 |
ERROR3: |
898 |
free(styles_section->normal); |
899 |
ERROR2: |
900 |
free(styles_section); |
901 |
ERROR1: |
902 |
psiconv_error(config,lev+1,off,"Reading of Styleless Layout Section failed"); |
903 |
if (length) |
904 |
*length = 0; |
905 |
if (!res) |
906 |
return -PSICONV_E_NOMEM; |
907 |
else |
908 |
return res; |
909 |
} |
910 |
|
911 |
int psiconv_parse_embedded_object_section(const psiconv_config config, |
912 |
const psiconv_buffer buf, int lev, |
913 |
psiconv_u32 off, int *length, |
914 |
psiconv_embedded_object_section *result) |
915 |
{ |
916 |
int res=0; |
917 |
int len=0; |
918 |
int leng,i; |
919 |
psiconv_section_table_section table; |
920 |
psiconv_section_table_entry entry; |
921 |
psiconv_u32 icon_sec=0,display_sec=0,table_sec=0; |
922 |
psiconv_buffer subbuf; |
923 |
|
924 |
psiconv_progress(config,lev+1,off+len,"Going to read an Embedded Object"); |
925 |
if (!(*result = malloc(sizeof(**result)))) |
926 |
goto ERROR1; |
927 |
|
928 |
psiconv_progress(config,lev+2,off+len,"Going to read the Embedded Object Section"); |
929 |
psiconv_parse_section_table_section(config,buf,lev+2,off+len,&leng,&table); |
930 |
len += leng; |
931 |
|
932 |
for (i = 0; i < psiconv_list_length(table); i++) { |
933 |
psiconv_progress(config,lev+2,off+len,"Going to read entry %d",i); |
934 |
if (!(entry = psiconv_list_get(table,i))) |
935 |
goto ERROR2; |
936 |
if (entry->id == PSICONV_ID_OBJECT_DISPLAY_SECTION) { |
937 |
display_sec = entry->offset; |
938 |
psiconv_debug(config,lev+3,off+len,"Found the Object Display Section at %08x", |
939 |
display_sec); |
940 |
} else if (entry->id == PSICONV_ID_OBJECT_ICON_SECTION) { |
941 |
icon_sec = entry->offset; |
942 |
psiconv_debug(config,lev+3,off+len,"Found the Object Icon Section at %08x", |
943 |
icon_sec); |
944 |
} else if (entry->id == PSICONV_ID_OBJECT_SECTION_TABLE_SECTION) { |
945 |
table_sec = entry->offset; |
946 |
psiconv_debug(config,lev+3,off+len,"Found the Object Section Table Section at %08x", |
947 |
table_sec); |
948 |
} else { |
949 |
psiconv_warn(config,lev+3,off+len, |
950 |
"Found unknown section in the Object Display Section " |
951 |
"(ignoring)"); |
952 |
psiconv_debug(config,lev+3,off+len,"Section ID %08x, offset %08x", |
953 |
entry->id, entry->offset); |
954 |
} |
955 |
} |
956 |
|
957 |
psiconv_progress(config,lev+2,off+len,"Looking for the Object Display Section"); |
958 |
if (!icon_sec) { |
959 |
psiconv_warn(config,lev+2,off+len,"Object Display Section not found"); |
960 |
(*result)->display = NULL; |
961 |
} else { |
962 |
psiconv_debug(config,lev+2,off+len,"Object Display Section at offset %08x", |
963 |
display_sec); |
964 |
if ((res = psiconv_parse_object_display_section(config,buf,lev+2,display_sec,NULL, |
965 |
&(*result)->display))) |
966 |
goto ERROR2; |
967 |
} |
968 |
|
969 |
psiconv_progress(config,lev+2,off+len,"Looking for the Object Icon Section"); |
970 |
if (!icon_sec) { |
971 |
psiconv_warn(config,lev+2,off+len,"Object Icon Section not found"); |
972 |
(*result)->icon = NULL; |
973 |
} else { |
974 |
psiconv_debug(config,lev+2,off+len,"Object Icon Section at offset %08x",icon_sec); |
975 |
if ((res = psiconv_parse_object_icon_section(config,buf,lev+2,icon_sec,NULL, |
976 |
&(*result)->icon))) |
977 |
goto ERROR3; |
978 |
} |
979 |
|
980 |
psiconv_progress(config,lev+2,off+len, |
981 |
"Looking for the Section Table Offset Section"); |
982 |
if (!table_sec) { |
983 |
psiconv_warn(config,lev+2,off+len, |
984 |
"Embedded Section Table Offset Section not found"); |
985 |
(*result)->object = NULL; |
986 |
} else { |
987 |
psiconv_progress(config,lev+2,off+len, |
988 |
"Extracting object: add %08x to all following offsets", |
989 |
table_sec); |
990 |
/* We can't determine the length of the object, so we just take it all */ |
991 |
if ((res = psiconv_buffer_subbuffer(&subbuf,buf,table_sec, |
992 |
psiconv_buffer_length(buf)-table_sec))) |
993 |
goto ERROR4; |
994 |
|
995 |
if (!((*result)->object = malloc(sizeof(*(*result)->object)))) |
996 |
goto ERROR5; |
997 |
|
998 |
/* We need to find the file type, but we don't have a normal header */ |
999 |
/* So we try to find the Application ID Section and hope for the best */ |
1000 |
psiconv_progress(config,lev+3,0,"Trying to determine the file type"); |
1001 |
(*result)->object->type = psiconv_determine_embedded_object_type |
1002 |
(config,subbuf,lev+3,&res); |
1003 |
switch ((*result)->object->type) { |
1004 |
case psiconv_word_file: |
1005 |
if ((res = psiconv_parse_word_file(config,subbuf,lev+3,0, |
1006 |
((psiconv_word_f *) &(*result)->object->file)))) |
1007 |
goto ERROR6; |
1008 |
break; |
1009 |
case psiconv_texted_file: |
1010 |
if ((res = psiconv_parse_texted_file(config,subbuf,lev+3,0, |
1011 |
((psiconv_texted_f *) &(*result)->object->file)))) |
1012 |
goto ERROR6; |
1013 |
break; |
1014 |
case psiconv_sheet_file: |
1015 |
if ((res = psiconv_parse_sheet_file(config,subbuf,lev+3,0, |
1016 |
((psiconv_sheet_f *) &(*result)->object->file)))) |
1017 |
goto ERROR6; |
1018 |
break; |
1019 |
case psiconv_sketch_file: |
1020 |
if ((res = psiconv_parse_sketch_file(config,subbuf,lev+3,0, |
1021 |
((psiconv_sketch_f *) &(*result)->object->file)))) |
1022 |
goto ERROR6; |
1023 |
break; |
1024 |
default: |
1025 |
psiconv_warn(config,lev+3,0,"Can't parse embedded object (still continuing)"); |
1026 |
(*result)->object->file = NULL; |
1027 |
} |
1028 |
} |
1029 |
|
1030 |
psiconv_buffer_free(subbuf); |
1031 |
psiconv_free_section_table_section(table); |
1032 |
|
1033 |
if (length) |
1034 |
*length = len; |
1035 |
|
1036 |
psiconv_progress(config,lev+1,off+len-1,"End of Embedded Object Section " |
1037 |
"(total length: %08x)",len); |
1038 |
|
1039 |
return res; |
1040 |
|
1041 |
|
1042 |
ERROR6: |
1043 |
free((*result)->object); |
1044 |
ERROR5: |
1045 |
psiconv_buffer_free(subbuf); |
1046 |
ERROR4: |
1047 |
psiconv_free_object_icon_section((*result)->icon); |
1048 |
ERROR3: |
1049 |
psiconv_free_object_display_section((*result)->display); |
1050 |
ERROR2: |
1051 |
psiconv_free_section_table_section(table); |
1052 |
ERROR1: |
1053 |
psiconv_error(config,lev+1,off,"Reading Embedded Object failed"); |
1054 |
|
1055 |
if (length) |
1056 |
*length = 0; |
1057 |
|
1058 |
if (res == 0) |
1059 |
return -PSICONV_E_NOMEM; |
1060 |
else |
1061 |
return res; |
1062 |
} |
1063 |
|
1064 |
psiconv_file_type_t psiconv_determine_embedded_object_type |
1065 |
(const psiconv_config config, |
1066 |
const psiconv_buffer buf,int lev, |
1067 |
int *status) |
1068 |
{ |
1069 |
psiconv_u32 off; |
1070 |
psiconv_section_table_section table; |
1071 |
int res,i; |
1072 |
psiconv_file_type_t file_type = psiconv_unknown_file; |
1073 |
psiconv_section_table_entry entry; |
1074 |
psiconv_application_id_section applid; |
1075 |
|
1076 |
psiconv_progress(config,lev+1,0,"Going to determine embedded object file type"); |
1077 |
psiconv_progress(config,lev+2,0,"Going to read the Section Table Offset Section"); |
1078 |
off = psiconv_read_u32(config,buf,lev,0,&res); |
1079 |
if (res) |
1080 |
goto ERROR1; |
1081 |
psiconv_debug(config,lev+2,0,"Offset: %08x",off); |
1082 |
|
1083 |
psiconv_progress(config,lev+2,off,"Going to read the Section Table Section"); |
1084 |
if ((res = psiconv_parse_section_table_section(config,buf,lev+2,off,NULL,&table))) |
1085 |
goto ERROR1; |
1086 |
|
1087 |
psiconv_progress(config,lev+2,off,"Going to search the Section Table Section " |
1088 |
"for the Application ID Section"); |
1089 |
for (i=0; i < psiconv_list_length(table); i++) { |
1090 |
psiconv_progress(config,lev+3,off,"Going to read entry %d",i); |
1091 |
if (!(entry = psiconv_list_get(table,i))) |
1092 |
goto ERROR2; |
1093 |
if (entry->id == PSICONV_ID_APPL_ID_SECTION) { |
1094 |
psiconv_progress(config,lev+3,off, |
1095 |
"Found the Application ID Section at offset %08x", |
1096 |
entry->offset); |
1097 |
off = entry->offset; |
1098 |
break; |
1099 |
} |
1100 |
} |
1101 |
if (i == psiconv_list_length(table)) { |
1102 |
psiconv_error(config,lev+2,off,"No Application ID Section found"); |
1103 |
res = PSICONV_E_PARSE; |
1104 |
goto ERROR2; |
1105 |
} |
1106 |
|
1107 |
psiconv_progress(config,lev+2,off,"Going to read the Application ID Section"); |
1108 |
if ((res = psiconv_parse_application_id_section(config,buf,lev+2,off,NULL,&applid))) |
1109 |
goto ERROR2; |
1110 |
|
1111 |
switch (applid->id) { |
1112 |
case PSICONV_ID_WORD: file_type = psiconv_word_file; |
1113 |
psiconv_debug(config,lev+2,off,"Found a Word file"); |
1114 |
break; |
1115 |
case PSICONV_ID_TEXTED: file_type = psiconv_texted_file; |
1116 |
psiconv_debug(config,lev+2,off,"Found a TextEd file"); |
1117 |
break; |
1118 |
case PSICONV_ID_SKETCH: file_type = psiconv_sketch_file; |
1119 |
psiconv_debug(config,lev+2,off,"Found a Sketch file"); |
1120 |
break; |
1121 |
case PSICONV_ID_SHEET: file_type = psiconv_sheet_file; |
1122 |
psiconv_debug(config,lev+2,off,"Found a Sheet file"); |
1123 |
break; |
1124 |
default: psiconv_warn(config,lev+2,off,"Found an unknown file type"); |
1125 |
psiconv_debug(config,lev+2,off,"Found ID %08x",applid->id); |
1126 |
} |
1127 |
|
1128 |
ERROR2: |
1129 |
psiconv_free_application_id_section(applid); |
1130 |
ERROR1: |
1131 |
psiconv_free_section_table_section(table); |
1132 |
if (status) |
1133 |
*status = res; |
1134 |
return file_type; |
1135 |
|
1136 |
} |
1137 |
|
1138 |
int psiconv_parse_object_display_section(const psiconv_config config, |
1139 |
const psiconv_buffer buf,int lev, |
1140 |
psiconv_u32 off, int *length, |
1141 |
psiconv_object_display_section *result) |
1142 |
{ |
1143 |
int res = 0; |
1144 |
int len = 0; |
1145 |
int leng; |
1146 |
psiconv_u32 temp; |
1147 |
|
1148 |
psiconv_progress(config,lev+1,off,"Going to read the Object Display Section"); |
1149 |
if (!(*result = malloc(sizeof(**result)))) |
1150 |
goto ERROR1; |
1151 |
|
1152 |
psiconv_progress(config,lev+2,off+len,"Going to read the display as icon flag " |
1153 |
"(expecting 0x00 or 0x01)"); |
1154 |
temp = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
1155 |
if (res) |
1156 |
goto ERROR2; |
1157 |
if (temp == 0x00) { |
1158 |
(*result)->show_icon = psiconv_bool_true; |
1159 |
psiconv_debug(config,lev+2,off+len,"Displayed as icon"); |
1160 |
} else if (temp == 0x01) { |
1161 |
(*result)->show_icon = psiconv_bool_false; |
1162 |
psiconv_debug(config,lev+2,off+len,"Displayed as full document"); |
1163 |
} else { |
1164 |
psiconv_warn(config,lev+2,off+len,"Unknown Object Display Section Icon Flag"); |
1165 |
psiconv_debug(config,lev+2,off+len,"Icon flag found: %02x",temp); |
1166 |
/* Improvise */ |
1167 |
(*result)->show_icon = (temp & 0x01?psiconv_bool_false:psiconv_bool_true); |
1168 |
} |
1169 |
len ++; |
1170 |
|
1171 |
psiconv_progress(config,lev+2,off+len,"Going to read the display width"); |
1172 |
(*result)->width = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res); |
1173 |
if (res) |
1174 |
goto ERROR2; |
1175 |
psiconv_debug(config,lev+2,off+len,"Display width: %f cm",(*result)->width); |
1176 |
len += leng; |
1177 |
|
1178 |
psiconv_progress(config,lev+2,off+len,"Going to read the display height"); |
1179 |
(*result)->height = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res); |
1180 |
if (res) |
1181 |
goto ERROR2; |
1182 |
psiconv_debug(config,lev+2,off+len,"Display length: %f cm",(*result)->height); |
1183 |
len += leng; |
1184 |
|
1185 |
psiconv_progress(config,lev+2,off+len,"Going to read unknown long (%08x expected)", |
1186 |
0); |
1187 |
temp = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
1188 |
if (temp != 0) { |
1189 |
psiconv_warn(config,lev+2,off+len,"Unknown Object Display Section final long"); |
1190 |
psiconv_debug(config,lev+2,off+len,"Long read: %08x",temp); |
1191 |
} |
1192 |
len += 4; |
1193 |
|
1194 |
if (length) |
1195 |
*length = len; |
1196 |
|
1197 |
psiconv_progress(config,lev+1,off+len-1,"End of Object Display Section " |
1198 |
"(total length: %08x",len); |
1199 |
return res; |
1200 |
|
1201 |
ERROR2: |
1202 |
free(*result); |
1203 |
ERROR1: |
1204 |
psiconv_error(config,lev+1,off+len,"Reading of Object Display Section failed"); |
1205 |
if (length) |
1206 |
*length=0; |
1207 |
if (!res) |
1208 |
return -PSICONV_E_NOMEM; |
1209 |
else |
1210 |
return res; |
1211 |
} |
1212 |
|
1213 |
int psiconv_parse_object_icon_section(const psiconv_config config, |
1214 |
const psiconv_buffer buf,int lev, |
1215 |
psiconv_u32 off, int *length, |
1216 |
psiconv_object_icon_section *result) |
1217 |
{ |
1218 |
int res = 0; |
1219 |
int len = 0; |
1220 |
int leng; |
1221 |
|
1222 |
psiconv_progress(config,lev+1,off,"Going to read the Object Icon Section"); |
1223 |
if (!(*result = malloc(sizeof(**result)))) |
1224 |
goto ERROR1; |
1225 |
|
1226 |
psiconv_progress(config,lev+2,off+len,"Going to read the icon name"); |
1227 |
(*result)->icon_name = psiconv_read_string(config,buf,lev+2,off+len,&leng,&res); |
1228 |
if (res) |
1229 |
goto ERROR2; |
1230 |
len += leng; |
1231 |
|
1232 |
psiconv_progress(config,lev+2,off+len,"Going to read the icon width"); |
1233 |
(*result)->icon_width = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res); |
1234 |
if (res) |
1235 |
goto ERROR3; |
1236 |
psiconv_debug(config,lev+2,off+len,"Icon width: %f cm",(*result)->icon_width); |
1237 |
len += leng; |
1238 |
|
1239 |
psiconv_progress(config,lev+2,off+len,"Going to read the icon height"); |
1240 |
(*result)->icon_height = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res); |
1241 |
if (res) |
1242 |
goto ERROR3; |
1243 |
psiconv_debug(config,lev+2,off+len,"Icon length: %f cm",(*result)->icon_height); |
1244 |
len += leng; |
1245 |
|
1246 |
if (length) |
1247 |
*length = len; |
1248 |
|
1249 |
psiconv_progress(config,lev+1,off+len-1,"End of Object Icon Section" |
1250 |
"(total length: %08x",len); |
1251 |
return res; |
1252 |
|
1253 |
ERROR3: |
1254 |
free((*result)->icon_name); |
1255 |
ERROR2: |
1256 |
free(*result); |
1257 |
ERROR1: |
1258 |
psiconv_error(config,lev+1,off+len,"Reading of Object Icon Section failed"); |
1259 |
if (length) |
1260 |
*length=0; |
1261 |
if (!res) |
1262 |
return -PSICONV_E_NOMEM; |
1263 |
else |
1264 |
return res; |
1265 |
} |