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

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

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

Revision 80 Revision 231
1/* 1/*
2 generate_driver.c - Part of psiconv, a PSION 5 file formats converter 2 generate_driver.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 2000 Frodo Looijaard <frodol@dds.nl> 3 Copyright (c) 2000-2004 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.
… …
23#include <stdlib.h> 23#include <stdlib.h>
24 24
25#include "error.h" 25#include "error.h"
26#include "generate_routines.h" 26#include "generate_routines.h"
27 27
28#ifdef DMALLOC
29#include <dmalloc.h>
30#endif
28 31
29int psiconv_write(psiconv_buffer *buf,const psiconv_file value) 32static psiconv_ucs2 unicode_paint[10] = { 'P','a','i','n','t','.','a','p','p',0 };
33static psiconv_ucs2 unicode_texted[11] ={ 'T','e','x','t','E','d','.','a','p','p',0 };
34static psiconv_ucs2 unicode_word[9] = { 'W','o','r','d','.','a','p','p',0 };
35
36
37int psiconv_write(const psiconv_config config, psiconv_buffer *buf,
38 const psiconv_file value)
30{ 39{
31 int res; 40 int res;
41 int lev = 0;
32 42
33 if (!value) { 43 if (!value) {
34 psiconv_warn(0,0,"Can't parse to an empty buffer!"); 44 psiconv_error(config,0,0,"Can't parse to an empty buffer!");
35 return -PSICONV_E_OTHER; 45 return -PSICONV_E_OTHER;
36 } 46 }
37 if (!(*buf = psiconv_buffer_new())) 47 if (!(*buf = psiconv_buffer_new()))
38 return -PSICONV_E_NOMEM; 48 return -PSICONV_E_NOMEM;
39 49
40#if 0
41 if (value->type == psiconv_word_file) { 50 if (value->type == psiconv_word_file) {
51 if ((res = psiconv_write_header_section(config,*buf,lev+1,PSICONV_ID_PSION5,
52 PSICONV_ID_DATA_FILE,
53 PSICONV_ID_WORD)))
54 goto ERROR;
42 if ((res =psiconv_write_word_file(*buf,(psiconv_word_f) (value->file)))) 55 if ((res =psiconv_write_word_file(config,*buf,lev+1,(psiconv_word_f) (value->file))))
43 goto ERROR; 56 goto ERROR;
44 } else
45#endif
46 if (value->type == psiconv_texted_file) { 57 } else if (value->type == psiconv_texted_file) {
58 if ((res = psiconv_write_header_section(config,*buf,lev+1,PSICONV_ID_PSION5,
59 PSICONV_ID_DATA_FILE,
60 PSICONV_ID_TEXTED)))
61 goto ERROR;
47 if ((res =psiconv_write_texted_file(*buf, 62 if ((res =psiconv_write_texted_file(config,*buf,lev+1,
48 (psiconv_texted_f) (value->file)))) 63 (psiconv_texted_f) (value->file))))
49 goto ERROR; 64 goto ERROR;
50#if 0
51 } else if (value->type == psiconv_sketch_file) { 65 } else if (value->type == psiconv_sketch_file) {
66 if ((res = psiconv_write_header_section(config,*buf,lev+1,PSICONV_ID_PSION5,
67 PSICONV_ID_DATA_FILE,
68 PSICONV_ID_SKETCH)))
69 goto ERROR;
52 if ((res =psiconv_write_sketch_file(*buf, 70 if ((res =psiconv_write_sketch_file(config,*buf,lev+1,
53 (psiconv_sketch_f) (value->file)))) 71 (psiconv_sketch_f) (value->file))))
54 goto ERROR; 72 goto ERROR;
55 } else if (value->type == psiconv_mbm_file) { 73 } else if (value->type == psiconv_mbm_file) {
74 if ((res = psiconv_write_header_section(config,*buf,lev+1,PSICONV_ID_PSION5,
75 PSICONV_ID_MBM_FILE,
76 0x00000000)))
77 goto ERROR;
56 if ((res =psiconv_write_mbm_file(*buf, 78 if ((res =psiconv_write_mbm_file(config,*buf,lev+1,
57 (psiconv_mbm_f) (value->file)))) 79 (psiconv_mbm_f) (value->file))))
58 goto ERROR; 80 goto ERROR;
59 } else if (value->type == psiconv_clipart_file) { 81 } else if (value->type == psiconv_clipart_file) {
82 /* No complete header section, so we do it all in the below function */
60 if ((res =psiconv_write_clipart_file(*buf, 83 if ((res =psiconv_write_clipart_file(config,*buf,lev+1,
61 (psiconv_clipart_f) (value->file)))) 84 (psiconv_clipart_f) (value->file))))
62 goto ERROR; 85 goto ERROR;
63#endif
64 } else { 86 } else {
65 psiconv_warn(0,0,"Unknown or unsupported file type"); 87 psiconv_error(config,0,0,"Unknown or unsupported file type");
66 res = -PSICONV_E_GENERATE; 88 res = -PSICONV_E_GENERATE;
67 goto ERROR; 89 goto ERROR;
68 } 90 }
69 if ((res = psiconv_buffer_resolve(*buf))) 91 if ((res = psiconv_buffer_resolve(*buf)))
70 goto ERROR; 92 goto ERROR;
… …
73ERROR: 95ERROR:
74 psiconv_buffer_free(*buf); 96 psiconv_buffer_free(*buf);
75 return res; 97 return res;
76} 98}
77 99
78int psiconv_write_texted_file(psiconv_buffer buf,psiconv_texted_f value) 100int psiconv_write_texted_file(const psiconv_config config,
101 psiconv_buffer buf,int lev,psiconv_texted_f value)
79{ 102{
80 psiconv_character_layout base_char; 103 psiconv_character_layout base_char;
81 psiconv_paragraph_layout base_para; 104 psiconv_paragraph_layout base_para;
82 int res; 105 int res;
83 psiconv_section_table_section section_table; 106 psiconv_section_table_section section_table;
84 psiconv_section_table_entry entry; 107 psiconv_section_table_entry entry;
85 psiconv_u32 section_table_id; 108 psiconv_u32 section_table_id;
86 psiconv_buffer buf_texted; 109 psiconv_buffer buf_texted;
87 110
111 psiconv_progress(config,lev,0,"Writing texted file");
88 if (!value) { 112 if (!value) {
89 psiconv_warn(0,0,"Null TextEd file"); 113 psiconv_error(config,lev,0,"Null TextEd file");
90 return -PSICONV_E_GENERATE; 114 res = -PSICONV_E_GENERATE;
115 goto ERROR1;
91 } 116 }
92 117
93 if (!(section_table = psiconv_list_new(sizeof(*entry)))) { 118 if (!(section_table = psiconv_list_new(sizeof(*entry)))) {
94 res = -PSICONV_E_NOMEM; 119 res = -PSICONV_E_NOMEM;
95 goto ERROR1; 120 goto ERROR1;
… …
107 if (!(base_para = psiconv_basic_paragraph_layout())) { 132 if (!(base_para = psiconv_basic_paragraph_layout())) {
108 res = -PSICONV_E_NOMEM; 133 res = -PSICONV_E_NOMEM;
109 goto ERROR4; 134 goto ERROR4;
110 } 135 }
111 136
112 if ((res = psiconv_write_header_section(buf,PSICONV_ID_PSION5,
113 PSICONV_ID_DATA_FILE,
114 PSICONV_ID_TEXTED)))
115 goto ERROR5;
116
117 section_table_id = psiconv_buffer_unique_id(); 137 section_table_id = psiconv_buffer_unique_id();
118 if ((res = psiconv_write_offset(buf,section_table_id))) 138 if ((res = psiconv_write_offset(config,buf,lev+1,section_table_id)))
119 goto ERROR5; 139 goto ERROR5;
120 140
121 entry->id = PSICONV_ID_APPL_ID_SECTION; 141 entry->id = PSICONV_ID_APPL_ID_SECTION;
122 entry->offset = psiconv_buffer_unique_id(); 142 entry->offset = psiconv_buffer_unique_id();
123 if ((res = psiconv_list_add(section_table,entry))) 143 if ((res = psiconv_list_add(section_table,entry)))
124 goto ERROR5; 144 goto ERROR5;
125 if ((res = psiconv_buffer_add_target(buf,entry->offset))) 145 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
126 goto ERROR5; 146 goto ERROR5;
127 if ((res=psiconv_write_application_id_section(buf, 147 if ((res=psiconv_write_application_id_section(config,buf,lev+1,
128 PSICONV_ID_TEXTED,"TextEd.app"))) 148 PSICONV_ID_TEXTED,unicode_texted)))
129 goto ERROR5; 149 goto ERROR5;
130 150
131 entry->id = PSICONV_ID_PAGE_LAYOUT_SECTION; 151 entry->id = PSICONV_ID_PAGE_LAYOUT_SECTION;
132 entry->offset = psiconv_buffer_unique_id(); 152 entry->offset = psiconv_buffer_unique_id();
133 if ((res = psiconv_list_add(section_table,entry))) 153 if ((res = psiconv_list_add(section_table,entry)))
134 goto ERROR5; 154 goto ERROR5;
135 if ((res = psiconv_buffer_add_target(buf,entry->offset))) 155 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
136 goto ERROR5; 156 goto ERROR5;
137 if ((res = psiconv_write_page_layout_section(buf,value->page_sec))) 157 if ((res = psiconv_write_page_layout_section(config,buf,lev+1,value->page_sec)))
138 goto ERROR5; 158 goto ERROR5;
139 159
140 entry->id = PSICONV_ID_TEXTED; 160 entry->id = PSICONV_ID_TEXTED;
141 entry->offset = psiconv_buffer_unique_id(); 161 entry->offset = psiconv_buffer_unique_id();
142 if ((res = psiconv_list_add(section_table,entry))) 162 if ((res = psiconv_list_add(section_table,entry)))
143 goto ERROR5; 163 goto ERROR5;
144 if ((res = psiconv_buffer_add_target(buf,entry->offset))) 164 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
145 goto ERROR5; 165 goto ERROR5;
146 if ((res = psiconv_write_texted_section(buf,value->texted_sec, 166 if ((res = psiconv_write_texted_section(config,buf,lev+1,value->texted_sec,
147 base_char,base_para,&buf_texted))) 167 base_char,base_para,&buf_texted)))
148 goto ERROR5; 168 goto ERROR5;
149 169
150 if ((res = psiconv_buffer_concat(buf,buf_texted))) 170 if ((res = psiconv_buffer_concat(buf,buf_texted)))
151 goto ERROR6; 171 goto ERROR6;
152 172
153 173
154 if ((res = psiconv_buffer_add_target(buf,section_table_id))) 174 if ((res = psiconv_buffer_add_target(buf,section_table_id)))
155 goto ERROR6; 175 goto ERROR6;
156 176
157 res = psiconv_write_section_table_section(buf,section_table); 177 res = psiconv_write_section_table_section(config,buf,lev+1,section_table);
158 178
159ERROR6: 179ERROR6:
160 psiconv_buffer_free(buf_texted); 180 psiconv_buffer_free(buf_texted);
161ERROR5: 181ERROR5:
162 psiconv_free_paragraph_layout(base_para); 182 psiconv_free_paragraph_layout(base_para);
… …
165ERROR3: 185ERROR3:
166 free(entry); 186 free(entry);
167ERROR2: 187ERROR2:
168 psiconv_list_free(section_table); 188 psiconv_list_free(section_table);
169ERROR1: 189ERROR1:
190 if (res)
191 psiconv_error(config,lev,0,"Writing of texted file failed");
192 else
193 psiconv_progress(config,lev,0,"End of texted file");
170 return res; 194 return res;
171} 195}
196
197int psiconv_write_word_file(const psiconv_config config,
198 psiconv_buffer buf,int lev,psiconv_word_f value)
199{
200 int res;
201 psiconv_section_table_section section_table;
202 psiconv_section_table_entry entry;
203 psiconv_u32 section_table_id;
204
205 psiconv_progress(config,lev,0,"Writing word file");
206 if (!value) {
207 psiconv_error(config,lev,0,"Null Word file");
208 res = -PSICONV_E_GENERATE;
209 goto ERROR1;
210 }
211
212 if (!(section_table = psiconv_list_new(sizeof(*entry)))) {
213 res = -PSICONV_E_NOMEM;
214 goto ERROR1;
215 }
216
217 if (!(entry = malloc(sizeof(*entry)))) {
218 res = -PSICONV_E_NOMEM;
219 goto ERROR2;
220 }
221
222 section_table_id = psiconv_buffer_unique_id();
223 if ((res = psiconv_write_offset(config,buf,lev+1,section_table_id)))
224 goto ERROR3;
225
226 entry->id = PSICONV_ID_APPL_ID_SECTION;
227 entry->offset = psiconv_buffer_unique_id();
228 if ((res = psiconv_list_add(section_table,entry)))
229 goto ERROR3;
230 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
231 goto ERROR3;
232 if ((res=psiconv_write_application_id_section(config,buf,lev+1,
233 PSICONV_ID_WORD,unicode_word)))
234 goto ERROR3;
235
236 entry->id = PSICONV_ID_WORD_STATUS_SECTION;
237 entry->offset = psiconv_buffer_unique_id();
238 if ((res = psiconv_list_add(section_table,entry)))
239 goto ERROR3;
240 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
241 goto ERROR3;
242 if ((res = psiconv_write_word_status_section(config,buf,lev+1,value->status_sec)))
243 goto ERROR3;
244
245 entry->id = PSICONV_ID_PAGE_LAYOUT_SECTION;
246 entry->offset = psiconv_buffer_unique_id();
247 if ((res = psiconv_list_add(section_table,entry)))
248 goto ERROR3;
249 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
250 goto ERROR3;
251 if ((res = psiconv_write_page_layout_section(config,buf,lev+1,value->page_sec)))
252 goto ERROR3;
253
254 entry->id = PSICONV_ID_WORD_STYLES_SECTION;
255 entry->offset = psiconv_buffer_unique_id();
256 if ((res = psiconv_list_add(section_table,entry)))
257 goto ERROR3;
258 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
259 goto ERROR3;
260 if ((res = psiconv_write_word_styles_section(config,buf,lev+1,value->styles_sec)))
261 goto ERROR3;
262
263 entry->id = PSICONV_ID_TEXT_SECTION;
264 entry->offset = psiconv_buffer_unique_id();
265 if ((res = psiconv_list_add(section_table,entry)))
266 goto ERROR3;
267 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
268 goto ERROR3;
269 if ((res = psiconv_write_text_section(config,buf,lev+1,value->paragraphs)))
270 goto ERROR3;
271
272 entry->id = PSICONV_ID_LAYOUT_SECTION;
273 entry->offset = psiconv_buffer_unique_id();
274 if ((res = psiconv_list_add(section_table,entry)))
275 goto ERROR3;
276 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
277 goto ERROR3;
278 if ((res = psiconv_write_styled_layout_section(config,buf,lev+1,value->paragraphs,
279 value->styles_sec)))
280 goto ERROR3;
281
282 if ((res = psiconv_buffer_add_target(buf,section_table_id)))
283 goto ERROR3;
284
285 res = psiconv_write_section_table_section(config,buf,lev+1,section_table);
286
287ERROR3:
288 free(entry);
289ERROR2:
290 psiconv_list_free(section_table);
291ERROR1:
292 if (res)
293 psiconv_error(config,lev,0,"Writing of word file failed");
294 else
295 psiconv_progress(config,lev,0,"End of word file");
296 return res;
297}
298
299int psiconv_write_sketch_file(const psiconv_config config,
300 psiconv_buffer buf,int lev,psiconv_sketch_f value)
301{
302 int res;
303 psiconv_section_table_section section_table;
304 psiconv_section_table_entry entry;
305 psiconv_u32 section_table_id;
306
307 psiconv_progress(config,lev,0,"Writing sketch file");
308 if (!value) {
309 psiconv_error(config,lev,0,"Null Sketch file");
310 res = -PSICONV_E_GENERATE;
311 goto ERROR1;
312 }
313
314 if (!(section_table = psiconv_list_new(sizeof(*entry)))) {
315 res = -PSICONV_E_NOMEM;
316 goto ERROR1;
317 }
318
319 if (!(entry = malloc(sizeof(*entry)))) {
320 res = -PSICONV_E_NOMEM;
321 goto ERROR2;
322 }
323
324 section_table_id = psiconv_buffer_unique_id();
325 if ((res = psiconv_write_offset(config,buf,lev+1,section_table_id)))
326 goto ERROR3;
327
328 entry->id = PSICONV_ID_APPL_ID_SECTION;
329 entry->offset = psiconv_buffer_unique_id();
330 if ((res = psiconv_list_add(section_table,entry)))
331 goto ERROR3;
332 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
333 goto ERROR3;
334 if ((res=psiconv_write_application_id_section(config,buf,lev+1,
335 PSICONV_ID_SKETCH,unicode_paint)))
336 goto ERROR3;
337
338 entry->id = PSICONV_ID_SKETCH_SECTION;
339 entry->offset = psiconv_buffer_unique_id();
340 if ((res = psiconv_list_add(section_table,entry)))
341 goto ERROR3;
342 if ((res = psiconv_buffer_add_target(buf,entry->offset)))
343 goto ERROR3;
344 if ((res = psiconv_write_sketch_section(config,buf,lev+1,value->sketch_sec)))
345 goto ERROR3;
346
347 if ((res = psiconv_buffer_add_target(buf,section_table_id)))
348 goto ERROR3;
349 res = psiconv_write_section_table_section(config,buf,lev+1,section_table);
350
351ERROR3:
352 free(entry);
353ERROR2:
354 psiconv_list_free(section_table);
355ERROR1:
356 if (res)
357 psiconv_error(config,lev,0,"Writing of sketch file failed");
358 else
359 psiconv_progress(config,lev,0,"End of sketch file");
360 return res;
361}
362
363int psiconv_write_mbm_file(const psiconv_config config,
364 psiconv_buffer buf,int lev,psiconv_mbm_f value)
365{
366 int res,i;
367 psiconv_jumptable_section jumptable;
368 psiconv_u32 *entry,id,table_id;
369 psiconv_paint_data_section section;
370
371 psiconv_progress(config,lev,0,"Writing mbm file");
372 if (!value) {
373 psiconv_error(config,lev,0,"Null MBM file");
374 res = -PSICONV_E_GENERATE;
375 goto ERROR1;
376 }
377
378 if (!(jumptable = psiconv_list_new(sizeof(*entry)))) {
379 res = -PSICONV_E_NOMEM;
380 goto ERROR1;
381 }
382
383 table_id = psiconv_buffer_unique_id();
384 if ((res = psiconv_buffer_add_reference(buf,table_id)))
385 goto ERROR2;
386
387 for (i = 0; i < psiconv_list_length(value->sections); i++) {
388 if (!(section = psiconv_list_get(value->sections,i))) {
389 psiconv_error(config,lev,0,"Massive memory corruption");
390 res = -PSICONV_E_NOMEM;
391 goto ERROR2;
392 }
393 id = psiconv_buffer_unique_id();
394 psiconv_list_add(jumptable,&id);
395 if ((res = psiconv_buffer_add_target(buf,id)))
396 goto ERROR2;
397 if ((res = psiconv_write_paint_data_section(config,buf,lev+1,section,0)))
398 goto ERROR2;
399 }
400
401 if ((res = psiconv_buffer_add_target(buf,table_id)))
402 goto ERROR2;
403 if ((res = psiconv_write_jumptable_section(config,buf,lev+1,jumptable)))
404 goto ERROR2;
405
406
407ERROR2:
408 psiconv_list_free(jumptable);
409ERROR1:
410 if (res)
411 psiconv_error(config,lev,0,"Writing of mbm file failed");
412 else
413 psiconv_progress(config,lev,0,"End of mbm file");
414 return res;
415}
416
417/* Note: this file is special, because it does not have a complete header! */
418int psiconv_write_clipart_file(const psiconv_config config,
419 psiconv_buffer buf,int lev,psiconv_clipart_f value)
420{
421 int res,i;
422 psiconv_jumptable_section jumptable;
423 psiconv_u32 *entry,id;
424 psiconv_clipart_section section;
425 psiconv_buffer sec_buf;
426
427 psiconv_progress(config,lev,0,"Writing clipart file");
428 if (!value) {
429 psiconv_error(config,lev,0,"Null Clipart file");
430 res = -PSICONV_E_GENERATE;
431 goto ERROR1;
432 }
433
434 if (!(jumptable = psiconv_list_new(sizeof(*entry)))) {
435 res = -PSICONV_E_NOMEM;
436 goto ERROR1;
437 }
438
439 if (!(sec_buf = psiconv_buffer_new())) {
440 res = -PSICONV_E_NOMEM;
441 goto ERROR2;
442 }
443
444 if ((res = psiconv_write_u32(config,buf,lev+1,PSICONV_ID_CLIPART)))
445 goto ERROR3;
446
447 for (i = 0; i < psiconv_list_length(value->sections); i++) {
448 if (!(section = psiconv_list_get(value->sections,i))) {
449 psiconv_error(config,lev,0,"Massive memory corruption");
450 res = -PSICONV_E_NOMEM;
451 goto ERROR3;
452 }
453 id = psiconv_buffer_unique_id();
454 psiconv_list_add(jumptable,&id);
455 if ((res = psiconv_buffer_add_target(sec_buf,id)))
456 goto ERROR3;
457 if ((res = psiconv_write_clipart_section(config,sec_buf, lev+1,section)))
458 goto ERROR3;
459 }
460
461 if ((res = psiconv_write_jumptable_section(config,buf,lev+1,jumptable)))
462 goto ERROR3;
463
464 if ((res = psiconv_buffer_concat(buf,sec_buf)))
465 goto ERROR3;
466
467
468ERROR3:
469 psiconv_buffer_free(sec_buf);
470ERROR2:
471 psiconv_list_free(jumptable);
472ERROR1:
473 if (res)
474 psiconv_error(config,lev,0,"Writing of clipart file failed");
475 else
476 psiconv_progress(config,lev,0,"End of clipart file");
477 return res;
478}
Legend:
Removed from v.80  
changed lines
  Added in v.231
frodo@frodo.looijaard.name
 ViewVC Help
Powered by ViewVC 1.1.26