Commit | Line | Data |
---|---|---|
de6d9b64 | 1 | /* |
983e3246 | 2 | * MPEG1 codec / MPEG2 decoder |
ff4ec49e | 3 | * Copyright (c) 2000,2001 Fabrice Bellard. |
de6d9b64 | 4 | * |
ff4ec49e FB |
5 | * This library is free software; you can redistribute it and/or |
6 | * modify it under the terms of the GNU Lesser General Public | |
7 | * License as published by the Free Software Foundation; either | |
8 | * version 2 of the License, or (at your option) any later version. | |
de6d9b64 | 9 | * |
ff4ec49e | 10 | * This library is distributed in the hope that it will be useful, |
de6d9b64 | 11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
ff4ec49e FB |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | * Lesser General Public License for more details. | |
de6d9b64 | 14 | * |
ff4ec49e FB |
15 | * You should have received a copy of the GNU Lesser General Public |
16 | * License along with this library; if not, write to the Free Software | |
17 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
de6d9b64 | 18 | */ |
983e3246 MN |
19 | |
20 | /** | |
21 | * @file mpeg12.c | |
029911d1 | 22 | * MPEG1/2 codec |
983e3246 MN |
23 | */ |
24 | ||
a74127c0 | 25 | //#define DEBUG |
de6d9b64 FB |
26 | #include "avcodec.h" |
27 | #include "dsputil.h" | |
28 | #include "mpegvideo.h" | |
29 | ||
30 | #include "mpeg12data.h" | |
31 | ||
d87c0267 | 32 | |
de6d9b64 FB |
33 | /* Start codes. */ |
34 | #define SEQ_END_CODE 0x000001b7 | |
35 | #define SEQ_START_CODE 0x000001b3 | |
36 | #define GOP_START_CODE 0x000001b8 | |
37 | #define PICTURE_START_CODE 0x00000100 | |
38 | #define SLICE_MIN_START_CODE 0x00000101 | |
39 | #define SLICE_MAX_START_CODE 0x000001af | |
40 | #define EXT_START_CODE 0x000001b5 | |
41 | #define USER_START_CODE 0x000001b2 | |
42 | ||
4f68b084 MN |
43 | #define DC_VLC_BITS 9 |
44 | #define MV_VLC_BITS 9 | |
45 | #define MBINCR_VLC_BITS 9 | |
46 | #define MB_PAT_VLC_BITS 9 | |
47 | #define MB_PTYPE_VLC_BITS 6 | |
48 | #define MB_BTYPE_VLC_BITS 6 | |
49 | #define TEX_VLC_BITS 9 | |
50 | ||
764ef400 | 51 | #ifdef CONFIG_ENCODERS |
de6d9b64 FB |
52 | static void mpeg1_encode_block(MpegEncContext *s, |
53 | DCTELEM *block, | |
54 | int component); | |
63b15e55 | 55 | static void mpeg1_encode_motion(MpegEncContext *s, int val, int f_or_b_code); // RAL: f_code parameter added |
764ef400 | 56 | #endif //CONFIG_ENCODERS |
de6d9b64 | 57 | static void mpeg1_skip_picture(MpegEncContext *s, int pict_num); |
a0201736 MN |
58 | static inline int mpeg1_decode_block_inter(MpegEncContext *s, |
59 | DCTELEM *block, | |
60 | int n); | |
61 | static inline int mpeg1_decode_block_intra(MpegEncContext *s, | |
de6d9b64 FB |
62 | DCTELEM *block, |
63 | int n); | |
3729c912 | 64 | static inline int mpeg2_decode_block_non_intra(MpegEncContext *s, |
de6d9b64 FB |
65 | DCTELEM *block, |
66 | int n); | |
3729c912 | 67 | static inline int mpeg2_decode_block_intra(MpegEncContext *s, |
de6d9b64 FB |
68 | DCTELEM *block, |
69 | int n); | |
70 | static int mpeg_decode_motion(MpegEncContext *s, int fcode, int pred); | |
71 | ||
2e7b4c84 IK |
72 | #ifdef HAVE_XVMC |
73 | extern int XVMC_field_start(MpegEncContext *s, AVCodecContext *avctx); | |
74 | extern int XVMC_field_end(MpegEncContext *s); | |
75 | #endif | |
76 | ||
c442d75c | 77 | #ifdef CONFIG_ENCODERS |
30952237 | 78 | static uint8_t (*mv_penalty)[MAX_MV*2+1]= NULL; |
0c1a9eda | 79 | static uint8_t fcode_tab[MAX_MV*2+1]; |
11ce8834 | 80 | |
c442d75c MN |
81 | static uint32_t uni_mpeg1_ac_vlc_bits[64*64*2]; |
82 | static uint8_t uni_mpeg1_ac_vlc_len [64*64*2]; | |
2a250222 MN |
83 | |
84 | /* simple include everything table for dc, first byte is bits number next 3 are code*/ | |
85 | static uint32_t mpeg1_lum_dc_uni[512]; | |
86 | static uint32_t mpeg1_chr_dc_uni[512]; | |
87 | ||
88 | static uint8_t mpeg1_index_run[2][64]; | |
89 | static int8_t mpeg1_max_level[2][64]; | |
764ef400 | 90 | #endif //CONFIG_ENCODERS |
c442d75c | 91 | |
4f68b084 MN |
92 | static void init_2d_vlc_rl(RLTable *rl) |
93 | { | |
07787186 | 94 | int i; |
4f68b084 MN |
95 | |
96 | init_vlc(&rl->vlc, TEX_VLC_BITS, rl->n + 2, | |
97 | &rl->table_vlc[0][1], 4, 2, | |
98 | &rl->table_vlc[0][0], 4, 2); | |
99 | ||
100 | ||
101 | rl->rl_vlc[0]= av_malloc(rl->vlc.table_size*sizeof(RL_VLC_ELEM)); | |
102 | for(i=0; i<rl->vlc.table_size; i++){ | |
103 | int code= rl->vlc.table[i][0]; | |
104 | int len = rl->vlc.table[i][1]; | |
105 | int level, run; | |
106 | ||
107 | if(len==0){ // illegal code | |
108 | run= 65; | |
109 | level= MAX_LEVEL; | |
110 | }else if(len<0){ //more bits needed | |
111 | run= 0; | |
112 | level= code; | |
113 | }else{ | |
114 | if(code==rl->n){ //esc | |
115 | run= 65; | |
116 | level= 0; | |
117 | }else if(code==rl->n+1){ //eob | |
a0201736 MN |
118 | run= 0; |
119 | level= 127; | |
4f68b084 MN |
120 | }else{ |
121 | run= rl->table_run [code] + 1; | |
122 | level= rl->table_level[code]; | |
123 | } | |
124 | } | |
125 | rl->rl_vlc[0][i].len= len; | |
126 | rl->rl_vlc[0][i].level= level; | |
127 | rl->rl_vlc[0][i].run= run; | |
128 | } | |
129 | } | |
130 | ||
2a250222 | 131 | #ifdef CONFIG_ENCODERS |
c442d75c MN |
132 | static void init_uni_ac_vlc(RLTable *rl, uint32_t *uni_ac_vlc_bits, uint8_t *uni_ac_vlc_len){ |
133 | int i; | |
134 | ||
135 | for(i=0; i<128; i++){ | |
136 | int level= i-64; | |
137 | int run; | |
138 | for(run=0; run<64; run++){ | |
139 | int len, bits, code; | |
140 | ||
141 | int alevel= ABS(level); | |
142 | int sign= (level>>31)&1; | |
143 | ||
144 | if (alevel > rl->max_level[0][run]) | |
145 | code= 111; /*rl->n*/ | |
146 | else | |
147 | code= rl->index_run[0][run] + alevel - 1; | |
148 | ||
149 | if (code < 111 /* rl->n */) { | |
150 | /* store the vlc & sign at once */ | |
151 | len= mpeg1_vlc[code][1]+1; | |
152 | bits= (mpeg1_vlc[code][0]<<1) + sign; | |
153 | } else { | |
154 | len= mpeg1_vlc[111/*rl->n*/][1]+6; | |
155 | bits= mpeg1_vlc[111/*rl->n*/][0]<<6; | |
156 | ||
157 | bits|= run; | |
158 | if (alevel < 128) { | |
159 | bits<<=8; len+=8; | |
160 | bits|= level & 0xff; | |
161 | } else { | |
162 | bits<<=16; len+=16; | |
163 | bits|= level & 0xff; | |
164 | if (level < 0) { | |
165 | bits|= 0x8001 + level + 255; | |
166 | } else { | |
167 | bits|= level & 0xffff; | |
168 | } | |
169 | } | |
170 | } | |
171 | ||
172 | uni_ac_vlc_bits[UNI_AC_ENC_INDEX(run, i)]= bits; | |
173 | uni_ac_vlc_len [UNI_AC_ENC_INDEX(run, i)]= len; | |
174 | } | |
175 | } | |
176 | } | |
4f68b084 | 177 | |
de6d9b64 FB |
178 | static void put_header(MpegEncContext *s, int header) |
179 | { | |
180 | align_put_bits(&s->pb); | |
80feb2a2 MN |
181 | put_bits(&s->pb, 16, header>>16); |
182 | put_bits(&s->pb, 16, header&0xFFFF); | |
de6d9b64 FB |
183 | } |
184 | ||
185 | /* put sequence header if needed */ | |
186 | static void mpeg1_encode_sequence_header(MpegEncContext *s) | |
187 | { | |
188 | unsigned int vbv_buffer_size; | |
d78647e8 | 189 | unsigned int fps, v; |
426b8061 | 190 | int n, i; |
0c1a9eda | 191 | uint64_t time_code; |
426b8061 | 192 | float best_aspect_error= 1E10; |
5ff85f1d | 193 | float aspect_ratio= av_q2d(s->avctx->sample_aspect_ratio); |
98b0858e | 194 | int constraint_parameter_flag; |
426b8061 | 195 | |
5ff85f1d | 196 | if(aspect_ratio==0.0) aspect_ratio= 1.0; //pixel aspect 1:1 (VGA) |
de6d9b64 | 197 | |
1e491e29 | 198 | if (s->current_picture.key_frame) { |
de6d9b64 FB |
199 | /* mpeg1 header repeated every gop */ |
200 | put_header(s, SEQ_START_CODE); | |
201 | ||
202 | /* search closest frame rate */ | |
203 | { | |
204 | int i, dmin, d; | |
205 | s->frame_rate_index = 0; | |
206 | dmin = 0x7fffffff; | |
14bea432 MN |
207 | for(i=1;i<14;i++) { |
208 | if(s->avctx->strict_std_compliance >= 0 && i>=9) break; | |
209 | ||
210 | d = abs(MPEG1_FRAME_RATE_BASE*(int64_t)s->avctx->frame_rate/s->avctx->frame_rate_base - frame_rate_tab[i]); | |
de6d9b64 FB |
211 | if (d < dmin) { |
212 | dmin = d; | |
213 | s->frame_rate_index = i; | |
214 | } | |
215 | } | |
216 | } | |
217 | ||
218 | put_bits(&s->pb, 12, s->width); | |
219 | put_bits(&s->pb, 12, s->height); | |
426b8061 MN |
220 | |
221 | for(i=1; i<15; i++){ | |
5ff85f1d | 222 | float error= mpeg1_aspect[i] - aspect_ratio; |
426b8061 MN |
223 | error= ABS(error); |
224 | ||
225 | if(error < best_aspect_error){ | |
226 | best_aspect_error= error; | |
227 | s->aspect_ratio_info= i; | |
228 | } | |
229 | } | |
230 | ||
231 | put_bits(&s->pb, 4, s->aspect_ratio_info); | |
de6d9b64 | 232 | put_bits(&s->pb, 4, s->frame_rate_index); |
12dccd4e MN |
233 | |
234 | if(s->avctx->rc_max_rate){ | |
235 | v = (s->avctx->rc_max_rate + 399) / 400; | |
236 | if (v > 0x3ffff && s->codec_id == CODEC_ID_MPEG1VIDEO) | |
237 | v = 0x3ffff; | |
238 | }else{ | |
239 | v= 0x3FFFF; | |
240 | } | |
ecfd40b3 HM |
241 | |
242 | if(s->avctx->rc_buffer_size) | |
243 | vbv_buffer_size = s->avctx->rc_buffer_size; | |
244 | else | |
245 | /* VBV calculation: Scaled so that a VCD has the proper VBV size of 40 kilobytes */ | |
12dccd4e MN |
246 | vbv_buffer_size = (( 20 * s->bit_rate) / (1151929 / 2)) * 8 * 1024; |
247 | vbv_buffer_size= (vbv_buffer_size + 16383) / 16384; | |
248 | ||
249 | put_bits(&s->pb, 18, v & 0x3FFFF); | |
250 | put_bits(&s->pb, 1, 1); /* marker */ | |
98b0858e MN |
251 | put_bits(&s->pb, 10, vbv_buffer_size & 0x3FF); |
252 | ||
253 | constraint_parameter_flag= | |
254 | s->width <= 768 && s->height <= 576 && | |
255 | s->mb_width * s->mb_height <= 396 && | |
256 | s->mb_width * s->mb_height * frame_rate_tab[s->frame_rate_index] <= MPEG1_FRAME_RATE_BASE*396*25 && | |
257 | frame_rate_tab[s->frame_rate_index] <= MPEG1_FRAME_RATE_BASE*30 && | |
258 | vbv_buffer_size <= 20 && | |
259 | v <= 1856000/400 && | |
260 | s->codec_id == CODEC_ID_MPEG1VIDEO; | |
261 | ||
262 | put_bits(&s->pb, 1, constraint_parameter_flag); | |
d6eb3c50 MN |
263 | |
264 | ff_write_quant_matrix(&s->pb, s->avctx->intra_matrix); | |
265 | ff_write_quant_matrix(&s->pb, s->avctx->inter_matrix); | |
de6d9b64 | 266 | |
029911d1 MN |
267 | if(s->codec_id == CODEC_ID_MPEG2VIDEO){ |
268 | put_header(s, EXT_START_CODE); | |
269 | put_bits(&s->pb, 4, 1); //seq ext | |
270 | put_bits(&s->pb, 1, 0); //esc | |
271 | put_bits(&s->pb, 3, 4); //profile | |
272 | put_bits(&s->pb, 4, 8); //level | |
273 | put_bits(&s->pb, 1, s->progressive_sequence=1); | |
274 | put_bits(&s->pb, 2, 1); //chroma format 4:2:0 | |
275 | put_bits(&s->pb, 2, 0); //horizontal size ext | |
276 | put_bits(&s->pb, 2, 0); //vertical size ext | |
277 | put_bits(&s->pb, 12, v>>18); //bitrate ext | |
278 | put_bits(&s->pb, 1, 1); //marker | |
279 | put_bits(&s->pb, 8, vbv_buffer_size >>10); //vbv buffer ext | |
280 | put_bits(&s->pb, 1, s->low_delay); | |
281 | put_bits(&s->pb, 2, 0); // frame_rate_ext_n | |
282 | put_bits(&s->pb, 5, 0); // frame_rate_ext_d | |
283 | } | |
284 | ||
de6d9b64 FB |
285 | put_header(s, GOP_START_CODE); |
286 | put_bits(&s->pb, 1, 0); /* do drop frame */ | |
287 | /* time code : we must convert from the real frame rate to a | |
288 | fake mpeg frame rate in case of low frame rate */ | |
289 | fps = frame_rate_tab[s->frame_rate_index]; | |
14bea432 | 290 | time_code = (int64_t)s->fake_picture_number * MPEG1_FRAME_RATE_BASE; |
de6d9b64 | 291 | s->gop_picture_number = s->fake_picture_number; |
0c1a9eda ZK |
292 | put_bits(&s->pb, 5, (uint32_t)((time_code / (fps * 3600)) % 24)); |
293 | put_bits(&s->pb, 6, (uint32_t)((time_code / (fps * 60)) % 60)); | |
de6d9b64 | 294 | put_bits(&s->pb, 1, 1); |
0c1a9eda | 295 | put_bits(&s->pb, 6, (uint32_t)((time_code / fps) % 60)); |
14bea432 | 296 | put_bits(&s->pb, 6, (uint32_t)((time_code % fps) / MPEG1_FRAME_RATE_BASE)); |
69b0ff3a | 297 | put_bits(&s->pb, 1, 0); /* closed gop */ |
de6d9b64 FB |
298 | put_bits(&s->pb, 1, 0); /* broken link */ |
299 | } | |
300 | ||
14bea432 | 301 | if (s->avctx->frame_rate < (24 * s->avctx->frame_rate_base) && s->picture_number > 0) { |
de6d9b64 FB |
302 | /* insert empty P pictures to slow down to the desired |
303 | frame rate. Each fake pictures takes about 20 bytes */ | |
304 | fps = frame_rate_tab[s->frame_rate_index]; | |
14bea432 | 305 | n = av_rescale((int64_t)s->picture_number * s->avctx->frame_rate_base, fps, s->avctx->frame_rate) / MPEG1_FRAME_RATE_BASE - 1; |
de6d9b64 FB |
306 | while (s->fake_picture_number < n) { |
307 | mpeg1_skip_picture(s, s->fake_picture_number - | |
308 | s->gop_picture_number); | |
309 | s->fake_picture_number++; | |
310 | } | |
311 | ||
312 | } | |
de6d9b64 FB |
313 | } |
314 | ||
9b8709d1 MN |
315 | static inline void encode_mb_skip_run(MpegEncContext *s, int run){ |
316 | while (run >= 33) { | |
317 | put_bits(&s->pb, 11, 0x008); | |
318 | run -= 33; | |
319 | } | |
320 | put_bits(&s->pb, mbAddrIncrTable[run][1], | |
321 | mbAddrIncrTable[run][0]); | |
322 | } | |
de6d9b64 FB |
323 | |
324 | /* insert a fake P picture */ | |
325 | static void mpeg1_skip_picture(MpegEncContext *s, int pict_num) | |
326 | { | |
029911d1 MN |
327 | assert(s->codec_id == CODEC_ID_MPEG1VIDEO); // mpeg2 can do these repeat things |
328 | ||
de6d9b64 FB |
329 | /* mpeg1 picture header */ |
330 | put_header(s, PICTURE_START_CODE); | |
331 | /* temporal reference */ | |
332 | put_bits(&s->pb, 10, pict_num & 0x3ff); | |
333 | ||
334 | put_bits(&s->pb, 3, P_TYPE); | |
335 | put_bits(&s->pb, 16, 0xffff); /* non constant bit rate */ | |
336 | ||
337 | put_bits(&s->pb, 1, 1); /* integer coordinates */ | |
338 | put_bits(&s->pb, 3, 1); /* forward_f_code */ | |
339 | ||
340 | put_bits(&s->pb, 1, 0); /* extra bit picture */ | |
341 | ||
342 | /* only one slice */ | |
343 | put_header(s, SLICE_MIN_START_CODE); | |
344 | put_bits(&s->pb, 5, 1); /* quantizer scale */ | |
345 | put_bits(&s->pb, 1, 0); /* slice extra information */ | |
346 | ||
9b8709d1 | 347 | encode_mb_skip_run(s, 0); |
de6d9b64 FB |
348 | |
349 | /* empty macroblock */ | |
350 | put_bits(&s->pb, 3, 1); /* motion only */ | |
351 | ||
352 | /* zero motion x & y */ | |
353 | put_bits(&s->pb, 1, 1); | |
354 | put_bits(&s->pb, 1, 1); | |
355 | ||
356 | /* output a number of empty slice */ | |
9b8709d1 | 357 | encode_mb_skip_run(s, s->mb_width * s->mb_height - 2); |
de6d9b64 FB |
358 | |
359 | /* empty macroblock */ | |
360 | put_bits(&s->pb, 3, 1); /* motion only */ | |
361 | ||
362 | /* zero motion x & y */ | |
363 | put_bits(&s->pb, 1, 1); | |
364 | put_bits(&s->pb, 1, 1); | |
365 | } | |
764ef400 | 366 | #endif //CONFIG_ENCODERS |
de6d9b64 | 367 | |
8f8402e4 | 368 | static void common_init(MpegEncContext *s) |
de6d9b64 | 369 | { |
8f8402e4 MN |
370 | s->y_dc_scale_table= |
371 | s->c_dc_scale_table= ff_mpeg1_dc_scale_table; | |
372 | } | |
f004ca1c | 373 | |
2a250222 MN |
374 | void ff_mpeg1_clean_buffers(MpegEncContext *s){ |
375 | s->last_dc[0] = 1 << (7 + s->intra_dc_precision); | |
376 | s->last_dc[1] = s->last_dc[0]; | |
377 | s->last_dc[2] = s->last_dc[0]; | |
378 | memset(s->last_mv, 0, sizeof(s->last_mv)); | |
379 | } | |
380 | ||
7604246d | 381 | #ifdef CONFIG_ENCODERS |
9b8709d1 MN |
382 | |
383 | void ff_mpeg1_encode_slice_header(MpegEncContext *s){ | |
384 | put_header(s, SLICE_MIN_START_CODE + s->mb_y); | |
385 | put_bits(&s->pb, 5, s->qscale); /* quantizer scale */ | |
386 | put_bits(&s->pb, 1, 0); /* slice extra information */ | |
387 | } | |
388 | ||
8f8402e4 MN |
389 | void mpeg1_encode_picture_header(MpegEncContext *s, int picture_number) |
390 | { | |
de6d9b64 FB |
391 | mpeg1_encode_sequence_header(s); |
392 | ||
393 | /* mpeg1 picture header */ | |
394 | put_header(s, PICTURE_START_CODE); | |
395 | /* temporal reference */ | |
63b15e55 MN |
396 | |
397 | // RAL: s->picture_number instead of s->fake_picture_number | |
398 | put_bits(&s->pb, 10, (s->picture_number - | |
de6d9b64 | 399 | s->gop_picture_number) & 0x3ff); |
af469427 | 400 | s->fake_picture_number++; |
de6d9b64 FB |
401 | |
402 | put_bits(&s->pb, 3, s->pict_type); | |
403 | put_bits(&s->pb, 16, 0xffff); /* non constant bit rate */ | |
404 | ||
63b15e55 MN |
405 | // RAL: Forward f_code also needed for B frames |
406 | if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) { | |
de6d9b64 | 407 | put_bits(&s->pb, 1, 0); /* half pel coordinates */ |
cb231c48 MN |
408 | if(s->codec_id == CODEC_ID_MPEG1VIDEO) |
409 | put_bits(&s->pb, 3, s->f_code); /* forward_f_code */ | |
410 | else | |
411 | put_bits(&s->pb, 3, 7); /* forward_f_code */ | |
de6d9b64 FB |
412 | } |
413 | ||
63b15e55 MN |
414 | // RAL: Backward f_code necessary for B frames |
415 | if (s->pict_type == B_TYPE) { | |
416 | put_bits(&s->pb, 1, 0); /* half pel coordinates */ | |
cb231c48 MN |
417 | if(s->codec_id == CODEC_ID_MPEG1VIDEO) |
418 | put_bits(&s->pb, 3, s->b_code); /* backward_f_code */ | |
419 | else | |
420 | put_bits(&s->pb, 3, 7); /* backward_f_code */ | |
029911d1 | 421 | } |
63b15e55 | 422 | |
de6d9b64 FB |
423 | put_bits(&s->pb, 1, 0); /* extra bit picture */ |
424 | ||
029911d1 MN |
425 | if(s->codec_id == CODEC_ID_MPEG2VIDEO){ |
426 | put_header(s, EXT_START_CODE); | |
427 | put_bits(&s->pb, 4, 8); //pic ext | |
cb231c48 MN |
428 | if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) { |
429 | put_bits(&s->pb, 4, s->f_code); | |
430 | put_bits(&s->pb, 4, s->f_code); | |
431 | }else{ | |
432 | put_bits(&s->pb, 8, 255); | |
433 | } | |
434 | if (s->pict_type == B_TYPE) { | |
435 | put_bits(&s->pb, 4, s->b_code); | |
436 | put_bits(&s->pb, 4, s->b_code); | |
437 | }else{ | |
438 | put_bits(&s->pb, 8, 255); | |
439 | } | |
029911d1 MN |
440 | put_bits(&s->pb, 2, s->intra_dc_precision); |
441 | put_bits(&s->pb, 2, s->picture_structure= PICT_FRAME); | |
442 | put_bits(&s->pb, 1, s->top_field_first); | |
443 | put_bits(&s->pb, 1, s->frame_pred_frame_dct= 1); | |
444 | put_bits(&s->pb, 1, s->concealment_motion_vectors); | |
445 | put_bits(&s->pb, 1, s->q_scale_type); | |
446 | put_bits(&s->pb, 1, s->intra_vlc_format); | |
447 | put_bits(&s->pb, 1, s->alternate_scan); | |
448 | put_bits(&s->pb, 1, s->repeat_first_field); | |
449 | put_bits(&s->pb, 1, s->chroma_420_type=1); | |
450 | put_bits(&s->pb, 1, s->progressive_frame=1); | |
451 | put_bits(&s->pb, 1, 0); //composite_display_flag | |
452 | } | |
453 | ||
9b8709d1 MN |
454 | s->mb_y=0; |
455 | ff_mpeg1_encode_slice_header(s); | |
de6d9b64 FB |
456 | } |
457 | ||
458 | void mpeg1_encode_mb(MpegEncContext *s, | |
459 | DCTELEM block[6][64], | |
460 | int motion_x, int motion_y) | |
461 | { | |
9b8709d1 MN |
462 | int i, cbp; |
463 | const int mb_x = s->mb_x; | |
464 | const int mb_y = s->mb_y; | |
465 | const int first_mb= mb_x == s->resync_mb_x && mb_y == s->resync_mb_y; | |
de6d9b64 FB |
466 | |
467 | /* compute cbp */ | |
468 | cbp = 0; | |
469 | for(i=0;i<6;i++) { | |
470 | if (s->block_last_index[i] >= 0) | |
471 | cbp |= 1 << (5 - i); | |
472 | } | |
473 | ||
029911d1 | 474 | if (cbp == 0 && !first_mb && (mb_x != s->mb_width - 1 || (mb_y != s->mb_height - 1 && s->codec_id == CODEC_ID_MPEG1VIDEO)) && |
63b15e55 MN |
475 | ((s->pict_type == P_TYPE && (motion_x | motion_y) == 0) || |
476 | (s->pict_type == B_TYPE && s->mv_dir == s->last_mv_dir && (((s->mv_dir & MV_DIR_FORWARD) ? ((s->mv[0][0][0] - s->last_mv[0][0][0])|(s->mv[0][0][1] - s->last_mv[0][0][1])) : 0) | | |
477 | ((s->mv_dir & MV_DIR_BACKWARD) ? ((s->mv[1][0][0] - s->last_mv[1][0][0])|(s->mv[1][0][1] - s->last_mv[1][0][1])) : 0)) == 0))) { | |
9b8709d1 | 478 | s->mb_skip_run++; |
d87c0267 | 479 | s->qscale -= s->dquant; |
49733979 MN |
480 | s->skip_count++; |
481 | s->misc_bits++; | |
482 | s->last_bits++; | |
de6d9b64 | 483 | } else { |
9b8709d1 MN |
484 | if(first_mb){ |
485 | assert(s->mb_skip_run == 0); | |
486 | encode_mb_skip_run(s, s->mb_x); | |
487 | }else{ | |
488 | encode_mb_skip_run(s, s->mb_skip_run); | |
de6d9b64 | 489 | } |
de6d9b64 FB |
490 | |
491 | if (s->pict_type == I_TYPE) { | |
d87c0267 MN |
492 | if(s->dquant && cbp){ |
493 | put_bits(&s->pb, 2, 1); /* macroblock_type : macroblock_quant = 1 */ | |
494 | put_bits(&s->pb, 5, s->qscale); | |
495 | }else{ | |
496 | put_bits(&s->pb, 1, 1); /* macroblock_type : macroblock_quant = 0 */ | |
497 | s->qscale -= s->dquant; | |
498 | } | |
49733979 MN |
499 | s->misc_bits+= get_bits_diff(s); |
500 | s->i_count++; | |
63b15e55 MN |
501 | } else if (s->mb_intra) { |
502 | if(s->dquant && cbp){ | |
503 | put_bits(&s->pb, 6, 0x01); | |
504 | put_bits(&s->pb, 5, s->qscale); | |
505 | }else{ | |
506 | put_bits(&s->pb, 5, 0x03); | |
507 | s->qscale -= s->dquant; | |
508 | } | |
509 | s->misc_bits+= get_bits_diff(s); | |
510 | s->i_count++; | |
511 | s->last_mv[0][0][0] = | |
512 | s->last_mv[0][0][1] = 0; | |
513 | } else if (s->pict_type == P_TYPE) { | |
de6d9b64 FB |
514 | if (cbp != 0) { |
515 | if (motion_x == 0 && motion_y == 0) { | |
d87c0267 MN |
516 | if(s->dquant){ |
517 | put_bits(&s->pb, 5, 1); /* macroblock_pattern & quant */ | |
518 | put_bits(&s->pb, 5, s->qscale); | |
519 | }else{ | |
520 | put_bits(&s->pb, 2, 1); /* macroblock_pattern only */ | |
521 | } | |
49733979 | 522 | s->misc_bits+= get_bits_diff(s); |
de6d9b64 FB |
523 | put_bits(&s->pb, mbPatTable[cbp - 1][1], mbPatTable[cbp - 1][0]); |
524 | } else { | |
d87c0267 MN |
525 | if(s->dquant){ |
526 | put_bits(&s->pb, 5, 2); /* motion + cbp */ | |
527 | put_bits(&s->pb, 5, s->qscale); | |
528 | }else{ | |
529 | put_bits(&s->pb, 1, 1); /* motion + cbp */ | |
530 | } | |
49733979 | 531 | s->misc_bits+= get_bits_diff(s); |
63b15e55 MN |
532 | mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); // RAL: f_code parameter added |
533 | mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); // RAL: f_code parameter added | |
49733979 | 534 | s->mv_bits+= get_bits_diff(s); |
de6d9b64 FB |
535 | put_bits(&s->pb, mbPatTable[cbp - 1][1], mbPatTable[cbp - 1][0]); |
536 | } | |
537 | } else { | |
538 | put_bits(&s->pb, 3, 1); /* motion only */ | |
63b15e55 MN |
539 | mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); // RAL: f_code parameter added |
540 | mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); // RAL: f_code parameter added | |
d87c0267 | 541 | s->qscale -= s->dquant; |
49733979 | 542 | s->mv_bits+= get_bits_diff(s); |
de6d9b64 | 543 | } |
49733979 | 544 | s->f_count++; |
63b15e55 MN |
545 | } else |
546 | { // RAL: All the following bloc added for B frames: | |
547 | if (cbp != 0) | |
548 | { // With coded bloc pattern | |
549 | if (s->mv_dir == (MV_DIR_FORWARD | MV_DIR_BACKWARD)) | |
550 | { // Bi-directional motion | |
551 | if (s->dquant) | |
552 | { // With QScale | |
553 | put_bits(&s->pb, 5, 2); | |
554 | put_bits(&s->pb, 5, s->qscale); | |
555 | } | |
556 | else // Without QScale | |
557 | put_bits(&s->pb, 2, 3); | |
558 | s->misc_bits += get_bits_diff(s); | |
559 | mpeg1_encode_motion(s, s->mv[0][0][0] - s->last_mv[0][0][0], s->f_code); | |
560 | mpeg1_encode_motion(s, s->mv[0][0][1] - s->last_mv[0][0][1], s->f_code); | |
561 | mpeg1_encode_motion(s, s->mv[1][0][0] - s->last_mv[1][0][0], s->b_code); | |
562 | mpeg1_encode_motion(s, s->mv[1][0][1] - s->last_mv[1][0][1], s->b_code); | |
563 | s->b_count++; | |
564 | s->f_count++; | |
565 | s->mv_bits += get_bits_diff(s); | |
566 | put_bits(&s->pb, mbPatTable[cbp - 1][1], mbPatTable[cbp - 1][0]); | |
567 | } | |
568 | else if (s->mv_dir == MV_DIR_BACKWARD) | |
569 | { // Backward motion | |
570 | if (s->dquant) | |
571 | { // With QScale | |
572 | put_bits(&s->pb, 6, 2); | |
573 | put_bits(&s->pb, 5, s->qscale); | |
574 | } | |
575 | else // Without QScale | |
576 | put_bits(&s->pb, 3, 3); | |
577 | s->misc_bits += get_bits_diff(s); | |
578 | mpeg1_encode_motion(s, motion_x - s->last_mv[1][0][0], s->b_code); | |
579 | mpeg1_encode_motion(s, motion_y - s->last_mv[1][0][1], s->b_code); | |
580 | s->b_count++; | |
581 | s->mv_bits += get_bits_diff(s); | |
582 | put_bits(&s->pb, mbPatTable[cbp - 1][1], mbPatTable[cbp - 1][0]); | |
583 | } | |
584 | else if (s->mv_dir == MV_DIR_FORWARD) | |
585 | { // Forward motion | |
586 | if (s->dquant) | |
587 | { // With QScale | |
588 | put_bits(&s->pb, 6, 3); | |
589 | put_bits(&s->pb, 5, s->qscale); | |
590 | } | |
591 | else // Without QScale | |
592 | put_bits(&s->pb, 4, 3); | |
593 | s->misc_bits += get_bits_diff(s); | |
594 | mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); | |
595 | mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); | |
596 | s->f_count++; | |
597 | s->mv_bits += get_bits_diff(s); | |
598 | put_bits(&s->pb, mbPatTable[cbp - 1][1], mbPatTable[cbp - 1][0]); | |
599 | } | |
600 | } | |
601 | else | |
602 | { // No coded bloc pattern | |
603 | if (s->mv_dir == (MV_DIR_FORWARD | MV_DIR_BACKWARD)) | |
7604246d | 604 | { // Bi-directional motion |
63b15e55 MN |
605 | put_bits(&s->pb, 2, 2); /* backward & forward motion */ |
606 | mpeg1_encode_motion(s, s->mv[0][0][0] - s->last_mv[0][0][0], s->f_code); | |
607 | mpeg1_encode_motion(s, s->mv[0][0][1] - s->last_mv[0][0][1], s->f_code); | |
608 | mpeg1_encode_motion(s, s->mv[1][0][0] - s->last_mv[1][0][0], s->b_code); | |
609 | mpeg1_encode_motion(s, s->mv[1][0][1] - s->last_mv[1][0][1], s->b_code); | |
610 | s->b_count++; | |
611 | s->f_count++; | |
612 | } | |
613 | else if (s->mv_dir == MV_DIR_BACKWARD) | |
614 | { // Backward motion | |
615 | put_bits(&s->pb, 3, 2); /* backward motion only */ | |
616 | mpeg1_encode_motion(s, motion_x - s->last_mv[1][0][0], s->b_code); | |
617 | mpeg1_encode_motion(s, motion_y - s->last_mv[1][0][1], s->b_code); | |
618 | s->b_count++; | |
619 | } | |
620 | else if (s->mv_dir == MV_DIR_FORWARD) | |
621 | { // Forward motion | |
622 | put_bits(&s->pb, 4, 2); /* forward motion only */ | |
623 | mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); | |
624 | mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); | |
625 | s->f_count++; | |
626 | } | |
627 | s->qscale -= s->dquant; | |
628 | s->mv_bits += get_bits_diff(s); | |
629 | } | |
630 | // End of bloc from RAL | |
de6d9b64 | 631 | } |
de6d9b64 FB |
632 | for(i=0;i<6;i++) { |
633 | if (cbp & (1 << (5 - i))) { | |
634 | mpeg1_encode_block(s, block[i], i); | |
635 | } | |
636 | } | |
9b8709d1 | 637 | s->mb_skip_run = 0; |
49733979 MN |
638 | if(s->mb_intra) |
639 | s->i_tex_bits+= get_bits_diff(s); | |
640 | else | |
641 | s->p_tex_bits+= get_bits_diff(s); | |
de6d9b64 | 642 | } |
63b15e55 MN |
643 | |
644 | // RAL: By this: | |
645 | if (s->mv_dir & MV_DIR_FORWARD) | |
646 | { | |
647 | s->last_mv[0][0][0]= s->mv[0][0][0]; | |
648 | s->last_mv[0][0][1]= s->mv[0][0][1]; | |
649 | } | |
650 | if (s->mv_dir & MV_DIR_BACKWARD) | |
651 | { | |
652 | s->last_mv[1][0][0]= s->mv[1][0][0]; | |
653 | s->last_mv[1][0][1]= s->mv[1][0][1]; | |
654 | } | |
de6d9b64 FB |
655 | } |
656 | ||
63b15e55 MN |
657 | // RAL: Parameter added: f_or_b_code |
658 | static void mpeg1_encode_motion(MpegEncContext *s, int val, int f_or_b_code) | |
de6d9b64 FB |
659 | { |
660 | int code, bit_size, l, m, bits, range, sign; | |
661 | ||
662 | if (val == 0) { | |
663 | /* zero vector */ | |
664 | code = 0; | |
665 | put_bits(&s->pb, | |
666 | mbMotionVectorTable[0][1], | |
667 | mbMotionVectorTable[0][0]); | |
668 | } else { | |
63b15e55 | 669 | bit_size = f_or_b_code - 1; |
de6d9b64 FB |
670 | range = 1 << bit_size; |
671 | /* modulo encoding */ | |
672 | l = 16 * range; | |
673 | m = 2 * l; | |
674 | if (val < -l) { | |
675 | val += m; | |
676 | } else if (val >= l) { | |
677 | val -= m; | |
678 | } | |
679 | ||
680 | if (val >= 0) { | |
681 | val--; | |
682 | code = (val >> bit_size) + 1; | |
683 | bits = val & (range - 1); | |
684 | sign = 0; | |
685 | } else { | |
686 | val = -val; | |
687 | val--; | |
688 | code = (val >> bit_size) + 1; | |
689 | bits = val & (range - 1); | |
690 | sign = 1; | |
691 | } | |
63b15e55 MN |
692 | |
693 | assert(code > 0 && code <= 16); | |
694 | ||
de6d9b64 FB |
695 | put_bits(&s->pb, |
696 | mbMotionVectorTable[code][1], | |
697 | mbMotionVectorTable[code][0]); | |
63b15e55 | 698 | |
de6d9b64 FB |
699 | put_bits(&s->pb, 1, sign); |
700 | if (bit_size > 0) { | |
701 | put_bits(&s->pb, bit_size, bits); | |
702 | } | |
703 | } | |
704 | } | |
705 | ||
8f8402e4 | 706 | void ff_mpeg1_encode_init(MpegEncContext *s) |
11ce8834 MN |
707 | { |
708 | static int done=0; | |
8f8402e4 MN |
709 | |
710 | common_init(s); | |
711 | ||
11ce8834 MN |
712 | if(!done){ |
713 | int f_code; | |
714 | int mv; | |
8f8402e4 | 715 | int i; |
11ce8834 MN |
716 | |
717 | done=1; | |
8f8402e4 | 718 | init_rl(&rl_mpeg1); |
c442d75c | 719 | |
8f8402e4 MN |
720 | for(i=0; i<64; i++) |
721 | { | |
722 | mpeg1_max_level[0][i]= rl_mpeg1.max_level[0][i]; | |
723 | mpeg1_index_run[0][i]= rl_mpeg1.index_run[0][i]; | |
724 | } | |
c442d75c MN |
725 | |
726 | init_uni_ac_vlc(&rl_mpeg1, uni_mpeg1_ac_vlc_bits, uni_mpeg1_ac_vlc_len); | |
8f8402e4 MN |
727 | |
728 | /* build unified dc encoding tables */ | |
729 | for(i=-255; i<256; i++) | |
730 | { | |
731 | int adiff, index; | |
732 | int bits, code; | |
733 | int diff=i; | |
734 | ||
735 | adiff = ABS(diff); | |
736 | if(diff<0) diff--; | |
737 | index = vlc_dc_table[adiff]; | |
738 | ||
739 | bits= vlc_dc_lum_bits[index] + index; | |
740 | code= (vlc_dc_lum_code[index]<<index) + (diff & ((1 << index) - 1)); | |
741 | mpeg1_lum_dc_uni[i+255]= bits + (code<<8); | |
742 | ||
743 | bits= vlc_dc_chroma_bits[index] + index; | |
744 | code= (vlc_dc_chroma_code[index]<<index) + (diff & ((1 << index) - 1)); | |
745 | mpeg1_chr_dc_uni[i+255]= bits + (code<<8); | |
746 | } | |
747 | ||
30952237 MN |
748 | mv_penalty= av_mallocz( sizeof(uint8_t)*(MAX_FCODE+1)*(2*MAX_MV+1) ); |
749 | ||
11ce8834 MN |
750 | for(f_code=1; f_code<=MAX_FCODE; f_code++){ |
751 | for(mv=-MAX_MV; mv<=MAX_MV; mv++){ | |
752 | int len; | |
753 | ||
754 | if(mv==0) len= mbMotionVectorTable[0][1]; | |
755 | else{ | |
756 | int val, bit_size, range, code; | |
757 | ||
758 | bit_size = s->f_code - 1; | |
759 | range = 1 << bit_size; | |
760 | ||
761 | val=mv; | |
762 | if (val < 0) | |
763 | val = -val; | |
764 | val--; | |
765 | code = (val >> bit_size) + 1; | |
766 | if(code<17){ | |
767 | len= mbMotionVectorTable[code][1] + 1 + bit_size; | |
768 | }else{ | |
769 | len= mbMotionVectorTable[16][1] + 2 + bit_size; | |
770 | } | |
771 | } | |
772 | ||
773 | mv_penalty[f_code][mv+MAX_MV]= len; | |
774 | } | |
775 | } | |
776 | ||
777 | ||
778 | for(f_code=MAX_FCODE; f_code>0; f_code--){ | |
779 | for(mv=-(8<<f_code); mv<(8<<f_code); mv++){ | |
780 | fcode_tab[mv+MAX_MV]= f_code; | |
781 | } | |
782 | } | |
783 | } | |
1457ab52 | 784 | s->me.mv_penalty= mv_penalty; |
11ce8834 | 785 | s->fcode_tab= fcode_tab; |
029911d1 MN |
786 | if(s->codec_id == CODEC_ID_MPEG1VIDEO){ |
787 | s->min_qcoeff=-255; | |
788 | s->max_qcoeff= 255; | |
789 | }else{ | |
790 | s->min_qcoeff=-2047; | |
791 | s->max_qcoeff= 2047; | |
792 | } | |
c442d75c | 793 | s->intra_ac_vlc_length= |
e5021fff MN |
794 | s->inter_ac_vlc_length= |
795 | s->intra_ac_vlc_last_length= | |
796 | s->inter_ac_vlc_last_length= uni_mpeg1_ac_vlc_len; | |
11ce8834 | 797 | } |
8f8402e4 | 798 | |
de6d9b64 FB |
799 | static inline void encode_dc(MpegEncContext *s, int diff, int component) |
800 | { | |
de6d9b64 | 801 | if (component == 0) { |
f004ca1c MN |
802 | put_bits( |
803 | &s->pb, | |
804 | mpeg1_lum_dc_uni[diff+255]&0xFF, | |
805 | mpeg1_lum_dc_uni[diff+255]>>8); | |
de6d9b64 | 806 | } else { |
f004ca1c MN |
807 | put_bits( |
808 | &s->pb, | |
809 | mpeg1_chr_dc_uni[diff+255]&0xFF, | |
810 | mpeg1_chr_dc_uni[diff+255]>>8); | |
de6d9b64 FB |
811 | } |
812 | } | |
813 | ||
814 | static void mpeg1_encode_block(MpegEncContext *s, | |
815 | DCTELEM *block, | |
816 | int n) | |
817 | { | |
818 | int alevel, level, last_non_zero, dc, diff, i, j, run, last_index, sign; | |
819 | int code, component; | |
80feb2a2 | 820 | // RLTable *rl = &rl_mpeg1; |
de6d9b64 FB |
821 | |
822 | last_index = s->block_last_index[n]; | |
823 | ||
824 | /* DC coef */ | |
825 | if (s->mb_intra) { | |
826 | component = (n <= 3 ? 0 : n - 4 + 1); | |
827 | dc = block[0]; /* overflow is impossible */ | |
828 | diff = dc - s->last_dc[component]; | |
829 | encode_dc(s, diff, component); | |
830 | s->last_dc[component] = dc; | |
831 | i = 1; | |
029911d1 MN |
832 | /* |
833 | if (s->intra_vlc_format) | |
834 | rl = &rl_mpeg2; | |
835 | else | |
836 | rl = &rl_mpeg1; | |
837 | */ | |
de6d9b64 FB |
838 | } else { |
839 | /* encode the first coefficient : needs to be done here because | |
840 | it is handled slightly differently */ | |
841 | level = block[0]; | |
842 | if (abs(level) == 1) { | |
0c1a9eda | 843 | code = ((uint32_t)level >> 31); /* the sign bit */ |
de6d9b64 FB |
844 | put_bits(&s->pb, 2, code | 0x02); |
845 | i = 1; | |
846 | } else { | |
847 | i = 0; | |
848 | last_non_zero = -1; | |
849 | goto next_coef; | |
850 | } | |
851 | } | |
852 | ||
853 | /* now quantify & encode AC coefs */ | |
854 | last_non_zero = i - 1; | |
80feb2a2 | 855 | |
de6d9b64 | 856 | for(;i<=last_index;i++) { |
2ad1516a | 857 | j = s->intra_scantable.permutated[i]; |
de6d9b64 FB |
858 | level = block[j]; |
859 | next_coef: | |
860 | #if 0 | |
861 | if (level != 0) | |
862 | dprintf("level[%d]=%d\n", i, level); | |
863 | #endif | |
864 | /* encode using VLC */ | |
865 | if (level != 0) { | |
866 | run = i - last_non_zero - 1; | |
2ad1516a MN |
867 | |
868 | alevel= level; | |
869 | MASK_ABS(sign, alevel) | |
870 | sign&=1; | |
871 | ||
80feb2a2 | 872 | // code = get_rl_index(rl, 0, run, alevel); |
c442d75c | 873 | if (alevel <= mpeg1_max_level[0][run]){ |
80feb2a2 | 874 | code= mpeg1_index_run[0][run] + alevel - 1; |
80feb2a2 MN |
875 | /* store the vlc & sign at once */ |
876 | put_bits(&s->pb, mpeg1_vlc[code][1]+1, (mpeg1_vlc[code][0]<<1) + sign); | |
de6d9b64 | 877 | } else { |
80feb2a2 MN |
878 | /* escape seems to be pretty rare <5% so i dont optimize it */ |
879 | put_bits(&s->pb, mpeg1_vlc[111/*rl->n*/][1], mpeg1_vlc[111/*rl->n*/][0]); | |
de6d9b64 FB |
880 | /* escape: only clip in this case */ |
881 | put_bits(&s->pb, 6, run); | |
029911d1 MN |
882 | if(s->codec_id == CODEC_ID_MPEG1VIDEO){ |
883 | if (alevel < 128) { | |
884 | put_bits(&s->pb, 8, level & 0xff); | |
de6d9b64 | 885 | } else { |
029911d1 MN |
886 | if (level < 0) { |
887 | put_bits(&s->pb, 16, 0x8001 + level + 255); | |
888 | } else { | |
889 | put_bits(&s->pb, 16, level & 0xffff); | |
890 | } | |
de6d9b64 | 891 | } |
029911d1 MN |
892 | }else{ |
893 | put_bits(&s->pb, 12, level & 0xfff); | |
de6d9b64 FB |
894 | } |
895 | } | |
896 | last_non_zero = i; | |
897 | } | |
898 | } | |
899 | /* end of block */ | |
900 | put_bits(&s->pb, 2, 0x2); | |
901 | } | |
7604246d | 902 | #endif //CONFIG_ENCODERS |
de6d9b64 FB |
903 | |
904 | /******************************************/ | |
905 | /* decoding */ | |
906 | ||
907 | static VLC dc_lum_vlc; | |
908 | static VLC dc_chroma_vlc; | |
909 | static VLC mv_vlc; | |
910 | static VLC mbincr_vlc; | |
911 | static VLC mb_ptype_vlc; | |
912 | static VLC mb_btype_vlc; | |
913 | static VLC mb_pat_vlc; | |
914 | ||
c3bf0288 | 915 | static void init_vlcs() |
de6d9b64 FB |
916 | { |
917 | static int done = 0; | |
918 | ||
919 | if (!done) { | |
915bbac6 | 920 | done = 1; |
de6d9b64 | 921 | |
9ac7ecd6 | 922 | init_vlc(&dc_lum_vlc, DC_VLC_BITS, 12, |
de6d9b64 FB |
923 | vlc_dc_lum_bits, 1, 1, |
924 | vlc_dc_lum_code, 2, 2); | |
9ac7ecd6 | 925 | init_vlc(&dc_chroma_vlc, DC_VLC_BITS, 12, |
de6d9b64 FB |
926 | vlc_dc_chroma_bits, 1, 1, |
927 | vlc_dc_chroma_code, 2, 2); | |
8ed2ddb2 | 928 | init_vlc(&mv_vlc, MV_VLC_BITS, 17, |
de6d9b64 FB |
929 | &mbMotionVectorTable[0][1], 2, 1, |
930 | &mbMotionVectorTable[0][0], 2, 1); | |
9c00c3af | 931 | init_vlc(&mbincr_vlc, MBINCR_VLC_BITS, 36, |
de6d9b64 FB |
932 | &mbAddrIncrTable[0][1], 2, 1, |
933 | &mbAddrIncrTable[0][0], 2, 1); | |
8ed2ddb2 | 934 | init_vlc(&mb_pat_vlc, MB_PAT_VLC_BITS, 63, |
de6d9b64 FB |
935 | &mbPatTable[0][1], 2, 1, |
936 | &mbPatTable[0][0], 2, 1); | |
937 | ||
7bc9090a | 938 | init_vlc(&mb_ptype_vlc, MB_PTYPE_VLC_BITS, 7, |
de6d9b64 FB |
939 | &table_mb_ptype[0][1], 2, 1, |
940 | &table_mb_ptype[0][0], 2, 1); | |
7bc9090a | 941 | init_vlc(&mb_btype_vlc, MB_BTYPE_VLC_BITS, 11, |
de6d9b64 FB |
942 | &table_mb_btype[0][1], 2, 1, |
943 | &table_mb_btype[0][0], 2, 1); | |
944 | init_rl(&rl_mpeg1); | |
945 | init_rl(&rl_mpeg2); | |
4f68b084 MN |
946 | |
947 | init_2d_vlc_rl(&rl_mpeg1); | |
948 | init_2d_vlc_rl(&rl_mpeg2); | |
de6d9b64 FB |
949 | } |
950 | } | |
951 | ||
952 | static inline int get_dmv(MpegEncContext *s) | |
953 | { | |
612476ef A |
954 | if(get_bits1(&s->gb)) |
955 | return 1 - (get_bits1(&s->gb) << 1); | |
de6d9b64 FB |
956 | else |
957 | return 0; | |
958 | } | |
959 | ||
0ee50938 FB |
960 | static inline int get_qscale(MpegEncContext *s) |
961 | { | |
7062fad6 | 962 | int qscale = get_bits(&s->gb, 5); |
029911d1 | 963 | if (s->codec_id == CODEC_ID_MPEG2VIDEO) { |
0ee50938 | 964 | if (s->q_scale_type) { |
7062fad6 | 965 | return non_linear_qscale[qscale]; |
0ee50938 | 966 | } else { |
7062fad6 | 967 | return qscale << 1; |
0ee50938 | 968 | } |
0ee50938 FB |
969 | } |
970 | return qscale; | |
971 | } | |
972 | ||
de6d9b64 FB |
973 | /* motion type (for mpeg2) */ |
974 | #define MT_FIELD 1 | |
975 | #define MT_FRAME 2 | |
976 | #define MT_16X8 2 | |
977 | #define MT_DMV 3 | |
978 | ||
979 | static int mpeg_decode_mb(MpegEncContext *s, | |
980 | DCTELEM block[6][64]) | |
981 | { | |
d2975f8d | 982 | int i, j, k, cbp, val, mb_type, motion_type; |
de6d9b64 | 983 | |
de6d9b64 FB |
984 | dprintf("decode_mb: x=%d y=%d\n", s->mb_x, s->mb_y); |
985 | ||
f943e138 MN |
986 | assert(s->mb_skiped==0); |
987 | ||
9b8709d1 | 988 | if (s->mb_skip_run-- != 0) { |
7bc9090a MN |
989 | if(s->pict_type == I_TYPE){ |
990 | fprintf(stderr, "skiped MB in I frame at %d %d\n", s->mb_x, s->mb_y); | |
991 | return -1; | |
992 | } | |
993 | ||
de6d9b64 FB |
994 | /* skip mb */ |
995 | s->mb_intra = 0; | |
996 | for(i=0;i<6;i++) | |
997 | s->block_last_index[i] = -1; | |
998 | s->mv_type = MV_TYPE_16X16; | |
999 | if (s->pict_type == P_TYPE) { | |
1000 | /* if P type, zero motion vector is implied */ | |
1001 | s->mv_dir = MV_DIR_FORWARD; | |
1002 | s->mv[0][0][0] = s->mv[0][0][1] = 0; | |
1003 | s->last_mv[0][0][0] = s->last_mv[0][0][1] = 0; | |
25ed7f92 | 1004 | s->last_mv[0][1][0] = s->last_mv[0][1][1] = 0; |
f943e138 | 1005 | s->mb_skiped = 1; |
7bc9090a | 1006 | s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]= MB_TYPE_SKIP | MB_TYPE_L0 | MB_TYPE_16x16; |
de6d9b64 FB |
1007 | } else { |
1008 | /* if B type, reuse previous vectors and directions */ | |
1009 | s->mv[0][0][0] = s->last_mv[0][0][0]; | |
1010 | s->mv[0][0][1] = s->last_mv[0][0][1]; | |
1011 | s->mv[1][0][0] = s->last_mv[1][0][0]; | |
1012 | s->mv[1][0][1] = s->last_mv[1][0][1]; | |
f943e138 | 1013 | |
7bc9090a MN |
1014 | s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]= |
1015 | s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride - 1] | MB_TYPE_SKIP; | |
1016 | // assert(s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride - 1]&(MB_TYPE_16x16|MB_TYPE_16x8)); | |
1017 | ||
f943e138 MN |
1018 | if((s->mv[0][0][0]|s->mv[0][0][1]|s->mv[1][0][0]|s->mv[1][0][1])==0) |
1019 | s->mb_skiped = 1; | |
de6d9b64 | 1020 | } |
59b571c1 | 1021 | |
de6d9b64 FB |
1022 | return 0; |
1023 | } | |
1024 | ||
1025 | switch(s->pict_type) { | |
1026 | default: | |
1027 | case I_TYPE: | |
612476ef | 1028 | if (get_bits1(&s->gb) == 0) { |
e94bc100 | 1029 | if (get_bits1(&s->gb) == 0){ |
008f0851 | 1030 | fprintf(stderr, "invalid mb type in I Frame at %d %d\n", s->mb_x, s->mb_y); |
de6d9b64 | 1031 | return -1; |
e94bc100 | 1032 | } |
7bc9090a | 1033 | mb_type = MB_TYPE_QUANT | MB_TYPE_INTRA; |
de6d9b64 | 1034 | } else { |
7bc9090a | 1035 | mb_type = MB_TYPE_INTRA; |
de6d9b64 FB |
1036 | } |
1037 | break; | |
1038 | case P_TYPE: | |
8ed2ddb2 | 1039 | mb_type = get_vlc2(&s->gb, mb_ptype_vlc.table, MB_PTYPE_VLC_BITS, 1); |
9ac7ecd6 MN |
1040 | if (mb_type < 0){ |
1041 | fprintf(stderr, "invalid mb type in P Frame at %d %d\n", s->mb_x, s->mb_y); | |
de6d9b64 | 1042 | return -1; |
9ac7ecd6 | 1043 | } |
7bc9090a | 1044 | mb_type = ptype2mb_type[ mb_type ]; |
de6d9b64 FB |
1045 | break; |
1046 | case B_TYPE: | |
8ed2ddb2 | 1047 | mb_type = get_vlc2(&s->gb, mb_btype_vlc.table, MB_BTYPE_VLC_BITS, 1); |
9ac7ecd6 MN |
1048 | if (mb_type < 0){ |
1049 | fprintf(stderr, "invalid mb type in B Frame at %d %d\n", s->mb_x, s->mb_y); | |
de6d9b64 | 1050 | return -1; |
9ac7ecd6 | 1051 | } |
7bc9090a | 1052 | mb_type = btype2mb_type[ mb_type ]; |
de6d9b64 FB |
1053 | break; |
1054 | } | |
1055 | dprintf("mb_type=%x\n", mb_type); | |
7bc9090a MN |
1056 | // motion_type = 0; /* avoid warning */ |
1057 | if (IS_INTRA(mb_type)) { | |
1058 | /* compute dct type */ | |
1059 | if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var? | |
1060 | !s->frame_pred_frame_dct) { | |
1061 | s->interlaced_dct = get_bits1(&s->gb); | |
1062 | } | |
de6d9b64 | 1063 | |
7bc9090a MN |
1064 | if (IS_QUANT(mb_type)) |
1065 | s->qscale = get_qscale(s); | |
1066 | ||
de6d9b64 FB |
1067 | if (s->concealment_motion_vectors) { |
1068 | /* just parse them */ | |
1069 | if (s->picture_structure != PICT_FRAME) | |
612476ef | 1070 | skip_bits1(&s->gb); /* field select */ |
daab3296 MN |
1071 | |
1072 | s->mv[0][0][0]= s->last_mv[0][0][0]= s->last_mv[0][1][0] = | |
1073 | mpeg_decode_motion(s, s->mpeg_f_code[0][0], s->last_mv[0][0][0]); | |
1074 | s->mv[0][0][1]= s->last_mv[0][0][1]= s->last_mv[0][1][1] = | |
1075 | mpeg_decode_motion(s, s->mpeg_f_code[0][1], s->last_mv[0][0][1]); | |
1076 | ||
7bc9090a | 1077 | skip_bits1(&s->gb); /* marker */ |
daab3296 MN |
1078 | }else |
1079 | memset(s->last_mv, 0, sizeof(s->last_mv)); /* reset mv prediction */ | |
de6d9b64 | 1080 | s->mb_intra = 1; |
7bc9090a | 1081 | |
029911d1 | 1082 | if (s->codec_id == CODEC_ID_MPEG2VIDEO) { |
7bc9090a MN |
1083 | for(i=0;i<6;i++) { |
1084 | if (mpeg2_decode_block_intra(s, block[i], i) < 0) | |
1085 | return -1; | |
1086 | } | |
1087 | } else { | |
1088 | for(i=0;i<6;i++) { | |
1089 | if (mpeg1_decode_block_intra(s, block[i], i) < 0) | |
1090 | return -1; | |
1091 | } | |
1092 | } | |
de6d9b64 | 1093 | } else { |
7bc9090a MN |
1094 | if (mb_type & MB_TYPE_ZERO_MV){ |
1095 | assert(mb_type & MB_TYPE_PAT); | |
1096 | ||
1097 | /* compute dct type */ | |
1098 | if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var? | |
1099 | !s->frame_pred_frame_dct) { | |
1100 | s->interlaced_dct = get_bits1(&s->gb); | |
1101 | } | |
1102 | ||
1103 | if (IS_QUANT(mb_type)) | |
1104 | s->qscale = get_qscale(s); | |
1105 | ||
1106 | s->mv_dir = MV_DIR_FORWARD; | |
1107 | s->mv_type = MV_TYPE_16X16; | |
1108 | s->last_mv[0][0][0] = 0; | |
1109 | s->last_mv[0][0][1] = 0; | |
1110 | s->last_mv[0][1][0] = 0; | |
1111 | s->last_mv[0][1][1] = 0; | |
1112 | s->mv[0][0][0] = 0; | |
1113 | s->mv[0][0][1] = 0; | |
1114 | }else{ | |
1115 | assert(mb_type & MB_TYPE_L0L1); | |
1116 | //FIXME decide if MBs in field pictures are MB_TYPE_INTERLACED | |
1117 | /* get additionnal motion vector type */ | |
1118 | if (s->frame_pred_frame_dct) | |
1119 | motion_type = MT_FRAME; | |
1120 | else{ | |
1121 | motion_type = get_bits(&s->gb, 2); | |
1122 | } | |
1123 | ||
1124 | /* compute dct type */ | |
1125 | if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var? | |
1126 | !s->frame_pred_frame_dct && IS_PAT(mb_type)) { | |
1127 | s->interlaced_dct = get_bits1(&s->gb); | |
1128 | } | |
1129 | ||
1130 | if (IS_QUANT(mb_type)) | |
1131 | s->qscale = get_qscale(s); | |
1132 | ||
1133 | /* motion vectors */ | |
1134 | s->mv_dir = 0; | |
1135 | for(i=0;i<2;i++) { | |
1136 | if (USES_LIST(mb_type, i)) { | |
1137 | s->mv_dir |= (MV_DIR_FORWARD >> i); | |
1138 | dprintf("motion_type=%d\n", motion_type); | |
1139 | switch(motion_type) { | |
1140 | case MT_FRAME: /* or MT_16X8 */ | |
1141 | if (s->picture_structure == PICT_FRAME) { | |
1142 | /* MT_FRAME */ | |
1143 | mb_type |= MB_TYPE_16x16; | |
1144 | s->mv_type = MV_TYPE_16X16; | |
1145 | s->mv[i][0][0]= s->last_mv[i][0][0]= s->last_mv[i][1][0] = | |
1146 | mpeg_decode_motion(s, s->mpeg_f_code[i][0], s->last_mv[i][0][0]); | |
1147 | s->mv[i][0][1]= s->last_mv[i][0][1]= s->last_mv[i][1][1] = | |
1148 | mpeg_decode_motion(s, s->mpeg_f_code[i][1], s->last_mv[i][0][1]); | |
de6d9b64 | 1149 | /* full_pel: only for mpeg1 */ |
7bc9090a MN |
1150 | if (s->full_pel[i]){ |
1151 | s->mv[i][0][0] <<= 1; | |
1152 | s->mv[i][0][1] <<= 1; | |
1153 | } | |
1154 | } else { | |
1155 | /* MT_16X8 */ | |
1156 | mb_type |= MB_TYPE_16x8; | |
1157 | s->mv_type = MV_TYPE_16X8; | |
1158 | for(j=0;j<2;j++) { | |
1159 | s->field_select[i][j] = get_bits1(&s->gb); | |
1160 | for(k=0;k<2;k++) { | |
1161 | val = mpeg_decode_motion(s, s->mpeg_f_code[i][k], | |
1162 | s->last_mv[i][j][k]); | |
1163 | s->last_mv[i][j][k] = val; | |
1164 | s->mv[i][j][k] = val; | |
1165 | } | |
1166 | } | |
de6d9b64 | 1167 | } |
7bc9090a MN |
1168 | break; |
1169 | case MT_FIELD: | |
1170 | s->mv_type = MV_TYPE_FIELD; | |
1171 | if (s->picture_structure == PICT_FRAME) { | |
1172 | mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED; | |
1173 | for(j=0;j<2;j++) { | |
1174 | s->field_select[i][j] = get_bits1(&s->gb); | |
1175 | val = mpeg_decode_motion(s, s->mpeg_f_code[i][0], | |
1176 | s->last_mv[i][j][0]); | |
1177 | s->last_mv[i][j][0] = val; | |
1178 | s->mv[i][j][0] = val; | |
1179 | dprintf("fmx=%d\n", val); | |
1180 | val = mpeg_decode_motion(s, s->mpeg_f_code[i][1], | |
1181 | s->last_mv[i][j][1] >> 1); | |
1182 | s->last_mv[i][j][1] = val << 1; | |
1183 | s->mv[i][j][1] = val; | |
1184 | dprintf("fmy=%d\n", val); | |
1185 | } | |
1186 | } else { | |
1187 | mb_type |= MB_TYPE_16x16; | |
1188 | s->field_select[i][0] = get_bits1(&s->gb); | |
de6d9b64 FB |
1189 | for(k=0;k<2;k++) { |
1190 | val = mpeg_decode_motion(s, s->mpeg_f_code[i][k], | |
7bc9090a MN |
1191 | s->last_mv[i][0][k]); |
1192 | s->last_mv[i][0][k] = val; | |
1193 | s->last_mv[i][1][k] = val; | |
1194 | s->mv[i][0][k] = val; | |
de6d9b64 FB |
1195 | } |
1196 | } | |
7bc9090a MN |
1197 | break; |
1198 | case MT_DMV: | |
1199 | { | |
1200 | int dmx, dmy, mx, my, m; | |
1201 | ||
1202 | mx = mpeg_decode_motion(s, s->mpeg_f_code[i][0], | |
1203 | s->last_mv[i][0][0]); | |
1204 | s->last_mv[i][0][0] = mx; | |
1205 | s->last_mv[i][1][0] = mx; | |
1206 | dmx = get_dmv(s); | |
1207 | my = mpeg_decode_motion(s, s->mpeg_f_code[i][1], | |
1208 | s->last_mv[i][0][1] >> 1); | |
1209 | dmy = get_dmv(s); | |
1210 | s->mv_type = MV_TYPE_DMV; | |
1dff7d56 IK |
1211 | |
1212 | ||
1213 | s->last_mv[i][0][1] = my<<1; | |
1214 | s->last_mv[i][1][1] = my<<1; | |
1215 | ||
1216 | s->mv[i][0][0] = mx; | |
1217 | s->mv[i][0][1] = my; | |
1218 | s->mv[i][1][0] = mx;//not used | |
1219 | s->mv[i][1][1] = my;//not used | |
1220 | ||
7bc9090a MN |
1221 | if (s->picture_structure == PICT_FRAME) { |
1222 | mb_type |= MB_TYPE_16x16 | MB_TYPE_INTERLACED; | |
1223 | ||
1dff7d56 | 1224 | //m = 1 + 2 * s->top_field_first; |
7bc9090a | 1225 | m = s->top_field_first ? 1 : 3; |
1dff7d56 | 1226 | |
7bc9090a | 1227 | /* top -> top pred */ |
1dff7d56 IK |
1228 | s->mv[i][2][0] = ((mx * m + (mx > 0)) >> 1) + dmx; |
1229 | s->mv[i][2][1] = ((my * m + (my > 0)) >> 1) + dmy - 1; | |
7bc9090a | 1230 | m = 4 - m; |
7bc9090a MN |
1231 | s->mv[i][3][0] = ((mx * m + (mx > 0)) >> 1) + dmx; |
1232 | s->mv[i][3][1] = ((my * m + (my > 0)) >> 1) + dmy + 1; | |
1233 | } else { | |
1234 | mb_type |= MB_TYPE_16x16; | |
1235 | ||
1dff7d56 IK |
1236 | s->mv[i][2][0] = ((mx + (mx > 0)) >> 1) + dmx; |
1237 | s->mv[i][2][1] = ((my + (my > 0)) >> 1) + dmy; | |
1238 | if(s->picture_structure == PICT_TOP_FIELD) | |
1239 | s->mv[i][2][1]--; | |
1240 | else | |
1241 | s->mv[i][2][1]++; | |
7bc9090a | 1242 | } |
de6d9b64 | 1243 | } |
7bc9090a | 1244 | break; |
de6d9b64 | 1245 | } |
de6d9b64 FB |
1246 | } |
1247 | } | |
1248 | } | |
7bc9090a MN |
1249 | |
1250 | s->mb_intra = 0; | |
de6d9b64 | 1251 | |
7bc9090a MN |
1252 | if (IS_PAT(mb_type)) { |
1253 | cbp = get_vlc2(&s->gb, mb_pat_vlc.table, MB_PAT_VLC_BITS, 1); | |
1254 | if (cbp < 0){ | |
1255 | fprintf(stderr, "invalid cbp at %d %d\n", s->mb_x, s->mb_y); | |
1256 | return -1; | |
de6d9b64 | 1257 | } |
7bc9090a MN |
1258 | cbp++; |
1259 | ||
029911d1 | 1260 | if (s->codec_id == CODEC_ID_MPEG2VIDEO) { |
7bc9090a MN |
1261 | for(i=0;i<6;i++) { |
1262 | if (cbp & 32) { | |
1263 | if (mpeg2_decode_block_non_intra(s, block[i], i) < 0) | |
1264 | return -1; | |
1265 | } else { | |
1266 | s->block_last_index[i] = -1; | |
1267 | } | |
1268 | cbp+=cbp; | |
de6d9b64 | 1269 | } |
7bc9090a MN |
1270 | } else { |
1271 | for(i=0;i<6;i++) { | |
1272 | if (cbp & 32) { | |
1273 | if (mpeg1_decode_block_inter(s, block[i], i) < 0) | |
1274 | return -1; | |
1275 | } else { | |
1276 | s->block_last_index[i] = -1; | |
1277 | } | |
1278 | cbp+=cbp; | |
a0201736 | 1279 | } |
de6d9b64 | 1280 | } |
7bc9090a MN |
1281 | }else{ |
1282 | for(i=0;i<6;i++) | |
1283 | s->block_last_index[i] = -1; | |
de6d9b64 FB |
1284 | } |
1285 | } | |
7bc9090a MN |
1286 | |
1287 | s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]= mb_type; | |
1288 | ||
de6d9b64 FB |
1289 | return 0; |
1290 | } | |
1291 | ||
1292 | /* as h263, but only 17 codes */ | |
1293 | static int mpeg_decode_motion(MpegEncContext *s, int fcode, int pred) | |
1294 | { | |
05858889 | 1295 | int code, sign, val, l, shift; |
de6d9b64 | 1296 | |
8ed2ddb2 | 1297 | code = get_vlc2(&s->gb, mv_vlc.table, MV_VLC_BITS, 2); |
de6d9b64 FB |
1298 | if (code == 0) { |
1299 | return pred; | |
1300 | } | |
7bc9090a MN |
1301 | if (code < 0) { |
1302 | return 0xffff; | |
1303 | } | |
1304 | ||
612476ef | 1305 | sign = get_bits1(&s->gb); |
de6d9b64 | 1306 | shift = fcode - 1; |
05858889 B |
1307 | val = code; |
1308 | if (shift) { | |
1309 | val = (val - 1) << shift; | |
de6d9b64 | 1310 | val |= get_bits(&s->gb, shift); |
05858889 B |
1311 | val++; |
1312 | } | |
de6d9b64 FB |
1313 | if (sign) |
1314 | val = -val; | |
1315 | val += pred; | |
1316 | ||
1317 | /* modulo decoding */ | |
7bc9090a | 1318 | l = 1 << (shift+4); |
05858889 | 1319 | val = ((val + l)&(l*2-1)) - l; |
de6d9b64 FB |
1320 | return val; |
1321 | } | |
1322 | ||
c3bf0288 | 1323 | static inline int decode_dc(GetBitContext *gb, int component) |
de6d9b64 FB |
1324 | { |
1325 | int code, diff; | |
1326 | ||
1327 | if (component == 0) { | |
c3bf0288 | 1328 | code = get_vlc2(gb, dc_lum_vlc.table, DC_VLC_BITS, 2); |
de6d9b64 | 1329 | } else { |
c3bf0288 | 1330 | code = get_vlc2(gb, dc_chroma_vlc.table, DC_VLC_BITS, 2); |
de6d9b64 | 1331 | } |
9ac7ecd6 | 1332 | if (code < 0){ |
c3bf0288 | 1333 | fprintf(stderr, "invalid dc code at\n"); |
de6d9b64 | 1334 | return 0xffff; |
9ac7ecd6 | 1335 | } |
de6d9b64 FB |
1336 | if (code == 0) { |
1337 | diff = 0; | |
1338 | } else { | |
c3bf0288 | 1339 | diff = get_xbits(gb, code); |
de6d9b64 FB |
1340 | } |
1341 | return diff; | |
1342 | } | |
1343 | ||
a0201736 | 1344 | static inline int mpeg1_decode_block_intra(MpegEncContext *s, |
de6d9b64 FB |
1345 | DCTELEM *block, |
1346 | int n) | |
1347 | { | |
1348 | int level, dc, diff, i, j, run; | |
a0201736 | 1349 | int component; |
de6d9b64 | 1350 | RLTable *rl = &rl_mpeg1; |
0c1a9eda ZK |
1351 | uint8_t * const scantable= s->intra_scantable.permutated; |
1352 | const uint16_t *quant_matrix= s->intra_matrix; | |
a0201736 | 1353 | const int qscale= s->qscale; |
de6d9b64 | 1354 | |
a0201736 MN |
1355 | /* DC coef */ |
1356 | component = (n <= 3 ? 0 : n - 4 + 1); | |
c3bf0288 | 1357 | diff = decode_dc(&s->gb, component); |
a0201736 MN |
1358 | if (diff >= 0xffff) |
1359 | return -1; | |
1360 | dc = s->last_dc[component]; | |
1361 | dc += diff; | |
1362 | s->last_dc[component] = dc; | |
1363 | block[0] = dc<<3; | |
1364 | dprintf("dc=%d diff=%d\n", dc, diff); | |
1365 | i = 0; | |
1366 | { | |
1367 | OPEN_READER(re, &s->gb); | |
1368 | /* now quantify & encode AC coefs */ | |
1369 | for(;;) { | |
1370 | UPDATE_CACHE(re, &s->gb); | |
1371 | GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2); | |
1372 | ||
1373 | if(level == 127){ | |
1374 | break; | |
1375 | } else if(level != 0) { | |
1376 | i += run; | |
1377 | j = scantable[i]; | |
1378 | level= (level*qscale*quant_matrix[j])>>3; | |
1379 | level= (level-1)|1; | |
1380 | level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1); | |
1381 | LAST_SKIP_BITS(re, &s->gb, 1); | |
1382 | } else { | |
1383 | /* escape */ | |
1384 | run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6); | |
1385 | UPDATE_CACHE(re, &s->gb); | |
1386 | level = SHOW_SBITS(re, &s->gb, 8); SKIP_BITS(re, &s->gb, 8); | |
1387 | if (level == -128) { | |
1388 | level = SHOW_UBITS(re, &s->gb, 8) - 256; LAST_SKIP_BITS(re, &s->gb, 8); | |
1389 | } else if (level == 0) { | |
1390 | level = SHOW_UBITS(re, &s->gb, 8) ; LAST_SKIP_BITS(re, &s->gb, 8); | |
1391 | } | |
1392 | i += run; | |
1393 | j = scantable[i]; | |
1394 | if(level<0){ | |
1395 | level= -level; | |
1396 | level= (level*qscale*quant_matrix[j])>>3; | |
1397 | level= (level-1)|1; | |
1398 | level= -level; | |
1399 | }else{ | |
1400 | level= (level*qscale*quant_matrix[j])>>3; | |
1401 | level= (level-1)|1; | |
1402 | } | |
1403 | } | |
1404 | if (i > 63){ | |
1405 | fprintf(stderr, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y); | |
1406 | return -1; | |
1407 | } | |
1408 | ||
1409 | block[j] = level; | |
1410 | } | |
1411 | CLOSE_READER(re, &s->gb); | |
1412 | } | |
1413 | s->block_last_index[n] = i; | |
1414 | return 0; | |
1415 | } | |
1416 | ||
1417 | static inline int mpeg1_decode_block_inter(MpegEncContext *s, | |
1418 | DCTELEM *block, | |
1419 | int n) | |
1420 | { | |
1421 | int level, i, j, run; | |
1422 | RLTable *rl = &rl_mpeg1; | |
0c1a9eda ZK |
1423 | uint8_t * const scantable= s->intra_scantable.permutated; |
1424 | const uint16_t *quant_matrix= s->inter_matrix; | |
a0201736 MN |
1425 | const int qscale= s->qscale; |
1426 | ||
1427 | { | |
8db1a1dd MN |
1428 | int v; |
1429 | OPEN_READER(re, &s->gb); | |
a0201736 | 1430 | i = -1; |
de6d9b64 | 1431 | /* special case for the first coef. no need to add a second vlc table */ |
8db1a1dd MN |
1432 | UPDATE_CACHE(re, &s->gb); |
1433 | v= SHOW_UBITS(re, &s->gb, 2); | |
de6d9b64 | 1434 | if (v & 2) { |
3729c912 | 1435 | LAST_SKIP_BITS(re, &s->gb, 2); |
a0201736 MN |
1436 | level= (3*qscale*quant_matrix[0])>>4; |
1437 | level= (level-1)|1; | |
1438 | if(v&1) | |
1439 | level= -level; | |
3729c912 | 1440 | block[0] = level; |
a0201736 | 1441 | i++; |
de6d9b64 | 1442 | } |
3729c912 | 1443 | |
a0201736 MN |
1444 | /* now quantify & encode AC coefs */ |
1445 | for(;;) { | |
1446 | UPDATE_CACHE(re, &s->gb); | |
1447 | GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2); | |
1448 | ||
1449 | if(level == 127){ | |
1450 | break; | |
1451 | } else if(level != 0) { | |
1452 | i += run; | |
1453 | j = scantable[i]; | |
1454 | level= ((level*2+1)*qscale*quant_matrix[j])>>4; | |
1455 | level= (level-1)|1; | |
1456 | level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1); | |
1457 | LAST_SKIP_BITS(re, &s->gb, 1); | |
1458 | } else { | |
1459 | /* escape */ | |
1460 | run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6); | |
1461 | UPDATE_CACHE(re, &s->gb); | |
1462 | level = SHOW_SBITS(re, &s->gb, 8); SKIP_BITS(re, &s->gb, 8); | |
1463 | if (level == -128) { | |
1464 | level = SHOW_UBITS(re, &s->gb, 8) - 256; LAST_SKIP_BITS(re, &s->gb, 8); | |
1465 | } else if (level == 0) { | |
1466 | level = SHOW_UBITS(re, &s->gb, 8) ; LAST_SKIP_BITS(re, &s->gb, 8); | |
1467 | } | |
1468 | i += run; | |
1469 | j = scantable[i]; | |
1470 | if(level<0){ | |
1471 | level= -level; | |
1472 | level= ((level*2+1)*qscale*quant_matrix[j])>>4; | |
1473 | level= (level-1)|1; | |
1474 | level= -level; | |
1475 | }else{ | |
1476 | level= ((level*2+1)*qscale*quant_matrix[j])>>4; | |
1477 | level= (level-1)|1; | |
1478 | } | |
de6d9b64 | 1479 | } |
a0201736 MN |
1480 | if (i > 63){ |
1481 | fprintf(stderr, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y); | |
1482 | return -1; | |
1483 | } | |
1484 | ||
1485 | block[j] = level; | |
de6d9b64 | 1486 | } |
a0201736 | 1487 | CLOSE_READER(re, &s->gb); |
de6d9b64 | 1488 | } |
a0201736 | 1489 | s->block_last_index[n] = i; |
de6d9b64 FB |
1490 | return 0; |
1491 | } | |
1492 | ||
1493 | /* Also does unquantization here, since I will never support mpeg2 | |
1494 | encoding */ | |
3729c912 MN |
1495 | static inline int mpeg2_decode_block_non_intra(MpegEncContext *s, |
1496 | DCTELEM *block, | |
1497 | int n) | |
de6d9b64 FB |
1498 | { |
1499 | int level, i, j, run; | |
de6d9b64 | 1500 | RLTable *rl = &rl_mpeg1; |
0c1a9eda ZK |
1501 | uint8_t * const scantable= s->intra_scantable.permutated; |
1502 | const uint16_t *quant_matrix; | |
3729c912 | 1503 | const int qscale= s->qscale; |
de6d9b64 FB |
1504 | int mismatch; |
1505 | ||
de6d9b64 FB |
1506 | mismatch = 1; |
1507 | ||
1508 | { | |
8db1a1dd MN |
1509 | int v; |
1510 | OPEN_READER(re, &s->gb); | |
3729c912 | 1511 | i = -1; |
8db1a1dd | 1512 | if (n < 4) |
3729c912 | 1513 | quant_matrix = s->inter_matrix; |
de6d9b64 | 1514 | else |
3729c912 | 1515 | quant_matrix = s->chroma_inter_matrix; |
8db1a1dd | 1516 | |
de6d9b64 | 1517 | /* special case for the first coef. no need to add a second vlc table */ |
8db1a1dd MN |
1518 | UPDATE_CACHE(re, &s->gb); |
1519 | v= SHOW_UBITS(re, &s->gb, 2); | |
de6d9b64 | 1520 | if (v & 2) { |
3729c912 MN |
1521 | LAST_SKIP_BITS(re, &s->gb, 2); |
1522 | level= (3*qscale*quant_matrix[0])>>5; | |
1523 | if(v&1) | |
1524 | level= -level; | |
1525 | block[0] = level; | |
1526 | mismatch ^= level; | |
1527 | i++; | |
de6d9b64 | 1528 | } |
de6d9b64 | 1529 | |
3729c912 MN |
1530 | /* now quantify & encode AC coefs */ |
1531 | for(;;) { | |
1532 | UPDATE_CACHE(re, &s->gb); | |
1533 | GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2); | |
1534 | ||
1535 | if(level == 127){ | |
1536 | break; | |
1537 | } else if(level != 0) { | |
1538 | i += run; | |
1539 | j = scantable[i]; | |
1540 | level= ((level*2+1)*qscale*quant_matrix[j])>>5; | |
1541 | level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1); | |
1542 | LAST_SKIP_BITS(re, &s->gb, 1); | |
1543 | } else { | |
1544 | /* escape */ | |
1545 | run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6); | |
1546 | UPDATE_CACHE(re, &s->gb); | |
1547 | level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12); | |
1548 | ||
1549 | i += run; | |
1550 | j = scantable[i]; | |
1551 | if(level<0){ | |
1552 | level= ((-level*2+1)*qscale*quant_matrix[j])>>5; | |
1553 | level= -level; | |
1554 | }else{ | |
1555 | level= ((level*2+1)*qscale*quant_matrix[j])>>5; | |
1556 | } | |
1557 | } | |
1558 | if (i > 63){ | |
1559 | fprintf(stderr, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y); | |
1560 | return -1; | |
1561 | } | |
1562 | ||
1563 | mismatch ^= level; | |
1564 | block[j] = level; | |
25ed7f92 | 1565 | } |
3729c912 | 1566 | CLOSE_READER(re, &s->gb); |
de6d9b64 FB |
1567 | } |
1568 | block[63] ^= (mismatch & 1); | |
3729c912 | 1569 | |
de6d9b64 FB |
1570 | s->block_last_index[n] = i; |
1571 | return 0; | |
1572 | } | |
1573 | ||
3729c912 MN |
1574 | static inline int mpeg2_decode_block_intra(MpegEncContext *s, |
1575 | DCTELEM *block, | |
1576 | int n) | |
de6d9b64 FB |
1577 | { |
1578 | int level, dc, diff, i, j, run; | |
3729c912 | 1579 | int component; |
de6d9b64 | 1580 | RLTable *rl; |
0c1a9eda ZK |
1581 | uint8_t * const scantable= s->intra_scantable.permutated; |
1582 | const uint16_t *quant_matrix; | |
3729c912 | 1583 | const int qscale= s->qscale; |
de6d9b64 FB |
1584 | int mismatch; |
1585 | ||
de6d9b64 | 1586 | /* DC coef */ |
3729c912 MN |
1587 | if (n < 4){ |
1588 | quant_matrix = s->intra_matrix; | |
1589 | component = 0; | |
1590 | }else{ | |
1591 | quant_matrix = s->chroma_intra_matrix; | |
1592 | component = n - 3; | |
1593 | } | |
c3bf0288 | 1594 | diff = decode_dc(&s->gb, component); |
de6d9b64 FB |
1595 | if (diff >= 0xffff) |
1596 | return -1; | |
1597 | dc = s->last_dc[component]; | |
1598 | dc += diff; | |
1599 | s->last_dc[component] = dc; | |
1600 | block[0] = dc << (3 - s->intra_dc_precision); | |
1601 | dprintf("dc=%d\n", block[0]); | |
d753173a | 1602 | mismatch = block[0] ^ 1; |
3729c912 | 1603 | i = 0; |
de6d9b64 FB |
1604 | if (s->intra_vlc_format) |
1605 | rl = &rl_mpeg2; | |
1606 | else | |
1607 | rl = &rl_mpeg1; | |
25ed7f92 | 1608 | |
3729c912 MN |
1609 | { |
1610 | OPEN_READER(re, &s->gb); | |
1611 | /* now quantify & encode AC coefs */ | |
1612 | for(;;) { | |
1613 | UPDATE_CACHE(re, &s->gb); | |
1614 | GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2); | |
1615 | ||
1616 | if(level == 127){ | |
1617 | break; | |
1618 | } else if(level != 0) { | |
1619 | i += run; | |
1620 | j = scantable[i]; | |
1621 | level= (level*qscale*quant_matrix[j])>>4; | |
1622 | level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1); | |
1623 | LAST_SKIP_BITS(re, &s->gb, 1); | |
1624 | } else { | |
1625 | /* escape */ | |
1626 | run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6); | |
1627 | UPDATE_CACHE(re, &s->gb); | |
1628 | level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12); | |
1629 | i += run; | |
1630 | j = scantable[i]; | |
1631 | if(level<0){ | |
1632 | level= (-level*qscale*quant_matrix[j])>>4; | |
1633 | level= -level; | |
1634 | }else{ | |
1635 | level= (level*qscale*quant_matrix[j])>>4; | |
1636 | } | |
1637 | } | |
1638 | if (i > 63){ | |
1639 | fprintf(stderr, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y); | |
1640 | return -1; | |
1641 | } | |
1642 | ||
1643 | mismatch^= level; | |
1644 | block[j] = level; | |
9ac7ecd6 | 1645 | } |
3729c912 | 1646 | CLOSE_READER(re, &s->gb); |
de6d9b64 | 1647 | } |
3729c912 MN |
1648 | block[63]^= mismatch&1; |
1649 | ||
de6d9b64 FB |
1650 | s->block_last_index[n] = i; |
1651 | return 0; | |
1652 | } | |
1653 | ||
de6d9b64 FB |
1654 | typedef struct Mpeg1Context { |
1655 | MpegEncContext mpeg_enc_ctx; | |
de6d9b64 | 1656 | int mpeg_enc_ctx_allocated; /* true if decoding context allocated */ |
1cb0edb4 | 1657 | int repeat_field; /* true if we must repeat the field */ |
fa384dcc | 1658 | AVPanScan pan_scan; /** some temporary storage for the panscan */ |
de6d9b64 FB |
1659 | } Mpeg1Context; |
1660 | ||
1661 | static int mpeg_decode_init(AVCodecContext *avctx) | |
1662 | { | |
1663 | Mpeg1Context *s = avctx->priv_data; | |
8f8402e4 | 1664 | |
94aec31f | 1665 | s->mpeg_enc_ctx.flags= avctx->flags; |
8f8402e4 | 1666 | common_init(&s->mpeg_enc_ctx); |
c3bf0288 | 1667 | init_vlcs(); |
de6d9b64 | 1668 | |
de6d9b64 | 1669 | s->mpeg_enc_ctx_allocated = 0; |
de6d9b64 | 1670 | s->mpeg_enc_ctx.picture_number = 0; |
1cb0edb4 | 1671 | s->repeat_field = 0; |
d7e9533a | 1672 | s->mpeg_enc_ctx.codec_id= avctx->codec->id; |
de6d9b64 FB |
1673 | return 0; |
1674 | } | |
1675 | ||
1676 | /* return the 8 bit start code value and update the search | |
1677 | state. Return -1 if no start code found */ | |
80097bbf | 1678 | static int find_start_code(uint8_t **pbuf_ptr, uint8_t *buf_end) |
de6d9b64 | 1679 | { |
0c1a9eda | 1680 | uint8_t *buf_ptr; |
80097bbf | 1681 | unsigned int state=0xFFFFFFFF, v; |
de6d9b64 FB |
1682 | int val; |
1683 | ||
de6d9b64 FB |
1684 | buf_ptr = *pbuf_ptr; |
1685 | while (buf_ptr < buf_end) { | |
1686 | v = *buf_ptr++; | |
1687 | if (state == 0x000001) { | |
1688 | state = ((state << 8) | v) & 0xffffff; | |
1689 | val = state; | |
1690 | goto found; | |
1691 | } | |
1692 | state = ((state << 8) | v) & 0xffffff; | |
1693 | } | |
1694 | val = -1; | |
1695 | found: | |
1696 | *pbuf_ptr = buf_ptr; | |
de6d9b64 FB |
1697 | return val; |
1698 | } | |
1699 | ||
1700 | static int mpeg1_decode_picture(AVCodecContext *avctx, | |
0c1a9eda | 1701 | uint8_t *buf, int buf_size) |
de6d9b64 FB |
1702 | { |
1703 | Mpeg1Context *s1 = avctx->priv_data; | |
1704 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
1705 | int ref, f_code; | |
1706 | ||
68f593b4 | 1707 | init_get_bits(&s->gb, buf, buf_size*8); |
de6d9b64 FB |
1708 | |
1709 | ref = get_bits(&s->gb, 10); /* temporal ref */ | |
1710 | s->pict_type = get_bits(&s->gb, 3); | |
b9ecd1ee | 1711 | dprintf("pict_type=%d number=%d\n", s->pict_type, s->picture_number); |
58bfafbe | 1712 | |
612476ef | 1713 | skip_bits(&s->gb, 16); |
de6d9b64 | 1714 | if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) { |
612476ef | 1715 | s->full_pel[0] = get_bits1(&s->gb); |
de6d9b64 FB |
1716 | f_code = get_bits(&s->gb, 3); |
1717 | if (f_code == 0) | |
1718 | return -1; | |
1719 | s->mpeg_f_code[0][0] = f_code; | |
1720 | s->mpeg_f_code[0][1] = f_code; | |
1721 | } | |
1722 | if (s->pict_type == B_TYPE) { | |
612476ef | 1723 | s->full_pel[1] = get_bits1(&s->gb); |
de6d9b64 FB |
1724 | f_code = get_bits(&s->gb, 3); |
1725 | if (f_code == 0) | |
1726 | return -1; | |
1727 | s->mpeg_f_code[1][0] = f_code; | |
1728 | s->mpeg_f_code[1][1] = f_code; | |
1729 | } | |
1e491e29 MN |
1730 | s->current_picture.pict_type= s->pict_type; |
1731 | s->current_picture.key_frame= s->pict_type == I_TYPE; | |
d9cb5429 | 1732 | |
de6d9b64 FB |
1733 | s->y_dc_scale = 8; |
1734 | s->c_dc_scale = 8; | |
1735 | s->first_slice = 1; | |
1736 | return 0; | |
1737 | } | |
1738 | ||
1739 | static void mpeg_decode_sequence_extension(MpegEncContext *s) | |
1740 | { | |
1741 | int horiz_size_ext, vert_size_ext; | |
945f15b7 | 1742 | int bit_rate_ext, vbv_buf_ext; |
de6d9b64 | 1743 | int frame_rate_ext_n, frame_rate_ext_d; |
029911d1 | 1744 | int level, profile; |
de6d9b64 | 1745 | |
029911d1 MN |
1746 | skip_bits(&s->gb, 1); /* profil and level esc*/ |
1747 | profile= get_bits(&s->gb, 3); | |
1748 | level= get_bits(&s->gb, 4); | |
1cb0edb4 | 1749 | s->progressive_sequence = get_bits1(&s->gb); /* progressive_sequence */ |
612476ef | 1750 | skip_bits(&s->gb, 2); /* chroma_format */ |
de6d9b64 FB |
1751 | horiz_size_ext = get_bits(&s->gb, 2); |
1752 | vert_size_ext = get_bits(&s->gb, 2); | |
1753 | s->width |= (horiz_size_ext << 12); | |
1754 | s->height |= (vert_size_ext << 12); | |
1755 | bit_rate_ext = get_bits(&s->gb, 12); /* XXX: handle it */ | |
1756 | s->bit_rate = ((s->bit_rate / 400) | (bit_rate_ext << 12)) * 400; | |
612476ef | 1757 | skip_bits1(&s->gb); /* marker */ |
de6d9b64 | 1758 | vbv_buf_ext = get_bits(&s->gb, 8); |
e0560448 | 1759 | |
945f15b7 | 1760 | s->low_delay = get_bits1(&s->gb); |
e0560448 MN |
1761 | if(s->flags & CODEC_FLAG_LOW_DELAY) s->low_delay=1; |
1762 | ||
de6d9b64 FB |
1763 | frame_rate_ext_n = get_bits(&s->gb, 2); |
1764 | frame_rate_ext_d = get_bits(&s->gb, 5); | |
14bea432 MN |
1765 | av_reduce( |
1766 | &s->avctx->frame_rate, | |
1767 | &s->avctx->frame_rate_base, | |
1768 | frame_rate_tab[s->frame_rate_index] * (frame_rate_ext_n+1), | |
1769 | MPEG1_FRAME_RATE_BASE * (frame_rate_ext_d+1), | |
1770 | 1<<30); | |
1771 | ||
de6d9b64 | 1772 | dprintf("sequence extension\n"); |
029911d1 | 1773 | s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG2VIDEO; |
fb4a4a56 | 1774 | s->avctx->sub_id = 2; /* indicates mpeg2 found */ |
945f15b7 | 1775 | |
5ff85f1d MN |
1776 | if(s->aspect_ratio_info <= 1) |
1777 | s->avctx->sample_aspect_ratio= mpeg2_aspect[s->aspect_ratio_info]; | |
1778 | else{ | |
1779 | s->avctx->sample_aspect_ratio= | |
1780 | av_div_q( | |
1781 | mpeg2_aspect[s->aspect_ratio_info], | |
1782 | (AVRational){s->width, s->height} | |
1783 | ); | |
1784 | } | |
029911d1 MN |
1785 | |
1786 | if(s->avctx->debug & FF_DEBUG_PICT_INFO) | |
1787 | printf("profile: %d, level: %d \n", profile, level); | |
de6d9b64 FB |
1788 | } |
1789 | ||
fa384dcc MN |
1790 | static void mpeg_decode_sequence_display_extension(Mpeg1Context *s1) |
1791 | { | |
1792 | MpegEncContext *s= &s1->mpeg_enc_ctx; | |
1793 | int color_description, w, h; | |
1794 | ||
1795 | skip_bits(&s->gb, 3); /* video format */ | |
1796 | color_description= get_bits1(&s->gb); | |
1797 | if(color_description){ | |
1798 | skip_bits(&s->gb, 8); /* color primaries */ | |
1799 | skip_bits(&s->gb, 8); /* transfer_characteristics */ | |
1800 | skip_bits(&s->gb, 8); /* matrix_coefficients */ | |
1801 | } | |
1802 | w= get_bits(&s->gb, 14); | |
1803 | skip_bits(&s->gb, 1); //marker | |
1804 | h= get_bits(&s->gb, 14); | |
1805 | skip_bits(&s->gb, 1); //marker | |
1806 | ||
1807 | s1->pan_scan.width= 16*w; | |
1808 | s1->pan_scan.height=16*h; | |
1809 | ||
5ff85f1d MN |
1810 | if(s->aspect_ratio_info > 1) |
1811 | s->avctx->sample_aspect_ratio= | |
1812 | av_div_q( | |
1813 | mpeg2_aspect[s->aspect_ratio_info], | |
1814 | (AVRational){w, h} | |
1815 | ); | |
fa384dcc MN |
1816 | |
1817 | if(s->avctx->debug & FF_DEBUG_PICT_INFO) | |
1818 | printf("sde w:%d, h:%d\n", w, h); | |
1819 | } | |
1820 | ||
1821 | static void mpeg_decode_picture_display_extension(Mpeg1Context *s1) | |
1822 | { | |
1823 | MpegEncContext *s= &s1->mpeg_enc_ctx; | |
1824 | int i; | |
1825 | ||
1826 | for(i=0; i<1; i++){ //FIXME count | |
1827 | s1->pan_scan.position[i][0]= get_sbits(&s->gb, 16); | |
1828 | skip_bits(&s->gb, 1); //marker | |
1829 | s1->pan_scan.position[i][1]= get_sbits(&s->gb, 16); | |
1830 | skip_bits(&s->gb, 1); //marker | |
1831 | } | |
1832 | ||
1833 | if(s->avctx->debug & FF_DEBUG_PICT_INFO) | |
1834 | printf("pde (%d,%d) (%d,%d) (%d,%d)\n", | |
1835 | s1->pan_scan.position[0][0], s1->pan_scan.position[0][1], | |
1836 | s1->pan_scan.position[1][0], s1->pan_scan.position[1][1], | |
1837 | s1->pan_scan.position[2][0], s1->pan_scan.position[2][1] | |
1838 | ); | |
1839 | } | |
1840 | ||
de6d9b64 FB |
1841 | static void mpeg_decode_quant_matrix_extension(MpegEncContext *s) |
1842 | { | |
60832448 | 1843 | int i, v, j; |
de6d9b64 | 1844 | |
25ed7f92 FB |
1845 | dprintf("matrix extension\n"); |
1846 | ||
612476ef | 1847 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
1848 | for(i=0;i<64;i++) { |
1849 | v = get_bits(&s->gb, 8); | |
b0368839 | 1850 | j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ]; |
60832448 FB |
1851 | s->intra_matrix[j] = v; |
1852 | s->chroma_intra_matrix[j] = v; | |
de6d9b64 FB |
1853 | } |
1854 | } | |
612476ef | 1855 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
1856 | for(i=0;i<64;i++) { |
1857 | v = get_bits(&s->gb, 8); | |
b0368839 | 1858 | j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ]; |
d7e9533a MN |
1859 | s->inter_matrix[j] = v; |
1860 | s->chroma_inter_matrix[j] = v; | |
de6d9b64 FB |
1861 | } |
1862 | } | |
612476ef | 1863 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
1864 | for(i=0;i<64;i++) { |
1865 | v = get_bits(&s->gb, 8); | |
b0368839 | 1866 | j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ]; |
60832448 | 1867 | s->chroma_intra_matrix[j] = v; |
de6d9b64 FB |
1868 | } |
1869 | } | |
612476ef | 1870 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
1871 | for(i=0;i<64;i++) { |
1872 | v = get_bits(&s->gb, 8); | |
b0368839 | 1873 | j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ]; |
d7e9533a | 1874 | s->chroma_inter_matrix[j] = v; |
de6d9b64 FB |
1875 | } |
1876 | } | |
1877 | } | |
1878 | ||
1879 | static void mpeg_decode_picture_coding_extension(MpegEncContext *s) | |
1880 | { | |
1881 | s->full_pel[0] = s->full_pel[1] = 0; | |
1882 | s->mpeg_f_code[0][0] = get_bits(&s->gb, 4); | |
1883 | s->mpeg_f_code[0][1] = get_bits(&s->gb, 4); | |
1884 | s->mpeg_f_code[1][0] = get_bits(&s->gb, 4); | |
1885 | s->mpeg_f_code[1][1] = get_bits(&s->gb, 4); | |
1886 | s->intra_dc_precision = get_bits(&s->gb, 2); | |
1887 | s->picture_structure = get_bits(&s->gb, 2); | |
612476ef A |
1888 | s->top_field_first = get_bits1(&s->gb); |
1889 | s->frame_pred_frame_dct = get_bits1(&s->gb); | |
1890 | s->concealment_motion_vectors = get_bits1(&s->gb); | |
1891 | s->q_scale_type = get_bits1(&s->gb); | |
1892 | s->intra_vlc_format = get_bits1(&s->gb); | |
1893 | s->alternate_scan = get_bits1(&s->gb); | |
1894 | s->repeat_first_field = get_bits1(&s->gb); | |
1895 | s->chroma_420_type = get_bits1(&s->gb); | |
1896 | s->progressive_frame = get_bits1(&s->gb); | |
acf44abb | 1897 | |
dfb476cb MN |
1898 | if(s->picture_structure == PICT_FRAME) |
1899 | s->first_field=0; | |
1900 | else{ | |
1901 | s->first_field ^= 1; | |
7bc9090a | 1902 | memset(s->mbskip_table, 0, s->mb_stride*s->mb_height); |
dfb476cb MN |
1903 | } |
1904 | ||
acf44abb | 1905 | if(s->alternate_scan){ |
3d2e8cce MN |
1906 | ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable , ff_alternate_vertical_scan); |
1907 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable , ff_alternate_vertical_scan); | |
1908 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_h_scantable, ff_alternate_vertical_scan); | |
1909 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_v_scantable, ff_alternate_vertical_scan); | |
acf44abb | 1910 | }else{ |
3d2e8cce MN |
1911 | ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable , ff_zigzag_direct); |
1912 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable , ff_zigzag_direct); | |
1913 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_h_scantable, ff_alternate_horizontal_scan); | |
1914 | ff_init_scantable(s->dsp.idct_permutation, &s->intra_v_scantable, ff_alternate_vertical_scan); | |
acf44abb MN |
1915 | } |
1916 | ||
de6d9b64 | 1917 | /* composite display not parsed */ |
1cb0edb4 | 1918 | dprintf("intra_dc_precision=%d\n", s->intra_dc_precision); |
25ed7f92 | 1919 | dprintf("picture_structure=%d\n", s->picture_structure); |
e0a3d744 J |
1920 | dprintf("top field first=%d\n", s->top_field_first); |
1921 | dprintf("repeat first field=%d\n", s->repeat_first_field); | |
de6d9b64 | 1922 | dprintf("conceal=%d\n", s->concealment_motion_vectors); |
25ed7f92 FB |
1923 | dprintf("intra_vlc_format=%d\n", s->intra_vlc_format); |
1924 | dprintf("alternate_scan=%d\n", s->alternate_scan); | |
de6d9b64 | 1925 | dprintf("frame_pred_frame_dct=%d\n", s->frame_pred_frame_dct); |
1cb0edb4 | 1926 | dprintf("progressive_frame=%d\n", s->progressive_frame); |
de6d9b64 FB |
1927 | } |
1928 | ||
1929 | static void mpeg_decode_extension(AVCodecContext *avctx, | |
0c1a9eda | 1930 | uint8_t *buf, int buf_size) |
de6d9b64 FB |
1931 | { |
1932 | Mpeg1Context *s1 = avctx->priv_data; | |
1933 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
1934 | int ext_type; | |
1935 | ||
68f593b4 | 1936 | init_get_bits(&s->gb, buf, buf_size*8); |
de6d9b64 FB |
1937 | |
1938 | ext_type = get_bits(&s->gb, 4); | |
1939 | switch(ext_type) { | |
1940 | case 0x1: | |
de6d9b64 FB |
1941 | mpeg_decode_sequence_extension(s); |
1942 | break; | |
fa384dcc MN |
1943 | case 0x2: |
1944 | mpeg_decode_sequence_display_extension(s1); | |
1945 | break; | |
de6d9b64 | 1946 | case 0x3: |
de6d9b64 FB |
1947 | mpeg_decode_quant_matrix_extension(s); |
1948 | break; | |
fa384dcc MN |
1949 | case 0x7: |
1950 | mpeg_decode_picture_display_extension(s1); | |
1951 | break; | |
de6d9b64 | 1952 | case 0x8: |
de6d9b64 FB |
1953 | mpeg_decode_picture_coding_extension(s); |
1954 | break; | |
1955 | } | |
1956 | } | |
1957 | ||
ff862be5 MN |
1958 | static void exchange_uv(AVFrame *f){ |
1959 | uint8_t *t= f->data[1]; | |
1960 | f->data[1]= f->data[2]; | |
1961 | f->data[2]= t; | |
1962 | } | |
1963 | ||
86f85dca MN |
1964 | #define DECODE_SLICE_FATAL_ERROR -2 |
1965 | #define DECODE_SLICE_ERROR -1 | |
1966 | #define DECODE_SLICE_OK 0 | |
86f85dca MN |
1967 | |
1968 | /** | |
1969 | * decodes a slice. | |
1970 | * @return DECODE_SLICE_FATAL_ERROR if a non recoverable error occured<br> | |
1971 | * DECODE_SLICE_ERROR if the slice is damaged<br> | |
1972 | * DECODE_SLICE_OK if this slice is ok<br> | |
86f85dca | 1973 | */ |
de6d9b64 | 1974 | static int mpeg_decode_slice(AVCodecContext *avctx, |
492cd3a9 | 1975 | AVFrame *pict, |
de6d9b64 | 1976 | int start_code, |
80097bbf | 1977 | uint8_t **buf, int buf_size) |
de6d9b64 FB |
1978 | { |
1979 | Mpeg1Context *s1 = avctx->priv_data; | |
1980 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
1981 | int ret; | |
dfb476cb | 1982 | const int field_pic= s->picture_structure != PICT_FRAME; |
de6d9b64 | 1983 | |
db6e7795 MN |
1984 | s->resync_mb_x= s->mb_x = |
1985 | s->resync_mb_y= s->mb_y = -1; | |
1986 | ||
de6d9b64 | 1987 | start_code = (start_code - 1) & 0xff; |
9ac7ecd6 | 1988 | if (start_code >= s->mb_height){ |
14207b27 | 1989 | fprintf(stderr, "slice below image (%d >= %d)\n", start_code, s->mb_height); |
db6e7795 | 1990 | return -1; |
9ac7ecd6 | 1991 | } |
9b8709d1 MN |
1992 | |
1993 | ff_mpeg1_clean_buffers(s); | |
7bc9090a | 1994 | s->interlaced_dct = 0; |
dfb476cb | 1995 | |
de6d9b64 | 1996 | /* start frame decoding */ |
b536d0aa MN |
1997 | if (s->first_slice) { |
1998 | if(s->first_field || s->picture_structure==PICT_FRAME){ | |
d6db1c9c | 1999 | if(MPV_frame_start(s, avctx) < 0) |
86f85dca | 2000 | return DECODE_SLICE_FATAL_ERROR; |
7bc9090a MN |
2001 | |
2002 | ff_er_frame_start(s); | |
2003 | ||
2ec23b6d | 2004 | /* first check if we must repeat the frame */ |
9ee2c20e | 2005 | s->current_picture_ptr->repeat_pict = 0; |
2ec23b6d MN |
2006 | if (s->repeat_first_field) { |
2007 | if (s->progressive_sequence) { | |
2008 | if (s->top_field_first) | |
9ee2c20e | 2009 | s->current_picture_ptr->repeat_pict = 4; |
2ec23b6d | 2010 | else |
9ee2c20e | 2011 | s->current_picture_ptr->repeat_pict = 2; |
2ec23b6d | 2012 | } else if (s->progressive_frame) { |
9ee2c20e | 2013 | s->current_picture_ptr->repeat_pict = 1; |
2ec23b6d MN |
2014 | } |
2015 | } | |
fa384dcc MN |
2016 | |
2017 | *s->current_picture_ptr->pan_scan= s1->pan_scan; | |
2018 | ||
9ee2c20e | 2019 | //printf("%d\n", s->current_picture_ptr->repeat_pict); |
2ec23b6d | 2020 | |
59b571c1 | 2021 | if(s->avctx->debug&FF_DEBUG_PICT_INFO){ |
f943e138 | 2022 | printf("qp:%d fc:%2d%2d%2d%2d %s %s %s %s dc:%d pstruct:%d fdct:%d cmv:%d qtype:%d ivlc:%d rff:%d %s\n", |
59b571c1 MN |
2023 | s->qscale, s->mpeg_f_code[0][0],s->mpeg_f_code[0][1],s->mpeg_f_code[1][0],s->mpeg_f_code[1][1], |
2024 | s->pict_type == I_TYPE ? "I" : (s->pict_type == P_TYPE ? "P" : (s->pict_type == B_TYPE ? "B" : "S")), | |
2025 | s->progressive_sequence ? "pro" :"", s->alternate_scan ? "alt" :"", s->top_field_first ? "top" :"", | |
2026 | s->intra_dc_precision, s->picture_structure, s->frame_pred_frame_dct, s->concealment_motion_vectors, | |
2027 | s->q_scale_type, s->intra_vlc_format, s->repeat_first_field, s->chroma_420_type ? "420" :""); | |
2028 | } | |
b536d0aa MN |
2029 | }else{ //second field |
2030 | int i; | |
37b787f1 MN |
2031 | |
2032 | if(!s->current_picture_ptr){ | |
2033 | fprintf(stderr, "first field missing\n"); | |
2034 | return -1; | |
2035 | } | |
2036 | ||
b536d0aa MN |
2037 | for(i=0; i<4; i++){ |
2038 | s->current_picture.data[i] = s->current_picture_ptr->data[i]; | |
2039 | if(s->picture_structure == PICT_BOTTOM_FIELD){ | |
2040 | s->current_picture.data[i] += s->current_picture_ptr->linesize[i]; | |
2041 | } | |
2042 | } | |
2043 | } | |
2e7b4c84 IK |
2044 | #ifdef HAVE_XVMC |
2045 | // MPV_frame_start will call this function too, | |
2046 | // but we need to call it on every field | |
2047 | if(s->avctx->xvmc_acceleration) | |
2048 | XVMC_field_start(s,avctx); | |
2049 | #endif | |
2050 | }//fi(s->first_slice) | |
dfb476cb | 2051 | s->first_slice = 0; |
de6d9b64 | 2052 | |
80097bbf | 2053 | init_get_bits(&s->gb, *buf, buf_size*8); |
de6d9b64 | 2054 | |
0ee50938 | 2055 | s->qscale = get_qscale(s); |
7bc9090a MN |
2056 | if(s->qscale == 0){ |
2057 | fprintf(stderr, "qscale == 0\n"); | |
db6e7795 | 2058 | return -1; |
7bc9090a MN |
2059 | } |
2060 | ||
de6d9b64 | 2061 | /* extra slice info */ |
612476ef A |
2062 | while (get_bits1(&s->gb) != 0) { |
2063 | skip_bits(&s->gb, 8); | |
de6d9b64 | 2064 | } |
7bc9090a | 2065 | |
ce5b7c5e | 2066 | s->mb_x=0; |
7bc9090a | 2067 | |
ce5b7c5e MN |
2068 | for(;;) { |
2069 | int code = get_vlc2(&s->gb, mbincr_vlc.table, MBINCR_VLC_BITS, 2); | |
7bc9090a MN |
2070 | if (code < 0){ |
2071 | fprintf(stderr, "first mb_incr damaged\n"); | |
db6e7795 | 2072 | return -1; |
7bc9090a | 2073 | } |
ce5b7c5e MN |
2074 | if (code >= 33) { |
2075 | if (code == 33) { | |
2076 | s->mb_x += 33; | |
2077 | } | |
2078 | /* otherwise, stuffing, nothing to do */ | |
2079 | } else { | |
2080 | s->mb_x += code; | |
2081 | break; | |
2082 | } | |
2083 | } | |
9b8709d1 | 2084 | |
7bc9090a MN |
2085 | s->resync_mb_x= s->mb_x; |
2086 | s->resync_mb_y= s->mb_y = start_code; | |
9b8709d1 | 2087 | s->mb_skip_run= 0; |
7d1c3fc1 | 2088 | ff_init_block_index(s); |
ce5b7c5e | 2089 | |
de6d9b64 | 2090 | for(;;) { |
eb4b3dd3 | 2091 | s->dsp.clear_blocks(s->block[0]); |
7bc9090a | 2092 | |
b7ec19d3 | 2093 | ret = mpeg_decode_mb(s, s->block); |
7bc9090a | 2094 | |
de6d9b64 FB |
2095 | dprintf("ret=%d\n", ret); |
2096 | if (ret < 0) | |
2097 | return -1; | |
7bc9090a MN |
2098 | |
2099 | if(s->motion_val && s->pict_type != B_TYPE){ //note motion_val is normally NULL unless we want to extract the MVs | |
2100 | const int wrap = s->block_wrap[0]; | |
2101 | const int xy = s->mb_x*2 + 1 + (s->mb_y*2 +1)*wrap; | |
2102 | int motion_x, motion_y; | |
2103 | ||
db6e7795 MN |
2104 | if (s->mb_intra) { |
2105 | motion_x = motion_y = 0; | |
2106 | }else if (s->mv_type == MV_TYPE_16X16) { | |
7bc9090a MN |
2107 | motion_x = s->mv[0][0][0]; |
2108 | motion_y = s->mv[0][0][1]; | |
2109 | } else /*if (s->mv_type == MV_TYPE_FIELD)*/ { | |
7bc9090a MN |
2110 | motion_x = s->mv[0][0][0] + s->mv[0][1][0]; |
2111 | motion_y = s->mv[0][0][1] + s->mv[0][1][1]; | |
2112 | motion_x = (motion_x>>1) | (motion_x&1); | |
2113 | } | |
2114 | s->motion_val[xy][0] = motion_x; | |
2115 | s->motion_val[xy][1] = motion_y; | |
2116 | s->motion_val[xy + 1][0] = motion_x; | |
2117 | s->motion_val[xy + 1][1] = motion_y; | |
2118 | s->motion_val[xy + wrap][0] = motion_x; | |
2119 | s->motion_val[xy + wrap][1] = motion_y; | |
2120 | s->motion_val[xy + 1 + wrap][0] = motion_x; | |
2121 | s->motion_val[xy + 1 + wrap][1] = motion_y; | |
2122 | } | |
b536d0aa | 2123 | |
7d1c3fc1 MN |
2124 | s->dest[0] += 16; |
2125 | s->dest[1] += 8; | |
2126 | s->dest[2] += 8; | |
ce5b7c5e | 2127 | |
7d1c3fc1 MN |
2128 | MPV_decode_mb(s, s->block); |
2129 | ||
ce5b7c5e | 2130 | if (++s->mb_x >= s->mb_width) { |
ff862be5 MN |
2131 | if(s->avctx->codec_tag == ff_get_fourcc("VCR2")) |
2132 | exchange_uv((AVFrame*)s->current_picture_ptr); | |
2133 | ||
3bb07d61 | 2134 | ff_draw_horiz_band(s, 16*s->mb_y, 16); |
ce5b7c5e | 2135 | |
ff862be5 MN |
2136 | if(s->avctx->codec_tag == ff_get_fourcc("VCR2")) |
2137 | exchange_uv((AVFrame*)s->current_picture_ptr); | |
2138 | ||
ce5b7c5e MN |
2139 | s->mb_x = 0; |
2140 | s->mb_y++; | |
cf713bb8 MN |
2141 | |
2142 | if(s->mb_y<<field_pic >= s->mb_height){ | |
2143 | int left= s->gb.size_in_bits - get_bits_count(&s->gb); | |
2144 | ||
2145 | if(left < 0 || (left && show_bits(&s->gb, FFMIN(left, 23))) | |
2146 | || (avctx->error_resilience >= FF_ER_AGGRESSIVE && left>8)){ | |
2147 | fprintf(stderr, "end missmatch left=%d\n", left); | |
2148 | return -1; | |
2149 | }else | |
2150 | goto eos; | |
2151 | } | |
7d1c3fc1 MN |
2152 | |
2153 | ff_init_block_index(s); | |
ce5b7c5e | 2154 | } |
ce5b7c5e MN |
2155 | |
2156 | /* skip mb handling */ | |
9b8709d1 | 2157 | if (s->mb_skip_run == -1) { |
ce5b7c5e | 2158 | /* read again increment */ |
9b8709d1 | 2159 | s->mb_skip_run = 0; |
ce5b7c5e MN |
2160 | for(;;) { |
2161 | int code = get_vlc2(&s->gb, mbincr_vlc.table, MBINCR_VLC_BITS, 2); | |
7bc9090a | 2162 | if (code < 0){ |
9c00c3af MN |
2163 | fprintf(stderr, "mb incr damaged\n"); |
2164 | return -1; | |
7bc9090a | 2165 | } |
ce5b7c5e MN |
2166 | if (code >= 33) { |
2167 | if (code == 33) { | |
9b8709d1 | 2168 | s->mb_skip_run += 33; |
9c00c3af MN |
2169 | }else if(code == 35){ |
2170 | if(s->mb_skip_run != 0 || show_bits(&s->gb, 15) != 0){ | |
2171 | fprintf(stderr, "slice missmatch\n"); | |
2172 | return -1; | |
2173 | } | |
2174 | goto eos; /* end of slice */ | |
ce5b7c5e MN |
2175 | } |
2176 | /* otherwise, stuffing, nothing to do */ | |
2177 | } else { | |
9b8709d1 | 2178 | s->mb_skip_run += code; |
ce5b7c5e MN |
2179 | break; |
2180 | } | |
2181 | } | |
2182 | } | |
de6d9b64 | 2183 | } |
db6e7795 MN |
2184 | eos: // end of slice |
2185 | *buf += get_bits_count(&s->gb)/8 - 1; | |
7bc9090a | 2186 | //printf("y %d %d %d %d\n", s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y); |
db6e7795 MN |
2187 | return 0; |
2188 | } | |
7bc9090a | 2189 | |
db6e7795 MN |
2190 | /** |
2191 | * handles slice ends. | |
2192 | * @return 1 if it seems to be the last slice of | |
2193 | */ | |
2194 | static int slice_end(AVCodecContext *avctx, AVFrame *pict) | |
2195 | { | |
2196 | Mpeg1Context *s1 = avctx->priv_data; | |
2197 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
2198 | ||
36b58e85 | 2199 | if (!s1->mpeg_enc_ctx_allocated || !s->current_picture_ptr) |
855127bc FB |
2200 | return 0; |
2201 | ||
2e7b4c84 IK |
2202 | #ifdef HAVE_XVMC |
2203 | if(s->avctx->xvmc_acceleration) | |
2204 | XVMC_field_end(s); | |
2205 | #endif | |
de6d9b64 | 2206 | /* end of slice reached */ |
db6e7795 | 2207 | if (/*s->mb_y<<field_pic == s->mb_height &&*/ !s->first_field) { |
de6d9b64 | 2208 | /* end of image */ |
1e491e29 | 2209 | |
029911d1 | 2210 | if(s->codec_id == CODEC_ID_MPEG2VIDEO){ |
0426af31 MN |
2211 | s->current_picture_ptr->qscale_type= FF_QSCALE_TYPE_MPEG2; |
2212 | }else | |
2213 | s->current_picture_ptr->qscale_type= FF_QSCALE_TYPE_MPEG1; | |
2214 | ||
7bc9090a | 2215 | ff_er_frame_end(s); |
de6d9b64 FB |
2216 | |
2217 | MPV_frame_end(s); | |
2218 | ||
4e00e76b | 2219 | if (s->pict_type == B_TYPE || s->low_delay) { |
8e937a4a | 2220 | *pict= *(AVFrame*)s->current_picture_ptr; |
7bc9090a | 2221 | ff_print_debug_info(s, s->current_picture_ptr); |
de6d9b64 | 2222 | } else { |
1e491e29 | 2223 | s->picture_number++; |
de6d9b64 FB |
2224 | /* latency of 1 frame for I and P frames */ |
2225 | /* XXX: use another variable than picture_number */ | |
80097bbf | 2226 | if (s->last_picture_ptr != NULL) { |
8e937a4a | 2227 | *pict= *(AVFrame*)s->last_picture_ptr; |
7bc9090a | 2228 | ff_print_debug_info(s, s->last_picture_ptr); |
de6d9b64 | 2229 | } |
de6d9b64 | 2230 | } |
ff862be5 MN |
2231 | if(s->avctx->codec_tag == ff_get_fourcc("VCR2")) |
2232 | exchange_uv(pict); | |
2233 | ||
db6e7795 | 2234 | return 1; |
de6d9b64 | 2235 | } else { |
db6e7795 | 2236 | return 0; |
de6d9b64 FB |
2237 | } |
2238 | } | |
2239 | ||
2240 | static int mpeg1_decode_sequence(AVCodecContext *avctx, | |
0c1a9eda | 2241 | uint8_t *buf, int buf_size) |
de6d9b64 FB |
2242 | { |
2243 | Mpeg1Context *s1 = avctx->priv_data; | |
2244 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
60832448 | 2245 | int width, height, i, v, j; |
945f15b7 | 2246 | float aspect; |
fb4a4a56 | 2247 | |
68f593b4 | 2248 | init_get_bits(&s->gb, buf, buf_size*8); |
de6d9b64 FB |
2249 | |
2250 | width = get_bits(&s->gb, 12); | |
2251 | height = get_bits(&s->gb, 12); | |
945f15b7 | 2252 | s->aspect_ratio_info= get_bits(&s->gb, 4); |
029911d1 | 2253 | if(s->codec_id == CODEC_ID_MPEG1VIDEO){ |
945f15b7 | 2254 | aspect= mpeg1_aspect[s->aspect_ratio_info]; |
5ff85f1d | 2255 | if(aspect!=0.0) avctx->sample_aspect_ratio= av_d2q(aspect, 30000); |
945f15b7 MN |
2256 | } |
2257 | ||
de6d9b64 FB |
2258 | s->frame_rate_index = get_bits(&s->gb, 4); |
2259 | if (s->frame_rate_index == 0) | |
2260 | return -1; | |
2261 | s->bit_rate = get_bits(&s->gb, 18) * 400; | |
612476ef | 2262 | if (get_bits1(&s->gb) == 0) /* marker */ |
de6d9b64 FB |
2263 | return -1; |
2264 | if (width <= 0 || height <= 0 || | |
2265 | (width % 2) != 0 || (height % 2) != 0) | |
2266 | return -1; | |
2267 | if (width != s->width || | |
2268 | height != s->height) { | |
2269 | /* start new mpeg1 context decoding */ | |
2270 | s->out_format = FMT_MPEG1; | |
2271 | if (s1->mpeg_enc_ctx_allocated) { | |
2272 | MPV_common_end(s); | |
2273 | } | |
2274 | s->width = width; | |
2275 | s->height = height; | |
4e00e76b | 2276 | avctx->has_b_frames= 1; |
0c23ead1 | 2277 | s->avctx = avctx; |
de6d9b64 FB |
2278 | avctx->width = width; |
2279 | avctx->height = height; | |
14bea432 MN |
2280 | av_reduce( |
2281 | &avctx->frame_rate, | |
2282 | &avctx->frame_rate_base, | |
2283 | frame_rate_tab[s->frame_rate_index], | |
2284 | MPEG1_FRAME_RATE_BASE, //FIXME store in allready reduced form | |
2285 | 1<<30 | |
2286 | ); | |
de6d9b64 FB |
2287 | avctx->bit_rate = s->bit_rate; |
2288 | ||
2e7b4c84 IK |
2289 | //get_format() or set_video(width,height,aspect,pix_fmt); |
2290 | //until then pix_fmt may be changed right after codec init | |
2291 | if( avctx->pix_fmt == PIX_FMT_XVMC_MPEG2_IDCT ) | |
2292 | avctx->idct_algo = FF_IDCT_SIMPLE; | |
2293 | ||
de6d9b64 FB |
2294 | if (MPV_common_init(s) < 0) |
2295 | return -1; | |
de6d9b64 FB |
2296 | s1->mpeg_enc_ctx_allocated = 1; |
2297 | } | |
2298 | ||
612476ef A |
2299 | skip_bits(&s->gb, 10); /* vbv_buffer_size */ |
2300 | skip_bits(&s->gb, 1); | |
de6d9b64 FB |
2301 | |
2302 | /* get matrix */ | |
612476ef | 2303 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
2304 | for(i=0;i<64;i++) { |
2305 | v = get_bits(&s->gb, 8); | |
2ad1516a | 2306 | j = s->intra_scantable.permutated[i]; |
60832448 FB |
2307 | s->intra_matrix[j] = v; |
2308 | s->chroma_intra_matrix[j] = v; | |
de6d9b64 | 2309 | } |
25ed7f92 FB |
2310 | #ifdef DEBUG |
2311 | dprintf("intra matrix present\n"); | |
2312 | for(i=0;i<64;i++) | |
8e1652dc | 2313 | dprintf(" %d", s->intra_matrix[s->intra_scantable.permutated[i]]); |
25ed7f92 FB |
2314 | printf("\n"); |
2315 | #endif | |
de6d9b64 FB |
2316 | } else { |
2317 | for(i=0;i<64;i++) { | |
b0368839 | 2318 | int j= s->dsp.idct_permutation[i]; |
adc09b2e | 2319 | v = ff_mpeg1_default_intra_matrix[i]; |
2ad1516a MN |
2320 | s->intra_matrix[j] = v; |
2321 | s->chroma_intra_matrix[j] = v; | |
de6d9b64 FB |
2322 | } |
2323 | } | |
612476ef | 2324 | if (get_bits1(&s->gb)) { |
de6d9b64 FB |
2325 | for(i=0;i<64;i++) { |
2326 | v = get_bits(&s->gb, 8); | |
2ad1516a | 2327 | j = s->intra_scantable.permutated[i]; |
d7e9533a MN |
2328 | s->inter_matrix[j] = v; |
2329 | s->chroma_inter_matrix[j] = v; | |
de6d9b64 | 2330 | } |
25ed7f92 FB |
2331 | #ifdef DEBUG |
2332 | dprintf("non intra matrix present\n"); | |
2333 | for(i=0;i<64;i++) | |
8e1652dc | 2334 | dprintf(" %d", s->inter_matrix[s->intra_scantable.permutated[i]]); |
25ed7f92 FB |
2335 | printf("\n"); |
2336 | #endif | |
de6d9b64 FB |
2337 | } else { |
2338 | for(i=0;i<64;i++) { | |
b0368839 | 2339 | int j= s->dsp.idct_permutation[i]; |
adc09b2e | 2340 | v = ff_mpeg1_default_non_intra_matrix[i]; |
2ad1516a MN |
2341 | s->inter_matrix[j] = v; |
2342 | s->chroma_inter_matrix[j] = v; | |
de6d9b64 FB |
2343 | } |
2344 | } | |
2345 | ||
2346 | /* we set mpeg2 parameters so that it emulates mpeg1 */ | |
2347 | s->progressive_sequence = 1; | |
2348 | s->progressive_frame = 1; | |
2349 | s->picture_structure = PICT_FRAME; | |
2350 | s->frame_pred_frame_dct = 1; | |
029911d1 | 2351 | s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG1VIDEO; |
fb4a4a56 | 2352 | avctx->sub_id = 1; /* indicates mpeg1 */ |
de6d9b64 FB |
2353 | return 0; |
2354 | } | |
2355 | ||
e94bc100 MN |
2356 | static int vcr2_init_sequence(AVCodecContext *avctx) |
2357 | { | |
2358 | Mpeg1Context *s1 = avctx->priv_data; | |
2359 | MpegEncContext *s = &s1->mpeg_enc_ctx; | |
008f0851 | 2360 | int i, v; |
e94bc100 MN |
2361 | |
2362 | /* start new mpeg1 context decoding */ | |
2363 | s->out_format = FMT_MPEG1; | |
2364 | if (s1->mpeg_enc_ctx_allocated) { | |
2365 | MPV_common_end(s); | |
2366 | } | |
2367 | s->width = avctx->width; | |
2368 | s->height = avctx->height; | |
2369 | avctx->has_b_frames= 0; //true? | |
ff862be5 | 2370 | s->low_delay= 1; |
e94bc100 | 2371 | s->avctx = avctx; |
2e7b4c84 IK |
2372 | |
2373 | //get_format() or set_video(width,height,aspect,pix_fmt); | |
2374 | //until then pix_fmt may be changed right after codec init | |
2375 | if( avctx->pix_fmt == PIX_FMT_XVMC_MPEG2_IDCT ) | |
2376 | avctx->idct_algo = FF_IDCT_SIMPLE; | |
e94bc100 MN |
2377 | |
2378 | if (MPV_common_init(s) < 0) | |
2379 | return -1; | |
2380 | s1->mpeg_enc_ctx_allocated = 1; | |
2381 | ||
2382 | for(i=0;i<64;i++) { | |
2383 | int j= s->dsp.idct_permutation[i]; | |
2384 | v = ff_mpeg1_default_intra_matrix[i]; | |
2385 | s->intra_matrix[j] = v; | |
2386 | s->chroma_intra_matrix[j] = v; | |
2387 | ||
2388 | v = ff_mpeg1_default_non_intra_matrix[i]; | |
2389 | s->inter_matrix[j] = v; | |
2390 | s->chroma_inter_matrix[j] = v; | |
2391 | } | |
2392 | ||
e94bc100 MN |
2393 | s->progressive_sequence = 1; |
2394 | s->progressive_frame = 1; | |
2395 | s->picture_structure = PICT_FRAME; | |
2396 | s->frame_pred_frame_dct = 1; | |
029911d1 | 2397 | s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG2VIDEO; |
008f0851 | 2398 | avctx->sub_id = 2; /* indicates mpeg2 */ |
e94bc100 MN |
2399 | return 0; |
2400 | } | |
2401 | ||
2402 | ||
e2f9490e FB |
2403 | static void mpeg_decode_user_data(AVCodecContext *avctx, |
2404 | const uint8_t *buf, int buf_size) | |
2405 | { | |
2406 | const uint8_t *p; | |
2407 | int len, flags; | |
2408 | p = buf; | |
2409 | len = buf_size; | |
2410 | ||
2411 | /* we parse the DTG active format information */ | |
2412 | if (len >= 5 && | |
2413 | p[0] == 'D' && p[1] == 'T' && p[2] == 'G' && p[3] == '1') { | |
2414 | flags = p[4]; | |
2415 | p += 5; | |
2416 | len -= 5; | |
2417 | if (flags & 0x80) { | |
2418 | /* skip event id */ | |
2419 | if (len < 2) | |
2420 | return; | |
2421 | p += 2; | |
2422 | len -= 2; | |
2423 | } | |
2424 | if (flags & 0x40) { | |
2425 | if (len < 1) | |
2426 | return; | |
2427 | avctx->dtg_active_format = p[0] & 0x0f; | |
2428 | } | |
2429 | } | |
2430 | } | |
2431 | ||
80097bbf MN |
2432 | /** |
2433 | * finds the end of the current frame in the bitstream. | |
2434 | * @return the position of the first byte of the next frame, or -1 | |
2435 | */ | |
2436 | static int mpeg1_find_frame_end(MpegEncContext *s, uint8_t *buf, int buf_size){ | |
2437 | ParseContext *pc= &s->parse_context; | |
2438 | int i; | |
2439 | uint32_t state; | |
2440 | ||
2441 | state= pc->state; | |
2442 | ||
2443 | i=0; | |
2444 | if(!pc->frame_start_found){ | |
2445 | for(i=0; i<buf_size; i++){ | |
2446 | state= (state<<8) | buf[i]; | |
2447 | if(state >= SLICE_MIN_START_CODE && state <= SLICE_MAX_START_CODE){ | |
2448 | i++; | |
2449 | pc->frame_start_found=1; | |
2450 | break; | |
2451 | } | |
2452 | } | |
2453 | } | |
2454 | ||
2455 | if(pc->frame_start_found){ | |
2456 | for(; i<buf_size; i++){ | |
2457 | state= (state<<8) | buf[i]; | |
2458 | if((state&0xFFFFFF00) == 0x100){ | |
2459 | if(state < SLICE_MIN_START_CODE || state > SLICE_MAX_START_CODE){ | |
2460 | pc->frame_start_found=0; | |
2461 | pc->state=-1; | |
2462 | return i-3; | |
2463 | } | |
2464 | } | |
2465 | } | |
2466 | } | |
2467 | pc->state= state; | |
bb463d81 | 2468 | return END_NOT_FOUND; |
80097bbf MN |
2469 | } |
2470 | ||
de6d9b64 FB |
2471 | /* handle buffering and image synchronisation */ |
2472 | static int mpeg_decode_frame(AVCodecContext *avctx, | |
2473 | void *data, int *data_size, | |
0c1a9eda | 2474 | uint8_t *buf, int buf_size) |
de6d9b64 FB |
2475 | { |
2476 | Mpeg1Context *s = avctx->priv_data; | |
80097bbf MN |
2477 | uint8_t *buf_end, *buf_ptr; |
2478 | int ret, start_code, input_size; | |
492cd3a9 | 2479 | AVFrame *picture = data; |
1cb0edb4 | 2480 | MpegEncContext *s2 = &s->mpeg_enc_ctx; |
de6d9b64 FB |
2481 | dprintf("fill_buffer\n"); |
2482 | ||
2483 | *data_size = 0; | |
d7e9533a | 2484 | |
de6d9b64 | 2485 | /* special case for last picture */ |
e9174ba4 MN |
2486 | if (buf_size == 0 && s2->low_delay==0 && s2->next_picture_ptr) { |
2487 | *picture= *(AVFrame*)s2->next_picture_ptr; | |
2488 | s2->next_picture_ptr= NULL; | |
1e491e29 | 2489 | |
e9174ba4 | 2490 | *data_size = sizeof(AVFrame); |
de6d9b64 FB |
2491 | return 0; |
2492 | } | |
2493 | ||
80097bbf | 2494 | if(s2->flags&CODEC_FLAG_TRUNCATED){ |
bb463d81 | 2495 | int next= mpeg1_find_frame_end(s2, buf, buf_size); |
80097bbf MN |
2496 | |
2497 | if( ff_combine_frame(s2, next, &buf, &buf_size) < 0 ) | |
2498 | return buf_size; | |
2499 | } | |
2500 | ||
de6d9b64 FB |
2501 | buf_ptr = buf; |
2502 | buf_end = buf + buf_size; | |
e0a3d744 J |
2503 | |
2504 | #if 0 | |
2505 | if (s->repeat_field % 2 == 1) { | |
1cb0edb4 J |
2506 | s->repeat_field++; |
2507 | //fprintf(stderr,"\nRepeating last frame: %d -> %d! pict: %d %d", avctx->frame_number-1, avctx->frame_number, | |
e0a3d744 J |
2508 | // s2->picture_number, s->repeat_field); |
2509 | if (avctx->flags & CODEC_FLAG_REPEAT_FIELD) { | |
2510 | *data_size = sizeof(AVPicture); | |
2511 | goto the_end; | |
2512 | } | |
1cb0edb4 | 2513 | } |
e0a3d744 | 2514 | #endif |
e94bc100 MN |
2515 | |
2516 | if(s->mpeg_enc_ctx_allocated==0 && avctx->codec_tag == ff_get_fourcc("VCR2")) | |
2517 | vcr2_init_sequence(avctx); | |
2518 | ||
80097bbf | 2519 | for(;;) { |
de6d9b64 | 2520 | /* find start next code */ |
80097bbf | 2521 | start_code = find_start_code(&buf_ptr, buf_end); |
cfcff636 | 2522 | if (start_code < 0){ |
80de6a80 MN |
2523 | if(s2->pict_type != B_TYPE || avctx->hurry_up==0){ |
2524 | if (slice_end(avctx, picture)) { | |
2525 | if(s2->last_picture_ptr) //FIXME merge with the stuff in mpeg_decode_slice | |
2526 | *data_size = sizeof(AVPicture); | |
2527 | } | |
db6e7795 | 2528 | } |
cfcff636 | 2529 | return FFMAX(0, buf_ptr - buf - s2->parse_context.last_index); |
de6d9b64 | 2530 | } |
cf713bb8 MN |
2531 | |
2532 | input_size = buf_end - buf_ptr; | |
2533 | ||
2534 | if(avctx->debug & FF_DEBUG_STARTCODE){ | |
2535 | printf("%3X at %d left %d\n", start_code, buf_ptr-buf, input_size); | |
2536 | } | |
80097bbf | 2537 | |
de6d9b64 | 2538 | /* prepare data for next start code */ |
de6d9b64 FB |
2539 | switch(start_code) { |
2540 | case SEQ_START_CODE: | |
80097bbf | 2541 | mpeg1_decode_sequence(avctx, buf_ptr, |
de6d9b64 FB |
2542 | input_size); |
2543 | break; | |
2544 | ||
2545 | case PICTURE_START_CODE: | |
2546 | /* we have a complete image : we try to decompress it */ | |
2547 | mpeg1_decode_picture(avctx, | |
80097bbf | 2548 | buf_ptr, input_size); |
de6d9b64 FB |
2549 | break; |
2550 | case EXT_START_CODE: | |
2551 | mpeg_decode_extension(avctx, | |
80097bbf | 2552 | buf_ptr, input_size); |
e2f9490e FB |
2553 | break; |
2554 | case USER_START_CODE: | |
2555 | mpeg_decode_user_data(avctx, | |
80097bbf | 2556 | buf_ptr, input_size); |
de6d9b64 | 2557 | break; |
05fd1577 MN |
2558 | case GOP_START_CODE: |
2559 | s2->first_field=0; | |
2560 | break; | |
de6d9b64 FB |
2561 | default: |
2562 | if (start_code >= SLICE_MIN_START_CODE && | |
d9cb5429 | 2563 | start_code <= SLICE_MAX_START_CODE) { |
945f15b7 MN |
2564 | |
2565 | /* skip b frames if we dont have reference frames */ | |
b536d0aa | 2566 | if(s2->last_picture_ptr==NULL && s2->pict_type==B_TYPE) break; |
945f15b7 MN |
2567 | /* skip b frames if we are in a hurry */ |
2568 | if(avctx->hurry_up && s2->pict_type==B_TYPE) break; | |
2569 | /* skip everything if we are in a hurry>=5 */ | |
2570 | if(avctx->hurry_up>=5) break; | |
80097bbf | 2571 | |
37b787f1 MN |
2572 | if (!s->mpeg_enc_ctx_allocated) break; |
2573 | ||
de6d9b64 | 2574 | ret = mpeg_decode_slice(avctx, picture, |
80097bbf | 2575 | start_code, &buf_ptr, input_size); |
db6e7795 | 2576 | emms_c(); |
dfb476cb | 2577 | |
db6e7795 MN |
2578 | if(ret < 0){ |
2579 | if(s2->resync_mb_x>=0 && s2->resync_mb_y>=0) | |
7bc9090a | 2580 | ff_er_add_slice(s2, s2->resync_mb_x, s2->resync_mb_y, s2->mb_x, s2->mb_y, AC_ERROR|DC_ERROR|MV_ERROR); |
db6e7795 MN |
2581 | if(ret==DECODE_SLICE_FATAL_ERROR) return -1; |
2582 | }else{ | |
2583 | ff_er_add_slice(s2, s2->resync_mb_x, s2->resync_mb_y, s2->mb_x-1, s2->mb_y, AC_END|DC_END|MV_END); | |
de6d9b64 FB |
2584 | } |
2585 | } | |
2586 | break; | |
2587 | } | |
de6d9b64 | 2588 | } |
de6d9b64 FB |
2589 | } |
2590 | ||
2591 | static int mpeg_decode_end(AVCodecContext *avctx) | |
2592 | { | |
2593 | Mpeg1Context *s = avctx->priv_data; | |
2594 | ||
2595 | if (s->mpeg_enc_ctx_allocated) | |
2596 | MPV_common_end(&s->mpeg_enc_ctx); | |
2597 | return 0; | |
2598 | } | |
2599 | ||
922bc38d MN |
2600 | AVCodec mpeg1video_decoder = { |
2601 | "mpeg1video", | |
de6d9b64 FB |
2602 | CODEC_TYPE_VIDEO, |
2603 | CODEC_ID_MPEG1VIDEO, | |
2604 | sizeof(Mpeg1Context), | |
2605 | mpeg_decode_init, | |
2606 | NULL, | |
2607 | mpeg_decode_end, | |
2608 | mpeg_decode_frame, | |
d7425f59 | 2609 | CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED, |
922bc38d MN |
2610 | .flush= ff_mpeg_flush, |
2611 | }; | |
2612 | ||
2613 | AVCodec mpeg2video_decoder = { | |
2614 | "mpeg2video", | |
2615 | CODEC_TYPE_VIDEO, | |
2616 | CODEC_ID_MPEG2VIDEO, | |
2617 | sizeof(Mpeg1Context), | |
2618 | mpeg_decode_init, | |
2619 | NULL, | |
2620 | mpeg_decode_end, | |
2621 | mpeg_decode_frame, | |
2622 | CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED, | |
7a06ff14 | 2623 | .flush= ff_mpeg_flush, |
de6d9b64 | 2624 | }; |
2e7b4c84 IK |
2625 | |
2626 | #ifdef HAVE_XVMC | |
2627 | static int mpeg_mc_decode_init(AVCodecContext *avctx){ | |
2628 | Mpeg1Context *s; | |
2629 | ||
2630 | if( !(avctx->slice_flags & SLICE_FLAG_CODED_ORDER) ) | |
2631 | return -1; | |
2632 | if( !(avctx->slice_flags & SLICE_FLAG_ALLOW_FIELD) ) | |
2633 | dprintf("mpeg12.c: XvMC decoder will work better if SLICE_FLAG_ALLOW_FIELD is set\n"); | |
2634 | ||
2635 | mpeg_decode_init(avctx); | |
2636 | s = avctx->priv_data; | |
2637 | ||
2638 | avctx->pix_fmt = PIX_FMT_XVMC_MPEG2_IDCT; | |
2639 | avctx->xvmc_acceleration = 1; | |
2640 | ||
2641 | return 0; | |
2642 | } | |
2643 | ||
2644 | AVCodec mpeg_xvmc_decoder = { | |
2645 | "mpegvideo_xvmc", | |
2646 | CODEC_TYPE_VIDEO, | |
2647 | CODEC_ID_MPEG2VIDEO_XVMC, | |
2648 | sizeof(Mpeg1Context), | |
2649 | mpeg_mc_decode_init, | |
2650 | NULL, | |
2651 | mpeg_decode_end, | |
2652 | mpeg_decode_frame, | |
2653 | CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED, | |
2654 | }; | |
2655 | ||
2656 | #endif | |
c3bf0288 MN |
2657 | |
2658 | /* this is ugly i know, but the alternative is too make | |
2659 | hundreds of vars global and prefix them with ff_mpeg1_ | |
2660 | which is far uglier. */ | |
2661 | #include "mdec.c" |