X-Git-Url: https://gerrit.fd.io/r/gitweb?a=blobdiff_plain;f=src%2Fsvm%2Ffifo_segment.c;h=d6fcdad9e176e3375c9d471753b44a0339697e16;hb=06d477585ce8ff5a18bec88a622bed3764d3a75d;hp=eeb274636c1cf9144095bcdd9477fb87bc3ead5c;hpb=eaacce4753c33342a6512039fe4153b15b476fb3;p=vpp.git diff --git a/src/svm/fifo_segment.c b/src/svm/fifo_segment.c index eeb274636c1..d6fcdad9e17 100644 --- a/src/svm/fifo_segment.c +++ b/src/svm/fifo_segment.c @@ -15,6 +15,18 @@ #include +static inline fifo_segment_slice_t * +fsh_slice_get (fifo_segment_header_t * fsh, u32 slice_index) +{ + return &fsh->slices[slice_index]; +} + +static char *fifo_segment_mem_status_strings[] = { +#define _(sym,str) str, + foreach_segment_mem_status +#undef _ +}; + /** * Fifo segment free space * @@ -25,15 +37,99 @@ * @param fs fifo segment * @return number of free bytes */ -static u32 -fs_free_space (fifo_segment_t * fs) +static uword +fsh_free_space (fifo_segment_header_t * fsh) { struct dlmallinfo dlminfo; - dlminfo = mspace_mallinfo (fs->ssvm.sh->heap); + dlminfo = mspace_mallinfo (fsh->ssvm_sh->heap); return dlminfo.fordblks; } +static inline void +fsh_free_bytes_sub (fifo_segment_header_t * fsh, int size) +{ + clib_atomic_fetch_sub_rel (&fsh->n_free_bytes, size); +} + +static inline uword +fsh_n_free_bytes (fifo_segment_header_t * fsh) +{ + uword n_free = clib_atomic_load_relax_n (&fsh->n_free_bytes); + return n_free > fsh->n_reserved_bytes ? n_free - fsh->n_reserved_bytes : 0; +} + +static inline void +fsh_update_free_bytes (fifo_segment_header_t * fsh) +{ + clib_atomic_store_rel_n (&fsh->n_free_bytes, fsh_free_space (fsh)); +} + +static inline void +fsh_cached_bytes_add (fifo_segment_header_t * fsh, int size) +{ + clib_atomic_fetch_add_rel (&fsh->n_cached_bytes, size); +} + +static inline void +fsh_cached_bytes_sub (fifo_segment_header_t * fsh, int size) +{ + clib_atomic_fetch_sub_rel (&fsh->n_cached_bytes, size); +} + +static inline uword +fsh_n_cached_bytes (fifo_segment_header_t * fsh) +{ + uword n_cached = clib_atomic_load_relax_n (&fsh->n_cached_bytes); + return n_cached; +} + +static inline void +fsh_active_fifos_update (fifo_segment_header_t * fsh, int inc) +{ + clib_atomic_fetch_add_rel (&fsh->n_active_fifos, inc); +} + +static inline uword +fsh_virtual_mem (fifo_segment_header_t * fsh) +{ + fifo_segment_slice_t *fss; + uword total_vm = 0; + int i; + + for (i = 0; i < fsh->n_slices; i++) + { + fss = fsh_slice_get (fsh, i); + total_vm += clib_atomic_load_relax_n (&fss->virtual_mem); + } + return total_vm; +} + +void +fsh_virtual_mem_update (fifo_segment_header_t * fsh, u32 slice_index, + int n_bytes) +{ + fifo_segment_slice_t *fss = fsh_slice_get (fsh, slice_index); + fss->virtual_mem += n_bytes; +} + +static void +fsh_check_mem (fifo_segment_header_t * fsh) +{ + uword thresh; + + if (fsh->flags & FIFO_SEGMENT_F_MEM_LIMIT) + return; + + thresh = clib_max (0.01 * fsh->ssvm_sh->ssvm_size, + 2 * fsh->n_reserved_bytes); + if (fsh->n_free_bytes > thresh) + return; + + fsh->flags |= FIFO_SEGMENT_F_MEM_LIMIT; + fsh_update_free_bytes (fsh); +} + /** * Initialize fifo segment shared header */ @@ -41,19 +137,52 @@ int fifo_segment_init (fifo_segment_t * fs) { fifo_segment_header_t *fsh; + fifo_segment_slice_t *fss; ssvm_shared_header_t *sh; + u32 max_chunk_sz; + uword max_fifo; void *oldheap; + int i; sh = fs->ssvm.sh; oldheap = ssvm_push_heap (sh); - fsh = clib_mem_alloc (sizeof (*fsh)); + /* + * Manually align the fifo segment header to sizeof(uword) = 8 bytes. + * Long story made short: the "process-private" fifo segment + * is allocated from the main heap, not mmapped. dlmalloc + * only guarantees 4-byte alignment, and on aarch64 + * the fsh can end up 4-byte but not 8-byte aligned. + * That eventually causes the atomic op in fifo_segment_update_free_bytes + * to backfire. + */ + fsh = clib_mem_alloc_aligned (sizeof (*fsh), sizeof (uword)); clib_memset (fsh, 0, sizeof (*fsh)); fs->h = sh->opaque[0] = fsh; + fs->n_slices = clib_max (fs->n_slices, 1); + + fsh->ssvm_sh = fs->ssvm.sh; + fsh->n_slices = fs->n_slices; + max_fifo = clib_min ((fsh_free_space (fsh) - 4096) / 2, + FIFO_SEGMENT_MAX_FIFO_SIZE); + fsh->max_log2_chunk_size = max_log2 (max_fifo); + + fsh->slices = clib_mem_alloc (sizeof (*fss) * fs->n_slices); + clib_memset (fsh->slices, 0, sizeof (*fss) * fs->n_slices); + max_chunk_sz = fsh->max_log2_chunk_size - FIFO_SEGMENT_MIN_LOG2_FIFO_SIZE; + + for (i = 0; i < fs->n_slices; i++) + { + fss = fsh_slice_get (fsh, i); + vec_validate_init_empty (fss->free_chunks, max_chunk_sz, 0); + clib_spinlock_init (&fss->chunk_lock); + } ssvm_pop_heap (oldheap); - fsh->n_free_bytes = fs_free_space (fs); + fsh->n_free_bytes = fsh_free_space (fsh); + fsh->n_cached_bytes = 0; + fsh->n_reserved_bytes = clib_min (0.01 * fsh->n_free_bytes, 256 << 10); sh->ready = 1; return (0); } @@ -98,30 +227,30 @@ fifo_segment_create (fifo_segment_main_t * sm, fifo_segment_create_args_t * a) int fifo_segment_attach (fifo_segment_main_t * sm, fifo_segment_create_args_t * a) { - fifo_segment_t *s; + fifo_segment_t *fs; int rv; - pool_get_zero (sm->segments, s); + pool_get_zero (sm->segments, fs); - s->ssvm.ssvm_size = a->segment_size; - s->ssvm.my_pid = getpid (); - s->ssvm.name = format (0, "%s%c", a->segment_name, 0); - s->ssvm.requested_va = sm->next_baseva; + fs->ssvm.ssvm_size = a->segment_size; + fs->ssvm.my_pid = getpid (); + fs->ssvm.name = format (0, "%s%c", a->segment_name, 0); + fs->ssvm.requested_va = sm->next_baseva; if (a->segment_type == SSVM_SEGMENT_MEMFD) - s->ssvm.fd = a->memfd_fd; + fs->ssvm.fd = a->memfd_fd; else - s->ssvm.attach_timeout = sm->timeout_in_seconds; + fs->ssvm.attach_timeout = sm->timeout_in_seconds; - if ((rv = ssvm_slave_init (&s->ssvm, a->segment_type))) + if ((rv = ssvm_slave_init (&fs->ssvm, a->segment_type))) { - _vec_len (s) = vec_len (s) - 1; + _vec_len (fs) = vec_len (fs) - 1; return (rv); } /* Fish the segment header */ - s->h = s->ssvm.sh->opaque[0]; + fs->h = fs->ssvm.sh->opaque[0]; - vec_add1 (a->new_segment_indices, s - sm->segments); + vec_add1 (a->new_segment_indices, fs - sm->segments); return (0); } @@ -139,12 +268,6 @@ fifo_segment_index (fifo_segment_main_t * sm, fifo_segment_t * s) return s - sm->segments; } -void * -svm_fifo_segment_heap (fifo_segment_t * seg) -{ - return seg->ssvm.sh->heap; -} - fifo_segment_t * fifo_segment_get_segment (fifo_segment_main_t * sm, u32 segment_index) { @@ -169,120 +292,266 @@ fifo_segment_main_init (fifo_segment_main_t * sm, u64 baseva, static inline u32 fs_freelist_for_size (u32 size) { - return max_log2 (size) - max_log2 (FIFO_SEGMENT_MIN_FIFO_SIZE); + if (PREDICT_FALSE (size < FIFO_SEGMENT_MIN_FIFO_SIZE)) + return 0; + return max_log2 (size) - FIFO_SEGMENT_MIN_LOG2_FIFO_SIZE; } static inline u32 fs_freelist_index_to_size (u32 fl_index) { - return 1 << (fl_index + max_log2 (FIFO_SEGMENT_MIN_FIFO_SIZE)); + return 1 << (fl_index + FIFO_SEGMENT_MIN_LOG2_FIFO_SIZE); } static inline int -fs_chunk_size_is_valid (u32 size) +fs_chunk_size_is_valid (fifo_segment_header_t * fsh, u32 size) { /* * 4K minimum. It's not likely that anything good will happen * with a smaller FIFO. */ return size >= FIFO_SEGMENT_MIN_FIFO_SIZE - && size <= FIFO_SEGMENT_MAX_FIFO_SIZE; + && size <= (1 << fsh->max_log2_chunk_size); } static svm_fifo_t * -fs_try_alloc_fifo_freelist (fifo_segment_t * fs, u32 fl_index, u32 data_bytes) +fs_try_alloc_fifo_freelist (fifo_segment_slice_t * fss, u32 fl_index) { - fifo_segment_header_t *fsh = fs->h; svm_fifo_chunk_t *c; svm_fifo_t *f; - f = fsh->free_fifos; - c = fsh->free_chunks[fl_index]; + f = fss->free_fifos; + c = fss->free_chunks[fl_index]; if (!f || !c) return 0; - fsh->free_fifos = f->next; - fsh->free_chunks[fl_index] = c->next; - c->next = c; + fss->free_fifos = f->next; + fss->free_chunks[fl_index] = c->next; + c->next = 0; c->start_byte = 0; - c->length = data_bytes; memset (f, 0, sizeof (*f)); f->start_chunk = c; f->end_chunk = c; - fsh->n_fl_chunk_bytes -= fs_freelist_index_to_size (fl_index); + fss->n_fl_chunk_bytes -= fs_freelist_index_to_size (fl_index); return f; } +svm_fifo_chunk_t * +fs_try_alloc_multi_chunk (fifo_segment_header_t * fsh, + fifo_segment_slice_t * fss, u32 data_bytes) +{ + u32 fl_index, fl_size, n_alloc = 0, req_bytes = data_bytes; + svm_fifo_chunk_t *c, *first = 0, *next; + + fl_index = fs_freelist_for_size (req_bytes); + if (fl_index > 0) + fl_index -= 1; + + fl_size = fs_freelist_index_to_size (fl_index); + + while (req_bytes) + { + c = fss->free_chunks[fl_index]; + if (c) + { + fss->free_chunks[fl_index] = c->next; + c->next = first; + first = c; + n_alloc += fl_size; + req_bytes -= clib_min (fl_size, req_bytes); + } + else + { + /* Failed to allocate with smaller chunks */ + if (fl_index == 0) + { + /* free all chunks if any allocated */ + c = first; + while (c) + { + fl_index = fs_freelist_for_size (c->length); + fl_size = fs_freelist_index_to_size (fl_index); + next = c->next; + c->next = fss->free_chunks[fl_index]; + fss->free_chunks[fl_index] = c; + fss->n_fl_chunk_bytes += fl_size; + c = next; + } + n_alloc = 0; + first = 0; + fl_index = fs_freelist_for_size (data_bytes); + if (fss->free_chunks[fl_index + 1]) + { + fl_index += 1; + fl_size = fs_freelist_index_to_size (fl_index); + continue; + } + + return 0; + } + fl_index -= 1; + fl_size = fl_size >> 1; + } + } + + fss->n_fl_chunk_bytes -= n_alloc; + fsh_cached_bytes_sub (fsh, n_alloc); + return first; +} + static svm_fifo_t * -fs_try_alloc_fifo_freelist_multi_chunk (fifo_segment_t * fs, u32 data_bytes) +fs_try_alloc_fifo_freelist_multi_chunk (fifo_segment_header_t * fsh, + fifo_segment_slice_t * fss, + u32 data_bytes) { - svm_fifo_chunk_t *c, *first = 0, *last = 0; - fifo_segment_header_t *fsh = fs->h; + svm_fifo_chunk_t *c, *first = 0, *last = 0, *next; u32 fl_index, fl_size, n_alloc = 0; svm_fifo_t *f; - f = fsh->free_fifos; + f = fss->free_fifos; if (!f) { - void *oldheap = ssvm_push_heap (fs->ssvm.sh); + void *oldheap = ssvm_push_heap (fsh->ssvm_sh); f = clib_mem_alloc_aligned (sizeof (*f), CLIB_CACHE_LINE_BYTES); ssvm_pop_heap (oldheap); if (!f) return 0; memset (f, 0, sizeof (*f)); + fsh_free_bytes_sub (fsh, sizeof (*f)); } + else + { + fss->free_fifos = f->next; + } + + fl_index = fs_freelist_for_size (data_bytes); + if (fl_index > 0) + fl_index -= 1; - fl_index = fs_freelist_for_size (data_bytes) - 1; - vec_validate_init_empty (fsh->free_chunks, fl_index, 0); fl_size = fs_freelist_index_to_size (fl_index); while (data_bytes) { - c = fsh->free_chunks[fl_index]; + c = fss->free_chunks[fl_index]; if (c) { - fsh->free_chunks[fl_index] = c->next; + fss->free_chunks[fl_index] = c->next; if (!last) last = c; c->next = first; first = c; n_alloc += fl_size; - c->length = clib_min (fl_size, data_bytes); - data_bytes -= c->length; + data_bytes -= clib_min (fl_size, data_bytes); } else { - ASSERT (fl_index > 0); + /* Failed to allocate with smaller chunks */ + if (fl_index == 0) + { + /* free all chunks if any allocated */ + c = first; + while (c) + { + fl_index = fs_freelist_for_size (c->length); + fl_size = fs_freelist_index_to_size (fl_index); + next = c->next; + c->next = fss->free_chunks[fl_index]; + fss->free_chunks[fl_index] = c; + fss->n_fl_chunk_bytes += fl_size; + n_alloc -= fl_size; + data_bytes += fl_size; + c = next; + } + first = last = 0; + fl_index = fs_freelist_for_size (data_bytes); + if (fss->free_chunks[fl_index + 1]) + { + fl_index += 1; + fl_size = fs_freelist_index_to_size (fl_index); + continue; + } + + f->next = fss->free_fifos; + fss->free_fifos = f; + return 0; + } fl_index -= 1; fl_size = fl_size >> 1; } } + f->start_chunk = first; f->end_chunk = last; - last->next = first; - fsh->n_fl_chunk_bytes -= n_alloc; + fss->n_fl_chunk_bytes -= n_alloc; + fsh_cached_bytes_sub (fsh, n_alloc); return f; } static int -fs_try_alloc_fifo_batch (fifo_segment_t * fs, u32 fl_index, u32 batch_size) +fsh_try_alloc_chunk_batch (fifo_segment_header_t * fsh, + fifo_segment_slice_t * fss, + u32 fl_index, u32 batch_size) { - fifo_segment_header_t *fsh = fs->h; - u32 size, hdrs, rounded_data_size; + u32 rounded_data_size; + svm_fifo_chunk_t *c; + void *oldheap; + uword size; + u8 *cmem; + int i; + + rounded_data_size = fs_freelist_index_to_size (fl_index); + size = (uword) (sizeof (*c) + rounded_data_size) * batch_size; + + oldheap = ssvm_push_heap (fsh->ssvm_sh); + cmem = clib_mem_alloc_aligned_at_offset (size, CLIB_CACHE_LINE_BYTES, + 0 /* align_offset */ , + 0 /* os_out_of_memory */ ); + ssvm_pop_heap (oldheap); + + /* Out of space.. */ + if (cmem == 0) + return -1; + + /* Carve fifo + chunk space */ + for (i = 0; i < batch_size; i++) + { + c = (svm_fifo_chunk_t *) cmem; + c->start_byte = 0; + c->length = rounded_data_size; + c->enq_rb_index = RBTREE_TNIL_INDEX; + c->deq_rb_index = RBTREE_TNIL_INDEX; + c->next = fss->free_chunks[fl_index]; + fss->free_chunks[fl_index] = c; + cmem += sizeof (*c) + rounded_data_size; + } + + fss->n_fl_chunk_bytes += batch_size * rounded_data_size; + fsh_cached_bytes_add (fsh, batch_size * rounded_data_size); + fsh_free_bytes_sub (fsh, size); + + return 0; +} + +static int +fs_try_alloc_fifo_batch (fifo_segment_header_t * fsh, + fifo_segment_slice_t * fss, + u32 fl_index, u32 batch_size) +{ + u32 hdrs, rounded_data_size; svm_fifo_chunk_t *c; svm_fifo_t *f; void *oldheap; + uword size; u8 *fmem; int i; - vec_validate_init_empty (fsh->free_chunks, fl_index, 0); rounded_data_size = fs_freelist_index_to_size (fl_index); hdrs = sizeof (*f) + sizeof (*c); - size = (hdrs + rounded_data_size) * batch_size; + size = (uword) (hdrs + rounded_data_size) * batch_size; - oldheap = ssvm_push_heap (fs->ssvm.sh); + oldheap = ssvm_push_heap (fsh->ssvm_sh); fmem = clib_mem_alloc_aligned_at_offset (size, CLIB_CACHE_LINE_BYTES, 0 /* align_offset */ , 0 /* os_out_of_memory */ ); @@ -297,18 +566,21 @@ fs_try_alloc_fifo_batch (fifo_segment_t * fs, u32 fl_index, u32 batch_size) { f = (svm_fifo_t *) fmem; memset (f, 0, sizeof (*f)); - f->next = fsh->free_fifos; - fsh->free_fifos = f; + f->next = fss->free_fifos; + fss->free_fifos = f; c = (svm_fifo_chunk_t *) (fmem + sizeof (*f)); c->start_byte = 0; c->length = rounded_data_size; - c->next = fsh->free_chunks[fl_index]; - fsh->free_chunks[fl_index] = c; + c->enq_rb_index = RBTREE_TNIL_INDEX; + c->deq_rb_index = RBTREE_TNIL_INDEX; + c->next = fss->free_chunks[fl_index]; + fss->free_chunks[fl_index] = c; fmem += hdrs + rounded_data_size; } - fsh->n_fl_chunk_bytes += batch_size * rounded_data_size; - fsh->n_free_bytes -= size; + fss->n_fl_chunk_bytes += batch_size * rounded_data_size; + fsh_cached_bytes_add (fsh, batch_size * rounded_data_size); + fsh_free_bytes_sub (fsh, size); return 0; } @@ -323,84 +595,192 @@ fs_try_alloc_fifo_batch (fifo_segment_t * fs, u32 fl_index, u32 batch_size) * - grab multiple fifo chunks from freelists */ static svm_fifo_t * -fs_try_alloc_fifo (fifo_segment_t * fs, u32 data_bytes) +fs_try_alloc_fifo (fifo_segment_header_t * fsh, fifo_segment_slice_t * fss, + u32 data_bytes) { - fifo_segment_header_t *fsh = fs->h; u32 fifo_sz, fl_index; svm_fifo_t *f = 0; + uword n_free_bytes; + u32 min_size; - fl_index = fs_freelist_for_size (data_bytes); - vec_validate_init_empty (fsh->free_chunks, fl_index, 0); + min_size = clib_max ((fsh->pct_first_alloc * data_bytes) / 100, 4096); + fl_index = fs_freelist_for_size (min_size); fifo_sz = sizeof (svm_fifo_t) + sizeof (svm_fifo_chunk_t); - fifo_sz += 1 << max_log2 (data_bytes); + fifo_sz += 1 << max_log2 (min_size); + + clib_spinlock_lock (&fss->chunk_lock); - if (fsh->free_fifos && fsh->free_chunks[fl_index]) + if (fss->free_fifos && fss->free_chunks[fl_index]) { - f = fs_try_alloc_fifo_freelist (fs, fl_index, data_bytes); + f = fs_try_alloc_fifo_freelist (fss, fl_index); if (f) - goto done; + { + fsh_cached_bytes_sub (fsh, fs_freelist_index_to_size (fl_index)); + goto done; + } } - if (fifo_sz * FIFO_SEGMENT_ALLOC_BATCH_SIZE < fsh->n_free_bytes) + + fsh_check_mem (fsh); + n_free_bytes = fsh_n_free_bytes (fsh); + if (fifo_sz * FIFO_SEGMENT_ALLOC_BATCH_SIZE < n_free_bytes) { - if (fs_try_alloc_fifo_batch (fs, fl_index, + if (fs_try_alloc_fifo_batch (fsh, fss, fl_index, FIFO_SEGMENT_ALLOC_BATCH_SIZE)) goto done; - f = fs_try_alloc_fifo_freelist (fs, fl_index, data_bytes); + f = fs_try_alloc_fifo_freelist (fss, fl_index); + if (f) + fsh_cached_bytes_sub (fsh, fs_freelist_index_to_size (fl_index)); goto done; } - if (fifo_sz <= fsh->n_free_bytes) + if (fifo_sz <= n_free_bytes) { - void *oldheap = ssvm_push_heap (fs->ssvm.sh); - f = svm_fifo_create (data_bytes); + void *oldheap = ssvm_push_heap (fsh->ssvm_sh); + f = svm_fifo_alloc (min_size); ssvm_pop_heap (oldheap); if (f) { - fsh->n_free_bytes -= fifo_sz; + fsh_free_bytes_sub (fsh, fifo_sz); goto done; } } - if (data_bytes <= fsh->n_fl_chunk_bytes) - f = fs_try_alloc_fifo_freelist_multi_chunk (fs, data_bytes); + /* All failed, try to allocate min of data bytes and fifo sz */ + fifo_sz = clib_min (fifo_sz, data_bytes); + if (fifo_sz <= fss->n_fl_chunk_bytes) + f = fs_try_alloc_fifo_freelist_multi_chunk (fsh, fss, fifo_sz); done: + clib_spinlock_unlock (&fss->chunk_lock); + if (f) + { + f->size = data_bytes; + f->fs_hdr = fsh; + } return f; } +svm_fifo_chunk_t * +fsh_alloc_chunk (fifo_segment_header_t * fsh, u32 slice_index, u32 chunk_size) +{ + fifo_segment_slice_t *fss; + svm_fifo_chunk_t *c; + void *oldheap; + int fl_index; + uword n_free; + + fl_index = fs_freelist_for_size (chunk_size); + fss = fsh_slice_get (fsh, slice_index); + + clib_spinlock_lock (&fss->chunk_lock); + + c = fss->free_chunks[fl_index]; + + if (c) + { + fss->free_chunks[fl_index] = c->next; + c->next = 0; + fss->n_fl_chunk_bytes -= fs_freelist_index_to_size (fl_index); + fsh_cached_bytes_sub (fsh, fs_freelist_index_to_size (fl_index)); + } + else if (chunk_size <= (n_free = fsh_n_free_bytes (fsh))) + { + fsh_check_mem (fsh); + + chunk_size = fs_freelist_index_to_size (fl_index); + if (n_free < chunk_size) + goto done; + + oldheap = ssvm_push_heap (fsh->ssvm_sh); + c = svm_fifo_chunk_alloc (chunk_size); + ssvm_pop_heap (oldheap); + + if (!c) + goto done; + + fsh_free_bytes_sub (fsh, chunk_size + sizeof (*c)); + } + else if (chunk_size <= fss->n_fl_chunk_bytes) + { + c = fs_try_alloc_multi_chunk (fsh, fss, chunk_size); + } + else if (chunk_size <= fss->n_fl_chunk_bytes + n_free) + { + u32 min_size = FIFO_SEGMENT_MIN_FIFO_SIZE; + u32 batch; + + fsh_check_mem (fsh); + batch = (chunk_size - fss->n_fl_chunk_bytes) / min_size; + batch = clib_min (batch + 1, n_free / min_size); + if (!fsh_try_alloc_chunk_batch (fsh, fss, 0, batch)) + c = fs_try_alloc_multi_chunk (fsh, fss, chunk_size); + } + +done: + + clib_spinlock_unlock (&fss->chunk_lock); + + return c; +} + +static void +fsh_slice_collect_chunks (fifo_segment_header_t * fsh, + fifo_segment_slice_t * fss, svm_fifo_chunk_t * c) +{ + svm_fifo_chunk_t *next; + int fl_index; + u32 n_collect = 0; + + clib_spinlock_lock (&fss->chunk_lock); + + while (c) + { + next = c->next; + fl_index = fs_freelist_for_size (c->length); + c->next = fss->free_chunks[fl_index]; + c->enq_rb_index = RBTREE_TNIL_INDEX; + c->deq_rb_index = RBTREE_TNIL_INDEX; + fss->free_chunks[fl_index] = c; + n_collect += fs_freelist_index_to_size (fl_index); + c = next; + } + + fss->n_fl_chunk_bytes += n_collect; + fsh_cached_bytes_add (fsh, n_collect); + + clib_spinlock_unlock (&fss->chunk_lock); +} + +void +fsh_collect_chunks (fifo_segment_header_t * fsh, u32 slice_index, + svm_fifo_chunk_t * c) +{ + fifo_segment_slice_t *fss; + fss = fsh_slice_get (fsh, slice_index); + fsh_slice_collect_chunks (fsh, fss, c); +} + /** * Allocate fifo in fifo segment */ svm_fifo_t * -fifo_segment_alloc_fifo (fifo_segment_t * fs, u32 data_bytes, - fifo_segment_ftype_t ftype) +fifo_segment_alloc_fifo_w_slice (fifo_segment_t * fs, u32 slice_index, + u32 data_bytes, fifo_segment_ftype_t ftype) { - fifo_segment_header_t *fsh; + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; svm_fifo_t *f = 0; - if (!fs_chunk_size_is_valid (data_bytes)) - { - clib_warning ("fifo size out of range %d", data_bytes); - return 0; - } - - fsh = fs->h; - ssvm_lock_non_recursive (fs->ssvm.sh, 1); + ASSERT (slice_index < fs->n_slices); - f = fs_try_alloc_fifo (fs, data_bytes); + fss = fsh_slice_get (fsh, slice_index); + f = fs_try_alloc_fifo (fsh, fss, data_bytes); if (!f) goto done; - /* (re)initialize the fifo, as in svm_fifo_create */ - svm_fifo_init (f, data_bytes); + f->slice_index = slice_index; - /* Initialize chunks and rbtree for multi-chunk fifos */ - if (f->start_chunk->next != f->start_chunk) - { - void *oldheap = ssvm_push_heap (fs->ssvm.sh); - svm_fifo_init_chunks (f); - ssvm_pop_heap (oldheap); - } + svm_fifo_init (f, data_bytes); /* If rx fifo type add to active fifos list. When cleaning up segment, * we need a list of active sessions that should be disconnected. Since @@ -408,18 +788,25 @@ fifo_segment_alloc_fifo (fifo_segment_t * fs, u32 data_bytes, * only one. */ if (ftype == FIFO_SEGMENT_RX_FIFO) { - if (fsh->fifos) + if (fss->fifos) { - fsh->fifos->prev = f; - f->next = fsh->fifos; + fss->fifos->prev = f; + f->next = fss->fifos; } - fsh->fifos = f; + fss->fifos = f; f->flags |= SVM_FIFO_F_LL_TRACKED; + + svm_fifo_init_ooo_lookup (f, 0 /* ooo enq */ ); + } + else + { + svm_fifo_init_ooo_lookup (f, 1 /* ooo deq */ ); } - fsh->n_active_fifos++; + + fsh_active_fifos_update (fsh, 1); + fss->virtual_mem += svm_fifo_size (f); done: - ssvm_unlock_non_recursive (fs->ssvm.sh); return (f); } @@ -429,21 +816,15 @@ done: void fifo_segment_free_fifo (fifo_segment_t * fs, svm_fifo_t * f) { - svm_fifo_chunk_t *cur, *next; - fifo_segment_header_t *fsh; - ssvm_shared_header_t *sh; - void *oldheap; - int fl_index; + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; ASSERT (f->refcnt > 0); if (--f->refcnt > 0) return; - sh = fs->ssvm.sh; - fsh = fs->h; - - ssvm_lock_non_recursive (sh, 2); + fss = fsh_slice_get (fsh, f->slice_index); /* Remove from active list. Only rx fifos are tracked */ if (f->flags & SVM_FIFO_F_LL_TRACKED) @@ -451,39 +832,20 @@ fifo_segment_free_fifo (fifo_segment_t * fs, svm_fifo_t * f) if (f->prev) f->prev->next = f->next; else - fsh->fifos = f->next; + fss->fifos = f->next; if (f->next) f->next->prev = f->prev; f->flags &= ~SVM_FIFO_F_LL_TRACKED; } - /* Add to free list */ - f->next = fsh->free_fifos; - f->prev = 0; - fsh->free_fifos = f; - /* Free fifo chunks */ - cur = f->start_chunk; - do - { - next = cur->next; - fl_index = fs_freelist_for_size (cur->length); - ASSERT (fl_index < vec_len (fsh->free_chunks)); - cur->next = fsh->free_chunks[fl_index]; - fsh->free_chunks[fl_index] = cur; - fsh->n_fl_chunk_bytes += fs_freelist_index_to_size (fl_index); - cur = next; - } - while (cur != f->start_chunk); + fsh_slice_collect_chunks (fsh, fss, f->start_chunk); - f->start_chunk = f->end_chunk = f->new_chunks = 0; + f->start_chunk = f->end_chunk = 0; f->head_chunk = f->tail_chunk = f->ooo_enq = f->ooo_deq = 0; - oldheap = ssvm_push_heap (sh); - svm_fifo_free_chunk_lookup (f); - ssvm_pop_heap (oldheap); - /* not allocated on segment heap */ + svm_fifo_free_chunk_lookup (f); svm_fifo_free_ooo_data (f); if (CLIB_DEBUG) @@ -492,23 +854,32 @@ fifo_segment_free_fifo (fifo_segment_t * fs, svm_fifo_t * f) f->master_thread_index = ~0; } - fsh->n_active_fifos--; - ssvm_unlock_non_recursive (sh); + fss->virtual_mem -= svm_fifo_size (f); + + /* Add to free list */ + f->next = fss->free_fifos; + f->prev = 0; + fss->free_fifos = f; + + fsh_active_fifos_update (fsh, -1); } int -fifo_segment_prealloc_fifo_hdrs (fifo_segment_t * fs, u32 batch_size) +fifo_segment_prealloc_fifo_hdrs (fifo_segment_t * fs, u32 slice_index, + u32 batch_size) { fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; svm_fifo_t *f; void *oldheap; - u32 size; + uword size; u8 *fmem; int i; - size = (sizeof (*f)) * batch_size; + fss = fsh_slice_get (fsh, slice_index); + size = (uword) (sizeof (*f)) * batch_size; - oldheap = ssvm_push_heap (fs->ssvm.sh); + oldheap = ssvm_push_heap (fsh->ssvm_sh); fmem = clib_mem_alloc_aligned_at_offset (size, CLIB_CACHE_LINE_BYTES, 0 /* align_offset */ , 0 /* os_out_of_memory */ ); @@ -523,39 +894,40 @@ fifo_segment_prealloc_fifo_hdrs (fifo_segment_t * fs, u32 batch_size) { f = (svm_fifo_t *) fmem; memset (f, 0, sizeof (*f)); - f->next = fsh->free_fifos; - fsh->free_fifos = f; + f->next = fss->free_fifos; + fss->free_fifos = f; fmem += sizeof (*f); } - fsh->n_free_bytes -= size; + fsh_free_bytes_sub (fsh, size); return 0; } int -fifo_segment_prealloc_fifo_chunks (fifo_segment_t * fs, u32 chunk_size, - u32 batch_size) +fifo_segment_prealloc_fifo_chunks (fifo_segment_t * fs, u32 slice_index, + u32 chunk_size, u32 batch_size) { fifo_segment_header_t *fsh = fs->h; - u32 size, rounded_data_size, fl_index; + u32 rounded_data_size, fl_index; + fifo_segment_slice_t *fss; svm_fifo_chunk_t *c; void *oldheap; + uword size; u8 *cmem; int i; - if (!fs_chunk_size_is_valid (chunk_size)) + if (!fs_chunk_size_is_valid (fsh, chunk_size)) { clib_warning ("chunk size out of range %d", chunk_size); return -1; } fl_index = fs_freelist_for_size (chunk_size); - vec_validate_init_empty (fsh->free_chunks, fl_index, 0); rounded_data_size = fs_freelist_index_to_size (fl_index); - size = (sizeof (*c) + rounded_data_size) * batch_size; + size = (uword) (sizeof (*c) + rounded_data_size) * batch_size; - oldheap = ssvm_push_heap (fs->ssvm.sh); + oldheap = ssvm_push_heap (fsh->ssvm_sh); cmem = clib_mem_alloc_aligned_at_offset (size, CLIB_CACHE_LINE_BYTES, 0 /* align_offset */ , 0 /* os_out_of_memory */ ); @@ -565,19 +937,22 @@ fifo_segment_prealloc_fifo_chunks (fifo_segment_t * fs, u32 chunk_size, if (cmem == 0) return -1; + fss = fsh_slice_get (fsh, slice_index); + /* Carve fifo + chunk space */ for (i = 0; i < batch_size; i++) { c = (svm_fifo_chunk_t *) cmem; c->start_byte = 0; c->length = rounded_data_size; - c->next = fsh->free_chunks[fl_index]; - fsh->free_chunks[fl_index] = c; + c->next = fss->free_chunks[fl_index]; + fss->free_chunks[fl_index] = c; cmem += sizeof (*c) + rounded_data_size; + fsh_cached_bytes_add (fsh, rounded_data_size); } - fsh->n_fl_chunk_bytes += batch_size * rounded_data_size; - fsh->n_free_bytes -= size; + fss->n_fl_chunk_bytes += batch_size * rounded_data_size; + fsh_free_bytes_sub (fsh, size); return 0; } @@ -591,21 +966,23 @@ fifo_segment_preallocate_fifo_pairs (fifo_segment_t * fs, u32 * n_fifo_pairs) { u32 rx_rounded_data_size, tx_rounded_data_size, pair_size, pairs_to_alloc; - int rx_fl_index, tx_fl_index; + u32 hdrs, pairs_per_slice, alloc_now; + fifo_segment_header_t *fsh = fs->h; + int rx_fl_index, tx_fl_index, i; + fifo_segment_slice_t *fss; uword space_available; - u32 hdrs; /* Parameter check */ if (rx_fifo_size == 0 || tx_fifo_size == 0 || *n_fifo_pairs == 0) return; - if (!fs_chunk_size_is_valid (rx_fifo_size)) + if (!fs_chunk_size_is_valid (fsh, rx_fifo_size)) { clib_warning ("rx fifo_size out of range %d", rx_fifo_size); return; } - if (!fs_chunk_size_is_valid (tx_fifo_size)) + if (!fs_chunk_size_is_valid (fsh, tx_fifo_size)) { clib_warning ("tx fifo_size out of range %d", tx_fifo_size); return; @@ -620,97 +997,27 @@ fifo_segment_preallocate_fifo_pairs (fifo_segment_t * fs, /* Calculate space requirements */ pair_size = 2 * hdrs + rx_rounded_data_size + tx_rounded_data_size; - space_available = fs_free_space (fs); + space_available = fsh_free_space (fsh); pairs_to_alloc = space_available / pair_size; pairs_to_alloc = clib_min (pairs_to_alloc, *n_fifo_pairs); + pairs_per_slice = pairs_to_alloc / fs->n_slices; + pairs_per_slice += pairs_to_alloc % fs->n_slices ? 1 : 0; - if (!pairs_to_alloc) + if (!pairs_per_slice) return; - if (fs_try_alloc_fifo_batch (fs, rx_fl_index, pairs_to_alloc)) - clib_warning ("rx prealloc failed: pairs %u", pairs_to_alloc); - if (fs_try_alloc_fifo_batch (fs, tx_fl_index, pairs_to_alloc)) - clib_warning ("tx prealloc failed: pairs %u", pairs_to_alloc); - - /* Account for the pairs allocated */ - *n_fifo_pairs -= pairs_to_alloc; -} - -int -fifo_segment_grow_fifo (fifo_segment_t * fs, svm_fifo_t * f, u32 chunk_size) -{ - ssvm_shared_header_t *sh; - svm_fifo_chunk_t *c; - void *oldheap; - int fl_index; - - if (!fs_chunk_size_is_valid (chunk_size)) + for (i = 0; i < fs->n_slices; i++) { - clib_warning ("chunk size out of range %d", chunk_size); - return -1; - } - - fl_index = fs_freelist_for_size (chunk_size); - - sh = fs->ssvm.sh; - ssvm_lock_non_recursive (sh, 1); - - vec_validate_init_empty (fs->h->free_chunks, fl_index, 0); - c = fs->h->free_chunks[fl_index]; - - oldheap = ssvm_push_heap (sh); - - if (!c) - { - c = svm_fifo_chunk_alloc (chunk_size); - if (!c) - { - ssvm_pop_heap (oldheap); - ssvm_unlock_non_recursive (sh); - return -1; - } - } - else - { - fs->h->free_chunks[fl_index] = c->next; - c->next = 0; - fs->h->n_fl_chunk_bytes -= fs_freelist_index_to_size (fl_index); + fss = fsh_slice_get (fsh, i); + alloc_now = clib_min (pairs_per_slice, *n_fifo_pairs); + if (fs_try_alloc_fifo_batch (fsh, fss, rx_fl_index, alloc_now)) + clib_warning ("rx prealloc failed: pairs %u", alloc_now); + if (fs_try_alloc_fifo_batch (fsh, fss, tx_fl_index, alloc_now)) + clib_warning ("tx prealloc failed: pairs %u", alloc_now); + + /* Account for the pairs allocated */ + *n_fifo_pairs -= alloc_now; } - - svm_fifo_add_chunk (f, c); - - ssvm_pop_heap (oldheap); - ssvm_unlock_non_recursive (sh); - return 0; -} - -int -fifo_segment_collect_fifo_chunks (fifo_segment_t * fs, svm_fifo_t * f) -{ - svm_fifo_chunk_t *cur, *next; - ssvm_shared_header_t *sh; - void *oldheap; - int fl_index; - - sh = fs->ssvm.sh; - ssvm_lock_non_recursive (sh, 1); - - oldheap = ssvm_push_heap (sh); - cur = svm_fifo_collect_chunks (f); - - while (cur) - { - next = cur->next; - fl_index = fs_freelist_for_size (cur->length); - cur->next = fs->h->free_chunks[fl_index]; - fs->h->free_chunks[fl_index] = cur; - cur = next; - } - - ssvm_pop_heap (oldheap); - ssvm_unlock_non_recursive (sh); - - return 0; } /** @@ -719,17 +1026,16 @@ fifo_segment_collect_fifo_chunks (fifo_segment_t * fs, svm_fifo_t * f) u32 fifo_segment_num_fifos (fifo_segment_t * fs) { - return fs->h->n_active_fifos; + return clib_atomic_load_relax_n (&fs->h->n_active_fifos); } -u32 -fifo_segment_num_free_fifos (fifo_segment_t * fs) +static u32 +fs_slice_num_free_fifos (fifo_segment_slice_t * fss) { - fifo_segment_header_t *fsh = fs->h; svm_fifo_t *f; u32 count = 0; - f = fsh->free_fifos; + f = fss->free_fifos; if (f == 0) return 0; @@ -742,21 +1048,34 @@ fifo_segment_num_free_fifos (fifo_segment_t * fs) } u32 -fifo_segment_num_free_chunks (fifo_segment_t * fs, u32 size) +fifo_segment_num_free_fifos (fifo_segment_t * fs) +{ + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; + int slice_index; + u32 count = 0; + + for (slice_index = 0; slice_index < fs->n_slices; slice_index++) + { + fss = fsh_slice_get (fsh, slice_index); + count += fs_slice_num_free_fifos (fss); + } + return count; +} + +static u32 +fs_slice_num_free_chunks (fifo_segment_slice_t * fss, u32 size) { u32 count = 0, rounded_size, fl_index; - fifo_segment_header_t *fsh; svm_fifo_chunk_t *c; int i; - fsh = fs->h; - /* Count all free chunks? */ if (size == ~0) { - for (i = 0; i < vec_len (fsh->free_chunks); i++) + for (i = 0; i < vec_len (fss->free_chunks); i++) { - c = fsh->free_chunks[i]; + c = fss->free_chunks[i]; if (c == 0) continue; @@ -772,10 +1091,10 @@ fifo_segment_num_free_chunks (fifo_segment_t * fs, u32 size) rounded_size = (1 << (max_log2 (size))); fl_index = fs_freelist_for_size (rounded_size); - if (fl_index >= vec_len (fsh->free_chunks)) + if (fl_index >= vec_len (fss->free_chunks)) return 0; - c = fsh->free_chunks[fl_index]; + c = fss->free_chunks[fl_index]; if (c == 0) return 0; @@ -787,34 +1106,151 @@ fifo_segment_num_free_chunks (fifo_segment_t * fs, u32 size) return count; } +u32 +fifo_segment_num_free_chunks (fifo_segment_t * fs, u32 size) +{ + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; + int slice_index; + u32 count = 0; + + for (slice_index = 0; slice_index < fs->n_slices; slice_index++) + { + fss = fsh_slice_get (fsh, slice_index); + count += fs_slice_num_free_chunks (fss, size); + } + return count; +} + void fifo_segment_update_free_bytes (fifo_segment_t * fs) { - fs->h->n_free_bytes = fs_free_space (fs); + fsh_update_free_bytes (fs->h); } -u32 +uword +fifo_segment_size (fifo_segment_t * fs) +{ + return fs->ssvm.ssvm_size; +} + +u8 +fsh_has_reached_mem_limit (fifo_segment_header_t * fsh) +{ + return (fsh->flags & FIFO_SEGMENT_F_MEM_LIMIT) ? 1 : 0; +} + +void +fsh_reset_mem_limit (fifo_segment_header_t * fsh) +{ + fsh->flags &= ~FIFO_SEGMENT_F_MEM_LIMIT; +} + +uword fifo_segment_free_bytes (fifo_segment_t * fs) { - return fs->h->n_free_bytes; + return fsh_n_free_bytes (fs->h); } -u32 +uword +fifo_segment_cached_bytes (fifo_segment_t * fs) +{ + return fsh_n_cached_bytes (fs->h); +} + +uword +fifo_segment_available_bytes (fifo_segment_t * fs) +{ + return fsh_n_free_bytes (fs->h) + fsh_n_cached_bytes (fs->h); +} + +uword fifo_segment_fl_chunk_bytes (fifo_segment_t * fs) { - return fs->h->n_fl_chunk_bytes; + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; + uword n_bytes = 0; + int slice_index; + + for (slice_index = 0; slice_index < fs->n_slices; slice_index++) + { + fss = fsh_slice_get (fsh, slice_index); + n_bytes += fss->n_fl_chunk_bytes; + } + + return n_bytes; } u8 fifo_segment_has_fifos (fifo_segment_t * fs) { - return fs->h->fifos != 0; + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; + int slice_index; + + for (slice_index = 0; slice_index < fs->n_slices; slice_index++) + { + fss = fsh_slice_get (fsh, slice_index); + if (fss->fifos) + return 1; + } + return 0; } svm_fifo_t * -fifo_segment_get_fifo_list (fifo_segment_t * fs) +fifo_segment_get_slice_fifo_list (fifo_segment_t * fs, u32 slice_index) +{ + fifo_segment_header_t *fsh = fs->h; + fifo_segment_slice_t *fss; + + fss = fsh_slice_get (fsh, slice_index); + return fss->fifos; +} + +u8 +fifo_segment_get_mem_usage (fifo_segment_t * fs) { - return fs->h->fifos; + uword size, in_use; + + size = fifo_segment_size (fs); + in_use = + size - fifo_segment_free_bytes (fs) - fifo_segment_cached_bytes (fs); + return (in_use * 100) / size; +} + +fifo_segment_mem_status_t +fifo_segment_determine_status (fifo_segment_header_t * fsh, u8 usage) +{ + if (!fsh->high_watermark || !fsh->low_watermark) + return MEMORY_PRESSURE_NO_PRESSURE; + + /* once the no-memory is detected, the status continues + * until memory usage gets below the high watermark + */ + if (fsh_has_reached_mem_limit (fsh)) + { + if (usage >= fsh->high_watermark) + return MEMORY_PRESSURE_NO_MEMORY; + else + fsh_reset_mem_limit (fsh); + } + + if (usage >= fsh->high_watermark) + return MEMORY_PRESSURE_HIGH_PRESSURE; + + else if (usage >= fsh->low_watermark) + return MEMORY_PRESSURE_LOW_PRESSURE; + + return MEMORY_PRESSURE_NO_PRESSURE; +} + +fifo_segment_mem_status_t +fifo_segment_get_mem_status (fifo_segment_t * fs) +{ + fifo_segment_header_t *fsh = fs->h; + u8 usage = fifo_segment_get_mem_usage (fs); + + return fifo_segment_determine_status (fsh, usage); } u8 * @@ -841,24 +1277,24 @@ format_fifo_segment_type (u8 * s, va_list * args) u8 * format_fifo_segment (u8 * s, va_list * args) { + u32 count, indent, active_fifos, free_fifos, fifo_hdr = 0; fifo_segment_t *fs = va_arg (*args, fifo_segment_t *); int verbose __attribute__ ((unused)) = va_arg (*args, int); + uword est_chunk_bytes, est_free_seg_bytes, free_chunks; + uword chunk_bytes = 0, free_seg_bytes, chunk_size; + uword tracked_cached_bytes; fifo_segment_header_t *fsh; + fifo_segment_slice_t *fss; svm_fifo_chunk_t *c; - u32 count, indent; - u32 active_fifos; - u32 free_fifos; + u32 slice_index; char *address; size_t size; int i; + uword allocated, in_use, virt; + f64 usage; + fifo_segment_mem_status_t mem_st; indent = format_get_indent (s) + 2; -#if USE_DLMALLOC == 0 - s = format (s, "%U segment heap: %U\n", format_white_space, indent, - format_mheap, svm_fifo_segment_heap (fs), verbose); - s = format (s, "%U segment has %u active fifos\n", - format_white_space, indent, fifo_segment_num_fifos (fs)); -#endif if (fs == 0) { @@ -867,7 +1303,6 @@ format_fifo_segment (u8 * s, va_list * args) return s; } - fsh = fs->h; fifo_segment_info (fs, &address, &size); active_fifos = fifo_segment_num_fifos (fs); free_fifos = fifo_segment_num_free_fifos (fs); @@ -879,25 +1314,69 @@ format_fifo_segment (u8 * s, va_list * args) if (!verbose) return s; - s = format (s, "\n"); - for (i = 0; i < vec_len (fsh->free_chunks); i++) + fsh = fs->h; + + free_chunks = fifo_segment_num_free_chunks (fs, ~0); + if (free_chunks) + s = format (s, "\n\n%UFree chunks by size:\n", format_white_space, + indent + 2); + else + s = format (s, "\n"); + + for (slice_index = 0; slice_index < fs->n_slices; slice_index++) { - c = fsh->free_chunks[i]; - if (c == 0) - continue; - count = 0; - while (c) + fss = fsh_slice_get (fsh, slice_index); + for (i = 0; i < vec_len (fss->free_chunks); i++) { - c = c->next; - count++; - } + c = fss->free_chunks[i]; + if (c == 0) + continue; + count = 0; + while (c) + { + c = c->next; + count++; + } + + chunk_size = fs_freelist_index_to_size (i); + s = format (s, "%U%-5u kB: %u\n", format_white_space, indent + 2, + chunk_size >> 10, count); - s = format (s, "%U%-5u Kb: %u free", format_white_space, indent + 2, - 1 << (i + max_log2 (FIFO_SEGMENT_MIN_FIFO_SIZE) - 10), - count); + chunk_bytes += count * chunk_size; + } } - s = format (s, "%Ufree bytes %U", format_white_space, indent + 2, - format_memory_size, fsh->n_free_bytes); + + fifo_hdr = free_fifos * sizeof (svm_fifo_t); + est_chunk_bytes = fifo_segment_fl_chunk_bytes (fs); + est_free_seg_bytes = fifo_segment_free_bytes (fs); + fifo_segment_update_free_bytes (fs); + free_seg_bytes = fifo_segment_free_bytes (fs); + tracked_cached_bytes = fifo_segment_cached_bytes (fs); + allocated = fifo_segment_size (fs); + in_use = fifo_segment_size (fs) - est_free_seg_bytes - tracked_cached_bytes; + usage = (100.0 * in_use) / allocated; + mem_st = fifo_segment_get_mem_status (fs); + virt = fsh_virtual_mem (fsh); + + s = format (s, "\n%Useg free bytes: %U (%lu) estimated: %U (%lu) reserved:" + " %U (%lu)\n", format_white_space, indent + 2, + format_memory_size, free_seg_bytes, free_seg_bytes, + format_memory_size, est_free_seg_bytes, est_free_seg_bytes, + format_memory_size, fsh->n_reserved_bytes, + fsh->n_reserved_bytes); + s = format (s, "%Uchunk free bytes: %U (%lu) estimated: %U (%lu) tracked:" + " %U (%lu)\n", format_white_space, indent + 2, + format_memory_size, chunk_bytes, chunk_bytes, + format_memory_size, est_chunk_bytes, est_chunk_bytes, + format_memory_size, tracked_cached_bytes, tracked_cached_bytes); + s = format (s, "%Ufifo active: %u hdr free bytes: %U (%u) \n", + format_white_space, indent + 2, fsh->n_active_fifos, + format_memory_size, fifo_hdr, fifo_hdr); + s = format (s, "%Usegment usage: %.2f%% (%U / %U) virt: %U status: %s\n", + format_white_space, indent + 2, usage, format_memory_size, + in_use, format_memory_size, allocated, format_memory_size, virt, + fifo_segment_mem_status_strings[mem_st]); + s = format (s, "\n"); return s; }