[nihav.git] / src / codecs / h263 / rv20.rs

use crate::io::bitreader::*;
use crate::io::codebook::*;
use crate::formats;
use super::super::*;
use super::*;
use super::code::H263BlockDSP;
use super::decoder::*;
use super::data::*;

#[allow(dead_code)]
struct Tables {
    intra_mcbpc_cb: Codebook<u8>,
    inter_mcbpc_cb: Codebook<u8>,
    mbtype_b_cb:    Codebook<u8>,
    cbpy_cb:        Codebook<u8>,
    cbpc_b_cb:      Codebook<u8>,
    rl_cb:          Codebook<H263RLSym>,
    aic_rl_cb:      Codebook<H263RLSym>,
    mv_cb:          Codebook<u8>,
}

#[derive(Clone,Copy)]
struct RPRInfo {
    present:    bool,
    bits:       u8,
    widths:     [usize; 8],
    heights:    [usize; 8],
}

struct RealVideo20Decoder {
    info:       Rc<NACodecInfo>,
    dec:        H263BaseDecoder,
    tables:     Tables,
    w:          usize,
    h:          usize,
    minor_ver:  u8,
    rpr:        RPRInfo,
    bdsp:       H263BlockDSP,
}

struct RealVideo20BR<'a> {
    br:         BitReader<'a>,
    tables:     &'a Tables,
    num_slices: usize,
    slice_no:   usize,
    slice_off:  Vec<u32>,
    w:          usize,
    h:          usize,
    mb_w:       usize,
    mb_h:       usize,
    mb_pos_bits: u8,
    minor_ver:  u8,
    rpr:        RPRInfo,
}

struct RV20SliceInfo {
    ftype:  Type,
    seq:    u32,
    qscale: u8,
    mb_x:   usize,
    mb_y:   usize,
    mb_pos: usize,
    w:      usize,
    h:      usize,
}

impl RV20SliceInfo {
    fn new(ftype: Type, seq: u32, qscale: u8, mb_x: usize, mb_y: usize, mb_pos: usize, w: usize, h: usize) -> Self {
        RV20SliceInfo { ftype: ftype, seq: seq, qscale: qscale, mb_x: mb_x, mb_y: mb_y, mb_pos: mb_pos, w: w, h: h }
    }
}

impl<'a> RealVideo20BR<'a> {
    fn new(src: &'a [u8], tables: &'a Tables, width: usize, height: usize, minor_ver: u8, rpr: RPRInfo) -> Self {
        let nslices = (src[0] as usize) + 1;
        let mut slice_offs = Vec::with_capacity(nslices);
        {
            let offs = &src[1..][..nslices * 8];
            let mut br = BitReader::new(offs, offs.len(), BitReaderMode::BE);
            for _ in 0..nslices {
                br.skip(32).unwrap();
                let off = br.read(32).unwrap();
                slice_offs.push(off);
            }
        }
        let soff = nslices * 8 + 1;
        let mb_w = (width  + 15) >> 4;
        let mb_h = (height + 15) >> 4;
        let max_pos = mb_w * mb_h - 1;
        let mut mbpb = 0;
        for i in 0..H263_MBB.len() {
            if max_pos <= H263_MBB[i].blocks {
                mbpb = H263_MBB[i].bits;
                break;
            }
        }
        RealVideo20BR {
            br:         BitReader::new(&src[soff..], src.len() - soff, BitReaderMode::BE),
            tables:     tables,
            num_slices: nslices,
            slice_no:   0,
            slice_off:  slice_offs,
            w:          width,
            h:          height,
            mb_w:       mb_w,
            mb_h:       mb_h,
            mb_pos_bits: mbpb,
            minor_ver:  minor_ver,
            rpr:        rpr,
        }
    }

#[allow(unused_variables)]
    fn decode_block(&mut self, sstate: &SliceState, quant: u8, intra: bool, coded: bool, blk: &mut [i16; 64], plane_no: usize, acpred: ACPredMode) -> DecoderResult<()> {
        let br = &mut self.br;
        let mut idx = 0;
        if !sstate.is_iframe && intra {
            let mut dc = br.read(8)? as i16;
            if dc == 255 { dc = 128; }
            blk[0] = dc << 3;
            idx = 1;
        }
        if !coded { return Ok(()); }
        let scan = match acpred {
                    ACPredMode::Hor => H263_SCAN_V,
                    ACPredMode::Ver => H263_SCAN_H,
                    _               => H263_ZIGZAG,
                };

        let rl_cb = if sstate.is_iframe { &self.tables.aic_rl_cb } else { &self.tables.rl_cb };
        let q_add = if quant == 0 || sstate.is_iframe { 0i16 } else { ((quant - 1) | 1) as i16 };
        let q = if plane_no == 0 { (quant * 2) as i16 } else { H263_CHROMA_QUANT[quant as usize] as i16 };
        while idx < 64 {
            let code = br.read_cb(rl_cb)?;
            let run;
            let mut level;
            let last;
            if !code.is_escape() {
                run   = code.get_run();
                level = code.get_level();
                last  = code.is_last();
                if br.read_bool()? { level = -level; }
                level = (level * q) + q_add;
            } else {
                last  = br.read_bool()?;
                run   = br.read(6)? as u8;
                level = br.read_s(8)? as i16;
                if level == -128 {
                    let low = br.read(5)? as i16;
                    let top = br.read_s(6)? as i16;
                    level = (top << 5) | low;
                }
                level = (level * q) + q_add;
                if level < -2048 { level = -2048; }
                if level >  2047 { level =  2047; }
            }
            idx += run;
            validate!(idx < 64);
            let oidx = scan[idx as usize];
            blk[oidx] = level;
            idx += 1;
            if last { break; }
        }
        Ok(())
    }
}

