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

   1 /*
   2  * HEVC common code
   3  *
   4  * This file is part of FFmpeg.
   5  *
   6  * FFmpeg is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * FFmpeg is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with FFmpeg; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #include <string.h>
  22
  23 #include "config.h"
  24
  25 #include "libavutil/intreadwrite.h"
  26 #include "libavutil/mem.h"
  27
  28 #include "hevc.h"
  29
  30 /* FIXME: This is adapted from ff_h264_decode_nal, avoiding duplication
  31  * between these functions would be nice. */
  32 int ff_hevc_extract_rbsp(HEVCContext *s, const uint8_t *src, int length,
  33                          HEVCNAL *nal)
  34 {
  35     int i, si, di;
  36     uint8_t *dst;
  37
  38     if (s)
  39         nal->skipped_bytes = 0;
  40 #define STARTCODE_TEST                                                  \
  41         if (i + 2 < length && src[i + 1] == 0 && src[i + 2] <= 3) {     \
  42             if (src[i + 2] != 3) {                                      \
  43                 /* startcode, so we must be past the end */             \
  44                 length = i;                                             \
  45             }                                                           \
  46             break;                                                      \
  47         }
  48 #if HAVE_FAST_UNALIGNED
  49 #define FIND_FIRST_ZERO                                                 \
  50         if (i > 0 && !src[i])                                           \
  51             i--;                                                        \
  52         while (src[i])                                                  \
  53             i++
  54 #if HAVE_FAST_64BIT
  55     for (i = 0; i + 1 < length; i += 9) {
  56         if (!((~AV_RN64A(src + i) &
  57                (AV_RN64A(src + i) - 0x0100010001000101ULL)) &
  58               0x8000800080008080ULL))
  59             continue;
  60         FIND_FIRST_ZERO;
  61         STARTCODE_TEST;
  62         i -= 7;
  63     }
  64 #else
  65     for (i = 0; i + 1 < length; i += 5) {
  66         if (!((~AV_RN32A(src + i) &
  67                (AV_RN32A(src + i) - 0x01000101U)) &
  68               0x80008080U))
  69             continue;
  70         FIND_FIRST_ZERO;
  71         STARTCODE_TEST;
  72         i -= 3;
  73     }
  74 #endif /* HAVE_FAST_64BIT */
  75 #else
  76     for (i = 0; i + 1 < length; i += 2) {
  77         if (src[i])
  78             continue;
  79         if (i > 0 && src[i - 1] == 0)
  80             i--;
  81         STARTCODE_TEST;
  82     }
  83 #endif /* HAVE_FAST_UNALIGNED */
  84
  85     if (i >= length - 1) { // no escaped 0
  86         nal->data     =
  87         nal->raw_data = src;
  88         nal->size     =
  89         nal->raw_size = length;
  90         return length;
  91     }
  92
  93     av_fast_malloc(&nal->rbsp_buffer, &nal->rbsp_buffer_size,
  94                    length + FF_INPUT_BUFFER_PADDING_SIZE);
  95     if (!nal->rbsp_buffer)
  96         return AVERROR(ENOMEM);
  97
  98     dst = nal->rbsp_buffer;
  99
 100     memcpy(dst, src, i);
 101     si = di = i;
 102     while (si + 2 < length) {
 103         // remove escapes (very rare 1:2^22)
 104         if (src[si + 2] > 3) {
 105             dst[di++] = src[si++];
 106             dst[di++] = src[si++];
 107         } else if (src[si] == 0 && src[si + 1] == 0) {
 108             if (src[si + 2] == 3) { // escape
 109                 dst[di++] = 0;
 110                 dst[di++] = 0;
 111                 si       += 3;
 112
 113                 if (s && nal->skipped_bytes_pos) {
 114                     nal->skipped_bytes++;
 115                     if (nal->skipped_bytes_pos_size < nal->skipped_bytes) {
 116                         nal->skipped_bytes_pos_size *= 2;
 117                         av_assert0(nal->skipped_bytes_pos_size >= nal->skipped_bytes);
 118                         av_reallocp_array(&nal->skipped_bytes_pos,
 119                                 nal->skipped_bytes_pos_size,
 120                                 sizeof(*nal->skipped_bytes_pos));
 121                         if (!nal->skipped_bytes_pos) {
 122                             nal->skipped_bytes_pos_size = 0;
 123                             return AVERROR(ENOMEM);
 124                         }
 125                     }
 126                     if (nal->skipped_bytes_pos)
 127                         nal->skipped_bytes_pos[nal->skipped_bytes-1] = di - 1;
 128                 }
 129                 continue;
 130             } else // next start code
 131                 goto nsc;
 132         }
 133
 134         dst[di++] = src[si++];
 135     }
 136     while (si < length)
 137         dst[di++] = src[si++];
 138
 139 nsc:
 140     memset(dst + di, 0, FF_INPUT_BUFFER_PADDING_SIZE);
 141
 142     nal->data = dst;
 143     nal->size = di;
 144     nal->raw_data = src;
 145     nal->raw_size = si;
 146     return si;
 147 }
 148
 149 /**
 150  * @return AVERROR_INVALIDDATA if the packet is not a valid NAL unit,
 151  * 0 if the unit should be skipped, 1 otherwise
 152  */
 153 static int hls_nal_unit(HEVCNAL *nal, AVCodecContext *avctx)
 154 {
 155     GetBitContext *gb = &nal->gb;
 156     int nuh_layer_id;
 157
 158     if (get_bits1(gb) != 0)
 159         return AVERROR_INVALIDDATA;
 160
 161     nal->type = get_bits(gb, 6);
 162
 163     nuh_layer_id   = get_bits(gb, 6);
 164     nal->temporal_id = get_bits(gb, 3) - 1;
 165     if (nal->temporal_id < 0)
 166         return AVERROR_INVALIDDATA;
 167
 168     av_log(avctx, AV_LOG_DEBUG,
 169            "nal_unit_type: %d, nuh_layer_id: %d, temporal_id: %d\n",
 170            nal->type, nuh_layer_id, nal->temporal_id);
 171
 172     return nuh_layer_id == 0;
 173 }
 174
 175
 176 int ff_hevc_split_packet(HEVCContext *s, HEVCPacket *pkt, const uint8_t *buf, int length,
 177                          AVCodecContext *avctx, int is_nalff, int nal_length_size)
 178 {
 179     int consumed, ret = 0;
 180
 181     pkt->nb_nals = 0;
 182     while (length >= 4) {
 183         HEVCNAL *nal;
 184         int extract_length = 0;
 185
 186         if (is_nalff) {
 187             int i;
 188             for (i = 0; i < nal_length_size; i++)
 189                 extract_length = (extract_length << 8) | buf[i];
 190             buf    += nal_length_size;
 191             length -= nal_length_size;
 192
 193             if (extract_length > length) {
 194                 av_log(avctx, AV_LOG_ERROR, "Invalid NAL unit size.\n");
 195                 return AVERROR_INVALIDDATA;
 196             }
 197         } else {
 198             /* search start code */
 199             while (buf[0] != 0 || buf[1] != 0 || buf[2] != 1) {
 200                 ++buf;
 201                 --length;
 202                 if (length < 4) {
 203                     av_log(avctx, AV_LOG_ERROR, "No start code is found.\n");
 204                     return AVERROR_INVALIDDATA;
 205                 }
 206             }
 207
 208             buf           += 3;
 209             length        -= 3;
 210             extract_length = length;
 211         }
 212
 213         if (pkt->nals_allocated < pkt->nb_nals + 1) {
 214             int new_size = pkt->nals_allocated + 1;
 215             void *tmp = av_realloc_array(pkt->nals, new_size, sizeof(*pkt->nals));
 216
 217             if (!tmp)
 218                 return AVERROR(ENOMEM);
 219
 220             pkt->nals = tmp;
 221             memset(pkt->nals + pkt->nals_allocated, 0,
 222                    (new_size - pkt->nals_allocated) * sizeof(*pkt->nals));
 223
 224             nal = &pkt->nals[pkt->nb_nals];
 225             nal->skipped_bytes_pos_size = 1024; // initial buffer size
 226             nal->skipped_bytes_pos = av_malloc_array(nal->skipped_bytes_pos_size, sizeof(*nal->skipped_bytes_pos));
 227             if (!nal->skipped_bytes_pos)
 228                 return AVERROR(ENOMEM);
 229
 230             pkt->nals_allocated = new_size;
 231         }
 232         nal = &pkt->nals[pkt->nb_nals];
 233
 234         consumed = ff_hevc_extract_rbsp(s, buf, extract_length, nal);
 235         if (consumed < 0)
 236             return consumed;
 237
 238         pkt->nb_nals++;
 239
 240         ret = init_get_bits8(&nal->gb, nal->data, nal->size);
 241         if (ret < 0)
 242             return ret;
 243
 244         ret = hls_nal_unit(nal, avctx);
 245         if (ret <= 0) {
 246             if (ret < 0) {
 247                 av_log(avctx, AV_LOG_ERROR, "Invalid NAL unit %d, skipping.\n",
 248                        nal->type);
 249             }
 250             pkt->nb_nals--;
 251         }
 252
 253         buf    += consumed;
 254         length -= consumed;
 255     }
 256
 257     return 0;
 258 }
 259