/[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 41		Revision 162
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.
…		…
20	#include "config.h"	20	#include "config.h"
21	#include "compat.h"	21	#include "compat.h"
22	#include <stdlib.h>	22	#include <stdlib.h>
23	#include <string.h>	23	#include <string.h>
24		24
25	#include "data.h"
26	#include "parse_routines.h"	25	#include "parse_routines.h"
		26	#include "error.h"
		27
		28	#ifdef DMALLOC
		29	#include <dmalloc.h>
		30	#endif
		31
27		32
28	static int psiconv_parse_layout_section(const psiconv_buffer buf,	33	static int psiconv_parse_layout_section(const psiconv_buffer buf,
29	int lev,psiconv_u32 off,	34	int lev,psiconv_u32 off,
30	int *length,	35	int *length,
31	psiconv_text_and_layout result,	36	psiconv_text_and_layout result,
32	psiconv_word_styles_section styles,	37	psiconv_word_styles_section styles,
33	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);
34		42
35	int psiconv_parse_header_section(const psiconv_buffer buf,int lev,	43	int psiconv_parse_header_section(const psiconv_buffer buf,int lev,
36	psiconv_u32 off, int *length,	44	psiconv_u32 off, int *length,
37	psiconv_header_section *result)	45	psiconv_header_section *result)
38	{	46	{
39	int res=0;	47	int res=0;
40	int len=0;	48	int len=0;
41	psiconv_u32 temp;	49	psiconv_u32 temp;
42		50
43	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");
44	(result) = malloc(sizeof(*result));	52	if (!((result) = malloc(sizeof(*result))))
		53	goto ERROR1;
45		54
46	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");
47	(*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;
48	psiconv_debug(lev+2,off+len,"UID1: %08x",(*result)->uid1);	59	psiconv_debug(lev+2,off+len,"UID1: %08x",(*result)->uid1);
49	if ((*result)->uid1 == PSICONV_ID_CLIPART) {	60	if ((*result)->uid1 == PSICONV_ID_CLIPART) {
50	/* That's all folks... */	61	/* That's all folks... */
51	(*result)->file = psiconv_clipart_file;	62	(*result)->file = psiconv_clipart_file;
52	(*result)->uid2 = 0;	63	(*result)->uid2 = 0;
53	(*result)->uid3 = 0;	64	(*result)->uid3 = 0;
54	(*result)->checksum = 0;	65	(*result)->checksum = 0;
55	len += 4;	66	len += 4;
		67	psiconv_debug(lev+2,off+len,"File is a Clipart file");
56	goto DONE;	68	goto DONE;
57	}	69	}
58	if ((*result)->uid1 != PSICONV_ID_PSION5) {	70	if ((*result)->uid1 != PSICONV_ID_PSION5) {
59	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 "
60	"not a (parsable) Psion 5 file");	72	"not a (parsable) Psion 5 file");
61	res = -1;	73	res = -PSICONV_E_PARSE;
		74	goto ERROR2;
62	}	75	}
63	len += 4;	76	len += 4;
64	(*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;
65	psiconv_debug(lev+2,off+len,"UID2: %08x",(*result)->uid2);	80	psiconv_debug(lev+2,off+len,"UID2: %08x",(*result)->uid2);
66	len += 4;	81	len += 4;
67	(*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;
68	psiconv_debug(lev+2,off+len,"UID3: %08x",(*result)->uid3);	85	psiconv_debug(lev+2,off+len,"UID3: %08x",(*result)->uid3);
69	len += 4;	86	len += 4;
70		87
71	(*result)->file = psiconv_unknown_file;	88	(*result)->file = psiconv_unknown_file;
72	if ((*result)->uid1 == PSICONV_ID_PSION5) {	89	if ((*result)->uid1 == PSICONV_ID_PSION5) {
…		…
78	(*result)->file = psiconv_texted_file;	95	(*result)->file = psiconv_texted_file;
79	psiconv_debug(lev+2,off+len,"File is a TextEd file");	96	psiconv_debug(lev+2,off+len,"File is a TextEd file");
80	} else if ((*result)->uid3 == PSICONV_ID_SKETCH) {	97	} else if ((*result)->uid3 == PSICONV_ID_SKETCH) {
81	(*result)->file = psiconv_sketch_file;	98	(*result)->file = psiconv_sketch_file;
82	psiconv_debug(lev+2,off+len,"File is a 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");
83	}	103	}
84	} else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) {	104	} else if ((*result)->uid2 == PSICONV_ID_MBM_FILE) {
85	(*result)->file = psiconv_mbm_file;	105	(*result)->file = psiconv_mbm_file;
86	if ((*result)->uid3 != 0x00)	106	if ((*result)->uid3 != 0x00)
87	psiconv_warn(lev+2,off+len,"UID3 set in MBM file?!?");	107	psiconv_warn(lev+2,off+len,"UID3 set in MBM file?!?");
88	psiconv_debug(lev+2,off+len,"File is a MBM file");	108	psiconv_debug(lev+2,off+len,"File is a MBM file");
…		…
92	psiconv_warn(lev+2,off+len,"Unknown file type");	112	psiconv_warn(lev+2,off+len,"Unknown file type");
93	(*result)->file = psiconv_unknown_file;	113	(*result)->file = psiconv_unknown_file;
94	}	114	}
95		115
96	psiconv_progress(lev+2,off+len,"Checking UID4");	116	psiconv_progress(lev+2,off+len,"Checking UID4");
97	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;
98	if (temp == psiconv_checkuid((result)->uid1,(result)->uid2,	120	if (temp == psiconv_checkuid((result)->uid1,(result)->uid2,
99	(*result)->uid3))	121	(*result)->uid3))
100	psiconv_debug(lev+2,off+len,"Checksum %08x is correct",temp);	122	psiconv_debug(lev+2,off+len,"Checksum %08x is correct",temp);
101	else {	123	else {
102	psiconv_warn(lev+2,off+len,"Checksum failed, file corrupted!");	124	psiconv_warn(lev+2,off+len,"Checksum failed, file corrupted!");
103	psiconv_debug(lev+2,off+len,"Expected checksum %08x, found %08x",	125	psiconv_debug(lev+2,off+len,"Expected checksum %08x, found %08x",
104	psiconv_checkuid((result)->uid1,(result)->uid2,	126	psiconv_checkuid((result)->uid1,(result)->uid2,
105	(*result)->uid3),temp);	127	(*result)->uid3),temp);
106	res = -1;	128	res = -PSICONV_E_PARSE;
		129	goto ERROR2;
107	}	130	}
108	len += 4;	131	len += 4;
109		132
110	DONE:	133	DONE:
111	if (length)	134	if (length)
…		…
113		136
114	psiconv_progress(lev+1,off+len-1,	137	psiconv_progress(lev+1,off+len-1,
115	"End of Header Section (total length: %08x)",len);	138	"End of Header Section (total length: %08x)",len);
116		139
117	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;
118	}	152	}
119		153
120	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,
121	psiconv_u32 off, int *length,	155	psiconv_u32 off, int *length,
122	psiconv_section_table_section *result)	156	psiconv_section_table_section *result)
…		…
127		161
128	int i;	162	int i;
129	psiconv_u8 nr;	163	psiconv_u8 nr;
130		164
131	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");
132	result = psiconv_list_new(sizeof(entry));	166	if (!(result = psiconv_list_new(sizeof(entry))))
		167	goto ERROR1;
