use super::{Tuner, TunerInfo};
use log::info;
use usb::RtlSdrDeviceHandle;

pub const TUNER_ID: &str = "r820t";
pub const TUNER_NAME: &str = "Rafael Micro R820T";

const I2C_ADDR: u8 = 0x34;
const CHECK_ADDR: u8 = 0x00;
const CHECK_VAL: u8 = 0x69;
const IF_FREQ: u32 = 3570000;
const REG_SHADOW_START: usize = 5;
const NUM_REGS: usize = 30;
const NUM_IMR: usize = 5;
const IMR_TRIAL: u8 = 9;

enum Chip {
    R820T,
    R620D,
    R828D,
    R828,
    R828S,
    R820C,
}

enum TunerType {
    Radio,
    AnalogTv,
    DigitalTv,
}

enum XtalCapValue {
    XtalLowCap30P,
    XtalLowCap20P,
    XtalLowCap10P,
    XtalLowCap0P,
    XtalHighCap0P,
}

pub struct FreqRange {
    freq: u32,
    open_d: u8,
    rf_mux_ploy: u8,
    tf_c: u8,
    xtal_cap20p: u8,
    xtal_cap10p: u8,
    xtal_cap0p: u8,
}

pub struct Config {
    i2c_addr: u8,
    xtal: u32,
    chip: Chip,
    max_i2c_msg_len: u16,
    use_predetect: i16, // bool?
}

pub struct R820T {
    pub device: TunerInfo,
    regs: [u8; NUM_REGS],
    buf: [u8; NUM_REGS + 1],
    // xtal_cal_sel: XtalCapValue,
    // pll: u16, // kHz
    int_freq: u32,
    // fil_cal_code: u8,
    // input: u8,
    // has_lock: i16,  // bool?
    // init_done: i16, // bool?
    // delsys: u32,
    // tuner_type: TunerType,
    // bw: u32, // MHz
}

pub const TUNER_INFO: TunerInfo = TunerInfo {
    id: TUNER_ID,
    name: TUNER_NAME,
    i2c_addr: I2C_ADDR,
    check_addr: CHECK_ADDR,
    check_val: CHECK_VAL,
    // gains: vec![
    //     0, 9, 14, 27, 37, 77, 87, 125, 144, 157, 166, 197, 207, 229, 254, 280, 297, 328, 338, 364,
    //     372, 386, 402, 421, 434, 439, 445, 480, 496,
    // ],
};

// starts from REG_SHADOW_START
const INITIAL_REGS: [u8; NUM_REGS - 3] = [
    0x83, 0x32, 0x75, 0xc0, 0x40, 0xd6, 0x6c, 0xf5, 0x63, 0x75, 0x68, 0x6c, 0x83, 0x80, 0x00, 0x0f,
    0x00, 0xc0, 0x30, 0x48, 0xcc, 0x60, 0x00, 0x54, 0xae, 0x4a, 0xc0,
];

const _FREQ_RANGES: [(u32, u8, u8, u8, u8, u8, u8); 21] = [
    (000, 0x08, 0x02, 0xdf, 0x02, 0x01, 0x00),
    (050, 0x08, 0x02, 0xbe, 0x02, 0x01, 0x00),
    (055, 0x08, 0x02, 0x8b, 0x02, 0x01, 0x00),
    (060, 0x08, 0x02, 0x7b, 0x02, 0x01, 0x00),
    (065, 0x08, 0x02, 0x69, 0x02, 0x01, 0x00),
    (070, 0x08, 0x02, 0x58, 0x02, 0x01, 0x00),
    (075, 0x00, 0x02, 0x44, 0x02, 0x01, 0x00),
    (080, 0x00, 0x02, 0x44, 0x02, 0x01, 0x00),
    (090, 0x00, 0x02, 0x34, 0x01, 0x01, 0x00),
    (100, 0x00, 0x02, 0x34, 0x01, 0x01, 0x00),
    (110, 0x00, 0x02, 0x24, 0x01, 0x01, 0x00),
    (120, 0x00, 0x02, 0x24, 0x01, 0x01, 0x00),
    (140, 0x00, 0x02, 0x14, 0x01, 0x01, 0x00),
    (180, 0x00, 0x02, 0x13, 0x00, 0x00, 0x00),
    (220, 0x00, 0x02, 0x13, 0x00, 0x00, 0x00),
    (250, 0x00, 0x02, 0x11, 0x00, 0x00, 0x00),
    (280, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00),
    (310, 0x00, 0x41, 0x00, 0x00, 0x00, 0x00),
    (450, 0x00, 0x41, 0x00, 0x00, 0x00, 0x00),
    (588, 0x00, 0x40, 0x00, 0x00, 0x00, 0x00),
    (650, 0x00, 0x40, 0x00, 0x00, 0x00, 0x00),
];

