include/dynarr.h


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

#ifndef MLIB_DYNARR_H
#define MLIB_DYNARR_H

#include <string.h>

#include "alloc.h"

#define dynarr(T) struct { T *buf; size_t len, cap; }

#define DAGROW(da, n)                                                          \
	do {                                                                       \
		if ((n) > (a)->cap) {                                                  \
			(a)->cap = (n);                                                    \
			(a)->buf = bufalloc((a)->buf, (a)->cap, sizeof(*(a)->buf));        \
		}                                                                      \
	} while (false)

#define DAPUSH(da, x)                                                          \
	do {                                                                       \
		if ((da)->len >= (da)->cap) {                                          \
			(da)->cap = (da)->cap ? (da)->cap * 2 : 1;                         \
			(da)->buf = bufalloc((da)->buf, (da)->cap, sizeof(*(da)->buf));    \
		}                                                                      \
		(da)->buf[(da)->len++] = (x);                                          \
	} while (false)

#define DAEXTEND(da, xs, n)                                                    \
	do {                                                                       \
		if ((da)->len + (n) >= (da)->cap) {                                    \
			do                                                                 \
				(da)->cap = (da)->cap ? (da)->cap * 2 : 1;                     \
			while ((da)->len + (n) >= (da)->cap);                              \
			(da)->buf = bufalloc((da)->buf, (da)->cap, sizeof(*(da)->buf));    \
		}                                                                      \
		memcpy((da)->buf + (da)->len, (xs), (n));                              \
		(da)->len += (n);                                                      \
	} while (false)

#define DAPOP(da) ((da)->buf[--(da)->len])

#define DAREMOVE(da, i) DA_REMOVE_RANGE((da), (i), (i) + 1)

#define DA_REMOVE_RANGE(da, i, j)                                              \
	do {                                                                       \
		memmove((da)->buf + (i), (da)->buf + (j),                              \
		        ((da)->len - (j)) * sizeof(*(da)->buf));                       \
		(da)->len -= j - i;                                                    \
	} while (false)

#define da_foreach(da, p)                                                      \
	for (auto p = (da).buf; (size_t)(p - (da).buf) < (da).len; p++)

#endif /* !MLIB_DYNARR_H */