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

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

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

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