const LOW_PASS_BW_TABLE: [u32; 10] = [
    1700000, 1600000, 1550000, 1450000, 1200000, 900000, 700000, 550000, 450000, 350000,
];

fn get_freq_range(freq: u32) -> FreqRange {
    let open_d = match freq {
        0..=69 => 0x08,
        _ => 0x00,
    };
    let rf_mux_ploy = match freq {
        0..=279 => 0x02,
        280..=449 => 0x41,
        _ => 0x40,
    };
    let tf_c = match freq {
        0 => 0xdf,
        1..=49 => 0xbe,
        50..=54 => 0x8b,
        55..=59 => 0x7b,
        60..=64 => 0x69,
        65..=69 => 0x58,
        70..=79 => 0x44,
        80..=99 => 0x34,
        100..=119 => 0x24,
        120..=139 => 0x14,
        140..=219 => 0x13,
        220..=249 => 0x11,
        _ => 0x00,
    };
    let xtal_cap20p = match freq {
        0..=79 => 0x02,
        80..=139 => 0x01,
        _ => 0x00,
    };
    let xtal_cap10p = match freq {
        0..=139 => 0x01,
        _ => 0x00,
    };
    let xtal_cap0p = 0x00;

    FreqRange {
        freq,
        open_d,
        rf_mux_ploy,
        tf_c,
        xtal_cap20p,
        xtal_cap10p,
        xtal_cap0p,
    }
}

const _XTAL_CAPS: [(u8, XtalCapValue); 5] = [
    (0x0b, XtalCapValue::XtalLowCap30P),
    (0x02, XtalCapValue::XtalLowCap20P),
    (0x01, XtalCapValue::XtalLowCap10P),
    (0x00, XtalCapValue::XtalLowCap0P),
    (0x10, XtalCapValue::XtalHighCap0P),
];

impl R820T {
    pub fn new(handle: &RtlSdrDeviceHandle) -> R820T {
        let tuner = R820T {
            device: TUNER_INFO,
            regs: [0; NUM_REGS],
            buf: [0; NUM_REGS + 1],
            // xtal_cal_sel: XtalCapValue::XtalHighCap0P,
            // pll: u16, // kHz
            int_freq: 0,
            // fil_cal_code: u8,
            // input: u8,
            // has_lock: i16,  // bool?
            // init_done: i16, // bool?
            // delsys: u32,
            // tuner_type: TunerType,
            // bw: u32, // MHz
        };
        tuner.init(handle);
        tuner
    }

    fn init(&self, handle: &RtlSdrDeviceHandle) {
        // disable Zero-IF mode
        handle.demod_write_reg(1, 0xb1, 0x1a, 1);

        // only enable In-phase ADC input
        handle.demod_write_reg(0, 0x08, 0x4d, 1);

        // the R82XX use 3.57 MHz IF for the DVB-T 6 MHz mode, and
        // 4.57 MHz for the 8 MHz mode
        handle.set_if_freq(IF_FREQ);

        // enable spectrum inversion
        handle.demod_write_reg(1, 0x15, 0x01, 1);
    }

    fn shadow_store(&self, reg: u8, _val: u8, _len: usize) {
        let _r = reg as usize - REG_SHADOW_START;
        // if r < 0 {
        //     len = len + r;
        // }
    }

    fn write(&self, _reg: u8, _val: u8) -> u8 {
        1
    }

    fn write_reg() {}

    fn read_cache_reg(&self, reg: u8) -> Option<u8> {
        let reg: usize = reg as usize - REG_SHADOW_START;
        match reg >= 0 && reg < NUM_REGS {
            true => Some(self.regs[reg]),
            false => None,
        }
    }

