1 | /* |
1 | /* |
2 | parse_word.c - Part of psiconv, a PSION 5 file formats converter |
2 | parse_word.c - Part of psiconv, a PSION 5 file formats converter |
3 | Copyright (c) 1999, 2000 Frodo Looijaard <frodol@dds.nl> |
3 | Copyright (c) 1999-2005 Frodo Looijaard <frodo@frodo.looijaard.name> |
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. |
… | |
… | |
16 | along with this program; if not, write to the Free Software |
16 | along with this program; if not, write to the Free Software |
17 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
17 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
18 | */ |
18 | */ |
19 | |
19 | |
20 | #include "config.h" |
20 | #include "config.h" |
|
|
21 | #include "compat.h" |
|
|
22 | |
21 | #include <stdlib.h> |
23 | #include <stdlib.h> |
|
|
24 | |
22 | #include "parse_routines.h" |
25 | #include "parse_routines.h" |
|
|
26 | #include "error.h" |
23 | |
27 | |
|
|
28 | #ifdef DMALLOC |
|
|
29 | #include <dmalloc.h> |
|
|
30 | #endif |
|
|
31 | |
24 | int psiconv_parse_word_status_section(const psiconv_buffer buf, int lev, |
32 | int psiconv_parse_word_status_section(const psiconv_config config, |
|
|
33 | const psiconv_buffer buf, int lev, |
25 | psiconv_u32 off, int *length, |
34 | psiconv_u32 off, int *length, |
26 | psiconv_word_status_section *result) |
35 | psiconv_word_status_section *result) |
27 | { |
36 | { |
28 | int res=0; |
37 | int res=0; |
29 | int len=0; |
38 | int len=0; |
30 | psiconv_u32 temp; |
39 | psiconv_u32 temp; |
31 | int leng; |
40 | int leng; |
32 | |
41 | |
33 | psiconv_progress(lev+1,off,"Going to read the word status section"); |
42 | psiconv_progress(config,lev+1,off,"Going to read the word status section"); |
34 | if (!(*result = malloc(sizeof(**result)))) |
43 | if (!(*result = malloc(sizeof(**result)))) |
35 | goto ERROR1; |
44 | goto ERROR1; |
36 | |
45 | |
37 | psiconv_progress(lev+2,off+len, |
46 | psiconv_progress(config,lev+2,off+len, |
38 | "Going to read the initial byte (%02x expected)",0x02); |
47 | "Going to read the initial byte (%02x expected)",0x02); |
39 | temp = psiconv_read_u8(buf,lev+2,off+len,&res); |
48 | temp = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
40 | if (res) |
49 | if (res) |
41 | goto ERROR2; |
50 | goto ERROR2; |
42 | if (temp != 0x02) { |
51 | if (temp != 0x02) { |
43 | psiconv_warn(lev+2,off+len, |
52 | psiconv_warn(config,lev+2,off+len, |
44 | "Word status section initial byte unknown value (ignored)"); |
53 | "Word status section initial byte unknown value (ignored)"); |
45 | psiconv_debug(lev+2,off+len,"Initial byte: %02x",temp); |
54 | psiconv_debug(config,lev+2,off+len,"Initial byte: %02x",temp); |
46 | } |
55 | } |
47 | len ++; |
56 | len ++; |
48 | |
57 | |
49 | psiconv_progress(lev+2,off+len, |
58 | psiconv_progress(config,lev+2,off+len, |
50 | "Going to read the first byte of display flags"); |
59 | "Going to read the first byte of display flags"); |
51 | temp = psiconv_read_u8(buf,lev+2,off+len,&res); |
60 | temp = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
52 | if (res) |
61 | if (res) |
53 | goto ERROR2; |
62 | goto ERROR2; |
54 | |
63 | |
55 | (*result)->show_tabs = temp&0x01 ? psiconv_bool_true : psiconv_bool_false; |
64 | (*result)->show_tabs = temp&0x01 ? psiconv_bool_true : psiconv_bool_false; |
56 | psiconv_debug(lev+2,off+len,"Show tabs: %02x",(*result)->show_tabs); |
65 | psiconv_debug(config,lev+2,off+len,"Show tabs: %02x",(*result)->show_tabs); |
57 | (*result)->show_spaces = temp&0x02 ? psiconv_bool_true : psiconv_bool_false; |
66 | (*result)->show_spaces = temp&0x02 ? psiconv_bool_true : psiconv_bool_false; |
58 | psiconv_debug(lev+2,off+len,"Show spaces: %02x",(*result)->show_spaces); |
67 | psiconv_debug(config,lev+2,off+len,"Show spaces: %02x",(*result)->show_spaces); |
59 | (*result)->show_paragraph_ends = temp &0x04 ? psiconv_bool_true : |
68 | (*result)->show_paragraph_ends = temp &0x04 ? psiconv_bool_true : |
60 | psiconv_bool_false; |
69 | psiconv_bool_false; |
61 | psiconv_debug(lev+2,off+len,"Show paragraph ends: %02x", |
70 | psiconv_debug(config,lev+2,off+len,"Show paragraph ends: %02x", |
62 | (*result)->show_paragraph_ends); |
71 | (*result)->show_paragraph_ends); |
63 | (*result)->show_line_breaks = temp & 0x08 ? psiconv_bool_true : |
72 | (*result)->show_line_breaks = temp & 0x08 ? psiconv_bool_true : |
64 | psiconv_bool_false; |
73 | psiconv_bool_false; |
65 | psiconv_debug(lev+2,off+len,"Show line breaks: %02x", |
74 | psiconv_debug(config,lev+2,off+len,"Show line breaks: %02x", |
66 | (*result)->show_line_breaks); |
75 | (*result)->show_line_breaks); |
67 | (*result)->show_hard_minus = temp & 0x20 ? psiconv_bool_true : |
76 | (*result)->show_hard_minus = temp & 0x20 ? psiconv_bool_true : |
68 | psiconv_bool_false; |
77 | psiconv_bool_false; |
69 | psiconv_debug(lev+2,off+len,"Show hard minus: %02x", |
78 | psiconv_debug(config,lev+2,off+len,"Show hard minus: %02x", |
70 | (*result)->show_hard_minus); |
79 | (*result)->show_hard_minus); |
71 | (*result)->show_hard_space = temp & 0x40 ? psiconv_bool_true : |
80 | (*result)->show_hard_space = temp & 0x40 ? psiconv_bool_true : |
72 | psiconv_bool_false; |
81 | psiconv_bool_false; |
73 | psiconv_debug(lev+2,off+len,"Show hard space: %02x", |
82 | psiconv_debug(config,lev+2,off+len,"Show hard space: %02x", |
74 | (*result)->show_hard_space); |
83 | (*result)->show_hard_space); |
75 | if (temp & 0x90) { |
84 | if (temp & 0x90) { |
76 | psiconv_warn(lev+2,off+len,"Word status section first byte of display " |
85 | psiconv_warn(config,lev+2,off+len,"Word status section first byte of display " |
77 | "flags contains unknown flags (ignored)"); |
86 | "flags contains unknown flags (ignored)"); |
78 | psiconv_debug(lev+2,off+len,"Unknown flags: %02x",temp & 0x90); |
87 | psiconv_debug(config,lev+2,off+len,"Unknown flags: %02x",temp & 0x90); |
79 | } |
88 | } |
80 | len ++; |
89 | len ++; |
81 | |
90 | |
82 | psiconv_progress(lev+2,off+len,"Going to read second byte of display flags"); |
91 | psiconv_progress(config,lev+2,off+len,"Going to read second byte of display flags"); |
83 | temp = psiconv_read_u8(buf,lev+2,off+len,&res); |
92 | temp = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
84 | if (res) |
93 | if (res) |
85 | goto ERROR2; |
94 | goto ERROR2; |
86 | |
95 | |
87 | (*result)->show_full_pictures = temp & 0x01 ? psiconv_bool_true : |
96 | (*result)->show_full_pictures = temp & 0x01 ? psiconv_bool_true : |
88 | psiconv_bool_false; |
97 | psiconv_bool_false; |
89 | psiconv_debug(lev+2,off+len,"Show full pictures: %02x", |
98 | psiconv_debug(config,lev+2,off+len,"Show full pictures: %02x", |
90 | (*result)->show_full_pictures); |
99 | (*result)->show_full_pictures); |
91 | (*result)->show_full_graphs = temp & 0x02 ? psiconv_bool_true : |
100 | (*result)->show_full_graphs = temp & 0x02 ? psiconv_bool_true : |
92 | psiconv_bool_false; |
101 | psiconv_bool_false; |
93 | psiconv_debug(lev+2,off+len,"Show full graphs: %02x", |
102 | psiconv_debug(config,lev+2,off+len,"Show full graphs: %02x", |
94 | (*result)->show_full_graphs); |
103 | (*result)->show_full_graphs); |
95 | if (temp & 0xfc) { |
104 | if (temp & 0xfc) { |
96 | psiconv_warn(lev+2,off+len,"Word status section second byte of display " |
105 | psiconv_warn(config,lev+2,off+len,"Word status section second byte of display " |
97 | "flags contains unknown flags (ignored)"); |
106 | "flags contains unknown flags (ignored)"); |
98 | psiconv_debug(lev+2,off+len,"Unknown flags: %02x",temp & 0xfc); |
107 | psiconv_debug(config,lev+2,off+len,"Unknown flags: %02x",temp & 0xfc); |
99 | } |
108 | } |
100 | len ++; |
109 | len ++; |
101 | |
110 | |
102 | psiconv_progress(lev+2,off+len,"Going to read top toolbar setting"); |
111 | psiconv_progress(config,lev+2,off+len,"Going to read top toolbar setting"); |
103 | if ((res = psiconv_parse_bool(buf,lev+2,off+len,&leng, |
112 | if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng, |
104 | &(*result)->show_top_toolbar))) |
113 | &(*result)->show_top_toolbar))) |
105 | goto ERROR2; |
114 | goto ERROR2; |
106 | len += leng; |
115 | len += leng; |
107 | |
116 | |
108 | psiconv_progress(lev+2,off+len,"Going to read side toolbar setting"); |
117 | psiconv_progress(config,lev+2,off+len,"Going to read side toolbar setting"); |
109 | if ((res = psiconv_parse_bool(buf,lev+2,off+len,&leng, |
118 | if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng, |
110 | &(*result)->show_side_toolbar))) |
119 | &(*result)->show_side_toolbar))) |
111 | goto ERROR2; |
120 | goto ERROR2; |
112 | len += leng; |
121 | len += leng; |
113 | |
122 | |
114 | psiconv_progress(lev+2,off+len,"Going to read operational flags"); |
123 | psiconv_progress(config,lev+2,off+len,"Going to read operational flags"); |
115 | temp = psiconv_read_u8(buf,lev+2,off+len,&res); |
124 | temp = psiconv_read_u8(config,buf,lev+2,off+len,&res); |
116 | if (res) |
125 | if (res) |
117 | goto ERROR2; |
126 | goto ERROR2; |
118 | (*result)->fit_lines_to_screen = temp & 0x08 ? psiconv_bool_true : |
127 | (*result)->fit_lines_to_screen = temp & 0x08 ? psiconv_bool_true : |
119 | psiconv_bool_false; |
128 | psiconv_bool_false; |
120 | psiconv_debug(lev+2,off+len,"Fit lines to screen: %02x", |
129 | psiconv_debug(config,lev+2,off+len,"Fit lines to screen: %02x", |
121 | (*result)->fit_lines_to_screen); |
130 | (*result)->fit_lines_to_screen); |
122 | if (temp & 0xf7) { |
131 | if (temp & 0xf7) { |
123 | psiconv_warn(lev+2,off+len,"Word status section operational flags " |
132 | psiconv_warn(config,lev+2,off+len,"Word status section operational flags " |
124 | "contains unknown flags (ignored)"); |
133 | "contains unknown flags (ignored)"); |
125 | psiconv_debug(lev+2,off+len,"Unknown flags: %02x",temp & 0xfc); |
134 | psiconv_debug(config,lev+2,off+len,"Unknown flags: %02x",temp & 0xfc); |
126 | } |
135 | } |
127 | len ++; |
136 | len ++; |
128 | |
137 | |
129 | psiconv_progress(lev+2,off+len,"Going to read cursor position"); |
138 | psiconv_progress(config,lev+2,off+len,"Going to read cursor position"); |
130 | (*result)->cursor_position = psiconv_read_u32(buf,lev+2,off + len,&res); |
139 | (*result)->cursor_position = psiconv_read_u32(config,buf,lev+2,off + len,&res); |
131 | if (res) |
140 | if (res) |
132 | goto ERROR2; |
141 | goto ERROR2; |
133 | psiconv_debug(lev+2,off+len,"Cursor position: %08x", |
142 | psiconv_debug(config,lev+2,off+len,"Cursor position: %08x", |
134 | (*result)->cursor_position); |
143 | (*result)->cursor_position); |
135 | len += 0x04; |
144 | len += 0x04; |
136 | |
145 | |
137 | psiconv_progress(lev+2,off+len,"Going to read display size"); |
146 | psiconv_progress(config,lev+2,off+len,"Going to read display size"); |
138 | (*result)->cursor_position = psiconv_read_u32(buf,lev+2,off + len,&res); |
147 | (*result)->display_size = psiconv_read_u32(config,buf,lev+2,off + len,&res); |
139 | if (res) |
148 | if (res) |
140 | goto ERROR2; |
149 | goto ERROR2; |
141 | psiconv_debug(lev+2,off+len,"Display size: %08x", |
150 | psiconv_debug(config,lev+2,off+len,"Display size: %08x", |
142 | (*result)->cursor_position); |
151 | (*result)->display_size); |
143 | len += 0x04; |
152 | len += 0x04; |
144 | |
153 | |
145 | if (length) |
154 | if (length) |
146 | *length = len; |
155 | *length = len; |
147 | |
156 | |
148 | psiconv_progress(lev,off+len-1, |
157 | psiconv_progress(config,lev,off+len-1, |
149 | "End of word status section (total length: %08x)", len); |
158 | "End of word status section (total length: %08x)", len); |
150 | return 0; |
159 | return 0; |
151 | |
160 | |
152 | ERROR2: |
161 | ERROR2: |
153 | free (*result); |
162 | free (*result); |
154 | ERROR1: |
163 | ERROR1: |
155 | psiconv_warn(lev+1,off,"Reading of Word Status Section failed"); |
164 | psiconv_error(config,lev+1,off,"Reading of Word Status Section failed"); |
156 | if (length) |
165 | if (length) |
157 | *length = 0; |
166 | *length = 0; |
158 | if (!res) |
167 | if (!res) |
159 | return -PSICONV_E_NOMEM; |
168 | return -PSICONV_E_NOMEM; |
160 | else |
169 | else |
161 | return res; |
170 | return res; |
162 | } |
171 | } |
163 | |
172 | |
164 | int psiconv_parse_word_styles_section(const psiconv_buffer buf, int lev, |
173 | int psiconv_parse_word_styles_section(const psiconv_config config, |
|
|
174 | const psiconv_buffer buf, int lev, |
165 | psiconv_u32 off, int *length, |
175 | psiconv_u32 off, int *length, |
166 | psiconv_word_styles_section *result) |
176 | psiconv_word_styles_section *result) |
167 | { |
177 | { |
168 | int res=0; |
178 | int res=0; |
169 | int len=0; |
179 | int len=0; |
170 | int leng,i,nr,j; |
180 | int leng,i,nr,j; |
171 | psiconv_word_style style; |
181 | psiconv_word_style style; |
172 | psiconv_u32 temp; |
182 | psiconv_u32 temp; |
173 | |
183 | |
174 | psiconv_progress(lev+1,off,"Going to read the word styles section"); |
184 | psiconv_progress(config,lev+1,off,"Going to read the word styles section"); |
175 | if (!(*result = malloc(sizeof(**result)))) |
185 | if (!(*result = malloc(sizeof(**result)))) |
176 | goto ERROR1; |
186 | goto ERROR1; |
177 | |
187 | |
178 | psiconv_progress(lev+2,off+len,"Going to read style normal"); |
188 | psiconv_progress(config,lev+2,off+len,"Going to read style normal"); |
179 | if (!(style = malloc(sizeof(*style)))) |
189 | if (!(style = malloc(sizeof(*style)))) |
180 | goto ERROR2; |
190 | goto ERROR2; |
181 | style->name = NULL; |
191 | style->name = NULL; |
182 | if (!(style->paragraph = psiconv_basic_paragraph_layout())) |
192 | if (!(style->paragraph = psiconv_basic_paragraph_layout())) |
183 | goto ERROR2_1; |
193 | goto ERROR2_1; |
184 | psiconv_progress(lev+3,off+len,"Going to read the paragraph codes"); |
194 | psiconv_progress(config,lev+3,off+len,"Going to read the paragraph codes"); |
185 | if ((res = psiconv_parse_paragraph_layout_list(buf,lev+3,off+len,&leng, |
195 | if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+3,off+len,&leng, |
186 | style->paragraph))) |
196 | style->paragraph))) |
187 | goto ERROR2_2; |
197 | goto ERROR2_2; |
188 | len += leng; |
198 | len += leng; |
189 | psiconv_progress(lev+3,off+len,"Going to read the character codes"); |
199 | psiconv_progress(config,lev+3,off+len,"Going to read the character codes"); |
190 | if (!(style->character = psiconv_basic_character_layout())) |
200 | if (!(style->character = psiconv_basic_character_layout())) |
191 | goto ERROR2_2; |
201 | goto ERROR2_2; |
192 | if ((res = psiconv_parse_character_layout_list(buf,lev+3,off+len,&leng, |
202 | if ((res = psiconv_parse_character_layout_list(config,buf,lev+3,off+len,&leng, |
193 | style->character))) |
203 | style->character))) |
194 | goto ERROR2_3; |
204 | goto ERROR2_3; |
195 | len += leng; |
205 | len += leng; |
|
|
206 | /* Ugly: I really don't know whether this is right for UTF8 */ |
196 | psiconv_progress(lev+3,off+len,"Going to read the hotkey"); |
207 | psiconv_progress(config,lev+3,off+len,"Going to read the hotkey"); |
197 | temp = psiconv_read_u32(buf,lev+3,off+len,&res); |
208 | style->hotkey = psiconv_unicode_read_char(config,buf,lev+3,off+len,NULL,&res); |
|
|
209 | psiconv_debug(config,lev+3,off+len,"Normal Hotkey value %08x",style->hotkey); |
198 | if (res) |
210 | if (res) |
199 | goto ERROR2_3; |
211 | goto ERROR2_3; |
200 | if (temp & 0xffffff00) { |
212 | len += 0x04; |
201 | psiconv_warn(lev+3,off+len, |
|
|
202 | "Normal style hotkey has unknown value (ignored)"); |
|
|
203 | psiconv_debug(lev+3,off+len,"Hotkey value %08x",temp); |
|
|
204 | temp = 0; |
|
|
205 | } |
|
|
206 | style->hotkey = temp & 0x000000ff; |
|
|
207 | if ((style->hotkey >= 32) && (style->hotkey < 127)) |
|
|
208 | psiconv_debug(lev+3,off+len,"Hotkey: %c",style->hotkey); |
|
|
209 | else if (style->hotkey == 0x00) |
|
|
210 | psiconv_debug(lev+3,off+len,"Hotkey: <none>"); |
|
|
211 | else |
|
|
212 | psiconv_debug(lev+3,off+len,"Hotkey: %02x",style->hotkey); |
|
|
213 | (*result)->normal = style; |
213 | (*result)->normal = style; |
214 | len += 0x04; |
|
|
215 | |
214 | |
216 | psiconv_progress(lev+2,off+len,"Going to read hotkeys list"); |
215 | psiconv_progress(config,lev+2,off+len,"Going to read hotkeys list"); |
217 | if (!((*result)->styles = psiconv_list_new(sizeof(*style)))) |
216 | if (!((*result)->styles = psiconv_list_new(sizeof(*style)))) |
218 | goto ERROR3; |
217 | goto ERROR3; |
219 | if (!(style = malloc(sizeof(*style)))) { |
218 | if (!(style = malloc(sizeof(*style)))) { |
220 | goto ERROR3_1; |
219 | goto ERROR3_1; |
221 | } |
220 | } |
222 | |
221 | |
223 | psiconv_progress(lev+3,off+len,"Going to read the number of entries"); |
222 | psiconv_progress(config,lev+3,off+len,"Going to read the number of entries"); |
224 | nr = psiconv_read_u8(buf,lev+3,off+len,&res); |
223 | nr = psiconv_read_u8(config,buf,lev+3,off+len,&res); |
225 | if (res) |
224 | if (res) |
226 | goto ERROR3_2; |
225 | goto ERROR3_2; |
227 | len ++; |
226 | len ++; |
228 | psiconv_debug(lev+3,off+len,"Nummer of hotkeys: %02x",nr); |
227 | psiconv_debug(config,lev+3,off+len,"Nummer of hotkeys: %02x",nr); |
229 | for (i = 0; i < nr; i ++) { |
228 | for (i = 0; i < nr; i ++) { |
230 | temp = psiconv_read_u32(buf,lev+2,off+len,&res); |
229 | /* Ugly: I really don't know whether this is right for UTF8 */ |
231 | if (res) |
230 | style->hotkey = psiconv_unicode_read_char(config,buf,lev+3,off+len, |
232 | goto ERROR3_2; |
231 | NULL,&res); |
233 | if (temp & 0xffffff00) { |
|
|
234 | psiconv_warn(lev+3,off+len,"Style hotkey has unknown value (ignored)"); |
|
|
235 | psiconv_debug(lev+3,off+len,"Hotkey %d value %08x",i,temp); |
|
|
236 | temp = 0; |
|
|
237 | } |
|
|
238 | style->hotkey = temp & 0x000000ff; |
|
|
239 | if ((style->hotkey >= 32) && (style->hotkey < 127)) |
|
|
240 | psiconv_debug(lev+3,off+len,"Hotkey %d: %c",i,style->hotkey); |
|
|
241 | else if (style->hotkey == 0x00) |
|
|
242 | psiconv_debug(lev+3,off+len,"Hotkey %d: <none>",i); |
|
|
243 | else |
|
|
244 | psiconv_debug(lev+3,off+len,"Hotkey %d: %02x",i,style->hotkey); |
232 | psiconv_debug(config,lev+3,off+len,"Hotkey %d value %08x",i,style->hotkey); |
|
|
233 | len += 0x04; |
245 | if ((res = psiconv_list_add((*result)->styles,style))) |
234 | if ((res = psiconv_list_add((*result)->styles,style))) |
246 | goto ERROR3_2; |
235 | goto ERROR3_2; |
247 | len += 0x04; |
|
|
248 | } |
236 | } |
249 | free(style); |
237 | free(style); |
250 | |
238 | |
251 | psiconv_progress(lev+2,off+len,"Going to read all other styles"); |
239 | psiconv_progress(config,lev+2,off+len,"Going to read all other styles"); |
252 | psiconv_progress(lev+2,off+len,"Going to read the number of styles"); |
240 | psiconv_progress(config,lev+2,off+len,"Going to read the number of styles"); |
253 | nr = psiconv_read_u8(buf,lev+3,off+len,&res); |
241 | nr = psiconv_read_u8(config,buf,lev+3,off+len,&res); |
254 | if (res) |
242 | if (res) |
255 | goto ERROR4; |
243 | goto ERROR4; |
256 | if (nr != psiconv_list_length((*result)->styles)) { |
244 | if (nr != psiconv_list_length((*result)->styles)) { |
257 | psiconv_warn(lev+3,off+len,"Number of styles and hotkeys do not match"); |
245 | psiconv_warn(config,lev+3,off+len,"Number of styles and hotkeys do not match"); |
258 | psiconv_debug(lev+3,off+len,"%d hotkeys, %d styles", |
246 | psiconv_debug(config,lev+3,off+len,"%d hotkeys, %d styles", |
259 | psiconv_list_length((*result)->styles), nr); |
247 | psiconv_list_length((*result)->styles), nr); |
260 | } |
248 | } |
261 | len ++; |
249 | len ++; |
262 | |
250 | |
263 | for (i = 0; i < nr; i++) { |
251 | for (i = 0; i < nr; i++) { |
264 | psiconv_progress(lev+2,off+len,"Next style: %d",i); |
252 | psiconv_progress(config,lev+2,off+len,"Next style: %d",i); |
265 | if (i >= psiconv_list_length((*result)->styles)) { |
253 | if (i >= psiconv_list_length((*result)->styles)) { |
266 | if (!(style = malloc(sizeof(*style)))) |
254 | if (!(style = malloc(sizeof(*style)))) |
267 | goto ERROR5; |
255 | goto ERROR5; |
268 | style->hotkey = 0; |
256 | style->hotkey = 0; |
269 | if (!(psiconv_list_add((*result)->styles,style))) { |
257 | if (psiconv_list_add((*result)->styles,style)) { |
270 | free(style); |
258 | free(style); |
271 | goto ERROR5; |
259 | goto ERROR5; |
272 | } |
260 | } |
273 | psiconv_debug(lev+3,off+len,"New entry added in list"); |
261 | psiconv_debug(config,lev+3,off+len,"New entry added in list"); |
274 | free(style); |
262 | free(style); |
275 | } |
263 | } |
276 | if (!(style = psiconv_list_get((*result)->styles,i))) |
264 | if (!(style = psiconv_list_get((*result)->styles,i))) |
277 | goto ERROR5; |
265 | goto ERROR5; |
278 | psiconv_progress(lev+3,off+len,"Going to read the style name"); |
266 | psiconv_progress(config,lev+3,off+len,"Going to read the style name"); |
279 | style->name = psiconv_read_string(buf,lev+3,off+len,&leng,&res); |
267 | style->name = psiconv_read_string(config,buf,lev+3,off+len,&leng,&res); |
280 | if (res) |
268 | if (res) |
281 | goto ERROR5; |
269 | goto ERROR5; |
282 | len += leng; |
270 | len += leng; |
283 | psiconv_progress(lev+3,off+len, |
271 | psiconv_progress(config,lev+3,off+len, |
284 | "Going to read whether this style is built-in"); |
272 | "Going to read whether this style is built-in"); |
285 | temp = psiconv_read_u32(buf,lev+2,off+len,&res); |
273 | temp = psiconv_read_u32(config,buf,lev+2,off+len,&res); |
286 | if (res) |
274 | if (res) |
287 | goto ERROR6; |
275 | goto ERROR6; |
288 | |
276 | |
289 | if (temp == PSICONV_ID_STYLE_BUILT_IN) { |
277 | if (temp == PSICONV_ID_STYLE_BUILT_IN) { |
290 | style->built_in = psiconv_bool_true; |
278 | style->built_in = psiconv_bool_true; |
291 | psiconv_debug(lev+3,off+len,"Built-in style"); |
279 | psiconv_debug(config,lev+3,off+len,"Built-in style"); |
292 | } else if (temp == PSICONV_ID_STYLE_REMOVABLE) { |
280 | } else if (temp == PSICONV_ID_STYLE_REMOVABLE) { |
293 | style->built_in = psiconv_bool_false; |
281 | style->built_in = psiconv_bool_false; |
294 | psiconv_debug(lev+3,off+len,"Removable style"); |
282 | psiconv_debug(config,lev+3,off+len,"Removable style"); |
295 | } else { |
283 | } else { |
296 | psiconv_warn(lev+3,off+len, |
284 | psiconv_warn(config,lev+3,off+len, |
297 | "Word styles section unknown style id (treated as built-in)"); |
285 | "Word styles section unknown style id (treated as built-in)"); |
298 | psiconv_debug(lev+3,off+len,"Unknown id: %08x",temp); |
286 | psiconv_debug(config,lev+3,off+len,"Unknown id: %08x",temp); |
299 | style->built_in = psiconv_bool_false; |
287 | style->built_in = psiconv_bool_false; |
300 | } |
288 | } |
301 | len += 4; |
289 | len += 4; |
302 | psiconv_progress(lev+3,off+len,"Going to read outline level"); |
290 | psiconv_progress(config,lev+3,off+len,"Going to read outline level"); |
303 | style->outline_level = psiconv_read_u32(buf,lev+3,off+len,&res); |
291 | style->outline_level = psiconv_read_u32(config,buf,lev+3,off+len,&res); |
304 | if (res) |
292 | if (res) |
305 | goto ERROR6; |
293 | goto ERROR6; |
306 | psiconv_debug(lev+3,off+len,"Outline Level: %08x", style->outline_level); |
294 | psiconv_debug(config,lev+3,off+len,"Outline Level: %08x", style->outline_level); |
307 | len += 4; |
295 | len += 4; |
308 | psiconv_progress(lev+3,off+len,"Going to read the character codes"); |
296 | psiconv_progress(config,lev+3,off+len,"Going to read the character codes"); |
309 | if (!(style->character = psiconv_basic_character_layout())) |
297 | if (!(style->character = psiconv_clone_character_layout((*result)->normal->character))) |
310 | goto ERROR6; |
298 | goto ERROR6; |
311 | if ((res = psiconv_parse_character_layout_list(buf,lev+3,off+len,&leng, |
299 | if ((res = psiconv_parse_character_layout_list(config,buf,lev+3,off+len,&leng, |
312 | style->character))) |
300 | style->character))) |
313 | goto ERROR7; |
301 | goto ERROR7; |
314 | len += leng; |
302 | len += leng; |
315 | psiconv_progress(lev+3,off+len,"Going to read the paragraph codes"); |
303 | psiconv_progress(config,lev+3,off+len,"Going to read the paragraph codes"); |
316 | if (!(style->paragraph = psiconv_basic_paragraph_layout())) |
304 | if (!(style->paragraph = psiconv_clone_paragraph_layout((*result)->normal->paragraph))) |
317 | goto ERROR7; |
305 | goto ERROR7; |
318 | if ((res = psiconv_parse_paragraph_layout_list(buf,lev+3,off+len,&leng, |
306 | if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+3,off+len,&leng, |
319 | style->paragraph))) |
307 | style->paragraph))) |
320 | goto ERROR8; |
308 | goto ERROR8; |
321 | len += leng; |
309 | len += leng; |
322 | } |
310 | } |
323 | |
311 | |
|
|
312 | psiconv_progress(config,lev+2,off+len,"Reading trailing bytes"); |
|
|
313 | for (i = 0; i < psiconv_list_length((*result)->styles); i++) { |
|
|
314 | temp = psiconv_read_u8(config,buf,lev+3,off+len,&res); |
|
|
315 | if (res) |
|
|
316 | goto ERROR4; |
|
|
317 | if (temp != 0xff) { |
|
|
318 | psiconv_warn(config,lev+3,off+len,"Unknown trailing style byte"); |
|
|
319 | psiconv_debug(config,lev+3,off+len,"Trailing byte: %02x expected, read %02x", |
|
|
320 | 0xff,temp); |
|
|
321 | } else |
|
|
322 | psiconv_debug(config,lev+3,off+len,"Read trailing byte 0xff"); |
|
|
323 | len++; |
|
|
324 | } |
|
|
325 | |
324 | if (length) |
326 | if (length) |
325 | *length = len; |
327 | *length = len; |
326 | |
328 | |
327 | psiconv_progress(lev,off+len-1, |
329 | psiconv_progress(config,lev,off+len-1, |
328 | "End of word styles section (total length: %08x)", len); |
330 | "End of word styles section (total length: %08x)", len); |
329 | |
331 | |
330 | return res; |
332 | return res; |
331 | |
333 | |
332 | |
334 | |
… | |
… | |
351 | ERROR6: |
353 | ERROR6: |
352 | free(style->name); |
354 | free(style->name); |
353 | ERROR5: |
355 | ERROR5: |
354 | for (j = 0; j < i ;j++) { |
356 | for (j = 0; j < i ;j++) { |
355 | if (!(style = psiconv_list_get((*result)->styles,j))) { |
357 | if (!(style = psiconv_list_get((*result)->styles,j))) { |
356 | psiconv_warn(lev+1,off,"Massive memory corruption"); |
358 | psiconv_error(config,lev+1,off,"Data structure corruption"); |
357 | goto ERROR4; |
359 | goto ERROR4; |
358 | } |
360 | } |
359 | psiconv_free_character_layout(style->character); |
361 | psiconv_free_character_layout(style->character); |
360 | psiconv_free_paragraph_layout(style->paragraph); |
362 | psiconv_free_paragraph_layout(style->paragraph); |
361 | free(style->name); |
363 | free(style->name); |
… | |
… | |
365 | ERROR3: |
367 | ERROR3: |
366 | psiconv_free_word_style((*result)->normal); |
368 | psiconv_free_word_style((*result)->normal); |
367 | ERROR2: |
369 | ERROR2: |
368 | free (*result); |
370 | free (*result); |
369 | ERROR1: |
371 | ERROR1: |
370 | psiconv_warn(lev+1,off,"Reading of Word Status Section failed"); |
372 | psiconv_error(config,lev+1,off,"Reading of Word Status Section failed"); |
371 | if (length) |
373 | if (length) |
372 | *length = 0; |
374 | *length = 0; |
373 | if (!res) |
375 | if (!res) |
374 | return -PSICONV_E_NOMEM; |
376 | return -PSICONV_E_NOMEM; |
375 | else |
377 | else |