aboutsummaryrefslogtreecommitdiff
path: root/server/salloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'server/salloc.c')
-rw-r--r--server/salloc.c254
1 files changed, 254 insertions, 0 deletions
diff --git a/server/salloc.c b/server/salloc.c
new file mode 100644
index 0000000..17a23b5
--- /dev/null
+++ b/server/salloc.c
@@ -0,0 +1,254 @@
+/* salloc.c
+
+ Memory allocation for the DHCP server... */
+
+/*
+ * Copyright (c) 2004-2007,2009 by Internet Systems Consortium, Inc. ("ISC")
+ * Copyright (c) 1996-2003 by Internet Software Consortium
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
+ * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Internet Systems Consortium, Inc.
+ * 950 Charter Street
+ * Redwood City, CA 94063
+ * <info@isc.org>
+ * https://www.isc.org/
+ *
+ * This software has been written for Internet Systems Consortium
+ * by Ted Lemon in cooperation with Vixie Enterprises and Nominum, Inc.
+ * To learn more about Internet Systems Consortium, see
+ * ``https://www.isc.org/''. To learn more about Vixie Enterprises,
+ * see ``http://www.vix.com''. To learn more about Nominum, Inc., see
+ * ``http://www.nominum.com''.
+ */
+
+#include "dhcpd.h"
+#include <omapip/omapip_p.h>
+
+#if defined (COMPACT_LEASES)
+struct lease *free_leases;
+
+# if defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
+struct lease *lease_hunks;
+
+void relinquish_lease_hunks ()
+{
+ struct lease *c, *n, **p, *f;
+ int i;
+
+ /* Account for all the leases on the free list. */
+ for (n = lease_hunks; n; n = n -> next) {
+ for (i = 1; i < n -> starts + 1; i++) {
+ p = &free_leases;
+ for (c = free_leases; c; c = c -> next) {
+ if (c == &n [i]) {
+ *p = c -> next;
+ n -> ends++;
+ break;
+ }
+ p = &c -> next;
+ }
+ if (!c) {
+ log_info ("lease %s refcnt %d",
+ piaddr (n [i].ip_addr), n [i].refcnt);
+ dump_rc_history (&n [i]);
+ }
+ }
+ }
+
+ for (c = lease_hunks; c; c = n) {
+ n = c -> next;
+ if (c -> ends != c -> starts) {
+ log_info ("lease hunk %lx leases %ld free %ld",
+ (unsigned long)c, (unsigned long)c -> starts,
+ (unsigned long)c -> ends);
+ }
+ dfree (c, MDL);
+ }
+
+ /* Free all the rogue leases. */
+ for (c = free_leases; c; c = n) {
+ n = c -> next;
+ dfree (c, MDL);
+ }
+}
+#endif
+
+struct lease *new_leases (n, file, line)
+ unsigned n;
+ const char *file;
+ int line;
+{
+ struct lease *rval;
+#if defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
+ rval = dmalloc ((n + 1) * sizeof (struct lease), file, line);
+ memset (rval, 0, sizeof (struct lease));
+ rval -> starts = n;
+ rval -> next = lease_hunks;
+ lease_hunks = rval;
+ rval++;
+#else
+ rval = dmalloc (n * sizeof (struct lease), file, line);
+#endif
+ return rval;
+}
+
+/* If we are allocating leases in aggregations, there's really no way
+ to free one, although perhaps we can maintain a free list. */
+
+isc_result_t dhcp_lease_free (omapi_object_t *lo,
+ const char *file, int line)
+{
+ struct lease *lease;
+ if (lo -> type != dhcp_type_lease)
+ return DHCP_R_INVALIDARG;
+ lease = (struct lease *)lo;
+ memset (lease, 0, sizeof (struct lease));
+ lease -> next = free_leases;
+ free_leases = lease;
+ return ISC_R_SUCCESS;
+}
+
+isc_result_t dhcp_lease_get (omapi_object_t **lp,
+ const char *file, int line)
+{
+ struct lease **lease = (struct lease **)lp;
+ struct lease *lt;
+
+ if (free_leases) {
+ lt = free_leases;
+ free_leases = lt -> next;
+ *lease = lt;
+ return ISC_R_SUCCESS;
+ }
+ return ISC_R_NOMEMORY;
+}
+#endif /* COMPACT_LEASES */
+
+OMAPI_OBJECT_ALLOC (lease, struct lease, dhcp_type_lease)
+OMAPI_OBJECT_ALLOC (class, struct class, dhcp_type_class)
+OMAPI_OBJECT_ALLOC (subclass, struct class, dhcp_type_subclass)
+OMAPI_OBJECT_ALLOC (pool, struct pool, dhcp_type_pool)
+
+#if !defined (NO_HOST_FREES) /* Scary debugging mode - don't enable! */
+OMAPI_OBJECT_ALLOC (host, struct host_decl, dhcp_type_host)
+#else
+isc_result_t host_allocate (struct host_decl **p, const char *file, int line)
+{
+ return omapi_object_allocate ((omapi_object_t **)p,
+ dhcp_type_host, 0, file, line);
+}
+
+isc_result_t host_reference (struct host_decl **pptr, struct host_decl *ptr,
+ const char *file, int line)
+{
+ return omapi_object_reference ((omapi_object_t **)pptr,
+ (omapi_object_t *)ptr, file, line);
+}
+
+isc_result_t host_dereference (struct host_decl **ptr,
+ const char *file, int line)
+{
+ if ((*ptr) -> refcnt == 1) {
+ log_error ("host dereferenced with refcnt == 1.");
+#if defined (DEBUG_RC_HISTORY)
+ dump_rc_history ();
+#endif
+ abort ();
+ }
+ return omapi_object_dereference ((omapi_object_t **)ptr, file, line);
+}
+#endif
+
+struct lease_state *free_lease_states;
+
+struct lease_state *new_lease_state (file, line)
+ const char *file;
+ int line;
+{
+ struct lease_state *rval;
+
+ if (free_lease_states) {
+ rval = free_lease_states;
+ free_lease_states =
+ (struct lease_state *)(free_lease_states -> next);
+ dmalloc_reuse (rval, file, line, 0);
+ } else {
+ rval = dmalloc (sizeof (struct lease_state), file, line);
+ if (!rval)
+ return rval;
+ }
+ memset (rval, 0, sizeof *rval);
+ if (!option_state_allocate (&rval -> options, file, line)) {
+ free_lease_state (rval, file, line);
+ return (struct lease_state *)0;
+ }
+ return rval;
+}
+
+void free_lease_state (ptr, file, line)
+ struct lease_state *ptr;
+ const char *file;
+ int line;
+{
+ if (ptr -> options)
+ option_state_dereference (&ptr -> options, file, line);
+ if (ptr -> packet)
+ packet_dereference (&ptr -> packet, file, line);
+ if (ptr -> shared_network)
+ shared_network_dereference (&ptr -> shared_network,
+ file, line);
+
+ data_string_forget (&ptr -> parameter_request_list, file, line);
+ data_string_forget (&ptr -> filename, file, line);
+ data_string_forget (&ptr -> server_name, file, line);
+ ptr -> next = free_lease_states;
+ free_lease_states = ptr;
+ dmalloc_reuse (free_lease_states, (char *)0, 0, 0);
+}
+
+#if defined (DEBUG_MEMORY_LEAKAGE) || \
+ defined (DEBUG_MEMORY_LEAKAGE_ON_EXIT)
+void relinquish_free_lease_states ()
+{
+ struct lease_state *cs, *ns;
+
+ for (cs = free_lease_states; cs; cs = ns) {
+ ns = cs -> next;
+ dfree (cs, MDL);
+ }
+ free_lease_states = (struct lease_state *)0;
+}
+#endif
+
+struct permit *new_permit (file, line)
+ const char *file;
+ int line;
+{
+ struct permit *permit = ((struct permit *)
+ dmalloc (sizeof (struct permit), file, line));
+ if (!permit)
+ return permit;
+ memset (permit, 0, sizeof *permit);
+ return permit;
+}
+
+void free_permit (permit, file, line)
+ struct permit *permit;
+ const char *file;
+ int line;
+{
+ if (permit -> type == permit_class)
+ class_dereference (&permit -> class, MDL);
+ dfree (permit, file, line);
+}