133		168
134	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");
135	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;
136	psiconv_debug(lev+2,off+len,"Length: %08x",nr);	173	psiconv_debug(lev+2,off+len,"Length: %08x",nr);
137	if (nr & 0x01) {	174	if (nr & 0x01) {
138	psiconv_warn(lev+2,off+len,	175	psiconv_warn(lev+2,off+len,
139	"Section table length odd - ignoring last entry");	176	"Section table length odd - ignoring last entry");
140	res = -1;
141	}	177	}
142	len ++;	178	len ++;
143		179
144	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");
145	entry = malloc(sizeof(*entry));	181	entry = malloc(sizeof(*entry));
146	for (i = 0; i < nr / 2; i++) {	182	for (i = 0; i < nr / 2; i++) {
147	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;
148	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);
149	len += 0x04;	187	len += 0x04;
150	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;
151	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);
152	len += 0x04;	192	len += 0x04;
153	psiconv_list_add(*result,entry);	193	if ((res=psiconv_list_add(*result,entry)))
		194	goto ERROR3;
154	}	195	}
155		196
156	free(entry);	197	free(entry);
157		198
158	if (length)	199	if (length)
159	*length = len;	200	*length = len;
160		201
161	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 "
162	"(total length: %08x)", len);	203	"(total length: %08x)", len);
163		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
164	return res;	217	return res;
165	}	218	}
166		219
167	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,
168	psiconv_u32 off, int *length,	221	psiconv_u32 off, int *length,
169	psiconv_application_id_section *result)	222	psiconv_application_id_section *result)
…		…
171	int res=0;	224	int res=0;
172	int len=0;	225	int len=0;
173	int leng;	226	int leng;
174		227
175	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");
176	(result) = malloc(sizeof(*result));	229	if (!(result = malloc(sizeof(*result))))
		230	goto ERROR1;
