use std::cmp::min;
#[cfg(feature = "simd")]
use std::simd::cmp::SimdPartialOrd;
#[cfg(feature = "simd")]
use std::simd::u8x64;

use tracing::warn;

#[inline(always)]
pub fn median<T>(x: T, y: T, z: T) -> T
where
    T: std::cmp::Ord + std::marker::Copy,
{
    // std::max(std::min(x, y), std::min(std::max(x, y), z))
    // x.max(y).max(x.min(y).min(z))
    x.min(y).max(x.max(y).min(z))
}

#[derive(Debug, Clone)]
pub struct TeamNamer {
    pub team: String,
    pub val: [u8; 256],
}

impl TeamNamer {
    /// 方便使用的 new
    /// 会检查长度是否超过 256
    #[inline(always)]
    pub fn new(team: &str) -> Option<Self> {
        if team.len() > 256 {
            warn!("Team too long({}): {}", team.len(), team);
            return None;
        }
        Some(Self::new_unchecked(team))
    }
    #[inline(always)]
    pub fn new_unchecked(team: &str) -> Self {
        let team_bytes = team.as_bytes();
        let mut val: [u8; 256] = (0..=255).collect::<Vec<u8>>().try_into().unwrap();
        let mut s = 0_u8;
        let t_len = team.len() + 1;
        for i in 0..256 {
            if (i % t_len) != 0 {
                s = s.wrapping_add(team_bytes[(i % t_len) - 1]);
            }
            s = s.wrapping_add(val[i]);
            val.swap(i, s as usize);
        }
        Self {
            team: team.to_string(),
            val,
        }
    }
    #[inline(always)]
    pub fn clone_vals(&self) -> [u8; 256] {
        self.val.clone()
    }
}

#[derive(Debug, Clone)]
pub struct Namer {
    pub name: String,
    pub team: String,
    pub val: [u8; 256],
    pub name_base: [u8; 128],
    pub name_prop: [u32; 8],
    pub skl_id: [u8; 40],
    pub skl_freq: [u8; 40],
}

