/[public]/psiconv/trunk/lib/psiconv/parse_common.c

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

Parent Directory | Revision Log | View Patch Patch

Revision 12		Revision 167
1	/*	1	/*
2	parse_common.c - Part of psiconv, a PSION 5 file formats converter	2	parse_common.c - Part of psiconv, a PSION 5 file formats converter
3	Copyright (c) 1999 Frodo Looijaard <frodol@dds.nl>	3	Copyright (c) 1999, 2000 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.
…		…
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"
21	#include <stdlib.h>	22	#include <stdlib.h>
22	#include <string.h>	23	#include <string.h>
23		24
24	#include "data.h"
25	#include "parse_routines.h"	25	#include "parse_routines.h"
		26	#include "error.h"
		27
		28	#ifdef DMALLOC
		29	#include <dmalloc.h>
		30	#endif
		31
26		32
27	static int psiconv_parse_layout_section(const psiconv_buffer buf,	33	static int psiconv_parse_layout_section(const psiconv_buffer buf,
28	int lev,psiconv_u32 off,	34	int lev,psiconv_u32 off,
29	int *length,	35	int *length,
30	psiconv_text_and_layout result,	36	psiconv_text_and_layout result,
31	psiconv_word_styles_section styles,	37	psiconv_word_styles_section styles,
32	int with_styles);	38	int with_styles);
		39	static psiconv_file_type_t psiconv_determine_embedded_object_type
		40	(const psiconv_buffer buf,int lev,
		41	int *status);
33		42
34	int psiconv_parse_header_section(const psiconv_buffer buf,int lev,	43	int psiconv_parse_header_section(const psiconv_buffer buf,int lev,
35	psiconv_u32 off, int *length,	44	psiconv_u32 off, int *length,
36	psiconv_header_section *result)	45	psiconv_header_section *result)
37	{	46	{
38	int res=0;	47	int res=0;
39	int len=0;	48	int len=0;
40	psiconv_u32 temp;	49	psiconv_u32 temp;
41		50
42	psiconv_progress(lev+1,off+len,"Going to read the header section");	51	psiconv_progress(lev+1,off+len,"Going to read the header section");
43	(result) = malloc(sizeof(*result));	52	if (!((result) = malloc(sizeof(*result))))
		53	goto ERROR1;
44		54
45	psiconv_progress(lev+2,off+len,"Going to read UID1 to UID3");	55	psiconv_progress(lev+2,off+len,"Going to read UID1 to UID3");
46	(*result)->uid1 = psiconv_read_u32(buf,lev+2,off+len);	56	(*result)->uid1 = psiconv_read_u32(buf,lev+2,off+len,&res);
		57	if (res)
		58	goto ERROR2;
47	psiconv_debug(lev+2,off+len,"UID1: %08x",(*result)->uid1);	59	psiconv_debug(lev+2,off+len,"UID1: %08x",(*result)->uid1);
		60	if ((*result)->uid1 == PSICONV_ID_CLIPART) {
		61	/* That's all folks... */
		62	(*result)->file = psiconv_clipart_file;
		63	(*result)->uid2 = 0;
		64	(*result)->uid3 = 0;
		65	(*result)->checksum = 0;
		66	len += 4;
		67	psiconv_debug(lev+2,off+len,"File is a Clipart file");
		68	goto DONE;
		69	}
48	if ((*result)->uid1 != PSICONV_ID_PSION5) {	70	if ((*result)->uid1 != PSICONV_ID_PSION5) {
49	psiconv_warn(lev+2,off+len,"UID1 has unknown value. This is probably "	71	psiconv_warn(lev+2,off+len,"UID1 has unknown value. This is probably "
50	"not a (parsable) Psion 5 file");	72	"not a (parsable) Psion 5 file");
51	res = -1;	73	res = -PSICONV_E_PARSE;
		74	goto ERROR2;
52	}	75	}
53	len += 4;	76	len += 4;
54	(*result)->uid2 = psiconv_read_u32(buf,lev+2,off+len);	77	(*result)->uid2 = psiconv_read_u32(buf,lev+2,off+len,&res);
		78	if (res)
		79	goto ERROR2;
55	psiconv_debug(lev+2,off+len,"UID2: %08x",(*result)->uid2);	80	psiconv_debug(lev+2,off+len,"UID2: %08x",(*result)->uid2);
56	len += 4;	81	len += 4;
57	(*result)->uid3 = psiconv_read_u32(buf,lev+2,off+len);	82	(*result)->uid3 = psiconv_read_u32(buf,lev+2,off+len,&res);
		83	if (res)
		84	goto ERROR2;
58	psiconv_debug(lev+2,off+len,"UID3: %08x",(*result)->uid3);	85	psiconv_debug(lev+2,off+len,"UID3: %08x",(*result)->uid3);
59	len += 4;	86	len += 4;
60		87
61	(*result)->file = psiconv_unknown_file;	88	(*result)->file = psiconv_unknown_file;
62	if ((*result)->uid1 == PSICONV_ID_PSION5) {	89	if ((*result)->uid1 == PSICONV_ID_PSION5) {
…		…
65	(*result)->file = psiconv_word_file;	92	(*result)->file = psiconv_word_file;
66	psiconv_debug(lev+2,off+len,"File is a Word file");	93	psiconv_debug(lev+2,off+len,"File is a Word file");
67	} else if ((*result)->uid3 == PSICONV_ID_TEXTED) {	94	} else if ((*result)->uid3 == PSICONV_ID_TEXTED) {
68	(*result)->file = psiconv_texted_file;	95	(*result)->file = psiconv_texted_file;
69	psiconv_debug(lev+2,off+len,"File is a TextEd file");	96	psiconv_debug(lev+2,off+len,"File is a TextEd file");
		97	} else if ((*result)->uid3 == PSICONV_ID_SKETCH) {
		98	(*result)->file = psiconv_sketch_file;
		99	psiconv_debug(lev+2,off+len,"File is a Sketch file");
		100	} else if ((*result)->uid3 == PSICONV_ID_SHEET) {
		101	(*result)->file = psiconv_sheet_file;
		102	psiconv_debug(lev+2,off+len,"File is a Sheet file");
70	}	103	}
71	} else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) {	104	} else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) {
72	(*result)->file = psiconv_mbm_file;	105	(*result)->file = psiconv_mbm_file;
73	if ((*result)->uid3 != 0x00)	106	if ((*result)->uid3 != 0x00)
74	psiconv_warn(lev+2,off+len,"UID3 set in MBM file?!?");	107	psiconv_warn(lev+2,off+len,"UID3 set in MBM file?!?");
…		…
79	psiconv_warn(lev+2,off+len,"Unknown file type");	112	psiconv_warn(lev+2,off+len,"Unknown file type");
80	(*result)->file = psiconv_unknown_file;	113	(*result)->file = psiconv_unknown_file;
81	}	114	}
82		115
83	psiconv_progress(lev+2,off+len,"Checking UID4");	116	psiconv_progress(lev+2,off+len,"Checking UID4");
84	temp = psiconv_read_u32(buf,lev+2,off+len);	117	temp = psiconv_read_u32(buf,lev+2,off+len,&res);
		118	if (res)
		119	goto ERROR2;
85	if (temp == psiconv_checkuid((result)->uid1,(result)->uid2,	120	if (temp == psiconv_checkuid((result)->uid1,(result)->uid2,
86	(*result)->uid3))	121	(*result)->uid3))
87	psiconv_debug(lev+2,off+len,"Checksum %08x is correct",temp);	122	psiconv_debug(lev+2,off+len,"Checksum %08x is correct",temp);
88	else {	123	else {
89	psiconv_warn(lev+2,off+len,"Checksum failed, file corrupted!");	124	psiconv_warn(lev+2,off+len,"Checksum failed, file corrupted!");
90	psiconv_debug(lev+2,off+len,"Expected checksum %08x, found %08x",	125	psiconv_debug(lev+2,off+len,"Expected checksum %08x, found %08x",
91	psiconv_checkuid((result)->uid1,(result)->uid2,	126	psiconv_checkuid((result)->uid1,(result)->uid2,
92	(*result)->uid3),temp);	127	(*result)->uid3),temp);
93	res = -1;	128	res = -PSICONV_E_PARSE;
		129	goto ERROR2;
94	}	130	}
95	len += 4;	131	len += 4;
96
97	psiconv_progress(lev+2,off+len,"Going to read Section Table Section offset");
98	(*result)->section_table_offset = psiconv_read_u32(buf,lev+2,off+len);
99	psiconv_debug(lev+2,off+len,"Section Table Section starts at offset %08x",
100	(*result)->section_table_offset) ;
101	len += 4;
102		132
		133	DONE:
103	if (length)	134	if (length)
104	*length = len;	135	*length = len;
105		136
106	psiconv_progress(lev+1,off+len-1,	137	psiconv_progress(lev+1,off+len-1,
107	"End of Header Section (total length: %08x)",len);	138	"End of Header Section (total length: %08x)",len);
108		139
109	return res;	140	return res;
		141
		142	ERROR2:
		143	free(*result);
		144	ERROR1:
		145	psiconv_warn(lev+1,off,"Reading of Header Section failed");
		146	if (length)
		147	*length = 0;
		148	if (res == 0)
		149	return -PSICONV_E_NOMEM;
		150	else
		151	return res;