fn decode_mv_component(br: &mut BitReader, mv_cb: &Codebook<u8>) -> DecoderResult<i16> {
    let code = br.read_cb(mv_cb)? as i16;
    if code == 0 { return Ok(0) }
    if !br.read_bool()? {
        Ok(code)
    } else {
        Ok(-code)
    }
}

fn decode_mv(br: &mut BitReader, mv_cb: &Codebook<u8>) -> DecoderResult<MV> {
    let xval = decode_mv_component(br, mv_cb)?;
    let yval = decode_mv_component(br, mv_cb)?;
    Ok(MV::new(xval, yval))
}

fn read_dquant(br: &mut BitReader, q: u8) -> DecoderResult<u8> {
    if br.read_bool()? {
        Ok(H263_MODIFIED_QUANT[br.read(1)? as usize][q as usize])
    } else {
        Ok(br.read(5)? as u8)
    }
}

impl<'a> BlockDecoder for RealVideo20BR<'a> {

#[allow(unused_variables)]
    fn decode_pichdr(&mut self) -> DecoderResult<PicInfo> {
        self.slice_no = 0;
        let shdr = self.read_slice_header()?;
//        self.slice_no += 1;
        validate!((shdr.mb_x == 0) && (shdr.mb_y == 0));
/*        let mb_count;
        if self.slice_no < self.num_slices {
            let pos = self.br.tell();
            let shdr2 = self.read_slice_header()?;
            self.br.seek(pos as u32)?;
            mb_count = shdr2.mb_pos - shdr.mb_pos;
        } else {
            mb_count = self.mb_w * self.mb_h;
        }*/

        let plusinfo = Some(PlusInfo::new(shdr.ftype == Type::I, false, false, false));
        let picinfo = PicInfo::new(shdr.w, shdr.h, shdr.ftype, MVMode::Long, false, false, shdr.qscale, shdr.seq as u16, None, plusinfo);
        Ok(picinfo)
    }

    #[allow(unused_variables)]
    fn decode_slice_header(&mut self, info: &PicInfo) -> DecoderResult<SliceInfo> {
        let shdr = self.read_slice_header()?;
        self.slice_no += 1;
        let mb_count;
        if self.slice_no < self.num_slices {
            let pos = self.br.tell();
            let shdr2 = self.read_slice_header()?;
            mb_count = shdr2.mb_pos - shdr.mb_pos;
            self.br.seek(pos as u32)?;
        } else {
            mb_count = self.mb_w * self.mb_h - shdr.mb_pos;
        }
        let ret = SliceInfo::new(shdr.mb_x, shdr.mb_y, shdr.mb_pos + mb_count, shdr.qscale);

        Ok(ret)
    }

    fn decode_block_header(&mut self, info: &PicInfo, _slice: &SliceInfo, sstate: &SliceState) -> DecoderResult<BlockInfo> {
        let br = &mut self.br;
        let mut q = sstate.quant;
        match info.get_mode() {
            Type::I => {
                    let mut cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?;
                    while cbpc == 8 { cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?; }
                    let mut acpred = ACPredMode::None;
                    if let Some(ref pi) = info.plusinfo {
                        if pi.aic {
                            let acpp = br.read_bool()?;
                            acpred = ACPredMode::DC;
                            if acpp {
                                acpred = if br.read_bool()? { ACPredMode::Hor } else { ACPredMode::Ver };
                            }
                        }
                    }
                    let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
                    let cbp = (cbpy << 2) | (cbpc & 3);
                    let dquant = (cbpc & 4) != 0;
                    if dquant {
                        q = read_dquant(br, q)?;
                    }
                    let mut binfo = BlockInfo::new(Type::I, cbp, q);
                    binfo.set_acpred(acpred);
                    Ok(binfo)
                },
            Type::P => {
                    if br.read_bool()? {
                        return Ok(BlockInfo::new(Type::Skip, 0, info.get_quant()));
                    }
                    let mut cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?;
                    while cbpc == 20 { cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?; }
                    let is_intra = (cbpc & 0x04) != 0;
                    let dquant   = (cbpc & 0x08) != 0;
                    let is_4x4   = (cbpc & 0x10) != 0;
                    if is_intra {
                        let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
                        let cbp = (cbpy << 2) | (cbpc & 3);
                        if dquant {
                            q = read_dquant(br, q)?;
                        }
                        let binfo = BlockInfo::new(Type::I, cbp, q);
                        return Ok(binfo);
                    }

                    let mut cbpy = br.read_cb(&self.tables.cbpy_cb)?;
//                    if /* !aiv && */(cbpc & 3) != 3 {
                        cbpy ^= 0xF;
//                    }
                    let cbp = (cbpy << 2) | (cbpc & 3);
                    if dquant {
                        q = read_dquant(br, q)?;
                    }
                    let mut binfo = BlockInfo::new(Type::P, cbp, q);
                    if !is_4x4 {
                        let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
                        binfo.set_mv(&mvec);
                    } else {
                        let mvec: [MV; 4] = [
                                decode_mv(br, &self.tables.mv_cb)?,
                                decode_mv(br, &self.tables.mv_cb)?,
                                decode_mv(br, &self.tables.mv_cb)?,
                                decode_mv(br, &self.tables.mv_cb)?
                            ];
                        binfo.set_mv(&mvec);
                    }
                    Ok(binfo)
                },
            Type::B => { // B
                    let mut mbtype = br.read_cb(&self.tables.mbtype_b_cb)? as usize;
                    while mbtype == 14 { mbtype = br.read_cb(&self.tables.mbtype_b_cb)? as usize; }

                    let is_coded  = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_CODED) != 0;
                    let is_intra  = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_INTRA) != 0;
                    let dquant    = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_DQUANT) != 0;
                    let is_fwd    = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_FORWARD) != 0;
                    let is_bwd    = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_BACKWARD) != 0;

                    let cbp = if is_coded {
                            let cbpc = br.read_cb(&self.tables.cbpc_b_cb)?;
                            let mut cbpy = br.read_cb(&self.tables.cbpy_cb)?;
                            if !is_intra { cbpy ^= 0xF; }
                            (cbpy << 2) | (cbpc & 3)
                        } else { 0 };

                    if dquant {
                        q = read_dquant(br, q)?;
                    }

                    if is_intra {
                        let binfo = BlockInfo::new(Type::I, cbp, q);
                        return Ok(binfo);
                    }

                    let mut binfo = BlockInfo::new(Type::B, cbp, q);
                    if is_fwd {
                        let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
                        binfo.set_mv(&mvec);
                    }
                    if is_bwd {
                        let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
                        binfo.set_b_mv(&mvec);
                    }
                    Ok(binfo)
                },
            _ => { unreachable!(); },
        }
    }

    fn decode_block_intra(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
        self.decode_block(sstate, quant, true, coded, blk, if no < 4 { 0 } else { no - 3 }, info.get_acpred())
    }

    #[allow(unused_variables)]
    fn decode_block_inter(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
        self.decode_block(sstate, quant, false, coded, blk, if no < 4 { 0 } else { no - 3 }, ACPredMode::None)
    }

    fn is_slice_end(&mut self) -> bool { false }
}

