hdf5-pure-rust 0.3.10

use std::fs;
use std::path::{Path, PathBuf};

use crate::engine::writer::{AttrSpec, HdfFileWriter, SharedMessageIndexConfig};
use crate::error::{Error, Result};
use crate::hl::dataset_builder::DatasetBuilder;
use crate::hl::plist::file_create::FileSpaceStrategy;
use crate::hl::types::{values_as_bytes_checked, H5Type};

/// A writable HDF5 file under construction.
///
/// Use the builder methods to create groups, datasets, and attributes,
/// then call `flush()` or `close()` to finalize and write to disk.
pub struct WritableFile {
    writer: HdfFileWriter<fs::File>,
    path: PathBuf,
    #[allow(dead_code)]
    current_group: String,
}

fn encode_file_space_strategy(strategy: FileSpaceStrategy) -> u8 {
    match strategy {
        FileSpaceStrategy::FreeSpaceManager => 0,
        FileSpaceStrategy::Page => 1,
        FileSpaceStrategy::Aggregate => 2,
        FileSpaceStrategy::None => 3,
    }
}

impl WritableFile {
    /// Create a new HDF5 file (truncating if it exists).
    pub fn create<P: AsRef<Path>>(path: P) -> Result<Self> {
        Self::create_with_options(
            path,
            0,
            2,
            8,
            8,
            FileSpaceStrategy::Aggregate,
            false,
            1,
            4096,
        )
    }

    /// Create a new HDF5 file with a userblock prefix.
    pub fn create_with_userblock<P: AsRef<Path>>(path: P, userblock: u64) -> Result<Self> {
        Self::create_with_options(
            path,
            userblock,
            2,
            8,
            8,
            FileSpaceStrategy::Aggregate,
            false,
            1,
            4096,
        )
    }

    /// Create a new HDF5 file with selected FCPL-backed file layout options.
    #[allow(clippy::too_many_arguments)]
    pub fn create_with_options<P: AsRef<Path>>(
        path: P,
        userblock: u64,
        superblock_version: u8,
        sizeof_addr: u8,
        sizeof_size: u8,
        file_space_strategy: FileSpaceStrategy,
        file_space_persist: bool,
        file_space_threshold: u64,
        file_space_page_size: u64,
    ) -> Result<Self> {
        Self::create_with_options_and_shared_messages(
            path,
            userblock,
            superblock_version,
            sizeof_addr,
            sizeof_size,
            file_space_strategy,
            file_space_persist,
            file_space_threshold,
            file_space_page_size,
            &[],
            (50, 40),
        )
    }

    /// Create a new HDF5 file with selected FCPL-backed file layout options,
    /// including the shared-message table subset supported by this writer.
    #[allow(clippy::too_many_arguments)]
    pub(crate) fn create_with_options_and_shared_messages<P: AsRef<Path>>(
        path: P,
        userblock: u64,
        superblock_version: u8,
        sizeof_addr: u8,
        sizeof_size: u8,
        file_space_strategy: FileSpaceStrategy,
        file_space_persist: bool,
        file_space_threshold: u64,
        file_space_page_size: u64,
        shared_mesg_indexes: &[crate::hl::plist::file_create::SharedMessageIndex],
        shared_mesg_phase_change: (u32, u32),
    ) -> Result<Self> {
        let path = path.as_ref().to_path_buf();
        let f = fs::File::create(&path)?;
        let mut writer = HdfFileWriter::new_with_base_addr(f, userblock);
        writer.set_superblock_version(superblock_version)?;
        writer.set_file_size_widths(sizeof_addr, sizeof_size)?;
        writer.set_file_space_info(
            encode_file_space_strategy(file_space_strategy),
            file_space_persist,
            file_space_threshold,
            file_space_page_size,
        )?;
        let shared_mesg_indexes: Vec<_> = shared_mesg_indexes
            .iter()
            .map(|index| SharedMessageIndexConfig {
                message_type_flags: index.message_type_flags,
                minimum_message_size: index.minimum_message_size,
            })
            .collect();
        writer.set_shared_message_info(&shared_mesg_indexes, shared_mesg_phase_change)?;
        writer.begin()?;
        writer.create_root_group()?;

        Ok(Self {
            writer,
            path,
            current_group: String::from("/"),
        })
    }

