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

Diff of /psiconv/trunk/lib/psiconv/list.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 70 Revision 80
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18*/ 18*/
19 19
20 20
21#include "config.h" 21#include "config.h"
22#include "compat.h"
22#include <stddef.h> 23#include <stddef.h>
23#include <stdlib.h> 24#include <stdlib.h>
24#include <stdio.h> 25#include <stdio.h>
26#include "general.h"
25#include "list.h" 27#include "list.h"
26#include "error.h" 28#include "error.h"
27 29
28static int psiconv_list_resize(psiconv_list l,unsigned int nr); 30static int psiconv_list_resize(psiconv_list l,psiconv_u32 nr);
29 31
30struct psiconv_list_s { 32struct psiconv_list_s {
31 int cur_len; 33 psiconv_u32 cur_len;
32 int max_len; 34 psiconv_u32 max_len;
33 int el_size; 35 size_t el_size;
34 void *els; 36 void *els;
35}; 37};
36 38
37psiconv_list psiconv_list_new(int element_size) 39psiconv_list psiconv_list_new(size_t element_size)
38{ 40{
39 psiconv_list l; 41 psiconv_list l;
40 l = malloc(sizeof(*l)); 42 l = malloc(sizeof(*l));
41 if (!l) 43 if (!l)
42 return NULL; 44 return NULL;
60{ 62{
61 psiconv_list_foreach_el(l,free_el); 63 psiconv_list_foreach_el(l,free_el);
62 psiconv_list_free(l); 64 psiconv_list_free(l);
63} 65}
64 66
65int psiconv_list_length(const psiconv_list l) 67psiconv_u32 psiconv_list_length(const psiconv_list l)
66{ 68{
67 return l->cur_len; 69 return l->cur_len;
68} 70}
69 71
70int psiconv_list_is_empty(const psiconv_list l) 72int psiconv_list_is_empty(const psiconv_list l)
71{ 73{
72 return l->cur_len == 0; 74 return l->cur_len == 0;
73} 75}
74 76
77void psiconv_list_empty(psiconv_list l)
78{
79 l->cur_len = 0;
80}
81
75void *psiconv_list_get(const psiconv_list l, unsigned int indx) 82void *psiconv_list_get(const psiconv_list l, psiconv_u32 indx)
76{ 83{
77 if (indx >= l->cur_len) 84 if (indx >= l->cur_len)
78 return NULL; 85 return NULL;
79 else 86 else
80 return ((char *) (l->els)) + indx * l->el_size; 87 return ((char *) (l->els)) + indx * l->el_size;
81} 88}
82 89
83int psiconv_list_add(psiconv_list l, const void *el) 90int psiconv_list_add(psiconv_list l, const void *el)
84{ 91{
92 int res;
85 if (psiconv_list_resize(l,l->cur_len + 1)) 93 if ((res = psiconv_list_resize(l,l->cur_len + 1)))
86 return -PSICONV_E_NOMEM; 94 return res;
87 memcpy(((char *) (l->els)) + l->cur_len * l->el_size, el, l->el_size); 95 memcpy(((char *) (l->els)) + l->cur_len * l->el_size, el, l->el_size);
88 l->cur_len ++; 96 l->cur_len ++;
89 return 0; 97 return 0;
90} 98}
91 99
100int psiconv_list_replace(psiconv_list l, psiconv_u32 indx, const void *el)
101{
102 if (indx >= l->cur_len)
103 return -PSICONV_E_OTHER;
104 memcpy(((char *) (l->els)) + indx * l->el_size,el, l->el_size);
105 return -PSICONV_E_OK;
106}
107
92void psiconv_list_foreach_el(psiconv_list l, void action(void *el)) 108void psiconv_list_foreach_el(psiconv_list l, void action(void *el))
93{ 109{
94 int i; 110 psiconv_u32 i;
95 for (i = 0; i < l->cur_len; i ++) 111 for (i = 0; i < l->cur_len; i ++)
96 action(psiconv_list_get(l,i)); 112 action(psiconv_list_get(l,i));
97} 113}
98 114
99psiconv_list psiconv_list_clone(const psiconv_list l) 115psiconv_list psiconv_list_clone(const psiconv_list l)
100{ 116{
101 psiconv_list l2; 117 psiconv_list l2;
102 int i; 118 psiconv_u32 i;
103 l2 = psiconv_list_new(l->el_size); 119 l2 = psiconv_list_new(l->el_size);
104 if (!l2) 120 if (!l2)
105 return NULL; 121 return NULL;
106 for (i = 0; i < l->cur_len; i ++) 122 for (i = 0; i < l->cur_len; i ++)
107 if (psiconv_list_add(l2,psiconv_list_get(l,i))) { 123 if (psiconv_list_add(l2,psiconv_list_get(l,i))) {
110 } 126 }
111 return l2; 127 return l2;
112 128
113} 129}
114 130
115
116size_t psiconv_list_fread(psiconv_list l,size_t size, FILE *f) 131size_t psiconv_list_fread(psiconv_list l,size_t size, FILE *f)
117{ 132{
118 size_t res; 133 size_t res;
119 if (psiconv_list_resize(l,l->cur_len + size)) 134 if (psiconv_list_resize(l,l->cur_len + size))
120 return 0; 135 return 0;
121 res = fread(((char *) (l->els)) + l->cur_len * l->el_size,l->el_size,size,f); 136 res = fread(((char *) (l->els)) + l->cur_len * l->el_size,l->el_size,size,f);
122 l->cur_len += res; 137 l->cur_len += res;
123 return res; 138 return res;
124} 139}
125 140
141int psiconv_list_fread_all(psiconv_list l, FILE *f)
142{
143 while (!feof(f)) {
144 if (!psiconv_list_fread(l,1024,f) && !feof(f))
145 return -PSICONV_E_NOMEM;
146 }
147 return -PSICONV_E_OK;
148}
149
150int psiconv_list_fwrite_all(const psiconv_list l, FILE *f)
151{
152 psiconv_u32 pos = 0;
153 psiconv_u32 written;
154 psiconv_u32 len = psiconv_list_length(l);
155 while (pos < len) {
156 if (!(written = fwrite(((char *)(l->els)) + pos * l->el_size,l->el_size,
157 len - pos,f)))
158 return -PSICONV_E_OTHER;
159 pos += written;
160 }
161 return -PSICONV_E_OK;
162}
163
126int psiconv_list_resize(psiconv_list l,unsigned int nr) 164int psiconv_list_resize(psiconv_list l,psiconv_u32 nr)
127{ 165{
128 void * temp; 166 void * temp;
129 if (nr > l->max_len) { 167 if (nr > l->max_len) {
130 l->max_len = 1.1 * nr; 168 l->max_len = 1.1 * nr;
131 l->max_len += 16 - l->max_len % 16; 169 l->max_len += 16 - l->max_len % 16;
132 temp = realloc(l->els,l->max_len * l->el_size); 170 temp = realloc(l->els,l->max_len * l->el_size);
133 if (temp) { 171 if (temp) {
134 l->els = temp; 172 l->els = temp;
135 return 0; 173 return -PSICONV_E_OK;
136 } else 174 } else
137 return -PSICONV_E_NOMEM; 175 return -PSICONV_E_NOMEM;
138 } 176 }
177 return -PSICONV_E_OK;
178}
179
180int psiconv_list_concat(psiconv_list l, const psiconv_list extra)
181{
182 int res;
183 if (l->el_size != extra->el_size)
184 return -PSICONV_E_OTHER;
185 if ((res = psiconv_list_resize(l,
186 l->cur_len + extra->cur_len)))
187 return res;
188 /* Unreadable but correct. */
189 memcpy(((char *) (l->els)) + l->cur_len * l->el_size,extra->els,
190 extra->cur_len * extra->el_size);
191 l->cur_len += extra->cur_len;
139 return 0; 192 return 0;
140} 193}
141 194
195

Legend:
Removed from v.70  
changed lines
  Added in v.80

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