impl<'a> RealVideo20BR<'a> {
#[allow(unused_variables)]
    fn read_slice_header(&mut self) -> DecoderResult<RV20SliceInfo> {
        validate!(self.slice_no < self.num_slices);

        let br = &mut self.br;
        br.seek(self.slice_off[self.slice_no] * 8)?;

        let frm_type    = br.read(2)?;
        let ftype = match frm_type {
                0 | 1 => { Type::I },
                2     => { Type::P },
                _     => { Type::B },
            };

        let marker      = br.read(1)?;
        validate!(marker == 0);
        let qscale      = br.read(5)? as u8;
        validate!(qscale > 0);
        if self.minor_ver >= 2 {
            br.skip(1)?; // loop filter
        }
        let seq = if self.minor_ver <= 1 {
                br.read(8)?  << 8
            } else {
                br.read(13)? << 3
            };
        let w;
        let h;
        if self.rpr.present {
            let rpr = br.read(self.rpr.bits)? as usize;
            if rpr == 0 {
                w = self.w;
                h = self.h;
            } else {
                w = self.rpr.widths[rpr - 1];
                h = self.rpr.heights[rpr - 1];
                validate!((w != 0) && (h != 0));
            }
        } else {
            w = self.w;
            h = self.h;
        }

        let mb_pos = br.read(self.mb_pos_bits)? as usize;
        let mb_x = mb_pos % self.mb_w;
        let mb_y = mb_pos / self.mb_w;

        br.skip(1)?; // no rounding

        if (self.minor_ver <= 1) && (frm_type == 3) {
            br.skip(5)?;
        }

        Ok(RV20SliceInfo::new(ftype, seq, qscale, mb_x, mb_y, mb_pos, w, h))
    }
}

impl RealVideo20Decoder {
    fn new() -> Self {
        let mut coderead = H263ShortCodeReader::new(H263_INTRA_MCBPC);
        let intra_mcbpc_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263ShortCodeReader::new(H263_INTER_MCBPC);
        let inter_mcbpc_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263ShortCodeReader::new(H263_MBTYPE_B);
        let mbtype_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263ShortCodeReader::new(H263_CBPY);
        let cbpy_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263ShortCodeReader::new(H263_CBPC_B);
        let cbpc_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263RLCodeReader::new(H263_RL_CODES);
        let rl_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263RLCodeReader::new(H263_RL_CODES_AIC);
        let aic_rl_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
        let mut coderead = H263ShortCodeReader::new(H263_MV);
        let mv_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();

        let tables = Tables {
            intra_mcbpc_cb: intra_mcbpc_cb,
            inter_mcbpc_cb: inter_mcbpc_cb,
            mbtype_b_cb:    mbtype_b_cb,
            cbpy_cb:        cbpy_cb,
            cbpc_b_cb:      cbpc_b_cb,
            rl_cb:          rl_cb,
            aic_rl_cb:      aic_rl_cb,
            mv_cb:          mv_cb,
        };

        RealVideo20Decoder{
            info:           Rc::new(DUMMY_CODEC_INFO),
            dec:            H263BaseDecoder::new_b_frames(false),
            tables:         tables,
            w:              0,
            h:              0,
            minor_ver:      0,
            rpr:            RPRInfo { present: false, bits: 0, widths: [0; 8], heights: [0; 8] },
            bdsp:           H263BlockDSP::new(),
        }
    }
}