impl Namer {
    /// 最完整的、最简单的 new
    /// 可以直接丢一个 name 进来
    #[inline(always)]
    pub fn new(full_name: &String) -> Option<Self> {
        // name@team
        // name
        let (name, team) = full_name.split_once('@').unwrap_or((full_name, ""));
        if name.len() > 256 {
            warn!("Name too long({}): {}", name.len(), name);
            return None;
        }
        if team.len() > 256 {
            warn!("Team too long({}): {}", team.len(), team);
            return None;
        }
        Some(Self::new_raw_unchecked(name, team))
    }
    /// 用起来也很方便的
    /// 只不过是需要分别输入, 也挺好用的
    /// 包括了长度检测
    #[inline(always)]
    pub fn new_raw(name: &str, team: &str) -> Option<Self> {
        if name.len() > 256 {
            warn!("Name too long({}): {}", name.len(), name);
            return None;
        }
        if team.len() > 256 {
            warn!("Team too long({}): {}", team.len(), team);
            return None;
        }
        Some(Self::new_raw_unchecked(name, team))
    }
    /// 不带检查长度的 new
    /// 依然可以传一个完整的进来
    #[inline(always)]
    pub fn new_unchecked(full_name: &str) -> Self {
        let (name, team) = full_name.split_once('@').unwrap_or((full_name, ""));
        Self::new_raw_unchecked(name, team)
    }
    /// 大部分情况下的实际调用 p1
    /// p2 是 new_from_team_namer_unchecked
    /// 实际上还是个包装
    #[inline(always)]
    pub fn new_raw_unchecked(name: &str, team: &str) -> Self {
        let team_namer = TeamNamer::new_unchecked(team);
        Self::new_from_team_namer_unchecked(&team_namer, name)
    }
    /// 带检查长度的 from namer
    /// 我其实也不知道为啥要有他, 就带上了吧
    #[inline(always)]
    pub fn new_from_team_namer(team_namer: &TeamNamer, name: &str) -> Option<Self> {
        if name.len() > 256 {
            warn!("Name too long({}): {}", name.len(), name);
            return None;
        }
        Some(Self::new_from_team_namer_unchecked(team_namer, name))
    }
    /// 实际 new 实现
    #[inline(always)]
    pub fn new_from_team_namer_unchecked(team_namer: &TeamNamer, name: &str) -> Self {
        let mut val: [u8; 256] = team_namer.clone_vals();
        let mut name_base = [0_u8; 128];
        let mut name_prop = [0_u32; 8];
        let skl_id = [0_u8; 40];
        let skl_freq = [0_u8; 40];

        let name_bytes = name.as_bytes();
        let name_len = name_bytes.len();
        let b_name_len = name_len + 1;
        // // 计算
        // for i in 0..256 {
        //     s += team_bytes[i % (team_len + 1)] as u32 + val[i] as u32;
        //     s %= 256;
        //     let tmp = val[i];
        //     val[i] = val[s as usize];
        //     val[s as usize] = tmp;
        // }
        // s = 0;
        // cpp 实现
        /*
        for (int _ = 0; _ < 2; _++) {
            for (int i = s = 0, j = 0; i < N; i++, j++) {
                s += name[j];
                s += val[i];
                std::swap(val[i], val[s]);
                if (j == len) j = -1;
            }
        } */
        for _ in 0..2 {
            // 手动处理 0 的问题
            // 手动swap
            let mut s = 0_u8;
            val.swap(s as usize, 0);
            for i in 0..256 {
                // s = s.wrapping_add(name_bytes[i % name_len]);
                s = s.wrapping_add(match i % b_name_len {
                    0 => 0,
                    k => name_bytes[k - 1],
                });
                s = s.wrapping_add(val[i]);
                val.swap(i, s as usize);
            }
        }
        /*
        #define median(x, y, z) std::max(std::min(x, y), std::min(std::max(x, y), z))
        #define LIM 96
        #define WK(x) val[i + x] = val[i + x] * 181 + 160;
        #define a name_base
        for (int i = 0; i < LIM; i += 8) {
            WK(0) WK(1) WK(2) WK(3) WK(4) WK(5) WK(6) WK(7)
        }
        for (int i = 0; i < LIM && q_len < 30; i++)
            if (val[i] >= 89 && val[i] < 217) a[++q_len] = val[i] & 63;

        if (q_len < 30) {
            for (int i = LIM; i < N; i += 8) {
                WK(0) WK(1) WK(2) WK(3) WK(4) WK(5) WK(6) WK(7)
            }
            for (int i = LIM; i < N && q_len < 30; i++)
                if (val[i] >= 89 && val[i] < 217) a[++q_len] = val[i] & 63;
        }*/
        // simd 优化
        #[cfg(feature = "simd")]
        {
            let mut simd_val = val.clone();
            let mut simd_val_b = [0_u8; 256];
            let mut simd_target = [false; 256];
            let simd_181 = u8x64::splat(181);
            let simd_160 = u8x64::splat(160);
            let simd_63 = u8x64::splat(63);
            let simd_88 = u8x64::splat(88);
            let simd_217 = u8x64::splat(217);

            for i in (0..256).step_by(64) {
                // 一次性加载64个数字
                let mut x = u8x64::from_slice(&simd_val[i..]);
                x = x * simd_181 + simd_160;
                // 写入到 simd_val
                x.copy_to_slice(&mut simd_val[i..]);
                // 提前判断 > 88 && < 217
                let mask = x.simd_ge(simd_88) & x.simd_lt(simd_217);
                // 写入到 simd_target
                let mask: [bool; 64] = mask.to_array();
                simd_target[i..i + 64].copy_from_slice(&mask);

                x = x & simd_63;
                x.copy_to_slice(&mut simd_val_b[i..]);
            }

            let mut mod_count = 0;
            for i in 0..96 {
                if simd_target[i] {
                    name_base[mod_count as usize] = simd_val_b[i];
                    mod_count += 1;
                }
                if mod_count > 30 {
                    break;
                }
            }
            if mod_count < 31 {
                for i in 96..256 {
                    if simd_target[i] {
                        name_base[mod_count as usize] = simd_val_b[i];
                        mod_count += 1;
                    }
                    if mod_count > 30 {
                        break;
                    }
                }
            }
        }

        #[cfg(not(feature = "simd"))]
        {
            let mut s = 0;
            for i in 0..256 {
                let m = ((val[i] as u32 * 181) + 160) % 256;
                if m >= 89 && m < 217 {
                    name_base[s as usize] = (m & 63) as u8;
                    s += 1;
                }
            }
        }

        // 计算 name_prop
        let mut prop_name = name_base[0..32].to_vec();
        prop_name[0..10].sort_unstable();
        name_prop[0] = 154
            + prop_name[3] as u32
            + prop_name[4] as u32
            + prop_name[5] as u32
            + prop_name[6] as u32;
        name_prop[1] = median(prop_name[10], prop_name[11], prop_name[12]) as u32 + 36;
        name_prop[2] = median(prop_name[13], prop_name[14], prop_name[15]) as u32 + 36;
        name_prop[3] = median(prop_name[16], prop_name[17], prop_name[18]) as u32 + 36;
        name_prop[4] = median(prop_name[19], prop_name[20], prop_name[21]) as u32 + 36;
        name_prop[5] = median(prop_name[22], prop_name[23], prop_name[24]) as u32 + 36;
        name_prop[6] = median(prop_name[25], prop_name[26], prop_name[27]) as u32 + 36;
        name_prop[7] = median(prop_name[28], prop_name[29], prop_name[30]) as u32 + 36;

        Self {
            name: name.to_string(),
            team: team_namer.team.clone(),
            val,
            name_base,
            name_prop,
            skl_id,
            skl_freq,
        }
    }

