lib/psiconv/generate_word.c

/*
    generate_word.c - Part of psiconv, a PSION 5 file formats converter
    Copyright (c) 2000-2004  Frodo Looijaard <frodol@dds.nl>

    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 "generate_routines.h"
#include "error.h"

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


int psiconv_write_word_status_section(const psiconv_config config,
                                      psiconv_buffer buf, int lev,
                                      psiconv_word_status_section value)
{
  int res;

  psiconv_progress(config,lev,0,"Writing word status section");

  if (!value) {
    psiconv_error(config,lev,0,"Null word status section");
    res = -PSICONV_E_GENERATE;
    goto ERROR;
  }

  if ((res = psiconv_write_u8(config,buf,lev+1,0x02)))
    goto ERROR;
  if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_tabs?0x01:0x00) |
                              (value->show_spaces?0x02:0x00) |
                              (value->show_paragraph_ends?0x04:0x00) |
                              (value->show_line_breaks?0x08:0x00) |
                              (value->show_hard_minus?0x20:0x00) |
                              (value->show_hard_space?0x40:0x00))))
    goto ERROR;
  if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_full_pictures?0x01:0x00) | 
                              (value->show_full_graphs?0x02:0x00))))
    goto ERROR;
  if ((res = psiconv_write_bool(config,buf,lev+1,value->show_top_toolbar)))
    goto ERROR;
  if ((res = psiconv_write_bool(config,buf,lev+1,value->show_side_toolbar)))
    goto ERROR;
  if ((res = psiconv_write_u8(config,buf,lev+1,(value->fit_lines_to_screen?0x08:0x00))))
    goto ERROR;
  if ((res = psiconv_write_u32(config,buf,lev+1,value->cursor_position)))
    goto ERROR;
  if ((res = psiconv_write_u32(config,buf,lev+1,value->display_size)))
    goto ERROR;
  psiconv_progress(config,lev,0,"End of word status section");
  return 0;

ERROR:
  psiconv_error(config,lev,0,"Writing of word status section failed");
  return res;
}

int psiconv_write_word_styles_section(const psiconv_config config,
                                      psiconv_buffer buf, int lev,
                                      psiconv_word_styles_section value)
{
  int res,i,j;
  psiconv_word_style style;
  psiconv_paragraph_layout basepara;
  psiconv_character_layout basechar;
  psiconv_font font;
  psiconv_u32 buflen;

  psiconv_progress(config,lev,0,"Writing word styles section");

  if (!value || !value->normal || !value->styles) {
    psiconv_error(config,lev,0,"Null word styles section");
    res = -PSICONV_E_GENERATE;
    goto ERROR1;
  }

  if (!(basepara=psiconv_basic_paragraph_layout())) {
    res = -PSICONV_E_NOMEM;
    goto ERROR1;
  }

  if (!(basechar=psiconv_basic_character_layout())) {
    res = -PSICONV_E_NOMEM;
    goto ERROR2;
  }


  if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,
                                                 value->normal->paragraph,
                                                 basepara)))
    goto ERROR3;
  /* Always generate the font for Normal */
  font = basechar->font;
  basechar->font = NULL;
  res = psiconv_write_character_layout_list(config,buf,lev+1,
                                            value->normal->character,
                                            basechar);
  basechar->font = font;
  if (res)
    goto ERROR3;
  buflen = psiconv_buffer_length(buf);
  if ((res = psiconv_unicode_write_char(config,buf,lev+1,
                                        value->normal->hotkey)))
    goto ERROR3;
  for (j = psiconv_buffer_length(buf) - buflen; j < 4; j++) 
    if ((res = psiconv_write_u8(config,buf,lev+1,0)))
      goto ERROR3;

  if ((res = psiconv_write_u8(config,buf,lev+1,
                              psiconv_list_length(value->styles))))
    goto ERROR3;


  for (i = 0; i < psiconv_list_length(value->styles); i++) {
    if (!(style = psiconv_list_get(value->styles,i))) {
      psiconv_error(config,lev,0,"Massive memory corruption");
      res = -PSICONV_E_NOMEM;
      goto ERROR3;
    }
    buflen = psiconv_buffer_length(buf);
    if ((res = psiconv_unicode_write_char(config,buf,lev+1,style->hotkey)))
      goto ERROR3;
    for (j = psiconv_buffer_length(buf) - buflen; j < 4; j++) 
      if ((res = psiconv_write_u8(config,buf,lev+1,0)))
        goto ERROR3;
  }
  if ((res = psiconv_write_u8(config,buf,lev+1,psiconv_list_length(value->styles))))
    goto ERROR3;
  for (i = 0; i < psiconv_list_length(value->styles); i++) {
    if (!(style = psiconv_list_get(value->styles,i))) {
      psiconv_error(config,lev,0,"Massive memory corruption");
      res = -PSICONV_E_NOMEM;
      goto ERROR3;
    }
    if (!style->name) {
      psiconv_error(config,lev,0,"Null style name");
      res = -PSICONV_E_GENERATE;
      goto ERROR3;
    }
    if ((res = psiconv_write_string(config,buf,lev+1,style->name)))
      goto ERROR3;
    if ((res = psiconv_write_u32(config,buf,lev+1,style->built_in?PSICONV_ID_STYLE_BUILT_IN:
                                                 PSICONV_ID_STYLE_REMOVABLE)))
      goto ERROR3;
    if ((res = psiconv_write_u32(config,buf,lev+1,style->outline_level)))
      goto ERROR3;
    if ((res = psiconv_write_character_layout_list(config,buf,lev+1,style->character,
                                                   value->normal->character)))
      goto ERROR3;
    if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,style->paragraph,
                                                   value->normal->paragraph)))
      goto ERROR3;
  }

  for (i = 0; i < psiconv_list_length(value->styles); i++)
    if ((res = psiconv_write_u8(config,buf,lev+1,0xff)))
      goto ERROR3;
  res = -PSICONV_E_OK;