impl NADecoder for RealVideo20Decoder {
#[allow(unused_variables)]
    fn init(&mut self, info: Rc<NACodecInfo>) -> DecoderResult<()> {
        if let NACodecTypeInfo::Video(vinfo) = info.get_properties() {
            let w = vinfo.get_width();
            let h = vinfo.get_height();
            let fmt = formats::YUV420_FORMAT;
            let myinfo = NACodecTypeInfo::Video(NAVideoInfo::new(w, h, false, fmt));
            self.info = Rc::new(NACodecInfo::new_ref(info.get_name(), myinfo, info.get_extradata()));
            self.w = w;
            self.h = h;

            let edata = info.get_extradata().unwrap();
            let src: &[u8] = &edata;
            let ver = ((src[4] as u32) << 12) | ((src[5] as u32) << 4) | ((src[6] as u32) >> 4);
            let maj_ver = ver >> 16;
            let min_ver = (ver >> 8) & 0xFF;
            let mic_ver = ver & 0xFF;
            validate!(maj_ver == 2);
            self.minor_ver = min_ver as u8;
            let rprb = src[1] & 7;
            if rprb == 0 {
                self.rpr.present = false;
            } else {
                self.rpr.present = true;
                self.rpr.bits    = ((rprb >> 1) + 1) as u8;
                for i in 4..(src.len()/2) {
                    self.rpr.widths [i - 4] = (src[i * 2]     as usize) * 4;
                    self.rpr.heights[i - 4] = (src[i * 2 + 1] as usize) * 4;
                }
            }
            Ok(())
        } else {
            Err(DecoderError::InvalidData)
        }
    }
    fn decode(&mut self, pkt: &NAPacket) -> DecoderResult<NAFrameRef> {
        let src = pkt.get_buffer();

        let mut ibr = RealVideo20BR::new(&src, &self.tables, self.w, self.h, self.minor_ver, self.rpr);

        let bufinfo = self.dec.parse_frame(&mut ibr, &self.bdsp)?;

        let mut frm = NAFrame::new_from_pkt(pkt, self.info.clone(), bufinfo);
        frm.set_keyframe(self.dec.is_intra());
        frm.set_frame_type(self.dec.get_frame_type());
        Ok(Rc::new(RefCell::new(frm)))
    }
}

struct MBB { blocks: usize, bits: u8 }
const H263_MBB: &[MBB; 7] = &[
    MBB{ blocks:    47, bits:  6 },
    MBB{ blocks:    98, bits:  7 },
    MBB{ blocks:   395, bits:  9 },
    MBB{ blocks:  1583, bits: 11 },
    MBB{ blocks:  6335, bits: 13 },
    MBB{ blocks:  9215, bits: 14 },
    MBB{ blocks: 65536, bits: 14 },
];

pub fn get_decoder() -> Box<NADecoder> {
    Box::new(RealVideo20Decoder::new())
}

#[cfg(test)]
mod test {
    use crate::test::dec_video::test_file_decoding;
    #[test]
    fn test_rv20() {
        test_file_decoding("realmedia", "assets/RV/rv20_svt_atrc_640x352_realproducer_plus_8.51.rm", /*None*/Some(3000), true, false, None/*Some("rv20")*/);
//        test_file_decoding("realmedia", "assets/RV/rv20_cook_640x352_realproducer_plus_8.51.rm", /*None*/Some(1000), true, false, Some("rv20"));
    }
}
Commit	Line	Data
aca89041 KS	1	use crate::io::bitreader::*;
	2	use crate::io::codebook::*;
	3	use crate::formats;
be91b1c3 KS	4	use super::super::*;
be91b1c3 KS	5	use super::*;
2a2aa421	6	use super::code::H263BlockDSP;
be91b1c3 KS	7	use super::decoder::*;
	8	use super::data::*;
	9
	10	#[allow(dead_code)]
	11	struct Tables {
	12	intra_mcbpc_cb: Codebook<u8>,
	13	inter_mcbpc_cb: Codebook<u8>,
507f4b11	14	mbtype_b_cb: Codebook<u8>,
be91b1c3	15	cbpy_cb: Codebook<u8>,
507f4b11	16	cbpc_b_cb: Codebook<u8>,
be91b1c3 KS	17	rl_cb: Codebook<H263RLSym>,
	18	aic_rl_cb: Codebook<H263RLSym>,
	19	mv_cb: Codebook<u8>,
	20	}
	21
	22	#[derive(Clone,Copy)]
	23	struct RPRInfo {
	24	present: bool,
	25	bits: u8,
	26	widths: [usize; 8],
	27	heights: [usize; 8],
	28	}
	29
	30	struct RealVideo20Decoder {
	31	info: Rc<NACodecInfo>,
	32	dec: H263BaseDecoder,
	33	tables: Tables,
	34	w: usize,
	35	h: usize,
	36	minor_ver: u8,
	37	rpr: RPRInfo,
2a2aa421	38	bdsp: H263BlockDSP,
be91b1c3 KS	39	}
	40
	41	struct RealVideo20BR<'a> {
	42	br: BitReader<'a>,
	43	tables: &'a Tables,
	44	num_slices: usize,
	45	slice_no: usize,
	46	slice_off: Vec<u32>,
	47	w: usize,
	48	h: usize,
	49	mb_w: usize,
	50	mb_h: usize,
