… | |
… | |
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" |
28 | #include "psiconv.h" |
|
|
29 | |
|
|
30 | #ifdef DMALLOC |
|
|
31 | #include "dmalloc.h" |
|
|
32 | #endif |
29 | |
33 | |
30 | |
34 | |
31 | /* |
35 | /* |
32 | * Various string tables for RTF settings |
36 | * Various string tables for RTF settings |
33 | */ |
37 | */ |
… | |
… | |
293 | |
297 | |
294 | fprintf(of,"{\\fonttbl"); |
298 | fprintf(of,"{\\fonttbl"); |
295 | for (i = 0; i < psiconv_list_length(fonts); i++) { |
299 | for (i = 0; i < psiconv_list_length(fonts); i++) { |
296 | font = psiconv_list_get(fonts,i); |
300 | font = psiconv_list_get(fonts,i); |
297 | fprintf(of,"{\\f%d",i); |
301 | fprintf(of,"{\\f%d",i); |
298 | if ((*font)->screenfont == 1) |
302 | if ((*font)->screenfont == psiconv_font_sansserif) |
299 | fprintf(of,"\\fswiss"); |
303 | fprintf(of,"\\fswiss"); |
300 | else if ((*font)->screenfont == 2) |
304 | else if ((*font)->screenfont == psiconv_font_nonprop) |
301 | fprintf(of,"\\fmodern"); |
305 | fprintf(of,"\\fmodern"); |
302 | else if ((*font)->screenfont == 3) |
306 | else if ((*font)->screenfont == psiconv_font_serif) |
303 | fprintf(of,"\\froman"); |
307 | fprintf(of,"\\froman"); |
304 | else |
308 | else |
305 | fprintf(of,"\\fnil"); |
309 | fprintf(of,"\\fnil"); |
306 | fprintf(of,"\\cpg1252\\f%s;}",(*font)->name); |
310 | fprintf(of,"\\cpg1252\\f%s;}",(*font)->name); |
307 | } |
311 | } |
… | |
… | |
325 | /* 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 |
326 | This one is specific for the base point of RTF */ |
330 | This one is specific for the base point of RTF */ |
327 | static psiconv_character_layout |
331 | static psiconv_character_layout |
328 | gen_base_char(psiconv_list colors, psiconv_list fonts) |
332 | gen_base_char(psiconv_list colors, psiconv_list fonts) |
329 | { |
333 | { |
330 | struct psiconv_color white = { 0,0,0 }; |
334 | struct psiconv_color_s white = { 0,0,0 }; |
331 | struct psiconv_color black = { 0xff,0xff,0xff }; |
335 | struct psiconv_color_s black = { 0xff,0xff,0xff }; |
332 | struct psiconv_font font = { NULL,-1 }; /* Pseudo - not added! */ |
336 | struct psiconv_font_s font = { NULL,-1 }; /* Pseudo - not added! */ |
333 | |
337 | |
334 | struct psiconv_character_layout base_char_struct = |
338 | struct psiconv_character_layout_s base_char_struct = |
335 | { |
339 | { |
336 | &black, /* color */ |
340 | &black, /* color */ |
337 | &white, /* back_color */ |
341 | &white, /* back_color */ |
338 | 13.0, /* font_size */ |
342 | 13.0, /* font_size */ |
339 | psiconv_bool_false, /* italic */ |
343 | psiconv_bool_false, /* italic */ |
340 | psiconv_bool_false, /* bold */ |
344 | psiconv_bool_false, /* bold */ |
341 | psiconv_normalscript, /* super_sub */ |
345 | psiconv_normalscript, /* super_sub */ |
342 | psiconv_bool_false, /* underline */ |
346 | psiconv_bool_false, /* underline */ |
343 | psiconv_bool_false, /* strike_out */ |
347 | psiconv_bool_false, /* strikethrough */ |
344 | &font, /* font */ |
348 | &font, /* font */ |
345 | }; |
349 | }; |
346 | |
350 | |
347 | font.name = strdup(""); |
351 | font.name = strdup(""); |
348 | add_color(colors,&white); |
352 | add_color(colors,&white); |
… | |
… | |
372 | fprintf(of,"\\b%s",new->bold?"":"0"); |
376 | fprintf(of,"\\b%s",new->bold?"":"0"); |
373 | if (old->italic != new->italic) |
377 | if (old->italic != new->italic) |
374 | fprintf(of,"\\i%s",new->italic?"":"0"); |
378 | fprintf(of,"\\i%s",new->italic?"":"0"); |
375 | if (old->underline != new->underline) |
379 | if (old->underline != new->underline) |
376 | fprintf(of,"\\ul%s",new->underline?"":"0"); |
380 | fprintf(of,"\\ul%s",new->underline?"":"0"); |
377 | if (old->strike_out != new->strike_out) |
381 | if (old->strikethrough != new->strikethrough) |
378 | fprintf(of,"\\strike%s",new->strike_out?"":"0"); |
382 | fprintf(of,"\\strike%s",new->strikethrough?"":"0"); |
379 | if ((old->color->red != new->color->red) || |
383 | if ((old->color->red != new->color->red) || |
380 | (old->color->green != new->color->green) || |
384 | (old->color->green != new->color->green) || |
381 | (old->color->blue != new->color->blue)) |
385 | (old->color->blue != new->color->blue)) |
382 | fprintf(of,"\\cf%d",lookup_color(colors,new->color)); |
386 | fprintf(of,"\\cf%d",lookup_color(colors,new->color)); |
383 | if ((old->back_color->red != new->back_color->red) || |
387 | if ((old->back_color->red != new->back_color->red) || |
… | |
… | |
411 | /* |
415 | /* |
412 | else if (para->justify_hor == psiconv_justify_left) |
416 | else if (para->justify_hor == psiconv_justify_left) |
413 | fprintf(of,"\\ql"); |
417 | fprintf(of,"\\ql"); |
414 | */ |
418 | */ |
415 | } |
419 | } |
416 | if (para->interline != 0.0) |
420 | if (para->linespacing != 0.0) |
417 | fprintf(of,"\\sl%d",(para->interline_exact?-1:1) * |
421 | fprintf(of,"\\sl%d",(para->linespacing_exact?-1:1) * |
418 | length_to_twips(para->interline)); |
422 | length_to_twips(para->linespacing)); |
419 | if (para->top_space != 0.0) |
423 | if (para->space_above != 0.0) |
420 | fprintf(of,"\\sb%d",length_to_twips(para->top_space)); |
424 | fprintf(of,"\\sb%d",length_to_twips(para->space_above)); |
421 | if (para->bottom_space != 0.0) |
425 | if (para->space_below != 0.0) |
422 | fprintf(of,"\\sa%d",length_to_twips(para->bottom_space)); |
426 | fprintf(of,"\\sa%d",length_to_twips(para->space_below)); |
423 | if (para->on_one_page) |
427 | if (para->keep_together) |
424 | fprintf(of,"\\keep"); |
428 | fprintf(of,"\\keep"); |
425 | if (para->together_with) |
429 | if (para->keep_with_next) |
426 | fprintf(of,"\\keepn"); |
430 | fprintf(of,"\\keepn"); |
427 | if (!para->on_next_page) |
431 | if (!para->on_next_page) |
428 | fprintf(of,"pagebb"); |
432 | fprintf(of,"pagebb"); |
429 | if (!para->no_widow_protection) |
433 | if (!para->no_widow_protection) |
430 | fprintf(of,"\\nowidctlpar"); |
434 | fprintf(of,"\\nowidctlpar"); |
… | |
… | |
538 | return -1; |
542 | return -1; |
539 | } |
543 | } |
540 | return fclose(of); |
544 | return fclose(of); |
541 | } |
545 | } |
542 | |
546 | |
543 | static struct psiconv_fileformat ff = |
547 | static struct psiconv_fileformat_s ff = |
544 | { |
548 | { |
545 | "RTF", |
549 | "RTF", |
546 | "Rich Text Format (not functional yet!)", |
550 | "Rich Text Format (not functional yet!)", |
547 | psiconv_gen_rtf |
551 | psiconv_gen_rtf |
548 | }; |
552 | }; |