    #[inline(always)]
    pub fn update_skill(&mut self) {
        /*
        template <int len>
        void calc_skills() {
            //  q_len = -1;
            //  memcpy(val, val_base, sizeof val);
            //  for (int _ = 0; _ < 2; _++)
            //  	for (int i = s = 0, j = 0; i < N; i++, j++) {
            //  		s += name[j];
            //  		s += val[i];
            //  		std::swap(val[i], val[s]);
            //  		if (j == len) j = -1;
            //  	}
            for (int i = 0; i < N; i++)
                if (val[i] * 181 + 199 & 128) name_base[++q_len] = val[i] * 53 & 63 ^ 32;

            u8_t *a = name_base + K;
            for (int i = 0; i < skill_cnt; i++) skill[i] = i;
            p = q = s = 0;
            for (int _ = 0; _ < 2; _++)
                for (int i = 0; i < skill_cnt; i++) {
                    s = (s + rnd() + skill[i]) % skill_cnt;
                    std::swap(skill[i], skill[s]);
                }
            int last = -1;
            for (int i = 0, j = 0; j < 16; i += 4, j++) {
                u8_t p = std::min(std::min(a[i], a[i + 1]), std::min(a[i + 2], a[i + 3]));
                if (p > 10 && skill[j] < 35) {
                    freq[j] = p - 10;
                    if (skill[j] < 25) last = j;
                } else
                    freq[j] = 0;
            }
            if (last != -1) freq[last] <<= 1;
            if (freq[14] && last != 14)
                freq[14] += std::min(std::min(name_base[60], name_base[61]), freq[14]);
            if (freq[15] && last != 15)
                freq[15] += std::min(std::min(name_base[62], name_base[63]), freq[15]);
        } */

        let skill_id = self.skl_id.as_mut();
        for i in 0..40 {
            skill_id[i] = i as u8
        }

        let mut name_base = self.name_base.clone();
        #[cfg(feature = "simd")]
        {
            // let mut simd_val = self.val.clone();
            // let mut simd_val_b = self.val.clone();
            // let simd_181 = u8x64::splat(181);
            // let simd_199 = u8x64::splat(199);
            // let simd_128 = u8x64::splat(128);
            // let simd_53 = u8x64::splat(53);
            // let simd_63 = u8x64::splat(63);
            // let simd_32 = u8x64::splat(32);

            // for i in (0..256).step_by(64) {
            //     let mut x = u8x64::from_slice(&simd_val[i..]);
            //     let mut y = u8x64::from_slice(&simd_val_b[i..]);
            //     x = x * simd_181 + simd_199 & simd_128;
            //     y = y * simd_53 & simd_63 ^ simd_32;
            //     x.copy_to_slice(&mut simd_val[i..]);
            //     y.copy_to_slice(&mut simd_val_b[i..]);
            // }

            // let mut mod_count = 0;
            // for i in 0..256 {
            //     if simd_val[i] != 0 {
            //         name_base[mod_count as usize] = simd_val_b[i];
            //         mod_count += 1;
            //     }
            // }
            // const int N = 256, M = 128, K = 64, skill_cnt = 40, max_len = 25;
            let mut p: u8 = 0;
            let mut q: u8 = 0;
            let mut s: u8 = 0;
            println!("val: {:?}", self.val);
            println!("name_base: {:?}", name_base);
            for _ in 0..2 {
                for i in 0..40 {
                    /*
                    inline u8_t rnd() {
                    q += val[++p];
                    std::swap(val[p], val[q]);
                    u8_t u = val[(val[p] + val[q]) & 255];
                    q += val[++p];
                    std::swap(val[p], val[q]);
                    return (u << 8 | val[(val[p] + val[q]) & 255]) % skill_cnt;
                    } */
                    let rnd = {
                        q = q.wrapping_add(self.val[p as usize]);
                        p += 1;
                        self.val.swap(p as usize, q as usize);
                        let u: u8 = self.val
                            [((self.val[p as usize] as u16 + self.val[q as usize] as u16) & 255) as usize];
                        q = q.wrapping_add(self.val[p as usize]);
                        p += 1;
                        self.val.swap(p as usize, q as usize);
                        let t = self.val
                            [((self.val[p as usize] as u16 + self.val[q as usize] as u16) & 255) as usize];
                        (((u as u32) << 8 | t as u32) % 40) as u8
                    };
                    println!("rnd: {} i: {i}", rnd);
                    // s = (s.wrapping_add(rnd).wrapping_add(skill_id[i])) % 40;
                    s = (s as u16 + rnd as u16 + skill_id[i] as u16) as u8 % 40;
                    skill_id.swap(i as usize, s as usize);
                }
            }
            let mut last = -1;
            let mut j = 0;
            for i in (64..128).step_by(4) {
                // a[k] == self.name_base[k+10]
                let p = min(
                    min(self.name_base[i + 0], self.name_base[i + 1]),
                    min(self.name_base[i + 2], self.name_base[i + 3]),
                );
                if p > 10 && skill_id[j] < 35 {
                    self.skl_freq[j] = p - 10;
                    if skill_id[j] < 25 {
                        last = j as i32;
                    };
                } else {
                    self.skl_freq[j] = 0
                }
                j += 1;
            }
            if last != -1 {
                self.skl_freq[last as usize] <<= 1;
                // *= 2
            }
            if (self.skl_freq[14] != 0) && (last != 14) {
                self.skl_freq[14] += min(
                    min(self.name_base[60], self.name_base[61]),
                    self.skl_freq[14],
                );
            }
            if (self.skl_freq[15] != 0) && (last != 15) {
                self.skl_freq[15] += min(
                    min(self.name_base[62], self.name_base[63]),
                    self.skl_freq[15],
                );
            }
        }

        #[cfg(not(feature = "simd"))]
        {
            todo!("none simd 还没写呢")   
        }
    }