be91b1c3	51	mb_pos_bits: u8,
be91b1c3 KS	52	minor_ver: u8,
be91b1c3 KS	53	rpr: RPRInfo,
be91b1c3 KS	54	}
	55
	56	struct RV20SliceInfo {
	57	ftype: Type,
32007ad9	58	seq: u32,
be91b1c3 KS	59	qscale: u8,
	60	mb_x: usize,
	61	mb_y: usize,
	62	mb_pos: usize,
	63	w: usize,
	64	h: usize,
	65	}
	66
	67	impl RV20SliceInfo {
32007ad9 KS	68	fn new(ftype: Type, seq: u32, qscale: u8, mb_x: usize, mb_y: usize, mb_pos: usize, w: usize, h: usize) -> Self {
32007ad9 KS	69	RV20SliceInfo { ftype: ftype, seq: seq, qscale: qscale, mb_x: mb_x, mb_y: mb_y, mb_pos: mb_pos, w: w, h: h }
be91b1c3 KS	70	}
	71	}
	72
	73	impl<'a> RealVideo20BR<'a> {
	74	fn new(src: &'a [u8], tables: &'a Tables, width: usize, height: usize, minor_ver: u8, rpr: RPRInfo) -> Self {
	75	let nslices = (src[0] as usize) + 1;
	76	let mut slice_offs = Vec::with_capacity(nslices);
	77	{
	78	let offs = &src[1..][..nslices * 8];
	79	let mut br = BitReader::new(offs, offs.len(), BitReaderMode::BE);
	80	for _ in 0..nslices {
	81	br.skip(32).unwrap();
	82	let off = br.read(32).unwrap();
	83	slice_offs.push(off);
	84	}
	85	}
	86	let soff = nslices * 8 + 1;
	87	let mb_w = (width + 15) >> 4;
	88	let mb_h = (height + 15) >> 4;
	89	let max_pos = mb_w * mb_h - 1;
	90	let mut mbpb = 0;
	91	for i in 0..H263_MBB.len() {
	92	if max_pos <= H263_MBB[i].blocks {
	93	mbpb = H263_MBB[i].bits;
	94	break;
	95	}
	96	}
	97	RealVideo20BR {
	98	br: BitReader::new(&src[soff..], src.len() - soff, BitReaderMode::BE),
	99	tables: tables,
	100	num_slices: nslices,
	101	slice_no: 0,
	102	slice_off: slice_offs,
	103	w: width,
	104	h: height,
	105	mb_w: mb_w,
	106	mb_h: mb_h,
	107	mb_pos_bits: mbpb,
be91b1c3 KS	108	minor_ver: minor_ver,
be91b1c3 KS	109	rpr: rpr,
be91b1c3 KS	110	}
	111	}
	112
2a2aa421	113	#[allow(unused_variables)]
0c3b4923	114	fn decode_block(&mut self, sstate: &SliceState, quant: u8, intra: bool, coded: bool, blk: &mut [i16; 64], plane_no: usize, acpred: ACPredMode) -> DecoderResult<()> {
9037cf6b	115	let br = &mut self.br;
be91b1c3	116	let mut idx = 0;
2a2aa421	117	if !sstate.is_iframe && intra {
fc26b944	118	let mut dc = br.read(8)? as i16;
be91b1c3 KS	119	if dc == 255 { dc = 128; }
	120	blk[0] = dc << 3;
	121	idx = 1;
	122	}
	123	if !coded { return Ok(()); }
0c3b4923 KS	124	let scan = match acpred {
	125	ACPredMode::Hor => H263_SCAN_V,
	126	ACPredMode::Ver => H263_SCAN_H,
	127	_ => H263_ZIGZAG,
	128	};
be91b1c3	129
2a2aa421	130	let rl_cb = if sstate.is_iframe { &self.tables.aic_rl_cb } else { &self.tables.rl_cb };
e3ace094	131	let q_add = if quant == 0 \|\| sstate.is_iframe { 0i16 } else { ((quant - 1) \| 1) as i16 };
43c8b55e	132	let q = if plane_no == 0 { (quant * 2) as i16 } else { H263_CHROMA_QUANT[quant as usize] as i16 };
be91b1c3	133	while idx < 64 {
fc26b944	134	let code = br.read_cb(rl_cb)?;
be91b1c3 KS	135	let run;
	136	let mut level;
	137	let last;
	138	if !code.is_escape() {
	139	run = code.get_run();
	140	level = code.get_level();
	141	last = code.is_last();
fc26b944	142	if br.read_bool()? { level = -level; }
32007ad9	143	level = (level * q) + q_add;
be91b1c3	144	} else {
fc26b944 KS	145	last = br.read_bool()?;
	146	run = br.read(6)? as u8;
	147	level = br.read_s(8)? as i16;
be91b1c3	148	if level == -128 {
fc26b944 KS	149	let low = br.read(5)? as i16;
fc26b944 KS	150	let top = br.read_s(6)? as i16;
be91b1c3 KS	151	level = (top << 5) \| low;
be91b1c3 KS	152	}
32007ad9	153	level = (level * q) + q_add;
be91b1c3 KS	154	if level < -2048 { level = -2048; }
	155	if level > 2047 { level = 2047; }
	156	}
	157	idx += run;
	158	validate!(idx < 64);
0c3b4923	159	let oidx = scan[idx as usize];
be91b1c3 KS	160	blk[oidx] = level;
	161	idx += 1;
	162	if last { break; }
	163	}
	164	Ok(())
	165	}
	166	}
	167
	168	fn decode_mv_component(br: &mut BitReader, mv_cb: &Codebook<u8>) -> DecoderResult<i16> {
fc26b944	169	let code = br.read_cb(mv_cb)? as i16;
be91b1c3	170	if code == 0 { return Ok(0) }
fc26b944	171	if !br.read_bool()? {
be91b1c3 KS	172	Ok(code)
	173	} else {
	174	Ok(-code)
	175	}
	176	}
	177
	178	fn decode_mv(br: &mut BitReader, mv_cb: &Codebook<u8>) -> DecoderResult<MV> {
fc26b944 KS	179	let xval = decode_mv_component(br, mv_cb)?;
fc26b944 KS	180	let yval = decode_mv_component(br, mv_cb)?;
be91b1c3 KS	181	Ok(MV::new(xval, yval))
	182	}
	183
43c8b55e KS	184	fn read_dquant(br: &mut BitReader, q: u8) -> DecoderResult<u8> {
	185	if br.read_bool()? {
	186	Ok(H263_MODIFIED_QUANT[br.read(1)? as usize][q as usize])
	187	} else {
	188	Ok(br.read(5)? as u8)
	189	}
	190	}
	191
