- Kernel sf_realloc() is a real realloc (copy min(old,new) via new kmalloc_usable_size(), free old, NULL-on-0 frees). It allocated fresh and nothing else: every growth leaked, and vm_state_push()'s call-state stack lost every saved state past depth 8 (found here). - Shim realloc() copies min(old,new) (over-read when growing). - Defect 9: FC bucket growth no longer leaks or patches a copy; no sf_xrealloc() (freed a block the index still held on failure). - Defect 5: heat snapshot heap-sized (was heats[1024], truncating). - Defect 6: word refused whole when its metrics can't be allocated. - Defect 7: vm_cleanup() (both) frees metrics' inner arrays. - Defect 8: most-likely-next kept incrementally; no full id scan. - Probe (removed): realloc keeps contents, heap returns exactly; call stack depth 20 intact; all three ISAs. Churn criterion NOT met: ~7 KB retained per churned VM (quota slots/word rows -- K-4 re-measures); a post-churn CONSOLE-CMD refusal attributed to the quota leak, K-4 retests. - Standard sequence on amd64/aarch64/riscv64: hashes, G, ledger unchanged. Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
91 lines
3.3 KiB
C
91 lines
3.3 KiB
C
/*
|
||
StarForth — Steady-State Virtual Machine Runtime
|
||
|
||
Copyright (c) 2023–2025 Robert A. James
|
||
All rights reserved.
|
||
|
||
This file is part of the StarForth project.
|
||
|
||
Licensed under the StarForth License, Version 1.0 (the "License");
|
||
you may not use this file except in compliance with the License.
|
||
|
||
You may obtain a copy of the License at:
|
||
https://github.com/star.4th@proton.me/StarForth/LICENSE.txt
|
||
|
||
This software is provided "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||
express or implied, including but not limited to the warranties of
|
||
merchantability, fitness for a particular purpose, and noninfringement.
|
||
|
||
See the License for the specific language governing permissions and
|
||
limitations under the License.
|
||
|
||
StarForth — Steady-State Virtual Machine Runtime
|
||
Copyright (c) 2023–2025 Robert A. James
|
||
All rights reserved.
|
||
|
||
This file is part of the StarForth project.
|
||
|
||
Licensed under the StarForth License, Version 1.0 (the "License");
|
||
you may not use this file except in compliance with the License.
|
||
|
||
You may obtain a copy of the License at:
|
||
https://github.com/star.4th@proton.me/StarForth/LICENSE.txt
|
||
|
||
This software is provided "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||
express or implied, including but not limited to the warranties of
|
||
merchantability, fitness for a particular purpose, and noninfringement.
|
||
|
||
See the License for the specific language governing permissions and
|
||
limitations under the License.
|
||
|
||
*/
|
||
|
||
/**
|
||
* kmalloc.h - Kernel heap allocator interface
|
||
*/
|
||
|
||
#ifndef STARKERNEL_KMALLOC_H
|
||
#define STARKERNEL_KMALLOC_H
|
||
|
||
#include <stddef.h>
|
||
#include <stdint.h>
|
||
|
||
typedef struct {
|
||
uint64_t total_bytes;
|
||
uint64_t used_bytes;
|
||
uint64_t peak_bytes;
|
||
uint64_t free_bytes;
|
||
} kmalloc_stats_t;
|
||
|
||
int kmalloc_init(uint64_t heap_size_bytes);
|
||
int kmalloc_is_initialized(void);
|
||
void *kmalloc(size_t size);
|
||
void *kmalloc_aligned(size_t size, size_t align);
|
||
void kfree(void *ptr);
|
||
|
||
/* FABRIC-3.10.8 K-1: the size ptr was allocated with, or 0 if ptr isn't a
|
||
* live allocation from this heap. */
|
||
size_t kmalloc_usable_size(const void *ptr);
|
||
kmalloc_stats_t kmalloc_get_stats(void);
|
||
uintptr_t kmalloc_heap_base_addr(void);
|
||
uintptr_t kmalloc_heap_end_addr(void);
|
||
|
||
/* Debug/diagnostic probe -- free-list census (largest free block, count of
|
||
free blocks, count of allocated blocks, total blocks). Kept as permanent
|
||
infrastructure (FABRIC-3.md SXIII, 2026-09-10): a cheap O(n) walk over
|
||
the free list, useful for any future heap-shape investigation, not just
|
||
the one that introduced it. Not called anywhere in the normal boot path
|
||
today -- callers add their own log_message() call sites when debugging. */
|
||
void kmalloc_debug_census(size_t *out_largest_free, size_t *out_free_count,
|
||
size_t *out_used_count, size_t *out_total_blocks);
|
||
|
||
/* Same precedent as kmalloc_debug_census() above -- sum of free-block bytes
|
||
and used-block bytes across the whole free list. The pairing of the two
|
||
(block-count census + byte-sum census) is what let FABRIC-3.md SXIII tell
|
||
real heap corruption apart from ordinary fragmentation: fragmentation
|
||
grows free_count while total_free_bytes stays flat; corruption drops
|
||
both together. */
|
||
void kmalloc_debug_census_bytes(size_t *out_total_free_bytes, size_t *out_total_used_bytes);
|
||
|
||
#endif /* STARKERNEL_KMALLOC_H */
|