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

Annotation of /psiconv/trunk/lib/psiconv/buffer.c

Parent Directory Parent Directory | Revision Log Revision Log


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

1 frodo 79 /*
2     buffer.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    
21     #include "config.h"
22     #include "compat.h"
23    
24     #include <stdlib.h>
25    
26     #include "list.h"
27     #include "error.h"
28     #include "buffer.h"
29    
30 frodo 142 #ifdef DMALLOC
31     #include <dmalloc.h>
32     #endif
33    
34 frodo 80 typedef struct psiconv_relocation_s {
35     psiconv_u32 offset;
36     int id;
37     } *psiconv_relocation;
38    
39 frodo 79 struct psiconv_buffer_s {
40 frodo 80 psiconv_list reloc_target; /* of struct relocation_s */
41     psiconv_list reloc_ref; /* of struct relocation_s */
42     psiconv_list data; /* of psiconv_u8 */
43 frodo 79 };
44    
45 frodo 80 static psiconv_u32 unique_id = 1;
46    
47     psiconv_u32 psiconv_buffer_unique_id(void)
48 frodo 79 {
49 frodo 80 return unique_id ++;
50     }
51    
52     psiconv_buffer psiconv_buffer_new(void)
53     {
54 frodo 79 psiconv_buffer buf;
55     if (!(buf = malloc(sizeof(*buf))))
56 frodo 80 goto ERROR1;
57     if (!(buf->data = psiconv_list_new(sizeof(psiconv_u8))))
58     goto ERROR2;
59     if (!(buf->reloc_target = psiconv_list_new(
60     sizeof(struct psiconv_relocation_s))))
61     goto ERROR3;
62     if (!(buf->reloc_ref = psiconv_list_new(
63     sizeof(struct psiconv_relocation_s))))
64     goto ERROR4;
65 frodo 79 return buf;
66 frodo 80 ERROR4:
67     psiconv_list_free(buf->reloc_target);
68     ERROR3:
69     psiconv_list_free(buf->data);
70     ERROR2:
71     free(buf);
72     ERROR1:
73     return NULL;
74 frodo 79 }
75    
76     void psiconv_buffer_free(psiconv_buffer buf)
77     {
78 frodo 80 psiconv_list_free(buf->reloc_ref);
79     psiconv_list_free(buf->reloc_target);
80 frodo 79 psiconv_list_free(buf->data);
81     free(buf);
82     }
83    
84     psiconv_u32 psiconv_buffer_length(const psiconv_buffer buf)
85     {
86     return psiconv_list_length(buf->data);
87     }
88    
89    
90     psiconv_u8 *psiconv_buffer_get(const psiconv_buffer buf, psiconv_u32 off)
91     {
92     return psiconv_list_get(buf->data,off);
93     }
94    
95     int psiconv_buffer_add(psiconv_buffer buf,psiconv_u8 data)
96     {
97     return psiconv_list_add(buf->data,&data);
98     }
99    
100     size_t psiconv_buffer_fread(psiconv_buffer buf,size_t size, FILE *f)
101     {
102     return psiconv_list_fread(buf->data,size,f);
103     }
104    
105     int psiconv_buffer_fread_all(psiconv_buffer buf, FILE *f)
106     {
107     return psiconv_list_fread_all(buf->data,f);
108     }
109    
110     int psiconv_buffer_fwrite_all(const psiconv_buffer buf, FILE *f)
111     {
112     return psiconv_list_fwrite_all(buf->data,f);
113     }
114    
115     int psiconv_buffer_concat(psiconv_buffer buf, const psiconv_buffer extra)
116     {
117 frodo 80 int res;
118     psiconv_u32 i;
119     psiconv_relocation reloc;
120    
121    
122     for (i = 0; i < psiconv_list_length(extra->reloc_target); i++) {
123     if (!(reloc = psiconv_list_get(extra->reloc_target,i)))
124     return -PSICONV_E_OTHER;
125     reloc->offset += psiconv_list_length(buf->data);
126     if ((res=psiconv_list_add(buf->reloc_target,reloc)))
127     return res;
128     }
129     for (i = 0; i < psiconv_list_length(extra->reloc_ref); i++) {
130     if (!(reloc = psiconv_list_get(extra->reloc_ref,i)))
131     return -PSICONV_E_OTHER;
132     reloc->offset += psiconv_list_length(buf->data);
133     if ((res = psiconv_list_add(buf->reloc_ref,reloc)))
134     return res;
135     }
136 frodo 79 return psiconv_list_concat(buf->data,extra->data);
137     }
138 frodo 80
139     int psiconv_buffer_resolve(psiconv_buffer buf)
140     {
141     int res;
142     psiconv_u32 i,j,temp;
143     psiconv_relocation target,ref;
144    
145     for (i = 0; i < psiconv_list_length(buf->reloc_ref);i++) {
146     if (!(ref = psiconv_list_get(buf->reloc_ref,i)))
147     return -PSICONV_E_OTHER;
148     for (j = 0; j < psiconv_list_length(buf->reloc_target);j++) {
149     if (!(target = psiconv_list_get(buf->reloc_target,j)))
150     return -PSICONV_E_OTHER;
151     if (ref->id == target->id) {
152     temp = target->offset & 0xff;
153     if ((res = psiconv_list_replace(buf->data,ref->offset,&temp)))
154     return -PSICONV_E_OTHER;
155     temp = (target->offset >> 8) & 0xff;
156     if ((res = psiconv_list_replace(buf->data,ref->offset + 1,&temp)))
157     return -PSICONV_E_OTHER;
158     temp = (target->offset >> 16) & 0xff;
159     if ((res = psiconv_list_replace(buf->data,ref->offset + 2,&temp)))
160     return -PSICONV_E_OTHER;
161     temp = (target->offset >> 24) & 0xff;
162     if ((res = psiconv_list_replace(buf->data,ref->offset + 3,&temp)))
163     return -PSICONV_E_OTHER;
164     break;
165     }
166     }
167     if (j == psiconv_list_length(buf->reloc_target))
168     return -PSICONV_E_OTHER;
169     }
170     psiconv_list_empty(buf->reloc_target);
171     psiconv_list_empty(buf->reloc_ref);
172     return -PSICONV_E_OK;
173     }
174    
175     int psiconv_buffer_add_reference(psiconv_buffer buf,int id)
176     {
177     struct psiconv_relocation_s reloc;
178     int res,i;
179     psiconv_u8 data;
180    
181     reloc.offset = psiconv_list_length(buf->data);
182     reloc.id = id;
183     if ((res = psiconv_list_add(buf->reloc_ref,&reloc)))
184     return res;
185     data = 0x00;
186     for (i = 0; i < 4; i++)
187     if ((res = psiconv_list_add(buf->data,&data)))
188     return res;
189     return -PSICONV_E_OK;
190     }
191    
192     int psiconv_buffer_add_target(psiconv_buffer buf, int id)
193     {
194     struct psiconv_relocation_s reloc;
195    
196     reloc.offset = psiconv_list_length(buf->data);
197     reloc.id = id;
198     return psiconv_list_add(buf->reloc_target,&reloc);
199     }

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