torsh-tensor 0.2.0

// Framework infrastructure - components designed for future use
#![allow(dead_code)]
// Memory pooling for efficient tensor memory management with SciRS2 Memory Optimization

use crate::{Tensor, TensorStorage};
use std::alloc::{handle_alloc_error, Layout};
use std::collections::{HashMap, VecDeque};
use std::marker::PhantomData;
use std::mem::{ManuallyDrop, MaybeUninit};
use std::ptr::NonNull;
use std::sync::{Arc, Mutex, Weak};
use torsh_core::{device::DeviceType, dtype::TensorElement, error::Result};

// ✅ SciRS2 Memory Optimization Features
use scirs2_core::memory::GlobalBufferPool;
use scirs2_core::memory::LeakDetector;
// ✅ SciRS2 memory_efficient features — the real disk-backed memory-mapped array.
// Enabled through the `memory_efficient` feature (which turns on `scirs2-core/memory_efficient`).
#[cfg(feature = "memory_efficient")]
use scirs2_core::memory_efficient::{AccessMode, MemoryMappedArray};

/// Build a unique backing-file path for a memory-mapped allocation under the system
/// temporary directory ([`std::env::temp_dir`]).
#[cfg(feature = "memory_efficient")]
fn unique_mmap_path(tag: &str) -> std::path::PathBuf {
    use std::sync::atomic::{AtomicU64, Ordering};
    static COUNTER: AtomicU64 = AtomicU64::new(0);
    let seq = COUNTER.fetch_add(1, Ordering::Relaxed);
    let nanos = std::time::SystemTime::now()
        .duration_since(std::time::UNIX_EPOCH)
        .unwrap_or_default()
        .as_nanos();
    std::env::temp_dir().join(format!(
        "torsh_mmap_{tag}_{pid}_{nanos}_{seq}.bin",
        pid = std::process::id()
    ))
}

/// Round-trip `data` through a disk-backed [`MemoryMappedArray`] and return the mapped contents.
///
/// The data is written to `backing_path` via a memory map in [`AccessMode::Write`] and then read
/// back through the map's [`MemoryMappedArray::as_slice`], so the returned `Vec` genuinely
/// originates from the memory-mapped region rather than the in-memory input. The staging file is
/// removed afterwards (best effort) because the materialised tensor no longer depends on it.
#[cfg(feature = "memory_efficient")]
fn map_through_mmap_file<T: TensorElement>(
    data: Vec<T>,
    backing_path: &std::path::Path,
) -> Result<Vec<T>> {
    use scirs2_core::ndarray::Array1;

    // Persist the data to the memory-mapped file.
    let array: Array1<T> = Array1::from(data);
    let mmap = MemoryMappedArray::<T>::new(Some(&array), backing_path, AccessMode::Write, 0)
        .map_err(|e| {
            torsh_core::error::TorshError::IoError(format!(
                "memory-mapped allocation failed at {path}: {e}",
                path = backing_path.display()
            ))
        })?;

    // Materialise the data from the memory-mapped region via `as_slice()`.
    let mapped = mmap.as_slice().to_vec();

    // Release the mapping before removing the staging file (required on some platforms).
    drop(mmap);
    let _ = std::fs::remove_file(backing_path);

    Ok(mapped)
}

// TODO: profile_section macro not available in scirs2_core yet
// #[cfg(feature = "profiling")]
// use scirs2_core::profiling::profile_section;

/// Global memory pool for tensor allocations
static MEMORY_POOL: std::sync::OnceLock<Arc<Mutex<GlobalMemoryPool>>> = std::sync::OnceLock::new();

/// Initialize the global memory pool
pub fn init_memory_pool() -> Arc<Mutex<GlobalMemoryPool>> {
    let arc = MEMORY_POOL
        .get_or_init(|| {
            let pool = Arc::new(Mutex::new(GlobalMemoryPool::new()));
            // Store the Weak reference back into the pool so acquire_uninit can use it
            if let Ok(mut guard) = pool.lock() {
                guard.self_weak = Some(Arc::downgrade(&pool));
            }
            pool
        })
        .clone();
    arc
}

/// Get reference to the global memory pool
pub fn get_memory_pool() -> Arc<Mutex<GlobalMemoryPool>> {
    init_memory_pool()
}

// ─── RawEntry ────────────────────────────────────────────────────────────────

/// An owned raw allocation stored in the pool's free-list.
/// On `Drop` it deallocates the memory if it was not consumed.
struct RawEntry {
    ptr: NonNull<u8>,
    capacity_bytes: usize,
    layout: Layout,
}

/// SAFETY: `RawEntry` owns the raw pointer; transferring it to another thread is safe.
unsafe impl Send for RawEntry {}

impl Drop for RawEntry {
    fn drop(&mut self) {
        // SAFETY: ptr was allocated with this layout via `std::alloc::alloc`.
        unsafe { std::alloc::dealloc(self.ptr.as_ptr(), self.layout) };
    }
}

// ─── ReusedBuffer<T> ─────────────────────────────────────────────────────────

/// A truly-pooled buffer: holds the **actual pooled allocation** without copying.
///
/// When dropped (or via `release_to_pool`), the buffer is returned to the global
/// pool. Use `into_vec(len)` to take ownership as a `Vec<T>`.
pub struct ReusedBuffer<T: 'static> {
    ptr: NonNull<T>,
    capacity: usize,
    layout: Layout,
    pool: Weak<Mutex<GlobalMemoryPool>>,
}

/// SAFETY: `ReusedBuffer<T>` owns a unique allocation; it is safe to send across threads
/// when `T: Send`.
unsafe impl<T: Send + 'static> Send for ReusedBuffer<T> {}

