git.sesse.net Git - ffmpeg/blob - libavcodec/hevc_ps.c

   1 /*
   2  * HEVC Parameter Set decoding
   3  *
   4  * Copyright (C) 2012 - 2103 Guillaume Martres
   5  * Copyright (C) 2012 - 2103 Mickael Raulet
   6  * Copyright (C) 2012 - 2013 Gildas Cocherel
   7  * Copyright (C) 2013 Vittorio Giovara
   8  *
   9  * This file is part of Libav.
  10  *
  11  * Libav is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU Lesser General Public
  13  * License as published by the Free Software Foundation; either
  14  * version 2.1 of the License, or (at your option) any later version.
  15  *
  16  * Libav is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19  * Lesser General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU Lesser General Public
  22  * License along with Libav; if not, write to the Free Software
  23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  24  */
  25
  26 #include "libavutil/imgutils.h"
  27
  28 #include "golomb.h"
  29 #include "hevc.h"
  30
  31 static const uint8_t default_scaling_list_intra[] = {
  32     16, 16, 16, 16, 17, 18, 21, 24,
  33     16, 16, 16, 16, 17, 19, 22, 25,
  34     16, 16, 17, 18, 20, 22, 25, 29,
  35     16, 16, 18, 21, 24, 27, 31, 36,
  36     17, 17, 20, 24, 30, 35, 41, 47,
  37     18, 19, 22, 27, 35, 44, 54, 65,
  38     21, 22, 25, 31, 41, 54, 70, 88,
  39     24, 25, 29, 36, 47, 65, 88, 115
  40 };
  41
  42 static const uint8_t default_scaling_list_inter[] = {
  43     16, 16, 16, 16, 17, 18, 20, 24,
  44     16, 16, 16, 17, 18, 20, 24, 25,
  45     16, 16, 17, 18, 20, 24, 25, 28,
  46     16, 17, 18, 20, 24, 25, 28, 33,
  47     17, 18, 20, 24, 25, 28, 33, 41,
  48     18, 20, 24, 25, 28, 33, 41, 54,
  49     20, 24, 25, 28, 33, 41, 54, 71,
  50     24, 25, 28, 33, 41, 54, 71, 91
  51 };
  52
  53 static const AVRational vui_sar[] = {
  54     {  0,   1 },
  55     {  1,   1 },
  56     { 12,  11 },
  57     { 10,  11 },
  58     { 16,  11 },
  59     { 40,  33 },
  60     { 24,  11 },
  61     { 20,  11 },
  62     { 32,  11 },
  63     { 80,  33 },
  64     { 18,  11 },
  65     { 15,  11 },
  66     { 64,  33 },
  67     { 160, 99 },
  68     {  4,   3 },
  69     {  3,   2 },
  70     {  2,   1 },
  71 };
  72
  73 int ff_hevc_decode_short_term_rps(HEVCContext *s, ShortTermRPS *rps,
  74                                   const HEVCSPS *sps, int is_slice_header)
  75 {
  76     HEVCLocalContext *lc = &s->HEVClc;
  77     uint8_t rps_predict = 0;
  78     int delta_poc;
  79     int k0 = 0;
  80     int k1 = 0;
  81     int k  = 0;
  82     int i;
  83
  84     GetBitContext *gb = &lc->gb;
  85
  86     if (rps != sps->st_rps && sps->nb_st_rps)
  87         rps_predict = get_bits1(gb);
  88
  89     if (rps_predict) {
  90         const ShortTermRPS *rps_ridx;
  91         int delta_rps, abs_delta_rps;
  92         uint8_t use_delta_flag = 0;
  93         uint8_t delta_rps_sign;
  94
  95         if (is_slice_header) {
  96             int delta_idx = get_ue_golomb_long(gb) + 1;
  97             if (delta_idx > sps->nb_st_rps) {
  98                 av_log(s->avctx, AV_LOG_ERROR,
  99                        "Invalid value of delta_idx in slice header RPS: %d > %d.\n",
 100                        delta_idx, sps->nb_st_rps);
 101                 return AVERROR_INVALIDDATA;
 102             }
 103             rps_ridx = &sps->st_rps[sps->nb_st_rps - delta_idx];
 104         } else
 105             rps_ridx = &sps->st_rps[rps - sps->st_rps - 1];
 106
 107         delta_rps_sign = get_bits1(gb);
 108         abs_delta_rps  = get_ue_golomb_long(gb) + 1;
 109         delta_rps      = (1 - (delta_rps_sign << 1)) * abs_delta_rps;
 110         for (i = 0; i <= rps_ridx->num_delta_pocs; i++) {
 111             int used = rps->used[k] = get_bits1(gb);
 112
 113             if (!used)
 114                 use_delta_flag = get_bits1(gb);
 115
 116             if (used || use_delta_flag) {
 117                 if (i < rps_ridx->num_delta_pocs)
 118                     delta_poc = delta_rps + rps_ridx->delta_poc[i];
 119                 else
 120                     delta_poc = delta_rps;
 121                 rps->delta_poc[k] = delta_poc;
 122                 if (delta_poc < 0)
 123                     k0++;
 124                 else
 125                     k1++;
 126                 k++;
 127             }
 128         }
 129
 130         rps->num_delta_pocs    = k;
 131         rps->num_negative_pics = k0;
 132         // sort in increasing order (smallest first)
 133         if (rps->num_delta_pocs != 0) {
 134             int used, tmp;
 135             for (i = 1; i < rps->num_delta_pocs; i++) {
 136                 delta_poc = rps->delta_poc[i];
 137                 used      = rps->used[i];
 138                 for (k = i - 1; k >= 0; k--) {
 139                     tmp = rps->delta_poc[k];
 140                     if (delta_poc < tmp) {
 141                         rps->delta_poc[k + 1] = tmp;
 142                         rps->used[k + 1]      = rps->used[k];
 143                         rps->delta_poc[k]     = delta_poc;
 144                         rps->used[k]          = used;
 145                     }
 146                 }
 147             }
 148         }
 149         if ((rps->num_negative_pics >> 1) != 0) {
 150             int used;
 151             k = rps->num_negative_pics - 1;
 152             // flip the negative values to largest first
 153             for (i = 0; i < rps->num_negative_pics >> 1; i++) {
 154                 delta_poc         = rps->delta_poc[i];
 155                 used              = rps->used[i];
 156                 rps->delta_poc[i] = rps->delta_poc[k];
 157                 rps->used[i]      = rps->used[k];
 158                 rps->delta_poc[k] = delta_poc;
 159                 rps->used[k]      = used;
 160                 k--;
 161             }
 162         }
 163     } else {
 164         unsigned int prev, nb_positive_pics;
 165         rps->num_negative_pics = get_ue_golomb_long(gb);
 166         nb_positive_pics       = get_ue_golomb_long(gb);
 167
 168         if (rps->num_negative_pics >= MAX_REFS ||
 169             nb_positive_pics >= MAX_REFS) {
 170             av_log(s->avctx, AV_LOG_ERROR, "Too many refs in a short term RPS.\n");
 171             return AVERROR_INVALIDDATA;
 172         }
 173
 174         rps->num_delta_pocs = rps->num_negative_pics + nb_positive_pics;
 175         if (rps->num_delta_pocs) {
 176             prev = 0;
 177             for (i = 0; i < rps->num_negative_pics; i++) {
 178                 delta_poc = get_ue_golomb_long(gb) + 1;
 179                 prev -= delta_poc;
 180                 rps->delta_poc[i] = prev;
 181                 rps->used[i]      = get_bits1(gb);
 182             }
 183             prev = 0;
 184             for (i = 0; i < nb_positive_pics; i++) {
 185                 delta_poc = get_ue_golomb_long(gb) + 1;
 186                 prev += delta_poc;
 187                 rps->delta_poc[rps->num_negative_pics + i] = prev;
 188                 rps->used[rps->num_negative_pics + i]      = get_bits1(gb);
 189             }
 190         }
 191     }
 192     return 0;
 193 }
 194
 195 static int decode_profile_tier_level(HEVCLocalContext *lc, PTL *ptl,
 196                                      int max_num_sub_layers)
 197 {
 198     int i, j;
 199     GetBitContext *gb = &lc->gb;
 200
 201     ptl->general_profile_space = get_bits(gb, 2);
 202     ptl->general_tier_flag     = get_bits1(gb);
 203     ptl->general_profile_idc   = get_bits(gb, 5);
 204     for (i = 0; i < 32; i++)
 205         ptl->general_profile_compatibility_flag[i] = get_bits1(gb);
 206     skip_bits1(gb); // general_progressive_source_flag
 207     skip_bits1(gb); // general_interlaced_source_flag
 208     skip_bits1(gb); // general_non_packed_constraint_flag
 209     skip_bits1(gb); // general_frame_only_constraint_flag
 210     if (get_bits(gb, 16) != 0) // XXX_reserved_zero_44bits[0..15]
 211         return -1;
 212     if (get_bits(gb, 16) != 0) // XXX_reserved_zero_44bits[16..31]
 213         return -1;
 214     if (get_bits(gb, 12) != 0) // XXX_reserved_zero_44bits[32..43]
 215         return -1;
 216
 217     ptl->general_level_idc = get_bits(gb, 8);
 218     for (i = 0; i < max_num_sub_layers - 1; i++) {
 219         ptl->sub_layer_profile_present_flag[i] = get_bits1(gb);
 220         ptl->sub_layer_level_present_flag[i]   = get_bits1(gb);
 221     }
 222     if (max_num_sub_layers - 1 > 0)
 223         for (i = max_num_sub_layers - 1; i < 8; i++)
 224             skip_bits(gb, 2);  // reserved_zero_2bits[i]
 225     for (i = 0; i < max_num_sub_layers - 1; i++) {
 226         if (ptl->sub_layer_profile_present_flag[i]) {
 227             ptl->sub_layer_profile_space[i] = get_bits(gb, 2);
 228             ptl->sub_layer_tier_flag[i]     = get_bits(gb, 1);
 229             ptl->sub_layer_profile_idc[i]   = get_bits(gb, 5);
 230             for (j = 0; j < 32; j++)
 231                 ptl->sub_layer_profile_compatibility_flags[i][j] = get_bits1(gb);
 232             skip_bits1(gb); // sub_layer_progressive_source_flag
 233             skip_bits1(gb); // sub_layer_interlaced_source_flag
 234             skip_bits1(gb); // sub_layer_non_packed_constraint_flag
 235             skip_bits1(gb); // sub_layer_frame_only_constraint_flag
 236
 237             if (get_bits(gb, 16) != 0) // sub_layer_reserved_zero_44bits[0..15]
 238                 return -1;
 239             if (get_bits(gb, 16) != 0) // sub_layer_reserved_zero_44bits[16..31]
 240                 return -1;
 241             if (get_bits(gb, 12) != 0) // sub_layer_reserved_zero_44bits[32..43]
 242                 return -1;
 243         }
 244         if (ptl->sub_layer_level_present_flag[i])
 245             ptl->sub_layer_level_idc[i] = get_bits(gb, 8);
 246     }
 247     return 0;
 248 }
 249
 250 static void decode_sublayer_hrd(HEVCContext *s, int nb_cpb,
 251                                 int subpic_params_present)
 252 {
 253     GetBitContext *gb = &s->HEVClc.gb;
 254     int i;
 255
 256     for (i = 0; i < nb_cpb; i++) {
 257         get_ue_golomb_long(gb); // bit_rate_value_minus1
 258         get_ue_golomb_long(gb); // cpb_size_value_minus1
 259
 260         if (subpic_params_present) {
 261             get_ue_golomb_long(gb); // cpb_size_du_value_minus1
 262             get_ue_golomb_long(gb); // bit_rate_du_value_minus1
 263         }
 264         skip_bits1(gb); // cbr_flag
 265     }
 266 }
 267
 268 static void decode_hrd(HEVCContext *s, int common_inf_present,
 269                        int max_sublayers)
 270 {
 271     GetBitContext *gb = &s->HEVClc.gb;
 272     int nal_params_present = 0, vcl_params_present = 0;
 273     int subpic_params_present = 0;
 274     int i;
 275
 276     if (common_inf_present) {
 277         nal_params_present = get_bits1(gb);
 278         vcl_params_present = get_bits1(gb);
 279
 280         if (nal_params_present || vcl_params_present) {
 281             subpic_params_present = get_bits1(gb);
 282
 283             if (subpic_params_present) {
 284                 skip_bits(gb, 8); // tick_divisor_minus2
 285                 skip_bits(gb, 5); // du_cpb_removal_delay_increment_length_minus1
 286                 skip_bits(gb, 1); // sub_pic_cpb_params_in_pic_timing_sei_flag
 287                 skip_bits(gb, 5); // dpb_output_delay_du_length_minus1
 288             }
 289
 290             skip_bits(gb, 4); // bit_rate_scale
 291             skip_bits(gb, 4); // cpb_size_scale
 292
 293             if (subpic_params_present)
 294                 skip_bits(gb, 4);  // cpb_size_du_scale
 295
 296             skip_bits(gb, 5); // initial_cpb_removal_delay_length_minus1
 297             skip_bits(gb, 5); // au_cpb_removal_delay_length_minus1
 298             skip_bits(gb, 5); // dpb_output_delay_length_minus1
 299         }
 300     }
 301
 302     for (i = 0; i < max_sublayers; i++) {
 303         int low_delay = 0;
 304         int nb_cpb = 1;
 305         int fixed_rate = get_bits1(gb);
 306
 307         if (!fixed_rate)
 308             fixed_rate = get_bits1(gb);
 309
 310         if (fixed_rate)
 311             get_ue_golomb_long(gb);  // elemental_duration_in_tc_minus1
 312         else
 313             low_delay = get_bits1(gb);
 314
 315         if (!low_delay)
 316             nb_cpb = get_ue_golomb_long(gb) + 1;
 317
 318         if (nal_params_present)
 319             decode_sublayer_hrd(s, nb_cpb, subpic_params_present);
 320         if (vcl_params_present)
 321             decode_sublayer_hrd(s, nb_cpb, subpic_params_present);
 322     }
 323 }
 324
 325 int ff_hevc_decode_nal_vps(HEVCContext *s)
 326 {
 327     int i,j;
 328     GetBitContext *gb = &s->HEVClc.gb;
 329     int vps_id = 0;
 330     HEVCVPS *vps;
 331
 332     av_log(s->avctx, AV_LOG_DEBUG, "Decoding VPS\n");
 333
 334     vps = av_mallocz(sizeof(*vps));
 335     if (!vps)
 336         return AVERROR(ENOMEM);
 337
 338     vps_id = get_bits(gb, 4);
 339     if (vps_id >= MAX_VPS_COUNT) {
 340         av_log(s->avctx, AV_LOG_ERROR, "VPS id out of range: %d\n", vps_id);
 341         goto err;
 342     }
 343
 344     if (get_bits(gb, 2) != 3) { // vps_reserved_three_2bits
 345         av_log(s->avctx, AV_LOG_ERROR, "vps_reserved_three_2bits is not three\n");
 346         goto err;
 347     }
 348
 349     vps->vps_max_layers               = get_bits(gb, 6) + 1;
 350     vps->vps_max_sub_layers           = get_bits(gb, 3) + 1;
 351     vps->vps_temporal_id_nesting_flag = get_bits1(gb);
 352
 353     if (get_bits(gb, 16) != 0xffff) { // vps_reserved_ffff_16bits
 354         av_log(s->avctx, AV_LOG_ERROR, "vps_reserved_ffff_16bits is not 0xffff\n");
 355         goto err;
 356     }
 357
 358     if (vps->vps_max_sub_layers > MAX_SUB_LAYERS) {
 359         av_log(s->avctx, AV_LOG_ERROR, "vps_max_sub_layers out of range: %d\n",
 360                vps->vps_max_sub_layers);
 361         goto err;
 362     }
 363
 364     if (decode_profile_tier_level(&s->HEVClc, &vps->ptl, vps->vps_max_sub_layers) < 0) {
 365         av_log(s->avctx, AV_LOG_ERROR, "Error decoding profile tier level.\n");
 366         goto err;
 367     }
 368     vps->vps_sub_layer_ordering_info_present_flag = get_bits1(gb);
 369
 370     i = vps->vps_sub_layer_ordering_info_present_flag ? 0 : vps->vps_max_sub_layers - 1;
 371     for (; i < vps->vps_max_sub_layers; i++) {
 372         vps->vps_max_dec_pic_buffering[i] = get_ue_golomb_long(gb) + 1;
 373         vps->vps_num_reorder_pics[i]      = get_ue_golomb_long(gb);
 374         vps->vps_max_latency_increase[i]  = get_ue_golomb_long(gb) - 1;
 375
 376         if (vps->vps_max_dec_pic_buffering[i] > MAX_DPB_SIZE) {
 377             av_log(s->avctx, AV_LOG_ERROR, "vps_max_dec_pic_buffering_minus1 out of range: %d\n",
 378                    vps->vps_max_dec_pic_buffering[i] - 1);
 379             goto err;
 380         }
 381         if (vps->vps_num_reorder_pics[i] > vps->vps_max_dec_pic_buffering[i] - 1) {
 382             av_log(s->avctx, AV_LOG_ERROR, "vps_max_num_reorder_pics out of range: %d\n",
 383                    vps->vps_num_reorder_pics[i]);
 384             goto err;
 385         }
 386     }
 387
 388     vps->vps_max_layer_id   = get_bits(gb, 6);
 389     vps->vps_num_layer_sets = get_ue_golomb_long(gb) + 1;
 390     for (i = 1; i < vps->vps_num_layer_sets; i++)
 391         for (j = 0; j <= vps->vps_max_layer_id; j++)
 392             skip_bits(gb, 1);  // layer_id_included_flag[i][j]
 393
 394     vps->vps_timing_info_present_flag = get_bits1(gb);
 395     if (vps->vps_timing_info_present_flag) {
 396         vps->vps_num_units_in_tick               = get_bits_long(gb, 32);
 397         vps->vps_time_scale                      = get_bits_long(gb, 32);
 398         vps->vps_poc_proportional_to_timing_flag = get_bits1(gb);
 399         if (vps->vps_poc_proportional_to_timing_flag)
 400             vps->vps_num_ticks_poc_diff_one = get_ue_golomb_long(gb) + 1;
 401         vps->vps_num_hrd_parameters = get_ue_golomb_long(gb);
 402         for (i = 0; i < vps->vps_num_hrd_parameters; i++) {
 403             int common_inf_present = 1;
 404
 405             get_ue_golomb_long(gb); // hrd_layer_set_idx
 406             if (i)
 407                 common_inf_present = get_bits1(gb);
 408             decode_hrd(s, common_inf_present, vps->vps_max_sub_layers);
 409         }
 410     }
 411     get_bits1(gb); /* vps_extension_flag */
 412
 413     av_free(s->vps_list[vps_id]);
 414     s->vps_list[vps_id] = vps;
 415     return 0;
 416
 417 err:
 418     av_free(vps);
 419     return AVERROR_INVALIDDATA;
 420 }
 421
 422 static void decode_vui(HEVCContext *s, HEVCSPS *sps)
 423 {
 424     VUI *vui          = &sps->vui;
 425     GetBitContext *gb = &s->HEVClc.gb;
 426     int sar_present;
 427
 428     av_log(s->avctx, AV_LOG_DEBUG, "Decoding VUI\n");
 429
 430     sar_present = get_bits1(gb);
 431     if (sar_present) {
 432         uint8_t sar_idx = get_bits(gb, 8);
 433         if (sar_idx < FF_ARRAY_ELEMS(vui_sar))
 434             vui->sar = vui_sar[sar_idx];
 435         else if (sar_idx == 255) {
 436             vui->sar.num = get_bits(gb, 16);
 437             vui->sar.den = get_bits(gb, 16);
 438         } else
 439             av_log(s->avctx, AV_LOG_WARNING,
 440                    "Unknown SAR index: %u.\n", sar_idx);
 441     }
 442
 443     vui->overscan_info_present_flag = get_bits1(gb);
 444     if (vui->overscan_info_present_flag)
 445         vui->overscan_appropriate_flag = get_bits1(gb);
 446
 447     vui->video_signal_type_present_flag = get_bits1(gb);
 448     if (vui->video_signal_type_present_flag) {
 449         vui->video_format                    = get_bits(gb, 3);
 450         vui->video_full_range_flag           = get_bits1(gb);
 451         vui->colour_description_present_flag = get_bits1(gb);
 452         if (vui->video_full_range_flag && sps->pix_fmt == AV_PIX_FMT_YUV420P)
 453             sps->pix_fmt = AV_PIX_FMT_YUVJ420P;
 454         if (vui->colour_description_present_flag) {
 455             vui->colour_primaries        = get_bits(gb, 8);
 456             vui->transfer_characteristic = get_bits(gb, 8);
 457             vui->matrix_coeffs           = get_bits(gb, 8);
 458
 459             // Set invalid values to "unspecified"
 460             if (vui->colour_primaries >= AVCOL_PRI_NB)
 461                 vui->colour_primaries = AVCOL_PRI_UNSPECIFIED;
 462             if (vui->transfer_characteristic >= AVCOL_TRC_NB)
 463                 vui->transfer_characteristic = AVCOL_TRC_UNSPECIFIED;
 464             if (vui->matrix_coeffs >= AVCOL_SPC_NB)
 465                 vui->matrix_coeffs = AVCOL_SPC_UNSPECIFIED;
 466         }
 467     }
 468
 469     vui->chroma_loc_info_present_flag = get_bits1(gb);
 470     if (vui->chroma_loc_info_present_flag) {
 471         vui->chroma_sample_loc_type_top_field    = get_ue_golomb_long(gb);
 472         vui->chroma_sample_loc_type_bottom_field = get_ue_golomb_long(gb);
 473     }
 474
 475     vui->neutra_chroma_indication_flag = get_bits1(gb);
 476     vui->field_seq_flag                = get_bits1(gb);
 477     vui->frame_field_info_present_flag = get_bits1(gb);
 478
 479     vui->default_display_window_flag = get_bits1(gb);
 480     if (vui->default_display_window_flag) {
 481         //TODO: * 2 is only valid for 420
 482         vui->def_disp_win.left_offset   = get_ue_golomb_long(gb) * 2;
 483         vui->def_disp_win.right_offset  = get_ue_golomb_long(gb) * 2;
 484         vui->def_disp_win.top_offset    = get_ue_golomb_long(gb) * 2;
 485         vui->def_disp_win.bottom_offset = get_ue_golomb_long(gb) * 2;
 486
 487         if (s->apply_defdispwin &&
 488             s->avctx->flags2 & CODEC_FLAG2_IGNORE_CROP) {
 489             av_log(s->avctx, AV_LOG_DEBUG,
 490                    "discarding vui default display window, "
 491                    "original values are l:%u r:%u t:%u b:%u\n",
 492                    vui->def_disp_win.left_offset,
 493                    vui->def_disp_win.right_offset,
 494                    vui->def_disp_win.top_offset,
 495                    vui->def_disp_win.bottom_offset);
 496
 497             vui->def_disp_win.left_offset   =
 498             vui->def_disp_win.right_offset  =
 499             vui->def_disp_win.top_offset    =
 500             vui->def_disp_win.bottom_offset = 0;
 501         }
 502     }
 503
 504     vui->vui_timing_info_present_flag = get_bits1(gb);
 505     if (vui->vui_timing_info_present_flag) {
 506         vui->vui_num_units_in_tick               = get_bits(gb, 32);
 507         vui->vui_time_scale                      = get_bits(gb, 32);
 508         vui->vui_poc_proportional_to_timing_flag = get_bits1(gb);
 509         if (vui->vui_poc_proportional_to_timing_flag)
 510             vui->vui_num_ticks_poc_diff_one_minus1 = get_ue_golomb_long(gb);
 511         vui->vui_hrd_parameters_present_flag = get_bits1(gb);
 512         if (vui->vui_hrd_parameters_present_flag)
 513             decode_hrd(s, 1, sps->max_sub_layers);
 514     }
 515
 516     vui->bitstream_restriction_flag = get_bits1(gb);
 517     if (vui->bitstream_restriction_flag) {
 518         vui->tiles_fixed_structure_flag              = get_bits1(gb);
 519         vui->motion_vectors_over_pic_boundaries_flag = get_bits1(gb);
 520         vui->restricted_ref_pic_lists_flag           = get_bits1(gb);
 521         vui->min_spatial_segmentation_idc            = get_ue_golomb_long(gb);
 522         vui->max_bytes_per_pic_denom                 = get_ue_golomb_long(gb);
 523         vui->max_bits_per_min_cu_denom               = get_ue_golomb_long(gb);
 524         vui->log2_max_mv_length_horizontal           = get_ue_golomb_long(gb);
 525         vui->log2_max_mv_length_vertical             = get_ue_golomb_long(gb);
 526     }
 527 }
 528
 529 static void set_default_scaling_list_data(ScalingList *sl)
 530 {
 531     int matrixId;
 532
 533     for (matrixId = 0; matrixId < 6; matrixId++) {
 534         // 4x4 default is 16
 535         memset(sl->sl[0][matrixId], 16, 16);
 536         sl->sl_dc[0][matrixId] = 16; // default for 16x16
 537         sl->sl_dc[1][matrixId] = 16; // default for 32x32
 538     }
 539     memcpy(sl->sl[1][0], default_scaling_list_intra, 64);
 540     memcpy(sl->sl[1][1], default_scaling_list_intra, 64);
 541     memcpy(sl->sl[1][2], default_scaling_list_intra, 64);
 542     memcpy(sl->sl[1][3], default_scaling_list_inter, 64);
 543     memcpy(sl->sl[1][4], default_scaling_list_inter, 64);
 544     memcpy(sl->sl[1][5], default_scaling_list_inter, 64);
 545     memcpy(sl->sl[2][0], default_scaling_list_intra, 64);
 546     memcpy(sl->sl[2][1], default_scaling_list_intra, 64);
 547     memcpy(sl->sl[2][2], default_scaling_list_intra, 64);
 548     memcpy(sl->sl[2][3], default_scaling_list_inter, 64);
 549     memcpy(sl->sl[2][4], default_scaling_list_inter, 64);
 550     memcpy(sl->sl[2][5], default_scaling_list_inter, 64);
 551     memcpy(sl->sl[3][0], default_scaling_list_intra, 64);
 552     memcpy(sl->sl[3][1], default_scaling_list_inter, 64);
 553 }
 554
 555 static int scaling_list_data(HEVCContext *s, ScalingList *sl)
 556 {
 557     GetBitContext *gb = &s->HEVClc.gb;
 558     uint8_t scaling_list_pred_mode_flag[4][6];
 559     int32_t scaling_list_dc_coef[2][6];
 560     int size_id, matrix_id, i, pos, delta;
 561
 562     for (size_id = 0; size_id < 4; size_id++)
 563         for (matrix_id = 0; matrix_id < (size_id == 3 ? 2 : 6); matrix_id++) {
 564             scaling_list_pred_mode_flag[size_id][matrix_id] = get_bits1(gb);
 565             if (!scaling_list_pred_mode_flag[size_id][matrix_id]) {
 566                 delta = get_ue_golomb_long(gb);
 567                 /* Only need to handle non-zero delta. Zero means default,
 568                  * which should already be in the arrays. */
 569                 if (delta) {
 570                     // Copy from previous array.
 571                     if (matrix_id - delta < 0) {
 572                         av_log(s->avctx, AV_LOG_ERROR,
 573                                "Invalid delta in scaling list data: %d.\n", delta);
 574                         return AVERROR_INVALIDDATA;
 575                     }
 576
 577                     memcpy(sl->sl[size_id][matrix_id],
 578                            sl->sl[size_id][matrix_id - delta],
 579                            size_id > 0 ? 64 : 16);
 580                     if (size_id > 1)
 581                         sl->sl_dc[size_id - 2][matrix_id] = sl->sl_dc[size_id - 2][matrix_id - delta];
 582                 }
 583             } else {
 584                 int next_coef, coef_num;
 585                 int32_t scaling_list_delta_coef;
 586
 587                 next_coef = 8;
 588                 coef_num  = FFMIN(64, 1 << (4 + (size_id << 1)));
 589                 if (size_id > 1) {
 590                     scaling_list_dc_coef[size_id - 2][matrix_id] = get_se_golomb(gb) + 8;
 591                     next_coef = scaling_list_dc_coef[size_id - 2][matrix_id];
 592                     sl->sl_dc[size_id - 2][matrix_id] = next_coef;
 593                 }
 594                 for (i = 0; i < coef_num; i++) {
 595                     if (size_id == 0)
 596                         pos = 4 * ff_hevc_diag_scan4x4_y[i] +
 597                                   ff_hevc_diag_scan4x4_x[i];
 598                     else
 599                         pos = 8 * ff_hevc_diag_scan8x8_y[i] +
 600                                   ff_hevc_diag_scan8x8_x[i];
 601
 602                     scaling_list_delta_coef = get_se_golomb(gb);
 603                     next_coef = (next_coef + scaling_list_delta_coef + 256) % 256;
 604                     sl->sl[size_id][matrix_id][pos] = next_coef;
 605                 }
 606             }
 607         }
 608
 609     return 0;
 610 }
 611
 612 int ff_hevc_decode_nal_sps(HEVCContext *s)
 613 {
 614     const AVPixFmtDescriptor *desc;
 615     GetBitContext *gb = &s->HEVClc.gb;
 616     int ret    = 0;
 617     int sps_id = 0;
 618     int log2_diff_max_min_transform_block_size;
 619     int bit_depth_chroma, start, vui_present, sublayer_ordering_info;
 620     int i;
 621
 622     HEVCSPS *sps;
 623     AVBufferRef *sps_buf = av_buffer_allocz(sizeof(*sps));
 624
 625     if (!sps_buf)
 626         return AVERROR(ENOMEM);
 627     sps = (HEVCSPS*)sps_buf->data;
 628
 629     av_log(s->avctx, AV_LOG_DEBUG, "Decoding SPS\n");
 630
 631     // Coded parameters
 632
 633     sps->vps_id = get_bits(gb, 4);
 634     if (sps->vps_id >= MAX_VPS_COUNT) {
 635         av_log(s->avctx, AV_LOG_ERROR, "VPS id out of range: %d\n", sps->vps_id);
 636         ret = AVERROR_INVALIDDATA;
 637         goto err;
 638     }
 639
 640     sps->max_sub_layers = get_bits(gb, 3) + 1;
 641     if (sps->max_sub_layers > MAX_SUB_LAYERS) {
 642         av_log(s->avctx, AV_LOG_ERROR, "sps_max_sub_layers out of range: %d\n",
 643                sps->max_sub_layers);
 644         ret = AVERROR_INVALIDDATA;
 645         goto err;
 646     }
 647
 648     skip_bits1(gb); // temporal_id_nesting_flag
 649     if (decode_profile_tier_level(&s->HEVClc, &sps->ptl,
 650                                   sps->max_sub_layers) < 0) {
 651         av_log(s->avctx, AV_LOG_ERROR, "error decoding profile tier level\n");
 652         ret = AVERROR_INVALIDDATA;
 653         goto err;
 654     }
 655     sps_id = get_ue_golomb_long(gb);
 656     if (sps_id >= MAX_SPS_COUNT) {
 657         av_log(s->avctx, AV_LOG_ERROR, "SPS id out of range: %d\n", sps_id);
 658         ret = AVERROR_INVALIDDATA;
 659         goto err;
 660     }
 661
 662     sps->chroma_format_idc = get_ue_golomb_long(gb);
 663     if (sps->chroma_format_idc != 1) {
 664         avpriv_report_missing_feature(s->avctx, "chroma_format_idc != 1\n");
 665         ret = AVERROR_PATCHWELCOME;
 666         goto err;
 667     }
 668
 669     if (sps->chroma_format_idc == 3)
 670         sps->separate_colour_plane_flag = get_bits1(gb);
 671
 672     sps->width  = get_ue_golomb_long(gb);
 673     sps->height = get_ue_golomb_long(gb);
 674     if ((ret = av_image_check_size(sps->width,
 675                                    sps->height, 0, s->avctx)) < 0)
 676         goto err;
 677
 678     if (get_bits1(gb)) { // pic_conformance_flag
 679         //TODO: * 2 is only valid for 420
 680         sps->pic_conf_win.left_offset   = get_ue_golomb_long(gb) * 2;
 681         sps->pic_conf_win.right_offset  = get_ue_golomb_long(gb) * 2;
 682         sps->pic_conf_win.top_offset    = get_ue_golomb_long(gb) * 2;
 683         sps->pic_conf_win.bottom_offset = get_ue_golomb_long(gb) * 2;
 684
 685         if (s->avctx->flags2 & CODEC_FLAG2_IGNORE_CROP) {
 686             av_log(s->avctx, AV_LOG_DEBUG,
 687                    "discarding sps conformance window, "
 688                    "original values are l:%u r:%u t:%u b:%u\n",
 689                    sps->pic_conf_win.left_offset,
 690                    sps->pic_conf_win.right_offset,
 691                    sps->pic_conf_win.top_offset,
 692                    sps->pic_conf_win.bottom_offset);
 693
 694             sps->pic_conf_win.left_offset   =
 695             sps->pic_conf_win.right_offset  =
 696             sps->pic_conf_win.top_offset    =
 697             sps->pic_conf_win.bottom_offset = 0;
 698         }
 699         sps->output_window = sps->pic_conf_win;
 700     }
 701
 702     sps->bit_depth   = get_ue_golomb_long(gb) + 8;
 703     bit_depth_chroma = get_ue_golomb_long(gb) + 8;
 704     if (bit_depth_chroma != sps->bit_depth) {
 705         av_log(s->avctx, AV_LOG_ERROR,
 706                "Luma bit depth (%d) is different from chroma bit depth (%d), "
 707                "this is unsupported.\n",
 708                sps->bit_depth, bit_depth_chroma);
 709         ret = AVERROR_INVALIDDATA;
 710         goto err;
 711     }
 712
 713     if (sps->chroma_format_idc == 1) {
 714         switch (sps->bit_depth) {
 715         case 8:  sps->pix_fmt = AV_PIX_FMT_YUV420P;   break;
 716         case 9:  sps->pix_fmt = AV_PIX_FMT_YUV420P9;  break;
 717         case 10: sps->pix_fmt = AV_PIX_FMT_YUV420P10; break;
 718         default:
 719             av_log(s->avctx, AV_LOG_ERROR, "Unsupported bit depth: %d\n",
 720                    sps->bit_depth);
 721             ret = AVERROR_PATCHWELCOME;
 722             goto err;
 723         }
 724     } else {
 725         av_log(s->avctx, AV_LOG_ERROR,
 726                "non-4:2:0 support is currently unspecified.\n");
 727         return AVERROR_PATCHWELCOME;
 728     }
 729
 730     desc = av_pix_fmt_desc_get(sps->pix_fmt);
 731     if (!desc) {
 732         ret = AVERROR(EINVAL);
 733         goto err;
 734     }
 735
 736     sps->hshift[0] = sps->vshift[0] = 0;
 737     sps->hshift[2] = sps->hshift[1] = desc->log2_chroma_w;
 738     sps->vshift[2] = sps->vshift[1] = desc->log2_chroma_h;
 739
 740     sps->pixel_shift = sps->bit_depth > 8;
 741
 742     sps->log2_max_poc_lsb = get_ue_golomb_long(gb) + 4;
 743     if (sps->log2_max_poc_lsb > 16) {
 744         av_log(s->avctx, AV_LOG_ERROR, "log2_max_pic_order_cnt_lsb_minus4 out range: %d\n",
 745                sps->log2_max_poc_lsb - 4);
 746         ret = AVERROR_INVALIDDATA;
 747         goto err;
 748     }
 749
 750     sublayer_ordering_info = get_bits1(gb);
 751     start = sublayer_ordering_info ? 0 : sps->max_sub_layers - 1;
 752     for (i = start; i < sps->max_sub_layers; i++) {
 753         sps->temporal_layer[i].max_dec_pic_buffering = get_ue_golomb_long(gb) + 1;
 754         sps->temporal_layer[i].num_reorder_pics      = get_ue_golomb_long(gb);
 755         sps->temporal_layer[i].max_latency_increase  = get_ue_golomb_long(gb) - 1;
 756         if (sps->temporal_layer[i].max_dec_pic_buffering > MAX_DPB_SIZE) {
 757             av_log(s->avctx, AV_LOG_ERROR, "sps_max_dec_pic_buffering_minus1 out of range: %d\n",
 758                    sps->temporal_layer[i].max_dec_pic_buffering - 1);
 759             ret = AVERROR_INVALIDDATA;
 760             goto err;
 761         }
 762         if (sps->temporal_layer[i].num_reorder_pics > sps->temporal_layer[i].max_dec_pic_buffering - 1) {
 763             av_log(s->avctx, AV_LOG_ERROR, "sps_max_num_reorder_pics out of range: %d\n",
 764                    sps->temporal_layer[i].num_reorder_pics);
 765             ret = AVERROR_INVALIDDATA;
 766             goto err;
 767         }
 768     }
 769
 770     if (!sublayer_ordering_info) {
 771         for (i = 0; i < start; i++) {
 772             sps->temporal_layer[i].max_dec_pic_buffering = sps->temporal_layer[start].max_dec_pic_buffering;
 773             sps->temporal_layer[i].num_reorder_pics      = sps->temporal_layer[start].num_reorder_pics;
 774             sps->temporal_layer[i].max_latency_increase  = sps->temporal_layer[start].max_latency_increase;
 775         }
 776     }
 777
 778     sps->log2_min_cb_size                    = get_ue_golomb_long(gb) + 3;
 779     sps->log2_diff_max_min_coding_block_size = get_ue_golomb_long(gb);
 780     sps->log2_min_tb_size                    = get_ue_golomb_long(gb) + 2;
 781     log2_diff_max_min_transform_block_size   = get_ue_golomb_long(gb);
 782     sps->log2_max_trafo_size                 = log2_diff_max_min_transform_block_size +
 783                                                sps->log2_min_tb_size;
 784
 785     if (sps->log2_min_tb_size >= sps->log2_min_cb_size) {
 786         av_log(s->avctx, AV_LOG_ERROR, "Invalid value for log2_min_tb_size");
 787         ret = AVERROR_INVALIDDATA;
 788         goto err;
 789     }
 790     sps->max_transform_hierarchy_depth_inter = get_ue_golomb_long(gb);
 791     sps->max_transform_hierarchy_depth_intra = get_ue_golomb_long(gb);
 792
 793     sps->scaling_list_enable_flag = get_bits1(gb);
 794     if (sps->scaling_list_enable_flag) {
 795         set_default_scaling_list_data(&sps->scaling_list);
 796
 797         if (get_bits1(gb)) {
 798             ret = scaling_list_data(s, &sps->scaling_list);
 799             if (ret < 0)
 800                 goto err;
 801         }
 802     }
 803
 804     sps->amp_enabled_flag = get_bits1(gb);
 805     sps->sao_enabled      = get_bits1(gb);
 806
 807     sps->pcm_enabled_flag = get_bits1(gb);
 808     if (sps->pcm_enabled_flag) {
 809         int pcm_bit_depth_chroma;
 810         sps->pcm.bit_depth   = get_bits(gb, 4) + 1;
 811         pcm_bit_depth_chroma = get_bits(gb, 4) + 1;
 812         if (pcm_bit_depth_chroma != sps->pcm.bit_depth) {
 813             av_log(s->avctx, AV_LOG_ERROR,
 814                    "PCM Luma bit depth (%d) is different from PCM chroma"
 815                    "bit depth (%d), this is unsupported.\n",
 816                    sps->pcm.bit_depth, pcm_bit_depth_chroma);
 817             ret = AVERROR_INVALIDDATA;
 818             goto err;
 819         }
 820
 821         sps->pcm.log2_min_pcm_cb_size = get_ue_golomb_long(gb) + 3;
 822         sps->pcm.log2_max_pcm_cb_size = sps->pcm.log2_min_pcm_cb_size +
 823                                         get_ue_golomb_long(gb);
 824         if (sps->pcm.bit_depth > sps->bit_depth) {
 825             av_log(s->avctx, AV_LOG_ERROR,
 826                    "PCM bit depth (%d) is greater than normal bit depth (%d)\n",
 827                    sps->pcm.bit_depth, sps->bit_depth);
 828             ret = AVERROR_INVALIDDATA;
 829             goto err;
 830         }
 831
 832         sps->pcm.loop_filter_disable_flag = get_bits1(gb);
 833     }
 834
 835     sps->nb_st_rps = get_ue_golomb_long(gb);
 836     if (sps->nb_st_rps > MAX_SHORT_TERM_RPS_COUNT) {
 837         av_log(s->avctx, AV_LOG_ERROR, "Too many short term RPS: %d.\n",
 838                sps->nb_st_rps);
 839         ret = AVERROR_INVALIDDATA;
 840         goto err;
 841     }
 842     for (i = 0; i < sps->nb_st_rps; i++) {
 843         if ((ret = ff_hevc_decode_short_term_rps(s, &sps->st_rps[i],
 844                                                  sps, 0)) < 0)
 845             goto err;
 846     }
 847
 848     sps->long_term_ref_pics_present_flag = get_bits1(gb);
 849     if (sps->long_term_ref_pics_present_flag) {
 850         sps->num_long_term_ref_pics_sps = get_ue_golomb_long(gb);
 851         for (i = 0; i < sps->num_long_term_ref_pics_sps; i++) {
 852             sps->lt_ref_pic_poc_lsb_sps[i]       = get_bits(gb, sps->log2_max_poc_lsb);
 853             sps->used_by_curr_pic_lt_sps_flag[i] = get_bits1(gb);
 854         }
 855     }
 856
 857     sps->sps_temporal_mvp_enabled_flag          = get_bits1(gb);
 858     sps->sps_strong_intra_smoothing_enable_flag = get_bits1(gb);
 859     sps->vui.sar = (AVRational){0, 1};
 860     vui_present = get_bits1(gb);
 861     if (vui_present)
 862         decode_vui(s, sps);
 863     skip_bits1(gb); // sps_extension_flag
 864
 865     if (s->apply_defdispwin) {
 866         sps->output_window.left_offset   += sps->vui.def_disp_win.left_offset;
 867         sps->output_window.right_offset  += sps->vui.def_disp_win.right_offset;
 868         sps->output_window.top_offset    += sps->vui.def_disp_win.top_offset;
 869         sps->output_window.bottom_offset += sps->vui.def_disp_win.bottom_offset;
 870     }
 871     if (sps->output_window.left_offset & (0x1F >> (sps->pixel_shift)) &&
 872         !(s->avctx->flags & CODEC_FLAG_UNALIGNED)) {
 873         sps->output_window.left_offset &= ~(0x1F >> (sps->pixel_shift));
 874         av_log(s->avctx, AV_LOG_WARNING, "Reducing left output window to %d "
 875                "chroma samples to preserve alignment.\n",
 876                sps->output_window.left_offset);
 877     }
 878     sps->output_width  = sps->width -
 879                          (sps->output_window.left_offset + sps->output_window.right_offset);
 880     sps->output_height = sps->height -
 881                          (sps->output_window.top_offset + sps->output_window.bottom_offset);
 882     if (sps->output_width <= 0 || sps->output_height <= 0) {
 883         av_log(s->avctx, AV_LOG_WARNING, "Invalid visible frame dimensions: %dx%d.\n",
 884                sps->output_width, sps->output_height);
 885         if (s->avctx->err_recognition & AV_EF_EXPLODE) {
 886             ret = AVERROR_INVALIDDATA;
 887             goto err;
 888         }
 889         av_log(s->avctx, AV_LOG_WARNING,
 890                "Displaying the whole video surface.\n");
 891         sps->pic_conf_win.left_offset   =
 892         sps->pic_conf_win.right_offset  =
 893         sps->pic_conf_win.top_offset    =
 894         sps->pic_conf_win.bottom_offset = 0;
 895         sps->output_width               = sps->width;
 896         sps->output_height              = sps->height;
 897     }
 898
 899     // Inferred parameters
 900     sps->log2_ctb_size = sps->log2_min_cb_size +
 901                          sps->log2_diff_max_min_coding_block_size;
 902     sps->log2_min_pu_size = sps->log2_min_cb_size - 1;
 903
 904     sps->ctb_width  = (sps->width  + (1 << sps->log2_ctb_size) - 1) >> sps->log2_ctb_size;
 905     sps->ctb_height = (sps->height + (1 << sps->log2_ctb_size) - 1) >> sps->log2_ctb_size;
 906     sps->ctb_size   = sps->ctb_width * sps->ctb_height;
 907
 908     sps->min_cb_width  = sps->width  >> sps->log2_min_cb_size;
 909     sps->min_cb_height = sps->height >> sps->log2_min_cb_size;
 910     sps->min_tb_width  = sps->width  >> sps->log2_min_tb_size;
 911     sps->min_tb_height = sps->height >> sps->log2_min_tb_size;
 912     sps->min_pu_width  = sps->width  >> sps->log2_min_pu_size;
 913     sps->min_pu_height = sps->height >> sps->log2_min_pu_size;
 914
 915     sps->qp_bd_offset = 6 * (sps->bit_depth - 8);
 916
 917     if (sps->width  & ((1 << sps->log2_min_cb_size) - 1) ||
 918         sps->height & ((1 << sps->log2_min_cb_size) - 1)) {
 919         av_log(s->avctx, AV_LOG_ERROR, "Invalid coded frame dimensions.\n");
 920         goto err;
 921     }
 922
 923     if (sps->log2_ctb_size > MAX_LOG2_CTB_SIZE) {
 924         av_log(s->avctx, AV_LOG_ERROR, "CTB size out of range: 2^%d\n", sps->log2_ctb_size);
 925         goto err;
 926     }
 927     if (sps->max_transform_hierarchy_depth_inter > sps->log2_ctb_size - sps->log2_min_tb_size) {
 928         av_log(s->avctx, AV_LOG_ERROR, "max_transform_hierarchy_depth_inter out of range: %d\n",
 929                sps->max_transform_hierarchy_depth_inter);
 930         goto err;
 931     }
 932     if (sps->max_transform_hierarchy_depth_intra > sps->log2_ctb_size - sps->log2_min_tb_size) {
 933         av_log(s->avctx, AV_LOG_ERROR, "max_transform_hierarchy_depth_intra out of range: %d\n",
 934                sps->max_transform_hierarchy_depth_intra);
 935         goto err;
 936     }
 937     if (sps->log2_max_trafo_size > FFMIN(sps->log2_ctb_size, 5)) {
 938         av_log(s->avctx, AV_LOG_ERROR,
 939                "max transform block size out of range: %d\n",
 940                sps->log2_max_trafo_size);
 941         goto err;
 942     }
 943
 944     if (s->avctx->debug & FF_DEBUG_BITSTREAM) {
 945         av_log(s->avctx, AV_LOG_DEBUG,
 946                "Parsed SPS: id %d; coded wxh: %dx%d; "
 947                "cropped wxh: %dx%d; pix_fmt: %s.\n",
 948                sps_id, sps->width, sps->height,
 949                sps->output_width, sps->output_height,
 950                av_get_pix_fmt_name(sps->pix_fmt));
 951     }
 952
 953     /* check if this is a repeat of an already parsed SPS, then keep the
 954      * original one.
 955      * otherwise drop all PPSes that depend on it */
 956     if (s->sps_list[sps_id] &&
 957         !memcmp(s->sps_list[sps_id]->data, sps_buf->data, sps_buf->size)) {
 958         av_buffer_unref(&sps_buf);
 959     } else {
 960         for (i = 0; i < FF_ARRAY_ELEMS(s->pps_list); i++) {
 961             if (s->pps_list[i] && ((HEVCPPS*)s->pps_list[i]->data)->sps_id == sps_id)
 962                 av_buffer_unref(&s->pps_list[i]);
 963         }
 964         av_buffer_unref(&s->sps_list[sps_id]);
 965         s->sps_list[sps_id] = sps_buf;
 966     }
 967
 968     return 0;
 969
 970 err:
 971     av_buffer_unref(&sps_buf);
 972     return ret;
 973 }
 974
 975 static void hevc_pps_free(void *opaque, uint8_t *data)
 976 {
 977     HEVCPPS *pps = (HEVCPPS*)data;
 978
 979     av_freep(&pps->column_width);
 980     av_freep(&pps->row_height);
 981     av_freep(&pps->col_bd);
 982     av_freep(&pps->row_bd);
 983     av_freep(&pps->col_idxX);
 984     av_freep(&pps->ctb_addr_rs_to_ts);
 985     av_freep(&pps->ctb_addr_ts_to_rs);
 986     av_freep(&pps->tile_pos_rs);
 987     av_freep(&pps->tile_id);
 988     av_freep(&pps->min_cb_addr_zs);
 989     av_freep(&pps->min_tb_addr_zs);
 990
 991     av_freep(&pps);
 992 }
 993
 994 int ff_hevc_decode_nal_pps(HEVCContext *s)
 995 {
 996     GetBitContext *gb = &s->HEVClc.gb;
 997     HEVCSPS      *sps = NULL;
 998     int pic_area_in_ctbs, pic_area_in_min_cbs, pic_area_in_min_tbs;
 999     int log2_diff_ctb_min_tb_size;
1000     int i, j, x, y, ctb_addr_rs, tile_id;
1001     int ret    = 0;
1002     int pps_id = 0;
1003
1004     AVBufferRef *pps_buf;
1005     HEVCPPS *pps = av_mallocz(sizeof(*pps));
1006
1007     if (!pps)
1008         return AVERROR(ENOMEM);
1009
1010     pps_buf = av_buffer_create((uint8_t *)pps, sizeof(*pps),
1011                                hevc_pps_free, NULL, 0);
1012     if (!pps_buf) {
1013         av_freep(&pps);
1014         return AVERROR(ENOMEM);
1015     }
1016
1017     av_log(s->avctx, AV_LOG_DEBUG, "Decoding PPS\n");
1018
1019     // Default values
1020     pps->loop_filter_across_tiles_enabled_flag = 1;
1021     pps->num_tile_columns                      = 1;
1022     pps->num_tile_rows                         = 1;
1023     pps->uniform_spacing_flag                  = 1;
1024     pps->disable_dbf                           = 0;
1025     pps->beta_offset                           = 0;
1026     pps->tc_offset                             = 0;
1027
1028     // Coded parameters
1029     pps_id = get_ue_golomb_long(gb);
1030     if (pps_id >= MAX_PPS_COUNT) {
1031         av_log(s->avctx, AV_LOG_ERROR, "PPS id out of range: %d\n", pps_id);
1032         ret = AVERROR_INVALIDDATA;
1033         goto err;
1034     }
1035     pps->sps_id = get_ue_golomb_long(gb);
1036     if (pps->sps_id >= MAX_SPS_COUNT) {
1037         av_log(s->avctx, AV_LOG_ERROR, "SPS id out of range: %d\n", pps->sps_id);
1038         ret = AVERROR_INVALIDDATA;
1039         goto err;
1040     }
1041     if (!s->sps_list[pps->sps_id]) {
1042         av_log(s->avctx, AV_LOG_ERROR, "SPS does not exist \n");
1043         ret = AVERROR_INVALIDDATA;
1044         goto err;
1045     }
1046     sps = (HEVCSPS *)s->sps_list[pps->sps_id]->data;
1047
1048     pps->dependent_slice_segments_enabled_flag = get_bits1(gb);
1049     pps->output_flag_present_flag              = get_bits1(gb);
1050     pps->num_extra_slice_header_bits           = get_bits(gb, 3);
1051
1052     pps->sign_data_hiding_flag = get_bits1(gb);
1053
1054     pps->cabac_init_present_flag = get_bits1(gb);
1055
1056     pps->num_ref_idx_l0_default_active = get_ue_golomb_long(gb) + 1;
1057     pps->num_ref_idx_l1_default_active = get_ue_golomb_long(gb) + 1;
1058
1059     pps->pic_init_qp_minus26 = get_se_golomb(gb);
1060
1061     pps->constrained_intra_pred_flag = get_bits1(gb);
1062     pps->transform_skip_enabled_flag = get_bits1(gb);
1063
1064     pps->cu_qp_delta_enabled_flag = get_bits1(gb);
1065     pps->diff_cu_qp_delta_depth   = 0;
1066     if (pps->cu_qp_delta_enabled_flag)
1067         pps->diff_cu_qp_delta_depth = get_ue_golomb_long(gb);
1068
1069     pps->cb_qp_offset = get_se_golomb(gb);
1070     if (pps->cb_qp_offset < -12 || pps->cb_qp_offset > 12) {
1071         av_log(s->avctx, AV_LOG_ERROR, "pps_cb_qp_offset out of range: %d\n",
1072                pps->cb_qp_offset);
1073         ret = AVERROR_INVALIDDATA;
1074         goto err;
1075     }
1076     pps->cr_qp_offset = get_se_golomb(gb);
1077     if (pps->cr_qp_offset < -12 || pps->cr_qp_offset > 12) {
1078         av_log(s->avctx, AV_LOG_ERROR, "pps_cr_qp_offset out of range: %d\n",
1079                pps->cr_qp_offset);
1080         ret = AVERROR_INVALIDDATA;
1081         goto err;
1082     }
1083     pps->pic_slice_level_chroma_qp_offsets_present_flag = get_bits1(gb);
1084
1085     pps->weighted_pred_flag   = get_bits1(gb);
1086     pps->weighted_bipred_flag = get_bits1(gb);
1087
1088     pps->transquant_bypass_enable_flag    = get_bits1(gb);
1089     pps->tiles_enabled_flag               = get_bits1(gb);
1090     pps->entropy_coding_sync_enabled_flag = get_bits1(gb);
1091
1092     if (pps->tiles_enabled_flag) {
1093         pps->num_tile_columns = get_ue_golomb_long(gb) + 1;
1094         pps->num_tile_rows    = get_ue_golomb_long(gb) + 1;
1095         if (pps->num_tile_columns == 0 ||
1096             pps->num_tile_columns >= sps->width) {
1097             av_log(s->avctx, AV_LOG_ERROR, "num_tile_columns_minus1 out of range: %d\n",
1098                    pps->num_tile_columns - 1);
1099             ret = AVERROR_INVALIDDATA;
1100             goto err;
1101         }
1102         if (pps->num_tile_rows == 0 ||
1103             pps->num_tile_rows >= sps->height) {
1104             av_log(s->avctx, AV_LOG_ERROR, "num_tile_rows_minus1 out of range: %d\n",
1105                    pps->num_tile_rows - 1);
1106             ret = AVERROR_INVALIDDATA;
1107             goto err;
1108         }
1109
1110         pps->column_width = av_malloc_array(pps->num_tile_columns, sizeof(*pps->column_width));
1111         pps->row_height   = av_malloc_array(pps->num_tile_rows,    sizeof(*pps->row_height));
1112         if (!pps->column_width || !pps->row_height) {
1113             ret = AVERROR(ENOMEM);
1114             goto err;
1115         }
1116
1117         pps->uniform_spacing_flag = get_bits1(gb);
1118         if (!pps->uniform_spacing_flag) {
1119             int sum = 0;
1120             for (i = 0; i < pps->num_tile_columns - 1; i++) {
1121                 pps->column_width[i] = get_ue_golomb_long(gb) + 1;
1122                 sum                 += pps->column_width[i];
1123             }
1124             if (sum >= sps->ctb_width) {
1125                 av_log(s->avctx, AV_LOG_ERROR, "Invalid tile widths.\n");
1126                 ret = AVERROR_INVALIDDATA;
1127                 goto err;
1128             }
1129             pps->column_width[pps->num_tile_columns - 1] = sps->ctb_width - sum;
1130
1131             sum = 0;
1132             for (i = 0; i < pps->num_tile_rows - 1; i++) {
1133                 pps->row_height[i] = get_ue_golomb_long(gb) + 1;
1134                 sum               += pps->row_height[i];
1135             }
1136             if (sum >= sps->ctb_height) {
1137                 av_log(s->avctx, AV_LOG_ERROR, "Invalid tile heights.\n");
1138                 ret = AVERROR_INVALIDDATA;
1139                 goto err;
1140             }
1141             pps->row_height[pps->num_tile_rows - 1] = sps->ctb_height - sum;
1142         }
1143         pps->loop_filter_across_tiles_enabled_flag = get_bits1(gb);
1144     }
1145
1146     pps->seq_loop_filter_across_slices_enabled_flag = get_bits1(gb);
1147
1148     pps->deblocking_filter_control_present_flag = get_bits1(gb);
1149     if (pps->deblocking_filter_control_present_flag) {
1150         pps->deblocking_filter_override_enabled_flag = get_bits1(gb);
1151         pps->disable_dbf                             = get_bits1(gb);
1152         if (!pps->disable_dbf) {
1153             pps->beta_offset = get_se_golomb(gb) * 2;
1154             pps->tc_offset = get_se_golomb(gb) * 2;
1155             if (pps->beta_offset/2 < -6 || pps->beta_offset/2 > 6) {
1156                 av_log(s->avctx, AV_LOG_ERROR, "pps_beta_offset_div2 out of range: %d\n",
1157                        pps->beta_offset/2);
1158                 ret = AVERROR_INVALIDDATA;
1159                 goto err;
1160             }
1161             if (pps->tc_offset/2 < -6 || pps->tc_offset/2 > 6) {
1162                 av_log(s->avctx, AV_LOG_ERROR, "pps_tc_offset_div2 out of range: %d\n",
1163                        pps->tc_offset/2);
1164                 ret = AVERROR_INVALIDDATA;
1165                 goto err;
1166             }
1167         }
1168     }
1169
1170     pps->scaling_list_data_present_flag = get_bits1(gb);
1171     if (pps->scaling_list_data_present_flag) {
1172         set_default_scaling_list_data(&pps->scaling_list);
1173         ret = scaling_list_data(s, &pps->scaling_list);
1174         if (ret < 0)
1175             goto err;
1176     }
1177     pps->lists_modification_present_flag = get_bits1(gb);
1178     pps->log2_parallel_merge_level       = get_ue_golomb_long(gb) + 2;
1179     if (pps->log2_parallel_merge_level > sps->log2_ctb_size) {
1180         av_log(s->avctx, AV_LOG_ERROR, "log2_parallel_merge_level_minus2 out of range: %d\n",
1181                pps->log2_parallel_merge_level - 2);
1182         ret = AVERROR_INVALIDDATA;
1183         goto err;
1184     }
1185
1186     pps->slice_header_extension_present_flag = get_bits1(gb);
1187     skip_bits1(gb);     // pps_extension_flag
1188
1189     // Inferred parameters
1190     pps->col_bd   = av_malloc_array(pps->num_tile_columns + 1, sizeof(*pps->col_bd));
1191     pps->row_bd   = av_malloc_array(pps->num_tile_rows + 1,    sizeof(*pps->row_bd));
1192     pps->col_idxX = av_malloc_array(sps->ctb_width,    sizeof(*pps->col_idxX));
1193     if (!pps->col_bd || !pps->row_bd || !pps->col_idxX) {
1194         ret = AVERROR(ENOMEM);
1195         goto err;
1196     }
1197
1198     if (pps->uniform_spacing_flag) {
1199         if (!pps->column_width) {
1200             pps->column_width = av_malloc_array(pps->num_tile_columns, sizeof(*pps->column_width));
1201             pps->row_height   = av_malloc_array(pps->num_tile_rows,    sizeof(*pps->row_height));
1202         }
1203         if (!pps->column_width || !pps->row_height) {
1204             ret = AVERROR(ENOMEM);
1205             goto err;
1206         }
1207
1208         for (i = 0; i < pps->num_tile_columns; i++) {
1209             pps->column_width[i] = ((i + 1) * sps->ctb_width) / pps->num_tile_columns -
1210                                    (i * sps->ctb_width) / pps->num_tile_columns;
1211         }
1212
1213         for (i = 0; i < pps->num_tile_rows; i++) {
1214             pps->row_height[i] = ((i + 1) * sps->ctb_height) / pps->num_tile_rows -
1215                                  (i * sps->ctb_height) / pps->num_tile_rows;
1216         }
1217     }
1218
1219     pps->col_bd[0] = 0;
1220     for (i = 0; i < pps->num_tile_columns; i++)
1221         pps->col_bd[i + 1] = pps->col_bd[i] + pps->column_width[i];
1222
1223     pps->row_bd[0] = 0;
1224     for (i = 0; i < pps->num_tile_rows; i++)
1225         pps->row_bd[i + 1] = pps->row_bd[i] + pps->row_height[i];
1226
1227     for (i = 0, j = 0; i < sps->ctb_width; i++) {
1228         if (i > pps->col_bd[j])
1229             j++;
1230         pps->col_idxX[i] = j;
1231     }
1232
1233     /**
1234      * 6.5
1235      */
1236     pic_area_in_ctbs     = sps->ctb_width    * sps->ctb_height;
1237     pic_area_in_min_cbs  = sps->min_cb_width * sps->min_cb_height;
1238     pic_area_in_min_tbs  = sps->min_tb_width * sps->min_tb_height;
1239
1240     pps->ctb_addr_rs_to_ts = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->ctb_addr_rs_to_ts));
1241     pps->ctb_addr_ts_to_rs = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->ctb_addr_ts_to_rs));
1242     pps->tile_id           = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->tile_id));
1243     pps->min_cb_addr_zs    = av_malloc_array(pic_area_in_min_cbs, sizeof(*pps->min_cb_addr_zs));
1244     pps->min_tb_addr_zs    = av_malloc_array(pic_area_in_min_tbs, sizeof(*pps->min_tb_addr_zs));
1245     if (!pps->ctb_addr_rs_to_ts || !pps->ctb_addr_ts_to_rs ||
1246         !pps->tile_id || !pps->min_cb_addr_zs || !pps->min_tb_addr_zs) {
1247         ret = AVERROR(ENOMEM);
1248         goto err;
1249     }
1250
1251     for (ctb_addr_rs = 0; ctb_addr_rs < pic_area_in_ctbs; ctb_addr_rs++) {
1252         int tb_x   = ctb_addr_rs % sps->ctb_width;
1253         int tb_y   = ctb_addr_rs / sps->ctb_width;
1254         int tile_x = 0;
1255         int tile_y = 0;
1256         int val    = 0;
1257
1258         for (i = 0; i < pps->num_tile_columns; i++) {
1259             if (tb_x < pps->col_bd[i + 1]) {
1260                 tile_x = i;
1261                 break;
1262             }
1263         }
1264
1265         for (i = 0; i < pps->num_tile_rows; i++) {
1266             if (tb_y < pps->row_bd[i + 1]) {
1267                 tile_y = i;
1268                 break;
1269             }
1270         }
1271
1272         for (i = 0; i < tile_x; i++)
1273             val += pps->row_height[tile_y] * pps->column_width[i];
1274         for (i = 0; i < tile_y; i++)
1275             val += sps->ctb_width * pps->row_height[i];
1276
1277         val += (tb_y - pps->row_bd[tile_y]) * pps->column_width[tile_x] +
1278                tb_x - pps->col_bd[tile_x];
1279
1280         pps->ctb_addr_rs_to_ts[ctb_addr_rs] = val;
1281         pps->ctb_addr_ts_to_rs[val]         = ctb_addr_rs;
1282     }
1283
1284     for (j = 0, tile_id = 0; j < pps->num_tile_rows; j++)
1285         for (i = 0; i < pps->num_tile_columns; i++, tile_id++)
1286             for (y = pps->row_bd[j]; y < pps->row_bd[j + 1]; y++)
1287                 for (x = pps->col_bd[i]; x < pps->col_bd[i + 1]; x++)
1288                     pps->tile_id[pps->ctb_addr_rs_to_ts[y * sps->ctb_width + x]] = tile_id;
1289
1290     pps->tile_pos_rs = av_malloc_array(tile_id, sizeof(*pps->tile_pos_rs));
1291     if (!pps->tile_pos_rs) {
1292         ret = AVERROR(ENOMEM);
1293         goto err;
1294     }
1295
1296     for (j = 0; j < pps->num_tile_rows; j++)
1297         for (i = 0; i < pps->num_tile_columns; i++)
1298             pps->tile_pos_rs[j * pps->num_tile_columns + i] = pps->row_bd[j] * sps->ctb_width + pps->col_bd[i];
1299
1300     for (y = 0; y < sps->min_cb_height; y++) {
1301         for (x = 0; x < sps->min_cb_width; x++) {
1302             int tb_x        = x >> sps->log2_diff_max_min_coding_block_size;
1303             int tb_y        = y >> sps->log2_diff_max_min_coding_block_size;
1304             int ctb_addr_rs = sps->ctb_width * tb_y + tb_x;
1305             int val         = pps->ctb_addr_rs_to_ts[ctb_addr_rs] <<
1306                               (sps->log2_diff_max_min_coding_block_size * 2);
1307             for (i = 0; i < sps->log2_diff_max_min_coding_block_size; i++) {
1308                 int m = 1 << i;
1309                 val += (m & x ? m * m : 0) + (m & y ? 2 * m * m : 0);
1310             }
1311             pps->min_cb_addr_zs[y * sps->min_cb_width + x] = val;
1312         }
1313     }
1314
1315     log2_diff_ctb_min_tb_size = sps->log2_ctb_size - sps->log2_min_tb_size;
1316     for (y = 0; y < sps->min_tb_height; y++) {
1317         for (x = 0; x < sps->min_tb_width; x++) {
1318             int tb_x        = x >> log2_diff_ctb_min_tb_size;
1319             int tb_y        = y >> log2_diff_ctb_min_tb_size;
1320             int ctb_addr_rs = sps->ctb_width * tb_y + tb_x;
1321             int val         = pps->ctb_addr_rs_to_ts[ctb_addr_rs] <<
1322                               (log2_diff_ctb_min_tb_size * 2);
1323             for (i = 0; i < log2_diff_ctb_min_tb_size; i++) {
1324                 int m = 1 << i;
1325                 val += (m & x ? m * m : 0) + (m & y ? 2 * m * m : 0);
1326             }
1327             pps->min_tb_addr_zs[y * sps->min_tb_width + x] = val;
1328         }
1329     }
1330
1331     av_buffer_unref(&s->pps_list[pps_id]);
1332     s->pps_list[pps_id] = pps_buf;
1333
1334     return 0;
1335
1336 err:
1337     av_buffer_unref(&pps_buf);
1338     return ret;
1339 }