177		231
178	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");
179	(*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;
180	psiconv_debug(lev+2,off+len,"Identifier: %08x",(*result)->id);	236	psiconv_debug(lev+2,off+len,"Identifier: %08x",(*result)->id);
181	len += 4;	237	len += 4;
182		238
183	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");
184	(*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;
185	len += leng;	243	len += leng;
186		244
187	if (length)	245	if (length)
188	*length = len;	246	*length = len;
189		247
190	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 "
191	"(total length: %08x", len);	249	"(total length: %08x", len);
192		250
193	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;
194	}	262	}
195		263
196	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,
197	int length,psiconv_text_and_layout result)	265	int length,psiconv_text_and_layout result)
198	{	266	{
…		…
202		270
203	psiconv_u32 text_len;	271	psiconv_u32 text_len;
204	psiconv_paragraph para;	272	psiconv_paragraph para;
205		273
206	int nr;	274	int nr;
207	int i,j,start,leng;	275	int i,j,start,leng,temp;
208	char *str_copy;	276	char *str_copy;
209		277
210	psiconv_progress(lev+1,off,"Going to parse the text section");	278	psiconv_progress(lev+1,off,"Going to parse the text section");
211	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
212	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;
213	psiconv_debug(lev+2,off,"Length: %08x",text_len);	289	psiconv_debug(lev+2,off,"Length: %08x",text_len);
214	len += leng;	290	len += leng;
215
216	result = psiconv_list_new(sizeof(para));
217	para = malloc(sizeof(*para));
218		291
219	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");
220	nr = 0;	293	nr = 0;
221	start = 0;	294	start = 0;
222	for (i = 0; i < text_len; i++)	295	for (i = 0; i < text_len; i++) {
223	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) {
224	para->text = malloc(i - start + 1);	300	if (!(para->text = malloc(i - start + 1)))
		301	goto ERROR3;
225	for (j = 0; j < i - start; j++)	302	for (j = 0; j < i - start; j++) {
226	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	}
227	para->text[j] = 0;	308	para->text[j] = 0;
228		309
229	psiconv_list_add(*result,para);	310	if ((res = psiconv_list_add(*result,para)))
		311	goto ERROR4;
230		312
231	str_copy = psiconv_make_printable(para->text);	313	if (!(str_copy = psiconv_make_printable(para->text)))
		314	goto ERROR3;
232	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,
233	strlen(str_copy) +1);	316	strlen(str_copy) +1);
234	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);
235	free(str_copy);	318	free(str_copy);
236		319
237	start = i + 1;	320	start = i + 1;
238	nr ++;	321	nr ++;
239	}	322	}
		323	}