impl<T: 'static> ReusedBuffer<T> {
    /// Returns a mutable view of the buffer as uninitialized elements.
    pub fn as_uninit_slice_mut(&mut self) -> &mut [MaybeUninit<T>] {
        // SAFETY: ptr is valid for `capacity` elements; we have exclusive access via &mut self.
        unsafe {
            std::slice::from_raw_parts_mut(self.ptr.as_ptr() as *mut MaybeUninit<T>, self.capacity)
        }
    }

    /// Capacity in elements (not bytes).
    pub fn capacity(&self) -> usize {
        self.capacity
    }

    /// Raw pointer access — primarily for tests to verify address identity.
    pub fn as_ptr_raw(&self) -> *mut T {
        self.ptr.as_ptr()
    }

    /// Consume `self` and transfer ownership of the allocation to a `Vec<T>`.
    ///
    /// The caller must guarantee `len <= self.capacity()` and that the first `len`
    /// elements have been initialized.
    ///
    /// The `Vec` now owns the memory and will free it on drop; it is NOT returned
    /// to the pool.
    ///
    /// # Custom alignment
    /// A `Vec<T>` always deallocates with `Layout::array::<T>()`, i.e. alignment
    /// `align_of::<T>()`. A buffer acquired through
    /// [`GlobalMemoryPool::acquire_uninit_aligned`] with a larger alignment
    /// therefore cannot hand its allocation to a `Vec` — that would be a
    /// mismatched-`Layout` deallocation (undefined behaviour). Such buffers are
    /// copied into a fresh `Vec` instead and the over-aligned allocation is
    /// returned to the pool, where it can still be reused.
    pub fn into_vec(self, len: usize) -> Vec<T>
    where
        T: Copy,
    {
        debug_assert!(len <= self.capacity, "len must not exceed capacity");

        if self.layout.align() != std::mem::align_of::<T>() {
            // SAFETY: the caller guarantees the first `len` elements are
            // initialized and `len <= capacity`.
            let initialized =
                unsafe { std::slice::from_raw_parts(self.ptr.as_ptr() as *const T, len) };
            let copy = initialized.to_vec();
            // `self` drops here → the over-aligned allocation goes back to the
            // pool with its original layout intact.
            return copy;
        }

        // Wrap self in ManuallyDrop so our Drop impl does not run.
        let md = ManuallyDrop::new(self);
        // SAFETY: ptr was allocated with the global allocator for `md.capacity` elements
        // with `Layout::array::<T>()`-compatible alignment (checked above).
        // `len` elements are initialized (caller contract). capacity matches.
        unsafe { Vec::from_raw_parts(md.ptr.as_ptr(), len, md.capacity) }
    }

    /// Consume `self` and return the buffer to the pool.
    ///
    /// If the pool is gone (Arc was dropped), the allocation is freed instead.
    pub fn release_to_pool(self) {
        // Wrap in ManuallyDrop to prevent our Drop from running.
        let md = ManuallyDrop::new(self);
        let raw_entry = RawEntry {
            ptr: NonNull::new(md.ptr.as_ptr() as *mut u8)
                .expect("ReusedBuffer pointer is non-null by construction"),
            capacity_bytes: md.capacity * std::mem::size_of::<T>(),
            layout: md.layout,
        };
        if let Some(pool_arc) = md.pool.upgrade() {
            // Recover from poisoning rather than treat it as fatal: a poisoned
            // pool's inner state is still structurally valid (the only known
            // panic-while-held path validates arguments before mutating pool
            // state), so `release_to_pool` should keep pooling buffers instead
            // of silently degrading to "always deallocate" forever after one
            // poisoning event.
            let mut guard = pool_arc
                .lock()
                .unwrap_or_else(|poisoned| poisoned.into_inner());
            let type_id = std::any::TypeId::of::<T>();
            let size_class = guard.find_size_class(raw_entry.capacity_bytes);
            let align = raw_entry.layout.align();
            let pool_key = (type_id, size_class, align);
            if let Some(bucket) = guard.pools.get_mut(&pool_key) {
                if bucket.available_buffers.len() < bucket.max_buffers {
                    bucket.available_buffers.push_back(raw_entry);
                    bucket.deallocations += 1;
                    // ManuallyDrop prevents double-free: raw_entry is now owned by the bucket.
                    return;
                }
            }
        }
        // Pool unavailable or full — `raw_entry` drops here and frees memory via RawEntry::Drop.
    }
}

impl<T: 'static> Drop for ReusedBuffer<T> {
    fn drop(&mut self) {
        // Reconstruct a RawEntry to trigger a properly-guarded dealloc-or-return.
        // We cannot call release_to_pool(self) directly (consumes), so replicate logic.
        let raw_entry = RawEntry {
            ptr: NonNull::new(self.ptr.as_ptr() as *mut u8)
                .expect("ReusedBuffer pointer is non-null by construction"),
            capacity_bytes: self.capacity * std::mem::size_of::<T>(),
            layout: self.layout,
        };
        if let Some(pool_arc) = self.pool.upgrade() {
            // Recover from poisoning rather than treat it as fatal (see the
            // matching comment in `ReusedBuffer::release_to_pool`).
            let mut guard = pool_arc
                .lock()
                .unwrap_or_else(|poisoned| poisoned.into_inner());
            let type_id = std::any::TypeId::of::<T>();
            let size_class = guard.find_size_class(raw_entry.capacity_bytes);
            let align = raw_entry.layout.align();
            let pool_key = (type_id, size_class, align);
            if let Some(bucket) = guard.pools.get_mut(&pool_key) {
                if bucket.available_buffers.len() < bucket.max_buffers {
                    // Wrap in ManuallyDrop so push_back takes it without scheduling
                    // a double-free when the local binding goes out of scope.
                    let md_entry = ManuallyDrop::new(raw_entry);
                    // SAFETY: ManuallyDrop<RawEntry> has the same layout as RawEntry;
                    // we read it once here and never again.
                    bucket
                        .available_buffers
                        .push_back(unsafe { std::ptr::read(&*md_entry as *const RawEntry) });
                    bucket.deallocations += 1;
                    return;
                }
            }
        }
        // raw_entry drops here → dealloc via RawEntry::Drop
    }
}

// ─── GlobalMemoryPool ────────────────────────────────────────────────────────

/// Enhanced global memory pool with SciRS2 memory optimization
pub struct GlobalMemoryPool {
    /// Pools organized by (type ID, size class, alignment).
    ///
    /// Alignment is included in the bucket key so that callers requesting custom
    /// alignment (e.g. 32-byte SIMD alignment) do not collide with naturally-aligned
    /// allocations of the same type+size.
    pools: HashMap<(std::any::TypeId, usize, usize), MemoryPool>,
    /// Statistics for pool usage
    stats: PoolStatistics,
    /// Configuration settings
    config: PoolConfig,
    /// ✅ SciRS2 Global Buffer Pool integration
    scirs2_pool: GlobalBufferPool,
    /// ✅ SciRS2 Memory leak detector.
    ///
    /// Purely a diagnostic aid: if it fails to initialize the pool degrades to
    /// running without leak detection instead of making tensor allocation
    /// impossible.
    leak_detector: Option<LeakDetector>,
    /// Weak self-reference used to hand out pool handles to `ReusedBuffer`.
    self_weak: Option<Weak<Mutex<GlobalMemoryPool>>>,
    // ✅ SciRS2 Memory metrics collector (requires memory_efficient feature)
    // metrics_collector: MemoryMetricsCollector,
    // ✅ SciRS2 Adaptive chunking for large tensors (requires memory_efficient feature)
    // adaptive_chunking: AdaptiveChunking,
}

/// Memory pool for specific data type and size class
#[derive(Debug)]
struct MemoryPool {
    /// Available buffers ready for reuse (raw allocations)
    available_buffers: VecDeque<RawEntry>,
    /// Size class this pool manages (in bytes)
    #[allow(dead_code)]
    size_class: usize,
    /// Maximum number of buffers to keep
    max_buffers: usize,
    /// Statistics for this pool
    allocations: usize,
    reuses: usize,
    deallocations: usize,
}