    fn write_reg_mask(&self, reg: u8, val: u8, bit_mask: u8) -> u8 {
        let rc = self.read_cache_reg(reg).unwrap();
        let val = (rc & !bit_mask) | (val & bit_mask);
        self.write(reg, val)
    }

    fn bitrev(byte: usize) -> u8 {
        let lut: [u8; 16] = [
            0x0, 0x8, 0x4, 0xc, 0x2, 0xa, 0x6, 0xe, 0x1, 0x9, 0x5, 0xd, 0x3, 0xb, 0x7, 0xf,
        ];
        (lut[byte & 0xf] << 4) | lut[byte >> 4]
    }

    fn read(&self, _reg: u8, _val: u8, _len: usize) {
        let p: u8 = self.buf[1];
        // self.buf[0] = reg;
        // self.handle.i2c_write(self.device.i2c_addr, &p);
    }

    pub fn exit(&self) {
        info!("Tuner r820t exiting...");
    }
}

impl Drop for R820T {
    fn drop(&mut self) {
        self.exit();
    }
}

impl Tuner for R820T {
    fn init(&self, handle: &RtlSdrDeviceHandle) {
        // disable Zero-IF mode
        handle.demod_write_reg(1, 0xb1, 0x1a, 1);

        // only enable In-phase ADC input
        handle.demod_write_reg(0, 0x08, 0x4d, 1);

        // the R82XX use 3.57 MHz IF for the DVB-T 6 MHz mode, and
        // 4.57 MHz for the 8 MHz mode
        handle.set_if_freq(IF_FREQ);

        // enable spectrum inversion
        handle.demod_write_reg(1, 0x15, 0x01, 1);
    }

    fn exit(&self, _handle: &RtlSdrDeviceHandle) {}

    fn set_frequency(&self, _freq: u32, _handle: &RtlSdrDeviceHandle) {
        unimplemented!()
    }

    fn set_bandwidth(&mut self, mut bw: u32, _handle: &RtlSdrDeviceHandle) {
        const FILT_HP_BW1: u32 = 350000;
        const FILT_HP_BW2: u32 = 380000;

        let mut real_bw: u32 = 0;
        let reg_0a: u8;
        let mut reg_0b: u8;

        if bw > 7000000 {
            reg_0a = 0x10;
            reg_0b = 0x0b;
            self.int_freq = 4570000;
        } else if bw > 6000000 {
            reg_0a = 0x10;
            reg_0b = 0x2a;
            self.int_freq = 4570000;
        } else if bw > LOW_PASS_BW_TABLE[0] + FILT_HP_BW1 + FILT_HP_BW2 {
            reg_0a = 0x10;
            reg_0b = 0x6b;
            self.int_freq = 3570000;
        } else {
            reg_0a = 0x00;
            reg_0b = 0x80;
            self.int_freq = 2300000;

            if bw > LOW_PASS_BW_TABLE[0] + FILT_HP_BW1 {
                bw -= FILT_HP_BW2;
                self.int_freq += FILT_HP_BW2;
                real_bw += FILT_HP_BW2;
            } else {
                reg_0b |= 0x20;
            }

            if bw > LOW_PASS_BW_TABLE[0] {
                bw -= FILT_HP_BW1;
                self.int_freq += FILT_HP_BW1;
                real_bw += FILT_HP_BW1;
            } else {
                reg_0b |= 0x40;
            }

            let mut j = 0;
            for (i, lpfreq) in LOW_PASS_BW_TABLE.iter().enumerate() {
                if bw > *lpfreq {
                    j = i - 1;
                    break;
                }
            }
            // can probably clean this up
            reg_0b |= 15 - (j as u8);
            real_bw += LOW_PASS_BW_TABLE[j];

            self.int_freq -= real_bw / 2;
        }

        self.write_reg_mask(0x0a, reg_0a, 0x10);
        self.write_reg_mask(0x0b, reg_0b, 0xef);
    }

    fn set_gain(&self, _gain: u32, _handle: &RtlSdrDeviceHandle) {
        unimplemented!()
    }

    fn set_if_gain(&self, _if_gain: u32, _handle: &RtlSdrDeviceHandle) {
        unimplemented!()
    }

    fn set_gain_mode(&self, _mode: bool, _handle: &RtlSdrDeviceHandle) {
        unimplemented!()
    }

    fn display(&self) -> &str {
        self.device.name
    }
}