    /// Create a new HDF5 file, failing if it already exists.
    pub fn create_excl<P: AsRef<Path>>(path: P) -> Result<Self> {
        Self::create_excl_with_userblock(path, 0)
    }

    /// Create a new HDF5 file with a userblock prefix, failing if it already exists.
    pub fn create_excl_with_userblock<P: AsRef<Path>>(path: P, userblock: u64) -> Result<Self> {
        Self::create_excl_with_options(
            path,
            userblock,
            2,
            8,
            8,
            FileSpaceStrategy::Aggregate,
            false,
            1,
            4096,
        )
    }

    /// Create a new HDF5 file with selected FCPL-backed file layout options,
    /// failing if it already exists.
    #[allow(clippy::too_many_arguments)]
    pub fn create_excl_with_options<P: AsRef<Path>>(
        path: P,
        userblock: u64,
        superblock_version: u8,
        sizeof_addr: u8,
        sizeof_size: u8,
        file_space_strategy: FileSpaceStrategy,
        file_space_persist: bool,
        file_space_threshold: u64,
        file_space_page_size: u64,
    ) -> Result<Self> {
        Self::create_excl_with_options_and_shared_messages(
            path,
            userblock,
            superblock_version,
            sizeof_addr,
            sizeof_size,
            file_space_strategy,
            file_space_persist,
            file_space_threshold,
            file_space_page_size,
            &[],
            (50, 40),
        )
    }

    #[allow(clippy::too_many_arguments)]
    pub(crate) fn create_excl_with_options_and_shared_messages<P: AsRef<Path>>(
        path: P,
        userblock: u64,
        superblock_version: u8,
        sizeof_addr: u8,
        sizeof_size: u8,
        file_space_strategy: FileSpaceStrategy,
        file_space_persist: bool,
        file_space_threshold: u64,
        file_space_page_size: u64,
        shared_mesg_indexes: &[crate::hl::plist::file_create::SharedMessageIndex],
        shared_mesg_phase_change: (u32, u32),
    ) -> Result<Self> {
        let path = path.as_ref().to_path_buf();
        if path.exists() {
            return Err(Error::Io(std::io::Error::new(
                std::io::ErrorKind::AlreadyExists,
                format!("file already exists: {}", path.display()),
            )));
        }
        Self::create_with_options_and_shared_messages(
            path,
            userblock,
            superblock_version,
            sizeof_addr,
            sizeof_size,
            file_space_strategy,
            file_space_persist,
            file_space_threshold,
            file_space_page_size,
            shared_mesg_indexes,
            shared_mesg_phase_change,
        )
    }

