ISC DHCP 4.4.3-P1
A reference DHCPv4 and DHCPv6 implementation
 
Loading...
Searching...
No Matches
salloc.c
Go to the documentation of this file.
1/* salloc.c
2
3 Memory allocation for the DHCP server... */
4
5/*
6 * Copyright (C) 2004-2022 Internet Systems Consortium, Inc. ("ISC")
7 * Copyright (c) 1996-2003 by Internet Software Consortium
8 *
9 * This Source Code Form is subject to the terms of the Mozilla Public
10 * License, v. 2.0. If a copy of the MPL was not distributed with this
11 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
12 *
13 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
14 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
15 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
16 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
17 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
18 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
19 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
20 *
21 * Internet Systems Consortium, Inc.
22 * PO Box 360
23 * Newmarket, NH 03857 USA
24 * <info@isc.org>
25 * https://www.isc.org/
26 *
27 */
28
29#include "dhcpd.h"
30#include <omapip/omapip_p.h>
31
32#if defined (COMPACT_LEASES)
33struct lease *free_leases;
34
35#if defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
36struct lease *lease_hunks;
37
39{
40 struct lease *c, *n, **p;
41 int i;
42
43 /* Account for all the leases on the free list. */
44 for (n = lease_hunks; n; n = n->next) {
45 for (i = 1; i < n->starts + 1; i++) {
46 p = &free_leases;
47 for (c = free_leases; c; c = c->next) {
48 if (c == &n[i]) {
49 *p = c->next;
50 n->ends++;
51 break;
52 }
53 p = &c->next;
54 }
55 if (!c) {
56 log_info("lease %s refcnt %d",
57 piaddr (n[i].ip_addr), n[i].refcnt);
58#if defined (DEBUG_RC_HISTORY)
59 dump_rc_history(&n[i]);
60#endif
61 }
62 }
63 }
64
65 for (c = lease_hunks; c; c = n) {
66 n = c->next;
67 if (c->ends != c->starts) {
68 log_info("lease hunk %lx leases %ld free %ld",
69 (unsigned long)c, (unsigned long)(c->starts),
70 (unsigned long)(c->ends));
71 }
72 dfree(c, MDL);
73 }
74
75 /* Free all the rogue leases. */
76 for (c = free_leases; c; c = n) {
77 n = c->next;
78 dfree(c, MDL);
79 }
80}
81
82#endif
83
84struct lease *new_leases (n, file, line)
85 unsigned n;
86 const char *file;
87 int line;
88{
89 struct lease *rval;
90#if defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
91 rval = dmalloc ((n + 1) * sizeof (struct lease), file, line);
92 if (rval != NULL) {
93 memset (rval, 0, sizeof (struct lease));
94 rval -> starts = n;
95 rval -> next = lease_hunks;
96 lease_hunks = rval;
97 rval++;
98 }
99#else
100 rval = dmalloc (n * sizeof (struct lease), file, line);
101#endif
102 return rval;
103}
104
105/* If we are allocating leases in aggregations, there's really no way
106 to free one, although perhaps we can maintain a free list. */
107
108isc_result_t dhcp_lease_free (omapi_object_t *lo,
109 const char *file, int line)
110{
111 struct lease *lease;
112 if (lo -> type != dhcp_type_lease)
113 return DHCP_R_INVALIDARG;
114 lease = (struct lease *)lo;
115 memset (lease, 0, sizeof (struct lease));
116 lease -> next = free_leases;
117 free_leases = lease;
118 return ISC_R_SUCCESS;
119}
120
121isc_result_t dhcp_lease_get (omapi_object_t **lp,
122 const char *file, int line)
123{
124 struct lease **lease = (struct lease **)lp;
125 struct lease *lt;
126
127 if (free_leases) {
128 lt = free_leases;
129 free_leases = lt -> next;
130 *lease = lt;
131 return ISC_R_SUCCESS;
132 }
133 return ISC_R_NOMEMORY;
134}
135#endif /* COMPACT_LEASES */
136
138OMAPI_OBJECT_ALLOC (class, struct class, dhcp_type_class)
139OMAPI_OBJECT_ALLOC (subclass, struct class, dhcp_type_subclass)
141
142#if !defined (NO_HOST_FREES) /* Scary debugging mode - don't enable! */
144#else
145isc_result_t host_allocate (struct host_decl **p, const char *file, int line)
146{
149}
150
151isc_result_t host_reference (struct host_decl **pptr, struct host_decl *ptr,
152 const char *file, int line)
153{
154 return omapi_object_reference ((omapi_object_t **)pptr,
155 (omapi_object_t *)ptr, file, line);
156}
157
158isc_result_t host_dereference (struct host_decl **ptr,
159 const char *file, int line)
160{
161 if ((*ptr) -> refcnt == 1) {
162 log_error ("host dereferenced with refcnt == 1.");
163#if defined (DEBUG_RC_HISTORY)
164 dump_rc_history ();
165#endif
166 abort ();
167 }
169}
170#endif
171
173
175 const char *file;
176 int line;
177{
178 struct lease_state *rval;
179
180 if (free_lease_states) {
181 rval = free_lease_states;
183 (struct lease_state *)(free_lease_states -> next);
184 dmalloc_reuse (rval, file, line, 0);
185 } else {
186 rval = dmalloc (sizeof (struct lease_state), file, line);
187 if (!rval)
188 return rval;
189 }
190 memset (rval, 0, sizeof *rval);
191 if (!option_state_allocate (&rval -> options, file, line)) {
192 free_lease_state (rval, file, line);
193 return (struct lease_state *)0;
194 }
195 return rval;
196}
197
199 struct lease_state *ptr;
200 const char *file;
201 int line;
202{
203 if (ptr -> options)
205 if (ptr -> packet)
207 if (ptr -> shared_network)
208 shared_network_dereference (&ptr -> shared_network,
209 file, line);
210
212 data_string_forget (&ptr -> filename, file, line);
214 ptr -> next = free_lease_states;
215 free_lease_states = ptr;
216 dmalloc_reuse (free_lease_states, (char *)0, 0, 0);
217}
218
219#if defined (DEBUG_MEMORY_LEAKAGE) || \
220 defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
221void relinquish_free_lease_states ()
222{
223 struct lease_state *cs, *ns;
224
225 for (cs = free_lease_states; cs; cs = ns) {
226 ns = cs -> next;
227 dfree (cs, MDL);
228 }
229 free_lease_states = (struct lease_state *)0;
230}
231#endif
232
234 const char *file;
235 int line;
236{
237 struct permit *permit = ((struct permit *)
238 dmalloc (sizeof (struct permit), file, line));
239 if (!permit)
240 return permit;
241 memset (permit, 0, sizeof *permit);
242 return permit;
243}
244
246 struct permit *permit;
247 const char *file;
248 int line;
249{
250 if (permit -> type == permit_class)
251 class_dereference (&permit -> class, MDL);
252 dfree (permit, file, line);
253}
void data_string_forget(struct data_string *data, const char *file, int line)
Definition alloc.c:1339
int option_state_allocate(struct option_state **ptr, const char *file, int line)
Definition alloc.c:846
int option_state_dereference(struct option_state **ptr, const char *file, int line)
Definition alloc.c:911
int packet_dereference(struct packet **ptr, const char *file, int line)
Definition alloc.c:1081
isc_result_t dhcp_lease_free(omapi_object_t *, const char *, int)
struct lease * new_leases(unsigned, const char *, int)
omapi_object_type_t * dhcp_type_lease
Definition omapi.c:46
isc_result_t dhcp_lease_get(omapi_object_t **, const char *, int)
omapi_object_type_t * dhcp_type_pool
Definition omapi.c:47
omapi_object_type_t * dhcp_type_subclass
Definition omapi.c:49
const char int line
Definition dhcpd.h:3802
omapi_object_type_t * dhcp_type_class
Definition omapi.c:48
const char * file
Definition dhcpd.h:3802
omapi_object_type_t * dhcp_type_host
Definition omapi.c:50
void relinquish_lease_hunks(void)
struct iaddr ip_addr(struct iaddr subnet, struct iaddr mask, u_int32_t host_address)
Definition inet.c:63
const char * piaddr(const struct iaddr addr)
Definition inet.c:579
#define ISC_R_SUCCESS
#define MDL
Definition omapip.h:567
#define OMAPI_OBJECT_ALLOC(name, stype, type)
Definition omapip.h:160
isc_result_t omapi_object_dereference(omapi_object_t **, const char *, int)
Definition alloc.c:593
#define dmalloc_reuse(x, y, l, z)
Definition omapip.h:565
struct __omapi_object omapi_object_t
Definition omapip.h:39
isc_result_t omapi_object_reference(omapi_object_t **, omapi_object_t *, const char *, int)
Definition alloc.c:571
void * dmalloc(size_t, const char *, int)
Definition alloc.c:57
void dfree(void *, const char *, int)
Definition alloc.c:145
isc_result_t omapi_object_allocate(omapi_object_t **, omapi_object_type_t *, size_t, const char *, int)
Definition alloc.c:515
int log_error(const char *,...) __attribute__((__format__(__printf__
int int log_info(const char *,...) __attribute__((__format__(__printf__
#define DHCP_R_INVALIDARG
Definition result.h:49
void free_permit(struct permit *permit, const char *file, int line)
Definition salloc.c:245
struct permit * new_permit(char *file, int line) const
Definition salloc.c:233
struct lease_state * free_lease_states
Definition salloc.c:172
void free_lease_state(struct lease_state *ptr, const char *file, int line)
Definition salloc.c:198
struct lease_state * new_lease_state(char *file, int line) const
Definition salloc.c:174
struct lease_state * next
Definition dhcpd.h:657
struct option_state * options
Definition dhcpd.h:665
struct data_string filename server_name
Definition dhcpd.h:669
struct data_string parameter_request_list
Definition dhcpd.h:666
Definition dhcpd.h:560
TIME ends
Definition dhcpd.h:570
TIME starts
Definition dhcpd.h:570
struct lease * next
Definition dhcpd.h:562
struct host_decl * host
Definition dhcpd.h:576
enum permit::@011051276256032144365216260061073130004016310224 type
@ permit_class
Definition dhcpd.h:1010
Definition dhcpd.h:1029