110	}	152	}
111		153
112	int psiconv_parse_section_table_section(const psiconv_buffer buf, int lev,	154	int psiconv_parse_section_table_section(const psiconv_buffer buf, int lev,
113	psiconv_u32 off, int *length,	155	psiconv_u32 off, int *length,
114	psiconv_section_table_section *result)	156	psiconv_section_table_section *result)
…		…
119		161
120	int i;	162	int i;
121	psiconv_u8 nr;	163	psiconv_u8 nr;
122		164
123	psiconv_progress(lev+1,off+len,"Going to read the section table section");	165	psiconv_progress(lev+1,off+len,"Going to read the section table section");
124	result = psiconv_list_new(sizeof(entry));	166	if (!(result = psiconv_list_new(sizeof(entry))))
		167	goto ERROR1;
125		168
126	psiconv_progress(lev+2,off+len,"Going to read the section table length");	169	psiconv_progress(lev+2,off+len,"Going to read the section table length");
127	nr = psiconv_read_u8(buf,lev+2,off+len);	170	nr = psiconv_read_u8(buf,lev+2,off+len,&res);
		171	if (res)
		172	goto ERROR2;
128	psiconv_debug(lev+2,off+len,"Length: %08x",nr);	173	psiconv_debug(lev+2,off+len,"Length: %08x",nr);
129	if (nr & 0x01) {	174	if (nr & 0x01) {
130	psiconv_warn(lev+2,off+len,	175	psiconv_warn(lev+2,off+len,
131	"Section table length odd - ignoring last entry");	176	"Section table length odd - ignoring last entry");
132	res = -1;
133	}	177	}
134	len ++;	178	len ++;
135		179
136	psiconv_progress(lev+2,off+len,"Going to read the section table entries");	180	psiconv_progress(lev+2,off+len,"Going to read the section table entries");
137	entry = malloc(sizeof(*entry));	181	entry = malloc(sizeof(*entry));
138	for (i = 0; i < nr / 2; i++) {	182	for (i = 0; i < nr / 2; i++) {
139	entry->id = psiconv_read_u32(buf,lev+2,off + len);	183	entry->id = psiconv_read_u32(buf,lev+2,off + len,&res);
		184	if (res)
		185	goto ERROR3;
140	psiconv_debug(lev+2,off + len,"Entry %d: ID = %08x",i,entry->id);	186	psiconv_debug(lev+2,off + len,"Entry %d: ID = %08x",i,entry->id);
141	len += 0x04;	187	len += 0x04;
142	entry->offset = psiconv_read_u32(buf,lev+2,off + len);	188	entry->offset = psiconv_read_u32(buf,lev+2,off + len,&res);
		189	if (res)
		190	goto ERROR3;
143	psiconv_debug(lev+2,off +len,"Entry %d: Offset = %08x",i,entry->offset);	191	psiconv_debug(lev+2,off +len,"Entry %d: Offset = %08x",i,entry->offset);
144	len += 0x04;	192	len += 0x04;
145	psiconv_list_add(*result,entry);	193	if ((res=psiconv_list_add(*result,entry)))
		194	goto ERROR3;
146	}	195	}
147		196
148	free(entry);	197	free(entry);
149		198
150	if (length)	199	if (length)
151	*length = len;	200	*length = len;
152		201
153	psiconv_progress(lev+1,off+len-1,"End of section table section "	202	psiconv_progress(lev+1,off+len-1,"End of section table section "
154	"(total length: %08x", len);	203	"(total length: %08x)", len);
155		204
		205	return 0;
		206	ERROR3:
		207	free(entry);
		208	ERROR2:
		209	psiconv_list_free(*result);
		210	ERROR1:
		211	psiconv_warn(lev+1,off,"Reading of Section Table Section failed");
		212	if (length)
		213	*length = 0;
		214	if (res == 0)
		215	return -PSICONV_E_NOMEM;
		216	else
156	return res;	217	return res;
157	}	218	}
158		219
159	int psiconv_parse_application_id_section(const psiconv_buffer buf, int lev,	220	int psiconv_parse_application_id_section(const psiconv_buffer buf, int lev,
160	psiconv_u32 off, int *length,	221	psiconv_u32 off, int *length,
161	psiconv_application_id_section *result)	222	psiconv_application_id_section *result)
…		…
163	int res=0;	224	int res=0;
164	int len=0;	225	int len=0;
165	int leng;	226	int leng;
166		227
167	psiconv_progress(lev+1,off,"Going to read the application id section");	228	psiconv_progress(lev+1,off,"Going to read the application id section");
168	(result) = malloc(sizeof(*result));	229	if (!(result = malloc(sizeof(*result))))
		230	goto ERROR1;
169		231
170	psiconv_progress(lev+2,off+len,"Going to read the type identifier");	232	psiconv_progress(lev+2,off+len,"Going to read the type identifier");
171	(*result)->id = psiconv_read_u32(buf,lev+2,off+len);	233	(*result)->id = psiconv_read_u32(buf,lev+2,off+len,&res);
		234	if (res)
		235	goto ERROR2;
172	psiconv_debug(lev+2,off+len,"Identifier: %08x",(*result)->id);	236	psiconv_debug(lev+2,off+len,"Identifier: %08x",(*result)->id);
173	len += 4;	237	len += 4;
174		238
175	psiconv_progress(lev+2,off+len,"Going to read the application id string");	239	psiconv_progress(lev+2,off+len,"Going to read the application id string");
176	(*result)->name = psiconv_read_string(buf,lev+2,off+len,&leng);	240	(*result)->name = psiconv_read_string(buf,lev+2,off+len,&leng,&res);
		241	if (res)
		242	goto ERROR2;
177	len += leng;	243	len += leng;
178		244
179	if (length)	245	if (length)
180	*length = len;	246	*length = len;
181		247
182	psiconv_progress(lev+1,off+len-1,"End of application id section "	248	psiconv_progress(lev+1,off+len-1,"End of application id section "
183	"(total length: %08x", len);	249	"(total length: %08x", len);
184		250
185	return res;	251	return res;
		252	ERROR2:
		253	free(*result);
		254	ERROR1:
		255	psiconv_warn(lev+1,off,"Reading of Application ID Section failed");
		256	if (length)
		257	*length = 0;
		258	if (res == 0)
		259	return -PSICONV_E_NOMEM;
		260	else
		261	return res;
