| 1 | /* |
| 2 | * MPEG1/2 encoder |
| 3 | * Copyright (c) 2000,2001 Fabrice Bellard |
| 4 | * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at> |
| 5 | * |
| 6 | * This file is part of FFmpeg. |
| 7 | * |
| 8 | * FFmpeg is free software; you can redistribute it and/or |
| 9 | * modify it under the terms of the GNU Lesser General Public |
| 10 | * License as published by the Free Software Foundation; either |
| 11 | * version 2.1 of the License, or (at your option) any later version. |
| 12 | * |
| 13 | * FFmpeg is distributed in the hope that it will be useful, |
| 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| 16 | * Lesser General Public License for more details. |
| 17 | * |
| 18 | * You should have received a copy of the GNU Lesser General Public |
| 19 | * License along with FFmpeg; if not, write to the Free Software |
| 20 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
| 21 | */ |
| 22 | |
| 23 | /** |
| 24 | * @file |
| 25 | * MPEG1/2 encoder |
| 26 | */ |
| 27 | |
| 28 | #include <stdint.h> |
| 29 | |
| 30 | #include "libavutil/attributes.h" |
| 31 | #include "libavutil/avassert.h" |
| 32 | #include "libavutil/log.h" |
| 33 | #include "libavutil/opt.h" |
| 34 | #include "libavutil/timecode.h" |
| 35 | #include "libavutil/stereo3d.h" |
| 36 | |
| 37 | #include "avcodec.h" |
| 38 | #include "bytestream.h" |
| 39 | #include "mathops.h" |
| 40 | #include "mpeg12.h" |
| 41 | #include "mpeg12data.h" |
| 42 | #include "mpegutils.h" |
| 43 | #include "mpegvideo.h" |
| 44 | |
| 45 | |
| 46 | static const uint8_t inv_non_linear_qscale[] = { |
| 47 | 0, 2, 4, 6, 8, 9, 10, 11, 12, 13, 14, 15, 16, |
| 48 | }; |
| 49 | |
| 50 | static const uint8_t svcd_scan_offset_placeholder[] = { |
| 51 | 0x10, 0x0E, 0x00, 0x80, 0x81, 0x00, 0x80, |
| 52 | 0x81, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, |
| 53 | }; |
| 54 | |
| 55 | static uint8_t mv_penalty[MAX_FCODE + 1][MAX_MV * 2 + 1]; |
| 56 | static uint8_t fcode_tab[MAX_MV * 2 + 1]; |
| 57 | |
| 58 | static uint8_t uni_mpeg1_ac_vlc_len[64 * 64 * 2]; |
| 59 | static uint8_t uni_mpeg2_ac_vlc_len[64 * 64 * 2]; |
| 60 | |
| 61 | /* simple include everything table for dc, first byte is bits |
| 62 | * number next 3 are code */ |
| 63 | static uint32_t mpeg1_lum_dc_uni[512]; |
| 64 | static uint32_t mpeg1_chr_dc_uni[512]; |
| 65 | |
| 66 | static uint8_t mpeg1_index_run[2][64]; |
| 67 | static int8_t mpeg1_max_level[2][64]; |
| 68 | |
| 69 | static av_cold void init_uni_ac_vlc(RLTable *rl, uint8_t *uni_ac_vlc_len) |
| 70 | { |
| 71 | int i; |
| 72 | |
| 73 | for (i = 0; i < 128; i++) { |
| 74 | int level = i - 64; |
| 75 | int run; |
| 76 | if (!level) |
| 77 | continue; |
| 78 | for (run = 0; run < 64; run++) { |
| 79 | int len, code; |
| 80 | int alevel = FFABS(level); |
| 81 | |
| 82 | if (alevel > rl->max_level[0][run]) |
| 83 | code = 111; /* rl->n */ |
| 84 | else |
| 85 | code = rl->index_run[0][run] + alevel - 1; |
| 86 | |
| 87 | if (code < 111) { /* rl->n */ |
| 88 | /* length of VLC and sign */ |
| 89 | len = rl->table_vlc[code][1] + 1; |
| 90 | } else { |
| 91 | len = rl->table_vlc[111 /* rl->n */][1] + 6; |
| 92 | |
| 93 | if (alevel < 128) |
| 94 | len += 8; |
| 95 | else |
| 96 | len += 16; |
| 97 | } |
| 98 | |
| 99 | uni_ac_vlc_len[UNI_AC_ENC_INDEX(run, i)] = len; |
| 100 | } |
| 101 | } |
| 102 | } |
| 103 | |
| 104 | static int find_frame_rate_index(MpegEncContext *s) |
| 105 | { |
| 106 | int i; |
| 107 | AVRational bestq = (AVRational) {0, 0}; |
| 108 | AVRational ext; |
| 109 | AVRational target = av_inv_q(s->avctx->time_base); |
| 110 | |
| 111 | for (i = 1; i < 14; i++) { |
| 112 | if (s->avctx->strict_std_compliance > FF_COMPLIANCE_UNOFFICIAL && |
| 113 | i >= 9) |
| 114 | break; |
| 115 | |
| 116 | for (ext.num=1; ext.num <= 4; ext.num++) { |
| 117 | for (ext.den=1; ext.den <= 32; ext.den++) { |
| 118 | AVRational q = av_mul_q(ext, ff_mpeg12_frame_rate_tab[i]); |
| 119 | |
| 120 | if (s->codec_id != AV_CODEC_ID_MPEG2VIDEO && (ext.den!=1 || ext.num!=1)) |
| 121 | continue; |
| 122 | if (av_gcd(ext.den, ext.num) != 1) |
| 123 | continue; |
| 124 | |
| 125 | if ( bestq.num==0 |
| 126 | || av_nearer_q(target, bestq, q) < 0 |
| 127 | || ext.num==1 && ext.den==1 && av_nearer_q(target, bestq, q) == 0) { |
| 128 | bestq = q; |
| 129 | s->frame_rate_index = i; |
| 130 | s->mpeg2_frame_rate_ext.num = ext.num; |
| 131 | s->mpeg2_frame_rate_ext.den = ext.den; |
| 132 | } |
| 133 | } |
| 134 | } |
| 135 | } |
| 136 | |
| 137 | if (av_cmp_q(target, bestq)) |
| 138 | return -1; |
| 139 | else |
| 140 | return 0; |
| 141 | } |
| 142 | |
| 143 | static av_cold int encode_init(AVCodecContext *avctx) |
| 144 | { |
| 145 | MpegEncContext *s = avctx->priv_data; |
| 146 | |
| 147 | if (avctx->codec_id == AV_CODEC_ID_MPEG1VIDEO && avctx->height > 2800) |
| 148 | avctx->thread_count = 1; |
| 149 | |
| 150 | if (ff_mpv_encode_init(avctx) < 0) |
| 151 | return -1; |
| 152 | |
| 153 | if (find_frame_rate_index(s) < 0) { |
| 154 | if (s->strict_std_compliance > FF_COMPLIANCE_EXPERIMENTAL) { |
| 155 | av_log(avctx, AV_LOG_ERROR, "MPEG1/2 does not support %d/%d fps\n", |
| 156 | avctx->time_base.den, avctx->time_base.num); |
| 157 | return -1; |
| 158 | } else { |
| 159 | av_log(avctx, AV_LOG_INFO, |
| 160 | "MPEG1/2 does not support %d/%d fps, there may be AV sync issues\n", |
| 161 | avctx->time_base.den, avctx->time_base.num); |
| 162 | } |
| 163 | } |
| 164 | |
| 165 | if (avctx->profile == FF_PROFILE_UNKNOWN) { |
| 166 | if (avctx->level != FF_LEVEL_UNKNOWN) { |
| 167 | av_log(avctx, AV_LOG_ERROR, "Set profile and level\n"); |
| 168 | return -1; |
| 169 | } |
| 170 | /* Main or 4:2:2 */ |
| 171 | avctx->profile = s->chroma_format == CHROMA_420 ? 4 : 0; |
| 172 | } |
| 173 | |
| 174 | if (avctx->level == FF_LEVEL_UNKNOWN) { |
| 175 | if (avctx->profile == 0) { /* 4:2:2 */ |
| 176 | if (avctx->width <= 720 && avctx->height <= 608) |
| 177 | avctx->level = 5; /* Main */ |
| 178 | else |
| 179 | avctx->level = 2; /* High */ |
| 180 | } else { |
| 181 | if (avctx->profile != 1 && s->chroma_format != CHROMA_420) { |
| 182 | av_log(avctx, AV_LOG_ERROR, |
| 183 | "Only High(1) and 4:2:2(0) profiles support 4:2:2 color sampling\n"); |
| 184 | return -1; |
| 185 | } |
| 186 | if (avctx->width <= 720 && avctx->height <= 576) |
| 187 | avctx->level = 8; /* Main */ |
| 188 | else if (avctx->width <= 1440) |
| 189 | avctx->level = 6; /* High 1440 */ |
| 190 | else |
| 191 | avctx->level = 4; /* High */ |
| 192 | } |
| 193 | } |
| 194 | |
| 195 | if ((avctx->width & 0xFFF) == 0 && (avctx->height & 0xFFF) == 1) { |
| 196 | av_log(avctx, AV_LOG_ERROR, "Width / Height is invalid for MPEG2\n"); |
| 197 | return AVERROR(EINVAL); |
| 198 | } |
| 199 | |
| 200 | if (s->strict_std_compliance > FF_COMPLIANCE_UNOFFICIAL) { |
| 201 | if ((avctx->width & 0xFFF) == 0 || (avctx->height & 0xFFF) == 0) { |
| 202 | av_log(avctx, AV_LOG_ERROR, "Width or Height are not allowed to be multiples of 4096\n" |
| 203 | "add '-strict %d' if you want to use them anyway.\n", FF_COMPLIANCE_UNOFFICIAL); |
| 204 | return AVERROR(EINVAL); |
| 205 | } |
| 206 | } |
| 207 | |
| 208 | s->drop_frame_timecode = s->drop_frame_timecode || !!(avctx->flags2 & CODEC_FLAG2_DROP_FRAME_TIMECODE); |
| 209 | if (s->drop_frame_timecode) |
| 210 | s->tc.flags |= AV_TIMECODE_FLAG_DROPFRAME; |
| 211 | if (s->drop_frame_timecode && s->frame_rate_index != 4) { |
| 212 | av_log(avctx, AV_LOG_ERROR, |
| 213 | "Drop frame time code only allowed with 1001/30000 fps\n"); |
| 214 | return -1; |
| 215 | } |
| 216 | |
| 217 | if (s->tc_opt_str) { |
| 218 | AVRational rate = ff_mpeg12_frame_rate_tab[s->frame_rate_index]; |
| 219 | int ret = av_timecode_init_from_string(&s->tc, rate, s->tc_opt_str, s); |
| 220 | if (ret < 0) |
| 221 | return ret; |
| 222 | s->drop_frame_timecode = !!(s->tc.flags & AV_TIMECODE_FLAG_DROPFRAME); |
| 223 | s->avctx->timecode_frame_start = s->tc.start; |
| 224 | } else { |
| 225 | s->avctx->timecode_frame_start = 0; // default is -1 |
| 226 | } |
| 227 | return 0; |
| 228 | } |
| 229 | |
| 230 | static void put_header(MpegEncContext *s, int header) |
| 231 | { |
| 232 | avpriv_align_put_bits(&s->pb); |
| 233 | put_bits(&s->pb, 16, header >> 16); |
| 234 | put_sbits(&s->pb, 16, header); |
| 235 | } |
| 236 | |
| 237 | /* put sequence header if needed */ |
| 238 | static void mpeg1_encode_sequence_header(MpegEncContext *s) |
| 239 | { |
| 240 | unsigned int vbv_buffer_size, fps, v; |
| 241 | int i, constraint_parameter_flag; |
| 242 | uint64_t time_code; |
| 243 | int64_t best_aspect_error = INT64_MAX; |
| 244 | AVRational aspect_ratio = s->avctx->sample_aspect_ratio; |
| 245 | |
| 246 | if (aspect_ratio.num == 0 || aspect_ratio.den == 0) |
| 247 | aspect_ratio = (AVRational){1,1}; // pixel aspect 1.1 (VGA) |
| 248 | |
| 249 | if (s->current_picture.f->key_frame) { |
| 250 | AVRational framerate = ff_mpeg12_frame_rate_tab[s->frame_rate_index]; |
| 251 | |
| 252 | /* mpeg1 header repeated every gop */ |
| 253 | put_header(s, SEQ_START_CODE); |
| 254 | |
| 255 | put_sbits(&s->pb, 12, s->width & 0xFFF); |
| 256 | put_sbits(&s->pb, 12, s->height & 0xFFF); |
| 257 | |
| 258 | for (i = 1; i < 15; i++) { |
| 259 | int64_t error = aspect_ratio.num * (1LL<<32) / aspect_ratio.den; |
| 260 | if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO || i <= 1) |
| 261 | error -= (1LL<<32) / ff_mpeg1_aspect[i]; |
| 262 | else |
| 263 | error -= (1LL<<32)*ff_mpeg2_aspect[i].num * s->height / s->width / ff_mpeg2_aspect[i].den; |
| 264 | |
| 265 | error = FFABS(error); |
| 266 | |
| 267 | if (error - 2 <= best_aspect_error) { |
| 268 | best_aspect_error = error; |
| 269 | s->aspect_ratio_info = i; |
| 270 | } |
| 271 | } |
| 272 | |
| 273 | put_bits(&s->pb, 4, s->aspect_ratio_info); |
| 274 | put_bits(&s->pb, 4, s->frame_rate_index); |
| 275 | |
| 276 | if (s->avctx->rc_max_rate) { |
| 277 | v = (s->avctx->rc_max_rate + 399) / 400; |
| 278 | if (v > 0x3ffff && s->codec_id == AV_CODEC_ID_MPEG1VIDEO) |
| 279 | v = 0x3ffff; |
| 280 | } else { |
| 281 | v = 0x3FFFF; |
| 282 | } |
| 283 | |
| 284 | if (s->avctx->rc_buffer_size) |
| 285 | vbv_buffer_size = s->avctx->rc_buffer_size; |
| 286 | else |
| 287 | /* VBV calculation: Scaled so that a VCD has the proper |
| 288 | * VBV size of 40 kilobytes */ |
| 289 | vbv_buffer_size = ((20 * s->bit_rate) / (1151929 / 2)) * 8 * 1024; |
| 290 | vbv_buffer_size = (vbv_buffer_size + 16383) / 16384; |
| 291 | |
| 292 | put_sbits(&s->pb, 18, v); |
| 293 | put_bits(&s->pb, 1, 1); // marker |
| 294 | put_sbits(&s->pb, 10, vbv_buffer_size); |
| 295 | |
| 296 | constraint_parameter_flag = |
| 297 | s->width <= 768 && |
| 298 | s->height <= 576 && |
| 299 | s->mb_width * s->mb_height <= 396 && |
| 300 | s->mb_width * s->mb_height * framerate.num <= 396 * 25 * framerate.den && |
| 301 | framerate.num <= framerate.den * 30 && |
| 302 | s->avctx->me_range && |
| 303 | s->avctx->me_range < 128 && |
| 304 | vbv_buffer_size <= 20 && |
| 305 | v <= 1856000 / 400 && |
| 306 | s->codec_id == AV_CODEC_ID_MPEG1VIDEO; |
| 307 | |
| 308 | put_bits(&s->pb, 1, constraint_parameter_flag); |
| 309 | |
| 310 | ff_write_quant_matrix(&s->pb, s->avctx->intra_matrix); |
| 311 | ff_write_quant_matrix(&s->pb, s->avctx->inter_matrix); |
| 312 | |
| 313 | if (s->codec_id == AV_CODEC_ID_MPEG2VIDEO) { |
| 314 | AVFrameSideData *side_data; |
| 315 | int width = s->width; |
| 316 | int height = s->height; |
| 317 | int use_seq_disp_ext; |
| 318 | |
| 319 | put_header(s, EXT_START_CODE); |
| 320 | put_bits(&s->pb, 4, 1); // seq ext |
| 321 | |
| 322 | put_bits(&s->pb, 1, s->avctx->profile == 0); // escx 1 for 4:2:2 profile |
| 323 | |
| 324 | put_bits(&s->pb, 3, s->avctx->profile); // profile |
| 325 | put_bits(&s->pb, 4, s->avctx->level); // level |
| 326 | |
| 327 | put_bits(&s->pb, 1, s->progressive_sequence); |
| 328 | put_bits(&s->pb, 2, s->chroma_format); |
| 329 | put_bits(&s->pb, 2, s->width >> 12); |
| 330 | put_bits(&s->pb, 2, s->height >> 12); |
| 331 | put_bits(&s->pb, 12, v >> 18); // bitrate ext |
| 332 | put_bits(&s->pb, 1, 1); // marker |
| 333 | put_bits(&s->pb, 8, vbv_buffer_size >> 10); // vbv buffer ext |
| 334 | put_bits(&s->pb, 1, s->low_delay); |
| 335 | put_bits(&s->pb, 2, s->mpeg2_frame_rate_ext.num-1); // frame_rate_ext_n |
| 336 | put_bits(&s->pb, 5, s->mpeg2_frame_rate_ext.den-1); // frame_rate_ext_d |
| 337 | |
| 338 | side_data = av_frame_get_side_data(s->current_picture_ptr->f, AV_FRAME_DATA_PANSCAN); |
| 339 | if (side_data) { |
| 340 | AVPanScan *pan_scan = (AVPanScan *)side_data->data; |
| 341 | if (pan_scan->width && pan_scan->height) { |
| 342 | width = pan_scan->width >> 4; |
| 343 | height = pan_scan->height >> 4; |
| 344 | } |
| 345 | } |
| 346 | |
| 347 | use_seq_disp_ext = (width != s->width || |
| 348 | height != s->height || |
| 349 | s->avctx->color_primaries != AVCOL_PRI_UNSPECIFIED || |
| 350 | s->avctx->color_trc != AVCOL_TRC_UNSPECIFIED || |
| 351 | s->avctx->colorspace != AVCOL_SPC_UNSPECIFIED); |
| 352 | |
| 353 | if (s->seq_disp_ext == 1 || (s->seq_disp_ext == -1 && use_seq_disp_ext)) { |
| 354 | put_header(s, EXT_START_CODE); |
| 355 | put_bits(&s->pb, 4, 2); // sequence display extension |
| 356 | put_bits(&s->pb, 3, 0); // video_format: 0 is components |
| 357 | put_bits(&s->pb, 1, 1); // colour_description |
| 358 | put_bits(&s->pb, 8, s->avctx->color_primaries); // colour_primaries |
| 359 | put_bits(&s->pb, 8, s->avctx->color_trc); // transfer_characteristics |
| 360 | put_bits(&s->pb, 8, s->avctx->colorspace); // matrix_coefficients |
| 361 | put_bits(&s->pb, 14, width); // display_horizontal_size |
| 362 | put_bits(&s->pb, 1, 1); // marker_bit |
| 363 | put_bits(&s->pb, 14, height); // display_vertical_size |
| 364 | put_bits(&s->pb, 3, 0); // remaining 3 bits are zero padding |
| 365 | } |
| 366 | } |
| 367 | |
| 368 | put_header(s, GOP_START_CODE); |
| 369 | put_bits(&s->pb, 1, s->drop_frame_timecode); // drop frame flag |
| 370 | /* time code: we must convert from the real frame rate to a |
| 371 | * fake MPEG frame rate in case of low frame rate */ |
| 372 | fps = (framerate.num + framerate.den / 2) / framerate.den; |
| 373 | time_code = s->current_picture_ptr->f->coded_picture_number + |
| 374 | s->avctx->timecode_frame_start; |
| 375 | |
| 376 | s->gop_picture_number = s->current_picture_ptr->f->coded_picture_number; |
| 377 | |
| 378 | av_assert0(s->drop_frame_timecode == !!(s->tc.flags & AV_TIMECODE_FLAG_DROPFRAME)); |
| 379 | if (s->drop_frame_timecode) |
| 380 | time_code = av_timecode_adjust_ntsc_framenum2(time_code, fps); |
| 381 | |
| 382 | put_bits(&s->pb, 5, (uint32_t)((time_code / (fps * 3600)) % 24)); |
| 383 | put_bits(&s->pb, 6, (uint32_t)((time_code / (fps * 60)) % 60)); |
| 384 | put_bits(&s->pb, 1, 1); |
| 385 | put_bits(&s->pb, 6, (uint32_t)((time_code / fps) % 60)); |
| 386 | put_bits(&s->pb, 6, (uint32_t)((time_code % fps))); |
| 387 | put_bits(&s->pb, 1, !!(s->flags & CODEC_FLAG_CLOSED_GOP) || s->intra_only || !s->gop_picture_number); |
| 388 | put_bits(&s->pb, 1, 0); // broken link |
| 389 | } |
| 390 | } |
| 391 | |
| 392 | static inline void encode_mb_skip_run(MpegEncContext *s, int run) |
| 393 | { |
| 394 | while (run >= 33) { |
| 395 | put_bits(&s->pb, 11, 0x008); |
| 396 | run -= 33; |
| 397 | } |
| 398 | put_bits(&s->pb, ff_mpeg12_mbAddrIncrTable[run][1], |
| 399 | ff_mpeg12_mbAddrIncrTable[run][0]); |
| 400 | } |
| 401 | |
| 402 | static av_always_inline void put_qscale(MpegEncContext *s) |
| 403 | { |
| 404 | if (s->q_scale_type) { |
| 405 | av_assert2(s->qscale >= 1 && s->qscale <= 12); |
| 406 | put_bits(&s->pb, 5, inv_non_linear_qscale[s->qscale]); |
| 407 | } else { |
| 408 | put_bits(&s->pb, 5, s->qscale); |
| 409 | } |
| 410 | } |
| 411 | |
| 412 | void ff_mpeg1_encode_slice_header(MpegEncContext *s) |
| 413 | { |
| 414 | if (s->codec_id == AV_CODEC_ID_MPEG2VIDEO && s->height > 2800) { |
| 415 | put_header(s, SLICE_MIN_START_CODE + (s->mb_y & 127)); |
| 416 | /* slice_vertical_position_extension */ |
| 417 | put_bits(&s->pb, 3, s->mb_y >> 7); |
| 418 | } else { |
| 419 | put_header(s, SLICE_MIN_START_CODE + s->mb_y); |
| 420 | } |
| 421 | put_qscale(s); |
| 422 | /* slice extra information */ |
| 423 | put_bits(&s->pb, 1, 0); |
| 424 | } |
| 425 | |
| 426 | void ff_mpeg1_encode_picture_header(MpegEncContext *s, int picture_number) |
| 427 | { |
| 428 | AVFrameSideData *side_data; |
| 429 | mpeg1_encode_sequence_header(s); |
| 430 | |
| 431 | /* mpeg1 picture header */ |
| 432 | put_header(s, PICTURE_START_CODE); |
| 433 | /* temporal reference */ |
| 434 | |
| 435 | // RAL: s->picture_number instead of s->fake_picture_number |
| 436 | put_bits(&s->pb, 10, |
| 437 | (s->picture_number - s->gop_picture_number) & 0x3ff); |
| 438 | put_bits(&s->pb, 3, s->pict_type); |
| 439 | |
| 440 | s->vbv_delay_ptr = s->pb.buf + put_bits_count(&s->pb) / 8; |
| 441 | put_bits(&s->pb, 16, 0xFFFF); /* vbv_delay */ |
| 442 | |
| 443 | // RAL: Forward f_code also needed for B-frames |
| 444 | if (s->pict_type == AV_PICTURE_TYPE_P || |
| 445 | s->pict_type == AV_PICTURE_TYPE_B) { |
| 446 | put_bits(&s->pb, 1, 0); /* half pel coordinates */ |
| 447 | if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO) |
| 448 | put_bits(&s->pb, 3, s->f_code); /* forward_f_code */ |
| 449 | else |
| 450 | put_bits(&s->pb, 3, 7); /* forward_f_code */ |
| 451 | } |
| 452 | |
| 453 | // RAL: Backward f_code necessary for B-frames |
| 454 | if (s->pict_type == AV_PICTURE_TYPE_B) { |
| 455 | put_bits(&s->pb, 1, 0); /* half pel coordinates */ |
| 456 | if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO) |
| 457 | put_bits(&s->pb, 3, s->b_code); /* backward_f_code */ |
| 458 | else |
| 459 | put_bits(&s->pb, 3, 7); /* backward_f_code */ |
| 460 | } |
| 461 | |
| 462 | put_bits(&s->pb, 1, 0); /* extra bit picture */ |
| 463 | |
| 464 | s->frame_pred_frame_dct = 1; |
| 465 | if (s->codec_id == AV_CODEC_ID_MPEG2VIDEO) { |
| 466 | put_header(s, EXT_START_CODE); |
| 467 | put_bits(&s->pb, 4, 8); /* pic ext */ |
| 468 | if (s->pict_type == AV_PICTURE_TYPE_P || |
| 469 | s->pict_type == AV_PICTURE_TYPE_B) { |
| 470 | put_bits(&s->pb, 4, s->f_code); |
| 471 | put_bits(&s->pb, 4, s->f_code); |
| 472 | } else { |
| 473 | put_bits(&s->pb, 8, 255); |
| 474 | } |
| 475 | if (s->pict_type == AV_PICTURE_TYPE_B) { |
| 476 | put_bits(&s->pb, 4, s->b_code); |
| 477 | put_bits(&s->pb, 4, s->b_code); |
| 478 | } else { |
| 479 | put_bits(&s->pb, 8, 255); |
| 480 | } |
| 481 | put_bits(&s->pb, 2, s->intra_dc_precision); |
| 482 | |
| 483 | av_assert0(s->picture_structure == PICT_FRAME); |
| 484 | put_bits(&s->pb, 2, s->picture_structure); |
| 485 | if (s->progressive_sequence) |
| 486 | put_bits(&s->pb, 1, 0); /* no repeat */ |
| 487 | else |
| 488 | put_bits(&s->pb, 1, s->current_picture_ptr->f->top_field_first); |
| 489 | /* XXX: optimize the generation of this flag with entropy measures */ |
| 490 | s->frame_pred_frame_dct = s->progressive_sequence; |
| 491 | |
| 492 | put_bits(&s->pb, 1, s->frame_pred_frame_dct); |
| 493 | put_bits(&s->pb, 1, s->concealment_motion_vectors); |
| 494 | put_bits(&s->pb, 1, s->q_scale_type); |
| 495 | put_bits(&s->pb, 1, s->intra_vlc_format); |
| 496 | put_bits(&s->pb, 1, s->alternate_scan); |
| 497 | put_bits(&s->pb, 1, s->repeat_first_field); |
| 498 | s->progressive_frame = s->progressive_sequence; |
| 499 | /* chroma_420_type */ |
| 500 | put_bits(&s->pb, 1, s->chroma_format == |
| 501 | CHROMA_420 ? s->progressive_frame : 0); |
| 502 | put_bits(&s->pb, 1, s->progressive_frame); |
| 503 | put_bits(&s->pb, 1, 0); /* composite_display_flag */ |
| 504 | } |
| 505 | if (s->scan_offset) { |
| 506 | int i; |
| 507 | |
| 508 | put_header(s, USER_START_CODE); |
| 509 | for (i = 0; i < sizeof(svcd_scan_offset_placeholder); i++) |
| 510 | put_bits(&s->pb, 8, svcd_scan_offset_placeholder[i]); |
| 511 | } |
| 512 | side_data = av_frame_get_side_data(s->current_picture_ptr->f, |
| 513 | AV_FRAME_DATA_STEREO3D); |
| 514 | if (side_data) { |
| 515 | AVStereo3D *stereo = (AVStereo3D *)side_data->data; |
| 516 | uint8_t fpa_type; |
| 517 | |
| 518 | switch (stereo->type) { |
| 519 | case AV_STEREO3D_SIDEBYSIDE: |
| 520 | fpa_type = 0x03; |
| 521 | break; |
| 522 | case AV_STEREO3D_TOPBOTTOM: |
| 523 | fpa_type = 0x04; |
| 524 | break; |
| 525 | case AV_STEREO3D_2D: |
| 526 | fpa_type = 0x08; |
| 527 | break; |
| 528 | case AV_STEREO3D_SIDEBYSIDE_QUINCUNX: |
| 529 | fpa_type = 0x23; |
| 530 | break; |
| 531 | default: |
| 532 | fpa_type = 0; |
| 533 | break; |
| 534 | } |
| 535 | |
| 536 | if (fpa_type != 0) { |
| 537 | put_header(s, USER_START_CODE); |
| 538 | put_bits(&s->pb, 8, 'J'); // S3D_video_format_signaling_identifier |
| 539 | put_bits(&s->pb, 8, 'P'); |
| 540 | put_bits(&s->pb, 8, '3'); |
| 541 | put_bits(&s->pb, 8, 'D'); |
| 542 | put_bits(&s->pb, 8, 0x03); // S3D_video_format_length |
| 543 | |
| 544 | put_bits(&s->pb, 1, 1); // reserved_bit |
| 545 | put_bits(&s->pb, 7, fpa_type); // S3D_video_format_type |
| 546 | put_bits(&s->pb, 8, 0x04); // reserved_data[0] |
| 547 | put_bits(&s->pb, 8, 0xFF); // reserved_data[1] |
| 548 | } |
| 549 | } |
| 550 | |
| 551 | s->mb_y = 0; |
| 552 | ff_mpeg1_encode_slice_header(s); |
| 553 | } |
| 554 | |
| 555 | static inline void put_mb_modes(MpegEncContext *s, int n, int bits, |
| 556 | int has_mv, int field_motion) |
| 557 | { |
| 558 | put_bits(&s->pb, n, bits); |
| 559 | if (!s->frame_pred_frame_dct) { |
| 560 | if (has_mv) |
| 561 | /* motion_type: frame/field */ |
| 562 | put_bits(&s->pb, 2, 2 - field_motion); |
| 563 | put_bits(&s->pb, 1, s->interlaced_dct); |
| 564 | } |
| 565 | } |
| 566 | |
| 567 | // RAL: Parameter added: f_or_b_code |
| 568 | static void mpeg1_encode_motion(MpegEncContext *s, int val, int f_or_b_code) |
| 569 | { |
| 570 | if (val == 0) { |
| 571 | /* zero vector */ |
| 572 | put_bits(&s->pb, |
| 573 | ff_mpeg12_mbMotionVectorTable[0][1], |
| 574 | ff_mpeg12_mbMotionVectorTable[0][0]); |
| 575 | } else { |
| 576 | int code, sign, bits; |
| 577 | int bit_size = f_or_b_code - 1; |
| 578 | int range = 1 << bit_size; |
| 579 | /* modulo encoding */ |
| 580 | val = sign_extend(val, 5 + bit_size); |
| 581 | |
| 582 | if (val >= 0) { |
| 583 | val--; |
| 584 | code = (val >> bit_size) + 1; |
| 585 | bits = val & (range - 1); |
| 586 | sign = 0; |
| 587 | } else { |
| 588 | val = -val; |
| 589 | val--; |
| 590 | code = (val >> bit_size) + 1; |
| 591 | bits = val & (range - 1); |
| 592 | sign = 1; |
| 593 | } |
| 594 | |
| 595 | av_assert2(code > 0 && code <= 16); |
| 596 | |
| 597 | put_bits(&s->pb, |
| 598 | ff_mpeg12_mbMotionVectorTable[code][1], |
| 599 | ff_mpeg12_mbMotionVectorTable[code][0]); |
| 600 | |
| 601 | put_bits(&s->pb, 1, sign); |
| 602 | if (bit_size > 0) |
| 603 | put_bits(&s->pb, bit_size, bits); |
| 604 | } |
| 605 | } |
| 606 | |
| 607 | static inline void encode_dc(MpegEncContext *s, int diff, int component) |
| 608 | { |
| 609 | if (((unsigned) (diff + 255)) >= 511) { |
| 610 | int index; |
| 611 | |
| 612 | if (diff < 0) { |
| 613 | index = av_log2_16bit(-2 * diff); |
| 614 | diff--; |
| 615 | } else { |
| 616 | index = av_log2_16bit(2 * diff); |
| 617 | } |
| 618 | if (component == 0) |
| 619 | put_bits(&s->pb, |
| 620 | ff_mpeg12_vlc_dc_lum_bits[index] + index, |
| 621 | (ff_mpeg12_vlc_dc_lum_code[index] << index) + |
| 622 | (diff & ((1 << index) - 1))); |
| 623 | else |
| 624 | put_bits(&s->pb, |
| 625 | ff_mpeg12_vlc_dc_chroma_bits[index] + index, |
| 626 | (ff_mpeg12_vlc_dc_chroma_code[index] << index) + |
| 627 | (diff & ((1 << index) - 1))); |
| 628 | } else { |
| 629 | if (component == 0) |
| 630 | put_bits(&s->pb, |
| 631 | mpeg1_lum_dc_uni[diff + 255] & 0xFF, |
| 632 | mpeg1_lum_dc_uni[diff + 255] >> 8); |
| 633 | else |
| 634 | put_bits(&s->pb, |
| 635 | mpeg1_chr_dc_uni[diff + 255] & 0xFF, |
| 636 | mpeg1_chr_dc_uni[diff + 255] >> 8); |
| 637 | } |
| 638 | } |
| 639 | |
| 640 | static void mpeg1_encode_block(MpegEncContext *s, int16_t *block, int n) |
| 641 | { |
| 642 | int alevel, level, last_non_zero, dc, diff, i, j, run, last_index, sign; |
| 643 | int code, component; |
| 644 | const uint16_t (*table_vlc)[2] = ff_rl_mpeg1.table_vlc; |
| 645 | |
| 646 | last_index = s->block_last_index[n]; |
| 647 | |
| 648 | /* DC coef */ |
| 649 | if (s->mb_intra) { |
| 650 | component = (n <= 3 ? 0 : (n & 1) + 1); |
| 651 | dc = block[0]; /* overflow is impossible */ |
| 652 | diff = dc - s->last_dc[component]; |
| 653 | encode_dc(s, diff, component); |
| 654 | s->last_dc[component] = dc; |
| 655 | i = 1; |
| 656 | if (s->intra_vlc_format) |
| 657 | table_vlc = ff_rl_mpeg2.table_vlc; |
| 658 | } else { |
| 659 | /* encode the first coefficient: needs to be done here because |
| 660 | * it is handled slightly differently */ |
| 661 | level = block[0]; |
| 662 | if (abs(level) == 1) { |
| 663 | code = ((uint32_t)level >> 31); /* the sign bit */ |
| 664 | put_bits(&s->pb, 2, code | 0x02); |
| 665 | i = 1; |
| 666 | } else { |
| 667 | i = 0; |
| 668 | last_non_zero = -1; |
| 669 | goto next_coef; |
| 670 | } |
| 671 | } |
| 672 | |
| 673 | /* now quantify & encode AC coefs */ |
| 674 | last_non_zero = i - 1; |
| 675 | |
| 676 | for (; i <= last_index; i++) { |
| 677 | j = s->intra_scantable.permutated[i]; |
| 678 | level = block[j]; |
| 679 | |
| 680 | next_coef: |
| 681 | /* encode using VLC */ |
| 682 | if (level != 0) { |
| 683 | run = i - last_non_zero - 1; |
| 684 | |
| 685 | alevel = level; |
| 686 | MASK_ABS(sign, alevel); |
| 687 | sign &= 1; |
| 688 | |
| 689 | if (alevel <= mpeg1_max_level[0][run]) { |
| 690 | code = mpeg1_index_run[0][run] + alevel - 1; |
| 691 | /* store the VLC & sign at once */ |
| 692 | put_bits(&s->pb, table_vlc[code][1] + 1, |
| 693 | (table_vlc[code][0] << 1) + sign); |
| 694 | } else { |
| 695 | /* escape seems to be pretty rare <5% so I do not optimize it */ |
| 696 | put_bits(&s->pb, table_vlc[111][1], table_vlc[111][0]); |
| 697 | /* escape: only clip in this case */ |
| 698 | put_bits(&s->pb, 6, run); |
| 699 | if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO) { |
| 700 | if (alevel < 128) { |
| 701 | put_sbits(&s->pb, 8, level); |
| 702 | } else { |
| 703 | if (level < 0) |
| 704 | put_bits(&s->pb, 16, 0x8001 + level + 255); |
| 705 | else |
| 706 | put_sbits(&s->pb, 16, level); |
| 707 | } |
| 708 | } else { |
| 709 | put_sbits(&s->pb, 12, level); |
| 710 | } |
| 711 | } |
| 712 | last_non_zero = i; |
| 713 | } |
| 714 | } |
| 715 | /* end of block */ |
| 716 | put_bits(&s->pb, table_vlc[112][1], table_vlc[112][0]); |
| 717 | } |
| 718 | |
| 719 | static av_always_inline void mpeg1_encode_mb_internal(MpegEncContext *s, |
| 720 | int16_t block[8][64], |
| 721 | int motion_x, int motion_y, |
| 722 | int mb_block_count) |
| 723 | { |
| 724 | int i, cbp; |
| 725 | const int mb_x = s->mb_x; |
| 726 | const int mb_y = s->mb_y; |
| 727 | const int first_mb = mb_x == s->resync_mb_x && mb_y == s->resync_mb_y; |
| 728 | |
| 729 | /* compute cbp */ |
| 730 | cbp = 0; |
| 731 | for (i = 0; i < mb_block_count; i++) |
| 732 | if (s->block_last_index[i] >= 0) |
| 733 | cbp |= 1 << (mb_block_count - 1 - i); |
| 734 | |
| 735 | if (cbp == 0 && !first_mb && s->mv_type == MV_TYPE_16X16 && |
| 736 | (mb_x != s->mb_width - 1 || |
| 737 | (mb_y != s->end_mb_y - 1 && s->codec_id == AV_CODEC_ID_MPEG1VIDEO)) && |
| 738 | ((s->pict_type == AV_PICTURE_TYPE_P && (motion_x | motion_y) == 0) || |
| 739 | (s->pict_type == AV_PICTURE_TYPE_B && s->mv_dir == s->last_mv_dir && |
| 740 | (((s->mv_dir & MV_DIR_FORWARD) |
| 741 | ? ((s->mv[0][0][0] - s->last_mv[0][0][0]) | |
| 742 | (s->mv[0][0][1] - s->last_mv[0][0][1])) : 0) | |
| 743 | ((s->mv_dir & MV_DIR_BACKWARD) |
| 744 | ? ((s->mv[1][0][0] - s->last_mv[1][0][0]) | |
| 745 | (s->mv[1][0][1] - s->last_mv[1][0][1])) : 0)) == 0))) { |
| 746 | s->mb_skip_run++; |
| 747 | s->qscale -= s->dquant; |
| 748 | s->skip_count++; |
| 749 | s->misc_bits++; |
| 750 | s->last_bits++; |
| 751 | if (s->pict_type == AV_PICTURE_TYPE_P) { |
| 752 | s->last_mv[0][0][0] = |
| 753 | s->last_mv[0][0][1] = |
| 754 | s->last_mv[0][1][0] = |
| 755 | s->last_mv[0][1][1] = 0; |
| 756 | } |
| 757 | } else { |
| 758 | if (first_mb) { |
| 759 | av_assert0(s->mb_skip_run == 0); |
| 760 | encode_mb_skip_run(s, s->mb_x); |
| 761 | } else { |
| 762 | encode_mb_skip_run(s, s->mb_skip_run); |
| 763 | } |
| 764 | |
| 765 | if (s->pict_type == AV_PICTURE_TYPE_I) { |
| 766 | if (s->dquant && cbp) { |
| 767 | /* macroblock_type: macroblock_quant = 1 */ |
| 768 | put_mb_modes(s, 2, 1, 0, 0); |
| 769 | put_qscale(s); |
| 770 | } else { |
| 771 | /* macroblock_type: macroblock_quant = 0 */ |
| 772 | put_mb_modes(s, 1, 1, 0, 0); |
| 773 | s->qscale -= s->dquant; |
| 774 | } |
| 775 | s->misc_bits += get_bits_diff(s); |
| 776 | s->i_count++; |
| 777 | } else if (s->mb_intra) { |
| 778 | if (s->dquant && cbp) { |
| 779 | put_mb_modes(s, 6, 0x01, 0, 0); |
| 780 | put_qscale(s); |
| 781 | } else { |
| 782 | put_mb_modes(s, 5, 0x03, 0, 0); |
| 783 | s->qscale -= s->dquant; |
| 784 | } |
| 785 | s->misc_bits += get_bits_diff(s); |
| 786 | s->i_count++; |
| 787 | memset(s->last_mv, 0, sizeof(s->last_mv)); |
| 788 | } else if (s->pict_type == AV_PICTURE_TYPE_P) { |
| 789 | if (s->mv_type == MV_TYPE_16X16) { |
| 790 | if (cbp != 0) { |
| 791 | if ((motion_x | motion_y) == 0) { |
| 792 | if (s->dquant) { |
| 793 | /* macroblock_pattern & quant */ |
| 794 | put_mb_modes(s, 5, 1, 0, 0); |
| 795 | put_qscale(s); |
| 796 | } else { |
| 797 | /* macroblock_pattern only */ |
| 798 | put_mb_modes(s, 2, 1, 0, 0); |
| 799 | } |
| 800 | s->misc_bits += get_bits_diff(s); |
| 801 | } else { |
| 802 | if (s->dquant) { |
| 803 | put_mb_modes(s, 5, 2, 1, 0); /* motion + cbp */ |
| 804 | put_qscale(s); |
| 805 | } else { |
| 806 | put_mb_modes(s, 1, 1, 1, 0); /* motion + cbp */ |
| 807 | } |
| 808 | s->misc_bits += get_bits_diff(s); |
| 809 | // RAL: f_code parameter added |
| 810 | mpeg1_encode_motion(s, |
| 811 | motion_x - s->last_mv[0][0][0], |
| 812 | s->f_code); |
| 813 | // RAL: f_code parameter added |
| 814 | mpeg1_encode_motion(s, |
| 815 | motion_y - s->last_mv[0][0][1], |
| 816 | s->f_code); |
| 817 | s->mv_bits += get_bits_diff(s); |
| 818 | } |
| 819 | } else { |
| 820 | put_bits(&s->pb, 3, 1); /* motion only */ |
| 821 | if (!s->frame_pred_frame_dct) |
| 822 | put_bits(&s->pb, 2, 2); /* motion_type: frame */ |
| 823 | s->misc_bits += get_bits_diff(s); |
| 824 | // RAL: f_code parameter added |
| 825 | mpeg1_encode_motion(s, |
| 826 | motion_x - s->last_mv[0][0][0], |
| 827 | s->f_code); |
| 828 | // RAL: f_code parameter added |
| 829 | mpeg1_encode_motion(s, |
| 830 | motion_y - s->last_mv[0][0][1], |
| 831 | s->f_code); |
| 832 | s->qscale -= s->dquant; |
| 833 | s->mv_bits += get_bits_diff(s); |
| 834 | } |
| 835 | s->last_mv[0][1][0] = s->last_mv[0][0][0] = motion_x; |
| 836 | s->last_mv[0][1][1] = s->last_mv[0][0][1] = motion_y; |
| 837 | } else { |
| 838 | av_assert2(!s->frame_pred_frame_dct && s->mv_type == MV_TYPE_FIELD); |
| 839 | |
| 840 | if (cbp) { |
| 841 | if (s->dquant) { |
| 842 | put_mb_modes(s, 5, 2, 1, 1); /* motion + cbp */ |
| 843 | put_qscale(s); |
| 844 | } else { |
| 845 | put_mb_modes(s, 1, 1, 1, 1); /* motion + cbp */ |
| 846 | } |
| 847 | } else { |
| 848 | put_bits(&s->pb, 3, 1); /* motion only */ |
| 849 | put_bits(&s->pb, 2, 1); /* motion_type: field */ |
| 850 | s->qscale -= s->dquant; |
| 851 | } |
| 852 | s->misc_bits += get_bits_diff(s); |
| 853 | for (i = 0; i < 2; i++) { |
| 854 | put_bits(&s->pb, 1, s->field_select[0][i]); |
| 855 | mpeg1_encode_motion(s, |
| 856 | s->mv[0][i][0] - s->last_mv[0][i][0], |
| 857 | s->f_code); |
| 858 | mpeg1_encode_motion(s, |
| 859 | s->mv[0][i][1] - (s->last_mv[0][i][1] >> 1), |
| 860 | s->f_code); |
| 861 | s->last_mv[0][i][0] = s->mv[0][i][0]; |
| 862 | s->last_mv[0][i][1] = 2 * s->mv[0][i][1]; |
| 863 | } |
| 864 | s->mv_bits += get_bits_diff(s); |
| 865 | } |
| 866 | if (cbp) { |
| 867 | if (s->chroma_y_shift) { |
| 868 | put_bits(&s->pb, |
| 869 | ff_mpeg12_mbPatTable[cbp][1], |
| 870 | ff_mpeg12_mbPatTable[cbp][0]); |
| 871 | } else { |
| 872 | put_bits(&s->pb, |
| 873 | ff_mpeg12_mbPatTable[cbp >> 2][1], |
| 874 | ff_mpeg12_mbPatTable[cbp >> 2][0]); |
| 875 | put_sbits(&s->pb, 2, cbp); |
| 876 | } |
| 877 | } |
| 878 | s->f_count++; |
| 879 | } else { |
| 880 | if (s->mv_type == MV_TYPE_16X16) { |
| 881 | if (cbp) { // With coded bloc pattern |
| 882 | if (s->dquant) { |
| 883 | if (s->mv_dir == MV_DIR_FORWARD) |
| 884 | put_mb_modes(s, 6, 3, 1, 0); |
| 885 | else |
| 886 | put_mb_modes(s, 8 - s->mv_dir, 2, 1, 0); |
| 887 | put_qscale(s); |
| 888 | } else { |
| 889 | put_mb_modes(s, 5 - s->mv_dir, 3, 1, 0); |
| 890 | } |
| 891 | } else { // No coded bloc pattern |
| 892 | put_bits(&s->pb, 5 - s->mv_dir, 2); |
| 893 | if (!s->frame_pred_frame_dct) |
| 894 | put_bits(&s->pb, 2, 2); /* motion_type: frame */ |
| 895 | s->qscale -= s->dquant; |
| 896 | } |
| 897 | s->misc_bits += get_bits_diff(s); |
| 898 | if (s->mv_dir & MV_DIR_FORWARD) { |
| 899 | mpeg1_encode_motion(s, |
| 900 | s->mv[0][0][0] - s->last_mv[0][0][0], |
| 901 | s->f_code); |
| 902 | mpeg1_encode_motion(s, |
| 903 | s->mv[0][0][1] - s->last_mv[0][0][1], |
| 904 | s->f_code); |
| 905 | s->last_mv[0][0][0] = |
| 906 | s->last_mv[0][1][0] = s->mv[0][0][0]; |
| 907 | s->last_mv[0][0][1] = |
| 908 | s->last_mv[0][1][1] = s->mv[0][0][1]; |
| 909 | s->f_count++; |
| 910 | } |
| 911 | if (s->mv_dir & MV_DIR_BACKWARD) { |
| 912 | mpeg1_encode_motion(s, |
| 913 | s->mv[1][0][0] - s->last_mv[1][0][0], |
| 914 | s->b_code); |
| 915 | mpeg1_encode_motion(s, |
| 916 | s->mv[1][0][1] - s->last_mv[1][0][1], |
| 917 | s->b_code); |
| 918 | s->last_mv[1][0][0] = |
| 919 | s->last_mv[1][1][0] = s->mv[1][0][0]; |
| 920 | s->last_mv[1][0][1] = |
| 921 | s->last_mv[1][1][1] = s->mv[1][0][1]; |
| 922 | s->b_count++; |
| 923 | } |
| 924 | } else { |
| 925 | av_assert2(s->mv_type == MV_TYPE_FIELD); |
| 926 | av_assert2(!s->frame_pred_frame_dct); |
| 927 | if (cbp) { // With coded bloc pattern |
| 928 | if (s->dquant) { |
| 929 | if (s->mv_dir == MV_DIR_FORWARD) |
| 930 | put_mb_modes(s, 6, 3, 1, 1); |
| 931 | else |
| 932 | put_mb_modes(s, 8 - s->mv_dir, 2, 1, 1); |
| 933 | put_qscale(s); |
| 934 | } else { |
| 935 | put_mb_modes(s, 5 - s->mv_dir, 3, 1, 1); |
| 936 | } |
| 937 | } else { // No coded bloc pattern |
| 938 | put_bits(&s->pb, 5 - s->mv_dir, 2); |
| 939 | put_bits(&s->pb, 2, 1); /* motion_type: field */ |
| 940 | s->qscale -= s->dquant; |
| 941 | } |
| 942 | s->misc_bits += get_bits_diff(s); |
| 943 | if (s->mv_dir & MV_DIR_FORWARD) { |
| 944 | for (i = 0; i < 2; i++) { |
| 945 | put_bits(&s->pb, 1, s->field_select[0][i]); |
| 946 | mpeg1_encode_motion(s, |
| 947 | s->mv[0][i][0] - s->last_mv[0][i][0], |
| 948 | s->f_code); |
| 949 | mpeg1_encode_motion(s, |
| 950 | s->mv[0][i][1] - (s->last_mv[0][i][1] >> 1), |
| 951 | s->f_code); |
| 952 | s->last_mv[0][i][0] = s->mv[0][i][0]; |
| 953 | s->last_mv[0][i][1] = s->mv[0][i][1] * 2; |
| 954 | } |
| 955 | s->f_count++; |
| 956 | } |
| 957 | if (s->mv_dir & MV_DIR_BACKWARD) { |
| 958 | for (i = 0; i < 2; i++) { |
| 959 | put_bits(&s->pb, 1, s->field_select[1][i]); |
| 960 | mpeg1_encode_motion(s, |
| 961 | s->mv[1][i][0] - s->last_mv[1][i][0], |
| 962 | s->b_code); |
| 963 | mpeg1_encode_motion(s, |
| 964 | s->mv[1][i][1] - (s->last_mv[1][i][1] >> 1), |
| 965 | s->b_code); |
| 966 | s->last_mv[1][i][0] = s->mv[1][i][0]; |
| 967 | s->last_mv[1][i][1] = s->mv[1][i][1] * 2; |
| 968 | } |
| 969 | s->b_count++; |
| 970 | } |
| 971 | } |
| 972 | s->mv_bits += get_bits_diff(s); |
| 973 | if (cbp) { |
| 974 | if (s->chroma_y_shift) { |
| 975 | put_bits(&s->pb, |
| 976 | ff_mpeg12_mbPatTable[cbp][1], |
| 977 | ff_mpeg12_mbPatTable[cbp][0]); |
| 978 | } else { |
| 979 | put_bits(&s->pb, |
| 980 | ff_mpeg12_mbPatTable[cbp >> 2][1], |
| 981 | ff_mpeg12_mbPatTable[cbp >> 2][0]); |
| 982 | put_sbits(&s->pb, 2, cbp); |
| 983 | } |
| 984 | } |
| 985 | } |
| 986 | for (i = 0; i < mb_block_count; i++) |
| 987 | if (cbp & (1 << (mb_block_count - 1 - i))) |
| 988 | mpeg1_encode_block(s, block[i], i); |
| 989 | s->mb_skip_run = 0; |
| 990 | if (s->mb_intra) |
| 991 | s->i_tex_bits += get_bits_diff(s); |
| 992 | else |
| 993 | s->p_tex_bits += get_bits_diff(s); |
| 994 | } |
| 995 | } |
| 996 | |
| 997 | void ff_mpeg1_encode_mb(MpegEncContext *s, int16_t block[8][64], |
| 998 | int motion_x, int motion_y) |
| 999 | { |
| 1000 | if (s->chroma_format == CHROMA_420) |
| 1001 | mpeg1_encode_mb_internal(s, block, motion_x, motion_y, 6); |
| 1002 | else |
| 1003 | mpeg1_encode_mb_internal(s, block, motion_x, motion_y, 8); |
| 1004 | } |
| 1005 | |
| 1006 | av_cold void ff_mpeg1_encode_init(MpegEncContext *s) |
| 1007 | { |
| 1008 | static int done = 0; |
| 1009 | |
| 1010 | ff_mpeg12_common_init(s); |
| 1011 | |
| 1012 | if (!done) { |
| 1013 | int f_code; |
| 1014 | int mv; |
| 1015 | int i; |
| 1016 | |
| 1017 | done = 1; |
| 1018 | ff_init_rl(&ff_rl_mpeg1, ff_mpeg12_static_rl_table_store[0]); |
| 1019 | ff_init_rl(&ff_rl_mpeg2, ff_mpeg12_static_rl_table_store[1]); |
| 1020 | |
| 1021 | for (i = 0; i < 64; i++) { |
| 1022 | mpeg1_max_level[0][i] = ff_rl_mpeg1.max_level[0][i]; |
| 1023 | mpeg1_index_run[0][i] = ff_rl_mpeg1.index_run[0][i]; |
| 1024 | } |
| 1025 | |
| 1026 | init_uni_ac_vlc(&ff_rl_mpeg1, uni_mpeg1_ac_vlc_len); |
| 1027 | if (s->intra_vlc_format) |
| 1028 | init_uni_ac_vlc(&ff_rl_mpeg2, uni_mpeg2_ac_vlc_len); |
| 1029 | |
| 1030 | /* build unified dc encoding tables */ |
| 1031 | for (i = -255; i < 256; i++) { |
| 1032 | int adiff, index; |
| 1033 | int bits, code; |
| 1034 | int diff = i; |
| 1035 | |
| 1036 | adiff = FFABS(diff); |
| 1037 | if (diff < 0) |
| 1038 | diff--; |
| 1039 | index = av_log2(2 * adiff); |
| 1040 | |
| 1041 | bits = ff_mpeg12_vlc_dc_lum_bits[index] + index; |
| 1042 | code = (ff_mpeg12_vlc_dc_lum_code[index] << index) + |
| 1043 | (diff & ((1 << index) - 1)); |
| 1044 | mpeg1_lum_dc_uni[i + 255] = bits + (code << 8); |
| 1045 | |
| 1046 | bits = ff_mpeg12_vlc_dc_chroma_bits[index] + index; |
| 1047 | code = (ff_mpeg12_vlc_dc_chroma_code[index] << index) + |
| 1048 | (diff & ((1 << index) - 1)); |
| 1049 | mpeg1_chr_dc_uni[i + 255] = bits + (code << 8); |
| 1050 | } |
| 1051 | |
| 1052 | for (f_code = 1; f_code <= MAX_FCODE; f_code++) |
| 1053 | for (mv = -MAX_MV; mv <= MAX_MV; mv++) { |
| 1054 | int len; |
| 1055 | |
| 1056 | if (mv == 0) { |
| 1057 | len = ff_mpeg12_mbMotionVectorTable[0][1]; |
| 1058 | } else { |
| 1059 | int val, bit_size, code; |
| 1060 | |
| 1061 | bit_size = f_code - 1; |
| 1062 | |
| 1063 | val = mv; |
| 1064 | if (val < 0) |
| 1065 | val = -val; |
| 1066 | val--; |
| 1067 | code = (val >> bit_size) + 1; |
| 1068 | if (code < 17) |
| 1069 | len = ff_mpeg12_mbMotionVectorTable[code][1] + |
| 1070 | 1 + bit_size; |
| 1071 | else |
| 1072 | len = ff_mpeg12_mbMotionVectorTable[16][1] + |
| 1073 | 2 + bit_size; |
| 1074 | } |
| 1075 | |
| 1076 | mv_penalty[f_code][mv + MAX_MV] = len; |
| 1077 | } |
| 1078 | |
| 1079 | |
| 1080 | for (f_code = MAX_FCODE; f_code > 0; f_code--) |
| 1081 | for (mv = -(8 << f_code); mv < (8 << f_code); mv++) |
| 1082 | fcode_tab[mv + MAX_MV] = f_code; |
| 1083 | } |
| 1084 | s->me.mv_penalty = mv_penalty; |
| 1085 | s->fcode_tab = fcode_tab; |
| 1086 | if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO) { |
| 1087 | s->min_qcoeff = -255; |
| 1088 | s->max_qcoeff = 255; |
| 1089 | } else { |
| 1090 | s->min_qcoeff = -2047; |
| 1091 | s->max_qcoeff = 2047; |
| 1092 | } |
| 1093 | if (s->intra_vlc_format) { |
| 1094 | s->intra_ac_vlc_length = |
| 1095 | s->intra_ac_vlc_last_length = uni_mpeg2_ac_vlc_len; |
| 1096 | } else { |
| 1097 | s->intra_ac_vlc_length = |
| 1098 | s->intra_ac_vlc_last_length = uni_mpeg1_ac_vlc_len; |
| 1099 | } |
| 1100 | s->inter_ac_vlc_length = |
| 1101 | s->inter_ac_vlc_last_length = uni_mpeg1_ac_vlc_len; |
| 1102 | } |
| 1103 | |
| 1104 | #define OFFSET(x) offsetof(MpegEncContext, x) |
| 1105 | #define VE AV_OPT_FLAG_ENCODING_PARAM | AV_OPT_FLAG_VIDEO_PARAM |
| 1106 | #define COMMON_OPTS \ |
| 1107 | { "gop_timecode", "MPEG GOP Timecode in hh:mm:ss[:;.]ff format", \ |
| 1108 | OFFSET(tc_opt_str), AV_OPT_TYPE_STRING, {.str=NULL}, CHAR_MIN, CHAR_MAX, VE },\ |
| 1109 | { "intra_vlc", "Use MPEG-2 intra VLC table.", \ |
| 1110 | OFFSET(intra_vlc_format), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VE }, \ |
| 1111 | { "drop_frame_timecode", "Timecode is in drop frame format.", \ |
| 1112 | OFFSET(drop_frame_timecode), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VE }, \ |
| 1113 | { "scan_offset", "Reserve space for SVCD scan offset user data.", \ |
| 1114 | OFFSET(scan_offset), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VE }, |
| 1115 | |
| 1116 | static const AVOption mpeg1_options[] = { |
| 1117 | COMMON_OPTS |
| 1118 | FF_MPV_COMMON_OPTS |
| 1119 | { NULL }, |
| 1120 | }; |
| 1121 | |
| 1122 | static const AVOption mpeg2_options[] = { |
| 1123 | COMMON_OPTS |
| 1124 | { "non_linear_quant", "Use nonlinear quantizer.", OFFSET(q_scale_type), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VE }, |
| 1125 | { "alternate_scan", "Enable alternate scantable.", OFFSET(alternate_scan), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VE }, |
| 1126 | { "seq_disp_ext", "Write sequence_display_extension blocks.", OFFSET(seq_disp_ext), AV_OPT_TYPE_INT, { .i64 = -1 }, -1, 1, VE, "seq_disp_ext" }, |
| 1127 | { "auto", NULL, 0, AV_OPT_TYPE_CONST, {.i64 = -1}, 0, 0, VE, "seq_disp_ext" }, |
| 1128 | { "never", NULL, 0, AV_OPT_TYPE_CONST, {.i64 = 0 }, 0, 0, VE, "seq_disp_ext" }, |
| 1129 | { "always", NULL, 0, AV_OPT_TYPE_CONST, {.i64 = 1 }, 0, 0, VE, "seq_disp_ext" }, |
| 1130 | FF_MPV_COMMON_OPTS |
| 1131 | { NULL }, |
| 1132 | }; |
| 1133 | |
| 1134 | #define mpeg12_class(x) \ |
| 1135 | static const AVClass mpeg ## x ## _class = { \ |
| 1136 | .class_name = "mpeg" # x "video encoder", \ |
| 1137 | .item_name = av_default_item_name, \ |
| 1138 | .option = mpeg ## x ## _options, \ |
| 1139 | .version = LIBAVUTIL_VERSION_INT, \ |
| 1140 | }; |
| 1141 | |
| 1142 | mpeg12_class(1) |
| 1143 | mpeg12_class(2) |
| 1144 | |
| 1145 | AVCodec ff_mpeg1video_encoder = { |
| 1146 | .name = "mpeg1video", |
| 1147 | .long_name = NULL_IF_CONFIG_SMALL("MPEG-1 video"), |
| 1148 | .type = AVMEDIA_TYPE_VIDEO, |
| 1149 | .id = AV_CODEC_ID_MPEG1VIDEO, |
| 1150 | .priv_data_size = sizeof(MpegEncContext), |
| 1151 | .init = encode_init, |
| 1152 | .encode2 = ff_mpv_encode_picture, |
| 1153 | .close = ff_mpv_encode_end, |
| 1154 | .supported_framerates = ff_mpeg12_frame_rate_tab + 1, |
| 1155 | .pix_fmts = (const enum AVPixelFormat[]) { AV_PIX_FMT_YUV420P, |
| 1156 | AV_PIX_FMT_NONE }, |
| 1157 | .capabilities = CODEC_CAP_DELAY | CODEC_CAP_SLICE_THREADS, |
| 1158 | .priv_class = &mpeg1_class, |
| 1159 | }; |
| 1160 | |
| 1161 | AVCodec ff_mpeg2video_encoder = { |
| 1162 | .name = "mpeg2video", |
| 1163 | .long_name = NULL_IF_CONFIG_SMALL("MPEG-2 video"), |
| 1164 | .type = AVMEDIA_TYPE_VIDEO, |
| 1165 | .id = AV_CODEC_ID_MPEG2VIDEO, |
| 1166 | .priv_data_size = sizeof(MpegEncContext), |
| 1167 | .init = encode_init, |
| 1168 | .encode2 = ff_mpv_encode_picture, |
| 1169 | .close = ff_mpv_encode_end, |
| 1170 | .supported_framerates = ff_mpeg2_frame_rate_tab, |
| 1171 | .pix_fmts = (const enum AVPixelFormat[]) { AV_PIX_FMT_YUV420P, |
| 1172 | AV_PIX_FMT_YUV422P, |
| 1173 | AV_PIX_FMT_NONE }, |
| 1174 | .capabilities = CODEC_CAP_DELAY | CODEC_CAP_SLICE_THREADS, |
| 1175 | .priv_class = &mpeg2_class, |
| 1176 | }; |