lib/psiconv/generate_layout.c

/*
    generate_layout.c - Part of psiconv, a PSION 5 file formats converter
    Copyright (c) 2000  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 <string.h>

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

#include "generate_routines.h"
#include "error.h"

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


int psiconv_write_color(const psiconv_config config, psiconv_buffer buf, const psiconv_color value)
{
  int res;
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null color");
    return -PSICONV_E_GENERATE;
  }
  if ((res = psiconv_write_u8(config,buf,value->red))) 
    return res;
  if ((res = psiconv_write_u8(config,buf,value->green))) 
    return res;
  return  psiconv_write_u8(config,buf,value->blue);
}

int psiconv_write_font(const psiconv_config config, psiconv_buffer buf, const psiconv_font value)
{
  int res,i;
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null font");
    return -PSICONV_E_GENERATE;
  }
  if ((res = psiconv_write_u8(config,buf,strlen(value->name)+1)))
    return res;
  for (i = 0; i < strlen(value->name); i++)
    if ((res = psiconv_write_u8(config,buf,value->name[i])))
      return res;
  return psiconv_write_u8(config,buf,value->screenfont);
}

int psiconv_write_border(const psiconv_config config, psiconv_buffer buf, const psiconv_border value)
{
  int res;

  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null border");
    return -PSICONV_E_GENERATE;
  }
  if (value->kind > psiconv_border_dotdotdashed) 
    psiconv_warn(config,0,psiconv_buffer_length(buf),
                 "Unknown border kind (%d); assuming none",value->kind);
  if ((res =psiconv_write_u8(config,buf,value->kind == psiconv_border_none?0:
                                 value->kind == psiconv_border_solid?1:
                                 value->kind == psiconv_border_double?2:
                                 value->kind == psiconv_border_dotted?3:
                                 value->kind == psiconv_border_dashed?4:
                                 value->kind == psiconv_border_dotdashed?5:
                                 value->kind == psiconv_border_dotdotdashed?6:
                                                0)))
    return res;
  if ((res = psiconv_write_size(config,buf,(value->kind == psiconv_border_solid) ||
                                    (value->kind == psiconv_border_double) ?
                                    value->thickness:1.0/20.0)))
    return res;
  if ((res = psiconv_write_color(config,buf,value->color)))
    return res;
  // Unknown byte
  return psiconv_write_u8(config,buf,1);
}

int psiconv_write_bullet(const psiconv_config config, psiconv_buffer buf, const psiconv_bullet value)
{
  int res;
  psiconv_buffer extra_buf;
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null bullet");
    return -PSICONV_E_GENERATE;
  }

  if (!(extra_buf = psiconv_buffer_new()))
    return -PSICONV_E_NOMEM;
  if ((res = psiconv_write_size(config,extra_buf,value->font_size)))
    goto ERROR;
  if ((res = psiconv_write_u8(config,extra_buf,value->character)))
    goto ERROR;
  if ((res = psiconv_write_bool(config,extra_buf,value->indent)))
    goto ERROR;
  if ((res = psiconv_write_color(config,extra_buf,value->color)))
    goto ERROR;
  if ((res = psiconv_write_font(config,extra_buf,value->font)))
    goto ERROR;

  if ((res = psiconv_write_u8(config,buf,psiconv_buffer_length(extra_buf))))
    goto ERROR;
  res = psiconv_buffer_concat(buf,extra_buf);
  
ERROR:
  psiconv_buffer_free(extra_buf);
  return res;
}

int psiconv_write_tab(const psiconv_config config, psiconv_buffer buf,psiconv_tab value)
{
  int res;
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null tab");
    return -PSICONV_E_GENERATE;
  }
  if ((res = psiconv_write_length(config,buf,value->location)))
    return res;
  if ((value->kind != psiconv_tab_left) && 
      (value->kind != psiconv_tab_right) &&
      (value->kind != psiconv_tab_centre)) 
    psiconv_warn(config,0,psiconv_buffer_length(buf),
                 "Unknown tab kind (%d); assuming left",value->kind);
  return psiconv_write_u8(config,buf, value->kind == psiconv_tab_right?2:
                               value->kind == psiconv_tab_centre?3:1);
}

int psiconv_write_paragraph_layout_list(const psiconv_config config,
                                        psiconv_buffer buf, 
                                        psiconv_paragraph_layout value,
                                        psiconv_paragraph_layout base)
{
  int res,i;
  psiconv_buffer extra_buf;
  psiconv_tab tab;
  
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null paragraph layout list");
    return -PSICONV_E_GENERATE;
  }
  if (!(extra_buf = psiconv_buffer_new()))
    return -PSICONV_E_NOMEM;
  
  if (!base || psiconv_compare_color(base->back_color,value->back_color)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x01)))
      goto ERROR;
    if ((res = psiconv_write_color(config,extra_buf,value->back_color)))
      goto ERROR;
  }

  if (!base || (value->indent_left != base->indent_left)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x02)))
      goto ERROR;
    if ((res = psiconv_write_length(config,extra_buf,value->indent_left)))
      goto ERROR;
  }

  if (!base || (value->indent_right != base->indent_right)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x03)))
      goto ERROR;
    if ((res = psiconv_write_length(config,extra_buf,value->indent_right)))
      goto ERROR;
  }

  if (!base || (value->indent_first != base->indent_first)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x04)))
      goto ERROR;
    if ((res = psiconv_write_length(config,extra_buf,value->indent_first)))
      goto ERROR;
  }

  if (!base || (value->justify_hor != base->justify_hor)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x05)))
      goto ERROR;
    if ((value->justify_hor < psiconv_justify_left) ||
        (value->justify_hor > psiconv_justify_full))
      psiconv_warn(config,0,psiconv_buffer_length(buf),
                   "Unknown horizontal justify (%d); assuming left",
                   value->justify_hor);
    if ((res = psiconv_write_u8(config,extra_buf,
               value->justify_hor == psiconv_justify_centre?1:
               value->justify_hor == psiconv_justify_right?2:
               value->justify_hor == psiconv_justify_full?3:0)))
      goto ERROR;
  }

  if (!base || (value->justify_ver != base->justify_ver)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x06)))
      goto ERROR;
    if ((value->justify_ver < psiconv_justify_top) ||
        (value->justify_ver > psiconv_justify_bottom))
      psiconv_warn(config,0,psiconv_buffer_length(buf),
                   "Unknown vertical justify (%d); assuming middle",
                    value->justify_ver);
    if ((res = psiconv_write_u8(config,extra_buf,
               value->justify_ver == psiconv_justify_centre?1:
               value->justify_ver == psiconv_justify_right?2:0)))
      goto ERROR;
  }

  if (!base || (value->linespacing != base->linespacing)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x07)))
      goto ERROR;
    if ((res = psiconv_write_size(config,extra_buf,value->linespacing)))
      goto ERROR;
  }

  if (!base || (value->linespacing_exact != base->linespacing_exact)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x08)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->linespacing_exact)))
      goto ERROR;
  }

  if (!base || (value->space_above != base->space_above)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x09)))
      goto ERROR;
    if ((res = psiconv_write_size(config,extra_buf,value->space_above)))
      goto ERROR;
  }

  if (!base || (value->space_below != base->space_below)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0a)))
      goto ERROR;
    if ((res = psiconv_write_size(config,extra_buf,value->space_below)))
      goto ERROR;
  }

  if (!base || (value->keep_together != base->keep_together)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0b)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->keep_together)))
      goto ERROR;
  }

  if (!base || (value->keep_with_next != base->keep_with_next)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0c)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->keep_with_next)))
      goto ERROR;
  }

  if (!base || (value->on_next_page != base->on_next_page)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0d)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->on_next_page)))
      goto ERROR;
  }

  if (!base || (value->no_widow_protection != base->no_widow_protection)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0e)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->no_widow_protection)))
      goto ERROR;
  }

  if (!base || (value->wrap_to_fit_cell != base->wrap_to_fit_cell)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x0f)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->wrap_to_fit_cell)))
      goto ERROR;
  }

  if (!base || (value->border_distance != base->border_distance)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x10)))
      goto ERROR;
    if ((res = psiconv_write_length(config,extra_buf,value->border_distance)))
      goto ERROR;
  }

  if (!base || psiconv_compare_border(value->top_border,base->top_border)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x11)))
      goto ERROR;
    if ((res = psiconv_write_border(config,extra_buf,value->top_border))) 
      goto ERROR;
  }

  if (!base || psiconv_compare_border(value->bottom_border,
                                       base->bottom_border)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x12)))
      goto ERROR;
    if ((res = psiconv_write_border(config,extra_buf,value->bottom_border)))
      goto ERROR;
  }

  if (!base || psiconv_compare_border(value->left_border,
                                       base->left_border)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x13)))
      goto ERROR;
    if ((res = psiconv_write_border(config,extra_buf,value->left_border)))
      goto ERROR;
  }

  if (!base || psiconv_compare_border(value->right_border,
                                       base->right_border)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x14))) 
      goto ERROR;
    if ((res = psiconv_write_border(config,extra_buf,value->right_border)))
      goto ERROR;
  }

  if (!base || psiconv_compare_bullet(value->bullet,
                                       base->bullet)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x15))) 
      goto ERROR;
    if ((res = psiconv_write_bullet(config,extra_buf,value->bullet)))
      goto ERROR;
  }

  if (!value->tabs || !value->tabs->extras) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null tabs");
    res = -PSICONV_E_GENERATE;
    goto ERROR;
  } 

  /* It is not entirely clear how tabs are inherited. For now, I assume
     if there is any difference at all, we will have to generate both
     the normal tab-interval, and all specific tabs */
  if (!base || psiconv_compare_all_tabs(value->tabs,base->tabs)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x16))) 
      goto ERROR;
    if ((res = psiconv_write_length(config,extra_buf,value->tabs->normal)))
      goto ERROR;
    for (i = 0; i < psiconv_list_length(value->tabs->extras); i++) {
      if (!(tab = psiconv_list_get(value->tabs->extras,i))) {
        psiconv_warn(config,0,psiconv_buffer_length(buf),"Massive memory corruption");
        res = -PSICONV_E_NOMEM;
        goto ERROR;
      }
      if ((res = psiconv_write_u8(config,extra_buf,0x17)))
        goto ERROR;
      if ((res = psiconv_write_tab(config,extra_buf,tab)))
        goto ERROR;
    }
  }

  if ((res = psiconv_write_u32(config,buf,psiconv_buffer_length(extra_buf))))
    goto ERROR;

  res = psiconv_buffer_concat(buf,extra_buf);

