annotate array.c @ 102:735d6c774f7a

Reorder protos in ini.h
author David Demelier <markand@malikania.fr>
date Tue, 17 Jan 2012 12:01:22 +0100
parents d534fdcbb319
children 06c968b92090
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
1 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
2 * array.c -- manipulate dynamic arrays
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
3 *
98
b1a084c030c8 Happy new year
David Demelier <markand@malikania.fr>
parents: 93
diff changeset
4 * Copyright (c) 2011, 2012, David Demelier <markand@malikania.fr>
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
5 *
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
6 * Permission to use, copy, modify, and/or distribute this software for any
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
7 * purpose with or without fee is hereby granted, provided that the above
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
8 * copyright notice and this permission notice appear in all copies.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
9 *
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
17 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
18
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
19 #include <stdio.h>
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
20 #include <stdlib.h>
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
21 #include <string.h>
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
22
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
23 #include "array.h"
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
24
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
25 #define OFFSET(x) (arr->unit * (x))
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
26
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
27 static int array_grow(struct array *);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
28
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
29 int
93
9ebea85c7765 Use pointer instead of copying variable in ARRAY_FOREACH, then you can modify it
David Demelier <markand@malikania.fr>
parents: 92
diff changeset
30 array_init(struct array *arr, size_t unit)
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
31 {
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
32 if (unit == 0)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
33 return -1;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
34
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
35 arr->unit = unit;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
36 arr->size = OFFSET(arr->bsize);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
37
92
4d723e81b685 Same thing for parray
David Demelier <markand@malikania.fr>
parents: 91
diff changeset
38 /* Set defaults if needed */
4d723e81b685 Same thing for parray
David Demelier <markand@malikania.fr>
parents: 91
diff changeset
39 arr->bsize = (arr->bsize <= 0) ? ARRAY_DEFAULT_BSIZE : arr->bsize;
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
40 arr->malloc = (arr->malloc == NULL) ? &malloc : arr->malloc;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
41 arr->realloc = (arr->realloc == NULL) ? &realloc : arr->realloc;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
42
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
43 if ((arr->data = arr->malloc(arr->size)) == NULL)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
44 return -1;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
45
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
46 return 0;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
47 }
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
48
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
49 /*
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
50 * Valid options that can be set for an array :
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
51 * l -> optional array block size of type int
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
52 * m -> malloc function that must matches void * (*malloc)(size_t)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
53 * r -> realloc function that must matches void * (*realloc)(void *, size_t)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
54 * t -> type of array of type enum array_type
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
55 */
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
56
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
57 void
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
58 array_set(struct array *arr, const char *fmt, ...)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
59 {
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
60 va_list ap;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
61 const char *p;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
62
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
63 va_start(ap, fmt);
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
64 for (p = fmt; *p != '\0'; ++p)
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
65 switch (*p) {
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
66 case 'l':
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
67 arr->bsize = va_arg(ap, int);
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
68 break;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
69 case 'm':
93
9ebea85c7765 Use pointer instead of copying variable in ARRAY_FOREACH, then you can modify it
David Demelier <markand@malikania.fr>
parents: 92
diff changeset
70 arr->malloc = va_arg(ap, void *(*)(size_t));
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
71 break;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
72 case 'r':
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
73 arr->realloc = va_arg(ap, void *(*)(void *, size_t));
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
74 break;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
75 case 't':
99
d534fdcbb319 Remove #ifdef __cplusplus
David Demelier <markand@malikania.fr>
parents: 98
diff changeset
76 arr->type = va_arg(ap, int);
d534fdcbb319 Remove #ifdef __cplusplus
David Demelier <markand@malikania.fr>
parents: 98
diff changeset
77 break;
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
78 default:
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
79 break;
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
80 }
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
81 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
82
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
83 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
84 * Add to the head of array. NOTE: this may be very slow when adding a lot
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
85 * of object (about 100000). If you need to add a lot of data please consider
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
86 * using linked list instead.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
87 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
88
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
89 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
90 array_push(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
91 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
92 if (array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
93 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
94
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
95 memmove((char *)arr->data + arr->unit, arr->data, OFFSET(arr->length++));
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
96 memcpy((char *)arr->data, data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
97
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
98 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
99 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
100
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
101 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
102 * Insert the data at the specified index. The function returns -1 on
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
103 * allocation failure or when the index is outof bounds otherwise 0 is returned.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
104 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
105
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
106 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
107 array_insert(struct array *arr, const void *data, int index)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
108 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
109 if (index > arr->length - 1 || index < 0 || array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
110 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
111
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
112 memmove((char *)arr->data + OFFSET(index + 1),
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
113 (char *)arr->data + OFFSET(index), OFFSET(arr->length++ - index));
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
114 memcpy((char *)arr->data + OFFSET(index), data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
115
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
116 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
117 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
118
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
119 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
120 * Append the data to the end of array.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
121 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
122
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
123 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
124 array_append(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
125 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
126 if (array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
127 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
128
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
129 memcpy((char *)arr->data + OFFSET(arr->length++), data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
130
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
131 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
132 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
133
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
134 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
135 * Remove the array's head.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
136 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
137
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
138 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
139 array_pop(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
140 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
141 if (arr->length > 0) {
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
142 memmove((char *)arr->data, (char *)arr->data + OFFSET(1),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
143 OFFSET(--arr->length));
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
144 memset((char *)arr->data + OFFSET(arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
145 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
146 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
147
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
148 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
149 * Remove the array's tail.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
150 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
151
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
152 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
153 array_unqueue(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
154 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
155 if (arr->length > 0)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
156 memset((char *)arr->data + OFFSET(--arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
157 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
158
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
159 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
160 * Remove the data at the specified index. Bounds are checked.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
161 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
162
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
163 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
164 array_remove(struct array *arr, int index)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
165 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
166 if (arr->length > 0 && index >= 0 && index < arr->length) {
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
167 memmove((char *)arr->data + OFFSET(index),
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
168 (char *)arr->data + OFFSET(index + 1),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
169 OFFSET(arr->length - index - 1));
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
170 memset((char *)arr->data + OFFSET(--arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
171 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
172 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
173
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
174 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
175 * Remove the object referenced by the `data' argument. Useful when you
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
176 * don't know the index.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
177 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
178
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
179 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
180 array_unref(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
181 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
182 void *elm;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
183 int i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
184
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
185 for (i = 0; i < arr->length; ++i) {
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
186 elm = (char *)arr->data + OFFSET(i);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
187
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
188 if (memcmp(elm, data, arr->unit) == 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
189 array_remove(arr, i);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
190 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
191 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
192
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
193 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
194 * Swap the two elements referenced by index `i1' and `i2'. This function needs
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
195 * to allocate data to swap elements thus if the functions fails it returns -1
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
196 * otherwise 0 is returned.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
197 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
198
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
199 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
200 array_iswap(struct array *arr, int i1, int i2)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
201 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
202 void *tmp;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
203
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
204 /* Out of bounds */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
205 if (i1 >= arr->length || i1 < 0 || i2 >= arr->length || i2 < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
206 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
207
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
208 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
209 * Only allocate at this time, the user may do not want to use this
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
210 * function.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
211 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
212
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
213 if ((tmp = arr->malloc(arr->unit)) == NULL)
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
214 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
215
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
216 memcpy((char *)tmp, (char *)arr->data + OFFSET(i1), arr->unit);
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
217 memcpy((char *)arr->data + OFFSET(i1), (char *)arr->data + OFFSET(i2),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
218 arr->unit);
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
219 memcpy((char *)arr->data + OFFSET(i2), (char *)tmp, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
220
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
221 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
222 * Clear bytes for safety you probably don't want a password or
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
223 * secure data to be left somewhere in the memory.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
224 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
225
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
226 memset(tmp, 0, arr->unit);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
227 free(tmp);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
228
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
229 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
230 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
231
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
232 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
233 * Swap the two elements referenced by data `o1' and `o2'. This function
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
234 * may be slow on large arrays since it must travel all the object
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
235 * to find the indexes.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
236 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
237
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
238 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
239 array_pswap(struct array *arr, const void *o1, const void *o2)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
240 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
241 int found, i1, i2;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
242
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
243 for (i1 = found = 0; !found && i1 < arr->length; ++i1)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
244 found = memcmp((char *)arr->data + OFFSET(i1), o1, arr->unit) == 0;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
245
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
246 if (!found)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
247 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
248
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
249 for (i2 = found = 0; !found && i2 < arr->length; ++i2)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
250 found = memcmp((char *)arr->data + OFFSET(i2), o2, arr->unit) == 0;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
251
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
252 if (!found)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
253 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
254
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
255 return array_iswap(arr, --i1, --i2);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
256 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
257
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
258 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
259 * Apply the function `fn' on each object and give the optional `udata'
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
260 * argument to the function too.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
261 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
262
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
263 void
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
264 array_map(const struct array *arr, array_map_fn fn, void *udata)
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
265 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
266 int i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
267
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
268 for (i = 0; i < arr->length; ++i)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
269 fn((char *)arr->data + OFFSET(i), udata);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
270 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
271
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
272 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
273 * Compare each object with the user supplied function. If the `fn' function
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
274 * returns 1 then the index of the data position is returned and the parameter
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
275 * data is filled with the array data at the correct index. If the comparison
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
276 * function nevers returns 1, array_find returns -1.
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
277 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
278
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
279 int
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
280 array_find(const struct array *arr, array_cmp_fn fn, void *data, void *u)
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
281 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
282 int st, i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
283
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
284 for (i = st = 0; i < arr->length && st != 1; ++i)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
285 st = fn((char *)arr->data + OFFSET(i), u);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
286
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
287 if (st)
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
288 memcpy(data, (char *)arr->data + OFFSET(--i), arr->unit);
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
289 else
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
290 i = -1;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
291
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
292 return i;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
293 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
294
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
295 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
296 * Erase every bytes and set the length to 0.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
297 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
298
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
299 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
300 array_clear(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
301 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
302 memset(arr->data, 0, arr->size);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
303 arr->length = 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
304 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
305
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
306 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
307 * Same as array_clear except it also free the array object.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
308 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
309
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
310 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
311 array_free(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
312 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
313 array_clear(arr);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
314
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
315 if (arr->data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
316 free(arr->data);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
317 }
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
318
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
319 /*
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
320 * Increate the array storage when it is full. If the buffer is fixed size
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
321 * it returns -1 on full buffer otherwise 0 is returned if allocation
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
322 * succeeded.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
323 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
324
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
325 static int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
326 array_grow(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
327 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
328 if ((arr->size / arr->unit) > (size_t) arr->length)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
329 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
330
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
331 if (arr->type == ARRAY_AUTO) {
91
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
332 if ((arr->data = arr->realloc(arr->data, arr->size +
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
333 OFFSET(arr->bsize))) == NULL)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
334 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
335
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
336 arr->size += OFFSET(arr->bsize);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
337 } else
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
338 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
339
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
340 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
341 }