    /// Create a subgroup in the root group.
    pub fn create_group(&mut self, name: &str) -> Result<WritableGroup<'_>> {
        self.writer.create_group("/", name)?;
        let mut full_path = String::with_capacity(name.len() + 1);
        full_path.push('/');
        full_path.push_str(name);
        Ok(WritableGroup {
            writer: &mut self.writer,
            path: full_path,
        })
    }

    /// Get a builder for creating a dataset in the root group.
    pub fn new_dataset_builder(&mut self, name: &str) -> DatasetBuilder<'_> {
        DatasetBuilder::new(&mut self.writer, "/", name)
    }

    /// Add an attribute to the root group.
    pub fn add_attr<T: H5Type>(&mut self, name: &str, value: T) -> Result<()> {
        let dtype = crate::hl::dataset_builder::dtype_for_type::<T>()?;
        let data = values_as_bytes_checked(std::slice::from_ref(&value))?;
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &[],
            dtype,
            data: data.as_ref(),
        })
    }

    /// Add a one-dimensional array attribute to the root group.
    pub fn add_attr_array<T: H5Type>(&mut self, name: &str, values: &[T]) -> Result<()> {
        let dtype = crate::hl::dataset_builder::dtype_for_type::<T>()?;
        let byte_len = values
            .len()
            .checked_mul(T::type_size())
            .ok_or_else(|| Error::InvalidFormat("attribute byte size overflow".into()))?;
        let data = values_as_bytes_checked(values)?;
        debug_assert_eq!(data.len(), byte_len);
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &shape,
            dtype,
            data: data.as_ref(),
        })
    }

    /// Add a fixed-length ASCII string attribute to the root group.
    pub fn add_fixed_ascii_attr(&mut self, name: &str, value: &str, len: usize) -> Result<()> {
        let (dtype, data) = fixed_string_attr(&[value], len, false)?;
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &[],
            dtype,
            data: &data,
        })
    }

    /// Add a fixed-length UTF-8 string attribute to the root group.
    pub fn add_fixed_utf8_attr(&mut self, name: &str, value: &str, len: usize) -> Result<()> {
        let (dtype, data) = fixed_string_attr(&[value], len, true)?;
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &[],
            dtype,
            data: &data,
        })
    }

    /// Add a one-dimensional fixed-length ASCII string array attribute to the root group.
    pub fn add_fixed_ascii_attr_array(
        &mut self,
        name: &str,
        values: &[&str],
        len: usize,
    ) -> Result<()> {
        let (dtype, data) = fixed_string_attr(values, len, false)?;
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &shape,
            dtype,
            data: &data,
        })
    }

    /// Add a one-dimensional fixed-length UTF-8 string array attribute to the root group.
    pub fn add_fixed_utf8_attr_array(
        &mut self,
        name: &str,
        values: &[&str],
        len: usize,
    ) -> Result<()> {
        let (dtype, data) = fixed_string_attr(values, len, true)?;
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_root_attr(&AttrSpec {
            name,
            shape: &shape,
            dtype,
            data: &data,
        })
    }

    /// Create a soft link in the root group.
    pub fn link_soft(&mut self, name: &str, target_path: &str) -> Result<()> {
        self.writer.create_soft_link("/", name, target_path)
    }

    /// Create a hard-link alias in the root group.
    pub fn link_hard(&mut self, name: &str, target_path: &str) -> Result<()> {
        self.writer.create_hard_link("/", name, target_path)
    }

    /// Create an external link in the root group.
    pub fn link_external(&mut self, name: &str, filename: &str, obj_path: &str) -> Result<()> {
        self.writer
            .create_external_link("/", name, filename, obj_path)
    }

    /// Finalize and close the file. Returns a read-only File handle.
    pub fn close(mut self) -> Result<crate::hl::file::File> {
        self.writer.finalize()?;
        crate::hl::file::File::open(&self.path)
    }

    /// Finalize the file (writes superblock and all metadata).
    pub fn flush(&mut self) -> Result<()> {
        self.writer.finalize()
    }
}

/// A writable group within a WritableFile.
pub struct WritableGroup<'a> {
    writer: &'a mut HdfFileWriter<fs::File>,
    path: String,
}