186	}	262	}
187		263
188	int psiconv_parse_text_section(const psiconv_buffer buf,int lev,psiconv_u32 off,	264	int psiconv_parse_text_section(const psiconv_buffer buf,int lev,psiconv_u32 off,
189	int length,psiconv_text_and_layout result)	265	int length,psiconv_text_and_layout result)
190	{	266	{
…		…
194		270
195	psiconv_u32 text_len;	271	psiconv_u32 text_len;
196	psiconv_paragraph para;	272	psiconv_paragraph para;
197		273
198	int nr;	274	int nr;
199	int i,j,start,leng;	275	int i,j,start,leng,temp;
200	char *str_copy;	276	char *str_copy;
201		277
202	psiconv_progress(lev+1,off,"Going to parse the text section");	278	psiconv_progress(lev+1,off,"Going to parse the text section");
203	psiconv_progress(lev+2,off,"Reading the text length");	279	psiconv_progress(lev+2,off,"Reading the text length");
		280
		281	if(!(result = psiconv_list_new(sizeof(para))))
		282	goto ERROR1;
		283	if (!(para = malloc(sizeof(*para))))
		284	goto ERROR2;
		285
204	text_len = psiconv_read_X(buf,lev+2,off,&leng);	286	text_len = psiconv_read_X(buf,lev+2,off,&leng,&res);
		287	if (res)
		288	goto ERROR3;
205	psiconv_debug(lev+2,off,"Length: %08x",text_len);	289	psiconv_debug(lev+2,off,"Length: %08x",text_len);
206	len += leng;	290	len += leng;
207
208	result = psiconv_list_new(sizeof(para));
209	para = malloc(sizeof(*para));
210		291
211	psiconv_progress(lev+2,off+len,"Going to read all paragraph text");	292	psiconv_progress(lev+2,off+len,"Going to read all paragraph text");
212	nr = 0;	293	nr = 0;
213	start = 0;	294	start = 0;
214	for (i = 0; i < text_len; i++)	295	for (i = 0; i < text_len; i++) {
215	if (psiconv_read_u8(buf,lev+2,off+len+i) == 0x06) {	296	temp = psiconv_read_u8(buf,lev+2,off+len+i,&res);
		297	if (res)
		298	goto ERROR3;
		299	if (temp == 0x06) {
216	para->text = malloc(i - start + 1);	300	if (!(para->text = malloc(i - start + 1)))
		301	goto ERROR3;
217	for (j = 0; j < i - start; j++)	302	for (j = 0; j < i - start; j++) {
218	para->text[j] = psiconv_read_u8(buf,lev+1,off + len + start + j);	303	temp = psiconv_read_u8(buf,lev+1,off + len + start + j,&res);
		304	if (res)
		305	goto ERROR4;
		306	para->text[j] = temp;
		307	}
219	para->text[j] = 0;	308	para->text[j] = 0;
220		309
221	psiconv_list_add(*result,para);	310	if ((res = psiconv_list_add(*result,para)))
		311	goto ERROR4;
222		312
223	str_copy = psiconv_make_printable(para->text);	313	if (!(str_copy = psiconv_make_printable(para->text)))
		314	goto ERROR3;
224	psiconv_debug(lev+2,off+i+len,"Line %d: %d characters",nr,	315	psiconv_debug(lev+2,off+i+len,"Line %d: %d characters",nr,
225	strlen(str_copy) +1);	316	strlen(str_copy) +1);
226	psiconv_debug(lev+2,off+i+len,"Line %d: `%s'",nr,str_copy);	317	psiconv_debug(lev+2,off+i+len,"Line %d: `%s'",nr,str_copy);
227	free(str_copy);	318	free(str_copy);
228		319
229	start = i + 1;	320	start = i + 1;
230	nr ++;	321	nr ++;
231	}	322	}
		323	}
232		324
233	if (start != text_len) {	325	if (start != text_len) {
234	res = -1;
235	psiconv_warn(lev+2,off+start+len,	326	psiconv_warn(lev+2,off+start+len,
236	"Last line does not end on EOL (%d characters left)", len - start);	327	"Last line does not end on EOL (%d characters left)", len - start);
237	para->text = malloc(text_len - start + 1);	328	if (!(para->text = malloc(text_len - start + 1)))
		329	goto ERROR3;
238	for (j = 0; j < text_len - start; j++)	330	for (j = 0; j < text_len - start; j++) {
239	para->text[j] = psiconv_read_u8(buf,lev+2,off + start + j + len);	331	temp = psiconv_read_u8(buf,lev+2,off + start + j + len, &res);
		332	if (res)
		333	goto ERROR4;
		334	para->text[j] = temp;
		335	}
240	para->text[text_len - start] = 0;	336	para->text[text_len - start] = 0;
241	psiconv_list_add(*result,para);	337	if ((res = psiconv_list_add(*result,para)))
		338	goto ERROR4;
242	str_copy = psiconv_make_printable(para->text);	339	if (!(str_copy = psiconv_make_printable(para->text)))
		340	goto ERROR3;
243	psiconv_debug(lev+2,off+start+len,"Last line: %d characters",nr,	341	psiconv_debug(lev+2,off+start+len,"Last line: %d characters",nr,
244	strlen(str_copy)+1);	342	strlen(str_copy)+1);
245	psiconv_debug(lev+2,off+start+len,"Last line: `%s'",str_copy);	343	psiconv_debug(lev+2,off+start+len,"Last line: `%s'",str_copy);
246	free(str_copy);	344	free(str_copy);
247	}	345	}
248		346
249	free(para);	347	free(para);
250		348
251	/* Initialize the remaining parts of each paragraph */	349	/* Initialize the remaining parts of each paragraph */
252	for (i = 0; i < psiconv_list_length(*result); i ++) {	350	for (i = 0; i < psiconv_list_length(*result); i ++) {
253	para = psiconv_list_get(*result,i);	351	if (!(para = psiconv_list_get(*result,i))) {
254	para->in_lines = psiconv_list_new(sizeof(struct psiconv_in_line_layout));	352	psiconv_warn(lev+2,off+len,"Massive memory corruption");
255	para->replacements = psiconv_list_new(sizeof(struct psiconv_replacement));	353	goto ERROR2_0;
		354	}
		355	if (!(para->in_lines = psiconv_list_new(sizeof(
		356	struct psiconv_in_line_layout_s))))
		357	goto ERROR2_0;
		358	if (!(para->replacements = psiconv_list_new(sizeof(
		359	struct psiconv_replacement_s))))
		360	goto ERROR2_1;
		361	if (!(para->base_character = psiconv_basic_character_layout()))
		362	goto ERROR2_2;
		363	if (!(para->base_paragraph = psiconv_basic_paragraph_layout()))
		364	goto ERROR2_3;
256	para->base_style = 0;	365	para->base_style = 0;
257	para->base_character = psiconv_basic_character_layout();
258	para->base_paragraph = psiconv_basic_paragraph_layout();
259	}	366	}
260		367
261		368
262	len += text_len;	369	len += text_len;
263		370
…		…
266		373
267	psiconv_progress(lev+1,off+len-1,"End of text section (total length: %08x",	374	psiconv_progress(lev+1,off+len-1,"End of text section (total length: %08x",
268	len);	375	len);
269		376
270	return res;	377	return res;
		378
		379	ERROR2_3:
		380	psiconv_free_character_layout(para->base_character);
		381	ERROR2_2:
		382	psiconv_list_free(para->replacements);
		383	ERROR2_1:
		384	psiconv_list_free(para->in_lines);
		385	ERROR2_0:
		386	for (j = 0; j < i; j++) {
		387	if (!(para = psiconv_list_get(*result,j))) {
		388	psiconv_warn(lev+1,off,"Massive memory corruption...");
		389	break;
		390	}
		391	psiconv_list_free(para->in_lines);
		392	psiconv_list_free(para->replacements);
		393	psiconv_free_character_layout(para->base_character);
		394	psiconv_free_paragraph_layout(para->base_paragraph);
		395	}
		396	goto ERROR2;
		397
		398	ERROR4:
		399	free(para->text);
		400	ERROR3:
		401	free(para);
		402	ERROR2:
		403	for (i = 0; i < psiconv_list_length(*result);i++) {
		404	if (!(para = psiconv_list_get(*result,i))) {
		405	psiconv_warn(lev+1,off,"Massive memory corruption...");
		406	break;
		407	}
		408	free(para->text);
		409	}
		410	psiconv_list_free(*result);
		411	ERROR1:
		412	psiconv_warn(lev+1,off,"Reading of Text Section failed");
		413	if (length)
		414	*length = 0;
		415	if (!res)
		416	return -PSICONV_E_NOMEM;
		417	else
		418	return res;
271	}	419	}
272		420
273	/* First do a parse_text_section, or you will get into trouble here */	421	/* First do a parse_text_section, or you will get into trouble here */
274	int psiconv_parse_layout_section(const psiconv_buffer buf,	422	int psiconv_parse_layout_section(const psiconv_buffer buf,
275	int lev,psiconv_u32 off,	423	int lev,psiconv_u32 off,
…		…
281	int res = 0;	429	int res = 0;
282	int len = 0;	430	int len = 0;
283	psiconv_u32 temp;	431	psiconv_u32 temp;
284	int parse_styles,nr,i,j,total,leng,line_length;	432	int parse_styles,nr,i,j,total,leng,line_length;
285		433
286	typedef struct anon_style	434	typedef struct anon_style_s
287	{	435	{
288	int nr;	436	int nr;
289	psiconv_s16 base_style;	437	psiconv_s16 base_style;
290	psiconv_character_layout character;	438	psiconv_character_layout character;
291	psiconv_paragraph_layout paragraph;	439	psiconv_paragraph_layout paragraph;
292	} *anon_style;	440	} *anon_style;
293		441
294	typedef psiconv_list anon_style_list; /* of struct anon_style */	442	typedef psiconv_list anon_style_list; /* of struct anon_style */
295		443
296	anon_style_list anon_styles;	444	anon_style_list anon_styles;
297	struct anon_style anon;	445	struct anon_style_s anon;
298	anon_style anon_ptr=NULL;	446	anon_style anon_ptr=NULL;
299		447
		448	psiconv_character_layout temp_char;
		449	psiconv_paragraph_layout temp_para;
		450	psiconv_word_style temp_style;
300	psiconv_paragraph para;	451	psiconv_paragraph para;
301	struct psiconv_in_line_layout in_line;	452	struct psiconv_in_line_layout_s in_line;
302		453
303	int *inline_count;	454	int *inline_count;
304		455
305		456
306	psiconv_progress(lev+1,off,"Going to read the layout section");	457	psiconv_progress(lev+1,off,"Going to read the layout section");
307		458
308	psiconv_progress(lev+2,off,"Going to read the section type");	459	psiconv_progress(lev+2,off,"Going to read the section type");
309	temp = psiconv_read_u16(buf,lev+2,off+len);	460	temp = psiconv_read_u16(buf,lev+2,off+len,&res);
		461	if (res)
		462	goto ERROR1;
310	psiconv_debug(lev+2,off+len,"Type: %02x",temp);	463	psiconv_debug(lev+2,off+len,"Type: %02x",temp);
311	parse_styles = with_styles;	464	parse_styles = with_styles;
312	if ((temp == 0x0001) && !with_styles) {	465	if ((temp == 0x0001) && !with_styles) {
313	psiconv_warn(lev+2,off+len,"Styleless layout section expected, "	466	psiconv_warn(lev+2,off+len,"Styleless layout section expected, "
314	"but styled section found!");	467	"but styled section found!");
315	parse_styles = 1;	468	parse_styles = 1;
316	res = -1;
317	} else if ((temp == 0x0000) && (with_styles)) {	469	} else if ((temp == 0x0000) && (with_styles)) {
318	psiconv_warn(lev+2,off+len,"Styled layout section expected, "	470	psiconv_warn(lev+2,off+len,"Styled layout section expected, "
319	"but styleless section found!");	471	"but styleless section found!");
320	parse_styles = 0;	472	parse_styles = 0;
321	res = -1;
322	} else if ((temp != 0x0000) && (temp != 0x0001)) {	473	} else if ((temp != 0x0000) && (temp != 0x0001)) {
323	psiconv_warn(lev+2,off+len,	474	psiconv_warn(lev+2,off+len,
324	"Layout section type indicator has unknown value!");	475	"Layout section type indicator has unknown value!");
325	res = -1;
326	}	476	}
327	len += 0x02;	477	len += 0x02;
328		478
329	psiconv_progress(lev+2,off+len,"Going to read paragraph type list");	479	psiconv_progress(lev+2,off+len,"Going to read paragraph type list");
330	anon_styles = psiconv_list_new(sizeof(anon));	480	if (!(anon_styles = psiconv_list_new(sizeof(anon))))
		481	goto ERROR1;
331	psiconv_progress(lev+3,off+len,"Going to read paragraph type list length");	482	psiconv_progress(lev+3,off+len,"Going to read paragraph type list length");
332	nr = psiconv_read_u8(buf,lev+3,off+len);	483	nr = psiconv_read_u8(buf,lev+3,off+len,&res);
		484	if (res)
		485	goto ERROR2;
333	psiconv_debug(lev+3,off+len,"Length: %02x",nr);	486	psiconv_debug(lev+3,off+len,"Length: %02x",nr);
334	len ++;	487	len ++;
335		488
336	psiconv_progress(lev+3,off+len,	489	psiconv_progress(lev+3,off+len,
337	"Going to read the paragraph type list elements");	490	"Going to read the paragraph type list elements");
338	for (i = 0; i < nr; i ++) {	491	for (i = 0; i < nr; i ++) {
339	psiconv_progress(lev+3,off+len,"Element %d",i);	492	psiconv_progress(lev+3,off+len,"Element %d",i);
340	anon.nr = psiconv_read_u32(buf,lev+4,off+len);	493	anon.nr = psiconv_read_u32(buf,lev+4,off+len,&res);
		494	if (res)
		495	goto ERROR3;
341	psiconv_debug(lev+4,off+len,"Number: %08x",anon.nr);	496	psiconv_debug(lev+4,off+len,"Number: %08x",anon.nr);
342	len += 0x04;	497	len += 0x04;
343		498
344	psiconv_progress(lev+4,off,"Going to determine the base style");	499	psiconv_progress(lev+4,off,"Going to determine the base style");
345	if (parse_styles) {	500	if (parse_styles) {
		501	temp = psiconv_read_u32(buf,lev+4, off+len,&res);
		502	if (res)
		503	goto ERROR3;
346	anon.base_style = psiconv_read_u8(buf,lev+3,	504	anon.base_style = psiconv_read_u8(buf,lev+3, off+len+4+temp,&res);
347	off+len+4+psiconv_read_u32(buf,lev+4,	505	if (res)
348	off+len));	506	goto ERROR3;
349	psiconv_debug(lev+4,off+len+psiconv_read_u32(buf,lev+4,off+len),	507	psiconv_debug(lev+4,off+len+temp,
350	"Style indicator: %02x",anon.base_style);	508	"Style indicator: %02x",anon.base_style);
351	} else	509	} else
352	anon.base_style = 0;	510	anon.base_style = 0;
		511	if (!(temp_style = psiconv_get_style(styles,anon.base_style))) {
		512	psiconv_warn(lev+4,off,"Unknown Style referenced");
		513	if (!(temp_style = psiconv_get_style(styles,anon.base_style))) {
		514	psiconv_warn(lev+4,off,"Base style unknown");
		515	goto ERROR3;
		516	}
		517	}
353	anon.paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	518	if (!(anon.paragraph = psiconv_clone_paragraph_layout
354	(styles,anon.base_style)->paragraph);	519	(temp_style->paragraph)))
		520	goto ERROR3;
355	anon.character = psiconv_clone_character_layout(psiconv_get_style	521	if (!(anon.character = psiconv_clone_character_layout
356	(styles,anon.base_style)->character);	522	(temp_style->character)))
		523	goto ERROR3_1;
357		524
358	psiconv_progress(lev+4,off+len,"Going to read the paragraph layout");	525	psiconv_progress(lev+4,off+len,"Going to read the paragraph layout");
359	res \|= psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,	526	if ((res = psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,
360	anon.paragraph);	527	anon.paragraph)))
		528	goto ERROR3_2;
361	len += leng;	529	len += leng;
362	if (parse_styles)	530	if (parse_styles)
363	len ++;	531	len ++;
364		532
365	psiconv_progress(lev+4,off+len,"Going to read the character layout");	533	psiconv_progress(lev+4,off+len,"Going to read the character layout");
366	res \|= psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,	534	if ((res = psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,
367	anon.character);	535	anon.character)))
		536	goto ERROR3_2;