240		324
241	if (start != text_len) {	325	if (start != text_len) {
242	res = -1;
243	psiconv_warn(lev+2,off+start+len,	326	psiconv_warn(lev+2,off+start+len,
244	"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);
245	para->text = malloc(text_len - start + 1);	328	if (!(para->text = malloc(text_len - start + 1)))
		329	goto ERROR3;
246	for (j = 0; j < text_len - start; j++)	330	for (j = 0; j < text_len - start; j++) {
247	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	}
248	para->text[text_len - start] = 0;	336	para->text[text_len - start] = 0;
249	psiconv_list_add(*result,para);	337	if ((res = psiconv_list_add(*result,para)))
		338	goto ERROR4;
250	str_copy = psiconv_make_printable(para->text);	339	if (!(str_copy = psiconv_make_printable(para->text)))
		340	goto ERROR3;
251	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,
252	strlen(str_copy)+1);	342	strlen(str_copy)+1);
253	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);
254	free(str_copy);	344	free(str_copy);
255	}	345	}
256		346
257	free(para);	347	free(para);
258		348
259	/* Initialize the remaining parts of each paragraph */	349	/* Initialize the remaining parts of each paragraph */
260	for (i = 0; i < psiconv_list_length(*result); i ++) {	350	for (i = 0; i < psiconv_list_length(*result); i ++) {
261	para = psiconv_list_get(*result,i);	351	if (!(para = psiconv_list_get(*result,i))) {
262	para->in_lines = psiconv_list_new(sizeof(struct psiconv_in_line_layout));	352	psiconv_warn(lev+2,off+len,"Massive memory corruption");
263	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;
264	para->base_style = 0;	365	para->base_style = 0;
265	para->base_character = psiconv_basic_character_layout();
266	para->base_paragraph = psiconv_basic_paragraph_layout();
267	}	366	}
268		367
269		368
270	len += text_len;	369	len += text_len;
271		370
…		…
274		373
275	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",
276	len);	375	len);
277		376
278	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;
279	}	419	}
280		420
281	/* 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 */
282	int psiconv_parse_layout_section(const psiconv_buffer buf,	422	int psiconv_parse_layout_section(const psiconv_buffer buf,
283	int lev,psiconv_u32 off,	423	int lev,psiconv_u32 off,
…		…
289	int res = 0;	429	int res = 0;
290	int len = 0;	430	int len = 0;
291	psiconv_u32 temp;	431	psiconv_u32 temp;
292	int parse_styles,nr,i,j,total,leng,line_length;	432	int parse_styles,nr,i,j,total,leng,line_length;
293		433
294	typedef struct anon_style	434	typedef struct anon_style_s
295	{	435	{
296	int nr;	436	int nr;
297	psiconv_s16 base_style;	437	psiconv_s16 base_style;
298	psiconv_character_layout character;	438	psiconv_character_layout character;
299	psiconv_paragraph_layout paragraph;	439	psiconv_paragraph_layout paragraph;
300	} *anon_style;	440	} *anon_style;
301		441
302	typedef psiconv_list anon_style_list; /* of struct anon_style */	442	typedef psiconv_list anon_style_list; /* of struct anon_style */
303		443
304	anon_style_list anon_styles;	444	anon_style_list anon_styles;
305	struct anon_style anon;	445	struct anon_style_s anon;
306	anon_style anon_ptr=NULL;	446	anon_style anon_ptr=NULL;
307		447
		448	psiconv_character_layout temp_char;
		449	psiconv_paragraph_layout temp_para;
		450	psiconv_word_style temp_style;
308	psiconv_paragraph para;	451	psiconv_paragraph para;
309	struct psiconv_in_line_layout in_line;	452	struct psiconv_in_line_layout_s in_line;
310		453
311	int *inline_count;	454	int *inline_count;
312		455
313		456
314	psiconv_progress(lev+1,off,"Going to read the layout section");	457	psiconv_progress(lev+1,off,"Going to read the layout section");
315		458
316	psiconv_progress(lev+2,off,"Going to read the section type");	459	psiconv_progress(lev+2,off,"Going to read the section type");
317	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;
318	psiconv_debug(lev+2,off+len,"Type: %02x",temp);	463	psiconv_debug(lev+2,off+len,"Type: %02x",temp);
319	parse_styles = with_styles;	464	parse_styles = with_styles;
320	if ((temp == 0x0001) && !with_styles) {	465	if ((temp == 0x0001) && !with_styles) {
321	psiconv_warn(lev+2,off+len,"Styleless layout section expected, "	466	psiconv_warn(lev+2,off+len,"Styleless layout section expected, "
322	"but styled section found!");	467	"but styled section found!");
323	parse_styles = 1;	468	parse_styles = 1;
324	res = -1;
325	} else if ((temp == 0x0000) && (with_styles)) {	469	} else if ((temp == 0x0000) && (with_styles)) {
326	psiconv_warn(lev+2,off+len,"Styled layout section expected, "	470	psiconv_warn(lev+2,off+len,"Styled layout section expected, "
327	"but styleless section found!");	471	"but styleless section found!");
328	parse_styles = 0;	472	parse_styles = 0;
329	res = -1;
330	} else if ((temp != 0x0000) && (temp != 0x0001)) {	473	} else if ((temp != 0x0000) && (temp != 0x0001)) {
331	psiconv_warn(lev+2,off+len,	474	psiconv_warn(lev+2,off+len,
332	"Layout section type indicator has unknown value!");	475	"Layout section type indicator has unknown value!");
333	res = -1;
334	}	476	}
335	len += 0x02;	477	len += 0x02;
336		478
337	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");
338	anon_styles = psiconv_list_new(sizeof(anon));	480	if (!(anon_styles = psiconv_list_new(sizeof(anon))))
		481	goto ERROR1;
339	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");
340	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;
341	psiconv_debug(lev+3,off+len,"Length: %02x",nr);	486	psiconv_debug(lev+3,off+len,"Length: %02x",nr);
342	len ++;	487	len ++;
343		488
344	psiconv_progress(lev+3,off+len,	489	psiconv_progress(lev+3,off+len,
345	"Going to read the paragraph type list elements");	490	"Going to read the paragraph type list elements");
346	for (i = 0; i < nr; i ++) {	491	for (i = 0; i < nr; i ++) {
347	psiconv_progress(lev+3,off+len,"Element %d",i);	492	psiconv_progress(lev+3,off+len,"Element %d",i);
348	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;
349	psiconv_debug(lev+4,off+len,"Number: %08x",anon.nr);	496	psiconv_debug(lev+4,off+len,"Number: %08x",anon.nr);
350	len += 0x04;	497	len += 0x04;
351		498
352	psiconv_progress(lev+4,off,"Going to determine the base style");	499	psiconv_progress(lev+4,off,"Going to determine the base style");
353	if (parse_styles) {	500	if (parse_styles) {
		501	temp = psiconv_read_u32(buf,lev+4, off+len,&res);
		502	if (res)
		503	goto ERROR3;
354	anon.base_style = psiconv_read_u8(buf,lev+3,	504	anon.base_style = psiconv_read_u8(buf,lev+3, off+len+4+temp,&res);
355	off+len+4+psiconv_read_u32(buf,lev+4,	505	if (res)
356	off+len));	506	goto ERROR3;
357	psiconv_debug(lev+4,off+len+psiconv_read_u32(buf,lev+4,off+len),	507	psiconv_debug(lev+4,off+len+temp,
358	"Style indicator: %02x",anon.base_style);	508	"Style indicator: %02x",anon.base_style);
359	} else	509	} else
360	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	}
361	anon.paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	518	if (!(anon.paragraph = psiconv_clone_paragraph_layout
362	(styles,anon.base_style)->paragraph);	519	(temp_style->paragraph)))
		520	goto ERROR3;
363	anon.character = psiconv_clone_character_layout(psiconv_get_style	521	if (!(anon.character = psiconv_clone_character_layout
364	(styles,anon.base_style)->character);	522	(temp_style->character)))
		523	goto ERROR3_1;
365		524
366	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");
367	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,
368	anon.paragraph);	527	anon.paragraph)))
		528	goto ERROR3_2;