ERROR:
  psiconv_buffer_free(extra_buf);
  return res;
}

int psiconv_write_character_layout_list(const psiconv_config config,
                                        psiconv_buffer buf, 
                                        psiconv_character_layout value,
                                        psiconv_character_layout base)
{
  int res;
  psiconv_buffer extra_buf;
  if (!value) {
    psiconv_warn(config,0,psiconv_buffer_length(buf),"Null character layout list");
    return -PSICONV_E_GENERATE;
  }
  if (!(extra_buf = psiconv_buffer_new()))
    return -PSICONV_E_NOMEM;

  if (!base || psiconv_compare_color(base->color,value->color)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x19)))
      goto ERROR;
    if ((res = psiconv_write_color(config,extra_buf,value->color)))
      goto ERROR;
  }

  if (!base || psiconv_compare_color(base->back_color,value->back_color)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x1a)))
      goto ERROR;
    if ((res = psiconv_write_color(config,extra_buf,value->back_color)))
      goto ERROR;
  }

  if (!base || (value->font_size != base->font_size)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x1c)))
      goto ERROR;
    if ((res = psiconv_write_size(config,extra_buf,value->font_size)))
      goto ERROR;
  }

  if (!base || (value->italic != base->italic)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x1d)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->italic)))
      goto ERROR;
  }

  if (!base || (value->bold != base->bold)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x1e)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->bold)))
      goto ERROR;
  }

  if (!base || (value->super_sub != base->super_sub)) {
    if ((value->super_sub != psiconv_superscript) &&
        (value->super_sub != psiconv_subscript) &&
        (value->super_sub != psiconv_normalscript))
      psiconv_warn(config,0,psiconv_buffer_length(buf),
                   "Unknown supersubscript (%d); assuming normal",
                   value->super_sub);
    if ((res = psiconv_write_u8(config,extra_buf,0x1f)))
      goto ERROR;
    if ((res = psiconv_write_u8(config,extra_buf,
                                value->super_sub == psiconv_superscript?1:
                                value->super_sub == psiconv_subscript?2:0)))
      goto ERROR;
  }

  if (!base || (value->underline != base->underline)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x20)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->underline)))
      goto ERROR;
  }

  if (!base || (value->strikethrough != base->strikethrough)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x21)))
      goto ERROR;
    if ((res = psiconv_write_bool(config,extra_buf,value->strikethrough)))
      goto ERROR;
  }

  if (!base || psiconv_compare_font(base->font,value->font)) {
    if ((res = psiconv_write_u8(config,extra_buf,0x22)))
      goto ERROR;
    if ((res = psiconv_write_font(config,extra_buf,value->font)))
      goto ERROR;
  }

  if ((res = psiconv_write_u32(config,buf,psiconv_buffer_length(extra_buf))))
    goto ERROR;

  res = psiconv_buffer_concat(buf,extra_buf);