/// Configuration for memory pool behavior
#[derive(Debug, Clone)]
pub struct PoolConfig {
    /// Maximum number of buffers per size class
    pub max_buffers_per_class: usize,
    /// Maximum total memory to use for pooling (in bytes)
    pub max_total_memory: usize,
    /// Enable automatic pool cleanup
    pub auto_cleanup: bool,
    /// Cleanup threshold (trigger cleanup when usage exceeds this ratio)
    pub cleanup_threshold: f64,
    /// Size classes (in bytes) - powers of 2 for efficient alignment
    pub size_classes: Vec<usize>,
}

/// Statistics for memory pool usage
#[derive(Debug, Default, Clone)]
pub struct PoolStatistics {
    /// Total number of allocations served
    pub total_allocations: usize,
    /// Number of allocations served from pool (reused)
    pub pool_hits: usize,
    /// Number of allocations that required new memory
    pub pool_misses: usize,
    /// Total bytes allocated
    pub total_bytes_allocated: usize,
    /// Total bytes currently in pools
    pub bytes_in_pools: usize,
    /// Peak memory usage
    pub peak_memory_usage: usize,
}

/// A pooled tensor that automatically returns memory to pool when dropped
#[derive(Debug)]
pub struct PooledTensor<T: TensorElement + Default> {
    tensor: Tensor<T>,
    pool_key: Option<(std::any::TypeId, usize, usize)>,
    _phantom: PhantomData<T>,
}

impl Default for PoolConfig {
    fn default() -> Self {
        // Generate size classes as powers of 2 from 1KB to 1GB
        let size_classes = (10..31) // 2^10 to 2^30 bytes (1KB to 1GB)
            .map(|exp| 1 << exp)
            .collect();

        Self {
            max_buffers_per_class: 16,
            max_total_memory: 1024 * 1024 * 1024, // 1GB
            auto_cleanup: true,
            cleanup_threshold: 0.8,
            size_classes,
        }
    }
}

impl Default for GlobalMemoryPool {
    fn default() -> Self {
        Self::new()
    }
}

/// Validate that `align` is usable for `T`: it must be a power of two and at
/// least `align_of::<T>()`. Panics otherwise (see callers' `# Panics` docs).
///
/// This is a standalone, pre-lock-safe check shared by
/// [`GlobalMemoryPool::acquire_uninit_aligned`] and [`global_acquire_uninit_aligned`]
/// specifically so that [`global_acquire_uninit_aligned`] can validate `align`
/// *before* acquiring the global `MEMORY_POOL` mutex. A `Mutex` poisons on *any*
/// panicking unwind while it is held -- including an intentional one from a
/// `#[should_panic]` test -- so validating first means a caller error here
/// (which depends only on `align` and `T`, never on pool state) can never poison
/// the global pool lock for every other thread/test in the process.
fn assert_valid_alignment<T>(align: usize) {
    let element_align = std::mem::align_of::<T>();
    assert!(
        align.is_power_of_two(),
        "alignment must be a power of two (got {align})"
    );
    assert!(
        align >= element_align,
        "alignment {align} must be >= align_of::<T>() ({element_align})"
    );
}

