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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 12 - (show annotations)
Mon Oct 11 16:15:14 1999 UTC (24 years, 5 months ago) by frodo
File MIME type: text/plain
File size: 15875 byte(s)
(Frodo) Full MBM support - untested

1 /*
2 parse_driver.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 1999 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 <stdlib.h>
22
23 #include "parse.h"
24 #include "parse_routines.h"
25 #include "data.h"
26
27 psiconv_file_type_t psiconv_file_type(psiconv_buffer buf)
28 {
29 psiconv_header_section header;
30 psiconv_file_type_t res;
31
32 psiconv_parse_header_section(buf,0,0,NULL,&header);
33 res = header->file;
34 psiconv_free_header_section(header);
35 return res;
36 }
37
38 int psiconv_parse(const psiconv_buffer buf,psiconv_file *result)
39 {
40 int res=0;
41 int lev=0;
42 int off=0;
43
44 (*result) = malloc(sizeof(**result));
45
46 (*result)->type = psiconv_file_type(buf);
47 if ((*result)->type == psiconv_unknown_file) {
48 psiconv_warn(lev+1,off,"Unknown file type: can't parse!");
49 (*result)->file = NULL;
50 res = -1;
51 } else if ((*result)->type == psiconv_word_file)
52 res = psiconv_parse_word_file(buf,lev+2,off,
53 (psiconv_word_f *)(&((*result)->file)));
54 else if ((*result)->type == psiconv_texted_file)
55 res = psiconv_parse_texted_file(buf,lev+2,off,
56 (psiconv_texted_f *)(&((*result)->file)));
57 else if ((*result)->type == psiconv_mbm_file)
58 res = psiconv_parse_mbm_file(buf,lev+2,off,
59 (psiconv_mbm_f *)(&((*result)->file)));
60 else {
61 psiconv_warn(lev+1,off,"Can't parse this file yet!");
62 (*result)->file = NULL;
63 }
64 res = -1;
65
66 return res;
67 }
68
69 int psiconv_parse_mbm_file(const psiconv_buffer buf,int lev, psiconv_u32 off,
70 psiconv_mbm_f *result)
71 {
72 int res=0;
73 int i;
74 psiconv_mbm_jumptable_section table;
75 psiconv_paint_data_section paint;
76 psiconv_header_section header;
77 psiconv_u32 *entry;
78
79 psiconv_progress(lev+1,off,"Going to read a mbm file");
80 *result = malloc(sizeof(**result));
81
82 psiconv_progress(lev+2,off, "Going to read the header section");
83 res |= psiconv_parse_header_section(buf,lev+2,off,NULL,&header);
84
85 psiconv_progress(lev+2,off,"Going to read the MBM jumptable");
86 res |= psiconv_parse_mbm_jumptable_section(buf,lev+2,
87 header->section_table_offset,
88 NULL,&table);
89
90 (*result)->sections = psiconv_list_new(sizeof(*paint));
91 for (i = 0; i < psiconv_list_length(table); i ++) {
92 entry = psiconv_list_get(table,i);
93 psiconv_parse_paint_data_section(buf,lev+2,*entry,NULL,&paint);
94 psiconv_list_add(table,paint);
95 }
96
97 psiconv_free_header_section(header);
98 psiconv_free_mbm_jumptable_section(table);
99 psiconv_progress(lev+1,off,"End of mbm file");
100 return res;
101 }
102
103 int psiconv_parse_texted_file(const psiconv_buffer buf,int lev, psiconv_u32 off,
104 psiconv_texted_f *result)
105 {
106 int res=0;
107 psiconv_header_section header;
108 psiconv_section_table_section table;
109 psiconv_application_id_section appl_id;
110 char *temp_str;
111 psiconv_character_layout base_char;
112 psiconv_paragraph_layout base_para;
113 psiconv_u32 page_sec = 0;
114 psiconv_u32 texted_sec = 0;
115 psiconv_u32 applid_sec = 0;
116 psiconv_section_table_entry entry;
117 int i;
118
119 psiconv_progress(lev+1,off,"Going to read a texted file");
120 *result = malloc(sizeof(**result));
121
122 psiconv_progress(lev+2,off, "Going to read the header section");
123 res |= psiconv_parse_header_section(buf,lev+2,off,NULL,&header);
124
125 psiconv_progress(lev+2,header->section_table_offset,
126 "Going to read the section table section");
127 res |= psiconv_parse_section_table_section(buf,lev+2,
128 header->section_table_offset,
129 NULL,&table);
130
131 for (i = 0; i < psiconv_list_length(table); i ++) {
132 psiconv_progress(lev+2,header->section_table_offset,
133 "Going to read entry %d",i);
134 entry = psiconv_list_get(table,i);
135 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
136 applid_sec = entry->offset;
137 psiconv_debug(lev+3,header->section_table_offset,
138 "Found the Application ID section at %08x",applid_sec);
139 } else if (entry->id == PSICONV_ID_PAGE_LAYOUT_SECTION) {
140 page_sec = entry->offset;
141 psiconv_debug(lev+3,header->section_table_offset,
142 "Found the Page Layout section at %08x",page_sec);
143 } else if (entry->id == PSICONV_ID_TEXTED) {
144 texted_sec = entry->offset;
145 psiconv_debug(lev+3,header->section_table_offset,
146 "Found the TextEd section at %08x",texted_sec);
147 } else {
148 psiconv_warn(lev+3,header->section_table_offset,
149 "Found unknown section in the Section Table");
150 psiconv_debug(lev+3,header->section_table_offset,
151 "Section ID %08x, offset %08x",entry->id,entry->offset);
152 res = -1;
153 }
154 }
155
156 psiconv_progress(lev+2,header->section_table_offset,
157 "Looking for the Application ID section");
158 if (! applid_sec) {
159 psiconv_warn(lev+2,header->section_table_offset,
160 "Application ID section not found in the section table");
161 res = -1;
162 } else {
163 psiconv_debug(lev+2,header->section_table_offset,
164 "Application ID section at offset %08x",applid_sec);
165 res |= psiconv_parse_application_id_section(buf,lev+2,applid_sec,NULL,
166 &appl_id);
167 }
168 if ((appl_id->id != PSICONV_ID_TEXTED) ||
169 strcmp(appl_id->name,"TextEd.app")) {
170 psiconv_warn(lev+2,applid_sec,
171 "Application ID section contains unexpected data");
172 psiconv_debug(lev+2,applid_sec,"ID: %08x expected, %08x found",
173 PSICONV_ID_TEXTED,appl_id->id);
174 temp_str = psiconv_make_printable(appl_id->name);
175 psiconv_debug(lev+2,applid_sec,"Name: `%s' expected, `%s' found",
176 PSICONV_ID_TEXTED,temp_str);
177 free(temp_str);
178 }
179
180 psiconv_progress(lev+2,header->section_table_offset,
181 "Looking for the Page layout section");
182 if (! page_sec) {
183 psiconv_warn(lev+2,header->section_table_offset,
184 "Page layout section not found in the section table");
185 (*result)->page_sec = NULL;
186 res = -1;
187 } else {
188 psiconv_debug(lev+2,header->section_table_offset,
189 "Page layout section at offset %08x",page_sec);
190 res |= psiconv_parse_page_layout_section(buf,lev+2,page_sec,NULL,
191 &(*result)->page_sec);
192 }
193
194 base_char = psiconv_basic_character_layout();
195 base_para = psiconv_basic_paragraph_layout();
196
197 psiconv_progress(lev+2,header->section_table_offset,
198 "Looking for the TextEd section");
199 if (! texted_sec) {
200 psiconv_warn(lev+2,header->section_table_offset,
201 "TextEd section not found in the section table");
202 (*result)->texted_sec = NULL;
203 res = -1;
204 } else {
205 psiconv_debug(lev+2,header->section_table_offset,
206 "TextEd section at offset %08x",texted_sec);
207 res |= psiconv_parse_texted_section(buf,lev+2,texted_sec,NULL,
208 &(*result)->texted_sec,
209 base_char,base_para);
210 }
211 psiconv_free_character_layout(base_char);
212 psiconv_free_paragraph_layout(base_para);
213
214 psiconv_free_application_id_section(appl_id);
215 psiconv_free_header_section(header);
216 psiconv_free_section_table_section(table);
217
218 psiconv_progress(lev+1,off,"End of word file");
219 return res;
220 }
221
222 int psiconv_parse_word_file(const psiconv_buffer buf,int lev, psiconv_u32 off,
223 psiconv_word_f *result)
224 {
225 int res=0;
226 psiconv_header_section header;
227 psiconv_section_table_section table;
228 psiconv_application_id_section appl_id;
229 char *temp_str;
230 psiconv_u32 pwd_sec = 0;
231 psiconv_u32 status_sec = 0;
232 psiconv_u32 styles_sec = 0;
233 psiconv_u32 page_sec = 0;
234 psiconv_u32 text_sec = 0;
235 psiconv_u32 layout_sec = 0;
236 psiconv_u32 applid_sec = 0;
237 psiconv_section_table_entry entry;
238 int i;
239
240 psiconv_progress(lev+1,off,"Going to read a word file");
241 *result = malloc(sizeof(**result));
242
243 psiconv_progress(lev+2,off, "Going to read the header section");
244 res |= psiconv_parse_header_section(buf,lev+2,off,NULL,&header);
245
246 psiconv_progress(lev+2,header->section_table_offset,
247 "Going to read the section table section");
248 res |= psiconv_parse_section_table_section(buf,lev+2,
249 header->section_table_offset,
250 NULL,&table);
251
252 for (i = 0; i < psiconv_list_length(table); i ++) {
253 psiconv_progress(lev+2,header->section_table_offset,
254 "Going to read entry %d",i);
255 entry = psiconv_list_get(table,i);
256 if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
257 applid_sec = entry->offset;
258 psiconv_debug(lev+3,header->section_table_offset,
259 "Found the Application ID section at %08x",applid_sec);
260 } else if (entry->id == PSICONV_ID_PAGE_LAYOUT_SECTION) {
261 page_sec = entry->offset;
262 psiconv_debug(lev+3,header->section_table_offset,
263 "Found the Page Layout section at %08x",page_sec);
264 } else if (entry->id == PSICONV_ID_TEXT_SECTION) {
265 text_sec = entry->offset;
266 psiconv_debug(lev+3,header->section_table_offset,
267 "Found the Text section at %08x",text_sec);
268 } else if (entry->id == PSICONV_ID_PASSWORD_SECTION) {
269 pwd_sec = entry->offset;
270 psiconv_debug(lev+3,header->section_table_offset,
271 "Found the Password section at %08x",pwd_sec);
272 psiconv_warn(lev+3,header->section_table_offset,
273 "Password section found - can't read encrypted data");
274 res = -1;
275 } else if (entry->id == PSICONV_ID_WORD_STATUS_SECTION) {
276 status_sec = entry->offset;
277 psiconv_debug(lev+3,header->section_table_offset,
278 "Found the Word Status section at %08x",status_sec);
279 } else if (entry->id == PSICONV_ID_WORD_STYLES_SECTION) {
280 styles_sec = entry->offset;
281 psiconv_debug(lev+3,header->section_table_offset,
282 "Found the Word Styles section at %08x",styles_sec);
283 } else if (entry->id == PSICONV_ID_LAYOUT_SECTION) {
284 layout_sec = entry->offset;
285 psiconv_debug(lev+3,header->section_table_offset,
286 "Found the Layout section at %08x",layout_sec);
287 } else {
288 psiconv_warn(lev+3,header->section_table_offset,
289 "Found unknown section in the Section Table");
290 psiconv_debug(lev+3,header->section_table_offset,
291 "Section ID %08x, offset %08x",entry->id,entry->offset);
292 res = -1;
293 }
294 }
295
296
297 psiconv_progress(lev+2,header->section_table_offset,
298 "Looking for the Status section");
299 if (!status_sec) {
300 psiconv_warn(lev+2,header->section_table_offset,
301 "Status section not found in the section table");
302 res = -1;
303 } else {
304 psiconv_debug(lev+2,header->section_table_offset,
305 "Status section at offset %08x",status_sec);
306 res |= psiconv_parse_word_status_section(buf,lev+2,status_sec,NULL,
307 &((*result)->status_sec));
308 }
309
310 psiconv_progress(lev+2,header->section_table_offset,
311 "Looking for the Application ID section");
312 if (! applid_sec) {
313 psiconv_warn(lev+2,header->section_table_offset,
314 "Application ID section not found in the section table");
315 res = -1;
316 } else {
317 psiconv_debug(lev+2,header->section_table_offset,
318 "Application ID section at offset %08x",applid_sec);
319 res |= psiconv_parse_application_id_section(buf,lev+2,applid_sec,NULL,
320 &appl_id);
321 }
322 if ((appl_id->id != PSICONV_ID_WORD) ||
323 strcmp(appl_id->name,"Word.app")) {
324 psiconv_warn(lev+2,applid_sec,
325 "Application ID section contains unexpected data");
326 psiconv_debug(lev+2,applid_sec,"ID: %08x expected, %08x found",
327 PSICONV_ID_WORD,appl_id->id);
328 temp_str = psiconv_make_printable(appl_id->name);
329 psiconv_debug(lev+2,applid_sec,"Name: `%s' expected, `%s' found",
330 PSICONV_ID_WORD,temp_str);
331 free(temp_str);
332 }
333
334 psiconv_progress(lev+2,header->section_table_offset,
335 "Looking for the Page layout section");
336 if (! page_sec) {
337 psiconv_warn(lev+2,header->section_table_offset,
338 "Page layout section not found in the section table");
339 (*result)->page_sec = NULL;
340 res = -1;
341 } else {
342 psiconv_debug(lev+2,header->section_table_offset,
343 "Page layout section at offset %08x",page_sec);
344 res |= psiconv_parse_page_layout_section(buf,lev+2,page_sec,NULL,
345 &(*result)->page_sec);
346 }
347
348 psiconv_progress(lev+2,header->section_table_offset,
349 "Looking for the Word Style section");
350 if (!styles_sec) {
351 psiconv_warn(lev+2,header->section_table_offset,
352 "Word styles section not found in the section table");
353 (*result)->styles_sec = NULL;
354 res = -1;
355 } else {
356 psiconv_debug(lev+2,header->section_table_offset,
357 "Word styles section at offset %08x",styles_sec);
358 res |= psiconv_parse_word_styles_section(buf,lev+2,styles_sec,NULL,
359 &(*result)->styles_sec);
360 }
361
362 psiconv_progress(lev+2,header->section_table_offset,
363 "Looking for the Text section");
364 if (!text_sec) {
365 psiconv_warn(lev+2,header->section_table_offset,
366 "Text section not found in the section table");
367 (*result)->paragraphs = NULL;
368 res = -1;
369 } else {
370 psiconv_debug(lev+2,header->section_table_offset,
371 "Text section at offset %08x",text_sec);
372 res |= psiconv_parse_text_section(buf,lev+2,text_sec,NULL,
373 &(*result)->paragraphs);
374 }
375
376 if (((*result)->paragraphs) && ((*result)->styles_sec)) {
377 psiconv_progress(lev+2,header->section_table_offset,
378 "Looking for the Layout section");
379 if (!layout_sec) {
380 psiconv_debug(lev+2,header->section_table_offset,
381 "Layout section not found in the section table");
382 res = -1;
383 } else {
384 psiconv_debug(lev+2,header->section_table_offset,
385 "Layout section at offset %08x",layout_sec);
386 res |= psiconv_parse_styled_layout_section(buf,lev+2,layout_sec,NULL,
387 (*result)->paragraphs,
388 (*result)->styles_sec);
389 }
390 } else
391 psiconv_debug(lev+2,header->section_table_offset,
392 "Skipping search for Layout section, as either the "
393 "text or the word styles section was not found");
394
395 psiconv_free_application_id_section(appl_id);
396 psiconv_free_header_section(header);
397 psiconv_free_section_table_section(table);
398
399 psiconv_progress(lev+1,off,"End of word file");
400 return res;
401 }

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