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


changed lines


 
Added in v.162
 Legend:



Removed from v.25
 


changed lines


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

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