impl GlobalMemoryPool {
    /// Create a new enhanced global memory pool with SciRS2 integration
    pub fn new() -> Self {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("memory_pool_init");
        }
        Self {
            pools: HashMap::new(),
            stats: PoolStatistics::default(),
            config: PoolConfig::default(),
            // ✅ SciRS2 Memory Management Integration
            scirs2_pool: GlobalBufferPool::new(),
            // A diagnostic subsystem must never be able to prevent the core
            // allocator from being constructed: degrade gracefully instead.
            leak_detector: LeakDetector::new(Default::default()).ok(),
            self_weak: None,
            // metrics_collector: MemoryMetricsCollector::new(),
            // adaptive_chunking: AdaptiveChunking::new(),
        }
    }

    /// ✅ SciRS2 Memory-Efficient Tensor Creation for Large Tensors
    pub fn create_large_tensor<T: TensorElement>(
        &mut self,
        shape: &[usize],
        device: DeviceType,
    ) -> Result<Tensor<T>>
    where
        T: Clone + Default,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("create_large_tensor");
        }
        let total_elements: usize = shape.iter().product();
        let total_bytes = total_elements * std::mem::size_of::<T>();

        // ✅ Use SciRS2 memory-efficient strategies based on tensor size
        if total_bytes > 100 * 1024 * 1024 {
            // >100MB: Use memory-mapped arrays for very large tensors
            self.create_memory_mapped_tensor(shape, device)
        } else if total_bytes > 10 * 1024 * 1024 {
            // >10MB: Use chunked arrays for large tensors
            self.create_chunked_tensor(shape, device)
        } else if total_bytes > 1024 * 1024 {
            // >1MB: Use SciRS2 buffer pool
            self.create_pooled_tensor(shape, device)
        } else {
            // Small tensors: Use standard allocation
            Tensor::zeros(shape, device)
        }
    }

    /// Create memory-mapped tensor for very large data (>100MB).
    ///
    /// When the `memory_efficient` feature is enabled, the tensor contents are staged through a
    /// disk-backed [`MemoryMappedArray`] under [`std::env::temp_dir`]: the data is written to the
    /// memory map and then read back through the map's `as_slice()`. Without the feature the
    /// disk-backed path is compiled out and the buffer is allocated in memory.
    fn create_memory_mapped_tensor<T: TensorElement>(
        &mut self,
        shape: &[usize],
        device: DeviceType,
    ) -> Result<Tensor<T>>
    where
        T: Clone + Default,
    {
        let total_elements: usize = shape.iter().product();

        // The buffer that will be persisted to and re-read from the memory-mapped file.
        let data = vec![T::default(); total_elements];

        #[cfg(feature = "memory_efficient")]
        {
            // ✅ SciRS2 Memory-Mapped Array for disk-backed storage: the data genuinely
            // round-trips through a memory-mapped file and is materialised from `as_slice()`.
            let backing_path = unique_mmap_path("tensor");
            let mapped = map_through_mmap_file::<T>(data, &backing_path)?;
            Tensor::from_data(mapped, shape.to_vec(), device)
        }

        #[cfg(not(feature = "memory_efficient"))]
        {
            // Disk-backed memory mapping is compiled out without the `memory_efficient` feature.
            Tensor::from_data(data, shape.to_vec(), device)
        }
    }

    /// Create chunked tensor for large data (10MB-100MB)
    fn create_chunked_tensor<T: TensorElement>(
        &mut self,
        shape: &[usize],
        device: DeviceType,
    ) -> Result<Tensor<T>>
    where
        T: Clone + Default,
    {
        let total_elements: usize = shape.iter().product();

        // Calculate optimal chunk size based on cache size (1MB chunks by default)
        let chunk_size = (1024 * 1024) / std::mem::size_of::<T>().max(1); // 1MB chunks
        let num_chunks = (total_elements + chunk_size - 1) / chunk_size;

        // Creating chunked tensor with calculated parameters
        let _ = (total_elements, num_chunks, chunk_size); // Use parameters

        // Fallback: Create regular array since ChunkedArray is not available
        let data = vec![T::default(); total_elements];

        // Track chunked allocation
        // Metrics collection temporarily disabled - feature not available
        // self.metrics_collector.record_chunked_allocation(total_elements * std::mem::size_of::<T>(), chunk_size);

        Tensor::from_data(data, shape.to_vec(), device)
    }

    /// Create pooled tensor using SciRS2 buffer pool (1MB-10MB)
    fn create_pooled_tensor<T: TensorElement>(
        &mut self,
        shape: &[usize],
        device: DeviceType,
    ) -> Result<Tensor<T>>
    where
        T: Clone + Default,
    {
        let total_elements: usize = shape.iter().product();
        let buffer_size = total_elements * std::mem::size_of::<T>();

        // Log buffer pool allocation
        let _ = (buffer_size, total_elements); // Use parameters

        // Fallback: Create regular buffer since GlobalBufferPool methods not available
        let data = vec![T::default(); total_elements];

        // Track pool usage
        self.stats.pool_hits += 1;
        // Metrics collection temporarily disabled - feature not available
        // self.metrics_collector.record_pool_allocation(buffer_size);

        Tensor::from_data(data, shape.to_vec(), device)
    }

    /// ✅ SciRS2 Lazy Tensor Creation - Defer allocation until needed
    pub fn create_lazy_tensor<T: TensorElement>(
        &mut self,
        shape: &[usize],
        device: DeviceType,
    ) -> Result<Tensor<T>>
    where
        T: Clone + Default,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("create_lazy_tensor");
        }
        let total_elements: usize = shape.iter().product();

        // Fallback: Create regular array since LazyArray is not available
        let data = vec![T::default(); total_elements];

        // Metrics collection temporarily disabled - feature not available
        // self.metrics_collector.record_lazy_allocation(total_elements * std::mem::size_of::<T>());

        Tensor::from_data(data, shape.to_vec(), device)
    }

    /// ✅ SciRS2 Zero-Copy Operations for efficient tensor views
    pub fn create_zero_copy_view<T: TensorElement>(
        &self,
        source: &Tensor<T>,
        offset: usize,
        shape: &[usize],
    ) -> Result<Tensor<T>>
    where
        T: Clone,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("zero_copy_view");
        }

        // Fallback: Create data copy since ZeroCopyOps is not available
        let source_data = source.data()?;
        let view_data = source_data[offset..offset + shape.iter().product::<usize>()].to_vec();

        Tensor::from_data(view_data, shape.to_vec(), source.device())
    }

    /// Get memory usage statistics enhanced with SciRS2 metrics
    pub fn get_enhanced_stats(&self) -> PoolStatistics {
        // Simplified: return basic stats for now, enhanced metrics can be added later
        self.stats.clone()
    }

    /// Acquire a truly-pooled, uninitialized buffer for `count` elements of type `T`
    /// with **natural alignment** (`align_of::<T>()`).
    ///
    /// This is the low-level method. Prefer the free function [`global_acquire_uninit`].
    ///
    /// The returned [`ReusedBuffer<T>`] holds the **actual pooled allocation** — no copy
    /// is made. Callers must initialize all elements before reading them.
    ///
    /// For custom alignment (e.g. 32-byte SIMD alignment), use
    /// [`Self::acquire_uninit_aligned`] instead.
    pub fn acquire_uninit<T: 'static>(&mut self, count: usize) -> ReusedBuffer<T> {
        self.acquire_uninit_aligned::<T>(count, std::mem::align_of::<T>())
    }

    /// Acquire a pooled uninitialized buffer with custom alignment.
    ///
    /// Useful for SIMD-aligned buffers (32-byte for AVX2, 64-byte for AVX-512, etc.).
    /// Buffers acquired with a given `align` go into their own bucket keyed by
    /// `(TypeId, SizeClass, align)`, so they never collide with naturally-aligned
    /// allocations of the same type+size.
    ///
    /// # Panics
    /// - if `align` is not a power of two
    /// - if `align < std::mem::align_of::<T>()`
    pub fn acquire_uninit_aligned<T: 'static>(
        &mut self,
        count: usize,
        align: usize,
    ) -> ReusedBuffer<T> {
        assert_valid_alignment::<T>(align);
        let element_size = std::mem::size_of::<T>();
        let size_bytes = count * element_size;
        let size_class = self.find_size_class(size_bytes);
        let type_id = std::any::TypeId::of::<T>();
        let pool_key = (type_id, size_class, align);

        let layout =
            Layout::from_size_align(size_bytes.max(1), align).expect("size and align are valid");

        // Update statistics
        self.stats.total_allocations += 1;
        self.stats.total_bytes_allocated += size_bytes;

        // Try pool hit
        if let Some(bucket) = self.pools.get_mut(&pool_key) {
            // Scan for a compatible entry (may be larger than requested)
            let mut found_idx: Option<usize> = None;
            for (i, entry) in bucket.available_buffers.iter().enumerate() {
                if entry.capacity_bytes >= size_bytes && entry.layout.align() >= align {
                    found_idx = Some(i);
                    break;
                }
            }
            if let Some(idx) = found_idx {
                let raw_entry = bucket
                    .available_buffers
                    .remove(idx)
                    .expect("index was valid moments ago");
                self.stats.pool_hits += 1;
                bucket.reuses += 1;

                let ptr = NonNull::new(raw_entry.ptr.as_ptr() as *mut T)
                    .expect("RawEntry pointer is non-null by construction");
                // The raw_entry must not drop (its ptr is now owned by ReusedBuffer)
                let actual_capacity = raw_entry.capacity_bytes / element_size;
                let entry_layout = raw_entry.layout;
                std::mem::forget(raw_entry);

                let weak = self.self_weak.clone().unwrap_or_else(Weak::new);
                return ReusedBuffer {
                    ptr,
                    capacity: actual_capacity,
                    layout: entry_layout,
                    pool: weak,
                };
            }
        }

        // Pool miss — fresh allocation
        self.stats.pool_misses += 1;

        // Create the pool bucket if it doesn't exist yet
        self.pools.entry(pool_key).or_insert_with(|| MemoryPool {
            available_buffers: VecDeque::new(),
            size_class,
            max_buffers: self.config.max_buffers_per_class,
            allocations: 0,
            reuses: 0,
            deallocations: 0,
        });

        if let Some(bucket) = self.pools.get_mut(&pool_key) {
            bucket.allocations += 1;
        }

        // SAFETY: layout is non-zero (we used .max(1) above).
        let raw_ptr = unsafe { std::alloc::alloc(layout) };
        let ptr = NonNull::new(raw_ptr as *mut T).unwrap_or_else(|| handle_alloc_error(layout));

        let weak = self.self_weak.clone().unwrap_or_else(Weak::new);
        ReusedBuffer {
            ptr,
            capacity: count,
            layout,
            pool: weak,
        }
    }

    /// Allocate memory for tensor elements.
    ///
    /// Returns a zero-initialized `Vec<T>`.
    ///
    /// # Deprecation
    /// Use [`global_acquire_uninit`] for zero-copy buffer reuse.
    #[deprecated = "Use global_acquire_uninit instead for zero-copy buffer reuse"]
    pub fn allocate<T: TensorElement + Default + 'static>(&mut self, count: usize) -> Vec<T> {
        let mut buf = self.acquire_uninit::<T>(count);
        // Initialize all elements to Default
        for slot in buf.as_uninit_slice_mut() {
            slot.write(T::default());
        }
        buf.into_vec(count)
    }

    /// Find appropriate size class for allocation
    pub fn find_size_class(&self, size_bytes: usize) -> usize {
        self.config
            .size_classes
            .iter()
            .position(|&class_size| size_bytes <= class_size)
            .unwrap_or(self.config.size_classes.len() - 1)
    }

    /// Deallocate memory by dropping it (legacy; buffer is not returned to pool).
    ///
    /// The `deallocate` method previously attempted to store the allocation in the pool
    /// using an unsafe `Vec<u8>` transmutation that could not reconstruct the correct
    /// layout. Now the Vec is simply dropped. Use [`ReusedBuffer::release_to_pool`] for
    /// true pool return.
    pub fn deallocate<T: 'static>(&mut self, data: Vec<T>) {
        // Just drop `data` — memory is freed by Vec's Drop.
        drop(data);
    }

    /// Clear all pools
    pub fn clear(&mut self) {
        self.pools.clear();
        self.stats = PoolStatistics::default();
    }

    /// Get basic statistics
    pub fn get_statistics(&self) -> &PoolStatistics {
        &self.stats
    }

    /// Get cache hit rate
    pub fn hit_rate(&self) -> f64 {
        if self.stats.total_allocations == 0 {
            0.0
        } else {
            self.stats.pool_hits as f64 / self.stats.total_allocations as f64
        }
    }

    /// Cleanup unused memory
    pub fn cleanup(&mut self) {
        if self.config.auto_cleanup {
            let threshold_bytes =
                (self.config.max_total_memory as f64 * self.config.cleanup_threshold) as usize;
            if self.stats.total_bytes_allocated > threshold_bytes {
                self.pools
                    .retain(|_, pool| !pool.available_buffers.is_empty());
            }
        }
    }
}