369	len += leng;	529	len += leng;
370	if (parse_styles)	530	if (parse_styles)
371	len ++;	531	len ++;
372		532
373	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");
374	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,
375	anon.character);	535	anon.character)))
		536	goto ERROR3_2;
376	len += leng;	537	len += leng;
377	psiconv_list_add(anon_styles,&anon);	538	if ((res = psiconv_list_add(anon_styles,&anon)))
		539	goto ERROR3_2;
378	}	540	}
379		541
380	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");
381	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");
382	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;
383	if (nr != psiconv_list_length(result)) {	547	if (nr != psiconv_list_length(result)) {
384	psiconv_warn(lev+3,off+len,	548	psiconv_warn(lev+3,off+len,
385	"Number of text paragraphs and paragraph elements does not match");	549	"Number of text paragraphs and paragraph elements does not match");
386	psiconv_debug(lev+3,off+len,	550	psiconv_debug(lev+3,off+len,
387	"%d text paragraphs, %d paragraph elements",	551	"%d text paragraphs, %d paragraph elements",
388	psiconv_list_length(result),nr);	552	psiconv_list_length(result),nr);
389	}	553	}
390	psiconv_debug(lev+3,off+len,"Number of paragraphs: %d",nr);	554	psiconv_debug(lev+3,off+len,"Number of paragraphs: %d",nr);
391	len += 4;	555	len += 4;
392	inline_count = malloc(nr * sizeof(*inline_count));	556	if (!(inline_count = malloc(nr * sizeof(*inline_count))))
		557	goto ERROR3;
