mem: support using memfd segments for in-memory mode
[dpdk.git] / lib / librte_eal / common / malloc_heap.c
index 18c7b69..ac7bbb3 100644 (file)
@@ -99,13 +99,16 @@ malloc_add_seg(const struct rte_memseg_list *msl,
 
        /* msl is const, so find it */
        msl_idx = msl - mcfg->memsegs;
-       found_msl = &mcfg->memsegs[msl_idx];
 
        if (msl_idx < 0 || msl_idx >= RTE_MAX_MEMSEG_LISTS)
                return -1;
 
+       found_msl = &mcfg->memsegs[msl_idx];
+
        malloc_heap_add_memory(heap, found_msl, ms->addr, len);
 
+       heap->total_size += len;
+
        RTE_LOG(DEBUG, EAL, "Added %zuM to heap on socket %i\n", len >> 20,
                        msl->socket_id);
        return 0;
@@ -145,6 +148,52 @@ find_suitable_element(struct malloc_heap *heap, size_t size,
        return NULL;
 }
 
+/*
+ * Iterates through the freelist for a heap to find a free element with the
+ * biggest size and requested alignment. Will also set size to whatever element
+ * size that was found.
+ * Returns null on failure, or pointer to element on success.
+ */
+static struct malloc_elem *
+find_biggest_element(struct malloc_heap *heap, size_t *size,
+               unsigned int flags, size_t align, bool contig)
+{
+       struct malloc_elem *elem, *max_elem = NULL;
+       size_t idx, max_size = 0;
+
+       for (idx = 0; idx < RTE_HEAP_NUM_FREELISTS; idx++) {
+               for (elem = LIST_FIRST(&heap->free_head[idx]);
+                               !!elem; elem = LIST_NEXT(elem, free_list)) {
+                       size_t cur_size;
+                       if (!check_hugepage_sz(flags, elem->msl->page_sz))
+                               continue;
+                       if (contig) {
+                               cur_size =
+                                       malloc_elem_find_max_iova_contig(elem,
+                                                       align);
+                       } else {
+                               void *data_start = RTE_PTR_ADD(elem,
+                                               MALLOC_ELEM_HEADER_LEN);
+                               void *data_end = RTE_PTR_ADD(elem, elem->size -
+                                               MALLOC_ELEM_TRAILER_LEN);
+                               void *aligned = RTE_PTR_ALIGN_CEIL(data_start,
+                                               align);
+                               /* check if aligned data start is beyond end */
+                               if (aligned >= data_end)
+                                       continue;
+                               cur_size = RTE_PTR_DIFF(data_end, aligned);
+                       }
+                       if (cur_size > max_size) {
+                               max_size = cur_size;
+                               max_elem = elem;
+                       }
+               }
+       }
+
+       *size = max_size;
+       return max_elem;
+}
+
 /*
  * Main function to allocate a block of memory from the heap.
  * It locks the free list, scans it, and adds a new memseg if the
@@ -171,6 +220,26 @@ heap_alloc(struct malloc_heap *heap, const char *type __rte_unused, size_t size,
        return elem == NULL ? NULL : (void *)(&elem[1]);
 }
 
+static void *
+heap_alloc_biggest(struct malloc_heap *heap, const char *type __rte_unused,
+               unsigned int flags, size_t align, bool contig)
+{
+       struct malloc_elem *elem;
+       size_t size;
+
+       align = RTE_CACHE_LINE_ROUNDUP(align);
+
+       elem = find_biggest_element(heap, &size, flags, align, contig);
+       if (elem != NULL) {
+               elem = malloc_elem_alloc(elem, size, align, 0, contig);
+
+               /* increase heap's count of allocated elements */
+               heap->alloc_count++;
+       }
+
+       return elem == NULL ? NULL : (void *)(&elem[1]);
+}
+
 /* this function is exposed in malloc_mp.h */
 void
 rollback_expand_heap(struct rte_memseg **ms, int n_segs,
@@ -196,6 +265,15 @@ alloc_pages_on_heap(struct malloc_heap *heap, uint64_t pg_sz, size_t elt_size,
        int allocd_pages;
        void *ret, *map_addr;
 
+       alloc_sz = (size_t)pg_sz * n_segs;
+
+       /* first, check if we're allowed to allocate this memory */
+       if (eal_memalloc_mem_alloc_validate(socket,
+                       heap->total_size + alloc_sz) < 0) {
+               RTE_LOG(DEBUG, EAL, "User has disallowed allocation\n");
+               return NULL;
+       }
+
        allocd_pages = eal_memalloc_alloc_seg_bulk(ms, n_segs, pg_sz,
                        socket, true);
 
@@ -205,7 +283,6 @@ alloc_pages_on_heap(struct malloc_heap *heap, uint64_t pg_sz, size_t elt_size,
 
        map_addr = ms[0]->addr;
        msl = rte_mem_virt2memseg_list(map_addr);
-       alloc_sz = (size_t)msl->page_sz * allocd_pages;
 
        /* check if we wanted contiguous memory but didn't get it */
        if (contig && !eal_memalloc_is_contig(msl, map_addr, alloc_sz)) {
@@ -249,11 +326,9 @@ try_expand_heap_primary(struct malloc_heap *heap, uint64_t pg_sz,
 
        /* we can't know in advance how many pages we'll need, so we malloc */
        ms = malloc(sizeof(*ms) * n_segs);
-
-       memset(ms, 0, sizeof(*ms) * n_segs);
-
        if (ms == NULL)
                return -1;
+       memset(ms, 0, sizeof(*ms) * n_segs);
 
        elem = alloc_pages_on_heap(heap, pg_sz, elt_size, socket, flags, align,
                        bound, contig, ms, n_segs);
@@ -564,6 +639,66 @@ malloc_heap_alloc(const char *type, size_t size, int socket_arg,
        return NULL;
 }
 
+static void *
+heap_alloc_biggest_on_socket(const char *type, int socket, unsigned int flags,
+               size_t align, bool contig)
+{
+       struct rte_mem_config *mcfg = rte_eal_get_configuration()->mem_config;
+       struct malloc_heap *heap = &mcfg->malloc_heaps[socket];
+       void *ret;
+
+       rte_spinlock_lock(&(heap->lock));
+
+       align = align == 0 ? 1 : align;
+
+       ret = heap_alloc_biggest(heap, type, flags, align, contig);
+
+       rte_spinlock_unlock(&(heap->lock));
+
+       return ret;
+}
+
+void *
+malloc_heap_alloc_biggest(const char *type, int socket_arg, unsigned int flags,
+               size_t align, bool contig)
+{
+       int socket, i, cur_socket;
+       void *ret;
+
+       /* return NULL if align is not power-of-2 */
+       if ((align && !rte_is_power_of_2(align)))
+               return NULL;
+
+       if (!rte_eal_has_hugepages())
+               socket_arg = SOCKET_ID_ANY;
+
+       if (socket_arg == SOCKET_ID_ANY)
+               socket = malloc_get_numa_socket();
+       else
+               socket = socket_arg;
+
+       /* Check socket parameter */
+       if (socket >= RTE_MAX_NUMA_NODES)
+               return NULL;
+
+       ret = heap_alloc_biggest_on_socket(type, socket, flags, align,
+                       contig);
+       if (ret != NULL || socket_arg != SOCKET_ID_ANY)
+               return ret;
+
+       /* try other heaps */
+       for (i = 0; i < (int) rte_socket_count(); i++) {
+               cur_socket = rte_socket_id_by_idx(i);
+               if (cur_socket == socket)
+                       continue;
+               ret = heap_alloc_biggest_on_socket(type, cur_socket, flags,
+                               align, contig);
+               if (ret != NULL)
+                       return ret;
+       }
+       return NULL;
+}
+
 /* this function is exposed in malloc_mp.h */
 int
 malloc_heap_free_pages(void *aligned_start, size_t aligned_len)
@@ -598,6 +733,7 @@ malloc_heap_free(struct malloc_elem *elem)
        void *start, *aligned_start, *end, *aligned_end;
        size_t len, aligned_len, page_sz;
        struct rte_memseg_list *msl;
+       unsigned int i, n_segs, before_space, after_space;
        int ret;
 
        if (!malloc_elem_cookies_ok(elem) || elem->state != ELEM_BUSY)
@@ -639,6 +775,64 @@ malloc_heap_free(struct malloc_elem *elem)
        if (aligned_len < page_sz)
                goto free_unlock;
 
+       /* we can free something. however, some of these pages may be marked as
+        * unfreeable, so also check that as well
+        */
+       n_segs = aligned_len / page_sz;
+       for (i = 0; i < n_segs; i++) {
+               const struct rte_memseg *tmp =
+                               rte_mem_virt2memseg(aligned_start, msl);
+
+               if (tmp->flags & RTE_MEMSEG_FLAG_DO_NOT_FREE) {
+                       /* this is an unfreeable segment, so move start */
+                       aligned_start = RTE_PTR_ADD(tmp->addr, tmp->len);
+               }
+       }
+
+       /* recalculate length and number of segments */
+       aligned_len = RTE_PTR_DIFF(aligned_end, aligned_start);
+       n_segs = aligned_len / page_sz;
+
+       /* check if we can still free some pages */
+       if (n_segs == 0)
+               goto free_unlock;
+
+       /* We're not done yet. We also have to check if by freeing space we will
+        * be leaving free elements that are too small to store new elements.
+        * Check if we have enough space in the beginning and at the end, or if
+        * start/end are exactly page aligned.
+        */
+       before_space = RTE_PTR_DIFF(aligned_start, elem);
+       after_space = RTE_PTR_DIFF(end, aligned_end);
+       if (before_space != 0 &&
+                       before_space < MALLOC_ELEM_OVERHEAD + MIN_DATA_SIZE) {
+               /* There is not enough space before start, but we may be able to
+                * move the start forward by one page.
+                */
+               if (n_segs == 1)
+                       goto free_unlock;
+
+               /* move start */
+               aligned_start = RTE_PTR_ADD(aligned_start, page_sz);
+               aligned_len -= page_sz;
+               n_segs--;
+       }
+       if (after_space != 0 && after_space <
+                       MALLOC_ELEM_OVERHEAD + MIN_DATA_SIZE) {
+               /* There is not enough space after end, but we may be able to
+                * move the end backwards by one page.
+                */
+               if (n_segs == 1)
+                       goto free_unlock;
+
+               /* move end */
+               aligned_end = RTE_PTR_SUB(aligned_end, page_sz);
+               aligned_len -= page_sz;
+               n_segs--;
+       }
+
+       /* now we can finally free us some pages */
+
        rte_rwlock_write_lock(&mcfg->memory_hotplug_lock);
 
        /*
@@ -784,6 +978,7 @@ rte_eal_malloc_heap_init(void)
 
        if (register_mp_requests()) {
                RTE_LOG(ERR, EAL, "Couldn't register malloc multiprocess actions\n");
+               rte_rwlock_read_unlock(&mcfg->memory_hotplug_lock);
                return -1;
        }