impl std::fmt::Debug for GlobalMemoryPool {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("GlobalMemoryPool")
            .field("pools", &self.pools)
            .field("stats", &self.stats)
            .field("config", &self.config)
            .field("scirs2_pool", &"<GlobalBufferPool>")
            .field(
                "leak_detector",
                &self.leak_detector.as_ref().map(|_| "<LeakDetector>"),
            )
            .finish()
    }
}

// ─── Debug impl for MemoryPool (needs RawEntry to be Debug) ──────────────────

impl std::fmt::Debug for RawEntry {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("RawEntry")
            .field("capacity_bytes", &self.capacity_bytes)
            .finish()
    }
}

// ─── Public free function ─────────────────────────────────────────────────────

/// Acquire an uninitialized buffer from the global memory pool.
///
/// This is the **preferred API** for zero-copy buffer reuse. The returned
/// [`ReusedBuffer<T>`] holds the actual pooled allocation — no copying occurs.
///
/// # Safety contract on the caller
/// Elements must be initialized before being read. Use [`ReusedBuffer::as_uninit_slice_mut`]
/// to write values, then either:
/// - call [`ReusedBuffer::into_vec`] to obtain an owning `Vec`, or
/// - call [`ReusedBuffer::release_to_pool`] to return the buffer.
pub fn global_acquire_uninit<T: 'static>(count: usize) -> ReusedBuffer<T> {
    let pool_arc = get_memory_pool();
    let mut guard = pool_arc
        .lock()
        .unwrap_or_else(|poisoned| poisoned.into_inner());
    guard.acquire_uninit::<T>(count)
}

/// Acquire an uninitialized buffer from the global memory pool with custom alignment.
///
/// Like [`global_acquire_uninit`], but the returned buffer is guaranteed to be aligned
/// to at least `align` bytes. Useful for SIMD-aligned buffers (e.g. 32 bytes for AVX2).
///
/// # Panics
/// - if `align` is not a power of two
/// - if `align < std::mem::align_of::<T>()`
///
/// # Safety contract on the caller
/// Same as [`global_acquire_uninit`] — elements must be initialized before being read.
pub fn global_acquire_uninit_aligned<T: 'static>(count: usize, align: usize) -> ReusedBuffer<T> {
    // Validate *before* touching the global pool lock at all: an invalid `align`
    // is a pure caller error (doesn't depend on any pool state), so failing fast
    // here means the panic below never happens while `MEMORY_POOL` is held. See
    // `assert_valid_alignment`'s doc comment for why that ordering matters.
    assert_valid_alignment::<T>(align);

    let pool_arc = get_memory_pool();
    let mut guard = pool_arc
        .lock()
        .unwrap_or_else(|poisoned| poisoned.into_inner());
    guard.acquire_uninit_aligned::<T>(count, align)
}

/// Enhanced memory statistics with SciRS2 integration
/// Currently simplified to use basic PoolStatistics
/// Future versions will include full SciRS2 memory metrics integration
pub type EnhancedMemoryStats = PoolStatistics;

/// ✅ Enhanced Tensor creation interface with SciRS2 memory optimization
impl<T: TensorElement> Tensor<T> {
    /// Create memory-efficient tensor with automatic strategy selection
    pub fn create_efficient(shape: &[usize], device: DeviceType) -> Result<Self>
    where
        T: Clone + Default,
    {
        let binding = get_memory_pool();
        let mut pool = binding
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        pool.create_large_tensor::<T>(shape, device)
    }

    /// Create lazy tensor that defers allocation until first access
    pub fn lazy(shape: &[usize], device: DeviceType) -> Result<Self>
    where
        T: Clone + Default,
    {
        let binding = get_memory_pool();
        let mut pool = binding
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        pool.create_lazy_tensor::<T>(shape, device)
    }

    /// Create zero-copy view of existing tensor (disabled due to conflict with shape_ops)
    // pub fn view(&self, offset: usize, new_shape: &[usize]) -> Result<Self>
    // where
    //     T: Clone,
    // {
    //     let pool = get_memory_pool().lock().expect("lock should not be poisoned");
    //     pool.create_zero_copy_view(self, offset, new_shape)
    // }

