lib/psiconv/parse_page.c

/*
    parse_page.c - Part of psiconv, a PSION 5 file formats converter
    Copyright (c) 1999-2014  Frodo Looijaard <frodo@frodo.looijaard.name>

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include "config.h"
#include "compat.h"

#include <stdlib.h>
#include <string.h>

#include "parse_routines.h"
#include "error.h"

#ifdef DMALLOC
#include <dmalloc.h>
#endif


int psiconv_parse_page_header(const psiconv_config config,
                              const psiconv_buffer buf,int lev,psiconv_u32 off,
                              int *length,psiconv_page_header *result)
{
  int res = 0;
  int len = 0;
  int i,leng,has_content;
  psiconv_u32 temp;

  psiconv_progress(config,lev+1,off,"Going to read a page header (or footer)");
  if (!(*result = malloc(sizeof(**result))))
    goto ERROR1;

  psiconv_progress(config,lev+2,off+len,
                   "Going to read the has_content flag");
  temp = psiconv_read_u8(config,buf,lev+2,off+len,&res);
  if (res)
    goto ERROR2;
  if (temp == 0x00)
    has_content = 0;
  else if (temp == 0x01)
    has_content = 1;
  else {
    psiconv_warn(config,lev+2,off+len,
               "Page header has_content flag unknown value (assumed default)");
    psiconv_debug(config,lev+2,off+len,"Flag: %02x",temp);
    has_content = 1;
  }
  psiconv_debug(config,lev+2,off+len,"Has_content flag: %02x",has_content);
  len += 1;

  psiconv_progress(config,lev+2,off+len,"Going to read displayed-on-first-page flag");
  if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng,
                                &(*result)->on_first_page)))
    goto ERROR2;
  len += leng;

  psiconv_progress(config,lev+2,off+len,"Going to read three zero bytes");
  for (i = 0; i < 0x03; i++,len++) {
    temp = psiconv_read_u8(config,buf,lev+2,off+len,&res);
    if (res)
      goto ERROR2;
    if (temp != 0x00) {
      psiconv_warn(config,lev+2,off+len,
                   "Page Header unknown value in zero bytes section");
      psiconv_debug(config,lev+2,off+len,"Byte %d: read %02x, expected %02x",
                    i,temp,0x00);
    }
  }

  psiconv_progress(config,lev+2,off+len,"Going to read base paragraph layout");
  if (!((*result)->base_paragraph_layout = psiconv_basic_paragraph_layout()))
    goto ERROR2;

  if (has_content) {
    if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+2,off+len,&leng,
                                             (*result)->base_paragraph_layout)))
      goto ERROR3;
    len += leng;
  }

  psiconv_progress(config,lev+2,off+len,"Going to read base character layout");
  if (!((*result)->base_character_layout = psiconv_basic_character_layout()))
    goto ERROR3;
  if (has_content) {
    if ((res = psiconv_parse_character_layout_list(config,buf,lev+2,off+len,&leng,
                                             (*result)->base_character_layout)))
      goto ERROR4;
  }
  len += leng;

 
  psiconv_progress(config,lev+2,off+len,"Going to read the TextEd section");
  if (has_content) {
    if ((res = psiconv_parse_texted_section(config,buf,lev+2,off+len,&leng,
                                        &(*result)->text,
                                        (*result)->base_character_layout,
                                        (*result)->base_paragraph_layout)))
      goto ERROR4;
    len += leng;
  } else {
    (*result)->text = NULL;
  }

  if (length)
    *length = len;

  psiconv_progress(config,lev+1,off+len-1,"End of page header"
                   "(total length: %08x", len);

  return res;

ERROR4:
  psiconv_free_character_layout((*result)->base_character_layout);
ERROR3:
  psiconv_free_paragraph_layout((*result)->base_paragraph_layout);
ERROR2:
  free (*result);
ERROR1:
  psiconv_error(config,lev+1,off,"Reading of Page Header failed");
  if (length)
    *length = 0;
  if (!res)
    return -PSICONV_E_NOMEM;
  else
    return res;
}
   
int psiconv_parse_page_layout_section(const psiconv_config config,
                                      const psiconv_buffer buf,int lev,
                                      psiconv_u32 off, int *length, 
                                      psiconv_page_layout_section *result)
{
  int res = 0;
  int len = 0;
  int leng;
  psiconv_u32 temp;

  psiconv_progress(config,lev+1,off,"Going to read the page layout section");
  if (!(*result = malloc(sizeof(**result))))
    goto ERROR1;

  psiconv_progress(config,lev+2,off+len,"Going to read first page number");
  (*result)->first_page_nr = psiconv_read_u32(config,buf,lev+2,off+len,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"First page: %d",(*result)->first_page_nr);
  len += 4;
  
  psiconv_progress(config,lev+2,off+len,"Going to read header distance");
  (*result)->header_dist = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Header distance: %6.3f",(*result)->header_dist);
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going to read footer distance");
  (*result)->footer_dist = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Footer distance: %6.3f",(*result)->footer_dist);
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going to read the left margin");
  (*result)->left_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Left margin: %6.3f",(*result)->left_margin);
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going read the to right margin");
  (*result)->right_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Right margin: %6.3f",(*result)->right_margin);
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going to read the top margin");
  (*result)->top_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Top margin: %6.3f",(*result)->top_margin);
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going to read the bottom margin");
  (*result)->bottom_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR2;
  psiconv_debug(config,lev+2,off+len,"Bottom margin: %6.3f",(*result)->bottom_margin);
  len += leng;

  psiconv_progress(config,lev+2,off+len,"Going to read the header");
  if ((res = psiconv_parse_page_header(config,buf,lev+2,off+len,&leng,
                                       &(*result)->header)))
    goto ERROR2;
  len += leng;
  
  psiconv_progress(config,lev+2,off+len,"Going to read the footer");
  if ((res = psiconv_parse_page_header(config,buf,lev+2,off+len,&leng,
                                       &(*result)->footer)))
    goto ERROR3;
  len += leng;

  psiconv_progress(config,lev+2,off+len,"Going to read page dimensions id");
  temp = psiconv_read_u32(config,buf,lev+2,off+len,&res);
  if (res)
    goto ERROR4;
  if ((temp != PSICONV_ID_PAGE_DIMENSIONS1) && 
       (temp != PSICONV_ID_PAGE_DIMENSIONS2)) {
    psiconv_warn(config,lev+2,off+len,
                 "Page layout section page dimensions marker not found");
    psiconv_debug(config,lev+2,off+len,
                  "Page dimensions marker: read %08x, expected %08x or %08x",
                  temp, PSICONV_ID_PAGE_DIMENSIONS1,
                  PSICONV_ID_PAGE_DIMENSIONS2);
  }
  len += 4;
  
  psiconv_progress(config,lev+2,off+len,"Going to read the page width");
  (*result)->page_width = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR4;
  psiconv_debug(config,lev+2,off+len,"Page width: %6.3f",(*result)->page_width);
  len += leng;

  psiconv_progress(config,lev+2,off+len,"Going to read the page height");
  (*result)->page_height = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
  if (res)
    goto ERROR4;
  psiconv_debug(config,lev+2,off+len,"Page height: %6.3f",(*result)->page_height);
  len += leng;

  psiconv_progress(config,lev+2,off+len,"Going to read page portrait/landscape");
  if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng,&(*result)->landscape)))
    goto ERROR4;
  psiconv_debug(config,lev+2,off+len,"Landscape: %d",(*result)->landscape);
  len += leng;


  if (length)
    *length = len;

  psiconv_progress(config,lev,off+len-1,"End of page section (total length: %08x)",
                   len);

  return res;

ERROR4:
  psiconv_free_page_header((*result)->footer);
ERROR3:
  psiconv_free_page_header((*result)->header);
ERROR2:
  free (*result);
ERROR1:
  psiconv_error(config,lev+1,off,"Reading of Page Section failed");
  if (length)
    *length = 0;
  if (!res)
    return -PSICONV_E_NOMEM;
  else
    return res;
}
1	frodo	2	/*
2			parse_page.c - Part of psiconv, a PSION 5 file formats converter
3	frodo	351	Copyright (c) 1999-2014 Frodo Looijaard <frodo@frodo.looijaard.name>
4	frodo	2
5			This program is free software; you can redistribute it and/or modify
6			it under the terms of the GNU General Public License as published by
7			the Free Software Foundation; either version 2 of the License, or
8			(at your option) any later version.
9
10			This program is distributed in the hope that it will be useful,
11			but WITHOUT ANY WARRANTY; without even the implied warranty of
12			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13			GNU General Public License for more details.
14
15			You should have received a copy of the GNU General Public License
16			along with this program; if not, write to the Free Software
17			Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18			*/
19
20			#include "config.h"
21	frodo	71	#include "compat.h"
22
23	frodo	2	#include <stdlib.h>
24			#include <string.h>
25
26			#include "parse_routines.h"
27	frodo	71	#include "error.h"
28	frodo	2
29	frodo	142	#ifdef DMALLOC
30			#include <dmalloc.h>
31			#endif
32
33
34	frodo	168	int psiconv_parse_page_header(const psiconv_config config,
35			const psiconv_buffer buf,int lev,psiconv_u32 off,
36	frodo	2	int length,psiconv_page_header result)
37			{
38			int res = 0;
39			int len = 0;
40	frodo	111	int i,leng,has_content;
41	frodo	2	psiconv_u32 temp;
42
43	frodo	168	psiconv_progress(config,lev+1,off,"Going to read a page header (or footer)");
44	frodo	64	if (!(result = malloc(sizeof(*result))))
45			goto ERROR1;
46	frodo	2
47	frodo	168	psiconv_progress(config,lev+2,off+len,
48	frodo	111	"Going to read the has_content flag");
49	frodo	168	temp = psiconv_read_u8(config,buf,lev+2,off+len,&res);
50	frodo	65	if (res)
51	frodo	64	goto ERROR2;
52	frodo	111	if (temp == 0x00)
53			has_content = 0;
54			else if (temp == 0x01)
55			has_content = 1;
56			else {
57	frodo	168	psiconv_warn(config,lev+2,off+len,
58	frodo	111	"Page header has_content flag unknown value (assumed default)");
59	frodo	168	psiconv_debug(config,lev+2,off+len,"Flag: %02x",temp);
60	frodo	111	has_content = 1;
61	frodo	2	}
62	frodo	168	psiconv_debug(config,lev+2,off+len,"Has_content flag: %02x",has_content);
63	frodo	2	len += 1;
64
65	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read displayed-on-first-page flag");
66			if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng,
67	frodo	64	&(*result)->on_first_page)))
68			goto ERROR2;
69	frodo	2	len += leng;
70
71	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read three zero bytes");
72	frodo	2	for (i = 0; i < 0x03; i++,len++) {
73	frodo	168	temp = psiconv_read_u8(config,buf,lev+2,off+len,&res);
74	frodo	64	if (res)
75			goto ERROR2;
76	frodo	2	if (temp != 0x00) {
77	frodo	168	psiconv_warn(config,lev+2,off+len,
78	frodo	2	"Page Header unknown value in zero bytes section");
79	frodo	168	psiconv_debug(config,lev+2,off+len,"Byte %d: read %02x, expected %02x",
80	frodo	2	i,temp,0x00);
81			}
82			}
83
84	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read base paragraph layout");
85	frodo	64	if (!((*result)->base_paragraph_layout = psiconv_basic_paragraph_layout()))
86			goto ERROR2;
87	frodo	2
88	frodo	111	if (has_content) {
89	frodo	168	if ((res = psiconv_parse_paragraph_layout_list(config,buf,lev+2,off+len,&leng,
90	frodo	111	(*result)->base_paragraph_layout)))
91			goto ERROR3;
92			len += leng;
93			}
94
95	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read base character layout");
96	frodo	64	if (!((*result)->base_character_layout = psiconv_basic_character_layout()))
97			goto ERROR3;
98	frodo	111	if (has_content) {
99	frodo	168	if ((res = psiconv_parse_character_layout_list(config,buf,lev+2,off+len,&leng,
100	frodo	111	(*result)->base_character_layout)))
101			goto ERROR4;
102			}
103	frodo	2	len += leng;
104
105
106	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the TextEd section");
107	frodo	111	if (has_content) {
108	frodo	168	if ((res = psiconv_parse_texted_section(config,buf,lev+2,off+len,&leng,
109	frodo	111	&(*result)->text,
110			(*result)->base_character_layout,
111			(*result)->base_paragraph_layout)))
112			goto ERROR4;
113			len += leng;
114	frodo	140	} else {
115			(*result)->text = NULL;
116	frodo	111	}
117	frodo	2
118			if (length)
119			*length = len;
120
121	frodo	168	psiconv_progress(config,lev+1,off+len-1,"End of page header"
122	frodo	2	"(total length: %08x", len);
123
124			return res;
125	frodo	64
126			ERROR4:
127			psiconv_free_character_layout((*result)->base_character_layout);
128			ERROR3:
129			psiconv_free_paragraph_layout((*result)->base_paragraph_layout);
130			ERROR2:
131			free (*result);
132			ERROR1:
133	frodo	184	psiconv_error(config,lev+1,off,"Reading of Page Header failed");
134	frodo	64	if (length)
135			*length = 0;
136			if (!res)
137			return -PSICONV_E_NOMEM;
138			else
139			return res;
140	frodo	2	}
141
142	frodo	168	int psiconv_parse_page_layout_section(const psiconv_config config,
143			const psiconv_buffer buf,int lev,
144	frodo	2	psiconv_u32 off, int *length,
145			psiconv_page_layout_section *result)
146			{
147			int res = 0;
148			int len = 0;
149			int leng;
150			psiconv_u32 temp;
151
152	frodo	168	psiconv_progress(config,lev+1,off,"Going to read the page layout section");
153	frodo	64	if (!(result = malloc(sizeof(*result))))
154			goto ERROR1;
155	frodo	2
156	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read first page number");
157			(*result)->first_page_nr = psiconv_read_u32(config,buf,lev+2,off+len,&res);
158	frodo	64	if (res)
159			goto ERROR2;
160	frodo	168	psiconv_debug(config,lev+2,off+len,"First page: %d",(*result)->first_page_nr);
161	frodo	2	len += 4;
162
163	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read header distance");
164			(*result)->header_dist = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
165	frodo	64	if (res)
166			goto ERROR2;
167	frodo	168	psiconv_debug(config,lev+2,off+len,"Header distance: %6.3f",(*result)->header_dist);
168	frodo	2	len += leng;
169
170	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read footer distance");
171			(*result)->footer_dist = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
172	frodo	64	if (res)
173			goto ERROR2;
174	frodo	168	psiconv_debug(config,lev+2,off+len,"Footer distance: %6.3f",(*result)->footer_dist);
175	frodo	2	len += leng;
176
177	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the left margin");
178			(*result)->left_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
179	frodo	64	if (res)
180			goto ERROR2;
181	frodo	168	psiconv_debug(config,lev+2,off+len,"Left margin: %6.3f",(*result)->left_margin);
182	frodo	2	len += leng;
183
184	frodo	168	psiconv_progress(config,lev+2,off+len,"Going read the to right margin");
185			(*result)->right_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
186	frodo	64	if (res)
187			goto ERROR2;
188	frodo	168	psiconv_debug(config,lev+2,off+len,"Right margin: %6.3f",(*result)->right_margin);
189	frodo	2	len += leng;
190
191	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the top margin");
192			(*result)->top_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
193	frodo	64	if (res)
194			goto ERROR2;
195	frodo	168	psiconv_debug(config,lev+2,off+len,"Top margin: %6.3f",(*result)->top_margin);
196	frodo	2	len += leng;
197
198	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the bottom margin");
199			(*result)->bottom_margin = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
200	frodo	64	if (res)
201			goto ERROR2;
202	frodo	168	psiconv_debug(config,lev+2,off+len,"Bottom margin: %6.3f",(*result)->bottom_margin);
203	frodo	2	len += leng;
204
205	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the header");
206			if ((res = psiconv_parse_page_header(config,buf,lev+2,off+len,&leng,
207	frodo	64	&(*result)->header)))
208			goto ERROR2;
209	frodo	2	len += leng;
210
211	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the footer");
212			if ((res = psiconv_parse_page_header(config,buf,lev+2,off+len,&leng,
213	frodo	64	&(*result)->footer)))
214			goto ERROR3;
215	frodo	2	len += leng;
216
217	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read page dimensions id");
218			temp = psiconv_read_u32(config,buf,lev+2,off+len,&res);
219	frodo	64	if (res)
220			goto ERROR4;
221	frodo	76	if ((temp != PSICONV_ID_PAGE_DIMENSIONS1) &&
222			(temp != PSICONV_ID_PAGE_DIMENSIONS2)) {
223	frodo	168	psiconv_warn(config,lev+2,off+len,
224	frodo	2	"Page layout section page dimensions marker not found");
225	frodo	168	psiconv_debug(config,lev+2,off+len,
226	frodo	76	"Page dimensions marker: read %08x, expected %08x or %08x",
227			temp, PSICONV_ID_PAGE_DIMENSIONS1,
228			PSICONV_ID_PAGE_DIMENSIONS2);
229	frodo	2	}
230	frodo	65	len += 4;
231	frodo	2
232	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the page width");
233			(*result)->page_width = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
234	frodo	65	if (res)
235	frodo	64	goto ERROR4;
236	frodo	168	psiconv_debug(config,lev+2,off+len,"Page width: %6.3f",(*result)->page_width);
237	frodo	2	len += leng;
238
239	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read the page height");
240			(*result)->page_height = psiconv_read_length(config,buf,lev+2,off+len,&leng,&res);
241	frodo	65	if (res)
242	frodo	64	goto ERROR4;
243	frodo	168	psiconv_debug(config,lev+2,off+len,"Page height: %6.3f",(*result)->page_height);
244	frodo	2	len += leng;
245
246	frodo	168	psiconv_progress(config,lev+2,off+len,"Going to read page portrait/landscape");
247			if ((res = psiconv_parse_bool(config,buf,lev+2,off+len,&leng,&(*result)->landscape)))
248	frodo	76	goto ERROR4;
249	frodo	168	psiconv_debug(config,lev+2,off+len,"Landscape: %d",(*result)->landscape);
250	frodo	76	len += leng;
251
252
253	frodo	2	if (length)
254			*length = len;
255
256	frodo	168	psiconv_progress(config,lev,off+len-1,"End of page section (total length: %08x)",
257	frodo	2	len);
258
259			return res;
260	frodo	64
261			ERROR4:
262			psiconv_free_page_header((*result)->footer);
263			ERROR3:
264			psiconv_free_page_header((*result)->header);
265			ERROR2:
266			free (*result);
267			ERROR1:
268	frodo	184	psiconv_error(config,lev+1,off,"Reading of Page Section failed");
269	frodo	64	if (length)
270			*length = 0;
271			if (!res)
272			return -PSICONV_E_NOMEM;
273			else
274			return res;
275	frodo	2	}
frodo@frodo.looijaard.name	ViewVC Help
Powered by ViewVC 1.1.26