GremlinVideo audio decoder
[nihav.git] / src / codecs / h263 / rv20.rs
1 use crate::io::bitreader::*;
2 use crate::io::codebook::*;
3 use crate::formats;
4 use super::super::*;
5 use super::*;
6 use super::code::H263BlockDSP;
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>,
14 mbtype_b_cb: Codebook<u8>,
15 cbpy_cb: Codebook<u8>,
16 cbpc_b_cb: Codebook<u8>,
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,
38 bdsp: H263BlockDSP,
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,
51 mb_pos_bits: u8,
52 minor_ver: u8,
53 rpr: RPRInfo,
54 }
55
56 struct RV20SliceInfo {
57 ftype: Type,
58 seq: u32,
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 {
68 fn new(ftype: Type, seq: u32, qscale: u8, mb_x: usize, mb_y: usize, mb_pos: usize, w: usize, h: usize) -> Self {
69 RV20SliceInfo { ftype: ftype, seq: seq, qscale: qscale, mb_x: mb_x, mb_y: mb_y, mb_pos: mb_pos, w: w, h: h }
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,
108 minor_ver: minor_ver,
109 rpr: rpr,
110 }
111 }
112
113 #[allow(unused_variables)]
114 fn decode_block(&mut self, sstate: &SliceState, quant: u8, intra: bool, coded: bool, blk: &mut [i16; 64], plane_no: usize, acpred: ACPredMode) -> DecoderResult<()> {
115 let br = &mut self.br;
116 let mut idx = 0;
117 if !sstate.is_iframe && intra {
118 let mut dc = br.read(8)? as i16;
119 if dc == 255 { dc = 128; }
120 blk[0] = dc << 3;
121 idx = 1;
122 }
123 if !coded { return Ok(()); }
124 let scan = match acpred {
125 ACPredMode::Hor => H263_SCAN_V,
126 ACPredMode::Ver => H263_SCAN_H,
127 _ => H263_ZIGZAG,
128 };
129
130 let rl_cb = if sstate.is_iframe { &self.tables.aic_rl_cb } else { &self.tables.rl_cb };
131 let q_add = if quant == 0 || sstate.is_iframe { 0i16 } else { ((quant - 1) | 1) as i16 };
132 let q = if plane_no == 0 { (quant * 2) as i16 } else { H263_CHROMA_QUANT[quant as usize] as i16 };
133 while idx < 64 {
134 let code = br.read_cb(rl_cb)?;
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();
142 if br.read_bool()? { level = -level; }
143 level = (level * q) + q_add;
144 } else {
145 last = br.read_bool()?;
146 run = br.read(6)? as u8;
147 level = br.read_s(8)? as i16;
148 if level == -128 {
149 let low = br.read(5)? as i16;
150 let top = br.read_s(6)? as i16;
151 level = (top << 5) | low;
152 }
153 level = (level * q) + q_add;
154 if level < -2048 { level = -2048; }
155 if level > 2047 { level = 2047; }
156 }
157 idx += run;
158 validate!(idx < 64);
159 let oidx = scan[idx as usize];
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> {
169 let code = br.read_cb(mv_cb)? as i16;
170 if code == 0 { return Ok(0) }
171 if !br.read_bool()? {
172 Ok(code)
173 } else {
174 Ok(-code)
175 }
176 }
177
178 fn decode_mv(br: &mut BitReader, mv_cb: &Codebook<u8>) -> DecoderResult<MV> {
179 let xval = decode_mv_component(br, mv_cb)?;
180 let yval = decode_mv_component(br, mv_cb)?;
181 Ok(MV::new(xval, yval))
182 }
183
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
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;
197 let shdr = self.read_slice_header()?;
198 // self.slice_no += 1;
199 validate!((shdr.mb_x == 0) && (shdr.mb_y == 0));
200 /* let mb_count;
201 if self.slice_no < self.num_slices {
202 let pos = self.br.tell();
203 let shdr2 = self.read_slice_header()?;
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;
208 }*/
209
210 let plusinfo = Some(PlusInfo::new(shdr.ftype == Type::I, false, false, false));
211 let picinfo = PicInfo::new(shdr.w, shdr.h, shdr.ftype, MVMode::Long, false, false, shdr.qscale, shdr.seq as u16, None, plusinfo);
212 Ok(picinfo)
213 }
214
215 #[allow(unused_variables)]
216 fn decode_slice_header(&mut self, info: &PicInfo) -> DecoderResult<SliceInfo> {
217 let shdr = self.read_slice_header()?;
218 self.slice_no += 1;
219 let mb_count;
220 if self.slice_no < self.num_slices {
221 let pos = self.br.tell();
222 let shdr2 = self.read_slice_header()?;
223 mb_count = shdr2.mb_pos - shdr.mb_pos;
224 self.br.seek(pos as u32)?;
225 } else {
226 mb_count = self.mb_w * self.mb_h - shdr.mb_pos;
227 }
228 let ret = SliceInfo::new(shdr.mb_x, shdr.mb_y, shdr.mb_pos + mb_count, shdr.qscale);
229
230 Ok(ret)
231 }
232
233 fn decode_block_header(&mut self, info: &PicInfo, _slice: &SliceInfo, sstate: &SliceState) -> DecoderResult<BlockInfo> {
234 let br = &mut self.br;
235 let mut q = sstate.quant;
236 match info.get_mode() {
237 Type::I => {
238 let mut cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?;
239 while cbpc == 8 { cbpc = br.read_cb(&self.tables.intra_mcbpc_cb)?; }
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;
245 if acpp {
246 acpred = if br.read_bool()? { ACPredMode::Hor } else { ACPredMode::Ver };
247 }
248 }
249 }
250 let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
251 let cbp = (cbpy << 2) | (cbpc & 3);
252 let dquant = (cbpc & 4) != 0;
253 if dquant {
254 q = read_dquant(br, q)?;
255 }
256 let mut binfo = BlockInfo::new(Type::I, cbp, q);
257 binfo.set_acpred(acpred);
258 Ok(binfo)
259 },
260 Type::P => {
261 if br.read_bool()? {
262 return Ok(BlockInfo::new(Type::Skip, 0, info.get_quant()));
263 }
264 let mut cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?;
265 while cbpc == 20 { cbpc = br.read_cb(&self.tables.inter_mcbpc_cb)?; }
266 let is_intra = (cbpc & 0x04) != 0;
267 let dquant = (cbpc & 0x08) != 0;
268 let is_4x4 = (cbpc & 0x10) != 0;
269 if is_intra {
270 let cbpy = br.read_cb(&self.tables.cbpy_cb)?;
271 let cbp = (cbpy << 2) | (cbpc & 3);
272 if dquant {
273 q = read_dquant(br, q)?;
274 }
275 let binfo = BlockInfo::new(Type::I, cbp, q);
276 return Ok(binfo);
277 }
278
279 let mut cbpy = br.read_cb(&self.tables.cbpy_cb)?;
280 // if /* !aiv && */(cbpc & 3) != 3 {
281 cbpy ^= 0xF;
282 // }
283 let cbp = (cbpy << 2) | (cbpc & 3);
284 if dquant {
285 q = read_dquant(br, q)?;
286 }
287 let mut binfo = BlockInfo::new(Type::P, cbp, q);
288 if !is_4x4 {
289 let mvec: [MV; 1] = [decode_mv(br, &self.tables.mv_cb)?];
290 binfo.set_mv(&mvec);
291 } else {
292 let mvec: [MV; 4] = [
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)?
297 ];
298 binfo.set_mv(&mvec);
299 }
300 Ok(binfo)
301 },
302 Type::B => { // B
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 };
318
319 if dquant {
320 q = read_dquant(br, q)?;
321 }
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 },
339 _ => { unreachable!(); },
340 }
341 }
342
343 fn decode_block_intra(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
344 self.decode_block(sstate, quant, true, coded, blk, if no < 4 { 0 } else { no - 3 }, info.get_acpred())
345 }
346
347 #[allow(unused_variables)]
348 fn decode_block_inter(&mut self, info: &BlockInfo, sstate: &SliceState, quant: u8, no: usize, coded: bool, blk: &mut [i16; 64]) -> DecoderResult<()> {
349 self.decode_block(sstate, quant, false, coded, blk, if no < 4 { 0 } else { no - 3 }, ACPredMode::None)
350 }
351
352 fn is_slice_end(&mut self) -> bool { false }
353 }
354
355 impl<'a> RealVideo20BR<'a> {
356 #[allow(unused_variables)]
357 fn read_slice_header(&mut self) -> DecoderResult<RV20SliceInfo> {
358 validate!(self.slice_no < self.num_slices);
359
360 let br = &mut self.br;
361 br.seek(self.slice_off[self.slice_no] * 8)?;
362
363 let frm_type = br.read(2)?;
364 let ftype = match frm_type {
365 0 | 1 => { Type::I },
366 2 => { Type::P },
367 _ => { Type::B },
368 };
369
370 let marker = br.read(1)?;
371 validate!(marker == 0);
372 let qscale = br.read(5)? as u8;
373 validate!(qscale > 0);
374 if self.minor_ver >= 2 {
375 br.skip(1)?; // loop filter
376 }
377 let seq = if self.minor_ver <= 1 {
378 br.read(8)? << 8
379 } else {
380 br.read(13)? << 3
381 };
382 let w;
383 let h;
384 if self.rpr.present {
385 let rpr = br.read(self.rpr.bits)? as usize;
386 if rpr == 0 {
387 w = self.w;
388 h = self.h;
389 } else {
390 w = self.rpr.widths[rpr - 1];
391 h = self.rpr.heights[rpr - 1];
392 validate!((w != 0) && (h != 0));
393 }
394 } else {
395 w = self.w;
396 h = self.h;
397 }
398
399 let mb_pos = br.read(self.mb_pos_bits)? as usize;
400 let mb_x = mb_pos % self.mb_w;
401 let mb_y = mb_pos / self.mb_w;
402
403 br.skip(1)?; // no rounding
404
405 if (self.minor_ver <= 1) && (frm_type == 3) {
406 br.skip(5)?;
407 }
408
409 Ok(RV20SliceInfo::new(ftype, seq, qscale, mb_x, mb_y, mb_pos, w, h))
410 }
411 }
412
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();
419 let mut coderead = H263ShortCodeReader::new(H263_MBTYPE_B);
420 let mbtype_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
421 let mut coderead = H263ShortCodeReader::new(H263_CBPY);
422 let cbpy_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
423 let mut coderead = H263ShortCodeReader::new(H263_CBPC_B);
424 let cbpc_b_cb = Codebook::new(&mut coderead, CodebookMode::MSB).unwrap();
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();
431
432 let tables = Tables {
433 intra_mcbpc_cb: intra_mcbpc_cb,
434 inter_mcbpc_cb: inter_mcbpc_cb,
435 mbtype_b_cb: mbtype_b_cb,
436 cbpy_cb: cbpy_cb,
437 cbpc_b_cb: cbpc_b_cb,
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),
445 dec: H263BaseDecoder::new_b_frames(false),
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] },
451 bdsp: H263BlockDSP::new(),
452 }
453 }
454 }
455
456 impl NADecoder for RealVideo20Decoder {
457 #[allow(unused_variables)]
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;
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;
481 self.rpr.bits = ((rprb >> 1) + 1) as u8;
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 {
489 Err(DecoderError::InvalidData)
490 }
491 }
492 fn decode(&mut self, pkt: &NAPacket) -> DecoderResult<NAFrameRef> {
493 let src = pkt.get_buffer();
494
495 let mut ibr = RealVideo20BR::new(&src, &self.tables, self.w, self.h, self.minor_ver, self.rpr);
496
497 let bufinfo = self.dec.parse_frame(&mut ibr, &self.bdsp)?;
498
499 let mut frm = NAFrame::new_from_pkt(pkt, self.info.clone(), bufinfo);
500 frm.set_keyframe(self.dec.is_intra());
501 frm.set_frame_type(self.dec.get_frame_type());
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 {
523 use crate::test::dec_video::test_file_decoding;
524 #[test]
525 fn test_rv20() {
526 test_file_decoding("realmedia", "assets/RV/rv20_svt_atrc_640x352_realproducer_plus_8.51.rm", /*None*/Some(3000), true, false, None/*Some("rv20")*/);
527 // test_file_decoding("realmedia", "assets/RV/rv20_cook_640x352_realproducer_plus_8.51.rm", /*None*/Some(1000), true, false, Some("rv20"));
528 }
529 }