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 FFmpeg.
  10  *
  11  * FFmpeg 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  * FFmpeg 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 FFmpeg; 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 #include "golomb.h"
  28 #include "hevc_data.h"
  29 #include "hevc_ps.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 static void remove_pps(HEVCParamSets *s, int id)
  74 {
  75     if (s->pps_list[id] && s->pps == (const HEVCPPS*)s->pps_list[id]->data)
  76         s->pps = NULL;
  77     av_buffer_unref(&s->pps_list[id]);
  78 }
  79
  80 static void remove_sps(HEVCParamSets *s, int id)
  81 {
  82     int i;
  83     if (s->sps_list[id]) {
  84         if (s->sps == (const HEVCSPS*)s->sps_list[id]->data)
  85             s->sps = NULL;
  86
  87         /* drop all PPS that depend on this SPS */
  88         for (i = 0; i < FF_ARRAY_ELEMS(s->pps_list); i++)
  89             if (s->pps_list[i] && ((HEVCPPS*)s->pps_list[i]->data)->sps_id == id)
  90                 remove_pps(s, i);
  91
  92         av_assert0(!(s->sps_list[id] && s->sps == (HEVCSPS*)s->sps_list[id]->data));
  93     }
  94     av_buffer_unref(&s->sps_list[id]);
  95 }
  96
  97 static void remove_vps(HEVCParamSets *s, int id)
  98 {
  99     int i;
 100     if (s->vps_list[id]) {
 101         if (s->vps == (const HEVCVPS*)s->vps_list[id]->data)
 102             s->vps = NULL;
 103
 104         for (i = 0; i < FF_ARRAY_ELEMS(s->sps_list); i++)
 105             if (s->sps_list[i] && ((HEVCSPS*)s->sps_list[i]->data)->vps_id == id)
 106                 remove_sps(s, i);
 107     }
 108     av_buffer_unref(&s->vps_list[id]);
 109 }
 110
 111 int ff_hevc_decode_short_term_rps(GetBitContext *gb, AVCodecContext *avctx,
 112                                   ShortTermRPS *rps, const HEVCSPS *sps, int is_slice_header)
 113 {
 114     uint8_t rps_predict = 0;
 115     int delta_poc;
 116     int k0 = 0;
 117     int k1 = 0;
 118     int k  = 0;
 119     int i;
 120
 121     if (rps != sps->st_rps && sps->nb_st_rps)
 122         rps_predict = get_bits1(gb);
 123
 124     if (rps_predict) {
 125         const ShortTermRPS *rps_ridx;
 126         int delta_rps;
 127         unsigned abs_delta_rps;
 128         uint8_t use_delta_flag = 0;
 129         uint8_t delta_rps_sign;
 130
 131         if (is_slice_header) {
 132             unsigned int delta_idx = get_ue_golomb_long(gb) + 1;
 133             if (delta_idx > sps->nb_st_rps) {
 134                 av_log(avctx, AV_LOG_ERROR,
 135                        "Invalid value of delta_idx in slice header RPS: %d > %d.\n",
 136                        delta_idx, sps->nb_st_rps);
 137                 return AVERROR_INVALIDDATA;
 138             }
 139             rps_ridx = &sps->st_rps[sps->nb_st_rps - delta_idx];
 140             rps->rps_idx_num_delta_pocs = rps_ridx->num_delta_pocs;
 141         } else
 142             rps_ridx = &sps->st_rps[rps - sps->st_rps - 1];
 143
 144         delta_rps_sign = get_bits1(gb);
 145         abs_delta_rps  = get_ue_golomb_long(gb) + 1;
 146         if (abs_delta_rps < 1 || abs_delta_rps > 32768) {
 147             av_log(avctx, AV_LOG_ERROR,
 148                    "Invalid value of abs_delta_rps: %d\n",
 149                    abs_delta_rps);
 150             return AVERROR_INVALIDDATA;
 151         }
 152         delta_rps      = (1 - (delta_rps_sign << 1)) * abs_delta_rps;
 153         for (i = 0; i <= rps_ridx->num_delta_pocs; i++) {
 154             int used = rps->used[k] = get_bits1(gb);
 155
 156             if (!used)
 157                 use_delta_flag = get_bits1(gb);
 158
 159             if (used || use_delta_flag) {
 160                 if (i < rps_ridx->num_delta_pocs)
 161                     delta_poc = delta_rps + rps_ridx->delta_poc[i];
 162                 else
 163                     delta_poc = delta_rps;
 164                 rps->delta_poc[k] = delta_poc;
 165                 if (delta_poc < 0)
 166                     k0++;
 167                 else
 168                     k1++;
 169                 k++;
 170             }
 171         }
 172
 173         if (k >= FF_ARRAY_ELEMS(rps->used)) {
 174             av_log(avctx, AV_LOG_ERROR,
 175                    "Invalid num_delta_pocs: %d\n", k);
 176             return AVERROR_INVALIDDATA;
 177         }
 178
 179         rps->num_delta_pocs    = k;
 180         rps->num_negative_pics = k0;
 181         // sort in increasing order (smallest first)
 182         if (rps->num_delta_pocs != 0) {
 183             int used, tmp;
 184             for (i = 1; i < rps->num_delta_pocs; i++) {
 185                 delta_poc = rps->delta_poc[i];
 186                 used      = rps->used[i];
 187                 for (k = i - 1; k >= 0; k--) {
 188                     tmp = rps->delta_poc[k];
 189                     if (delta_poc < tmp) {
 190                         rps->delta_poc[k + 1] = tmp;
 191                         rps->used[k + 1]      = rps->used[k];
 192                         rps->delta_poc[k]     = delta_poc;
 193                         rps->used[k]          = used;
 194                     }
 195                 }
 196             }
 197         }
 198         if ((rps->num_negative_pics >> 1) != 0) {
 199             int used;
 200             k = rps->num_negative_pics - 1;
 201             // flip the negative values to largest first
 202             for (i = 0; i < rps->num_negative_pics >> 1; i++) {
 203                 delta_poc         = rps->delta_poc[i];
 204                 used              = rps->used[i];
 205                 rps->delta_poc[i] = rps->delta_poc[k];
 206                 rps->used[i]      = rps->used[k];
 207                 rps->delta_poc[k] = delta_poc;
 208                 rps->used[k]      = used;
 209                 k--;
 210             }
 211         }
 212     } else {
 213         unsigned int prev, nb_positive_pics;
 214         rps->num_negative_pics = get_ue_golomb_long(gb);
 215         nb_positive_pics       = get_ue_golomb_long(gb);
 216
 217         if (rps->num_negative_pics >= HEVC_MAX_REFS ||
 218             nb_positive_pics >= HEVC_MAX_REFS) {
 219             av_log(avctx, AV_LOG_ERROR, "Too many refs in a short term RPS.\n");
 220             return AVERROR_INVALIDDATA;
 221         }
 222
 223         rps->num_delta_pocs = rps->num_negative_pics + nb_positive_pics;
 224         if (rps->num_delta_pocs) {
 225             prev = 0;
 226             for (i = 0; i < rps->num_negative_pics; i++) {
 227                 delta_poc = get_ue_golomb_long(gb) + 1;
 228                 if (delta_poc < 1 || delta_poc > 32768) {
 229                     av_log(avctx, AV_LOG_ERROR,
 230                         "Invalid value of delta_poc: %d\n",
 231                         delta_poc);
 232                     return AVERROR_INVALIDDATA;
 233                 }
 234                 prev -= delta_poc;
 235                 rps->delta_poc[i] = prev;
 236                 rps->used[i]      = get_bits1(gb);
 237             }
 238             prev = 0;
 239             for (i = 0; i < nb_positive_pics; i++) {
 240                 delta_poc = get_ue_golomb_long(gb) + 1;
 241                 if (delta_poc < 1 || delta_poc > 32768) {
 242                     av_log(avctx, AV_LOG_ERROR,
 243                         "Invalid value of delta_poc: %d\n",
 244                         delta_poc);
 245                     return AVERROR_INVALIDDATA;
 246                 }
 247                 prev += delta_poc;
 248                 rps->delta_poc[rps->num_negative_pics + i] = prev;
 249                 rps->used[rps->num_negative_pics + i]      = get_bits1(gb);
 250             }
 251         }
 252     }
 253     return 0;
 254 }
 255
 256
 257 static int decode_profile_tier_level(GetBitContext *gb, AVCodecContext *avctx,
 258                                       PTLCommon *ptl)
 259 {
 260     int i;
 261
 262     if (get_bits_left(gb) < 2+1+5 + 32 + 4 + 16 + 16 + 12)
 263         return -1;
 264
 265     ptl->profile_space = get_bits(gb, 2);
 266     ptl->tier_flag     = get_bits1(gb);
 267     ptl->profile_idc   = get_bits(gb, 5);
 268     if (ptl->profile_idc == FF_PROFILE_HEVC_MAIN)
 269         av_log(avctx, AV_LOG_DEBUG, "Main profile bitstream\n");
 270     else if (ptl->profile_idc == FF_PROFILE_HEVC_MAIN_10)
 271         av_log(avctx, AV_LOG_DEBUG, "Main 10 profile bitstream\n");
 272     else if (ptl->profile_idc == FF_PROFILE_HEVC_MAIN_STILL_PICTURE)
 273         av_log(avctx, AV_LOG_DEBUG, "Main Still Picture profile bitstream\n");
 274     else if (ptl->profile_idc == FF_PROFILE_HEVC_REXT)
 275         av_log(avctx, AV_LOG_DEBUG, "Range Extension profile bitstream\n");
 276     else
 277         av_log(avctx, AV_LOG_WARNING, "Unknown HEVC profile: %d\n", ptl->profile_idc);
 278
 279     for (i = 0; i < 32; i++) {
 280         ptl->profile_compatibility_flag[i] = get_bits1(gb);
 281
 282         if (ptl->profile_idc == 0 && i > 0 && ptl->profile_compatibility_flag[i])
 283             ptl->profile_idc = i;
 284     }
 285     ptl->progressive_source_flag    = get_bits1(gb);
 286     ptl->interlaced_source_flag     = get_bits1(gb);
 287     ptl->non_packed_constraint_flag = get_bits1(gb);
 288     ptl->frame_only_constraint_flag = get_bits1(gb);
 289
 290     skip_bits(gb, 16); // XXX_reserved_zero_44bits[0..15]
 291     skip_bits(gb, 16); // XXX_reserved_zero_44bits[16..31]
 292     skip_bits(gb, 12); // XXX_reserved_zero_44bits[32..43]
 293
 294     return 0;
 295 }
 296
 297 static int parse_ptl(GetBitContext *gb, AVCodecContext *avctx,
 298                       PTL *ptl, int max_num_sub_layers)
 299 {
 300     int i;
 301     if (decode_profile_tier_level(gb, avctx, &ptl->general_ptl) < 0 ||
 302         get_bits_left(gb) < 8 + (8*2 * (max_num_sub_layers - 1 > 0))) {
 303         av_log(avctx, AV_LOG_ERROR, "PTL information too short\n");
 304         return -1;
 305     }
 306
 307     ptl->general_ptl.level_idc = get_bits(gb, 8);
 308
 309     for (i = 0; i < max_num_sub_layers - 1; i++) {
 310         ptl->sub_layer_profile_present_flag[i] = get_bits1(gb);
 311         ptl->sub_layer_level_present_flag[i]   = get_bits1(gb);
 312     }
 313
 314     if (max_num_sub_layers - 1> 0)
 315         for (i = max_num_sub_layers - 1; i < 8; i++)
 316             skip_bits(gb, 2); // reserved_zero_2bits[i]
 317     for (i = 0; i < max_num_sub_layers - 1; i++) {
 318         if (ptl->sub_layer_profile_present_flag[i] &&
 319             decode_profile_tier_level(gb, avctx, &ptl->sub_layer_ptl[i]) < 0) {
 320             av_log(avctx, AV_LOG_ERROR,
 321                    "PTL information for sublayer %i too short\n", i);
 322             return -1;
 323         }
 324         if (ptl->sub_layer_level_present_flag[i]) {
 325             if (get_bits_left(gb) < 8) {
 326                 av_log(avctx, AV_LOG_ERROR,
 327                        "Not enough data for sublayer %i level_idc\n", i);
 328                 return -1;
 329             } else
 330                 ptl->sub_layer_ptl[i].level_idc = get_bits(gb, 8);
 331         }
 332     }
 333
 334     return 0;
 335 }
 336
 337 static void decode_sublayer_hrd(GetBitContext *gb, unsigned int nb_cpb,
 338                                 int subpic_params_present)
 339 {
 340     int i;
 341
 342     for (i = 0; i < nb_cpb; i++) {
 343         get_ue_golomb_long(gb); // bit_rate_value_minus1
 344         get_ue_golomb_long(gb); // cpb_size_value_minus1
 345
 346         if (subpic_params_present) {
 347             get_ue_golomb_long(gb); // cpb_size_du_value_minus1
 348             get_ue_golomb_long(gb); // bit_rate_du_value_minus1
 349         }
 350         skip_bits1(gb); // cbr_flag
 351     }
 352 }
 353
 354 static int decode_hrd(GetBitContext *gb, int common_inf_present,
 355                        int max_sublayers)
 356 {
 357     int nal_params_present = 0, vcl_params_present = 0;
 358     int subpic_params_present = 0;
 359     int i;
 360
 361     if (common_inf_present) {
 362         nal_params_present = get_bits1(gb);
 363         vcl_params_present = get_bits1(gb);
 364
 365         if (nal_params_present || vcl_params_present) {
 366             subpic_params_present = get_bits1(gb);
 367
 368             if (subpic_params_present) {
 369                 skip_bits(gb, 8); // tick_divisor_minus2
 370                 skip_bits(gb, 5); // du_cpb_removal_delay_increment_length_minus1
 371                 skip_bits(gb, 1); // sub_pic_cpb_params_in_pic_timing_sei_flag
 372                 skip_bits(gb, 5); // dpb_output_delay_du_length_minus1
 373             }
 374
 375             skip_bits(gb, 4); // bit_rate_scale
 376             skip_bits(gb, 4); // cpb_size_scale
 377
 378             if (subpic_params_present)
 379                 skip_bits(gb, 4);  // cpb_size_du_scale
 380
 381             skip_bits(gb, 5); // initial_cpb_removal_delay_length_minus1
 382             skip_bits(gb, 5); // au_cpb_removal_delay_length_minus1
 383             skip_bits(gb, 5); // dpb_output_delay_length_minus1
 384         }
 385     }
 386
 387     for (i = 0; i < max_sublayers; i++) {
 388         int low_delay = 0;
 389         unsigned int nb_cpb = 1;
 390         int fixed_rate = get_bits1(gb);
 391
 392         if (!fixed_rate)
 393             fixed_rate = get_bits1(gb);
 394
 395         if (fixed_rate)
 396             get_ue_golomb_long(gb);  // elemental_duration_in_tc_minus1
 397         else
 398             low_delay = get_bits1(gb);
 399
 400         if (!low_delay) {
 401             nb_cpb = get_ue_golomb_long(gb) + 1;
 402             if (nb_cpb < 1 || nb_cpb > 32) {
 403                 av_log(NULL, AV_LOG_ERROR, "nb_cpb %d invalid\n", nb_cpb);
 404                 return AVERROR_INVALIDDATA;
 405             }
 406         }
 407
 408         if (nal_params_present)
 409             decode_sublayer_hrd(gb, nb_cpb, subpic_params_present);
 410         if (vcl_params_present)
 411             decode_sublayer_hrd(gb, nb_cpb, subpic_params_present);
 412     }
 413     return 0;
 414 }
 415
 416 int ff_hevc_decode_nal_vps(GetBitContext *gb, AVCodecContext *avctx,
 417                            HEVCParamSets *ps)
 418 {
 419     int i,j;
 420     int vps_id = 0;
 421     ptrdiff_t nal_size;
 422     HEVCVPS *vps;
 423     AVBufferRef *vps_buf = av_buffer_allocz(sizeof(*vps));
 424
 425     if (!vps_buf)
 426         return AVERROR(ENOMEM);
 427     vps = (HEVCVPS*)vps_buf->data;
 428
 429     av_log(avctx, AV_LOG_DEBUG, "Decoding VPS\n");
 430
 431     nal_size = gb->buffer_end - gb->buffer;
 432     if (nal_size > sizeof(vps->data)) {
 433         av_log(avctx, AV_LOG_WARNING, "Truncating likely oversized VPS "
 434                "(%"PTRDIFF_SPECIFIER" > %"SIZE_SPECIFIER")\n",
 435                nal_size, sizeof(vps->data));
 436         vps->data_size = sizeof(vps->data);
 437     } else {
 438         vps->data_size = nal_size;
 439     }
 440     memcpy(vps->data, gb->buffer, vps->data_size);
 441
 442     vps_id = get_bits(gb, 4);
 443     if (vps_id >= HEVC_MAX_VPS_COUNT) {
 444         av_log(avctx, AV_LOG_ERROR, "VPS id out of range: %d\n", vps_id);
 445         goto err;
 446     }
 447
 448     if (get_bits(gb, 2) != 3) { // vps_reserved_three_2bits
 449         av_log(avctx, AV_LOG_ERROR, "vps_reserved_three_2bits is not three\n");
 450         goto err;
 451     }
 452
 453     vps->vps_max_layers               = get_bits(gb, 6) + 1;
 454     vps->vps_max_sub_layers           = get_bits(gb, 3) + 1;
 455     vps->vps_temporal_id_nesting_flag = get_bits1(gb);
 456
 457     if (get_bits(gb, 16) != 0xffff) { // vps_reserved_ffff_16bits
 458         av_log(avctx, AV_LOG_ERROR, "vps_reserved_ffff_16bits is not 0xffff\n");
 459         goto err;
 460     }
 461
 462     if (vps->vps_max_sub_layers > HEVC_MAX_SUB_LAYERS) {
 463         av_log(avctx, AV_LOG_ERROR, "vps_max_sub_layers out of range: %d\n",
 464                vps->vps_max_sub_layers);
 465         goto err;
 466     }
 467
 468     if (parse_ptl(gb, avctx, &vps->ptl, vps->vps_max_sub_layers) < 0)
 469         goto err;
 470
 471     vps->vps_sub_layer_ordering_info_present_flag = get_bits1(gb);
 472
 473     i = vps->vps_sub_layer_ordering_info_present_flag ? 0 : vps->vps_max_sub_layers - 1;
 474     for (; i < vps->vps_max_sub_layers; i++) {
 475         vps->vps_max_dec_pic_buffering[i] = get_ue_golomb_long(gb) + 1;
 476         vps->vps_num_reorder_pics[i]      = get_ue_golomb_long(gb);
 477         vps->vps_max_latency_increase[i]  = get_ue_golomb_long(gb) - 1;
 478
 479         if (vps->vps_max_dec_pic_buffering[i] > HEVC_MAX_DPB_SIZE || !vps->vps_max_dec_pic_buffering[i]) {
 480             av_log(avctx, AV_LOG_ERROR, "vps_max_dec_pic_buffering_minus1 out of range: %d\n",
 481                    vps->vps_max_dec_pic_buffering[i] - 1);
 482             goto err;
 483         }
 484         if (vps->vps_num_reorder_pics[i] > vps->vps_max_dec_pic_buffering[i] - 1) {
 485             av_log(avctx, AV_LOG_WARNING, "vps_max_num_reorder_pics out of range: %d\n",
 486                    vps->vps_num_reorder_pics[i]);
 487             if (avctx->err_recognition & AV_EF_EXPLODE)
 488                 goto err;
 489         }
 490     }
 491
 492     vps->vps_max_layer_id   = get_bits(gb, 6);
 493     vps->vps_num_layer_sets = get_ue_golomb_long(gb) + 1;
 494     if (vps->vps_num_layer_sets < 1 || vps->vps_num_layer_sets > 1024 ||
 495         (vps->vps_num_layer_sets - 1LL) * (vps->vps_max_layer_id + 1LL) > get_bits_left(gb)) {
 496         av_log(avctx, AV_LOG_ERROR, "too many layer_id_included_flags\n");
 497         goto err;
 498     }
 499
 500     for (i = 1; i < vps->vps_num_layer_sets; i++)
 501         for (j = 0; j <= vps->vps_max_layer_id; j++)
 502             skip_bits(gb, 1);  // layer_id_included_flag[i][j]
 503
 504     vps->vps_timing_info_present_flag = get_bits1(gb);
 505     if (vps->vps_timing_info_present_flag) {
 506         vps->vps_num_units_in_tick               = get_bits_long(gb, 32);
 507         vps->vps_time_scale                      = get_bits_long(gb, 32);
 508         vps->vps_poc_proportional_to_timing_flag = get_bits1(gb);
 509         if (vps->vps_poc_proportional_to_timing_flag)
 510             vps->vps_num_ticks_poc_diff_one = get_ue_golomb_long(gb) + 1;
 511         vps->vps_num_hrd_parameters = get_ue_golomb_long(gb);
 512         if (vps->vps_num_hrd_parameters > (unsigned)vps->vps_num_layer_sets) {
 513             av_log(avctx, AV_LOG_ERROR,
 514                    "vps_num_hrd_parameters %d is invalid\n", vps->vps_num_hrd_parameters);
 515             goto err;
 516         }
 517         for (i = 0; i < vps->vps_num_hrd_parameters; i++) {
 518             int common_inf_present = 1;
 519
 520             get_ue_golomb_long(gb); // hrd_layer_set_idx
 521             if (i)
 522                 common_inf_present = get_bits1(gb);
 523             decode_hrd(gb, common_inf_present, vps->vps_max_sub_layers);
 524         }
 525     }
 526     get_bits1(gb); /* vps_extension_flag */
 527
 528     if (get_bits_left(gb) < 0) {
 529         av_log(avctx, AV_LOG_ERROR,
 530                "Overread VPS by %d bits\n", -get_bits_left(gb));
 531         if (ps->vps_list[vps_id])
 532             goto err;
 533     }
 534
 535     if (ps->vps_list[vps_id] &&
 536         !memcmp(ps->vps_list[vps_id]->data, vps_buf->data, vps_buf->size)) {
 537         av_buffer_unref(&vps_buf);
 538     } else {
 539         remove_vps(ps, vps_id);
 540         ps->vps_list[vps_id] = vps_buf;
 541     }
 542
 543     return 0;
 544
 545 err:
 546     av_buffer_unref(&vps_buf);
 547     return AVERROR_INVALIDDATA;
 548 }
 549
 550 static void decode_vui(GetBitContext *gb, AVCodecContext *avctx,
 551                        int apply_defdispwin, HEVCSPS *sps)
 552 {
 553     VUI backup_vui, *vui = &sps->vui;
 554     GetBitContext backup;
 555     int sar_present, alt = 0;
 556
 557     av_log(avctx, AV_LOG_DEBUG, "Decoding VUI\n");
 558
 559     sar_present = get_bits1(gb);
 560     if (sar_present) {
 561         uint8_t sar_idx = get_bits(gb, 8);
 562         if (sar_idx < FF_ARRAY_ELEMS(vui_sar))
 563             vui->sar = vui_sar[sar_idx];
 564         else if (sar_idx == 255) {
 565             vui->sar.num = get_bits(gb, 16);
 566             vui->sar.den = get_bits(gb, 16);
 567         } else
 568             av_log(avctx, AV_LOG_WARNING,
 569                    "Unknown SAR index: %u.\n", sar_idx);
 570     }
 571
 572     vui->overscan_info_present_flag = get_bits1(gb);
 573     if (vui->overscan_info_present_flag)
 574         vui->overscan_appropriate_flag = get_bits1(gb);
 575
 576     vui->video_signal_type_present_flag = get_bits1(gb);
 577     if (vui->video_signal_type_present_flag) {
 578         vui->video_format                    = get_bits(gb, 3);
 579         vui->video_full_range_flag           = get_bits1(gb);
 580         vui->colour_description_present_flag = get_bits1(gb);
 581         if (vui->video_full_range_flag && sps->pix_fmt == AV_PIX_FMT_YUV420P)
 582             sps->pix_fmt = AV_PIX_FMT_YUVJ420P;
 583         if (vui->colour_description_present_flag) {
 584             vui->colour_primaries        = get_bits(gb, 8);
 585             vui->transfer_characteristic = get_bits(gb, 8);
 586             vui->matrix_coeffs           = get_bits(gb, 8);
 587
 588             // Set invalid values to "unspecified"
 589             if (!av_color_primaries_name(vui->colour_primaries))
 590                 vui->colour_primaries = AVCOL_PRI_UNSPECIFIED;
 591             if (!av_color_transfer_name(vui->transfer_characteristic))
 592                 vui->transfer_characteristic = AVCOL_TRC_UNSPECIFIED;
 593             if (!av_color_space_name(vui->matrix_coeffs))
 594                 vui->matrix_coeffs = AVCOL_SPC_UNSPECIFIED;
 595             if (vui->matrix_coeffs == AVCOL_SPC_RGB) {
 596                 switch (sps->pix_fmt) {
 597                 case AV_PIX_FMT_YUV444P:
 598                     sps->pix_fmt = AV_PIX_FMT_GBRP;
 599                     break;
 600                 case AV_PIX_FMT_YUV444P10:
 601                     sps->pix_fmt = AV_PIX_FMT_GBRP10;
 602                     break;
 603                 case AV_PIX_FMT_YUV444P12:
 604                     sps->pix_fmt = AV_PIX_FMT_GBRP12;
 605                     break;
 606                 }
 607             }
 608         }
 609     }
 610
 611     vui->chroma_loc_info_present_flag = get_bits1(gb);
 612     if (vui->chroma_loc_info_present_flag) {
 613         vui->chroma_sample_loc_type_top_field    = get_ue_golomb_long(gb);
 614         vui->chroma_sample_loc_type_bottom_field = get_ue_golomb_long(gb);
 615     }
 616
 617     vui->neutra_chroma_indication_flag = get_bits1(gb);
 618     vui->field_seq_flag                = get_bits1(gb);
 619     vui->frame_field_info_present_flag = get_bits1(gb);
 620
 621     // Backup context in case an alternate header is detected
 622     memcpy(&backup, gb, sizeof(backup));
 623     memcpy(&backup_vui, vui, sizeof(backup_vui));
 624     if (get_bits_left(gb) >= 68 && show_bits_long(gb, 21) == 0x100000) {
 625         vui->default_display_window_flag = 0;
 626         av_log(avctx, AV_LOG_WARNING, "Invalid default display window\n");
 627     } else
 628         vui->default_display_window_flag = get_bits1(gb);
 629
 630     if (vui->default_display_window_flag) {
 631         int vert_mult  = 1 + (sps->chroma_format_idc < 2);
 632         int horiz_mult = 1 + (sps->chroma_format_idc < 3);
 633         vui->def_disp_win.left_offset   = get_ue_golomb_long(gb) * horiz_mult;
 634         vui->def_disp_win.right_offset  = get_ue_golomb_long(gb) * horiz_mult;
 635         vui->def_disp_win.top_offset    = get_ue_golomb_long(gb) *  vert_mult;
 636         vui->def_disp_win.bottom_offset = get_ue_golomb_long(gb) *  vert_mult;
 637
 638         if (apply_defdispwin &&
 639             avctx->flags2 & AV_CODEC_FLAG2_IGNORE_CROP) {
 640             av_log(avctx, AV_LOG_DEBUG,
 641                    "discarding vui default display window, "
 642                    "original values are l:%u r:%u t:%u b:%u\n",
 643                    vui->def_disp_win.left_offset,
 644                    vui->def_disp_win.right_offset,
 645                    vui->def_disp_win.top_offset,
 646                    vui->def_disp_win.bottom_offset);
 647
 648             vui->def_disp_win.left_offset   =
 649             vui->def_disp_win.right_offset  =
 650             vui->def_disp_win.top_offset    =
 651             vui->def_disp_win.bottom_offset = 0;
 652         }
 653     }
 654
 655 timing_info:
 656     vui->vui_timing_info_present_flag = get_bits1(gb);
 657
 658     if (vui->vui_timing_info_present_flag) {
 659         if( get_bits_left(gb) < 66 && !alt) {
 660             // The alternate syntax seem to have timing info located
 661             // at where def_disp_win is normally located
 662             av_log(avctx, AV_LOG_WARNING,
 663                    "Strange VUI timing information, retrying...\n");
 664             memcpy(vui, &backup_vui, sizeof(backup_vui));
 665             memcpy(gb, &backup, sizeof(backup));
 666             alt = 1;
 667             goto timing_info;
 668         }
 669         vui->vui_num_units_in_tick               = get_bits_long(gb, 32);
 670         vui->vui_time_scale                      = get_bits_long(gb, 32);
 671         if (alt) {
 672             av_log(avctx, AV_LOG_INFO, "Retry got %"PRIu32"/%"PRIu32" fps\n",
 673                    vui->vui_time_scale, vui->vui_num_units_in_tick);
 674         }
 675         vui->vui_poc_proportional_to_timing_flag = get_bits1(gb);
 676         if (vui->vui_poc_proportional_to_timing_flag)
 677             vui->vui_num_ticks_poc_diff_one_minus1 = get_ue_golomb_long(gb);
 678         vui->vui_hrd_parameters_present_flag = get_bits1(gb);
 679         if (vui->vui_hrd_parameters_present_flag)
 680             decode_hrd(gb, 1, sps->max_sub_layers);
 681     }
 682
 683     vui->bitstream_restriction_flag = get_bits1(gb);
 684     if (vui->bitstream_restriction_flag) {
 685         if (get_bits_left(gb) < 8 && !alt) {
 686             av_log(avctx, AV_LOG_WARNING,
 687                    "Strange VUI bitstream restriction information, retrying"
 688                    " from timing information...\n");
 689             memcpy(vui, &backup_vui, sizeof(backup_vui));
 690             memcpy(gb, &backup, sizeof(backup));
 691             alt = 1;
 692             goto timing_info;
 693         }
 694         vui->tiles_fixed_structure_flag              = get_bits1(gb);
 695         vui->motion_vectors_over_pic_boundaries_flag = get_bits1(gb);
 696         vui->restricted_ref_pic_lists_flag           = get_bits1(gb);
 697         vui->min_spatial_segmentation_idc            = get_ue_golomb_long(gb);
 698         vui->max_bytes_per_pic_denom                 = get_ue_golomb_long(gb);
 699         vui->max_bits_per_min_cu_denom               = get_ue_golomb_long(gb);
 700         vui->log2_max_mv_length_horizontal           = get_ue_golomb_long(gb);
 701         vui->log2_max_mv_length_vertical             = get_ue_golomb_long(gb);
 702     }
 703
 704     if (get_bits_left(gb) < 1 && !alt) {
 705         // XXX: Alternate syntax when sps_range_extension_flag != 0?
 706         av_log(avctx, AV_LOG_WARNING,
 707                "Overread in VUI, retrying from timing information...\n");
 708         memcpy(vui, &backup_vui, sizeof(backup_vui));
 709         memcpy(gb, &backup, sizeof(backup));
 710         alt = 1;
 711         goto timing_info;
 712     }
 713 }
 714
 715 static void set_default_scaling_list_data(ScalingList *sl)
 716 {
 717     int matrixId;
 718
 719     for (matrixId = 0; matrixId < 6; matrixId++) {
 720         // 4x4 default is 16
 721         memset(sl->sl[0][matrixId], 16, 16);
 722         sl->sl_dc[0][matrixId] = 16; // default for 16x16
 723         sl->sl_dc[1][matrixId] = 16; // default for 32x32
 724     }
 725     memcpy(sl->sl[1][0], default_scaling_list_intra, 64);
 726     memcpy(sl->sl[1][1], default_scaling_list_intra, 64);
 727     memcpy(sl->sl[1][2], default_scaling_list_intra, 64);
 728     memcpy(sl->sl[1][3], default_scaling_list_inter, 64);
 729     memcpy(sl->sl[1][4], default_scaling_list_inter, 64);
 730     memcpy(sl->sl[1][5], default_scaling_list_inter, 64);
 731     memcpy(sl->sl[2][0], default_scaling_list_intra, 64);
 732     memcpy(sl->sl[2][1], default_scaling_list_intra, 64);
 733     memcpy(sl->sl[2][2], default_scaling_list_intra, 64);
 734     memcpy(sl->sl[2][3], default_scaling_list_inter, 64);
 735     memcpy(sl->sl[2][4], default_scaling_list_inter, 64);
 736     memcpy(sl->sl[2][5], default_scaling_list_inter, 64);
 737     memcpy(sl->sl[3][0], default_scaling_list_intra, 64);
 738     memcpy(sl->sl[3][1], default_scaling_list_intra, 64);
 739     memcpy(sl->sl[3][2], default_scaling_list_intra, 64);
 740     memcpy(sl->sl[3][3], default_scaling_list_inter, 64);
 741     memcpy(sl->sl[3][4], default_scaling_list_inter, 64);
 742     memcpy(sl->sl[3][5], default_scaling_list_inter, 64);
 743 }
 744
 745 static int scaling_list_data(GetBitContext *gb, AVCodecContext *avctx, ScalingList *sl, HEVCSPS *sps)
 746 {
 747     uint8_t scaling_list_pred_mode_flag;
 748     int32_t scaling_list_dc_coef[2][6];
 749     int size_id, matrix_id, pos;
 750     int i;
 751
 752     for (size_id = 0; size_id < 4; size_id++)
 753         for (matrix_id = 0; matrix_id < 6; matrix_id += ((size_id == 3) ? 3 : 1)) {
 754             scaling_list_pred_mode_flag = get_bits1(gb);
 755             if (!scaling_list_pred_mode_flag) {
 756                 unsigned int delta = get_ue_golomb_long(gb);
 757                 /* Only need to handle non-zero delta. Zero means default,
 758                  * which should already be in the arrays. */
 759                 if (delta) {
 760                     // Copy from previous array.
 761                     delta *= (size_id == 3) ? 3 : 1;
 762                     if (matrix_id < delta) {
 763                         av_log(avctx, AV_LOG_ERROR,
 764                                "Invalid delta in scaling list data: %d.\n", delta);
 765                         return AVERROR_INVALIDDATA;
 766                     }
 767
 768                     memcpy(sl->sl[size_id][matrix_id],
 769                            sl->sl[size_id][matrix_id - delta],
 770                            size_id > 0 ? 64 : 16);
 771                     if (size_id > 1)
 772                         sl->sl_dc[size_id - 2][matrix_id] = sl->sl_dc[size_id - 2][matrix_id - delta];
 773                 }
 774             } else {
 775                 int next_coef, coef_num;
 776                 int32_t scaling_list_delta_coef;
 777
 778                 next_coef = 8;
 779                 coef_num  = FFMIN(64, 1 << (4 + (size_id << 1)));
 780                 if (size_id > 1) {
 781                     scaling_list_dc_coef[size_id - 2][matrix_id] = get_se_golomb(gb) + 8;
 782                     next_coef = scaling_list_dc_coef[size_id - 2][matrix_id];
 783                     sl->sl_dc[size_id - 2][matrix_id] = next_coef;
 784                 }
 785                 for (i = 0; i < coef_num; i++) {
 786                     if (size_id == 0)
 787                         pos = 4 * ff_hevc_diag_scan4x4_y[i] +
 788                                   ff_hevc_diag_scan4x4_x[i];
 789                     else
 790                         pos = 8 * ff_hevc_diag_scan8x8_y[i] +
 791                                   ff_hevc_diag_scan8x8_x[i];
 792
 793                     scaling_list_delta_coef = get_se_golomb(gb);
 794                     next_coef = (next_coef + 256U + scaling_list_delta_coef) % 256;
 795                     sl->sl[size_id][matrix_id][pos] = next_coef;
 796                 }
 797             }
 798         }
 799
 800     if (sps->chroma_format_idc == 3) {
 801         for (i = 0; i < 64; i++) {
 802             sl->sl[3][1][i] = sl->sl[2][1][i];
 803             sl->sl[3][2][i] = sl->sl[2][2][i];
 804             sl->sl[3][4][i] = sl->sl[2][4][i];
 805             sl->sl[3][5][i] = sl->sl[2][5][i];
 806         }
 807         sl->sl_dc[1][1] = sl->sl_dc[0][1];
 808         sl->sl_dc[1][2] = sl->sl_dc[0][2];
 809         sl->sl_dc[1][4] = sl->sl_dc[0][4];
 810         sl->sl_dc[1][5] = sl->sl_dc[0][5];
 811     }
 812
 813
 814     return 0;
 815 }
 816
 817 static int map_pixel_format(AVCodecContext *avctx, HEVCSPS *sps)
 818 {
 819     const AVPixFmtDescriptor *desc;
 820     switch (sps->bit_depth) {
 821     case 8:
 822         if (sps->chroma_format_idc == 0) sps->pix_fmt = AV_PIX_FMT_GRAY8;
 823         if (sps->chroma_format_idc == 1) sps->pix_fmt = AV_PIX_FMT_YUV420P;
 824         if (sps->chroma_format_idc == 2) sps->pix_fmt = AV_PIX_FMT_YUV422P;
 825         if (sps->chroma_format_idc == 3) sps->pix_fmt = AV_PIX_FMT_YUV444P;
 826        break;
 827     case 9:
 828         if (sps->chroma_format_idc == 0) sps->pix_fmt = AV_PIX_FMT_GRAY16;
 829         if (sps->chroma_format_idc == 1) sps->pix_fmt = AV_PIX_FMT_YUV420P9;
 830         if (sps->chroma_format_idc == 2) sps->pix_fmt = AV_PIX_FMT_YUV422P9;
 831         if (sps->chroma_format_idc == 3) sps->pix_fmt = AV_PIX_FMT_YUV444P9;
 832         break;
 833     case 10:
 834         if (sps->chroma_format_idc == 0) sps->pix_fmt = AV_PIX_FMT_GRAY10;
 835         if (sps->chroma_format_idc == 1) sps->pix_fmt = AV_PIX_FMT_YUV420P10;
 836         if (sps->chroma_format_idc == 2) sps->pix_fmt = AV_PIX_FMT_YUV422P10;
 837         if (sps->chroma_format_idc == 3) sps->pix_fmt = AV_PIX_FMT_YUV444P10;
 838         break;
 839     case 12:
 840         if (sps->chroma_format_idc == 0) sps->pix_fmt = AV_PIX_FMT_GRAY12;
 841         if (sps->chroma_format_idc == 1) sps->pix_fmt = AV_PIX_FMT_YUV420P12;
 842         if (sps->chroma_format_idc == 2) sps->pix_fmt = AV_PIX_FMT_YUV422P12;
 843         if (sps->chroma_format_idc == 3) sps->pix_fmt = AV_PIX_FMT_YUV444P12;
 844         break;
 845     default:
 846         av_log(avctx, AV_LOG_ERROR,
 847                "The following bit-depths are currently specified: 8, 9, 10 and 12 bits, "
 848                "chroma_format_idc is %d, depth is %d\n",
 849                sps->chroma_format_idc, sps->bit_depth);
 850         return AVERROR_INVALIDDATA;
 851     }
 852
 853     desc = av_pix_fmt_desc_get(sps->pix_fmt);
 854     if (!desc)
 855         return AVERROR(EINVAL);
 856
 857     sps->hshift[0] = sps->vshift[0] = 0;
 858     sps->hshift[2] = sps->hshift[1] = desc->log2_chroma_w;
 859     sps->vshift[2] = sps->vshift[1] = desc->log2_chroma_h;
 860
 861     sps->pixel_shift = sps->bit_depth > 8;
 862
 863     return 0;
 864 }
 865
 866 int ff_hevc_parse_sps(HEVCSPS *sps, GetBitContext *gb, unsigned int *sps_id,
 867                       int apply_defdispwin, AVBufferRef **vps_list, AVCodecContext *avctx)
 868 {
 869     HEVCWindow *ow;
 870     int ret = 0;
 871     int log2_diff_max_min_transform_block_size;
 872     int bit_depth_chroma, start, vui_present, sublayer_ordering_info;
 873     int i;
 874
 875     // Coded parameters
 876
 877     sps->vps_id = get_bits(gb, 4);
 878     if (sps->vps_id >= HEVC_MAX_VPS_COUNT) {
 879         av_log(avctx, AV_LOG_ERROR, "VPS id out of range: %d\n", sps->vps_id);
 880         return AVERROR_INVALIDDATA;
 881     }
 882
 883     if (vps_list && !vps_list[sps->vps_id]) {
 884         av_log(avctx, AV_LOG_ERROR, "VPS %d does not exist\n",
 885                sps->vps_id);
 886         return AVERROR_INVALIDDATA;
 887     }
 888
 889     sps->max_sub_layers = get_bits(gb, 3) + 1;
 890     if (sps->max_sub_layers > HEVC_MAX_SUB_LAYERS) {
 891         av_log(avctx, AV_LOG_ERROR, "sps_max_sub_layers out of range: %d\n",
 892                sps->max_sub_layers);
 893         return AVERROR_INVALIDDATA;
 894     }
 895
 896     sps->temporal_id_nesting_flag = get_bits(gb, 1);
 897
 898     if ((ret = parse_ptl(gb, avctx, &sps->ptl, sps->max_sub_layers)) < 0)
 899         return ret;
 900
 901     *sps_id = get_ue_golomb_long(gb);
 902     if (*sps_id >= HEVC_MAX_SPS_COUNT) {
 903         av_log(avctx, AV_LOG_ERROR, "SPS id out of range: %d\n", *sps_id);
 904         return AVERROR_INVALIDDATA;
 905     }
 906
 907     sps->chroma_format_idc = get_ue_golomb_long(gb);
 908     if (sps->chroma_format_idc > 3U) {
 909         av_log(avctx, AV_LOG_ERROR, "chroma_format_idc %d is invalid\n", sps->chroma_format_idc);
 910         return AVERROR_INVALIDDATA;
 911     }
 912
 913     if (sps->chroma_format_idc == 3)
 914         sps->separate_colour_plane_flag = get_bits1(gb);
 915
 916     if (sps->separate_colour_plane_flag)
 917         sps->chroma_format_idc = 0;
 918
 919     sps->width  = get_ue_golomb_long(gb);
 920     sps->height = get_ue_golomb_long(gb);
 921     if ((ret = av_image_check_size(sps->width,
 922                                    sps->height, 0, avctx)) < 0)
 923         return ret;
 924
 925     if (get_bits1(gb)) { // pic_conformance_flag
 926         int vert_mult  = 1 + (sps->chroma_format_idc < 2);
 927         int horiz_mult = 1 + (sps->chroma_format_idc < 3);
 928         sps->pic_conf_win.left_offset   = get_ue_golomb_long(gb) * horiz_mult;
 929         sps->pic_conf_win.right_offset  = get_ue_golomb_long(gb) * horiz_mult;
 930         sps->pic_conf_win.top_offset    = get_ue_golomb_long(gb) *  vert_mult;
 931         sps->pic_conf_win.bottom_offset = get_ue_golomb_long(gb) *  vert_mult;
 932
 933         if (avctx->flags2 & AV_CODEC_FLAG2_IGNORE_CROP) {
 934             av_log(avctx, AV_LOG_DEBUG,
 935                    "discarding sps conformance window, "
 936                    "original values are l:%u r:%u t:%u b:%u\n",
 937                    sps->pic_conf_win.left_offset,
 938                    sps->pic_conf_win.right_offset,
 939                    sps->pic_conf_win.top_offset,
 940                    sps->pic_conf_win.bottom_offset);
 941
 942             sps->pic_conf_win.left_offset   =
 943             sps->pic_conf_win.right_offset  =
 944             sps->pic_conf_win.top_offset    =
 945             sps->pic_conf_win.bottom_offset = 0;
 946         }
 947         sps->output_window = sps->pic_conf_win;
 948     }
 949
 950     sps->bit_depth   = get_ue_golomb_long(gb) + 8;
 951     bit_depth_chroma = get_ue_golomb_long(gb) + 8;
 952     if (sps->chroma_format_idc && bit_depth_chroma != sps->bit_depth) {
 953         av_log(avctx, AV_LOG_ERROR,
 954                "Luma bit depth (%d) is different from chroma bit depth (%d), "
 955                "this is unsupported.\n",
 956                sps->bit_depth, bit_depth_chroma);
 957         return AVERROR_INVALIDDATA;
 958     }
 959     sps->bit_depth_chroma = bit_depth_chroma;
 960
 961     ret = map_pixel_format(avctx, sps);
 962     if (ret < 0)
 963         return ret;
 964
 965     sps->log2_max_poc_lsb = get_ue_golomb_long(gb) + 4;
 966     if (sps->log2_max_poc_lsb > 16) {
 967         av_log(avctx, AV_LOG_ERROR, "log2_max_pic_order_cnt_lsb_minus4 out range: %d\n",
 968                sps->log2_max_poc_lsb - 4);
 969         return AVERROR_INVALIDDATA;
 970     }
 971
 972     sublayer_ordering_info = get_bits1(gb);
 973     start = sublayer_ordering_info ? 0 : sps->max_sub_layers - 1;
 974     for (i = start; i < sps->max_sub_layers; i++) {
 975         sps->temporal_layer[i].max_dec_pic_buffering = get_ue_golomb_long(gb) + 1;
 976         sps->temporal_layer[i].num_reorder_pics      = get_ue_golomb_long(gb);
 977         sps->temporal_layer[i].max_latency_increase  = get_ue_golomb_long(gb) - 1;
 978         if (sps->temporal_layer[i].max_dec_pic_buffering > (unsigned)HEVC_MAX_DPB_SIZE) {
 979             av_log(avctx, AV_LOG_ERROR, "sps_max_dec_pic_buffering_minus1 out of range: %d\n",
 980                    sps->temporal_layer[i].max_dec_pic_buffering - 1U);
 981             return AVERROR_INVALIDDATA;
 982         }
 983         if (sps->temporal_layer[i].num_reorder_pics > sps->temporal_layer[i].max_dec_pic_buffering - 1) {
 984             av_log(avctx, AV_LOG_WARNING, "sps_max_num_reorder_pics out of range: %d\n",
 985                    sps->temporal_layer[i].num_reorder_pics);
 986             if (avctx->err_recognition & AV_EF_EXPLODE ||
 987                 sps->temporal_layer[i].num_reorder_pics > HEVC_MAX_DPB_SIZE - 1) {
 988                 return AVERROR_INVALIDDATA;
 989             }
 990             sps->temporal_layer[i].max_dec_pic_buffering = sps->temporal_layer[i].num_reorder_pics + 1;
 991         }
 992     }
 993
 994     if (!sublayer_ordering_info) {
 995         for (i = 0; i < start; i++) {
 996             sps->temporal_layer[i].max_dec_pic_buffering = sps->temporal_layer[start].max_dec_pic_buffering;
 997             sps->temporal_layer[i].num_reorder_pics      = sps->temporal_layer[start].num_reorder_pics;
 998             sps->temporal_layer[i].max_latency_increase  = sps->temporal_layer[start].max_latency_increase;
 999         }
1000     }
1001
1002     sps->log2_min_cb_size                    = get_ue_golomb_long(gb) + 3;
1003     sps->log2_diff_max_min_coding_block_size = get_ue_golomb_long(gb);
1004     sps->log2_min_tb_size                    = get_ue_golomb_long(gb) + 2;
1005     log2_diff_max_min_transform_block_size   = get_ue_golomb_long(gb);
1006     sps->log2_max_trafo_size                 = log2_diff_max_min_transform_block_size +
1007                                                sps->log2_min_tb_size;
1008
1009     if (sps->log2_min_cb_size < 3 || sps->log2_min_cb_size > 30) {
1010         av_log(avctx, AV_LOG_ERROR, "Invalid value %d for log2_min_cb_size", sps->log2_min_cb_size);
1011         return AVERROR_INVALIDDATA;
1012     }
1013
1014     if (sps->log2_diff_max_min_coding_block_size > 30) {
1015         av_log(avctx, AV_LOG_ERROR, "Invalid value %d for log2_diff_max_min_coding_block_size", sps->log2_diff_max_min_coding_block_size);
1016         return AVERROR_INVALIDDATA;
1017     }
1018
1019     if (sps->log2_min_tb_size >= sps->log2_min_cb_size || sps->log2_min_tb_size < 2) {
1020         av_log(avctx, AV_LOG_ERROR, "Invalid value for log2_min_tb_size");
1021         return AVERROR_INVALIDDATA;
1022     }
1023
1024     if (log2_diff_max_min_transform_block_size < 0 || log2_diff_max_min_transform_block_size > 30) {
1025         av_log(avctx, AV_LOG_ERROR, "Invalid value %d for log2_diff_max_min_transform_block_size", log2_diff_max_min_transform_block_size);
1026         return AVERROR_INVALIDDATA;
1027     }
1028
1029     sps->max_transform_hierarchy_depth_inter = get_ue_golomb_long(gb);
1030     sps->max_transform_hierarchy_depth_intra = get_ue_golomb_long(gb);
1031
1032     sps->scaling_list_enable_flag = get_bits1(gb);
1033     if (sps->scaling_list_enable_flag) {
1034         set_default_scaling_list_data(&sps->scaling_list);
1035
1036         if (get_bits1(gb)) {
1037             ret = scaling_list_data(gb, avctx, &sps->scaling_list, sps);
1038             if (ret < 0)
1039                 return ret;
1040         }
1041     }
1042
1043     sps->amp_enabled_flag = get_bits1(gb);
1044     sps->sao_enabled      = get_bits1(gb);
1045
1046     sps->pcm_enabled_flag = get_bits1(gb);
1047     if (sps->pcm_enabled_flag) {
1048         sps->pcm.bit_depth   = get_bits(gb, 4) + 1;
1049         sps->pcm.bit_depth_chroma = get_bits(gb, 4) + 1;
1050         sps->pcm.log2_min_pcm_cb_size = get_ue_golomb_long(gb) + 3;
1051         sps->pcm.log2_max_pcm_cb_size = sps->pcm.log2_min_pcm_cb_size +
1052                                         get_ue_golomb_long(gb);
1053         if (FFMAX(sps->pcm.bit_depth, sps->pcm.bit_depth_chroma) > sps->bit_depth) {
1054             av_log(avctx, AV_LOG_ERROR,
1055                    "PCM bit depth (%d, %d) is greater than normal bit depth (%d)\n",
1056                    sps->pcm.bit_depth, sps->pcm.bit_depth_chroma, sps->bit_depth);
1057             return AVERROR_INVALIDDATA;
1058         }
1059
1060         sps->pcm.loop_filter_disable_flag = get_bits1(gb);
1061     }
1062
1063     sps->nb_st_rps = get_ue_golomb_long(gb);
1064     if (sps->nb_st_rps > HEVC_MAX_SHORT_TERM_REF_PIC_SETS) {
1065         av_log(avctx, AV_LOG_ERROR, "Too many short term RPS: %d.\n",
1066                sps->nb_st_rps);
1067         return AVERROR_INVALIDDATA;
1068     }
1069     for (i = 0; i < sps->nb_st_rps; i++) {
1070         if ((ret = ff_hevc_decode_short_term_rps(gb, avctx, &sps->st_rps[i],
1071                                                  sps, 0)) < 0)
1072             return ret;
1073     }
1074
1075     sps->long_term_ref_pics_present_flag = get_bits1(gb);
1076     if (sps->long_term_ref_pics_present_flag) {
1077         sps->num_long_term_ref_pics_sps = get_ue_golomb_long(gb);
1078         if (sps->num_long_term_ref_pics_sps > HEVC_MAX_LONG_TERM_REF_PICS) {
1079             av_log(avctx, AV_LOG_ERROR, "Too many long term ref pics: %d.\n",
1080                    sps->num_long_term_ref_pics_sps);
1081             return AVERROR_INVALIDDATA;
1082         }
1083         for (i = 0; i < sps->num_long_term_ref_pics_sps; i++) {
1084             sps->lt_ref_pic_poc_lsb_sps[i]       = get_bits(gb, sps->log2_max_poc_lsb);
1085             sps->used_by_curr_pic_lt_sps_flag[i] = get_bits1(gb);
1086         }
1087     }
1088
1089     sps->sps_temporal_mvp_enabled_flag          = get_bits1(gb);
1090     sps->sps_strong_intra_smoothing_enable_flag = get_bits1(gb);
1091     sps->vui.sar = (AVRational){0, 1};
1092     vui_present = get_bits1(gb);
1093     if (vui_present)
1094         decode_vui(gb, avctx, apply_defdispwin, sps);
1095
1096     if (get_bits1(gb)) { // sps_extension_flag
1097         int sps_extension_flag[1];
1098         for (i = 0; i < 1; i++)
1099             sps_extension_flag[i] = get_bits1(gb);
1100         skip_bits(gb, 7); //sps_extension_7bits = get_bits(gb, 7);
1101         if (sps_extension_flag[0]) {
1102             int extended_precision_processing_flag;
1103             int high_precision_offsets_enabled_flag;
1104             int cabac_bypass_alignment_enabled_flag;
1105
1106             sps->transform_skip_rotation_enabled_flag = get_bits1(gb);
1107             sps->transform_skip_context_enabled_flag  = get_bits1(gb);
1108             sps->implicit_rdpcm_enabled_flag = get_bits1(gb);
1109
1110             sps->explicit_rdpcm_enabled_flag = get_bits1(gb);
1111
1112             extended_precision_processing_flag = get_bits1(gb);
1113             if (extended_precision_processing_flag)
1114                 av_log(avctx, AV_LOG_WARNING,
1115                    "extended_precision_processing_flag not yet implemented\n");
1116
1117             sps->intra_smoothing_disabled_flag       = get_bits1(gb);
1118             high_precision_offsets_enabled_flag  = get_bits1(gb);
1119             if (high_precision_offsets_enabled_flag)
1120                 av_log(avctx, AV_LOG_WARNING,
1121                    "high_precision_offsets_enabled_flag not yet implemented\n");
1122
1123             sps->persistent_rice_adaptation_enabled_flag = get_bits1(gb);
1124
1125             cabac_bypass_alignment_enabled_flag  = get_bits1(gb);
1126             if (cabac_bypass_alignment_enabled_flag)
1127                 av_log(avctx, AV_LOG_WARNING,
1128                    "cabac_bypass_alignment_enabled_flag not yet implemented\n");
1129         }
1130     }
1131     if (apply_defdispwin) {
1132         sps->output_window.left_offset   += sps->vui.def_disp_win.left_offset;
1133         sps->output_window.right_offset  += sps->vui.def_disp_win.right_offset;
1134         sps->output_window.top_offset    += sps->vui.def_disp_win.top_offset;
1135         sps->output_window.bottom_offset += sps->vui.def_disp_win.bottom_offset;
1136     }
1137
1138     ow = &sps->output_window;
1139     if (ow->left_offset >= INT_MAX - ow->right_offset     ||
1140         ow->top_offset  >= INT_MAX - ow->bottom_offset    ||
1141         ow->left_offset + ow->right_offset  >= sps->width ||
1142         ow->top_offset  + ow->bottom_offset >= sps->height) {
1143         av_log(avctx, AV_LOG_WARNING, "Invalid cropping offsets: %u/%u/%u/%u\n",
1144                ow->left_offset, ow->right_offset, ow->top_offset, ow->bottom_offset);
1145         if (avctx->err_recognition & AV_EF_EXPLODE) {
1146             return AVERROR_INVALIDDATA;
1147         }
1148         av_log(avctx, AV_LOG_WARNING,
1149                "Displaying the whole video surface.\n");
1150         memset(ow, 0, sizeof(*ow));
1151         memset(&sps->pic_conf_win, 0, sizeof(sps->pic_conf_win));
1152     }
1153
1154     // Inferred parameters
1155     sps->log2_ctb_size = sps->log2_min_cb_size +
1156                          sps->log2_diff_max_min_coding_block_size;
1157     sps->log2_min_pu_size = sps->log2_min_cb_size - 1;
1158
1159     if (sps->log2_ctb_size > HEVC_MAX_LOG2_CTB_SIZE) {
1160         av_log(avctx, AV_LOG_ERROR, "CTB size out of range: 2^%d\n", sps->log2_ctb_size);
1161         return AVERROR_INVALIDDATA;
1162     }
1163     if (sps->log2_ctb_size < 4) {
1164         av_log(avctx,
1165                AV_LOG_ERROR,
1166                "log2_ctb_size %d differs from the bounds of any known profile\n",
1167                sps->log2_ctb_size);
1168         avpriv_request_sample(avctx, "log2_ctb_size %d", sps->log2_ctb_size);
1169         return AVERROR_INVALIDDATA;
1170     }
1171
1172     sps->ctb_width  = (sps->width  + (1 << sps->log2_ctb_size) - 1) >> sps->log2_ctb_size;
1173     sps->ctb_height = (sps->height + (1 << sps->log2_ctb_size) - 1) >> sps->log2_ctb_size;
1174     sps->ctb_size   = sps->ctb_width * sps->ctb_height;
1175
1176     sps->min_cb_width  = sps->width  >> sps->log2_min_cb_size;
1177     sps->min_cb_height = sps->height >> sps->log2_min_cb_size;
1178     sps->min_tb_width  = sps->width  >> sps->log2_min_tb_size;
1179     sps->min_tb_height = sps->height >> sps->log2_min_tb_size;
1180     sps->min_pu_width  = sps->width  >> sps->log2_min_pu_size;
1181     sps->min_pu_height = sps->height >> sps->log2_min_pu_size;
1182     sps->tb_mask       = (1 << (sps->log2_ctb_size - sps->log2_min_tb_size)) - 1;
1183
1184     sps->qp_bd_offset = 6 * (sps->bit_depth - 8);
1185
1186     if (av_mod_uintp2(sps->width, sps->log2_min_cb_size) ||
1187         av_mod_uintp2(sps->height, sps->log2_min_cb_size)) {
1188         av_log(avctx, AV_LOG_ERROR, "Invalid coded frame dimensions.\n");
1189         return AVERROR_INVALIDDATA;
1190     }
1191
1192     if (sps->max_transform_hierarchy_depth_inter > sps->log2_ctb_size - sps->log2_min_tb_size) {
1193         av_log(avctx, AV_LOG_ERROR, "max_transform_hierarchy_depth_inter out of range: %d\n",
1194                sps->max_transform_hierarchy_depth_inter);
1195         return AVERROR_INVALIDDATA;
1196     }
1197     if (sps->max_transform_hierarchy_depth_intra > sps->log2_ctb_size - sps->log2_min_tb_size) {
1198         av_log(avctx, AV_LOG_ERROR, "max_transform_hierarchy_depth_intra out of range: %d\n",
1199                sps->max_transform_hierarchy_depth_intra);
1200         return AVERROR_INVALIDDATA;
1201     }
1202     if (sps->log2_max_trafo_size > FFMIN(sps->log2_ctb_size, 5)) {
1203         av_log(avctx, AV_LOG_ERROR,
1204                "max transform block size out of range: %d\n",
1205                sps->log2_max_trafo_size);
1206         return AVERROR_INVALIDDATA;
1207     }
1208
1209     if (get_bits_left(gb) < 0) {
1210         av_log(avctx, AV_LOG_ERROR,
1211                "Overread SPS by %d bits\n", -get_bits_left(gb));
1212         return AVERROR_INVALIDDATA;
1213     }
1214
1215     return 0;
1216 }
1217
1218 int ff_hevc_decode_nal_sps(GetBitContext *gb, AVCodecContext *avctx,
1219                            HEVCParamSets *ps, int apply_defdispwin)
1220 {
1221     HEVCSPS *sps;
1222     AVBufferRef *sps_buf = av_buffer_allocz(sizeof(*sps));
1223     unsigned int sps_id;
1224     int ret;
1225     ptrdiff_t nal_size;
1226
1227     if (!sps_buf)
1228         return AVERROR(ENOMEM);
1229     sps = (HEVCSPS*)sps_buf->data;
1230
1231     av_log(avctx, AV_LOG_DEBUG, "Decoding SPS\n");
1232
1233     nal_size = gb->buffer_end - gb->buffer;
1234     if (nal_size > sizeof(sps->data)) {
1235         av_log(avctx, AV_LOG_WARNING, "Truncating likely oversized SPS "
1236                "(%"PTRDIFF_SPECIFIER" > %"SIZE_SPECIFIER")\n",
1237                nal_size, sizeof(sps->data));
1238         sps->data_size = sizeof(sps->data);
1239     } else {
1240         sps->data_size = nal_size;
1241     }
1242     memcpy(sps->data, gb->buffer, sps->data_size);
1243
1244     ret = ff_hevc_parse_sps(sps, gb, &sps_id,
1245                             apply_defdispwin,
1246                             ps->vps_list, avctx);
1247     if (ret < 0) {
1248         av_buffer_unref(&sps_buf);
1249         return ret;
1250     }
1251
1252     if (avctx->debug & FF_DEBUG_BITSTREAM) {
1253         av_log(avctx, AV_LOG_DEBUG,
1254                "Parsed SPS: id %d; coded wxh: %dx%d; "
1255                "cropped wxh: %dx%d; pix_fmt: %s.\n",
1256                sps_id, sps->width, sps->height,
1257                sps->width - (sps->output_window.left_offset + sps->output_window.right_offset),
1258                sps->height - (sps->output_window.top_offset + sps->output_window.bottom_offset),
1259                av_get_pix_fmt_name(sps->pix_fmt));
1260     }
1261
1262     /* check if this is a repeat of an already parsed SPS, then keep the
1263      * original one.
1264      * otherwise drop all PPSes that depend on it */
1265     if (ps->sps_list[sps_id] &&
1266         !memcmp(ps->sps_list[sps_id]->data, sps_buf->data, sps_buf->size)) {
1267         av_buffer_unref(&sps_buf);
1268     } else {
1269         remove_sps(ps, sps_id);
1270         ps->sps_list[sps_id] = sps_buf;
1271     }
1272
1273     return 0;
1274 }
1275
1276 static void hevc_pps_free(void *opaque, uint8_t *data)
1277 {
1278     HEVCPPS *pps = (HEVCPPS*)data;
1279
1280     av_freep(&pps->column_width);
1281     av_freep(&pps->row_height);
1282     av_freep(&pps->col_bd);
1283     av_freep(&pps->row_bd);
1284     av_freep(&pps->col_idxX);
1285     av_freep(&pps->ctb_addr_rs_to_ts);
1286     av_freep(&pps->ctb_addr_ts_to_rs);
1287     av_freep(&pps->tile_pos_rs);
1288     av_freep(&pps->tile_id);
1289     av_freep(&pps->min_tb_addr_zs_tab);
1290
1291     av_freep(&pps);
1292 }
1293
1294 static int pps_range_extensions(GetBitContext *gb, AVCodecContext *avctx,
1295                                 HEVCPPS *pps, HEVCSPS *sps) {
1296     int i;
1297
1298     if (pps->transform_skip_enabled_flag) {
1299         pps->log2_max_transform_skip_block_size = get_ue_golomb_long(gb) + 2;
1300     }
1301     pps->cross_component_prediction_enabled_flag = get_bits1(gb);
1302     pps->chroma_qp_offset_list_enabled_flag = get_bits1(gb);
1303     if (pps->chroma_qp_offset_list_enabled_flag) {
1304         pps->diff_cu_chroma_qp_offset_depth = get_ue_golomb_long(gb);
1305         pps->chroma_qp_offset_list_len_minus1 = get_ue_golomb_long(gb);
1306         if (pps->chroma_qp_offset_list_len_minus1 > 5) {
1307             av_log(avctx, AV_LOG_ERROR,
1308                    "chroma_qp_offset_list_len_minus1 shall be in the range [0, 5].\n");
1309             return AVERROR_INVALIDDATA;
1310         }
1311         for (i = 0; i <= pps->chroma_qp_offset_list_len_minus1; i++) {
1312             pps->cb_qp_offset_list[i] = get_se_golomb_long(gb);
1313             if (pps->cb_qp_offset_list[i]) {
1314                 av_log(avctx, AV_LOG_WARNING,
1315                        "cb_qp_offset_list not tested yet.\n");
1316             }
1317             pps->cr_qp_offset_list[i] = get_se_golomb_long(gb);
1318             if (pps->cr_qp_offset_list[i]) {
1319                 av_log(avctx, AV_LOG_WARNING,
1320                        "cb_qp_offset_list not tested yet.\n");
1321             }
1322         }
1323     }
1324     pps->log2_sao_offset_scale_luma = get_ue_golomb_long(gb);
1325     pps->log2_sao_offset_scale_chroma = get_ue_golomb_long(gb);
1326
1327     return(0);
1328 }
1329
1330 static inline int setup_pps(AVCodecContext *avctx, GetBitContext *gb,
1331                             HEVCPPS *pps, HEVCSPS *sps)
1332 {
1333     int log2_diff;
1334     int pic_area_in_ctbs;
1335     int i, j, x, y, ctb_addr_rs, tile_id;
1336
1337     // Inferred parameters
1338     pps->col_bd   = av_malloc_array(pps->num_tile_columns + 1, sizeof(*pps->col_bd));
1339     pps->row_bd   = av_malloc_array(pps->num_tile_rows + 1,    sizeof(*pps->row_bd));
1340     pps->col_idxX = av_malloc_array(sps->ctb_width,    sizeof(*pps->col_idxX));
1341     if (!pps->col_bd || !pps->row_bd || !pps->col_idxX)
1342         return AVERROR(ENOMEM);
1343
1344     if (pps->uniform_spacing_flag) {
1345         if (!pps->column_width) {
1346             pps->column_width = av_malloc_array(pps->num_tile_columns, sizeof(*pps->column_width));
1347             pps->row_height   = av_malloc_array(pps->num_tile_rows,    sizeof(*pps->row_height));
1348         }
1349         if (!pps->column_width || !pps->row_height)
1350             return AVERROR(ENOMEM);
1351
1352         for (i = 0; i < pps->num_tile_columns; i++) {
1353             pps->column_width[i] = ((i + 1) * sps->ctb_width) / pps->num_tile_columns -
1354                                    (i * sps->ctb_width) / pps->num_tile_columns;
1355         }
1356
1357         for (i = 0; i < pps->num_tile_rows; i++) {
1358             pps->row_height[i] = ((i + 1) * sps->ctb_height) / pps->num_tile_rows -
1359                                  (i * sps->ctb_height) / pps->num_tile_rows;
1360         }
1361     }
1362
1363     pps->col_bd[0] = 0;
1364     for (i = 0; i < pps->num_tile_columns; i++)
1365         pps->col_bd[i + 1] = pps->col_bd[i] + pps->column_width[i];
1366
1367     pps->row_bd[0] = 0;
1368     for (i = 0; i < pps->num_tile_rows; i++)
1369         pps->row_bd[i + 1] = pps->row_bd[i] + pps->row_height[i];
1370
1371     for (i = 0, j = 0; i < sps->ctb_width; i++) {
1372         if (i > pps->col_bd[j])
1373             j++;
1374         pps->col_idxX[i] = j;
1375     }
1376
1377     /**
1378      * 6.5
1379      */
1380     pic_area_in_ctbs     = sps->ctb_width    * sps->ctb_height;
1381
1382     pps->ctb_addr_rs_to_ts = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->ctb_addr_rs_to_ts));
1383     pps->ctb_addr_ts_to_rs = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->ctb_addr_ts_to_rs));
1384     pps->tile_id           = av_malloc_array(pic_area_in_ctbs,    sizeof(*pps->tile_id));
1385     pps->min_tb_addr_zs_tab = av_malloc_array((sps->tb_mask+2) * (sps->tb_mask+2), sizeof(*pps->min_tb_addr_zs_tab));
1386     if (!pps->ctb_addr_rs_to_ts || !pps->ctb_addr_ts_to_rs ||
1387         !pps->tile_id || !pps->min_tb_addr_zs_tab) {
1388         return AVERROR(ENOMEM);
1389     }
1390
1391     for (ctb_addr_rs = 0; ctb_addr_rs < pic_area_in_ctbs; ctb_addr_rs++) {
1392         int tb_x   = ctb_addr_rs % sps->ctb_width;
1393         int tb_y   = ctb_addr_rs / sps->ctb_width;
1394         int tile_x = 0;
1395         int tile_y = 0;
1396         int val    = 0;
1397
1398         for (i = 0; i < pps->num_tile_columns; i++) {
1399             if (tb_x < pps->col_bd[i + 1]) {
1400                 tile_x = i;
1401                 break;
1402             }
1403         }
1404
1405         for (i = 0; i < pps->num_tile_rows; i++) {
1406             if (tb_y < pps->row_bd[i + 1]) {
1407                 tile_y = i;
1408                 break;
1409             }
1410         }
1411
1412         for (i = 0; i < tile_x; i++)
1413             val += pps->row_height[tile_y] * pps->column_width[i];
1414         for (i = 0; i < tile_y; i++)
1415             val += sps->ctb_width * pps->row_height[i];
1416
1417         val += (tb_y - pps->row_bd[tile_y]) * pps->column_width[tile_x] +
1418                tb_x - pps->col_bd[tile_x];
1419
1420         pps->ctb_addr_rs_to_ts[ctb_addr_rs] = val;
1421         pps->ctb_addr_ts_to_rs[val]         = ctb_addr_rs;
1422     }
1423
1424     for (j = 0, tile_id = 0; j < pps->num_tile_rows; j++)
1425         for (i = 0; i < pps->num_tile_columns; i++, tile_id++)
1426             for (y = pps->row_bd[j]; y < pps->row_bd[j + 1]; y++)
1427                 for (x = pps->col_bd[i]; x < pps->col_bd[i + 1]; x++)
1428                     pps->tile_id[pps->ctb_addr_rs_to_ts[y * sps->ctb_width + x]] = tile_id;
1429
1430     pps->tile_pos_rs = av_malloc_array(tile_id, sizeof(*pps->tile_pos_rs));
1431     if (!pps->tile_pos_rs)
1432         return AVERROR(ENOMEM);
1433
1434     for (j = 0; j < pps->num_tile_rows; j++)
1435         for (i = 0; i < pps->num_tile_columns; i++)
1436             pps->tile_pos_rs[j * pps->num_tile_columns + i] =
1437                 pps->row_bd[j] * sps->ctb_width + pps->col_bd[i];
1438
1439     log2_diff = sps->log2_ctb_size - sps->log2_min_tb_size;
1440     pps->min_tb_addr_zs = &pps->min_tb_addr_zs_tab[1*(sps->tb_mask+2)+1];
1441     for (y = 0; y < sps->tb_mask+2; y++) {
1442         pps->min_tb_addr_zs_tab[y*(sps->tb_mask+2)] = -1;
1443         pps->min_tb_addr_zs_tab[y]    = -1;
1444     }
1445     for (y = 0; y < sps->tb_mask+1; y++) {
1446         for (x = 0; x < sps->tb_mask+1; x++) {
1447             int tb_x = x >> log2_diff;
1448             int tb_y = y >> log2_diff;
1449             int rs   = sps->ctb_width * tb_y + tb_x;
1450             int val  = pps->ctb_addr_rs_to_ts[rs] << (log2_diff * 2);
1451             for (i = 0; i < log2_diff; i++) {
1452                 int m = 1 << i;
1453                 val += (m & x ? m * m : 0) + (m & y ? 2 * m * m : 0);
1454             }
1455             pps->min_tb_addr_zs[y * (sps->tb_mask+2) + x] = val;
1456         }
1457     }
1458
1459     return 0;
1460 }
1461
1462 int ff_hevc_decode_nal_pps(GetBitContext *gb, AVCodecContext *avctx,
1463                            HEVCParamSets *ps)
1464 {
1465     HEVCSPS      *sps = NULL;
1466     int i, ret = 0;
1467     unsigned int pps_id = 0;
1468     ptrdiff_t nal_size;
1469     unsigned log2_parallel_merge_level_minus2;
1470
1471     AVBufferRef *pps_buf;
1472     HEVCPPS *pps = av_mallocz(sizeof(*pps));
1473
1474     if (!pps)
1475         return AVERROR(ENOMEM);
1476
1477     pps_buf = av_buffer_create((uint8_t *)pps, sizeof(*pps),
1478                                hevc_pps_free, NULL, 0);
1479     if (!pps_buf) {
1480         av_freep(&pps);
1481         return AVERROR(ENOMEM);
1482     }
1483
1484     av_log(avctx, AV_LOG_DEBUG, "Decoding PPS\n");
1485
1486     nal_size = gb->buffer_end - gb->buffer;
1487     if (nal_size > sizeof(pps->data)) {
1488         av_log(avctx, AV_LOG_WARNING, "Truncating likely oversized PPS "
1489                "(%"PTRDIFF_SPECIFIER" > %"SIZE_SPECIFIER")\n",
1490                nal_size, sizeof(pps->data));
1491         pps->data_size = sizeof(pps->data);
1492     } else {
1493         pps->data_size = nal_size;
1494     }
1495     memcpy(pps->data, gb->buffer, pps->data_size);
1496
1497     // Default values
1498     pps->loop_filter_across_tiles_enabled_flag = 1;
1499     pps->num_tile_columns                      = 1;
1500     pps->num_tile_rows                         = 1;
1501     pps->uniform_spacing_flag                  = 1;
1502     pps->disable_dbf                           = 0;
1503     pps->beta_offset                           = 0;
1504     pps->tc_offset                             = 0;
1505     pps->log2_max_transform_skip_block_size    = 2;
1506
1507     // Coded parameters
1508     pps_id = get_ue_golomb_long(gb);
1509     if (pps_id >= HEVC_MAX_PPS_COUNT) {
1510         av_log(avctx, AV_LOG_ERROR, "PPS id out of range: %d\n", pps_id);
1511         ret = AVERROR_INVALIDDATA;
1512         goto err;
1513     }
1514     pps->sps_id = get_ue_golomb_long(gb);
1515     if (pps->sps_id >= HEVC_MAX_SPS_COUNT) {
1516         av_log(avctx, AV_LOG_ERROR, "SPS id out of range: %d\n", pps->sps_id);
1517         ret = AVERROR_INVALIDDATA;
1518         goto err;
1519     }
1520     if (!ps->sps_list[pps->sps_id]) {
1521         av_log(avctx, AV_LOG_ERROR, "SPS %u does not exist.\n", pps->sps_id);
1522         ret = AVERROR_INVALIDDATA;
1523         goto err;
1524     }
1525     sps = (HEVCSPS *)ps->sps_list[pps->sps_id]->data;
1526
1527     pps->dependent_slice_segments_enabled_flag = get_bits1(gb);
1528     pps->output_flag_present_flag              = get_bits1(gb);
1529     pps->num_extra_slice_header_bits           = get_bits(gb, 3);
1530
1531     pps->sign_data_hiding_flag = get_bits1(gb);
1532
1533     pps->cabac_init_present_flag = get_bits1(gb);
1534
1535     pps->num_ref_idx_l0_default_active = get_ue_golomb_long(gb) + 1;
1536     pps->num_ref_idx_l1_default_active = get_ue_golomb_long(gb) + 1;
1537
1538     pps->pic_init_qp_minus26 = get_se_golomb(gb);
1539
1540     pps->constrained_intra_pred_flag = get_bits1(gb);
1541     pps->transform_skip_enabled_flag = get_bits1(gb);
1542
1543     pps->cu_qp_delta_enabled_flag = get_bits1(gb);
1544     pps->diff_cu_qp_delta_depth   = 0;
1545     if (pps->cu_qp_delta_enabled_flag)
1546         pps->diff_cu_qp_delta_depth = get_ue_golomb_long(gb);
1547
1548     if (pps->diff_cu_qp_delta_depth < 0 ||
1549         pps->diff_cu_qp_delta_depth > sps->log2_diff_max_min_coding_block_size) {
1550         av_log(avctx, AV_LOG_ERROR, "diff_cu_qp_delta_depth %d is invalid\n",
1551                pps->diff_cu_qp_delta_depth);
1552         ret = AVERROR_INVALIDDATA;
1553         goto err;
1554     }
1555
1556     pps->cb_qp_offset = get_se_golomb(gb);
1557     if (pps->cb_qp_offset < -12 || pps->cb_qp_offset > 12) {
1558         av_log(avctx, AV_LOG_ERROR, "pps_cb_qp_offset out of range: %d\n",
1559                pps->cb_qp_offset);
1560         ret = AVERROR_INVALIDDATA;
1561         goto err;
1562     }
1563     pps->cr_qp_offset = get_se_golomb(gb);
1564     if (pps->cr_qp_offset < -12 || pps->cr_qp_offset > 12) {
1565         av_log(avctx, AV_LOG_ERROR, "pps_cr_qp_offset out of range: %d\n",
1566                pps->cr_qp_offset);
1567         ret = AVERROR_INVALIDDATA;
1568         goto err;
1569     }
1570     pps->pic_slice_level_chroma_qp_offsets_present_flag = get_bits1(gb);
1571
1572     pps->weighted_pred_flag   = get_bits1(gb);
1573     pps->weighted_bipred_flag = get_bits1(gb);
1574
1575     pps->transquant_bypass_enable_flag    = get_bits1(gb);
1576     pps->tiles_enabled_flag               = get_bits1(gb);
1577     pps->entropy_coding_sync_enabled_flag = get_bits1(gb);
1578
1579     if (pps->tiles_enabled_flag) {
1580         pps->num_tile_columns = get_ue_golomb_long(gb) + 1;
1581         pps->num_tile_rows    = get_ue_golomb_long(gb) + 1;
1582         if (pps->num_tile_columns <= 0 ||
1583             pps->num_tile_columns >= sps->width) {
1584             av_log(avctx, AV_LOG_ERROR, "num_tile_columns_minus1 out of range: %d\n",
1585                    pps->num_tile_columns - 1);
1586             ret = AVERROR_INVALIDDATA;
1587             goto err;
1588         }
1589         if (pps->num_tile_rows <= 0 ||
1590             pps->num_tile_rows >= sps->height) {
1591             av_log(avctx, AV_LOG_ERROR, "num_tile_rows_minus1 out of range: %d\n",
1592                    pps->num_tile_rows - 1);
1593             ret = AVERROR_INVALIDDATA;
1594             goto err;
1595         }
1596
1597         pps->column_width = av_malloc_array(pps->num_tile_columns, sizeof(*pps->column_width));
1598         pps->row_height   = av_malloc_array(pps->num_tile_rows,    sizeof(*pps->row_height));
1599         if (!pps->column_width || !pps->row_height) {
1600             ret = AVERROR(ENOMEM);
1601             goto err;
1602         }
1603
1604         pps->uniform_spacing_flag = get_bits1(gb);
1605         if (!pps->uniform_spacing_flag) {
1606             uint64_t sum = 0;
1607             for (i = 0; i < pps->num_tile_columns - 1; i++) {
1608                 pps->column_width[i] = get_ue_golomb_long(gb) + 1;
1609                 sum                 += pps->column_width[i];
1610             }
1611             if (sum >= sps->ctb_width) {
1612                 av_log(avctx, AV_LOG_ERROR, "Invalid tile widths.\n");
1613                 ret = AVERROR_INVALIDDATA;
1614                 goto err;
1615             }
1616             pps->column_width[pps->num_tile_columns - 1] = sps->ctb_width - sum;
1617
1618             sum = 0;
1619             for (i = 0; i < pps->num_tile_rows - 1; i++) {
1620                 pps->row_height[i] = get_ue_golomb_long(gb) + 1;
1621                 sum               += pps->row_height[i];
1622             }
1623             if (sum >= sps->ctb_height) {
1624                 av_log(avctx, AV_LOG_ERROR, "Invalid tile heights.\n");
1625                 ret = AVERROR_INVALIDDATA;
1626                 goto err;
1627             }
1628             pps->row_height[pps->num_tile_rows - 1] = sps->ctb_height - sum;
1629         }
1630         pps->loop_filter_across_tiles_enabled_flag = get_bits1(gb);
1631     }
1632
1633     pps->seq_loop_filter_across_slices_enabled_flag = get_bits1(gb);
1634
1635     pps->deblocking_filter_control_present_flag = get_bits1(gb);
1636     if (pps->deblocking_filter_control_present_flag) {
1637         pps->deblocking_filter_override_enabled_flag = get_bits1(gb);
1638         pps->disable_dbf                             = get_bits1(gb);
1639         if (!pps->disable_dbf) {
1640             int beta_offset_div2 = get_se_golomb(gb);
1641             int tc_offset_div2   = get_se_golomb(gb) ;
1642             if (beta_offset_div2 < -6 || beta_offset_div2 > 6) {
1643                 av_log(avctx, AV_LOG_ERROR, "pps_beta_offset_div2 out of range: %d\n",
1644                        beta_offset_div2);
1645                 ret = AVERROR_INVALIDDATA;
1646                 goto err;
1647             }
1648             if (tc_offset_div2 < -6 || tc_offset_div2 > 6) {
1649                 av_log(avctx, AV_LOG_ERROR, "pps_tc_offset_div2 out of range: %d\n",
1650                        tc_offset_div2);
1651                 ret = AVERROR_INVALIDDATA;
1652                 goto err;
1653             }
1654             pps->beta_offset = 2 * beta_offset_div2;
1655             pps->tc_offset   = 2 *   tc_offset_div2;
1656         }
1657     }
1658
1659     pps->scaling_list_data_present_flag = get_bits1(gb);
1660     if (pps->scaling_list_data_present_flag) {
1661         set_default_scaling_list_data(&pps->scaling_list);
1662         ret = scaling_list_data(gb, avctx, &pps->scaling_list, sps);
1663         if (ret < 0)
1664             goto err;
1665     }
1666     pps->lists_modification_present_flag = get_bits1(gb);
1667     log2_parallel_merge_level_minus2     = get_ue_golomb_long(gb);
1668     if (log2_parallel_merge_level_minus2 > sps->log2_ctb_size) {
1669         av_log(avctx, AV_LOG_ERROR, "log2_parallel_merge_level_minus2 out of range: %d\n",
1670                log2_parallel_merge_level_minus2);
1671         ret = AVERROR_INVALIDDATA;
1672         goto err;
1673     }
1674     pps->log2_parallel_merge_level       = log2_parallel_merge_level_minus2 + 2;
1675
1676     pps->slice_header_extension_present_flag = get_bits1(gb);
1677
1678     if (get_bits1(gb)) { // pps_extension_present_flag
1679         int pps_range_extensions_flag = get_bits1(gb);
1680         /* int pps_extension_7bits = */ get_bits(gb, 7);
1681         if (sps->ptl.general_ptl.profile_idc == FF_PROFILE_HEVC_REXT && pps_range_extensions_flag) {
1682             if ((ret = pps_range_extensions(gb, avctx, pps, sps)) < 0)
1683                 goto err;
1684         }
1685     }
1686
1687     ret = setup_pps(avctx, gb, pps, sps);
1688     if (ret < 0)
1689         goto err;
1690
1691     if (get_bits_left(gb) < 0) {
1692         av_log(avctx, AV_LOG_ERROR,
1693                "Overread PPS by %d bits\n", -get_bits_left(gb));
1694         goto err;
1695     }
1696
1697     remove_pps(ps, pps_id);
1698     ps->pps_list[pps_id] = pps_buf;
1699
1700     return 0;
1701
1702 err:
1703     av_buffer_unref(&pps_buf);
1704     return ret;
1705 }
1706
1707 int ff_hevc_compute_poc(const HEVCSPS *sps, int pocTid0, int poc_lsb, int nal_unit_type)
1708 {
1709     int max_poc_lsb  = 1 << sps->log2_max_poc_lsb;
1710     int prev_poc_lsb = pocTid0 % max_poc_lsb;
1711     int prev_poc_msb = pocTid0 - prev_poc_lsb;
1712     int poc_msb;
1713
1714     if (poc_lsb < prev_poc_lsb && prev_poc_lsb - poc_lsb >= max_poc_lsb / 2)
1715         poc_msb = prev_poc_msb + max_poc_lsb;
1716     else if (poc_lsb > prev_poc_lsb && poc_lsb - prev_poc_lsb > max_poc_lsb / 2)
1717         poc_msb = prev_poc_msb - max_poc_lsb;
1718     else
1719         poc_msb = prev_poc_msb;
1720
1721     // For BLA picture types, POCmsb is set to 0.
1722     if (nal_unit_type == HEVC_NAL_BLA_W_LP   ||
1723         nal_unit_type == HEVC_NAL_BLA_W_RADL ||
1724         nal_unit_type == HEVC_NAL_BLA_N_LP)
1725         poc_msb = 0;
1726
1727     return poc_msb + poc_lsb;
1728 }