use std::collections::HashMap;
use crate::{
    error::AUTDInternalError,
    geometry::{Device, Geometry},
    operation::{cast, Operation, TypeTag},
};
#[repr(C, align(2))]
struct ConfigureForceFan {
    tag: TypeTag,
    value: bool,
}
pub struct ConfigureForceFanOp<F: Fn(&Device) -> bool> {
    remains: HashMap<usize, usize>,
    f: F,
}
impl<F: Fn(&Device) -> bool> ConfigureForceFanOp<F> {
    pub fn new(f: F) -> Self {
        Self {
            remains: Default::default(),
            f,
        }
    }
}
impl<F: Fn(&Device) -> bool> Operation for ConfigureForceFanOp<F> {
    fn pack(&mut self, device: &Device, tx: &mut [u8]) -> Result<usize, AUTDInternalError> {
        assert_eq!(self.remains[&device.idx()], 1);
        let d = cast::<ConfigureForceFan>(tx);
        d.tag = TypeTag::ForceFan;
        d.value = (self.f)(device);
        Ok(std::mem::size_of::<ConfigureForceFan>())
    }
    fn required_size(&self, _: &Device) -> usize {
        std::mem::size_of::<ConfigureForceFan>()
    }
    fn init(&mut self, geometry: &Geometry) -> Result<(), AUTDInternalError> {
        self.remains = geometry.devices().map(|device| (device.idx(), 1)).collect();
        Ok(())
    }
    fn remains(&self, device: &Device) -> usize {
        self.remains[&device.idx()]
    }
    fn commit(&mut self, device: &Device) {
        self.remains.insert(device.idx(), 0);
    }
}
#[cfg(test)]
mod tests {
    use super::*;
    use crate::geometry::tests::create_geometry;
    const NUM_TRANS_IN_UNIT: usize = 249;
    const NUM_DEVICE: usize = 10;
    #[test]
    fn force_fan_op() {
        let geometry = create_geometry(NUM_DEVICE, NUM_TRANS_IN_UNIT);
        let mut tx = [0x00u8; 2 * NUM_DEVICE];
        let mut op = ConfigureForceFanOp::new(|dev| dev.idx() == 0);
        assert!(op.init(&geometry).is_ok());
        geometry
            .devices()
            .for_each(|dev| assert_eq!(op.required_size(dev), 2));
        geometry
            .devices()
            .for_each(|dev| assert_eq!(op.remains(dev), 1));
        geometry.devices().for_each(|dev| {
            assert!(op.pack(dev, &mut tx[dev.idx() * 2..]).is_ok());
            op.commit(dev);
        });
        geometry
            .devices()
            .for_each(|dev| assert_eq!(op.remains(dev), 0));
        geometry.devices().for_each(|dev| {
            assert_eq!(tx[dev.idx() * 2], TypeTag::ForceFan as u8);
            assert_eq!(
                tx[dev.idx() * 2 + 1],
                if dev.idx() == 0 { 0x01 } else { 0x00 }
            );
        });
    }
}