368	len += leng;	537	len += leng;
369	psiconv_list_add(anon_styles,&anon);	538	if ((res = psiconv_list_add(anon_styles,&anon)))
		539	goto ERROR3_2;
370	}	540	}
371		541
372	psiconv_progress(lev+2,off+len,"Going to parse the paragraph element list");	542	psiconv_progress(lev+2,off+len,"Going to parse the paragraph element list");
373	psiconv_progress(lev+3,off+len,"Going to read the number of paragraphs");	543	psiconv_progress(lev+3,off+len,"Going to read the number of paragraphs");
374	nr = psiconv_read_u32(buf,lev+3,off+len);	544	nr = psiconv_read_u32(buf,lev+3,off+len,&res);
		545	if (res)
		546	goto ERROR3;
375	if (nr != psiconv_list_length(result)) {	547	if (nr != psiconv_list_length(result)) {
376	psiconv_warn(lev+3,off+len,	548	psiconv_warn(lev+3,off+len,
377	"Number of text paragraphs and paragraph elements does not match");	549	"Number of text paragraphs and paragraph elements does not match");
378	psiconv_debug(lev+3,off+len,	550	psiconv_debug(lev+3,off+len,
379	"%d text paragraphs, %d paragraph elements",	551	"%d text paragraphs, %d paragraph elements",
380	psiconv_list_length(result),nr);	552	psiconv_list_length(result),nr);
381	}	553	}
382	psiconv_debug(lev+3,off+len,"Number of paragraphs: %d",nr);	554	psiconv_debug(lev+3,off+len,"Number of paragraphs: %d",nr);
383	len += 4;	555	len += 4;
384	inline_count = malloc(nr * sizeof(*inline_count));	556	if (!(inline_count = malloc(nr * sizeof(*inline_count))))
		557	goto ERROR3;
