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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 188 - (show annotations)
Mon Jan 26 12:59:54 2004 UTC (16 years, 6 months ago) by frodo
File MIME type: text/plain
File size: 5970 byte(s)
(Frodo) Oops, forgot about image.c

1 /*
2 generate_word.c - Part of psiconv, a PSION 5 file formats converter
3 Copyright (c) 2000 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 "compat.h"
22
23 #include <stdlib.h>
24
25 #include "generate_routines.h"
26 #include "error.h"
27
28 #ifdef DMALLOC
29 #include <dmalloc.h>
30 #endif
31
32
33 int psiconv_write_word_status_section(const psiconv_config config,
34 psiconv_buffer buf, int lev,
35 psiconv_word_status_section value)
36 {
37 int res;
38
39 psiconv_progress(config,lev,0,"Writing word status section");
40
41 if (!value) {
42 psiconv_error(config,0,psiconv_buffer_length(buf),"Null word status section");
43 return -PSICONV_E_GENERATE;
44 }
45
46 if ((res = psiconv_write_u8(config,buf,lev+1,0x02)))
47 return res;
48 if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_tabs?0x01:0x00) |
49 (value->show_spaces?0x02:0x00) |
50 (value->show_paragraph_ends?0x04:0x00) |
51 (value->show_line_breaks?0x08:0x00) |
52 (value->show_hard_minus?0x20:0x00) |
53 (value->show_hard_space?0x40:0x00))))
54 return res;
55 if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_full_pictures?0x01:0x00) |
56 (value->show_full_graphs?0x02:0x00))))
57 return res;
58 if ((res = psiconv_write_bool(config,buf,lev+1,value->show_top_toolbar)))
59 return res;
60 if ((res = psiconv_write_bool(config,buf,lev+1,value->show_side_toolbar)))
61 return res;
62 if ((res = psiconv_write_u8(config,buf,lev+1,(value->fit_lines_to_screen?0x08:0x00))))
63 return res;
64 if ((res = psiconv_write_u32(config,buf,lev+1,value->cursor_position)))
65 return res;
66 return psiconv_write_u32(config,buf,lev+1,value->display_size);
67 }
68
69 int psiconv_write_word_styles_section(const psiconv_config config,
70 psiconv_buffer buf, int lev,
71 psiconv_word_styles_section value)
72 {
73 int res,i;
74 psiconv_word_style style;
75 psiconv_paragraph_layout basepara;
76 psiconv_character_layout basechar;
77 psiconv_font font;
78
79 psiconv_progress(config,lev,0,"Writing word styles section");
80
81 if (!value || !value->normal || !value->styles) {
82 psiconv_error(config,0,psiconv_buffer_length(buf),"Null word styles section");
83 res = -PSICONV_E_GENERATE;
84 goto ERROR1;
85 }
86
87 if (!(basepara=psiconv_basic_paragraph_layout())) {
88 res = -PSICONV_E_NOMEM;
89 goto ERROR1;
90 }
91
92 if (!(basechar=psiconv_basic_character_layout())) {
93 res = -PSICONV_E_NOMEM;
94 goto ERROR2;
95 }
96
97
98 if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,value->normal->paragraph,
99 basepara)))
100 goto ERROR3;
101 /* Always generate the font for Normal */
102 font = basechar->font;
103 basechar->font = NULL;
104 res = psiconv_write_character_layout_list(config,buf,lev+1,value->normal->character,
105 basechar);
106 basechar->font = font;
107 if (res)
108 goto ERROR3;
109 if ((res = psiconv_write_u32(config,buf,lev+1,psiconv_unicode_to_char(config,value->normal->hotkey))))
110 goto ERROR3;
111 if ((res = psiconv_write_u8(config,buf,lev+1,psiconv_list_length(value->styles))))
112 goto ERROR3;
113
114
115
116 for (i = 0; i < psiconv_list_length(value->styles); i++) {
117 if (!(style = psiconv_list_get(value->styles,i))) {
118 psiconv_error(config,0,psiconv_buffer_length(buf),"Massive memory corruption");
119 res = -PSICONV_E_NOMEM;
120 goto ERROR3;
121 }
122 if ((res = psiconv_write_u32(config,buf,lev+1,psiconv_unicode_to_char(config,style->hotkey))))
123 goto ERROR3;
124 }
125 if ((res = psiconv_write_u8(config,buf,lev+1,psiconv_list_length(value->styles))))
126 goto ERROR3;
127 for (i = 0; i < psiconv_list_length(value->styles); i++) {
128 if (!(style = psiconv_list_get(value->styles,i))) {
129 psiconv_error(config,0,psiconv_buffer_length(buf),"Massive memory corruption");
130 res = -PSICONV_E_NOMEM;
131 goto ERROR3;
132 }
133 if (!style->name) {
134 psiconv_error(config,0,psiconv_buffer_length(buf),"Null style name");
135 res = -PSICONV_E_GENERATE;
136 goto ERROR3;
137 }
138 if ((res = psiconv_write_string(config,buf,lev+1,style->name)))
139 goto ERROR3;
140 if ((res = psiconv_write_u32(config,buf,lev+1,style->built_in?PSICONV_ID_STYLE_BUILT_IN:
141 PSICONV_ID_STYLE_REMOVABLE)))
142 goto ERROR3;
143 if ((res = psiconv_write_u32(config,buf,lev+1,style->outline_level)))
144 goto ERROR3;
145 if ((res = psiconv_write_character_layout_list(config,buf,lev+1,style->character,
146 value->normal->character)))
147 goto ERROR3;
148 if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,style->paragraph,
149 value->normal->paragraph)))
150 goto ERROR3;
151 }
152
153 for (i = 0; i < psiconv_list_length(value->styles); i++)
154 if ((res = psiconv_write_u8(config,buf,lev+1,0xff)))
155 goto ERROR3;
156 res = -PSICONV_E_OK;
157
158 ERROR3:
159 psiconv_free_character_layout(basechar);
160 ERROR2:
161 psiconv_free_paragraph_layout(basepara);
162 ERROR1:
163 return res;
164 }

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