/[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 80 - (show annotations)
Wed Dec 27 02:12:23 2000 UTC (23 years, 3 months ago) by frodo
File MIME type: text/plain
File size: 3643 byte(s)
(Frodo) Many changes. Layout sections now work!

* Added list_empty, list_replace
* Added relocation to buffers, removed base address
* Added buffer_resolve, buffer_add_reference, buffer_add_target,
  psiconv_unique_id functions
* Modifified other buffer functions to work with references
* Added comments to buffer.h
* Added write_offset function
* Added reference support in functions where needed
* Corrected extra/rewrite error message
* Corrected numerous bugs to make layouts work.

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

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