385		558
386	psiconv_progress(lev+3,off+len,"Going to read the paragraph elements");	559	psiconv_progress(lev+3,off+len,"Going to read the paragraph elements");
387	for (i = 0; i < nr; i ++) {	560	for (i = 0; i < nr; i ++) {
388	psiconv_progress(lev+3,off+len,"Element %d",i);	561	psiconv_progress(lev+3,off+len,"Element %d",i);
389	if (i >= psiconv_list_length(result)) {	562	if (i >= psiconv_list_length(result)) {
390	psiconv_debug(lev+4,off+len,"Going to allocate a new element");	563	psiconv_debug(lev+4,off+len,"Going to allocate a new element");
391	para = malloc(sizeof(*para));	564	if (!(para = malloc(sizeof(*para))))
392	para->in_lines = psiconv_list_new(sizeof(struct psiconv_in_line_layout));	565	goto ERROR4;
		566	if (!(para->in_lines = psiconv_list_new(sizeof(
		567	struct psiconv_in_line_layout_s))))
		568	goto ERROR4_1;
393	para->base_style = 0;	569	para->base_style = 0;
394	para->base_character = psiconv_basic_character_layout();	570	if (!(para->base_character = psiconv_basic_character_layout()))
		571	goto ERROR4_2;
395	para->base_paragraph = psiconv_basic_paragraph_layout();	572	if (!(para->base_paragraph = psiconv_basic_paragraph_layout()))
		573	goto ERROR4_3;
		574	if ((res = psiconv_list_add(result,para)))
		575	goto ERROR4_4;
396	free(para);	576	free(para);
397	}	577	}
398	para = psiconv_list_get(result,i);	578	if (!(para = psiconv_list_get(result,i)))
		579	goto ERROR4;
399		580
400	psiconv_progress(lev+4,off+len,"Going to read the paragraph length");	581	psiconv_progress(lev+4,off+len,"Going to read the paragraph length");
401	temp = psiconv_read_u32(buf,lev+4,off+len);	582	temp = psiconv_read_u32(buf,lev+4,off+len,&res);
		583	if (res)
		584	goto ERROR4;
402	if (temp != strlen(para->text)+1) {	585	if (temp != strlen(para->text)+1) {
403	res = -1;
404	psiconv_warn(lev+4,off+len,	586	psiconv_warn(lev+4,off+len,
405	"Disagreement of the length of paragraph in layout section");	587	"Disagreement of the length of paragraph in layout section");
406	psiconv_debug(lev+4,off+len,	588	psiconv_debug(lev+4,off+len,
407	"Paragraph length: layout section says %d, counted %d",	589	"Paragraph length: layout section says %d, counted %d",
408	temp,strlen(para->text)+1);	590	temp,strlen(para->text)+1);
409	} else	591	} else
410	psiconv_debug(lev+4,off+len,"Paragraph length: %d",temp);	592	psiconv_debug(lev+4,off+len,"Paragraph length: %d",temp);
411	len += 4;	593	len += 4;
412		594
413	psiconv_progress(lev+4,off+len,"Going to read the paragraph type");	595	psiconv_progress(lev+4,off+len,"Going to read the paragraph type");
414	temp = psiconv_read_u8(buf,lev+4,off+len);	596	temp = psiconv_read_u8(buf,lev+4,off+len,&res);
		597	if (res)
		598	goto ERROR4;
415	if (temp != 0x00) {	599	if (temp != 0x00) {
416	psiconv_debug(lev+4,off+len,"Type: %02x",temp);	600	psiconv_debug(lev+4,off+len,"Type: %02x",temp);
417	for (j = 0; j < psiconv_list_length(anon_styles); j++) {	601	for (j = 0; j < psiconv_list_length(anon_styles); j++) {
418	anon_ptr = psiconv_list_get(anon_styles,j);	602	if (!(anon_ptr = psiconv_list_get(anon_styles,j))) {
		603	psiconv_warn(lev+4,off+len,"Massive memory curruption");
		604	goto ERROR4;
		605	}
419	if (temp == anon_ptr->nr)	606	if (temp == anon_ptr->nr)
420	break;	607	break;
421	}	608	}
422	if (j == psiconv_list_length(anon_styles)) {	609	if (j == psiconv_list_length(anon_styles)) {
423	psiconv_warn(lev+4,off+len,"Layout section paragraph type unknown");	610	psiconv_warn(lev+4,off+len,"Layout section paragraph type unknown");
424	psiconv_debug(lev+4,off+len,"Unknown type - using base styles instead");	611	psiconv_debug(lev+4,off+len,"Unknown type - using base styles instead");
425	para->base_style = 0;	612	para->base_style = 0;
		613	if (!(temp_style = psiconv_get_style(styles,0))) {
		614	psiconv_warn(lev+4,off,"Base style unknown");
		615	goto ERROR4;
		616	}
		617	if (!(temp_para = psiconv_clone_paragraph_layout
		618	(temp_style->paragraph)))
		619	goto ERROR4;
426	psiconv_free_paragraph_layout(para->base_paragraph);	620	psiconv_free_paragraph_layout(para->base_paragraph);
		621	para->base_paragraph = temp_para;
		622
		623	if (!(temp_char = psiconv_clone_character_layout
		624	(temp_style->character)))
		625	goto ERROR4;
427	psiconv_free_character_layout(para->base_character);	626	psiconv_free_character_layout(para->base_character);
428	para->base_paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	627	para->base_character = temp_char;
429	(styles,0)->paragraph);
430	para->base_character = psiconv_clone_character_layout(psiconv_get_style
431	(styles,0)->character);
432	} else {	628	} else {
433	para->base_style = anon_ptr->base_style;	629	para->base_style = anon_ptr->base_style;
		630	if (!(temp_para = psiconv_clone_paragraph_layout (anon_ptr->paragraph)))
		631	goto ERROR4;
434	psiconv_free_paragraph_layout(para->base_paragraph);	632	psiconv_free_paragraph_layout(para->base_paragraph);
		633	para->base_paragraph = temp_para;
		634
		635	if (!(temp_char = psiconv_clone_character_layout (anon_ptr->character)))
		636	goto ERROR4;
435	psiconv_free_character_layout(para->base_character);	637	psiconv_free_character_layout(para->base_character);
436	para->base_paragraph = psiconv_clone_paragraph_layout	638	para->base_character = temp_char;
437	(anon_ptr->paragraph);
438	para->base_character = psiconv_clone_character_layout
439	(anon_ptr->character);
440	}	639	}
441	inline_count[i] = 0;	640	inline_count[i] = 0;
442	len += 0x01;	641	len += 0x01;
443	} else {	642	} else {
444	psiconv_debug(lev+4,off+len,"Type: %02x (not based on a paragraph type)"	643	psiconv_debug(lev+4,off+len,"Type: %02x (not based on a paragraph type)"
445	,temp);	644	,temp);
446	len += 0x01;	645	len += 0x01;
447	if (parse_styles) {	646	if (parse_styles) {
448	psiconv_progress(lev+4,off+len+psiconv_read_u32(buf,lev+4,off+len),	647	temp = psiconv_read_u32(buf,lev+4,off+len,&res);
		648	if (res)
		649	goto ERROR4;
		650	psiconv_progress(lev+4,off+len+temp+4,
449	"Going to read the paragraph element base style");	651	"Going to read the paragraph element base style");
450	temp = psiconv_read_u8(buf,lev+4,	652	temp = psiconv_read_u8(buf,lev+4, off+len+temp+4,&res);
451	off+len+psiconv_read_u32(buf,lev+4,off+len));	653	if (res)
452	psiconv_debug(lev+4,off+len+psiconv_read_u32(buf,lev+4,off+len),	654	goto ERROR4;
453	"Style: %02x",temp);	655	psiconv_debug(lev+4,off+len+temp+4, "Style: %02x",temp);
454	} else	656	} else
455	temp = 0x00;	657	temp = 0x00;
		658
		659	if (!(temp_style = psiconv_get_style (styles,temp))) {
		660	psiconv_warn(lev+4,off,"Unknown Style referenced");
		661	if (!(temp_style = psiconv_get_style(styles,0))) {
		662	psiconv_warn(lev+4,off,"Base style unknown");
		663	goto ERROR4;
		664	}
		665	}
		666
		667	if (!(temp_para = psiconv_clone_paragraph_layout(temp_style->paragraph)))
		668	goto ERROR4;
456	psiconv_free_paragraph_layout(para->base_paragraph);	669	psiconv_free_paragraph_layout(para->base_paragraph);
		670	para->base_paragraph = temp_para;
		671
		672	if (!(temp_char = psiconv_clone_character_layout(temp_style->character)))
		673	goto ERROR4;
457	psiconv_free_character_layout(para->base_character);	674	psiconv_free_character_layout(para->base_character);
458	para->base_paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	675	para->base_character = temp_char;
459	(styles,temp)->paragraph);	676
460	para->base_character = psiconv_clone_character_layout(psiconv_get_style
461	(styles,temp)->character);
462	para->base_style = temp;	677	para->base_style = temp;
463	psiconv_progress(lev+4,off+len,"Going to read paragraph layout");	678	psiconv_progress(lev+4,off+len,"Going to read paragraph layout");
464	psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,	679	if ((res = psiconv_parse_paragraph_layout_list(buf,lev+4,off+len,&leng,
465	para->base_paragraph);	680	para->base_paragraph)))
		681	goto ERROR4;
466	len += leng;	682	len += leng;
467	if (parse_styles)	683	if (parse_styles)
468	len += 1;	684	len += 1;
469	psiconv_progress(lev+4,off+len,"Going to read number of in-line "	685	psiconv_progress(lev+4,off+len,"Going to read number of in-line "
470	"layout elements");	686	"layout elements");
471	inline_count[i] = psiconv_read_u32(buf,lev+4,off+len);	687	inline_count[i] = psiconv_read_u32(buf,lev+4,off+len,&res);
		688	if (res)
		689	goto ERROR4;
472	psiconv_debug(lev+4,off+len,"Nr: %08x",inline_count[i]);	690	psiconv_debug(lev+4,off+len,"Nr: %08x",inline_count[i]);
473	len += 4;	691	len += 4;
474	}	692	}
475	}	693	}
476		694
477	psiconv_progress(lev+2,off+len,"Going to read the text layout inline list");	695	psiconv_progress(lev+2,off+len,"Going to read the text layout inline list");
478		696
479	psiconv_progress(lev+3,off+len,"Going to read the number of elements");	697	psiconv_progress(lev+3,off+len,"Going to read the number of elements");
480	nr = psiconv_read_u32(buf,lev+3,off+len);	698	nr = psiconv_read_u32(buf,lev+3,off+len,&res);
		699	if (res)
		700	goto ERROR4;