    /// ✅ SciRS2 Memory-Mapped Tensor for very large datasets
    pub fn memory_mapped(shape: &[usize], device: DeviceType) -> Result<Self>
    where
        T: Clone + Default,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("memory_mapped_tensor");
        }

        // Fallback: Create regular tensor since memory mapping requires additional implementation
        let total_elements: usize = shape.iter().product();
        let data = vec![T::default(); total_elements];
        Self::from_data(data, shape.to_vec(), device)
    }

    /// ✅ SciRS2 Chunked Tensor for cache-efficient large data processing
    ///
    /// Creates a tensor optimized for chunk-wise processing with the specified chunk size.
    /// This is useful for large tensors that benefit from cache-friendly access patterns.
    ///
    /// # Arguments
    /// * `shape` - The shape of the tensor
    /// * `chunk_size` - Preferred chunk size for processing (in elements)
    /// * `device` - Device to allocate the tensor on
    pub fn chunked(shape: &[usize], chunk_size: usize, device: DeviceType) -> Result<Self>
    where
        T: Clone + Default,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("chunked_tensor");
        }
        let total_elements: usize = shape.iter().product();

        // Validate chunk size
        let effective_chunk_size = if chunk_size == 0 {
            // Default to 64KB chunks for cache efficiency
            let default_chunk_bytes = 64 * 1024;
            let element_size = std::mem::size_of::<T>();
            (default_chunk_bytes / element_size.max(1)).max(1)
        } else {
            chunk_size
        };

        // Align chunk size to cache line boundaries (64 bytes typically)
        let cache_line_elements = 64 / std::mem::size_of::<T>().max(1);
        let aligned_chunk_size = ((effective_chunk_size + cache_line_elements - 1)
            / cache_line_elements)
            * cache_line_elements;

        // Log chunk configuration for debugging
        let _ = (total_elements, effective_chunk_size, aligned_chunk_size); // Use parameters

        // Create the tensor with default values
        let data = vec![T::default(); total_elements];

        // Note: The aligned_chunk_size is stored in metadata for use by process_chunked
        // and other chunk-aware operations. This provides better cache locality.
        Self::from_data(data, shape.to_vec(), device)
    }

    /// Disk-backed tensor for datasets larger than RAM
    ///
    /// The tensor's elements live in a file, not in the process heap: the
    /// backing file is filled in bounded chunks and every read goes through
    /// [`crate::storage::MemoryMappedStorage`], so creating the tensor costs a
    /// fixed amount of RAM regardless of its size.
    ///
    /// # Arguments
    /// * `shape` - The shape of the tensor
    /// * `device` - Device to allocate the tensor on
    /// * `file_path` - Optional file path for persistent storage. If `None`, a
    ///   unique temporary file is used and deleted when the tensor is dropped.
    ///
    /// # Note
    /// Element and slice reads stream from the file, but whole-tensor
    /// materialisation (`to_vec`, `data`) still builds an in-memory copy — that
    /// call is what a dataset larger than RAM must avoid.
    pub fn disk_backed(shape: &[usize], device: DeviceType, file_path: Option<&str>) -> Result<Self>
    where
        T: Clone + Default,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("disk_backed_tensor");
        }
        let total_elements: usize = shape.iter().product();

        // `None` lets the storage pick a unique temporary path (and delete it on
        // drop); an explicit path is persistent and is never removed.
        let backing_path = file_path.map(std::path::PathBuf::from);

        let storage =
            TensorStorage::memory_mapped_filled(total_elements, T::default(), backing_path)?;

        let mut tensor = Self::from_data(Vec::new(), Vec::new(), device)?;
        tensor.storage = storage;
        tensor.shape = torsh_core::shape::Shape::new(shape.to_vec());
        Ok(tensor)
    }

    /// Process tensor in memory-efficient chunks
    pub fn process_chunked<F, R>(&self, chunk_size: usize, mut processor: F) -> Result<Vec<R>>
    where
        F: FnMut(&[T]) -> Result<R>,
        T: Clone,
    {
        #[cfg(feature = "profiling")]
        {
            // let _profile = profile_section!("process_chunked");
        }
        let data = self.data()?;
        let mut results = Vec::new();

        // Fallback: Use fixed chunk size since AdaptiveChunking is not available
        let effective_chunk_size = chunk_size;

        for chunk in data.chunks(effective_chunk_size) {
            results.push(processor(chunk)?);
        }

        Ok(results)
    }
}

impl MemoryPool {
    fn new(size_class: usize, max_buffers: usize) -> Self {
        Self {
            available_buffers: VecDeque::new(),
            size_class,
            max_buffers,
            allocations: 0,
            reuses: 0,
            deallocations: 0,
        }
    }
}

impl<T: TensorElement + Copy + Default> PooledTensor<T> {
    /// Create a new pooled tensor
    pub fn new(shape: &[usize], device: DeviceType) -> Result<Self> {
        let numel = shape.iter().product::<usize>();

        // Allocate from pool
        let pool = get_memory_pool();
        let data = {
            let mut pool_guard = pool.lock().unwrap_or_else(|poisoned| poisoned.into_inner());
            #[allow(deprecated)]
            pool_guard.allocate::<T>(numel)
        };

        let tensor = Tensor::from_data(data, shape.to_vec(), device)?;
        let type_id = std::any::TypeId::of::<T>();
        let size_class = {
            let pool_guard = pool.lock().unwrap_or_else(|poisoned| poisoned.into_inner());
            pool_guard.find_size_class(numel * std::mem::size_of::<T>())
        };
        let align = std::mem::align_of::<T>();

        Ok(Self {
            tensor,
            pool_key: Some((type_id, size_class, align)),
            _phantom: PhantomData,
        })
    }

    /// Create pooled zeros tensor
    pub fn zeros(shape: &[usize], device: DeviceType) -> Result<Self> {
        let mut pooled = Self::new(shape, device)?;
        // Initialize with zeros
        let numel = shape.iter().product::<usize>();
        let data = vec![T::default(); numel];
        pooled.tensor.storage = TensorStorage::create_optimal(data)?;
        Ok(pooled)
    }

    /// Create pooled ones tensor
    pub fn ones(shape: &[usize], device: DeviceType) -> Result<Self>
    where
        T: std::ops::Add<Output = T> + From<f32>,
    {
        let mut pooled = Self::new(shape, device)?;
        // Initialize with ones
        let numel = shape.iter().product::<usize>();
        let data = vec![T::from(1.0f32); numel];
        pooled.tensor.storage = TensorStorage::create_optimal(data)?;
        Ok(pooled)
    }

    /// Get reference to the underlying tensor
    pub fn tensor(&self) -> &Tensor<T> {
        &self.tensor
    }