be91b1c3 KS	192	impl<'a> BlockDecoder for RealVideo20BR<'a> {
	193
	194	#[allow(unused_variables)]
	195	fn decode_pichdr(&mut self) -> DecoderResult<PicInfo> {
	196	self.slice_no = 0;
fc26b944	197	let shdr = self.read_slice_header()?;
2a2aa421	198	// self.slice_no += 1;
be91b1c3	199	validate!((shdr.mb_x == 0) && (shdr.mb_y == 0));
2a2aa421	200	/* let mb_count;
be91b1c3 KS	201	if self.slice_no < self.num_slices {
be91b1c3 KS	202	let pos = self.br.tell();
fc26b944	203	let shdr2 = self.read_slice_header()?;
be91b1c3 KS	204	self.br.seek(pos as u32)?;
	205	mb_count = shdr2.mb_pos - shdr.mb_pos;
	206	} else {
	207	mb_count = self.mb_w * self.mb_h;
2a2aa421	208	}*/
be91b1c3	209
0c3b4923	210	let plusinfo = Some(PlusInfo::new(shdr.ftype == Type::I, false, false, false));
32007ad9	211	let picinfo = PicInfo::new(shdr.w, shdr.h, shdr.ftype, MVMode::Long, false, false, shdr.qscale, shdr.seq as u16, None, plusinfo);
be91b1c3 KS	212	Ok(picinfo)
	213	}
	214
	215	#[allow(unused_variables)]
2a2aa421	216	fn decode_slice_header(&mut self, info: &PicInfo) -> DecoderResult<SliceInfo> {
fc26b944	217	let shdr = self.read_slice_header()?;
be91b1c3 KS	218	self.slice_no += 1;
	219	let mb_count;
	220	if self.slice_no < self.num_slices {
0c3b4923	221	let pos = self.br.tell();
fc26b944	222	let shdr2 = self.read_slice_header()?;
be91b1c3	223	mb_count = shdr2.mb_pos - shdr.mb_pos;
0c3b4923	224	self.br.seek(pos as u32)?;
be91b1c3 KS	225	} else {
	226	mb_count = self.mb_w * self.mb_h - shdr.mb_pos;
	227	}
2a2aa421	228	let ret = SliceInfo::new(shdr.mb_x, shdr.mb_y, shdr.mb_pos + mb_count, shdr.qscale);
be91b1c3 KS	229
	230	Ok(ret)
	231	}
	232
43c8b55e	233	fn decode_block_header(&mut self, info: &PicInfo, _slice: &SliceInfo, sstate: &SliceState) -> DecoderResult<BlockInfo> {
9037cf6b	234	let br = &mut self.br;
43c8b55e	235	let mut q = sstate.quant;
be91b1c3 KS	236	match info.get_mode() {
be91b1c3 KS	237	Type::I => {
fc26b944 KS	238	let mut cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?;
fc26b944 KS	239	while cbpc == 8 { cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?; }
0c3b4923 KS	240	let mut acpred = ACPredMode::None;
	241	if let Some(ref pi) = info.plusinfo {
	242	if pi.aic {
	243	let acpp = br.read_bool()?;
	244	acpred = ACPredMode::DC;
0c3b4923 KS	245	if acpp {
	246	acpred = if br.read_bool()? { ACPredMode::Hor } else { ACPredMode::Ver };
	247	}
	248	}
0c3b4923	249	}
fc26b944	250	let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
be91b1c3 KS	251	let cbp = (cbpy << 2) \| (cbpc & 3);
	252	let dquant = (cbpc & 4) != 0;
	253	if dquant {
43c8b55e	254	q = read_dquant(br, q)?;
be91b1c3	255	}
0c3b4923 KS	256	let mut binfo = BlockInfo::new(Type::I, cbp, q);
	257	binfo.set_acpred(acpred);
	258	Ok(binfo)
be91b1c3 KS	259	},
be91b1c3 KS	260	Type::P => {
fc26b944	261	if br.read_bool()? {
be91b1c3 KS	262	return Ok(BlockInfo::new(Type::Skip, 0, info.get_quant()));
be91b1c3 KS	263	}
fc26b944 KS	264	let mut cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?;
fc26b944 KS	265	while cbpc == 20 { cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?; }
be91b1c3 KS	266	let is_intra = (cbpc & 0x04) != 0;
	267	let dquant = (cbpc & 0x08) != 0;
	268	let is_4x4 = (cbpc & 0x10) != 0;
	269	if is_intra {
fc26b944	270	let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
be91b1c3 KS	271	let cbp = (cbpy << 2) \| (cbpc & 3);
be91b1c3 KS	272	if dquant {
43c8b55e	273	q = read_dquant(br, q)?;
be91b1c3 KS	274	}
be91b1c3 KS	275	let binfo = BlockInfo::new(Type::I, cbp, q);
be91b1c3 KS	276	return Ok(binfo);
	277	}
	278
fc26b944	279	let mut cbpy = br.read_cb(&self.tables.cbpy_cb)?;
be91b1c3 KS	280	// if /* !aiv && */(cbpc & 3) != 3 {
	281	cbpy ^= 0xF;
	282	// }
	283	let cbp = (cbpy << 2) \| (cbpc & 3);
	284	if dquant {
43c8b55e	285	q = read_dquant(br, q)?;
be91b1c3	286	}
be91b1c3 KS	287	let mut binfo = BlockInfo::new(Type::P, cbp, q);
be91b1c3 KS	288	if !is_4x4 {
fc26b944	289	let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
be91b1c3 KS	290	binfo.set_mv(&mvec);
	291	} else {
	292	let mvec: [MV; 4] = [
fc26b944 KS	293	decode_mv(br, &self.tables.mv_cb)?,
	294	decode_mv(br, &self.tables.mv_cb)?,
	295	decode_mv(br, &self.tables.mv_cb)?,
	296	decode_mv(br, &self.tables.mv_cb)?
be91b1c3 KS	297	];
	298	binfo.set_mv(&mvec);
	299	}
be91b1c3 KS	300	Ok(binfo)
be91b1c3 KS	301	},
32007ad9	302	Type::B => { // B
507f4b11 KS	303	let mut mbtype = br.read_cb(&self.tables.mbtype_b_cb)? as usize;
	304	while mbtype == 14 { mbtype = br.read_cb(&self.tables.mbtype_b_cb)? as usize; }
	305
	306	let is_coded = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_CODED) != 0;
	307	let is_intra = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_INTRA) != 0;
	308	let dquant = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_DQUANT) != 0;
	309	let is_fwd = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_FORWARD) != 0;
	310	let is_bwd = (H263_MBTYPE_B_CAPS[mbtype] & H263_MBB_CAP_BACKWARD) != 0;
	311
	312	let cbp = if is_coded {
	313	let cbpc = br.read_cb(&self.tables.cbpc_b_cb)?;
	314	let mut cbpy = br.read_cb(&self.tables.cbpy_cb)?;
	315	if !is_intra { cbpy ^= 0xF; }
	316	(cbpy << 2) \| (cbpc & 3)
	317	} else { 0 };