ERROR3:
  psiconv_free_character_layout(basechar);
ERROR2:
  psiconv_free_paragraph_layout(basepara);
ERROR1:
  if (res)
    psiconv_error(config,lev,0,"Writing of word styles section failed");
  else
    psiconv_progress(config,lev,0,"End of word styles section");
  return res;
}
1	frodo	76	/*
2			generate_word.c - Part of psiconv, a PSION 5 file formats converter
3	frodo	196	Copyright (c) 2000-2004 Frodo Looijaard <frodol@dds.nl>
4	frodo	76
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			#include "compat.h"
22
23			#include <stdlib.h>
24
25			#include "generate_routines.h"
26			#include "error.h"
27
28	frodo	142	#ifdef DMALLOC
29			#include <dmalloc.h>
30			#endif
31
32
33	frodo	168	int psiconv_write_word_status_section(const psiconv_config config,
34	frodo	184	psiconv_buffer buf, int lev,
35	frodo	168	psiconv_word_status_section value)
36	frodo	76	{
37			int res;
38
39	frodo	184	psiconv_progress(config,lev,0,"Writing word status section");
40
41	frodo	76	if (!value) {
42	frodo	231	psiconv_error(config,lev,0,"Null word status section");
43			res = -PSICONV_E_GENERATE;
44			goto ERROR;
45	frodo	76	}
46
47	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,0x02)))
48	frodo	231	goto ERROR;
49	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_tabs?0x01:0x00) \|
50	frodo	76	(value->show_spaces?0x02:0x00) \|
51			(value->show_paragraph_ends?0x04:0x00) \|
52			(value->show_line_breaks?0x08:0x00) \|
53			(value->show_hard_minus?0x20:0x00) \|
54			(value->show_hard_space?0x40:0x00))))
55	frodo	231	goto ERROR;
56	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,(value->show_full_pictures?0x01:0x00) \|
57	frodo	76	(value->show_full_graphs?0x02:0x00))))
58	frodo	231	goto ERROR;
59	frodo	184	if ((res = psiconv_write_bool(config,buf,lev+1,value->show_top_toolbar)))
60	frodo	231	goto ERROR;
61	frodo	184	if ((res = psiconv_write_bool(config,buf,lev+1,value->show_side_toolbar)))
62	frodo	231	goto ERROR;
63	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,(value->fit_lines_to_screen?0x08:0x00))))
64	frodo	231	goto ERROR;
65	frodo	184	if ((res = psiconv_write_u32(config,buf,lev+1,value->cursor_position)))
66	frodo	231	goto ERROR;
67			if ((res = psiconv_write_u32(config,buf,lev+1,value->display_size)))
68			goto ERROR;
69			psiconv_progress(config,lev,0,"End of word status section");
70			return 0;
71
72			ERROR:
73			psiconv_error(config,lev,0,"Writing of word status section failed");
74			return res;
75	frodo	76	}
76
77	frodo	168	int psiconv_write_word_styles_section(const psiconv_config config,
78	frodo	184	psiconv_buffer buf, int lev,
79	frodo	76	psiconv_word_styles_section value)
80			{
81	frodo	224	int res,i,j;
82	frodo	76	psiconv_word_style style;
83			psiconv_paragraph_layout basepara;
84			psiconv_character_layout basechar;
85	frodo	85	psiconv_font font;
86	frodo	224	psiconv_u32 buflen;
87	frodo	76
88	frodo	184	psiconv_progress(config,lev,0,"Writing word styles section");
89	frodo	76
90			if (!value \|\| !value->normal \|\| !value->styles) {
91	frodo	231	psiconv_error(config,lev,0,"Null word styles section");
92	frodo	76	res = -PSICONV_E_GENERATE;
93			goto ERROR1;
94			}
95
96			if (!(basepara=psiconv_basic_paragraph_layout())) {
97			res = -PSICONV_E_NOMEM;
98			goto ERROR1;
99			}
100
101			if (!(basechar=psiconv_basic_character_layout())) {
102			res = -PSICONV_E_NOMEM;
103			goto ERROR2;
104			}
105
106
107	frodo	231	if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,
108			value->normal->paragraph,
109	frodo	76	basepara)))
110			goto ERROR3;
111	frodo	85	/* Always generate the font for Normal */
112			font = basechar->font;
113			basechar->font = NULL;
114	frodo	231	res = psiconv_write_character_layout_list(config,buf,lev+1,
115			value->normal->character,
116			basechar);
117	frodo	85	basechar->font = font;
118			if (res)
119	frodo	76	goto ERROR3;
120	frodo	224	buflen = psiconv_buffer_length(buf);
121	frodo	217	if ((res = psiconv_unicode_write_char(config,buf,lev+1,
122			value->normal->hotkey)))
123	frodo	76	goto ERROR3;
124	frodo	224	for (j = psiconv_buffer_length(buf) - buflen; j < 4; j++)
125			if ((res = psiconv_write_u8(config,buf,lev+1,0)))
126			goto ERROR3;
127
128	frodo	231	if ((res = psiconv_write_u8(config,buf,lev+1,
129			psiconv_list_length(value->styles))))
130	frodo	76	goto ERROR3;
131
132
133
134			for (i = 0; i < psiconv_list_length(value->styles); i++) {
135			if (!(style = psiconv_list_get(value->styles,i))) {
136	frodo	231	psiconv_error(config,lev,0,"Massive memory corruption");
137	frodo	184	res = -PSICONV_E_NOMEM;
138	frodo	76	goto ERROR3;
139			}
140	frodo	224	buflen = psiconv_buffer_length(buf);
141	frodo	217	if ((res = psiconv_unicode_write_char(config,buf,lev+1,style->hotkey)))
142	frodo	76	goto ERROR3;
143	frodo	224	for (j = psiconv_buffer_length(buf) - buflen; j < 4; j++)
144			if ((res = psiconv_write_u8(config,buf,lev+1,0)))
145			goto ERROR3;
146	frodo	76	}
147	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,psiconv_list_length(value->styles))))
148	frodo	76	goto ERROR3;
149			for (i = 0; i < psiconv_list_length(value->styles); i++) {
150			if (!(style = psiconv_list_get(value->styles,i))) {
151	frodo	231	psiconv_error(config,lev,0,"Massive memory corruption");
152	frodo	184	res = -PSICONV_E_NOMEM;
153	frodo	76	goto ERROR3;
154			}
155			if (!style->name) {
156	frodo	231	psiconv_error(config,lev,0,"Null style name");
157	frodo	76	res = -PSICONV_E_GENERATE;
158			goto ERROR3;
159			}
160	frodo	184	if ((res = psiconv_write_string(config,buf,lev+1,style->name)))
161	frodo	76	goto ERROR3;
162	frodo	184	if ((res = psiconv_write_u32(config,buf,lev+1,style->built_in?PSICONV_ID_STYLE_BUILT_IN:
163	frodo	76	PSICONV_ID_STYLE_REMOVABLE)))
164			goto ERROR3;
165	frodo	184	if ((res = psiconv_write_u32(config,buf,lev+1,style->outline_level)))
166	frodo	76	goto ERROR3;
167	frodo	184	if ((res = psiconv_write_character_layout_list(config,buf,lev+1,style->character,
168	frodo	76	value->normal->character)))
169			goto ERROR3;
170	frodo	184	if ((res = psiconv_write_paragraph_layout_list(config,buf,lev+1,style->paragraph,
171	frodo	76	value->normal->paragraph)))
172			goto ERROR3;
173			}
174
175	frodo	83	for (i = 0; i < psiconv_list_length(value->styles); i++)
176	frodo	184	if ((res = psiconv_write_u8(config,buf,lev+1,0xff)))
177	frodo	83	goto ERROR3;
178			res = -PSICONV_E_OK;
179
180	frodo	76	ERROR3:
181			psiconv_free_character_layout(basechar);
182			ERROR2:
183			psiconv_free_paragraph_layout(basepara);
184			ERROR1:
185	frodo	231	if (res)
186			psiconv_error(config,lev,0,"Writing of word styles section failed");
187			else
188			psiconv_progress(config,lev,0,"End of word styles section");
189	frodo	76	return res;
190			}
frodo@frodo.looijaard.name	ViewVC Help
Powered by ViewVC 1.1.26