481	psiconv_debug(lev+3,off,"Elements: %08x",nr);	701	psiconv_debug(lev+3,off+len,"Elements: %08x",nr);
482	len += 0x04;	702	len += 0x04;
483		703
484	psiconv_progress(lev+3,off+len,	704	psiconv_progress(lev+3,off+len,
485	"Going to read the text layout inline elements");	705	"Going to read the text layout inline elements");
486	total = 0;	706	total = 0;
487	for (i = 0; i < psiconv_list_length(result); i++) {	707	for (i = 0; i < psiconv_list_length(result); i++) {
488	para = psiconv_list_get(result,i);	708	if (!(para = psiconv_list_get(result,i))) {
		709	psiconv_warn(lev+3,off+len,"Massive memory corruption");
		710	goto ERROR4;
		711	}
489	line_length = -1;	712	line_length = -1;
490	for (j = 0; j < inline_count[i]; j++) {	713	for (j = 0; j < inline_count[i]; j++) {
491	psiconv_progress(lev+3,off+len,"Element %d: Paragraph %d, element %d",	714	psiconv_progress(lev+3,off+len,"Element %d: Paragraph %d, element %d",
492	total,i,j);	715	total,i,j);
493	if (total >= nr) {	716	if (total >= nr) {
494	psiconv_warn(lev+3,off+len,	717	psiconv_warn(lev+3,off+len,
495	"Layout section inlines: not enough element");	718	"Layout section inlines: not enough element");
496	res = -1;
497	psiconv_debug(lev+3,off+len,"Can't read element!");	719	psiconv_debug(lev+3,off+len,"Can't read element!");
498	} else {	720	} else {
499	total ++;	721	total ++;
		722	in_line.object = NULL;
		723	in_line.layout = NULL;
500	in_line.layout = psiconv_clone_character_layout(para->base_character);	724	if (!(in_line.layout = psiconv_clone_character_layout
		725	(para->base_character)))
		726	goto ERROR4;
501	psiconv_progress(lev+4,off+len,"Going to read the element type");	727	psiconv_progress(lev+4,off+len,"Going to read the element type");
502	temp = psiconv_read_u8(buf,lev+4,len+off);	728	temp = psiconv_read_u8(buf,lev+4,len+off,&res);
		729	if (res)
		730	goto ERROR5;
503	len += 1;	731	len += 1;
504	psiconv_debug(lev+4,off,"Type: %02x",temp);	732	psiconv_debug(lev+4,off+len,"Type: %02x",temp);
505	psiconv_progress(lev+4,off,	733	psiconv_progress(lev+4,off+len,
506	"Going to read the number of characters it applies to");	734	"Going to read the number of characters it applies to");
507	in_line.length = psiconv_read_u32(buf,lev+4,len+off);	735	in_line.length = psiconv_read_u32(buf,lev+4,len+off,&res);
		736	if (res)
		737	goto ERROR5;
508	psiconv_debug(lev+4,off+len,"Length: %02x",in_line.length);	738	psiconv_debug(lev+4,off+len,"Length: %02x",in_line.length);
509	len += 4;	739	len += 4;
510	psiconv_progress(lev+4,off+len,"Going to read the character layout");	740	psiconv_progress(lev+4,off+len,"Going to read the character layout");
511	res \|= psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,	741	if ((res = psiconv_parse_character_layout_list(buf,lev+4,off+len,&leng,
512	in_line.layout);	742	in_line.layout)))
		743	goto ERROR5;
513	len += leng;	744	len += leng;
514		745
515	if (temp == 0x01) {	746	if (temp == 0x01) {
516	psiconv_debug(lev+4,off+len,"Skipping object data");	747	psiconv_debug(lev+4,off+len,"Found an embedded object");
517	len += 0x10;	748	psiconv_progress(lev+4,off+len,"Going to read the object marker "
		749	"(0x%08x expected)",PSICONV_ID_OBJECT);
		750	temp = psiconv_read_u32(buf,lev+4,off+len,&res);
		751	if (res)
		752	goto ERROR5;
		753	if (temp != PSICONV_ID_OBJECT) {
		754	psiconv_warn(lev+4,off+len,"Unknown id marks embedded object");
		755	psiconv_debug(lev+4,off+len,"Marker: read %08x, expected %08x",
		756	temp,PSICONV_ID_OBJECT);
		757	}
		758	len += 4;
		759	psiconv_progress(lev+4,off+len,
		760	"Going to read the Embedded Object Section offset");
		761	temp = psiconv_read_u32(buf,lev+4,off+len,&res);
		762	if (res)
		763	goto ERROR5;
		764	psiconv_debug(lev+4,off+len, "Offset: %08x",temp);
		765	len += 4;
		766	psiconv_progress(lev+4,off+len,
		767	"Going to parse the Embedded Object Section");
		768	if ((res = psiconv_parse_embedded_object_section(buf,lev+4,temp,
		769	NULL,&(in_line.object))))
		770	goto ERROR5;
		771	psiconv_progress(lev+4,off+len,
		772	"Going to read the object width");
		773	in_line.object_width = psiconv_read_length(buf,lev+4,off+len,
		774	&leng,&res);
		775	if (res)
		776	goto ERROR5;
		777	psiconv_debug(lev+4,off+len,"Object width: %f cm",
		778	in_line.object_width);
		779	len += leng;
		780	psiconv_progress(lev+4,off+len,
		781	"Going to read the object height");
		782	in_line.object_height = psiconv_read_length(buf,lev+4,off+len,&leng,
		783	&res);
		784	if (res)
		785	goto ERROR5;
		786	psiconv_debug(lev+4,off+len,"Object height: %f cm",
		787	in_line.object_height);
		788	len += leng;
518	} else if (temp != 0x00) {	789	} else if (temp != 0x00) {
519	psiconv_warn(lev+4,off+len,"Layout section unknown inline type");	790	psiconv_warn(lev+4,off+len,"Layout section unknown inline type");
520	res = -1;
521	}	791	}
522	if (line_length + in_line.length > strlen(para->text)) {	792	if (line_length + in_line.length > strlen(para->text)) {
523	psiconv_warn(lev+4,off+len,	793	psiconv_warn(lev+4,off+len,
524	"Layout section inlines: line length mismatch");	794	"Layout section inlines: line length mismatch");
525	res = -1;	795	res = -1;
526	in_line.length = strlen(para->text) - line_length;	796	in_line.length = strlen(para->text) - line_length;
527	}	797	}
528	line_length += in_line.length;	798	line_length += in_line.length;
529	psiconv_list_add(para->in_lines,&in_line);	799	if ((res = psiconv_list_add(para->in_lines,&in_line)))
		800	goto ERROR5;
530	}	801	}
531	}	802	}
532	}	803	}
533		804
534	if (total != nr) {	805	if (total != nr) {
…		…
537	}	808	}
538		809
539	free(inline_count);	810	free(inline_count);
540		811
541	for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) {	812	for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) {
542	anon_ptr = psiconv_list_get(anon_styles,i);	813	if (!(anon_ptr = psiconv_list_get(anon_styles,i))) {
		814	psiconv_warn(lev+4,off+len,"Massive memory corruption");
		815	goto ERROR2;
		816	}
543	psiconv_free_character_layout(anon_ptr->character);	817	psiconv_free_character_layout(anon_ptr->character);
544	psiconv_free_paragraph_layout(anon_ptr->paragraph);	818	psiconv_free_paragraph_layout(anon_ptr->paragraph);
545	}	819	}
546	psiconv_list_free(anon_styles);	820	psiconv_list_free(anon_styles);
547		821
548	if (length)	822	if (length)
549	*length = len;	823	*length = len;
550		824
551	psiconv_progress(lev+1,off+len-1,"End of layout section (total length: %08x",	825	psiconv_progress(lev+1,off+len-1,"End of layout section (total length: %08x)",
552	len);	826	len);
553		827
		828	return 0;
		829
		830	ERROR4_4:
		831	psiconv_free_paragraph_layout(para->base_paragraph);
		832	ERROR4_3:
		833	psiconv_free_character_layout(para->base_character);
		834	ERROR4_2:
		835	psiconv_list_free(para->in_lines);
		836	ERROR4_1:
		837	free(para);
		838	goto ERROR4;
		839
		840	ERROR3_2:
		841	psiconv_free_character_layout(anon.character);
		842	ERROR3_1:
		843	psiconv_free_paragraph_layout(anon.paragraph);
		844	goto ERROR3;
		845
		846	ERROR5:
		847	if (in_line.layout)
		848	psiconv_free_character_layout(in_line.layout);
		849	if (in_line.object)
		850	psiconv_free_embedded_object_section(in_line.object);
		851	ERROR4:
		852	free(inline_count);
		853	ERROR3:
		854	for (i = 0; i < psiconv_list_length(anon_styles); i++) {
		855	if (!(anon_ptr = psiconv_list_get(anon_styles,i))) {
		856	psiconv_warn(lev+1,off,"Massive memory corruption");
		857	break;
		858	}
		859	psiconv_free_paragraph_layout(anon_ptr->paragraph);
		860	psiconv_free_character_layout(anon_ptr->character);
		861	}
		862
		863	ERROR2:
		864	psiconv_list_free(anon_styles);
		865	ERROR1:
		866	psiconv_warn(lev+1,off,"Reading of Layout Section failed");
		867	if (length)
		868	*length = 0;
		869	if (!res)
		870	return -PSICONV_E_NOMEM;
		871	else
