]>
Commit | Line | Data |
---|---|---|
3b4cd783 DL |
1 | /* |
2 | * Copyright (c) 2015-16 David Lamparter, for NetDEF, Inc. | |
3 | * | |
db2d8df6 DL |
4 | * Permission to use, copy, modify, and distribute this software for any |
5 | * purpose with or without fee is hereby granted, provided that the above | |
6 | * copyright notice and this permission notice appear in all copies. | |
3b4cd783 | 7 | * |
db2d8df6 DL |
8 | * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
9 | * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
10 | * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
11 | * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
12 | * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
13 | * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
14 | * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
3b4cd783 DL |
15 | */ |
16 | ||
17 | #ifndef _QUAGGA_MEMORY_H | |
18 | #define _QUAGGA_MEMORY_H | |
19 | ||
20 | #include <stdlib.h> | |
9eed278b | 21 | #include <stdio.h> |
a31446a8 | 22 | #include <frratomic.h> |
de1a880c | 23 | #include "compiler.h" |
3b4cd783 DL |
24 | |
25 | #define array_size(ar) (sizeof(ar) / sizeof(ar[0])) | |
26 | ||
602a6584 DL |
27 | #if defined(HAVE_MALLOC_SIZE) && !defined(HAVE_MALLOC_USABLE_SIZE) |
28 | #define malloc_usable_size(x) malloc_size(x) | |
29 | #define HAVE_MALLOC_USABLE_SIZE | |
30 | #endif | |
31 | ||
3b4cd783 | 32 | #define SIZE_VAR ~0UL |
fa7fe831 DL |
33 | struct memtype { |
34 | struct memtype *next, **ref; | |
35 | const char *name; | |
36 | _Atomic size_t n_alloc; | |
13f1ba41 | 37 | _Atomic size_t n_max; |
fa7fe831 | 38 | _Atomic size_t size; |
602a6584 DL |
39 | #ifdef HAVE_MALLOC_USABLE_SIZE |
40 | _Atomic size_t total; | |
13f1ba41 | 41 | _Atomic size_t max_size; |
602a6584 | 42 | #endif |
3b4cd783 DL |
43 | }; |
44 | ||
fa7fe831 DL |
45 | struct memgroup { |
46 | struct memgroup *next, **ref; | |
47 | struct memtype *types, **insert; | |
48 | const char *name; | |
3b4cd783 DL |
49 | }; |
50 | ||
3b4cd783 DL |
51 | /* macro usage: |
52 | * | |
53 | * mydaemon.h | |
54 | * DECLARE_MGROUP(MYDAEMON) | |
55 | * DECLARE_MTYPE(MYDAEMON_COMMON) | |
56 | * | |
57 | * mydaemon.c | |
58 | * DEFINE_MGROUP(MYDAEMON, "my daemon memory") | |
59 | * DEFINE_MTYPE(MYDAEMON, MYDAEMON_COMMON, | |
60 | * "this mtype is used in multiple files in mydaemon") | |
fa7fe831 | 61 | * foo = qmalloc(MTYPE_MYDAEMON_COMMON, sizeof(*foo)) |
3b4cd783 DL |
62 | * |
63 | * mydaemon_io.c | |
fa7fe831 | 64 | * bar = qmalloc(MTYPE_MYDAEMON_COMMON, sizeof(*bar)) |
3b4cd783 DL |
65 | * |
66 | * DEFINE_MTYPE_STATIC(MYDAEMON, MYDAEMON_IO, | |
67 | * "this mtype is used only in this file") | |
fa7fe831 | 68 | * baz = qmalloc(MTYPE_MYDAEMON_IO, sizeof(*baz)) |
3b4cd783 DL |
69 | * |
70 | * Note: Naming conventions (MGROUP_ and MTYPE_ prefixes are enforced | |
71 | * by not having these as part of the macro arguments) | |
72 | * Note: MTYPE_* are symbols to the compiler (of type struct memtype *), | |
73 | * but MGROUP_* aren't. | |
74 | */ | |
75 | ||
d62a17ae | 76 | #define DECLARE_MGROUP(name) extern struct memgroup _mg_##name; |
77 | #define DEFINE_MGROUP(mname, desc) \ | |
78 | struct memgroup _mg_##mname \ | |
79 | __attribute__((section(".data.mgroups"))) = { \ | |
80 | .name = desc, \ | |
81 | .types = NULL, \ | |
82 | .next = NULL, \ | |
83 | .insert = NULL, \ | |
84 | .ref = NULL, \ | |
85 | }; \ | |
86 | static void _mginit_##mname(void) __attribute__((_CONSTRUCTOR(1000))); \ | |
87 | static void _mginit_##mname(void) \ | |
88 | { \ | |
89 | extern struct memgroup **mg_insert; \ | |
90 | _mg_##mname.ref = mg_insert; \ | |
91 | *mg_insert = &_mg_##mname; \ | |
92 | mg_insert = &_mg_##mname.next; \ | |
93 | } \ | |
94 | static void _mgfini_##mname(void) __attribute__((_DESTRUCTOR(1000))); \ | |
95 | static void _mgfini_##mname(void) \ | |
96 | { \ | |
97 | if (_mg_##mname.next) \ | |
98 | _mg_##mname.next->ref = _mg_##mname.ref; \ | |
99 | *_mg_##mname.ref = _mg_##mname.next; \ | |
100 | } | |
101 | ||
102 | ||
103 | #define DECLARE_MTYPE(name) \ | |
104 | extern struct memtype _mt_##name; \ | |
105 | static struct memtype *const MTYPE_##name = &_mt_##name; | |
106 | ||
107 | #define DEFINE_MTYPE_ATTR(group, mname, attr, desc) \ | |
108 | attr struct memtype _mt_##mname \ | |
109 | __attribute__((section(".data.mtypes"))) = { \ | |
110 | .name = desc, \ | |
111 | .next = NULL, \ | |
112 | .n_alloc = 0, \ | |
113 | .size = 0, \ | |
114 | .ref = NULL, \ | |
115 | }; \ | |
116 | static void _mtinit_##mname(void) __attribute__((_CONSTRUCTOR(1001))); \ | |
117 | static void _mtinit_##mname(void) \ | |
118 | { \ | |
119 | if (_mg_##group.insert == NULL) \ | |
120 | _mg_##group.insert = &_mg_##group.types; \ | |
121 | _mt_##mname.ref = _mg_##group.insert; \ | |
122 | *_mg_##group.insert = &_mt_##mname; \ | |
123 | _mg_##group.insert = &_mt_##mname.next; \ | |
124 | } \ | |
125 | static void _mtfini_##mname(void) __attribute__((_DESTRUCTOR(1001))); \ | |
126 | static void _mtfini_##mname(void) \ | |
127 | { \ | |
128 | if (_mt_##mname.next) \ | |
129 | _mt_##mname.next->ref = _mt_##mname.ref; \ | |
130 | *_mt_##mname.ref = _mt_##mname.next; \ | |
131 | } | |
132 | ||
133 | #define DEFINE_MTYPE(group, name, desc) DEFINE_MTYPE_ATTR(group, name, , desc) | |
134 | #define DEFINE_MTYPE_STATIC(group, name, desc) \ | |
135 | DEFINE_MTYPE_ATTR(group, name, static, desc) \ | |
136 | static struct memtype *const MTYPE_##name = &_mt_##name; | |
3b4cd783 | 137 | |
4a1ab8e4 DL |
138 | DECLARE_MGROUP(LIB) |
139 | DECLARE_MTYPE(TMP) | |
9a14899b | 140 | DECLARE_MTYPE(PREFIX_FLOWSPEC) |
4a1ab8e4 | 141 | |
3b4cd783 | 142 | |
fa7fe831 | 143 | extern void *qmalloc(struct memtype *mt, size_t size) |
d62a17ae | 144 | __attribute__((malloc, _ALLOC_SIZE(2), nonnull(1) _RET_NONNULL)); |
fa7fe831 | 145 | extern void *qcalloc(struct memtype *mt, size_t size) |
d62a17ae | 146 | __attribute__((malloc, _ALLOC_SIZE(2), nonnull(1) _RET_NONNULL)); |
fa7fe831 | 147 | extern void *qrealloc(struct memtype *mt, void *ptr, size_t size) |
d62a17ae | 148 | __attribute__((_ALLOC_SIZE(3), nonnull(1) _RET_NONNULL)); |
149 | extern void *qstrdup(struct memtype *mt, const char *str) | |
150 | __attribute__((malloc, nonnull(1) _RET_NONNULL)); | |
151 | extern void qfree(struct memtype *mt, void *ptr) __attribute__((nonnull(1))); | |
3b4cd783 | 152 | |
3b4cd783 DL |
153 | #define XMALLOC(mtype, size) qmalloc(mtype, size) |
154 | #define XCALLOC(mtype, size) qcalloc(mtype, size) | |
155 | #define XREALLOC(mtype, ptr, size) qrealloc(mtype, ptr, size) | |
156 | #define XSTRDUP(mtype, str) qstrdup(mtype, str) | |
d62a17ae | 157 | #define XFREE(mtype, ptr) \ |
158 | do { \ | |
159 | qfree(mtype, ptr); \ | |
160 | ptr = NULL; \ | |
161 | } while (0) | |
3b4cd783 DL |
162 | |
163 | static inline size_t mtype_stats_alloc(struct memtype *mt) | |
164 | { | |
165 | return mt->n_alloc; | |
166 | } | |
3b4cd783 DL |
167 | |
168 | /* NB: calls are ordered by memgroup; and there is a call with mt == NULL for | |
169 | * each memgroup (so that a header can be printed, and empty memgroups show) | |
170 | * | |
171 | * return value: 0: continue, !0: abort walk. qmem_walk will return the | |
172 | * last value from qmem_walk_fn. */ | |
fa7fe831 DL |
173 | typedef int qmem_walk_fn(void *arg, struct memgroup *mg, struct memtype *mt); |
174 | extern int qmem_walk(qmem_walk_fn *func, void *arg); | |
9eed278b DL |
175 | extern int log_memstats(FILE *fp, const char *); |
176 | #define log_memstats_stderr(prefix) log_memstats(stderr, prefix) | |
3b4cd783 | 177 | |
fa7fe831 | 178 | extern void memory_oom(size_t size, const char *name); |
3b4cd783 DL |
179 | |
180 | #endif /* _QUAGGA_MEMORY_H */ |