393		558
394	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");
395	for (i = 0; i < nr; i ++) {	560	for (i = 0; i < nr; i ++) {
396	psiconv_progress(lev+3,off+len,"Element %d",i);	561	psiconv_progress(lev+3,off+len,"Element %d",i);
397	if (i >= psiconv_list_length(result)) {	562	if (i >= psiconv_list_length(result)) {
398	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");
399	para = malloc(sizeof(*para));	564	if (!(para = malloc(sizeof(*para))))
400	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;
401	para->base_style = 0;	569	para->base_style = 0;
402	para->base_character = psiconv_basic_character_layout();	570	if (!(para->base_character = psiconv_basic_character_layout()))
		571	goto ERROR4_2;
403	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;
404	free(para);	576	free(para);
405	}	577	}
406	para = psiconv_list_get(result,i);	578	if (!(para = psiconv_list_get(result,i)))
		579	goto ERROR4;
407		580
408	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");
409	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;
410	if (temp != strlen(para->text)+1) {	585	if (temp != strlen(para->text)+1) {
411	res = -1;
412	psiconv_warn(lev+4,off+len,	586	psiconv_warn(lev+4,off+len,
413	"Disagreement of the length of paragraph in layout section");	587	"Disagreement of the length of paragraph in layout section");
414	psiconv_debug(lev+4,off+len,	588	psiconv_debug(lev+4,off+len,
415	"Paragraph length: layout section says %d, counted %d",	589	"Paragraph length: layout section says %d, counted %d",
416	temp,strlen(para->text)+1);	590	temp,strlen(para->text)+1);
417	} else	591	} else
418	psiconv_debug(lev+4,off+len,"Paragraph length: %d",temp);	592	psiconv_debug(lev+4,off+len,"Paragraph length: %d",temp);
419	len += 4;	593	len += 4;
420		594
421	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");
422	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;
423	if (temp != 0x00) {	599	if (temp != 0x00) {
424	psiconv_debug(lev+4,off+len,"Type: %02x",temp);	600	psiconv_debug(lev+4,off+len,"Type: %02x",temp);
425	for (j = 0; j < psiconv_list_length(anon_styles); j++) {	601	for (j = 0; j < psiconv_list_length(anon_styles); j++) {
426	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	}
427	if (temp == anon_ptr->nr)	606	if (temp == anon_ptr->nr)
428	break;	607	break;
429	}	608	}
430	if (j == psiconv_list_length(anon_styles)) {	609	if (j == psiconv_list_length(anon_styles)) {
431	psiconv_warn(lev+4,off+len,"Layout section paragraph type unknown");	610	psiconv_warn(lev+4,off+len,"Layout section paragraph type unknown");
432	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");
433	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;
434	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;
435	psiconv_free_character_layout(para->base_character);	626	psiconv_free_character_layout(para->base_character);
436	para->base_paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	627	para->base_character = temp_char;
437	(styles,0)->paragraph);
438	para->base_character = psiconv_clone_character_layout(psiconv_get_style
439	(styles,0)->character);
440	} else {	628	} else {
441	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;
442	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;
443	psiconv_free_character_layout(para->base_character);	637	psiconv_free_character_layout(para->base_character);
444	para->base_paragraph = psiconv_clone_paragraph_layout	638	para->base_character = temp_char;
445	(anon_ptr->paragraph);
446	para->base_character = psiconv_clone_character_layout
447	(anon_ptr->character);
448	}	639	}
449	inline_count[i] = 0;	640	inline_count[i] = 0;
450	len += 0x01;	641	len += 0x01;
451	} else {	642	} else {
452	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)"
453	,temp);	644	,temp);
454	len += 0x01;	645	len += 0x01;
455	if (parse_styles) {	646	if (parse_styles) {
456	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,
457	"Going to read the paragraph element base style");	651	"Going to read the paragraph element base style");
458	temp = psiconv_read_u8(buf,lev+4,	652	temp = psiconv_read_u8(buf,lev+4, off+len+temp+4,&res);
459	off+len+psiconv_read_u32(buf,lev+4,off+len));	653	if (res)
460	psiconv_debug(lev+4,off+len+psiconv_read_u32(buf,lev+4,off+len),	654	goto ERROR4;
461	"Style: %02x",temp);	655	psiconv_debug(lev+4,off+len+temp+4, "Style: %02x",temp);
462	} else	656	} else
463	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;
464	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;
465	psiconv_free_character_layout(para->base_character);	674	psiconv_free_character_layout(para->base_character);
466	para->base_paragraph = psiconv_clone_paragraph_layout(psiconv_get_style	675	para->base_character = temp_char;
467	(styles,temp)->paragraph);	676
468	para->base_character = psiconv_clone_character_layout(psiconv_get_style
469	(styles,temp)->character);
470	para->base_style = temp;	677	para->base_style = temp;
471	psiconv_progress(lev+4,off+len,"Going to read paragraph layout");	678	psiconv_progress(lev+4,off+len,"Going to read paragraph layout");
472	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,
473	para->base_paragraph);	680	para->base_paragraph)))
		681	goto ERROR4;
