… | |
… | |
20 | |
20 | |
21 | #include "config.h" |
21 | #include "config.h" |
22 | #include "compat.h" |
22 | #include "compat.h" |
23 | #include <stdio.h> |
23 | #include <stdio.h> |
24 | #include <string.h> |
24 | #include <string.h> |
25 | #include "data.h" |
25 | #include "psiconv/data.h" |
26 | #include "list.h" |
26 | #include "psiconv/list.h" |
27 | #include "gen.h" |
27 | #include "gen.h" |
|
|
28 | #include "psiconv.h" |
|
|
29 | |
|
|
30 | #ifdef DMALLOC |
|
|
31 | #include "dmalloc.h" |
|
|
32 | #endif |
28 | |
33 | |
29 | |
34 | |
30 | /* |
35 | /* |
31 | * Various string tables for RTF settings |
36 | * Various string tables for RTF settings |
32 | */ |
37 | */ |
… | |
… | |
292 | |
297 | |
293 | fprintf(of,"{\\fonttbl"); |
298 | fprintf(of,"{\\fonttbl"); |
294 | for (i = 0; i < psiconv_list_length(fonts); i++) { |
299 | for (i = 0; i < psiconv_list_length(fonts); i++) { |
295 | font = psiconv_list_get(fonts,i); |
300 | font = psiconv_list_get(fonts,i); |
296 | fprintf(of,"{\\f%d",i); |
301 | fprintf(of,"{\\f%d",i); |
297 | if ((*font)->screenfont == 1) |
302 | if ((*font)->screenfont == psiconv_font_sansserif) |
298 | fprintf(of,"\\fswiss"); |
303 | fprintf(of,"\\fswiss"); |
299 | else if ((*font)->screenfont == 2) |
304 | else if ((*font)->screenfont == psiconv_font_nonprop) |
300 | fprintf(of,"\\fmodern"); |
305 | fprintf(of,"\\fmodern"); |
301 | else if ((*font)->screenfont == 3) |
306 | else if ((*font)->screenfont == psiconv_font_serif) |
302 | fprintf(of,"\\froman"); |
307 | fprintf(of,"\\froman"); |
303 | else |
308 | else |
304 | fprintf(of,"\\fnil"); |
309 | fprintf(of,"\\fnil"); |
305 | fprintf(of,"\\cpg1252\\f%s;}",(*font)->name); |
310 | fprintf(of,"\\cpg1252\\f%s;}",(*font)->name); |
306 | } |
311 | } |
… | |
… | |
324 | /* This is not necessarily the same as returned by basic_character_layout_status |
329 | /* This is not necessarily the same as returned by basic_character_layout_status |
325 | This one is specific for the base point of RTF */ |
330 | This one is specific for the base point of RTF */ |
326 | static psiconv_character_layout |
331 | static psiconv_character_layout |
327 | gen_base_char(psiconv_list colors, psiconv_list fonts) |
332 | gen_base_char(psiconv_list colors, psiconv_list fonts) |
328 | { |
333 | { |
329 | struct psiconv_color white = { 0,0,0 }; |
334 | struct psiconv_color_s white = { 0,0,0 }; |
330 | struct psiconv_color black = { 0xff,0xff,0xff }; |
335 | struct psiconv_color_s black = { 0xff,0xff,0xff }; |
331 | struct psiconv_font font = { NULL,-1 }; /* Pseudo - not added! */ |
336 | struct psiconv_font_s font = { NULL,-1 }; /* Pseudo - not added! */ |
332 | |
337 | |
333 | struct psiconv_character_layout base_char_struct = |
338 | struct psiconv_character_layout_s base_char_struct = |
334 | { |
339 | { |
335 | &black, /* color */ |
340 | &black, /* color */ |
336 | &white, /* back_color */ |
341 | &white, /* back_color */ |
337 | 13.0, /* font_size */ |
342 | 13.0, /* font_size */ |
338 | psiconv_bool_false, /* italic */ |
343 | psiconv_bool_false, /* italic */ |
339 | psiconv_bool_false, /* bold */ |
344 | psiconv_bool_false, /* bold */ |
340 | psiconv_normalscript, /* super_sub */ |
345 | psiconv_normalscript, /* super_sub */ |
341 | psiconv_bool_false, /* underline */ |
346 | psiconv_bool_false, /* underline */ |
342 | psiconv_bool_false, /* strike_out */ |
347 | psiconv_bool_false, /* strikethrough */ |
343 | &font, /* font */ |
348 | &font, /* font */ |
344 | }; |
349 | }; |
345 | |
350 | |
346 | font.name = strdup(""); |
351 | font.name = strdup(""); |
347 | add_color(colors,&white); |
352 | add_color(colors,&white); |
… | |
… | |
371 | fprintf(of,"\\b%s",new->bold?"":"0"); |
376 | fprintf(of,"\\b%s",new->bold?"":"0"); |
372 | if (old->italic != new->italic) |
377 | if (old->italic != new->italic) |
373 | fprintf(of,"\\i%s",new->italic?"":"0"); |
378 | fprintf(of,"\\i%s",new->italic?"":"0"); |
374 | if (old->underline != new->underline) |
379 | if (old->underline != new->underline) |
375 | fprintf(of,"\\ul%s",new->underline?"":"0"); |
380 | fprintf(of,"\\ul%s",new->underline?"":"0"); |
376 | if (old->strike_out != new->strike_out) |
381 | if (old->strikethrough != new->strikethrough) |
377 | fprintf(of,"\\strike%s",new->strike_out?"":"0"); |
382 | fprintf(of,"\\strike%s",new->strikethrough?"":"0"); |
378 | if ((old->color->red != new->color->red) || |
383 | if ((old->color->red != new->color->red) || |
379 | (old->color->green != new->color->green) || |
384 | (old->color->green != new->color->green) || |
380 | (old->color->blue != new->color->blue)) |
385 | (old->color->blue != new->color->blue)) |
381 | fprintf(of,"\\cf%d",lookup_color(colors,new->color)); |
386 | fprintf(of,"\\cf%d",lookup_color(colors,new->color)); |
382 | if ((old->back_color->red != new->back_color->red) || |
387 | if ((old->back_color->red != new->back_color->red) || |
… | |
… | |
410 | /* |
415 | /* |
411 | else if (para->justify_hor == psiconv_justify_left) |
416 | else if (para->justify_hor == psiconv_justify_left) |
412 | fprintf(of,"\\ql"); |
417 | fprintf(of,"\\ql"); |
413 | */ |
418 | */ |
414 | } |
419 | } |
415 | if (para->interline != 0.0) |
420 | if (para->linespacing != 0.0) |
416 | fprintf(of,"\\sl%d",(para->interline_exact?-1:1) * |
421 | fprintf(of,"\\sl%d",(para->linespacing_exact?-1:1) * |
417 | length_to_twips(para->interline)); |
422 | length_to_twips(para->linespacing)); |
418 | if (para->top_space != 0.0) |
423 | if (para->space_above != 0.0) |
419 | fprintf(of,"\\sb%d",length_to_twips(para->top_space)); |
424 | fprintf(of,"\\sb%d",length_to_twips(para->space_above)); |
420 | if (para->bottom_space != 0.0) |
425 | if (para->space_below != 0.0) |
421 | fprintf(of,"\\sa%d",length_to_twips(para->bottom_space)); |
426 | fprintf(of,"\\sa%d",length_to_twips(para->space_below)); |
422 | if (para->on_one_page) |
427 | if (para->keep_together) |
423 | fprintf(of,"\\keep"); |
428 | fprintf(of,"\\keep"); |
424 | if (para->together_with) |
429 | if (para->keep_with_next) |
425 | fprintf(of,"\\keepn"); |
430 | fprintf(of,"\\keepn"); |
426 | if (!para->on_next_page) |
431 | if (!para->on_next_page) |
427 | fprintf(of,"pagebb"); |
432 | fprintf(of,"pagebb"); |
428 | if (!para->no_widow_protection) |
433 | if (!para->no_widow_protection) |
429 | fprintf(of,"\\nowidctlpar"); |
434 | fprintf(of,"\\nowidctlpar"); |
… | |
… | |
519 | |
524 | |
520 | psiconv_list_free(fonts); |
525 | psiconv_list_free(fonts); |
521 | psiconv_list_free(colors); |
526 | psiconv_list_free(colors); |
522 | } |
527 | } |
523 | |
528 | |
524 | void psiconv_gen_rtf(FILE * of, psiconv_file file) |
529 | static int psiconv_gen_rtf(const char *filename, const psiconv_file file, |
|
|
530 | const char *dest) |
525 | { |
531 | { |
|
|
532 | FILE *of = fopen(filename,"w"); |
|
|
533 | if (! of) |
|
|
534 | return -1; |
|
|
535 | |
526 | if (file->type == psiconv_word_file) |
536 | if (file->type == psiconv_word_file) { |
527 | psiconv_gen_rtf_word(of,(psiconv_word_f) file->file); |
537 | psiconv_gen_rtf_word(of,(psiconv_word_f) file->file); |
528 | else if (file->type == psiconv_texted_file) |
538 | } else if (file->type == psiconv_texted_file) { |
529 | psiconv_gen_rtf_texted(of,(psiconv_texted_f) file->file); |
539 | psiconv_gen_rtf_texted(of,(psiconv_texted_f) file->file); |
530 | else |
540 | } else { |
|
|
541 | fclose(of); |
531 | return; |
542 | return -1; |
|
|
543 | } |
|
|
544 | return fclose(of); |
532 | } |
545 | } |
533 | |
546 | |
|
|
547 | static struct psiconv_fileformat_s ff = |
|
|
548 | { |
|
|
549 | "RTF", |
|
|
550 | "Rich Text Format (not functional yet!)", |
|
|
551 | psiconv_gen_rtf |
|
|
552 | }; |
|
|
553 | |
|
|
554 | void init_rtf(void) |
|
|
555 | { |
|
|
556 | /* psiconv_list_add(fileformat_list,&ff); */ |
|
|
557 | } |
|
|
558 | |