impl<'a> WritableGroup<'a> {
    /// Create a subgroup.
    pub fn create_group(&mut self, name: &str) -> Result<WritableGroup<'_>> {
        self.writer.create_group(&self.path, name)?;
        let mut full_path = String::with_capacity(self.path.len() + name.len() + 1);
        full_path.push_str(&self.path);
        full_path.push('/');
        full_path.push_str(name);
        Ok(WritableGroup {
            writer: self.writer,
            path: full_path,
        })
    }

    /// Get a builder for creating a dataset in this group.
    pub fn new_dataset_builder(&mut self, name: &str) -> DatasetBuilder<'_> {
        DatasetBuilder::new(self.writer, &self.path, name)
    }

    /// Add an attribute to this group.
    pub fn add_attr<T: H5Type>(&mut self, name: &str, value: T) -> Result<()> {
        let dtype = crate::hl::dataset_builder::dtype_for_type::<T>()?;
        let data = values_as_bytes_checked(std::slice::from_ref(&value))?;
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &[],
                dtype,
                data: data.as_ref(),
            },
        )
    }

    /// Add a one-dimensional array attribute to this group.
    pub fn add_attr_array<T: H5Type>(&mut self, name: &str, values: &[T]) -> Result<()> {
        let dtype = crate::hl::dataset_builder::dtype_for_type::<T>()?;
        let byte_len = values
            .len()
            .checked_mul(T::type_size())
            .ok_or_else(|| Error::InvalidFormat("attribute byte size overflow".into()))?;
        let data = values_as_bytes_checked(values)?;
        debug_assert_eq!(data.len(), byte_len);
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &shape,
                dtype,
                data: data.as_ref(),
            },
        )
    }

    /// Add a fixed-length ASCII string attribute to this group.
    pub fn add_fixed_ascii_attr(&mut self, name: &str, value: &str, len: usize) -> Result<()> {
        let (dtype, data) = fixed_string_attr(&[value], len, false)?;
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &[],
                dtype,
                data: &data,
            },
        )
    }

    /// Add a fixed-length UTF-8 string attribute to this group.
    pub fn add_fixed_utf8_attr(&mut self, name: &str, value: &str, len: usize) -> Result<()> {
        let (dtype, data) = fixed_string_attr(&[value], len, true)?;
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &[],
                dtype,
                data: &data,
            },
        )
    }

    /// Add a one-dimensional fixed-length ASCII string array attribute to this group.
    pub fn add_fixed_ascii_attr_array(
        &mut self,
        name: &str,
        values: &[&str],
        len: usize,
    ) -> Result<()> {
        let (dtype, data) = fixed_string_attr(values, len, false)?;
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &shape,
                dtype,
                data: &data,
            },
        )
    }

    /// Add a one-dimensional fixed-length UTF-8 string array attribute to this group.
    pub fn add_fixed_utf8_attr_array(
        &mut self,
        name: &str,
        values: &[&str],
        len: usize,
    ) -> Result<()> {
        let (dtype, data) = fixed_string_attr(values, len, true)?;
        let shape = [usize_to_u64(values.len(), "attribute element count")?];
        self.writer.add_group_attr(
            &self.path,
            &AttrSpec {
                name,
                shape: &shape,
                dtype,
                data: &data,
            },
        )
    }

    /// Create a soft link in this group.
    pub fn link_soft(&mut self, name: &str, target_path: &str) -> Result<()> {
        self.writer.create_soft_link(&self.path, name, target_path)
    }

    /// Create a hard-link alias in this group.
    pub fn link_hard(&mut self, name: &str, target_path: &str) -> Result<()> {
        self.writer.create_hard_link(&self.path, name, target_path)
    }

    /// Create an external link in this group.
    pub fn link_external(&mut self, name: &str, filename: &str, obj_path: &str) -> Result<()> {
        self.writer
            .create_external_link(&self.path, name, filename, obj_path)
    }
}

fn fixed_string_attr(
    values: &[&str],
    len: usize,
    utf8: bool,
) -> Result<(crate::engine::writer::DtypeSpec, Vec<u8>)> {
    let len_u32 = usize_to_u32(len, "fixed string length")?;
    let dtype = if utf8 {
        crate::engine::writer::DtypeSpec::FixedUtf8String {
            len: len_u32,
            padding: 1,
        }
    } else {
        crate::engine::writer::DtypeSpec::FixedAsciiString {
            len: len_u32,
            padding: 1,
        }
    };
    let data_len = values.len().checked_mul(len).ok_or_else(|| {
        Error::InvalidFormat("fixed string attribute payload size overflow".into())
    })?;
    for value in values {
        let bytes = value.as_bytes();
        if bytes.len() > len {
            return Err(Error::InvalidFormat(format!(
                "fixed string attribute has {} bytes, maximum is {len}",
                bytes.len()
            )));
        }
    }
    let mut data = vec![0; data_len];
    for (slot, value) in data.chunks_exact_mut(len).zip(values.iter()) {
        let bytes = value.as_bytes();
        slot[..bytes.len()].copy_from_slice(bytes);
    }
    Ok((dtype, data))
}

fn usize_to_u64(value: usize, context: &str) -> Result<u64> {
    u64::try_from(value).map_err(|_| Error::InvalidFormat(format!("{context} exceeds u64")))
}

fn usize_to_u32(value: usize, context: &str) -> Result<u32> {
    u32::try_from(value).map_err(|_| Error::InvalidFormat(format!("{context} exceeds u32")))
}