1a151e53	318
507f4b11	319	if dquant {
43c8b55e	320	q = read_dquant(br, q)?;
507f4b11	321	}
507f4b11 KS	322
	323	if is_intra {
	324	let binfo = BlockInfo::new(Type::I, cbp, q);
	325	return Ok(binfo);
	326	}
	327
	328	let mut binfo = BlockInfo::new(Type::B, cbp, q);
	329	if is_fwd {
	330	let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
	331	binfo.set_mv(&mvec);
	332	}
	333	if is_bwd {
	334	let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
	335	binfo.set_b_mv(&mvec);
	336	}
	337	Ok(binfo)
	338	},
32007ad9	339	_ => { unreachable!(); },
be91b1c3 KS	340	}
	341	}
	342
2a2aa421	343	fn decode_block_intra(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
0c3b4923	344	self.decode_block(sstate, quant, true, coded, blk, if no < 4 { 0 } else { no - 3 }, info.get_acpred())
be91b1c3 KS	345	}
	346
	347	#[allow(unused_variables)]
2a2aa421	348	fn decode_block_inter(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
0c3b4923	349	self.decode_block(sstate, quant, false, coded, blk, if no < 4 { 0 } else { no - 3 }, ACPredMode::None)
be91b1c3 KS	350	}
be91b1c3 KS	351
2a2aa421	352	fn is_slice_end(&mut self) -> bool { false }
be91b1c3 KS	353	}
	354
	355	impl<'a> RealVideo20BR<'a> {
2a2aa421	356	#[allow(unused_variables)]
be91b1c3 KS	357	fn read_slice_header(&mut self) -> DecoderResult<RV20SliceInfo> {
	358	validate!(self.slice_no < self.num_slices);
	359
9037cf6b	360	let br = &mut self.br;
fc26b944	361	br.seek(self.slice_off[self.slice_no] * 8)?;
be91b1c3	362
fc26b944	363	let frm_type = br.read(2)?;
be91b1c3 KS	364	let ftype = match frm_type {
	365	0 \| 1 => { Type::I },
	366	2 => { Type::P },
507f4b11	367	_ => { Type::B },
be91b1c3 KS	368	};
be91b1c3 KS	369
fc26b944	370	let marker = br.read(1)?;
be91b1c3	371	validate!(marker == 0);
fc26b944	372	let qscale = br.read(5)? as u8;
be91b1c3 KS	373	validate!(qscale > 0);
be91b1c3 KS	374	if self.minor_ver >= 2 {
fc26b944	375	br.skip(1)?; // loop filter
be91b1c3 KS	376	}
be91b1c3 KS	377	let seq = if self.minor_ver <= 1 {
32007ad9	378	br.read(8)? << 8
be91b1c3	379	} else {
32007ad9	380	br.read(13)? << 3
be91b1c3 KS	381	};
	382	let w;
	383	let h;
	384	if self.rpr.present {
fc26b944	385	let rpr = br.read(self.rpr.bits)? as usize;
be91b1c3 KS	386	if rpr == 0 {
	387	w = self.w;
	388	h = self.h;
	389	} else {
7c37f176 KS	390	w = self.rpr.widths[rpr - 1];
7c37f176 KS	391	h = self.rpr.heights[rpr - 1];
be91b1c3 KS	392	validate!((w != 0) && (h != 0));
	393	}
	394	} else {
	395	w = self.w;
	396	h = self.h;
	397	}
	398
fc26b944	399	let mb_pos = br.read(self.mb_pos_bits)? as usize;
be91b1c3 KS	400	let mb_x = mb_pos % self.mb_w;
	401	let mb_y = mb_pos / self.mb_w;
	402
fc26b944	403	br.skip(1)?; // no rounding
be91b1c3 KS	404
be91b1c3 KS	405	if (self.minor_ver <= 1) && (frm_type == 3) {
fc26b944	406	br.skip(5)?;
be91b1c3	407	}
be91b1c3	408
32007ad9	409	Ok(RV20SliceInfo::new(ftype, seq, qscale, mb_x, mb_y, mb_pos, w, h))
be91b1c3 KS	410	}
	411	}
	412
