1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
#include <config.h>
/* $Id: darray.c,v 1.13 1994/11/08 13:30:50 a904209 Exp a904209 $
*/
char *darray_id = "$Id: darray.c,v 1.13 1994/11/08 13:30:50 a904209 Exp a904209 $";
#include <useconfig.h>
#include "proto.h"
#include "darray.h"
void
darray_free(a)
darray_t *a;
{
if (a->data)
{
free(a->data);
a->data = NULL;
}
a->items = a->alloc = 0;
}
void *
Darray_find(a, n)
darray_t *a;
unsigned n;
{
if (n >= a->alloc || n >= a->items)
{
unsigned osize = a->items * a->esize;
unsigned nsize;
if (!a->esize)
abort();
if (n >= a->alloc)
{
unsigned add = (a->get) ? a->get : 1;
char *ndata = (char *) malloc(nsize = (n + add) * a->esize);
if (ndata)
{
if (osize)
memcpy(ndata, a->data, osize);
if (a->data)
free(a->data);
a->data = ndata;
a->alloc = n + add;
}
else
return NULL;
}
else
nsize = (n + 1) * a->esize;
if (n >= a->items)
{
memset(a->data + osize, 0, nsize - osize);
a->items = n + 1;
}
}
return (void *) (a->data + n * a->esize);
}
int
darray_delete(a, n)
darray_t *a;
unsigned n;
{
char *p = (char *) darray_find(a, n);
if (p)
{
if (a->items)
{
a->items--;
while (n++ < a->items)
{
memcpy(p, p + a->esize, a->esize);
p += a->esize;
}
memset(p, 0, a->esize);
return 1;
}
else
abort();
}
else
return 0;
}
|