    #[inline(always)]
    pub fn get_property(&self) -> f32 {
        let sum1 = self.name_prop[1..=7].iter().sum::<u32>();
        let sum2 = self.name_prop[0] as u32;
        sum1 as f32 + (sum2 as f32 / 3_f32)
    }
}

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

    #[test]
    fn new_test() {
        let namer = Namer::new(&"x@x".to_string());
        assert!(namer.is_some());
        let namer = namer.unwrap();
        assert_eq!(namer.name, "x");
        assert_eq!(namer.team, "x");
    }

    #[test]
    fn val_test() {
        let team = TeamNamer::new_unchecked("x");
        let namer = Namer::new_from_team_namer_unchecked(&team, "x");

        let val_vec: Vec<u8> = vec![
            225, 96, 49, 232, 20, 47, 115, 245, 234, 23, 111, 178, 231, 100, 118, 197, 42, 98, 137,
            196, 209, 86, 114, 184, 167, 129, 164, 239, 205, 211, 82, 173, 189, 153, 198, 67, 4, 3,
            90, 52, 128, 134, 176, 145, 85, 9, 250, 30, 63, 247, 240, 17, 215, 200, 78, 188, 132,
            117, 10, 45, 162, 79, 123, 73, 109, 91, 57, 210, 22, 175, 107, 203, 103, 32, 83, 70,
            242, 75, 220, 140, 148, 15, 138, 44, 228, 43, 105, 199, 99, 116, 97, 69, 80, 172, 230,
            25, 224, 33, 31, 135, 235, 74, 193, 238, 233, 88, 216, 204, 24, 163, 141, 6, 201, 26,
            38, 21, 186, 237, 101, 206, 212, 76, 144, 219, 149, 169, 202, 110, 41, 166, 139, 194,
            168, 34, 142, 147, 187, 108, 223, 94, 5, 243, 226, 60, 40, 102, 51, 87, 61, 236, 46,
            159, 64, 227, 113, 190, 81, 127, 65, 8, 183, 253, 150, 249, 229, 37, 156, 182, 180,
            246, 124, 244, 174, 122, 89, 120, 160, 35, 143, 11, 14, 151, 133, 27, 177, 251, 221,
            207, 58, 29, 131, 119, 171, 157, 93, 185, 48, 112, 192, 191, 66, 106, 39, 59, 92, 19,
            1, 155, 254, 84, 222, 165, 54, 121, 13, 50, 36, 130, 95, 161, 213, 170, 28, 241, 71,
            53, 68, 218, 0, 252, 16, 136, 179, 158, 248, 2, 154, 12, 125, 126, 255, 18, 146, 104,
            77, 152, 208, 214, 72, 55, 195, 62, 7, 217, 56, 181,
        ];
        assert_eq!(namer.val.to_vec(), val_vec);
    }

    #[test]
    fn base_name_test() {
        let team = TeamNamer::new_unchecked("x");
        let namer = Namer::new_from_team_namer_unchecked(&team, "x");

        let base_name_vec: Vec<u8> = vec![
            53, 0, 40, 4, 58, 61, 37, 46, 56, 51, 21, 20, 27, 17, 15, 26, 13, 30, 52, 63, 36, 30,
            57, 34, 22, 37, 35, 6, 12, 25, 50, 49, 59, 23, 49, 27, 51, 58, 39, 28, 60, 20, 31, 36,
            41, 11, 7, 29, 24, 24, 61, 62, 57, 4, 28, 48, 55, 50, 38, 29, 10, 40, 42, 15, 23, 47,
            42, 62, 47, 1, 60, 5, 43, 21, 1, 46, 45, 9, 9, 14, 38, 13, 56, 0, 31, 59, 39, 6, 35,
            41, 55, 5, 34, 3, 7, 33, 33, 45, 16, 16, 32, 43, 18, 44, 22, 14, 17, 10, 11, 53, 18,
            44, 19, 52, 2, 32, 12, 8, 2, 54, 26, 48, 8, 3, 63, 54, 19, 25,
        ];
        assert_eq!(namer.name_base.to_vec(), base_name_vec);
    }

    #[test]
    fn skill_prop_test() {
        let team = TeamNamer::new_unchecked("x");
        let mut namer = Namer::new_from_team_namer_unchecked(&team, "x");

        namer.update_skill();
        // println!("namer: {:?}", namer);
        println!("skill prop {:?}", namer.skl_freq);
        println!("skill id   {:?}", namer.skl_id);
        panic!()
    }

    #[test]
    fn prop_test() {
        let team = TeamNamer::new_unchecked("x");
        let namer = Namer::new_from_team_namer_unchecked(&team, "x");

        let prop_vec: Vec<u32> = vec![344, 57, 53, 66, 72, 70, 71, 61];
        assert_eq!(namer.name_prop.to_vec(), prop_vec);
    }
}