ERROR:
  psiconv_buffer_free(extra_buf);
  return res;
}
1	frodo	72	/*
2			generate_layout.c - Part of psiconv, a PSION 5 file formats converter
3			Copyright (c) 2000 Frodo Looijaard <frodol@dds.nl>
4
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	frodo	168	#include <string.h>
21
22	frodo	72	#include "config.h"
23			#include "compat.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_color(const psiconv_config config, psiconv_buffer buf, const psiconv_color value)
34	frodo	72	{
35			int res;
36			if (!value) {
37	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null color");
38	frodo	72	return -PSICONV_E_GENERATE;
39			}
40	frodo	168	if ((res = psiconv_write_u8(config,buf,value->red)))
41	frodo	72	return res;
42	frodo	168	if ((res = psiconv_write_u8(config,buf,value->green)))
43	frodo	72	return res;
44	frodo	168	return psiconv_write_u8(config,buf,value->blue);
45	frodo	72	}
46
47	frodo	168	int psiconv_write_font(const psiconv_config config, psiconv_buffer buf, const psiconv_font value)
48	frodo	72	{
49	frodo	83	int res,i;
50	frodo	72	if (!value) {
51	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null font");
52	frodo	72	return -PSICONV_E_GENERATE;
53			}
54	frodo	168	if ((res = psiconv_write_u8(config,buf,strlen(value->name)+1)))
55	frodo	72	return res;
56	frodo	83	for (i = 0; i < strlen(value->name); i++)
57	frodo	168	if ((res = psiconv_write_u8(config,buf,value->name[i])))
58	frodo	83	return res;
59	frodo	168	return psiconv_write_u8(config,buf,value->screenfont);
60	frodo	72	}
61
62	frodo	168	int psiconv_write_border(const psiconv_config config, psiconv_buffer buf, const psiconv_border value)
63	frodo	72	{
64			int res;
65
66			if (!value) {
67	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null border");
68	frodo	72	return -PSICONV_E_GENERATE;
69			}
70			if (value->kind > psiconv_border_dotdotdashed)
71	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),
72	frodo	72	"Unknown border kind (%d); assuming none",value->kind);
73	frodo	168	if ((res =psiconv_write_u8(config,buf,value->kind == psiconv_border_none?0:
74	frodo	72	value->kind == psiconv_border_solid?1:
75			value->kind == psiconv_border_double?2:
76			value->kind == psiconv_border_dotted?3:
77			value->kind == psiconv_border_dashed?4:
78			value->kind == psiconv_border_dotdashed?5:
79			value->kind == psiconv_border_dotdotdashed?6:
80			0)))
81			return res;
82	frodo	168	if ((res = psiconv_write_size(config,buf,(value->kind == psiconv_border_solid) \|\|
83	frodo	72	(value->kind == psiconv_border_double) ?
84			value->thickness:1.0/20.0)))
85			return res;
86	frodo	168	if ((res = psiconv_write_color(config,buf,value->color)))
87	frodo	72	return res;
88			// Unknown byte
89	frodo	168	return psiconv_write_u8(config,buf,1);
90	frodo	72	}
91
92	frodo	168	int psiconv_write_bullet(const psiconv_config config, psiconv_buffer buf, const psiconv_bullet value)
93	frodo	72	{
94			int res;
95			psiconv_buffer extra_buf;
96			if (!value) {
97	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null bullet");
98	frodo	72	return -PSICONV_E_GENERATE;
99			}
100
101	frodo	80	if (!(extra_buf = psiconv_buffer_new()))
102	frodo	72	return -PSICONV_E_NOMEM;
103	frodo	168	if ((res = psiconv_write_size(config,extra_buf,value->font_size)))
104	frodo	72	goto ERROR;
105	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,value->character)))
106	frodo	72	goto ERROR;
107	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->indent)))
108	frodo	72	goto ERROR;
109	frodo	168	if ((res = psiconv_write_color(config,extra_buf,value->color)))
110	frodo	72	goto ERROR;
111	frodo	168	if ((res = psiconv_write_font(config,extra_buf,value->font)))
112	frodo	72	goto ERROR;
113
114	frodo	168	if ((res = psiconv_write_u8(config,buf,psiconv_buffer_length(extra_buf))))
115	frodo	72	goto ERROR;
116	frodo	79	res = psiconv_buffer_concat(buf,extra_buf);
117	frodo	72
118			ERROR:
119	frodo	79	psiconv_buffer_free(extra_buf);
120	frodo	72	return res;
121			}
122
123	frodo	168	int psiconv_write_tab(const psiconv_config config, psiconv_buffer buf,psiconv_tab value)
124	frodo	72	{
125			int res;
126			if (!value) {
127	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null tab");
128	frodo	72	return -PSICONV_E_GENERATE;
129			}
130	frodo	168	if ((res = psiconv_write_length(config,buf,value->location)))
131	frodo	72	return res;
132			if ((value->kind != psiconv_tab_left) &&
133			(value->kind != psiconv_tab_right) &&
134			(value->kind != psiconv_tab_centre))
135	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),
136	frodo	72	"Unknown tab kind (%d); assuming left",value->kind);
137	frodo	168	return psiconv_write_u8(config,buf, value->kind == psiconv_tab_right?2:
138	frodo	72	value->kind == psiconv_tab_centre?3:1);
139			}
140
141	frodo	168	int psiconv_write_paragraph_layout_list(const psiconv_config config,
142			psiconv_buffer buf,
143	frodo	72	psiconv_paragraph_layout value,
144			psiconv_paragraph_layout base)
145			{
146	frodo	78	int res,i;
147	frodo	72	psiconv_buffer extra_buf;
148	frodo	78	psiconv_tab tab;
149	frodo	72
150			if (!value) {
151	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null paragraph layout list");
152	frodo	72	return -PSICONV_E_GENERATE;
153			}
154	frodo	80	if (!(extra_buf = psiconv_buffer_new()))
155	frodo	72	return -PSICONV_E_NOMEM;
156
157	frodo	78	if (!base \|\| psiconv_compare_color(base->back_color,value->back_color)) {
158	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x01)))
159	frodo	72	goto ERROR;
160	frodo	168	if ((res = psiconv_write_color(config,extra_buf,value->back_color)))
161	frodo	72	goto ERROR;
162			}
163
164			if (!base \|\| (value->indent_left != base->indent_left)) {
165	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x02)))
166	frodo	72	goto ERROR;
167	frodo	168	if ((res = psiconv_write_length(config,extra_buf,value->indent_left)))
168	frodo	72	goto ERROR;
169			}
170
171			if (!base \|\| (value->indent_right != base->indent_right)) {
172	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x03)))
173	frodo	72	goto ERROR;
174	frodo	168	if ((res = psiconv_write_length(config,extra_buf,value->indent_right)))
175	frodo	72	goto ERROR;
176			}
177
178			if (!base \|\| (value->indent_first != base->indent_first)) {
179	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x04)))
180	frodo	72	goto ERROR;
181	frodo	168	if ((res = psiconv_write_length(config,extra_buf,value->indent_first)))
182	frodo	72	goto ERROR;
183			}
184
185			if (!base \|\| (value->justify_hor != base->justify_hor)) {
186	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x05)))
187	frodo	72	goto ERROR;
188			if ((value->justify_hor < psiconv_justify_left) \|\|
189			(value->justify_hor > psiconv_justify_full))
190	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),
191	frodo	72	"Unknown horizontal justify (%d); assuming left",
192			value->justify_hor);
193	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,
194	frodo	72	value->justify_hor == psiconv_justify_centre?1:
195			value->justify_hor == psiconv_justify_right?2:
196			value->justify_hor == psiconv_justify_full?3:0)))
197			goto ERROR;
198			}
199
200			if (!base \|\| (value->justify_ver != base->justify_ver)) {
201	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x06)))
202	frodo	72	goto ERROR;
203			if ((value->justify_ver < psiconv_justify_top) \|\|
204			(value->justify_ver > psiconv_justify_bottom))
205	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),
206	frodo	72	"Unknown vertical justify (%d); assuming middle",
207			value->justify_ver);
208	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,
209	frodo	72	value->justify_ver == psiconv_justify_centre?1:
210			value->justify_ver == psiconv_justify_right?2:0)))
211			goto ERROR;
212			}
213
214			if (!base \|\| (value->linespacing != base->linespacing)) {
215	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x07)))
216	frodo	72	goto ERROR;
217	frodo	168	if ((res = psiconv_write_size(config,extra_buf,value->linespacing)))
218	frodo	72	goto ERROR;
219			}
220
221			if (!base \|\| (value->linespacing_exact != base->linespacing_exact)) {
222	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x08)))
223	frodo	72	goto ERROR;
224	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->linespacing_exact)))
225	frodo	72	goto ERROR;
226			}
227
228			if (!base \|\| (value->space_above != base->space_above)) {
229	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x09)))
230	frodo	72	goto ERROR;
231	frodo	168	if ((res = psiconv_write_size(config,extra_buf,value->space_above)))
232	frodo	72	goto ERROR;
233			}
234
235			if (!base \|\| (value->space_below != base->space_below)) {
236	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0a)))
237	frodo	72	goto ERROR;
238	frodo	168	if ((res = psiconv_write_size(config,extra_buf,value->space_below)))
239	frodo	72	goto ERROR;
240			}
241
242			if (!base \|\| (value->keep_together != base->keep_together)) {
243	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0b)))
244	frodo	72	goto ERROR;
245	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->keep_together)))
246	frodo	72	goto ERROR;
247			}
248
249			if (!base \|\| (value->keep_with_next != base->keep_with_next)) {
250	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0c)))
251	frodo	72	goto ERROR;
252	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->keep_with_next)))
253	frodo	72	goto ERROR;
254			}
255
256			if (!base \|\| (value->on_next_page != base->on_next_page)) {
257	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0d)))
258	frodo	72	goto ERROR;
259	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->on_next_page)))
260	frodo	72	goto ERROR;
261			}
262
263			if (!base \|\| (value->no_widow_protection != base->no_widow_protection)) {
264	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0e)))
265	frodo	72	goto ERROR;
266	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->no_widow_protection)))
267	frodo	72	goto ERROR;
268			}
269
270	frodo	104	if (!base \|\| (value->wrap_to_fit_cell != base->wrap_to_fit_cell)) {
271	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x0f)))
272	frodo	104	goto ERROR;
273	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->wrap_to_fit_cell)))
274	frodo	104	goto ERROR;
275			}
276
277	frodo	72	if (!base \|\| (value->border_distance != base->border_distance)) {
278	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x10)))
279	frodo	72	goto ERROR;
280	frodo	168	if ((res = psiconv_write_length(config,extra_buf,value->border_distance)))
281	frodo	72	goto ERROR;
282			}
283
284	frodo	78	if (!base \|\| psiconv_compare_border(value->top_border,base->top_border)) {
285	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x11)))
286	frodo	72	goto ERROR;
287	frodo	168	if ((res = psiconv_write_border(config,extra_buf,value->top_border)))
288	frodo	72	goto ERROR;
289			}
290
291	frodo	78	if (!base \|\| psiconv_compare_border(value->bottom_border,
292			base->bottom_border)) {
293	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x12)))
294	frodo	72	goto ERROR;
295	frodo	168	if ((res = psiconv_write_border(config,extra_buf,value->bottom_border)))
296	frodo	72	goto ERROR;
297			}
298
299	frodo	78	if (!base \|\| psiconv_compare_border(value->left_border,
300			base->left_border)) {
301	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x13)))
302	frodo	72	goto ERROR;
303	frodo	168	if ((res = psiconv_write_border(config,extra_buf,value->left_border)))
304	frodo	72	goto ERROR;
305			}
306
307	frodo	78	if (!base \|\| psiconv_compare_border(value->right_border,
308			base->right_border)) {
309	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x14)))
310	frodo	72	goto ERROR;
311	frodo	168	if ((res = psiconv_write_border(config,extra_buf,value->right_border)))
312	frodo	72	goto ERROR;
313			}
314
315	frodo	78	if (!base \|\| psiconv_compare_bullet(value->bullet,
316			base->bullet)) {
317	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x15)))
318	frodo	72	goto ERROR;
319	frodo	168	if ((res = psiconv_write_bullet(config,extra_buf,value->bullet)))
320	frodo	72	goto ERROR;
321			}
322
323			if (!value->tabs \|\| !value->tabs->extras) {
324	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null tabs");
325	frodo	72	res = -PSICONV_E_GENERATE;
326			goto ERROR;
327			}
328	frodo	78
329	frodo	72	/* It is not entirely clear how tabs are inherited. For now, I assume
330			if there is any difference at all, we will have to generate both
331			the normal tab-interval, and all specific tabs */
332	frodo	78	if (!base \|\| psiconv_compare_all_tabs(value->tabs,base->tabs)) {
333	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x16)))
334	frodo	72	goto ERROR;
335	frodo	168	if ((res = psiconv_write_length(config,extra_buf,value->tabs->normal)))
336	frodo	72	goto ERROR;
337			for (i = 0; i < psiconv_list_length(value->tabs->extras); i++) {
338	frodo	78	if (!(tab = psiconv_list_get(value->tabs->extras,i))) {
339	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Massive memory corruption");
340	frodo	72	res = -PSICONV_E_NOMEM;
341			goto ERROR;
342			}
343	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x17)))
344	frodo	72	goto ERROR;
345	frodo	168	if ((res = psiconv_write_tab(config,extra_buf,tab)))
346	frodo	72	goto ERROR;
347			}
348			}
349
350	frodo	168	if ((res = psiconv_write_u32(config,buf,psiconv_buffer_length(extra_buf))))
351	frodo	76	goto ERROR;
352
353	frodo	79	res = psiconv_buffer_concat(buf,extra_buf);
354	frodo	72
355			ERROR:
356	frodo	79	psiconv_buffer_free(extra_buf);
357	frodo	72	return res;
358			}
359
360	frodo	168	int psiconv_write_character_layout_list(const psiconv_config config,
361			psiconv_buffer buf,
362	frodo	72	psiconv_character_layout value,
363			psiconv_character_layout base)
364			{
365			int res;
366			psiconv_buffer extra_buf;
367			if (!value) {
368	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),"Null character layout list");
369	frodo	72	return -PSICONV_E_GENERATE;
370			}
371	frodo	80	if (!(extra_buf = psiconv_buffer_new()))
372	frodo	72	return -PSICONV_E_NOMEM;
373
374	frodo	78	if (!base \|\| psiconv_compare_color(base->color,value->color)) {
375	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x19)))
376	frodo	72	goto ERROR;
377	frodo	168	if ((res = psiconv_write_color(config,extra_buf,value->color)))
378	frodo	72	goto ERROR;
379			}
380
381	frodo	78	if (!base \|\| psiconv_compare_color(base->back_color,value->back_color)) {
382	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x1a)))
383	frodo	72	goto ERROR;
384	frodo	168	if ((res = psiconv_write_color(config,extra_buf,value->back_color)))
385	frodo	72	goto ERROR;
386			}
387
388			if (!base \|\| (value->font_size != base->font_size)) {
389	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x1c)))
390	frodo	72	goto ERROR;
391	frodo	168	if ((res = psiconv_write_size(config,extra_buf,value->font_size)))
392	frodo	72	goto ERROR;
393			}
394
395			if (!base \|\| (value->italic != base->italic)) {
396	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x1d)))
397	frodo	72	goto ERROR;
398	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->italic)))
399	frodo	72	goto ERROR;
400			}
401
402			if (!base \|\| (value->bold != base->bold)) {
403	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x1e)))
404	frodo	72	goto ERROR;
405	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->bold)))
406	frodo	72	goto ERROR;
407			}
408
409			if (!base \|\| (value->super_sub != base->super_sub)) {
410			if ((value->super_sub != psiconv_superscript) &&
411			(value->super_sub != psiconv_subscript) &&
412			(value->super_sub != psiconv_normalscript))
413	frodo	168	psiconv_warn(config,0,psiconv_buffer_length(buf),
414	frodo	72	"Unknown supersubscript (%d); assuming normal",
415			value->super_sub);
416	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x1f)))
417	frodo	72	goto ERROR;
418	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,
419	frodo	84	value->super_sub == psiconv_superscript?1:
420			value->super_sub == psiconv_subscript?2:0)))
421	frodo	72	goto ERROR;
422			}
423
424			if (!base \|\| (value->underline != base->underline)) {
425	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x20)))
426	frodo	72	goto ERROR;
427	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->underline)))
428	frodo	72	goto ERROR;
429			}
430
431			if (!base \|\| (value->strikethrough != base->strikethrough)) {
432	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x21)))
433	frodo	72	goto ERROR;
434	frodo	168	if ((res = psiconv_write_bool(config,extra_buf,value->strikethrough)))
435	frodo	72	goto ERROR;
436			}
437
438	frodo	78	if (!base \|\| psiconv_compare_font(base->font,value->font)) {
439	frodo	168	if ((res = psiconv_write_u8(config,extra_buf,0x22)))
440	frodo	72	goto ERROR;
441	frodo	168	if ((res = psiconv_write_font(config,extra_buf,value->font)))
442	frodo	72	goto ERROR;
443			}
444
445	frodo	168	if ((res = psiconv_write_u32(config,buf,psiconv_buffer_length(extra_buf))))
446	frodo	76	goto ERROR;
447
448	frodo	79	res = psiconv_buffer_concat(buf,extra_buf);
449	frodo	72
450			ERROR:
451	frodo	79	psiconv_buffer_free(extra_buf);
452	frodo	72	return res;
453			}
frodo@frodo.looijaard.name	ViewVC Help
Powered by ViewVC 1.1.26