Resguardo inicial

This commit is contained in:
lastdragon
2026-09-06 12:53:21 -06:00
parent 662efe3c2a
commit ad2088d178
94853 changed files with 43200404 additions and 0 deletions
@@ -0,0 +1,2 @@
#include "bit-length.h"
#define CONFIG_XARRAY_MULTI 1
@@ -0,0 +1,5 @@
// SPDX-License-Identifier: GPL-2.0
/* Very simple shim around the interval tree. */
#include "../../../lib/interval_tree.c"
+376
View File
@@ -0,0 +1,376 @@
// SPDX-License-Identifier: GPL-2.0
#include <stdlib.h>
#include <string.h>
#include <malloc.h>
#include <pthread.h>
#include <unistd.h>
#include <assert.h>
#include <linux/gfp.h>
#include <linux/poison.h>
#include <linux/slab.h>
#include <linux/radix-tree.h>
#include <urcu/uatomic.h>
int nr_allocated;
int preempt_count;
int test_verbose;
void kmem_cache_set_callback(struct kmem_cache *cachep, void (*callback)(void *))
{
cachep->callback = callback;
}
void kmem_cache_set_private(struct kmem_cache *cachep, void *private)
{
cachep->private = private;
}
void kmem_cache_set_non_kernel(struct kmem_cache *cachep, unsigned int val)
{
cachep->non_kernel = val;
}
unsigned long kmem_cache_get_alloc(struct kmem_cache *cachep)
{
return cachep->size * cachep->nr_allocated;
}
unsigned long kmem_cache_nr_allocated(struct kmem_cache *cachep)
{
return cachep->nr_allocated;
}
unsigned long kmem_cache_nr_tallocated(struct kmem_cache *cachep)
{
return cachep->nr_tallocated;
}
void kmem_cache_zero_nr_tallocated(struct kmem_cache *cachep)
{
cachep->nr_tallocated = 0;
}
void *kmem_cache_alloc_lru(struct kmem_cache *cachep, struct list_lru *lru,
int gfp)
{
void *p;
if (cachep->exec_callback) {
if (cachep->callback)
cachep->callback(cachep->private);
cachep->exec_callback = false;
}
if (!(gfp & __GFP_DIRECT_RECLAIM)) {
if (!cachep->non_kernel) {
if (cachep->callback)
cachep->exec_callback = true;
return NULL;
}
cachep->non_kernel--;
}
pthread_mutex_lock(&cachep->lock);
if (cachep->nr_objs) {
struct radix_tree_node *node = cachep->objs;
cachep->nr_objs--;
cachep->objs = node->parent;
pthread_mutex_unlock(&cachep->lock);
node->parent = NULL;
p = node;
} else {
pthread_mutex_unlock(&cachep->lock);
if (cachep->align) {
if (posix_memalign(&p, cachep->align, cachep->size) < 0)
return NULL;
} else {
p = malloc(cachep->size);
}
if (cachep->ctor)
cachep->ctor(p);
else if (gfp & __GFP_ZERO)
memset(p, 0, cachep->size);
}
uatomic_inc(&cachep->nr_allocated);
uatomic_inc(&nr_allocated);
uatomic_inc(&cachep->nr_tallocated);
if (kmalloc_verbose)
printf("Allocating %p from slab\n", p);
return p;
}
void __kmem_cache_free_locked(struct kmem_cache *cachep, void *objp)
{
assert(objp);
if (cachep->nr_objs > 10 || cachep->align) {
memset(objp, POISON_FREE, cachep->size);
free(objp);
} else {
struct radix_tree_node *node = objp;
cachep->nr_objs++;
node->parent = cachep->objs;
cachep->objs = node;
}
}
void kmem_cache_free_locked(struct kmem_cache *cachep, void *objp)
{
uatomic_dec(&nr_allocated);
uatomic_dec(&cachep->nr_allocated);
if (kmalloc_verbose)
printf("Freeing %p to slab\n", objp);
__kmem_cache_free_locked(cachep, objp);
}
void kmem_cache_free(struct kmem_cache *cachep, void *objp)
{
pthread_mutex_lock(&cachep->lock);
kmem_cache_free_locked(cachep, objp);
pthread_mutex_unlock(&cachep->lock);
}
void kmem_cache_free_bulk(struct kmem_cache *cachep, size_t size, void **list)
{
if (kmalloc_verbose)
pr_debug("Bulk free %p[0-%zu]\n", list, size - 1);
if (cachep->exec_callback) {
if (cachep->callback)
cachep->callback(cachep->private);
cachep->exec_callback = false;
}
pthread_mutex_lock(&cachep->lock);
for (int i = 0; i < size; i++)
kmem_cache_free_locked(cachep, list[i]);
pthread_mutex_unlock(&cachep->lock);
}
void kmem_cache_shrink(struct kmem_cache *cachep)
{
}
bool kmem_cache_alloc_bulk(struct kmem_cache *cachep, gfp_t gfp, size_t size,
void **p)
{
size_t i;
if (kmalloc_verbose)
pr_debug("Bulk alloc %zu\n", size);
pthread_mutex_lock(&cachep->lock);
if (cachep->nr_objs >= size) {
struct radix_tree_node *node;
for (i = 0; i < size; i++) {
if (!(gfp & __GFP_DIRECT_RECLAIM)) {
if (!cachep->non_kernel)
break;
cachep->non_kernel--;
}
node = cachep->objs;
cachep->nr_objs--;
cachep->objs = node->parent;
p[i] = node;
node->parent = NULL;
}
pthread_mutex_unlock(&cachep->lock);
} else {
pthread_mutex_unlock(&cachep->lock);
for (i = 0; i < size; i++) {
if (!(gfp & __GFP_DIRECT_RECLAIM)) {
if (!cachep->non_kernel)
break;
cachep->non_kernel--;
}
if (cachep->align) {
if (posix_memalign(&p[i], cachep->align,
cachep->size) < 0)
break;
} else {
p[i] = malloc(cachep->size);
if (!p[i])
break;
}
if (cachep->ctor)
cachep->ctor(p[i]);
else if (gfp & __GFP_ZERO)
memset(p[i], 0, cachep->size);
}
}
if (i < size) {
size = i;
pthread_mutex_lock(&cachep->lock);
for (i = 0; i < size; i++)
__kmem_cache_free_locked(cachep, p[i]);
pthread_mutex_unlock(&cachep->lock);
if (cachep->callback)
cachep->exec_callback = true;
return false;
}
for (i = 0; i < size; i++) {
uatomic_inc(&nr_allocated);
uatomic_inc(&cachep->nr_allocated);
uatomic_inc(&cachep->nr_tallocated);
if (kmalloc_verbose)
printf("Allocating %p from slab\n", p[i]);
}
return true;
}
struct kmem_cache *
__kmem_cache_create_args(const char *name, unsigned int size,
struct kmem_cache_args *args,
unsigned int flags)
{
struct kmem_cache *ret = malloc(sizeof(*ret));
pthread_mutex_init(&ret->lock, NULL);
ret->size = size;
ret->align = args->align;
ret->sheaf_capacity = args->sheaf_capacity;
ret->nr_objs = 0;
ret->nr_allocated = 0;
ret->nr_tallocated = 0;
ret->objs = NULL;
ret->ctor = args->ctor;
ret->non_kernel = 0;
ret->exec_callback = false;
ret->callback = NULL;
ret->private = NULL;
return ret;
}
struct slab_sheaf *
kmem_cache_prefill_sheaf(struct kmem_cache *s, gfp_t gfp, unsigned int size)
{
struct slab_sheaf *sheaf;
unsigned int capacity;
if (s->exec_callback) {
if (s->callback)
s->callback(s->private);
s->exec_callback = false;
}
capacity = max(size, s->sheaf_capacity);
sheaf = calloc(1, sizeof(*sheaf) + sizeof(void *) * capacity);
if (!sheaf)
return NULL;
sheaf->cache = s;
sheaf->capacity = capacity;
sheaf->size = size;
if (!kmem_cache_alloc_bulk(s, gfp, size, sheaf->objects)) {
free(sheaf);
return NULL;
}
return sheaf;
}
int kmem_cache_refill_sheaf(struct kmem_cache *s, gfp_t gfp,
struct slab_sheaf **sheafp, unsigned int size)
{
struct slab_sheaf *sheaf = *sheafp;
if (sheaf->size >= size)
return 0;
if (size > sheaf->capacity) {
sheaf = kmem_cache_prefill_sheaf(s, gfp, size);
if (!sheaf)
return -ENOMEM;
kmem_cache_return_sheaf(s, gfp, *sheafp);
*sheafp = sheaf;
return 0;
}
if (!kmem_cache_alloc_bulk(s, gfp, size - sheaf->size,
&sheaf->objects[sheaf->size]))
return -ENOMEM;
sheaf->size = size;
return 0;
}
void kmem_cache_return_sheaf(struct kmem_cache *s, gfp_t gfp,
struct slab_sheaf *sheaf)
{
if (sheaf->size)
kmem_cache_free_bulk(s, sheaf->size, &sheaf->objects[0]);
free(sheaf);
}
void *
kmem_cache_alloc_from_sheaf(struct kmem_cache *s, gfp_t gfp,
struct slab_sheaf *sheaf)
{
void *obj;
if (sheaf->size == 0) {
printf("Nothing left in sheaf!\n");
return NULL;
}
obj = sheaf->objects[--sheaf->size];
sheaf->objects[sheaf->size] = NULL;
return obj;
}
/*
* Test the test infrastructure for kem_cache_alloc/free and bulk counterparts.
*/
void test_kmem_cache_bulk(void)
{
int i;
void *list[12];
static struct kmem_cache *test_cache, *test_cache2;
/*
* Testing the bulk allocators without aligned kmem_cache to force the
* bulk alloc/free to reuse
*/
test_cache = kmem_cache_create("test_cache", 256, 0, SLAB_PANIC, NULL);
for (i = 0; i < 5; i++)
list[i] = kmem_cache_alloc(test_cache, __GFP_DIRECT_RECLAIM);
for (i = 0; i < 5; i++)
kmem_cache_free(test_cache, list[i]);
assert(test_cache->nr_objs == 5);
kmem_cache_alloc_bulk(test_cache, __GFP_DIRECT_RECLAIM, 5, list);
kmem_cache_free_bulk(test_cache, 5, list);
for (i = 0; i < 12 ; i++)
list[i] = kmem_cache_alloc(test_cache, __GFP_DIRECT_RECLAIM);
for (i = 0; i < 12; i++)
kmem_cache_free(test_cache, list[i]);
/* The last free will not be kept around */
assert(test_cache->nr_objs == 11);
/* Aligned caches will immediately free */
test_cache2 = kmem_cache_create("test_cache2", 128, 128, SLAB_PANIC, NULL);
kmem_cache_alloc_bulk(test_cache2, __GFP_DIRECT_RECLAIM, 10, list);
kmem_cache_free_bulk(test_cache2, 10, list);
assert(!test_cache2->nr_objs);
}
@@ -0,0 +1,2 @@
#include <stdio.h>
#include "asm/bug.h"
@@ -0,0 +1,2 @@
/* SPDX-License-Identifier: GPL-2.0 */
#include "../../../../include/linux/cleanup.h"
@@ -0,0 +1 @@
#define cpuhp_setup_state_nocalls(a, b, c, d) (0)
@@ -0,0 +1,5 @@
/* Avoid duplicate definitions due to system headers. */
#ifdef __CONCAT
#undef __CONCAT
#endif
#include "../../../../include/linux/idr.h"
@@ -0,0 +1,7 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _TEST_INTERVAL_TREE_H
#define _TEST_INTERVAL_TREE_H
#include "../../../../include/linux/interval_tree.h"
#endif /* _TEST_INTERVAL_TREE_H */
@@ -0,0 +1,2 @@
/* SPDX-License-Identifier: GPL-2.0 */
#include "../../../../include/linux/interval_tree_generic.h"
@@ -0,0 +1 @@
#include "../../../../include/linux/kconfig.h"
@@ -0,0 +1,25 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _KERNEL_H
#define _KERNEL_H
#include "../../include/linux/kernel.h"
#include <string.h>
#include <stdio.h>
#include <limits.h>
#include <linux/compiler.h>
#include <linux/err.h>
#include <linux/bitops.h>
#include <linux/log2.h>
#include "../../../include/linux/kconfig.h"
#define printk printf
#define pr_err printk
#define pr_info printk
#define pr_debug printk
#define pr_cont printk
#define schedule()
#define PAGE_SHIFT 12
#define EXPORT_PER_CPU_SYMBOL_GPL(x)
#endif /* _KERNEL_H */
@@ -0,0 +1 @@
static inline void kmemleak_update_trace(const void *ptr) { }
@@ -0,0 +1,8 @@
#ifndef _LINUX_LOCAL_LOCK
#define _LINUX_LOCAL_LOCK
typedef struct { } local_lock_t;
static inline void local_lock(local_lock_t *lock) { }
static inline void local_unlock(local_lock_t *lock) { }
#define INIT_LOCAL_LOCK(x) { }
#endif
@@ -0,0 +1,16 @@
#ifndef _LINUX_LOCKDEP_H
#define _LINUX_LOCKDEP_H
#include <linux/spinlock.h>
struct lock_class_key {
unsigned int a;
};
static inline void lockdep_set_class(spinlock_t *lock,
struct lock_class_key *key)
{
}
extern int lockdep_is_held(const void *);
#endif /* _LINUX_LOCKDEP_H */
@@ -0,0 +1,5 @@
/* SPDX-License-Identifier: GPL-2.0+ */
#include <linux/atomic.h>
#define U8_MAX UCHAR_MAX
#include "../../../../include/linux/maple_tree.h"
@@ -0,0 +1,11 @@
/* SPDX-License-Identifier: GPL-2.0 */
#define DECLARE_PER_CPU(type, val) extern type val
#define DEFINE_PER_CPU(type, val) type val
#define __get_cpu_var(var) var
#define this_cpu_ptr(var) var
#define this_cpu_read(var) var
#define this_cpu_xchg(var, val) uatomic_xchg(&var, val)
#define this_cpu_cmpxchg(var, old, new) uatomic_cmpxchg(&var, old, new)
#define per_cpu_ptr(ptr, cpu) ({ (void)(cpu); (ptr); })
#define per_cpu(var, cpu) (*per_cpu_ptr(&(var), cpu))
@@ -0,0 +1,15 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef __LINUX_PREEMPT_H
#define __LINUX_PREEMPT_H
extern int preempt_count;
#define preempt_disable() uatomic_inc(&preempt_count)
#define preempt_enable() uatomic_dec(&preempt_count)
static inline int in_interrupt(void)
{
return 0;
}
#endif /* __LINUX_PREEMPT_H */
@@ -0,0 +1,26 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _TEST_RADIX_TREE_H
#define _TEST_RADIX_TREE_H
#include "../../../../include/linux/radix-tree.h"
extern int kmalloc_verbose;
extern int test_verbose;
static inline void trace_call_rcu(struct rcu_head *head,
void (*func)(struct rcu_head *head))
{
if (kmalloc_verbose)
printf("Delaying free of %p to slab\n", (char *)head -
offsetof(struct radix_tree_node, rcu_head));
call_rcu(head, func);
}
#define printv(verbosity_level, fmt, ...) \
if(test_verbose >= verbosity_level) \
printf(fmt, ##__VA_ARGS__)
#undef call_rcu
#define call_rcu(x, y) trace_call_rcu(x, y)
#endif /* _TEST_RADIX_TREE_H */
@@ -0,0 +1,8 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _TEST_RBTREE_H
#define _TEST_RBTREE_H
#include <linux/kernel.h>
#include "../../../../include/linux/rbtree.h"
#endif /* _TEST_RBTREE_H */
@@ -0,0 +1,7 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _TEST_RBTREE_AUGMENTED_H
#define _TEST_RBTREE_AUGMENTED_H
#include "../../../../include/linux/rbtree_augmented.h"
#endif /* _TEST_RBTREE_AUGMENTED_H */
@@ -0,0 +1,8 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _TEST_RBTREE_TYPES_H
#define _TEST_RBTREE_TYPES_H
#include "../../../../include/linux/rbtree_types.h"
#endif /* _TEST_RBTREE_TYPES_H */
@@ -0,0 +1,12 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _RCUPDATE_H
#define _RCUPDATE_H
#include <urcu.h>
#define rcu_dereference_raw(p) rcu_dereference(p)
#define rcu_dereference_protected(p, cond) rcu_dereference(p)
#define rcu_dereference_check(p, cond) rcu_dereference(p)
#define RCU_INIT_POINTER(p, v) do { (p) = (v); } while (0)
#endif
@@ -0,0 +1,2 @@
#include "generated/map-shift.h"
#include "../../../../include/linux/xarray.h"
@@ -0,0 +1,24 @@
/* SPDX-License-Identifier: GPL-2.0+ */
#ifndef __MAPLE_SHARED_H__
#define __MAPLE_SHARED_H__
#define CONFIG_DEBUG_MAPLE_TREE
#define CONFIG_MAPLE_SEARCH
#define MAPLE_32BIT (MAPLE_NODE_SLOTS > 31)
#include "shared.h"
#include <stdlib.h>
#include <time.h>
#include "linux/init.h"
void maple_rcu_cb(struct rcu_head *head);
#define rcu_cb maple_rcu_cb
#define kfree_rcu(_struct, _memb) \
do { \
typeof(_struct) _p_struct = (_struct); \
\
call_rcu(&((_p_struct)->_memb), rcu_cb); \
} while(0);
#endif /* __MAPLE_SHARED_H__ */
@@ -0,0 +1,14 @@
// SPDX-License-Identifier: GPL-2.0-or-later
/* Very simple shim around the maple tree. */
#include "maple-shared.h"
#include <linux/slab.h>
#include "../../../lib/maple_tree.c"
void maple_rcu_cb(struct rcu_head *head) {
struct maple_node *node = container_of(head, struct maple_node, rcu);
kmem_cache_free(maple_node_cache, node);
}
@@ -0,0 +1,6 @@
// SPDX-License-Identifier: GPL-2.0
/* Very simple shim around the rbtree. */
#include "../../../lib/rbtree.c"
+37
View File
@@ -0,0 +1,37 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef __SHARED_H__
#define __SHARED_H__
#include <linux/types.h>
#include <linux/bug.h>
#include <linux/kernel.h>
#include <linux/bitops.h>
#include <linux/gfp.h>
#include <linux/rcupdate.h>
#ifndef module_init
#define module_init(x)
#endif
#ifndef module_exit
#define module_exit(x)
#endif
#ifndef MODULE_AUTHOR
#define MODULE_AUTHOR(x)
#endif
#ifndef MODULE_LICENSE
#define MODULE_LICENSE(x)
#endif
#ifndef MODULE_DESCRIPTION
#define MODULE_DESCRIPTION(x)
#endif
#ifndef dump_stack
#define dump_stack() assert(0)
#endif
#endif /* __SHARED_H__ */
@@ -0,0 +1,79 @@
# SPDX-License-Identifier: GPL-2.0
include ../../scripts/Makefile.arch
CFLAGS += -I../shared -I. -I../../include -I../../arch/$(SRCARCH)/include \
-I../../../lib -g -Og -Wall \
-D_LGPL_SOURCE -fsanitize=address -fsanitize=undefined
CFLAGS += $(EXTRA_CFLAGS)
LDFLAGS += -fsanitize=address -fsanitize=undefined
LDLIBS += -lpthread -lurcu
LIBS := slab.o find_bit.o bitmap.o hweight.o vsprintf.o
SHARED_OFILES = xarray-shared.o radix-tree.o idr.o linux.o $(LIBS)
SHARED_DEPS = Makefile ../shared/shared.mk ../shared/*.h generated/map-shift.h \
generated/bit-length.h generated/autoconf.h \
../../include/linux/*.h \
../../include/asm/*.h \
../../arch/$(SRCARCH)/include/asm/*.h \
../../../include/linux/xarray.h \
../../../include/linux/maple_tree.h \
../../../include/linux/radix-tree.h \
../../../lib/radix-tree.h \
../../../include/linux/idr.h \
../../../lib/maple_tree.c \
../../../lib/test_maple_tree.c
ifndef SHIFT
SHIFT=3
endif
ifeq ($(BUILD), 32)
CFLAGS += -m32
LDFLAGS += -m32
LONG_BIT := 32
endif
ifndef LONG_BIT
LONG_BIT := $(shell getconf LONG_BIT)
endif
%.o: ../shared/%.c
$(CC) -c $(CFLAGS) $< -o $@
vpath %.c ../../lib
$(SHARED_OFILES): $(SHARED_DEPS)
radix-tree.c: ../../../lib/radix-tree.c
sed -e 's/^static //' -e 's/__always_inline //' -e 's/inline //' < $< > $@
idr.c: ../../../lib/idr.c
sed -e 's/^static //' -e 's/__always_inline //' -e 's/inline //' < $< > $@
xarray-shared.o: ../shared/xarray-shared.c ../../../lib/xarray.c \
../../../lib/test_xarray.c
maple-shared.o: ../shared/maple-shared.c ../../../lib/maple_tree.c \
../../../lib/test_maple_tree.c
generated/autoconf.h:
@mkdir -p generated
cp ../shared/autoconf.h generated/autoconf.h
generated/map-shift.h:
@mkdir -p generated
@if ! grep -qws $(SHIFT) generated/map-shift.h; then \
echo "Generating $@"; \
echo "#define XA_CHUNK_SHIFT $(SHIFT)" > \
generated/map-shift.h; \
fi
generated/bit-length.h: FORCE
@mkdir -p generated
@if ! grep -qws CONFIG_$(LONG_BIT)BIT generated/bit-length.h; then \
echo "Generating $@"; \
echo "#define CONFIG_$(LONG_BIT)BIT 1" > $@; \
echo "#define CONFIG_PHYS_ADDR_T_$(LONG_BIT)BIT 1" >> $@; \
fi
FORCE: ;
@@ -0,0 +1,5 @@
/* SPDX-License-Identifier: GPL-2.0+ */
#define trace_ma_op(a, b) do {} while (0)
#define trace_ma_read(a, b) do {} while (0)
#define trace_ma_write(a, b, c, d) do {} while (0)
@@ -0,0 +1,5 @@
// SPDX-License-Identifier: GPL-2.0-or-later
#include "xarray-shared.h"
#include "../../../lib/xarray.c"
@@ -0,0 +1,8 @@
/* SPDX-License-Identifier: GPL-2.0+ */
#ifndef __XARRAY_SHARED_H__
#define __XARRAY_SHARED_H__
#define XA_DEBUG
#include "shared.h"
#endif /* __XARRAY_SHARED_H__ */