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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 12 - (hide 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 frodo 2 /*
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 frodo 12 else if ((*result)->type == psiconv_mbm_file)
58     res = psiconv_parse_mbm_file(buf,lev+2,off,
59     (psiconv_mbm_f *)(&((*result)->file)));
60 frodo 2 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 frodo 12 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 frodo 2 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