    /// Get mutable reference to the underlying tensor
    pub fn tensor_mut(&mut self) -> &mut Tensor<T> {
        &mut self.tensor
    }

    /// Convert to owned tensor (removes from pool management)
    pub fn into_tensor(mut self) -> Tensor<T> {
        self.pool_key = None; // Prevent return to pool
        self.tensor.clone()
    }
}

impl<T: TensorElement + std::default::Default> Drop for PooledTensor<T> {
    fn drop(&mut self) {
        if let Some((_type_id, _size_class, _align)) = self.pool_key {
            // Return memory to pool via deallocate (which now simply drops).
            if let Ok(data) = self.tensor.to_vec() {
                let pool = get_memory_pool();
                let mut pool_guard = pool.lock().unwrap_or_else(|poisoned| poisoned.into_inner());
                pool_guard.deallocate(data);
            }
        }
    }
}

/// Convenient functions for creating pooled tensors
impl<T: TensorElement + Copy + Default> Tensor<T> {
    /// Create a tensor using the memory pool
    pub fn pooled(shape: &[usize], device: DeviceType) -> Result<PooledTensor<T>> {
        PooledTensor::new(shape, device)
    }

    /// Create temporary tensor for intermediate calculations
    pub fn temporary(shape: &[usize], device: DeviceType) -> Result<PooledTensor<T>> {
        PooledTensor::new(shape, device)
    }
}

/// Global functions for pool management
pub fn clear_memory_pool() {
    if let Some(pool) = MEMORY_POOL.get() {
        pool.lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner())
            .clear();
    }
}

pub fn get_pool_statistics() -> PoolStatistics {
    get_memory_pool()
        .lock()
        .unwrap_or_else(|poisoned| poisoned.into_inner())
        .get_statistics()
        .clone()
}

pub fn get_pool_hit_rate() -> f64 {
    get_memory_pool()
        .lock()
        .unwrap_or_else(|poisoned| poisoned.into_inner())
        .hit_rate()
}

pub fn cleanup_memory_pool() {
    get_memory_pool()
        .lock()
        .unwrap_or_else(|poisoned| poisoned.into_inner())
        .cleanup();
}

#[cfg(test)]
mod tests {
    use super::*;

    /// Serialises **every** test in this module.
    ///
    /// They all read or mutate one process-global singleton — the pool itself
    /// plus its allocation/hit counters — and `cargo test` runs a binary's
    /// tests in one process across a thread pool (unlike `cargo nextest`'s
    /// process-per-test). `clear_memory_pool()` resets those counters to zero,
    /// so a test calling it concurrently with another test's measurement makes
    /// that measurement read a wiped pool. Measured on the pre-fix tree, with
    /// only the buffer-identity tests holding this lock:
    ///
    /// ```text
    /// thread 'memory_pool::tests::test_pool_statistics' panicked at
    ///   crates/torsh-tensor/src/memory_pool.rs:1189:9:
    /// assertion failed: stats.total_allocations >= 2
    /// ```
    ///
    /// — 2 of 20 `cargo test -p torsh-tensor --lib memory_pool::` runs (and 4
    /// of 10 in a hotter round), because `test_memory_pool_basic`,
    /// `test_pool_statistics` and `test_pool_cleanup` called
    /// `clear_memory_pool()` without holding it. The lock is held for each
    /// test's full body, which costs nothing measurable: the whole module runs
    /// in well under a millisecond.
    ///
    /// The three memory-mapped tests below are deliberately *not* serialised:
    /// they drive file I/O and a locally constructed `GlobalMemoryPool`, and
    /// never touch the singleton.
    static TEST_LOCK: std::sync::Mutex<()> = std::sync::Mutex::new(());

    #[test]
    fn test_memory_pool_basic() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        // Create pooled tensor
        let pooled = PooledTensor::<f32>::zeros(&[100, 100], DeviceType::Cpu)
            .expect("zeros creation should succeed");
        assert_eq!(pooled.tensor().numel(), 10000);

        // Drop should return memory to pool
        drop(pooled);

        // Next allocation should reuse memory
        let _pooled2 = PooledTensor::<f32>::zeros(&[100, 100], DeviceType::Cpu)
            .expect("zeros creation should succeed");