474	len += leng;	682	len += leng;
475	if (parse_styles)	683	if (parse_styles)
476	len += 1;	684	len += 1;
477	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 "
478	"layout elements");	686	"layout elements");
479	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;
480	psiconv_debug(lev+4,off+len,"Nr: %08x",inline_count[i]);	690	psiconv_debug(lev+4,off+len,"Nr: %08x",inline_count[i]);
481	len += 4;	691	len += 4;
482	}	692	}
483	}	693	}
484		694
485	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");
486		696
487	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");
488	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;
489	psiconv_debug(lev+3,off,"Elements: %08x",nr);	701	psiconv_debug(lev+3,off+len,"Elements: %08x",nr);
490	len += 0x04;	702	len += 0x04;
491		703
492	psiconv_progress(lev+3,off+len,	704	psiconv_progress(lev+3,off+len,
493	"Going to read the text layout inline elements");	705	"Going to read the text layout inline elements");
494	total = 0;	706	total = 0;
495	for (i = 0; i < psiconv_list_length(result); i++) {	707	for (i = 0; i < psiconv_list_length(result); i++) {
496	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	}
497	line_length = -1;	712	line_length = -1;
498	for (j = 0; j < inline_count[i]; j++) {	713	for (j = 0; j < inline_count[i]; j++) {
499	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",
500	total,i,j);	715	total,i,j);
501	if (total >= nr) {	716	if (total >= nr) {
502	psiconv_warn(lev+3,off+len,	717	psiconv_warn(lev+3,off+len,
503	"Layout section inlines: not enough element");	718	"Layout section inlines: not enough element");
504	res = -1;
505	psiconv_debug(lev+3,off+len,"Can't read element!");	719	psiconv_debug(lev+3,off+len,"Can't read element!");
506	} else {	720	} else {
507	total ++;	721	total ++;
		722	in_line.object = NULL;
		723	in_line.layout = NULL;
508	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;
509	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");
510	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;
511	len += 1;	731	len += 1;
512	psiconv_debug(lev+4,off,"Type: %02x",temp);	732	psiconv_debug(lev+4,off+len,"Type: %02x",temp);
513	psiconv_progress(lev+4,off,	733	psiconv_progress(lev+4,off+len,
514	"Going to read the number of characters it applies to");	734	"Going to read the number of characters it applies to");
515	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;
516	psiconv_debug(lev+4,off+len,"Length: %02x",in_line.length);	738	psiconv_debug(lev+4,off+len,"Length: %02x",in_line.length);
517	len += 4;	739	len += 4;
518	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");
519	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,
520	in_line.layout);	742	in_line.layout)))
		743	goto ERROR5;
