annotate array.c @ 91:b3ba5f5df3b9

New style for array.c and array.h, no pointer to these object thus no need to check if array_new succeeded. array_set() added to use own allocation functions and other settings at any time
author David Demelier <markand@malikania.fr>
date Tue, 03 Jan 2012 16:05:06 +0100
parents cff6869fbc94
children 4d723e81b685
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 *
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
4 * Copyright (c) 2011, David Demelier <markand@malikania.fr>
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
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
30 array_new(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
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
38 /* Set default if needed */
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
39 arr->bsize = (arr->bsize == 0) ? ARRAY_DEFAULT_BSIZE : arr->bsize;
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':
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
70 arr->malloc = va_arg(ap, 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
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':
b3ba5f5df3b9 New style for array.c and array.h, no pointer to these object thus
David Demelier <markand@malikania.fr>
parents: 67
diff changeset
76 arr->type = va_arg(ap, 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
77 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
78 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
79 }
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
80 }
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 * 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
84 * 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
85 * using linked list instead.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
86 */
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 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
89 array_push(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
90 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
91 if (array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
92 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
93
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
94 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
95 memcpy((char *)arr->data, data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
96
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
97 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
98 }
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 * Insert the data at the specified index. The function returns -1 on
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
102 * 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
103 */
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 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
106 array_insert(struct array *arr, const void *data, int index)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
107 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
108 if (index > arr->length - 1 || index < 0 || array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
109 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
110
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
111 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
112 (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
113 memcpy((char *)arr->data + OFFSET(index), data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
114
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
115 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
116 }
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 * Append the data to the end of array.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
120 */
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 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
123 array_append(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
124 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
125 if (array_grow(arr) < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
126 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
127
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
128 memcpy((char *)arr->data + OFFSET(arr->length++), data, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
129
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
130 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
131 }
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 * Remove the array's head.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
135 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
138 array_pop(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
139 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
140 if (arr->length > 0) {
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
141 memmove((char *)arr->data, (char *)arr->data + OFFSET(1),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
142 OFFSET(--arr->length));
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
143 memset((char *)arr->data + OFFSET(arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
144 }
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 * Remove the array's tail.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
149 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
152 array_unqueue(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
153 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
154 if (arr->length > 0)
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
155 memset((char *)arr->data + OFFSET(--arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
156 }
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 * Remove the data at the specified index. Bounds are checked.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
160 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
163 array_remove(struct array *arr, int index)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
164 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
165 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
166 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
167 (char *)arr->data + OFFSET(index + 1),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
168 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
169 memset((char *)arr->data + OFFSET(--arr->length), 0, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
170 }
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 * Remove the object referenced by the `data' argument. Useful when you
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
175 * don't know the index.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
176 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
179 array_unref(struct array *arr, const void *data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
180 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
181 void *elm;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
182 int i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
183
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
184 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
185 elm = (char *)arr->data + OFFSET(i);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
186
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
187 if (memcmp(elm, data, arr->unit) == 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
188 array_remove(arr, i);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
189 }
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 * 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
194 * 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
195 * otherwise 0 is returned.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
196 */
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 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
199 array_iswap(struct array *arr, int i1, int i2)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
200 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
201 void *tmp;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
202
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
203 /* Out of bounds */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
204 if (i1 >= arr->length || i1 < 0 || i2 >= arr->length || i2 < 0)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
205 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
206
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 * 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
209 * function.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
210 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
211
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
212 if ((tmp = arr->malloc(arr->unit)) == NULL)
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
213 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
214
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
215 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
216 memcpy((char *)arr->data + OFFSET(i1), (char *)arr->data + OFFSET(i2),
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
217 arr->unit);
64
9cc5d6d0563e Add more cast for old gcc and other cc
David Demelier <markand@malikania.fr>
parents: 62
diff changeset
218 memcpy((char *)arr->data + OFFSET(i2), (char *)tmp, arr->unit);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
219
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 * Clear bytes for safety you probably don't want a password or
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
222 * secure data to be left somewhere in the memory.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
223 */
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 memset(tmp, 0, arr->unit);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
226 free(tmp);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
227
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
228 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
229 }
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 * Swap the two elements referenced by data `o1' and `o2'. This function
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
233 * 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
234 * to find the indexes.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
235 */
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 int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
238 array_pswap(struct array *arr, const void *o1, const void *o2)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
239 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
240 int found, i1, i2;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
241
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
242 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
243 found = memcmp((char *)arr->data + OFFSET(i1), o1, arr->unit) == 0;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
244
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
245 if (!found)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
246 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
247
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
248 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
249 found = memcmp((char *)arr->data + OFFSET(i2), o2, arr->unit) == 0;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
250
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
251 if (!found)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
252 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
253
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
254 return array_iswap(arr, --i1, --i2);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
255 }
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 * Apply the function `fn' on each object and give the optional `udata'
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
259 * argument to the function too.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
260 */
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 void
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
263 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
264 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
265 int i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
266
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
267 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
268 fn((char *)arr->data + OFFSET(i), udata);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
269 }
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 * 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
273 * 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
274 * 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
275 * function nevers returns 1, array_find returns -1.
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
276 */
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
277
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
278 int
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
279 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
280 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
281 int st, i;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
282
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
283 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
284 st = fn((char *)arr->data + OFFSET(i), u);
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
285
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
286 if (st)
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
287 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
288 else
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
289 i = -1;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
290
67
cff6869fbc94 Modified [p]array_find to return the index for a better usage
David Demelier <markand@malikania.fr>
parents: 64
diff changeset
291 return i;
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
292 }
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 * Erase every bytes and set the length to 0.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
296 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
299 array_clear(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
300 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
301 memset(arr->data, 0, arr->size);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
302 arr->length = 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
303 }
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 * Same as array_clear except it also free the array object.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
307 */
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 void
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
310 array_free(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
311 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
312 array_clear(arr);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
313
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
314 if (arr->data)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
315 free(arr->data);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
316 }
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 * 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
320 * it returns -1 on full buffer otherwise 0 is returned if allocation
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
321 * succeeded.
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
322 */
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 static int
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
325 array_grow(struct array *arr)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
326 {
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
327 if ((arr->size / arr->unit) > (size_t) arr->length)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
328 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
329
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
330 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
331 if ((arr->data = arr->realloc(arr->data, arr->size +
62
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
332 OFFSET(arr->bsize))) == NULL)
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
333 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
334
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
335 arr->size += OFFSET(arr->bsize);
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
336 } else
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
337 return -1;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
338
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
339 return 0;
d10ab6bc555d HG self failure
David Demelier <markand@malikania.fr>
parents:
diff changeset
340 }