be91b1c3 KS	413	impl RealVideo20Decoder {
	414	fn new() -> Self {
	415	let mut coderead = H263ShortCodeReader::new(H263_INTRA_MCBPC);
	416	let intra_mcbpc_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
	417	let mut coderead = H263ShortCodeReader::new(H263_INTER_MCBPC);
	418	let inter_mcbpc_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
507f4b11 KS	419	let mut coderead = H263ShortCodeReader::new(H263_MBTYPE_B);
507f4b11 KS	420	let mbtype_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
be91b1c3 KS	421	let mut coderead = H263ShortCodeReader::new(H263_CBPY);
be91b1c3 KS	422	let cbpy_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
507f4b11 KS	423	let mut coderead = H263ShortCodeReader::new(H263_CBPC_B);
507f4b11 KS	424	let cbpc_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
be91b1c3 KS	425	let mut coderead = H263RLCodeReader::new(H263_RL_CODES);
	426	let rl_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
	427	let mut coderead = H263RLCodeReader::new(H263_RL_CODES_AIC);
	428	let aic_rl_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
	429	let mut coderead = H263ShortCodeReader::new(H263_MV);
	430	let mv_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
1a151e53	431
be91b1c3 KS	432	let tables = Tables {
	433	intra_mcbpc_cb: intra_mcbpc_cb,
	434	inter_mcbpc_cb: inter_mcbpc_cb,
507f4b11	435	mbtype_b_cb: mbtype_b_cb,
be91b1c3	436	cbpy_cb: cbpy_cb,
507f4b11	437	cbpc_b_cb: cbpc_b_cb,
be91b1c3 KS	438	rl_cb: rl_cb,
	439	aic_rl_cb: aic_rl_cb,
	440	mv_cb: mv_cb,
	441	};
	442
	443	RealVideo20Decoder{
	444	info: Rc::new(DUMMY_CODEC_INFO),
32007ad9	445	dec: H263BaseDecoder::new_b_frames(false),
be91b1c3 KS	446	tables: tables,
	447	w: 0,
	448	h: 0,
	449	minor_ver: 0,
	450	rpr: RPRInfo { present: false, bits: 0, widths: [0; 8], heights: [0; 8] },
2a2aa421	451	bdsp: H263BlockDSP::new(),
be91b1c3 KS	452	}
	453	}
	454	}
	455
	456	impl NADecoder for RealVideo20Decoder {
2a2aa421	457	#[allow(unused_variables)]
be91b1c3 KS	458	fn init(&mut self, info: Rc<NACodecInfo>) -> DecoderResult<()> {
	459	if let NACodecTypeInfo::Video(vinfo) = info.get_properties() {
	460	let w = vinfo.get_width();
	461	let h = vinfo.get_height();
	462	let fmt = formats::YUV420_FORMAT;
	463	let myinfo = NACodecTypeInfo::Video(NAVideoInfo::new(w, h, false, fmt));
	464	self.info = Rc::new(NACodecInfo::new_ref(info.get_name(), myinfo, info.get_extradata()));
	465	self.w = w;
	466	self.h = h;
	467
	468	let edata = info.get_extradata().unwrap();
	469	let src: &[u8] = &edata;
	470	let ver = ((src[4] as u32) << 12) \| ((src[5] as u32) << 4) \| ((src[6] as u32) >> 4);
	471	let maj_ver = ver >> 16;
	472	let min_ver = (ver >> 8) & 0xFF;
	473	let mic_ver = ver & 0xFF;
be91b1c3 KS	474	validate!(maj_ver == 2);
	475	self.minor_ver = min_ver as u8;
	476	let rprb = src[1] & 7;
	477	if rprb == 0 {
	478	self.rpr.present = false;
	479	} else {
	480	self.rpr.present = true;
7c37f176	481	self.rpr.bits = ((rprb >> 1) + 1) as u8;
be91b1c3 KS	482	for i in 4..(src.len()/2) {
	483	self.rpr.widths [i - 4] = (src[i * 2] as usize) * 4;
	484	self.rpr.heights[i - 4] = (src[i * 2 + 1] as usize) * 4;
	485	}
	486	}
	487	Ok(())
	488	} else {
be91b1c3 KS	489	Err(DecoderError::InvalidData)
	490	}
	491	}
	492	fn decode(&mut self, pkt: &NAPacket) -> DecoderResult<NAFrameRef> {
	493	let src = pkt.get_buffer();
	494
be91b1c3 KS	495	let mut ibr = RealVideo20BR::new(&src, &self.tables, self.w, self.h, self.minor_ver, self.rpr);
be91b1c3 KS	496
fc26b944	497	let bufinfo = self.dec.parse_frame(&mut ibr, &self.bdsp)?;
be91b1c3 KS	498
	499	let mut frm = NAFrame::new_from_pkt(pkt, self.info.clone(), bufinfo);
	500	frm.set_keyframe(self.dec.is_intra());
507f4b11	501	frm.set_frame_type(self.dec.get_frame_type());
be91b1c3 KS	502	Ok(Rc::new(RefCell::new(frm)))
	503	}
	504	}
	505
	506	struct MBB { blocks: usize, bits: u8 }
	507	const H263_MBB: &[MBB; 7] = &[
	508	MBB{ blocks: 47, bits: 6 },
	509	MBB{ blocks: 98, bits: 7 },
	510	MBB{ blocks: 395, bits: 9 },
	511	MBB{ blocks: 1583, bits: 11 },
	512	MBB{ blocks: 6335, bits: 13 },
	513	MBB{ blocks: 9215, bits: 14 },
	514	MBB{ blocks: 65536, bits: 14 },
	515	];
	516
	517	pub fn get_decoder() -> Box<NADecoder> {
	518	Box::new(RealVideo20Decoder::new())
	519	}
	520
	521	#[cfg(test)]
	522	mod test {
aca89041	523	use crate::test::dec_video::test_file_decoding;
be91b1c3 KS	524	#[test]
be91b1c3 KS	525	fn test_rv20() {
5dd924ab	526	test_file_decoding("realmedia", "assets/RV/rv20_svt_atrc_640x352_realproducer_plus_8.51.rm", /None/Some(3000), true, false, None/Some("rv20")/);
7c37f176	527	// test_file_decoding("realmedia", "assets/RV/rv20_cook_640x352_realproducer_plus_8.51.rm", /None/Some(1000), true, false, Some("rv20"));
be91b1c3 KS	528	}
be91b1c3 KS	529	}