/[public]/psiconv/trunk/lib/psiconv/generate_simple.c
ViewVC logotype

Contents of /psiconv/trunk/lib/psiconv/generate_simple.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 142 - (show annotations)
Tue Jan 29 18:38:38 2002 UTC (22 years, 2 months ago) by frodo
File MIME type: text/plain
File size: 3688 byte(s)
(Frodo) DMALLOC support

1 /*
2 generate_simple.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 #include "config.h"
21 #include "compat.h"
22
23 #include "generate_routines.h"
24 #include "error.h"
25
26 #ifdef DMALLOC
27 #include <dmalloc.h>
28 #endif
29
30
31 int psiconv_write_u8(psiconv_buffer buf,const psiconv_u8 value)
32 {
33 return psiconv_buffer_add(buf,value);
34 }
35
36 int psiconv_write_u16(psiconv_buffer buf,const psiconv_u16 value)
37 {
38 int res;
39 if ((res = psiconv_buffer_add(buf,value & 0xff)))
40 return res;
41 return psiconv_buffer_add(buf,(value & 0xff00) >> 8);
42 }
43
44 int psiconv_write_u32(psiconv_buffer buf,const psiconv_u32 value)
45 {
46 int res;
47 if ((res = psiconv_buffer_add(buf,value & 0xff)))
48 return res;
49 if ((res = psiconv_buffer_add(buf,(value & 0xff00) >> 8)))
50 return res;
51 if ((res = psiconv_buffer_add(buf,(value & 0xff0000) >> 16)))
52 return res;
53 return psiconv_buffer_add(buf,(value & 0xff000000) >> 24);
54 }
55
56 int psiconv_write_S(psiconv_buffer buf, const psiconv_u32 value)
57 {
58 if (value < 0x40)
59 return psiconv_write_u8(buf,value * 4 + 2);
60 else if (value < 0x2000)
61 return psiconv_write_u16(buf,value * 8 + 3);
62 else {
63 psiconv_warn(0,psiconv_buffer_length(buf),
64 "Don't know how to write S value larger than 0x2000 "
65 "(trying %x)",value);
66 return -PSICONV_E_GENERATE;
67 }
68 }
69
70 int psiconv_write_X(psiconv_buffer buf, const psiconv_u32 value)
71 {
72 if (value < 0x80)
73 return psiconv_write_u8(buf,value * 2);
74 else if (value < 0x4000)
75 return psiconv_write_u16(buf,value * 4 + 1);
76 else if (value < 0x20000000)
77 return psiconv_write_u16(buf,value * 8 + 3);
78 else {
79 psiconv_warn(0,psiconv_buffer_length(buf),
80 "Don't know how to write X value larger than 0x20000000 "
81 "(trying %x)",value);
82 return -PSICONV_E_GENERATE;
83 }
84 }
85
86 int psiconv_write_length(psiconv_buffer buf, const psiconv_length_t value)
87 {
88 return psiconv_write_u32(buf,value * (1440.0/2.54) + 0.5);
89 }
90
91 int psiconv_write_size(psiconv_buffer buf, psiconv_size_t value)
92 {
93 return psiconv_write_u32(buf,value * 20.0 + 0.5);
94 }
95
96 int psiconv_write_bool(psiconv_buffer buf, const psiconv_bool_t value)
97 {
98 if ((value != psiconv_bool_true) && (value != psiconv_bool_false))
99 psiconv_warn(0,psiconv_buffer_length(buf),
100 "Boolean has non-enum value (found %d)",value);
101 return psiconv_write_u8(buf,value == psiconv_bool_false?0:1);
102 }
103
104 int psiconv_write_string(psiconv_buffer buf, const psiconv_string_t value)
105 {
106 int res,i;
107 if (!value) {
108 psiconv_warn(0,psiconv_buffer_length(buf),
109 "NULL string");
110 return -PSICONV_E_GENERATE;
111 }
112 if ((res = psiconv_write_S(buf,strlen(value))))
113 return res;
114 for (i = 0; i < strlen(value); i++)
115 if ((res = psiconv_write_u8(buf,value[i])))
116 return res;
117 return -PSICONV_E_OK;
118 }
119
120 int psiconv_write_offset(psiconv_buffer buf, psiconv_u32 id)
121 {
122 return psiconv_buffer_add_reference(buf,id);
123 }

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