use alloc::collections::btree_map::BTreeMap;
use core::ops::Range;
use crate::{
prelude::*,
sync::{PreemptDisabled, SpinLock, SpinLockGuard},
Error,
};
pub struct RangeAllocator {
fullrange: Range<usize>,
freelist: SpinLock<Option<BTreeMap<usize, FreeRange>>>,
}
impl RangeAllocator {
pub const fn new(fullrange: Range<usize>) -> Self {
Self {
fullrange,
freelist: SpinLock::new(None),
}
}
pub const fn fullrange(&self) -> &Range<usize> {
&self.fullrange
}
pub fn alloc_specific(&self, allocate_range: &Range<usize>) -> Result<()> {
debug_assert!(allocate_range.start < allocate_range.end);
let mut lock_guard = self.get_freelist_guard();
let freelist = lock_guard.as_mut().unwrap();
let mut target_node = None;
let mut left_length = 0;
let mut right_length = 0;
for (key, value) in freelist.iter() {
if value.block.end >= allocate_range.end && value.block.start <= allocate_range.start {
target_node = Some(*key);
left_length = allocate_range.start - value.block.start;
right_length = value.block.end - allocate_range.end;
break;
}
}
if let Some(key) = target_node {
if left_length == 0 {
freelist.remove(&key);
} else if let Some(freenode) = freelist.get_mut(&key) {
freenode.block.end = allocate_range.start;
}
if right_length != 0 {
freelist.insert(
allocate_range.end,
FreeRange::new(allocate_range.end..(allocate_range.end + right_length)),
);
}
}
if target_node.is_some() {
Ok(())
} else {
Err(Error::KVirtAreaAllocError)
}
}
pub fn alloc(&self, size: usize) -> Result<Range<usize>> {
let mut lock_guard = self.get_freelist_guard();
let freelist = lock_guard.as_mut().unwrap();
let mut allocate_range = None;
let mut to_remove = None;
for (key, value) in freelist.iter() {
if value.block.end - value.block.start >= size {
allocate_range = Some((value.block.end - size)..value.block.end);
to_remove = Some(*key);
break;
}
}
if let Some(key) = to_remove {
if let Some(freenode) = freelist.get_mut(&key) {
if freenode.block.end - size == freenode.block.start {
freelist.remove(&key);
} else {
freenode.block.end -= size;
}
}
}
if let Some(range) = allocate_range {
Ok(range)
} else {
Err(Error::KVirtAreaAllocError)
}
}
pub fn free(&self, range: Range<usize>) {
let mut lock_guard = self.freelist.lock();
let freelist = lock_guard.as_mut().unwrap_or_else(|| {
panic!("Free a 'KVirtArea' when 'VirtAddrAllocator' has not been initialized.")
});
let mut free_range = range.clone();
if let Some((prev_va, prev_node)) = freelist
.upper_bound_mut(core::ops::Bound::Excluded(&free_range.start))
.peek_prev()
{
if prev_node.block.end == free_range.start {
let prev_va = *prev_va;
free_range.start = prev_node.block.start;
freelist.remove(&prev_va);
}
}
freelist.insert(free_range.start, FreeRange::new(free_range.clone()));
if let Some((next_va, next_node)) = freelist
.lower_bound_mut(core::ops::Bound::Excluded(&free_range.start))
.peek_next()
{
if free_range.end == next_node.block.start {
let next_va = *next_va;
free_range.end = next_node.block.end;
freelist.remove(&next_va);
freelist.get_mut(&free_range.start).unwrap().block.end = free_range.end;
}
}
}
fn get_freelist_guard(
&self,
) -> SpinLockGuard<Option<BTreeMap<usize, FreeRange>>, PreemptDisabled> {
let mut lock_guard = self.freelist.lock();
if lock_guard.is_none() {
let mut freelist: BTreeMap<usize, FreeRange> = BTreeMap::new();
freelist.insert(self.fullrange.start, FreeRange::new(self.fullrange.clone()));
*lock_guard = Some(freelist);
}
lock_guard
}
}
struct FreeRange {
block: Range<usize>,
}
impl FreeRange {
const fn new(range: Range<usize>) -> Self {
Self { block: range }
}
}