//
// Created by stefan on 18.06.20.
//

#include "slotmap.h"
#include <stdio.h>

#define intptr_t __intptr_t

smHeader smInit(smEntry * slab, size_t size) {
    for (int i = 0; i < size; ++i) {
        slab[i].value = (__intptr_t)NULL;
    }
    return (smHeader){.slab = slab, .size=size};
}
int smInsert(smHeader const * header, void * value) {
    for (size_t i = 0; i< header->size; ++i ) {
        _Atomic(long) ptr = atomic_load(&header->slab[i].value);
        if((void *)ptr == NULL) {
            __intptr_t expected = (__intptr_t) NULL;
            if(atomic_compare_exchange_strong(&header->slab[i].value, &expected, (__intptr_t) value)){
                return 0;
            }
        }
    }
    return -1;
}
void smDelete(smEntry * node) {
    __intptr_t oldval = atomic_exchange(&node->value, (intptr_t)(NULL));
    if((void *) oldval == NULL) {
        fprintf(stderr, "A Node has been double deleted");
    }
}
void smDeleteValue(smHeader const * header, void * value){
    for (size_t i = 0; i< header->size; ++i ) {
        intptr_t ptr = atomic_load(&header->slab[i].value);
        if((void *)ptr == value) {
            smDelete(&header->slab[i]);
        }
    }
}
smEntry *smFindEntry(smHeader const * header, SearchFunction func){
    for (size_t i = 0; i< header->size; ++i ) {
        void * value = (void *) atomic_load(&header->slab[i].value);

        if(value != NULL && func(value)) {
            return &header->slab[i];
        }
    }
    return NULL;
}