554	return res;	872	return res;
555	}	873	}
556		874
557	int psiconv_parse_styled_layout_section(const psiconv_buffer buf,	875	int psiconv_parse_styled_layout_section(const psiconv_buffer buf,
558	int lev,psiconv_u32 off,	876	int lev,psiconv_u32 off,
559	int *length,	877	int *length,
…		…
562	{	880	{
563	return psiconv_parse_layout_section(buf,lev,off,length,result,styles,1);	881	return psiconv_parse_layout_section(buf,lev,off,length,result,styles,1);
564	}	882	}
565		883
566	int psiconv_parse_styleless_layout_section(const psiconv_buffer buf,	884	int psiconv_parse_styleless_layout_section(const psiconv_buffer buf,
567	int lev,psiconv_u32 off,	885	int lev,psiconv_u32 off,
568	int *length,	886	int *length,
569	psiconv_text_and_layout result,	887	psiconv_text_and_layout result,
570	psiconv_character_layout base_char,	888	const psiconv_character_layout base_char,
571	psiconv_paragraph_layout base_para)	889	const psiconv_paragraph_layout base_para)
572	{	890	{
573	int res;	891	int res = 0;
574	psiconv_word_styles_section styles_section;	892	psiconv_word_styles_section styles_section;
575		893
576	styles_section = malloc(sizeof(*styles_section));	894	if (!(styles_section = malloc(sizeof(*styles_section))))
		895	goto ERROR1;
577	styles_section->normal = malloc(sizeof(*styles_section->normal));	896	if (!(styles_section->normal = malloc(sizeof(*styles_section->normal))))
578	styles_section->normal->character = psiconv_clone_character_layout(base_char);	897	goto ERROR2;
579	styles_section->normal->paragraph = psiconv_clone_paragraph_layout(base_para);	898	if (!(styles_section->normal->character =
		899	psiconv_clone_character_layout(base_char)))
		900	goto ERROR3;
		901	if (!(styles_section->normal->paragraph =
		902	psiconv_clone_paragraph_layout(base_para)))
		903	goto ERROR4;
580	styles_section->normal->hotkey = 0;	904	styles_section->normal->hotkey = 0;
581	styles_section->normal->name = strdup("");	905	if (!(styles_section->normal->name = strdup("")))
		906	goto ERROR5;
582	styles_section->styles = psiconv_list_new(sizeof(struct psiconv_word_style));	907	if (!(styles_section->styles = psiconv_list_new(sizeof(
		908	struct psiconv_word_style_s))))
		909	goto ERROR6;
583		910
584	res = psiconv_parse_layout_section(buf,lev,off,length,result,	911	res = psiconv_parse_layout_section(buf,lev,off,length,result,
585	styles_section,0);	912	styles_section,0);
586		913
587	psiconv_free_word_styles_section(styles_section);	914	psiconv_free_word_styles_section(styles_section);
588	return res;	915	return res;
		916
		917	ERROR6:
		918	free(styles_section->normal->name);
		919	ERROR5:
		920	psiconv_free_paragraph_layout(styles_section->normal->paragraph);
		921	ERROR4:
		922	psiconv_free_character_layout(styles_section->normal->character);
		923	ERROR3:
		924	free(styles_section->normal);
		925	ERROR2:
		926	free(styles_section);
		927	ERROR1:
		928	psiconv_warn(lev+1,off,"Reading of Styleless Layout Section failed");
		929	if (length)
		930	*length = 0;
		931	if (!res)
		932	return -PSICONV_E_NOMEM;
		933	else
		934	return res;
589	}	935	}
590		936
		937	int psiconv_parse_embedded_object_section(const psiconv_buffer buf, int lev,
		938	psiconv_u32 off, int *length,
		939	psiconv_embedded_object_section *result)
		940	{
		941	int res=0;
		942	int len=0;
		943	int leng,i;
		944	psiconv_section_table_section table;
		945	psiconv_section_table_entry entry;
		946	psiconv_u32 icon_sec=0,display_sec=0,table_sec=0;
		947	psiconv_buffer subbuf;
		948
		949	psiconv_progress(lev+1,off+len,"Going to read an Embedded Object");
		950	if (!(result = malloc(sizeof(*result))))
		951	goto ERROR1;
		952
		953	psiconv_progress(lev+2,off+len,"Going to read the Embedded Object Section");
		954	psiconv_parse_section_table_section(buf,lev+2,off+len,&leng,&table);
		955	len += leng;
		956
		957	for (i = 0; i < psiconv_list_length(table); i++) {
		958	psiconv_progress(lev+2,off+len,"Going to read entry %d",i);
		959	if (!(entry = psiconv_list_get(table,i)))
		960	goto ERROR2;
		961	if (entry->id == PSICONV_ID_OBJECT_DISPLAY_SECTION) {
		962	display_sec = entry->offset;
		963	psiconv_debug(lev+3,off+len,"Found the Object Display Section at %08x",
		964	display_sec);
		965	} else if (entry->id == PSICONV_ID_OBJECT_ICON_SECTION) {
		966	icon_sec = entry->offset;
		967	psiconv_debug(lev+3,off+len,"Found the Object Icon Section at %08x",
		968	icon_sec);
		969	} else if (entry->id == PSICONV_ID_OBJECT_SECTION_TABLE_SECTION) {
		970	table_sec = entry->offset;
		971	psiconv_debug(lev+3,off+len,"Found the Object Section Table Section at %08x",
		972	table_sec);
		973	} else {
		974	psiconv_warn(lev+3,off+len,
		975	"Found unknown section in the Object Display Section "
		976	"(ignoring)");
		977	psiconv_debug(lev+3,off+len,"Section ID %08x, offset %08x",
		978	entry->id, entry->offset);
		979	}
		980	}
		981
		982	psiconv_progress(lev+2,off+len,"Looking for the Object Display Section");
		983	if (!icon_sec) {
		984	psiconv_warn(lev+2,off+len,"Object Display Section not found");
		985	(*result)->display = NULL;
		986	} else {
		987	psiconv_debug(lev+2,off+len,"Object Display Section at offset %08x",
		988	display_sec);
		989	if ((res = psiconv_parse_object_display_section(buf,lev+2,display_sec,NULL,
		990	&(*result)->display)))
		991	goto ERROR2;
		992	}
		993
		994	psiconv_progress(lev+2,off+len,"Looking for the Object Icon Section");
		995	if (!icon_sec) {
		996	psiconv_warn(lev+2,off+len,"Object Icon Section not found");
		997	(*result)->icon = NULL;
		998	} else {
		999	psiconv_debug(lev+2,off+len,"Object Icon Section at offset %08x",icon_sec);
		1000	if ((res = psiconv_parse_object_icon_section(buf,lev+2,icon_sec,NULL,
		1001	&(*result)->icon)))
		1002	goto ERROR3;
		1003	}
		1004
		1005	psiconv_progress(lev+2,off+len,
		1006	"Looking for the Section Table Offset Section");
		1007	if (!table_sec) {
		1008	psiconv_warn(lev+2,off+len,
		1009	"Embedded Section Table Offset Section not found");
		1010	(*result)->object = NULL;
		1011	} else {
		1012	psiconv_progress(lev+2,off+len,
		1013	"Extracting object: add %08x to all following offsets",
		1014	table_sec);
		1015	/* We can't determine the length of the object, so we just take it all */
		1016	if ((res = psiconv_buffer_subbuffer(&subbuf,buf,table_sec,
		1017	psiconv_buffer_length(buf)-table_sec)))
		1018	goto ERROR4;
		1019
		1020	if (!((result)->object = malloc(sizeof((*result)->object))))
		1021	goto ERROR5;
		1022
		1023	/* We need to find the file type, but we don't have a normal header */
		1024	/* So we try to find the Application ID Section and hope for the best */
		1025	psiconv_progress(lev+3,0,"Trying to determine the file type");
		1026	(*result)->object->type = psiconv_determine_embedded_object_type
		1027	(subbuf,lev+3,&res);
		1028	switch ((*result)->object->type) {
		1029	case psiconv_word_file:
		1030	if ((res = psiconv_parse_word_file(subbuf,lev+3,0,
		1031	((psiconv_word_f ) &(result)->object->file))))
		1032	goto ERROR6;
		1033	break;
		1034	case psiconv_texted_file:
		1035	if ((res = psiconv_parse_texted_file(subbuf,lev+3,0,
		1036	((psiconv_texted_f ) &(result)->object->file))))
		1037	goto ERROR6;
		1038	break;
		1039	case psiconv_sheet_file:
		1040	if ((res = psiconv_parse_sheet_file(subbuf,lev+3,0,
		1041	((psiconv_sheet_f ) &(result)->object->file))))
		1042	goto ERROR6;
		1043	break;
		1044	case psiconv_sketch_file:
		1045	if ((res = psiconv_parse_sketch_file(subbuf,lev+3,0,
		1046	((psiconv_sketch_f ) &(result)->object->file))))
		1047	goto ERROR6;
		1048	break;
		1049	default:
		1050	psiconv_warn(lev+3,0,"Can't parse embedded object (still continuing)");
		1051	(*result)->object->file = NULL;
		1052	}
		1053	}
		1054
		1055	if (length)
		1056	*length = len;
		1057
		1058	psiconv_progress(lev+1,off+len-1,"End of Embedded Object Section "
		1059	"(total length: %08x)",len);
		1060
		1061	return res;
		1062
		1063
		1064	ERROR6:
		1065	free((*result)->object);
		1066	ERROR5:
		1067	psiconv_buffer_free(subbuf);
		1068	ERROR4:
		1069	psiconv_free_object_icon_section((*result)->icon);
		1070	ERROR3:
		1071	psiconv_free_object_display_section((*result)->display);
		1072	ERROR2:
		1073	psiconv_free_section_table_section(table);
		1074	ERROR1:
		1075	psiconv_warn(lev+1,off,"Reading Embedded Object failed");
		1076
		1077	if (length)
		1078	*length = 0;
		1079
		1080	if (res == 0)
		1081	return -PSICONV_E_NOMEM;
		1082	else
		1083	return res;
		1084	}
		1085
		1086	psiconv_file_type_t psiconv_determine_embedded_object_type
		1087	(const psiconv_buffer buf,int lev,
		1088	int *status)
		1089	{
		1090	psiconv_u32 off;
		1091	psiconv_section_table_section table;
		1092	int res,i;
		1093	psiconv_file_type_t file_type = psiconv_unknown_file;
		1094	psiconv_section_table_entry entry;
		1095	psiconv_application_id_section applid;
		1096
		1097	psiconv_progress(lev+1,0,"Going to determine embedded object file type");
		1098	psiconv_progress(lev+2,0,"Going to read the Section Table Offset Section");
		1099	off = psiconv_read_u32(buf,lev,0,&res);
		1100	if (res)
		1101	goto ERROR1;
		1102	psiconv_debug(lev+2,0,"Offset: %08x",off);
		1103
		1104	psiconv_progress(lev+2,off,"Going to read the Section Table Section");
		1105	if ((res = psiconv_parse_section_table_section(buf,lev+2,off,NULL,&table)))
		1106	goto ERROR1;
		1107
		1108	psiconv_progress(lev+2,off,"Going to search the Section Table Section "
		1109	"for the Application ID Section");
		1110	for (i=0; i < psiconv_list_length(table); i++) {
		1111	psiconv_progress(lev+3,off,"Going to read entry %d",i);
		1112	if (!(entry = psiconv_list_get(table,i)))
		1113	goto ERROR2;
		1114	if (entry->id == PSICONV_ID_APPL_ID_SECTION) {
		1115	psiconv_progress(lev+3,off,
		1116	"Found the Application ID Section at offset %08x",
		1117	entry->offset);
		1118	off = entry->offset;
		1119	break;
		1120	}
		1121	}
		1122	if (i == psiconv_list_length(table)) {
		1123	psiconv_warn(lev+2,off,"No Application ID Section found");
		1124	res = PSICONV_E_PARSE;
		1125	goto ERROR2;
		1126	}
		1127
		1128	psiconv_progress(lev+2,off,"Going to read the Application ID Section");
		1129	if ((res = psiconv_parse_application_id_section(buf,lev+2,off,NULL,&applid)))
		1130	goto ERROR2;
		1131
		1132	switch (applid->id) {
		1133	case PSICONV_ID_WORD: file_type = psiconv_word_file;
		1134	psiconv_debug(lev+2,off,"Found a Word file");
		1135	break;
		1136	case PSICONV_ID_TEXTED: file_type = psiconv_texted_file;
		1137	psiconv_debug(lev+2,off,"Found a TextEd file");
		1138	break;
		1139	case PSICONV_ID_SKETCH: file_type = psiconv_sketch_file;
		1140	psiconv_debug(lev+2,off,"Found a Sketch file");
		1141	break;
		1142	case PSICONV_ID_SHEET: file_type = psiconv_sheet_file;
		1143	psiconv_debug(lev+2,off,"Found a Sheet file");
		1144	break;
		1145	default: psiconv_warn(lev+2,off,"Found an unknown file type");
		1146	psiconv_debug(lev+2,off,"Found ID %08x",applid->id);
		1147	}
		1148
		1149	ERROR2:
		1150	psiconv_free_application_id_section(applid);
		1151	ERROR1:
		1152	psiconv_free_section_table_section(table);
		1153	if (status)
		1154	*status = res;
		1155	return file_type;
		1156
		1157	}
		1158
		1159	int psiconv_parse_object_display_section(const psiconv_buffer buf,int lev,
		1160	psiconv_u32 off, int *length,
		1161	psiconv_object_display_section *result)
		1162	{
		1163	int res = 0;
		1164	int len = 0;
		1165	int leng;
		1166	psiconv_u32 temp;
		1167
		1168	psiconv_progress(lev+1,off,"Going to read the Object Display Section");
		1169	if (!(result = malloc(sizeof(*result))))
		1170	goto ERROR1;
		1171
		1172	psiconv_progress(lev+2,off+len,"Going to read the display as icon flag "
		1173	"(expecting 0x00 or 0x01)");
		1174	temp = psiconv_read_u8(buf,lev+2,off+len,&res);
		1175	if (res)
		1176	goto ERROR2;
		1177	if (temp == 0x00) {
		1178	(*result)->show_icon = psiconv_bool_true;
		1179	psiconv_debug(lev+2,off+len,"Displayed as icon");
		1180	} else if (temp == 0x01) {
		1181	(*result)->show_icon = psiconv_bool_false;
		1182	psiconv_debug(lev+2,off+len,"Displayed as full document");
		1183	} else {
		1184	psiconv_warn(lev+2,off+len,"Unknown Object Display Section Icon Flag");
		1185	psiconv_debug(lev+2,off+len,"Icon flag found: %02x",temp);
		1186	/* Improvise */
		1187	(*result)->show_icon = (temp & 0x01?psiconv_bool_false:psiconv_bool_true);
		1188	}
		1189	len ++;
		1190
		1191	psiconv_progress(lev+2,off+len,"Going to read the display width");
		1192	(*result)->width = psiconv_read_length(buf,lev+2,off+len,&leng,&res);
		1193	if (res)
		1194	goto ERROR2;
		1195	psiconv_debug(lev+2,off+len,"Display width: %f cm",(*result)->width);
		1196	len += leng;
		1197
		1198	psiconv_progress(lev+2,off+len,"Going to read the display height");
		1199	(*result)->height = psiconv_read_length(buf,lev+2,off+len,&leng,&res);
		1200	if (res)
		1201	goto ERROR2;
		1202	psiconv_debug(lev+2,off+len,"Display length: %f cm",(*result)->height);
		1203	len += leng;
		1204
		1205	psiconv_progress(lev+2,off+len,"Going to read unknown long (%08x expected)",
		1206	0);
		1207	temp = psiconv_read_u32(buf,lev+2,off+len,&res);
		1208	if (temp != 0) {
		1209	psiconv_warn(lev+2,off+len,"Unknown Object Display Section final long");
		1210	psiconv_debug(lev+2,off+len,"Long read: %08x",temp);
		1211	}
		1212	len += 4;
		1213
		1214	if (length)
		1215	*length = len;
		1216
		1217	psiconv_progress(lev+1,off+len-1,"End of Object Display Section "
		1218	"(total length: %08x",len);
		1219	return res;
		1220
		1221	ERROR2:
		1222	free(*result);
		1223	ERROR1:
		1224	psiconv_warn(lev+1,off+len,"Reading of Object Display Section failed");
		1225	if (length)
		1226	*length=0;
		1227	if (!res)
		1228	return -PSICONV_E_NOMEM;
		1229	else
		1230	return res;
		1231	}
		1232
		1233	int psiconv_parse_object_icon_section(const psiconv_buffer buf,int lev,
		1234	psiconv_u32 off, int *length,
		1235	psiconv_object_icon_section *result)
		1236	{
		1237	int res = 0;
		1238	int len = 0;
		1239	int leng;
		1240
		1241	psiconv_progress(lev+1,off,"Going to read the Object Icon Section");
		1242	if (!(result = malloc(sizeof(*result))))
		1243	goto ERROR1;
		1244
		1245	psiconv_progress(lev+2,off+len,"Going to read the icon name");
		1246	(*result)->icon_name = psiconv_read_string(buf,lev+2,off+len,&leng,&res);
		1247	if (res)
		1248	goto ERROR2;
		1249	psiconv_debug(lev+2,off+len,"Icon name: %s",(*result)->icon_name);
		1250	len += leng;
		1251
		1252	psiconv_progress(lev+2,off+len,"Going to read the icon width");
		1253	(*result)->icon_width = psiconv_read_length(buf,lev+2,off+len,&leng,&res);
		1254	if (res)
		1255	goto ERROR3;
		1256	psiconv_debug(lev+2,off+len,"Icon width: %f cm",(*result)->icon_width);
		1257	len += leng;
		1258
		1259	psiconv_progress(lev+2,off+len,"Going to read the icon height");
		1260	(*result)->icon_height = psiconv_read_length(buf,lev+2,off+len,&leng,&res);
		1261	if (res)
		1262	goto ERROR3;
		1263	psiconv_debug(lev+2,off+len,"Icon length: %f cm",(*result)->icon_height);
		1264	len += leng;
		1265
		1266	if (length)
		1267	*length = len;
		1268
		1269	psiconv_progress(lev+1,off+len-1,"End of Object Icon Section"
		1270	"(total length: %08x",len);
		1271	return res;
		1272
		1273	ERROR3:
		1274	free((*result)->icon_name);
		1275	ERROR2:
		1276	free(*result);
		1277	ERROR1:
		1278	psiconv_warn(lev+1,off+len,"Reading of Object Icon Section failed");
		1279	if (length)
		1280	*length=0;
		1281	if (!res)
		1282	return -PSICONV_E_NOMEM;
		1283	else
		1284	return res;
		1285	}

 Legend:



Removed from v.12
 


changed lines


 
Added in v.167
 Legend:



Removed from v.12
 


changed lines


 
Added in v.167
-Removed from v.12
+Added in v.167

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