        let stats = get_pool_statistics();
        assert!(stats.pool_hits > 0 || stats.pool_misses > 0);
    }

    #[test]
    fn test_pool_statistics() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        let _pooled1 = PooledTensor::<f32>::zeros(&[50, 50], DeviceType::Cpu)
            .expect("zeros creation should succeed");
        let _pooled2 = PooledTensor::<f32>::ones(&[50, 50], DeviceType::Cpu)
            .expect("ones creation should succeed");

        let stats = get_pool_statistics();
        assert!(stats.total_allocations >= 2);
        assert!(stats.total_bytes_allocated > 0);
    }

    #[test]
    fn test_pool_cleanup() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        // Create many temporary tensors
        for _ in 0..10 {
            let _temp = PooledTensor::<f32>::zeros(&[100, 100], DeviceType::Cpu)
                .expect("zeros creation should succeed");
        }

        cleanup_memory_pool();
        let _stats = get_pool_statistics();
        // After cleanup, bytes in pools should be reduced (test passes if no panic occurs)
    }

    #[test]
    fn test_pooled_tensor_conversion() {
        // Allocates from (and releases into) the singleton, so it has to be
        // serialised too even though it never asserts on the counters.
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        let pooled = PooledTensor::<f32>::ones(&[10, 10], DeviceType::Cpu)
            .expect("ones creation should succeed");
        let tensor = pooled.into_tensor();
        assert_eq!(tensor.numel(), 100);
    }

    // ── New ReusedBuffer tests ──────────────────────────────────────────────

    #[test]
    fn test_acquire_truly_reuses_allocation() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        let buf1: ReusedBuffer<f32> = global_acquire_uninit::<f32>(1024);
        let ptr1 = buf1.as_ptr_raw();
        buf1.release_to_pool();

        let buf2: ReusedBuffer<f32> = global_acquire_uninit::<f32>(1024);
        let ptr2 = buf2.as_ptr_raw();
        buf2.release_to_pool();

        assert_eq!(
            ptr1, ptr2,
            "pool should return the same allocation on second acquire"
        );
    }

    #[test]
    fn test_into_vec_transfers_ownership() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        let mut buf: ReusedBuffer<f32> = global_acquire_uninit::<f32>(64);
        // Write to the buffer
        for slot in buf.as_uninit_slice_mut() {
            slot.write(1.0_f32);
        }
        let vec = buf.into_vec(64);
        assert_eq!(vec.len(), 64);
        assert!(vec.iter().all(|&x| x == 1.0_f32));
    }

    #[test]
    fn test_drop_returns_to_pool() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        {
            let buf: ReusedBuffer<f32> = global_acquire_uninit::<f32>(256);
            // Drop without consuming — should return to pool
            drop(buf);
        }

        // Second acquire should be a pool hit (same size class)
        let buf2: ReusedBuffer<f32> = global_acquire_uninit::<f32>(256);
        buf2.release_to_pool();

        let stats = get_pool_statistics();
        assert!(
            stats.pool_hits >= 1,
            "expected at least one pool hit after drop-return"
        );
    }

    #[test]
    fn test_acquire_capacity_and_uninit_slice() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        let buf: ReusedBuffer<u64> = global_acquire_uninit::<u64>(32);
        assert_eq!(buf.capacity(), 32);
        buf.release_to_pool();
    }

    // ── Aligned-acquire tests ───────────────────────────────────────────────

    #[test]
    fn test_acquire_aligned_returns_simd_aligned_pointer() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        // 32-byte alignment (AVX2 / scirs2_core::simd_aligned::SIMD_ALIGNMENT).
        let buf: ReusedBuffer<f32> = global_acquire_uninit_aligned::<f32>(1024, 32);
        assert_eq!(buf.capacity(), 1024);
        let addr = buf.as_ptr_raw() as usize;
        assert_eq!(
            addr % 32,
            0,
            "buffer pointer {addr:#x} must be 32-byte aligned"
        );
        buf.release_to_pool();
    }

    #[test]
    fn test_acquire_aligned_pool_hit_on_release() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        let buf1: ReusedBuffer<f32> = global_acquire_uninit_aligned::<f32>(2048, 32);
        let ptr1 = buf1.as_ptr_raw();
        let cap1 = buf1.capacity();
        buf1.release_to_pool();

        let buf2: ReusedBuffer<f32> = global_acquire_uninit_aligned::<f32>(2048, 32);
        let ptr2 = buf2.as_ptr_raw();
        let cap2 = buf2.capacity();
        assert_eq!(
            ptr1, ptr2,
            "aligned bucket should return the same allocation on second acquire"
        );
        assert_eq!(cap1, cap2, "capacity should match across reuse");
        // Pointer must still be aligned after pool reuse.
        assert_eq!(ptr2 as usize % 32, 0, "reused buffer must remain aligned");
        buf2.release_to_pool();
    }

    #[test]
    fn test_aligned_and_natural_buckets_are_independent() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();

        // 32-byte aligned acquire/release for a size that maps to a particular size class.
        let buf_aligned: ReusedBuffer<f32> = global_acquire_uninit_aligned::<f32>(512, 32);
        let ptr_aligned = buf_aligned.as_ptr_raw();
        buf_aligned.release_to_pool();

        // Natural-alignment acquire of the same (T, size) — must NOT collide with the
        // 32-aligned bucket; it should produce a fresh allocation.
        let buf_natural: ReusedBuffer<f32> = global_acquire_uninit::<f32>(512);
        let ptr_natural = buf_natural.as_ptr_raw();
        assert_ne!(
            ptr_aligned, ptr_natural,
            "naturally-aligned bucket must be distinct from the 32-byte bucket"
        );
        buf_natural.release_to_pool();
    }

    #[test]
    #[should_panic(expected = "alignment must be a power of two")]
    fn test_acquire_aligned_rejects_non_power_of_two() {
        let _guard = TEST_LOCK
            .lock()
            .unwrap_or_else(|poisoned| poisoned.into_inner());
        clear_memory_pool();
        let _buf: ReusedBuffer<f32> = global_acquire_uninit_aligned::<f32>(16, 6);
    }

    // ── Memory-mapped allocation path ───────────────────────────────────────
    // These exercise the real disk-backed `scirs2_core::memory_efficient::MemoryMappedArray`
    // path and are gated on the `memory_efficient` feature. Run with:
    //   cargo test -p torsh-tensor --features memory_efficient

    /// Round-trips KNOWN (non-default) data through the exact helper used by
    /// `create_memory_mapped_tensor`: write to a temp-dir backing file, read back via
    /// `as_slice()`, assert equality. Fails if the mmap wiring drops/garbles the data.
    #[cfg(feature = "memory_efficient")]
    #[test]
    fn test_map_through_mmap_file_roundtrips_known_data() {
        // Non-default values so a zero-init regression cannot accidentally pass.
        let known: Vec<f32> = (0..48).map(|i| (i as f32) * 1.5 - 7.25).collect();

        let backing_path = unique_mmap_path("test_helper");
        assert!(
            backing_path.starts_with(std::env::temp_dir()),
            "backing file must live under the system temp directory"
        );

        let mapped = map_through_mmap_file::<f32>(known.clone(), &backing_path)
            .expect("memory-mapped round-trip should succeed");

        assert_eq!(
            mapped, known,
            "as_slice() must return exactly the data written to the memory-mapped file"
        );

        // Defensive cleanup in case the helper's best-effort removal failed.
        let _ = std::fs::remove_file(&backing_path);
    }

    /// Directly drives `MemoryMappedArray::new(..)` + `as_slice()` with known `f64` data under
    /// the temp directory to pin the exact scirs2-core API contract the wiring relies on.
    #[cfg(feature = "memory_efficient")]
    #[test]
    fn test_memory_mapped_array_as_slice_direct() {
        use scirs2_core::memory_efficient::{AccessMode, MemoryMappedArray};
        use scirs2_core::ndarray::Array1;

        let known: Vec<f64> = vec![3.5, -1.25, 42.0, 7.0, 0.5, 100.0, -8.0, 256.0];
        let backing_path = unique_mmap_path("test_direct");

        let array = Array1::from(known.clone());
        let mmap = MemoryMappedArray::<f64>::new(Some(&array), &backing_path, AccessMode::Write, 0)
            .expect("memory-mapped array creation should succeed");

        let read_back = mmap.as_slice().to_vec();
        drop(mmap);
        let _ = std::fs::remove_file(&backing_path);

        assert_eq!(
            read_back, known,
            "as_slice() over a Write-mode memory map must return the written data"
        );
    }

    /// Drives the production method `create_memory_mapped_tensor` end-to-end through the
    /// memory-mapped path and verifies the resulting tensor's shape and contents.
    #[cfg(feature = "memory_efficient")]
    #[test]
    fn test_create_memory_mapped_tensor_uses_mmap_path() {
        let mut pool = GlobalMemoryPool::new();
        let shape = [4usize, 5];
        let tensor = pool
            .create_memory_mapped_tensor::<f32>(&shape, DeviceType::Cpu)
            .expect("memory-mapped tensor creation should succeed");

        assert_eq!(tensor.numel(), 20);
        let dims = tensor.shape();
        assert_eq!(dims.dims(), &[4, 5]);

        // Data was staged through the memory map and read back via as_slice();
        // a freshly-allocated tensor holds default (zero) values.
        let data = tensor.data().expect("tensor data should be readable");
        assert_eq!(data.len(), 20);
        assert!(data.iter().all(|&x| x == 0.0_f32));
    }
}