521	len += leng;	744	len += leng;
522		745
523	if (temp == 0x01) {	746	if (temp == 0x01) {
524	psiconv_debug(lev+4,off+len,"Skipping object data");	747	psiconv_debug(lev+4,off+len,"Found an embedded object");
525	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");
		768	if ((res = psiconv_parse_embedded_object(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;
526	} else if (temp != 0x00) {	789	} else if (temp != 0x00) {
527	psiconv_warn(lev+4,off+len,"Layout section unknown inline type");	790	psiconv_warn(lev+4,off+len,"Layout section unknown inline type");
528	res = -1;
529	}	791	}
530	if (line_length + in_line.length > strlen(para->text)) {	792	if (line_length + in_line.length > strlen(para->text)) {
531	psiconv_warn(lev+4,off+len,	793	psiconv_warn(lev+4,off+len,
532	"Layout section inlines: line length mismatch");	794	"Layout section inlines: line length mismatch");
533	res = -1;	795	res = -1;
534	in_line.length = strlen(para->text) - line_length;	796	in_line.length = strlen(para->text) - line_length;
535	}	797	}
536	line_length += in_line.length;	798	line_length += in_line.length;
537	psiconv_list_add(para->in_lines,&in_line);	799	if ((res = psiconv_list_add(para->in_lines,&in_line)))
		800	goto ERROR5;
538	}	801	}
539	}	802	}
540	}	803	}
541		804
542	if (total != nr) {	805	if (total != nr) {
…		…
545	}	808	}
546		809
547	free(inline_count);	810	free(inline_count);
548		811
549	for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) {	812	for (i = 0 ; i < psiconv_list_length(anon_styles); i ++) {
550	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	}
551	psiconv_free_character_layout(anon_ptr->character);	817	psiconv_free_character_layout(anon_ptr->character);
552	psiconv_free_paragraph_layout(anon_ptr->paragraph);	818	psiconv_free_paragraph_layout(anon_ptr->paragraph);
553	}	819	}
554	psiconv_list_free(anon_styles);	820	psiconv_list_free(anon_styles);
555		821
556	if (length)	822	if (length)
557	*length = len;	823	*length = len;
558		824
559	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)",
560	len);	826	len);
561		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_object(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
562	return res;	872	return res;
563	}	873	}
564		874
565	int psiconv_parse_styled_layout_section(const psiconv_buffer buf,	875	int psiconv_parse_styled_layout_section(const psiconv_buffer buf,
566	int lev,psiconv_u32 off,	876	int lev,psiconv_u32 off,
567	int *length,	877	int *length,
…		…
570	{	880	{
571	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);
572	}	882	}
573		883
574	int psiconv_parse_styleless_layout_section(const psiconv_buffer buf,	884	int psiconv_parse_styleless_layout_section(const psiconv_buffer buf,
575	int lev,psiconv_u32 off,	885	int lev,psiconv_u32 off,
576	int *length,	886	int *length,
577	psiconv_text_and_layout result,	887	psiconv_text_and_layout result,
578	psiconv_character_layout base_char,	888	const psiconv_character_layout base_char,
579	psiconv_paragraph_layout base_para)	889	const psiconv_paragraph_layout base_para)
580	{	890	{
581	int res;	891	int res = 0;
582	psiconv_word_styles_section styles_section;	892	psiconv_word_styles_section styles_section;
583		893
584	styles_section = malloc(sizeof(*styles_section));	894	if (!(styles_section = malloc(sizeof(*styles_section))))
		895	goto ERROR1;
585	styles_section->normal = malloc(sizeof(*styles_section->normal));	896	if (!(styles_section->normal = malloc(sizeof(*styles_section->normal))))
586	styles_section->normal->character = psiconv_clone_character_layout(base_char);	897	goto ERROR2;
587	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;
588	styles_section->normal->hotkey = 0;	904	styles_section->normal->hotkey = 0;
589	styles_section->normal->name = strdup("");	905	if (!(styles_section->normal->name = strdup("")))
		906	goto ERROR5;
590	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;
591		910
592	res = psiconv_parse_layout_section(buf,lev,off,length,result,	911	res = psiconv_parse_layout_section(buf,lev,off,length,result,
593	styles_section,0);	912	styles_section,0);
594		913
595	psiconv_free_word_styles_section(styles_section);	914	psiconv_free_word_styles_section(styles_section);
596	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;
597	}	935	}
598		936
		937	int psiconv_parse_embedded_object(const psiconv_buffer buf, int lev,
		938	psiconv_u32 off, int *length,
		939	psiconv_object *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.41
 


changed lines


 
Added in v.162
 Legend:



Removed from v.41
 


changed lines


 
Added in v.162
-Removed from v.41
+Added in v.162

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