cbs_h264: Add support for pan-scan rectangle SEI messages
[ffmpeg.git] / libavcodec / cbs_h2645.c
1 /*
2  * This file is part of FFmpeg.
3  *
4  * FFmpeg is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * FFmpeg is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with FFmpeg; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
17  */
18
19 #include "libavutil/attributes.h"
20 #include "libavutil/avassert.h"
21
22 #include "bytestream.h"
23 #include "cbs.h"
24 #include "cbs_internal.h"
25 #include "cbs_h264.h"
26 #include "cbs_h265.h"
27 #include "golomb.h"
28 #include "h264.h"
29 #include "h264_sei.h"
30 #include "h2645_parse.h"
31 #include "hevc.h"
32 #include "hevc_sei.h"
33
34
35 static int cbs_read_ue_golomb(CodedBitstreamContext *ctx, GetBitContext *gbc,
36                               const char *name, const int *subscripts,
37                               uint32_t *write_to,
38                               uint32_t range_min, uint32_t range_max)
39 {
40     uint32_t value;
41     int position, i, j;
42     unsigned int k;
43     char bits[65];
44
45     position = get_bits_count(gbc);
46
47     for (i = 0; i < 32; i++) {
48         if (get_bits_left(gbc) < i + 1) {
49             av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid ue-golomb code at "
50                    "%s: bitstream ended.\n", name);
51             return AVERROR_INVALIDDATA;
52         }
53         k = get_bits1(gbc);
54         bits[i] = k ? '1' : '0';
55         if (k)
56             break;
57     }
58     if (i >= 32) {
59         av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid ue-golomb code at "
60                "%s: more than 31 zeroes.\n", name);
61         return AVERROR_INVALIDDATA;
62     }
63     value = 1;
64     for (j = 0; j < i; j++) {
65         k = get_bits1(gbc);
66         bits[i + j + 1] = k ? '1' : '0';
67         value = value << 1 | k;
68     }
69     bits[i + j + 1] = 0;
70     --value;
71
72     if (ctx->trace_enable)
73         ff_cbs_trace_syntax_element(ctx, position, name, subscripts,
74                                     bits, value);
75
76     if (value < range_min || value > range_max) {
77         av_log(ctx->log_ctx, AV_LOG_ERROR, "%s out of range: "
78                "%"PRIu32", but must be in [%"PRIu32",%"PRIu32"].\n",
79                name, value, range_min, range_max);
80         return AVERROR_INVALIDDATA;
81     }
82
83     *write_to = value;
84     return 0;
85 }
86
87 static int cbs_read_se_golomb(CodedBitstreamContext *ctx, GetBitContext *gbc,
88                               const char *name, const int *subscripts,
89                               int32_t *write_to,
90                               int32_t range_min, int32_t range_max)
91 {
92     int32_t value;
93     int position, i, j;
94     unsigned int k;
95     uint32_t v;
96     char bits[65];
97
98     position = get_bits_count(gbc);
99
100     for (i = 0; i < 32; i++) {
101         if (get_bits_left(gbc) < i + 1) {
102             av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid se-golomb code at "
103                    "%s: bitstream ended.\n", name);
104             return AVERROR_INVALIDDATA;
105         }
106         k = get_bits1(gbc);
107         bits[i] = k ? '1' : '0';
108         if (k)
109             break;
110     }
111     if (i >= 32) {
112         av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid se-golomb code at "
113                "%s: more than 31 zeroes.\n", name);
114         return AVERROR_INVALIDDATA;
115     }
116     v = 1;
117     for (j = 0; j < i; j++) {
118         k = get_bits1(gbc);
119         bits[i + j + 1] = k ? '1' : '0';
120         v = v << 1 | k;
121     }
122     bits[i + j + 1] = 0;
123     if (v & 1)
124         value = -(int32_t)(v / 2);
125     else
126         value = v / 2;
127
128     if (ctx->trace_enable)
129         ff_cbs_trace_syntax_element(ctx, position, name, subscripts,
130                                     bits, value);
131
132     if (value < range_min || value > range_max) {
133         av_log(ctx->log_ctx, AV_LOG_ERROR, "%s out of range: "
134                "%"PRId32", but must be in [%"PRId32",%"PRId32"].\n",
135                name, value, range_min, range_max);
136         return AVERROR_INVALIDDATA;
137     }
138
139     *write_to = value;
140     return 0;
141 }
142
143 static int cbs_write_ue_golomb(CodedBitstreamContext *ctx, PutBitContext *pbc,
144                                const char *name, const int *subscripts,
145                                uint32_t value,
146                                uint32_t range_min, uint32_t range_max)
147 {
148     int len;
149
150     if (value < range_min || value > range_max) {
151         av_log(ctx->log_ctx, AV_LOG_ERROR, "%s out of range: "
152                "%"PRIu32", but must be in [%"PRIu32",%"PRIu32"].\n",
153                name, value, range_min, range_max);
154         return AVERROR_INVALIDDATA;
155     }
156     av_assert0(value != UINT32_MAX);
157
158     len = av_log2(value + 1);
159     if (put_bits_left(pbc) < 2 * len + 1)
160         return AVERROR(ENOSPC);
161
162     if (ctx->trace_enable) {
163         char bits[65];
164         int i;
165
166         for (i = 0; i < len; i++)
167             bits[i] = '0';
168         bits[len] = '1';
169         for (i = 0; i < len; i++)
170             bits[len + i + 1] = (value + 1) >> (len - i - 1) & 1 ? '1' : '0';
171         bits[len + len + 1] = 0;
172
173         ff_cbs_trace_syntax_element(ctx, put_bits_count(pbc),
174                                     name, subscripts, bits, value);
175     }
176
177     put_bits(pbc, len, 0);
178     if (len + 1 < 32)
179         put_bits(pbc, len + 1, value + 1);
180     else
181         put_bits32(pbc, value + 1);
182
183     return 0;
184 }
185
186 static int cbs_write_se_golomb(CodedBitstreamContext *ctx, PutBitContext *pbc,
187                                const char *name, const int *subscripts,
188                                int32_t value,
189                                int32_t range_min, int32_t range_max)
190 {
191     int len;
192     uint32_t uvalue;
193
194     if (value < range_min || value > range_max) {
195         av_log(ctx->log_ctx, AV_LOG_ERROR, "%s out of range: "
196                "%"PRId32", but must be in [%"PRId32",%"PRId32"].\n",
197                name, value, range_min, range_max);
198         return AVERROR_INVALIDDATA;
199     }
200     av_assert0(value != INT32_MIN);
201
202     if (value == 0)
203         uvalue = 0;
204     else if (value > 0)
205         uvalue = 2 * (uint32_t)value - 1;
206     else
207         uvalue = 2 * (uint32_t)-value;
208
209     len = av_log2(uvalue + 1);
210     if (put_bits_left(pbc) < 2 * len + 1)
211         return AVERROR(ENOSPC);
212
213     if (ctx->trace_enable) {
214         char bits[65];
215         int i;
216
217         for (i = 0; i < len; i++)
218             bits[i] = '0';
219         bits[len] = '1';
220         for (i = 0; i < len; i++)
221             bits[len + i + 1] = (uvalue + 1) >> (len - i - 1) & 1 ? '1' : '0';
222         bits[len + len + 1] = 0;
223
224         ff_cbs_trace_syntax_element(ctx, put_bits_count(pbc),
225                                     name, subscripts, bits, value);
226     }
227
228     put_bits(pbc, len, 0);
229     if (len + 1 < 32)
230         put_bits(pbc, len + 1, uvalue + 1);
231     else
232         put_bits32(pbc, uvalue + 1);
233
234     return 0;
235 }
236
237 #define HEADER(name) do { \
238         ff_cbs_trace_header(ctx, name); \
239     } while (0)
240
241 #define CHECK(call) do { \
242         err = (call); \
243         if (err < 0) \
244             return err; \
245     } while (0)
246
247 #define FUNC_NAME(rw, codec, name) cbs_ ## codec ## _ ## rw ## _ ## name
248 #define FUNC_H264(rw, name) FUNC_NAME(rw, h264, name)
249 #define FUNC_H265(rw, name) FUNC_NAME(rw, h265, name)
250
251 #define SUBSCRIPTS(subs, ...) (subs > 0 ? ((int[subs + 1]){ subs, __VA_ARGS__ }) : NULL)
252
253 #define u(width, name, range_min, range_max) \
254         xu(width, name, current->name, range_min, range_max, 0)
255 #define flag(name) u(1, name, 0, 1)
256 #define ue(name, range_min, range_max) \
257         xue(name, current->name, range_min, range_max, 0)
258 #define se(name, range_min, range_max) \
259         xse(name, current->name, range_min, range_max, 0)
260
261 #define us(width, name, range_min, range_max, subs, ...) \
262         xu(width, name, current->name, range_min, range_max, subs, __VA_ARGS__)
263 #define flags(name, subs, ...) \
264         xu(1, name, current->name, 0, 1, subs, __VA_ARGS__)
265 #define ues(name, range_min, range_max, subs, ...) \
266         xue(name, current->name, range_min, range_max, subs, __VA_ARGS__)
267 #define ses(name, range_min, range_max, subs, ...) \
268         xse(name, current->name, range_min, range_max, subs, __VA_ARGS__)
269
270 #define fixed(width, name, value) do { \
271         av_unused uint32_t fixed_value = value; \
272         xu(width, name, fixed_value, value, value, 0); \
273     } while (0)
274
275
276 #define READ
277 #define READWRITE read
278 #define RWContext GetBitContext
279
280 #define xu(width, name, var, range_min, range_max, subs, ...) do { \
281         uint32_t value = range_min; \
282         CHECK(ff_cbs_read_unsigned(ctx, rw, width, #name, \
283                                    SUBSCRIPTS(subs, __VA_ARGS__), \
284                                    &value, range_min, range_max)); \
285         var = value; \
286     } while (0)
287 #define xue(name, var, range_min, range_max, subs, ...) do { \
288         uint32_t value = range_min; \
289         CHECK(cbs_read_ue_golomb(ctx, rw, #name, \
290                                  SUBSCRIPTS(subs, __VA_ARGS__), \
291                                  &value, range_min, range_max)); \
292         var = value; \
293     } while (0)
294 #define xse(name, var, range_min, range_max, subs, ...) do { \
295         int32_t value = range_min; \
296         CHECK(cbs_read_se_golomb(ctx, rw, #name, \
297                                  SUBSCRIPTS(subs, __VA_ARGS__), \
298                                  &value, range_min, range_max)); \
299         var = value; \
300     } while (0)
301
302
303 #define infer(name, value) do { \
304         current->name = value; \
305     } while (0)
306
307 static int cbs_h2645_read_more_rbsp_data(GetBitContext *gbc)
308 {
309     int bits_left = get_bits_left(gbc);
310     if (bits_left > 8)
311         return 1;
312     if (show_bits(gbc, bits_left) == 1 << (bits_left - 1))
313         return 0;
314     return 1;
315 }
316
317 #define more_rbsp_data(var) ((var) = cbs_h2645_read_more_rbsp_data(rw))
318
319 #define byte_alignment(rw) (get_bits_count(rw) % 8)
320
321 #define allocate(name, size) do { \
322         name ## _ref = av_buffer_allocz(size); \
323         if (!name ## _ref) \
324             return AVERROR(ENOMEM); \
325         name = name ## _ref->data; \
326     } while (0)
327
328 #define FUNC(name) FUNC_H264(READWRITE, name)
329 #include "cbs_h264_syntax_template.c"
330 #undef FUNC
331
332 #define FUNC(name) FUNC_H265(READWRITE, name)
333 #include "cbs_h265_syntax_template.c"
334 #undef FUNC
335
336 #undef READ
337 #undef READWRITE
338 #undef RWContext
339 #undef xu
340 #undef xue
341 #undef xse
342 #undef infer
343 #undef more_rbsp_data
344 #undef byte_alignment
345 #undef allocate
346
347
348 #define WRITE
349 #define READWRITE write
350 #define RWContext PutBitContext
351
352 #define xu(width, name, var, range_min, range_max, subs, ...) do { \
353         uint32_t value = var; \
354         CHECK(ff_cbs_write_unsigned(ctx, rw, width, #name, \
355                                     SUBSCRIPTS(subs, __VA_ARGS__), \
356                                     value, range_min, range_max)); \
357     } while (0)
358 #define xue(name, var, range_min, range_max, subs, ...) do { \
359         uint32_t value = var; \
360         CHECK(cbs_write_ue_golomb(ctx, rw, #name, \
361                                   SUBSCRIPTS(subs, __VA_ARGS__), \
362                                   value, range_min, range_max)); \
363     } while (0)
364 #define xse(name, var, range_min, range_max, subs, ...) do { \
365         int32_t value = var; \
366         CHECK(cbs_write_se_golomb(ctx, rw, #name, \
367                                   SUBSCRIPTS(subs, __VA_ARGS__), \
368                                   value, range_min, range_max)); \
369     } while (0)
370
371 #define infer(name, value) do { \
372         if (current->name != (value)) { \
373             av_log(ctx->log_ctx, AV_LOG_WARNING, "Warning: " \
374                    "%s does not match inferred value: " \
375                    "%"PRId64", but should be %"PRId64".\n", \
376                    #name, (int64_t)current->name, (int64_t)(value)); \
377         } \
378     } while (0)
379
380 #define more_rbsp_data(var) (var)
381
382 #define byte_alignment(rw) (put_bits_count(rw) % 8)
383
384 #define allocate(name, size) do { \
385         if (!name) { \
386             av_log(ctx->log_ctx, AV_LOG_ERROR, "%s must be set " \
387                    "for writing.\n", #name); \
388             return AVERROR_INVALIDDATA; \
389         } \
390     } while (0)
391
392 #define FUNC(name) FUNC_H264(READWRITE, name)
393 #include "cbs_h264_syntax_template.c"
394 #undef FUNC
395
396 #define FUNC(name) FUNC_H265(READWRITE, name)
397 #include "cbs_h265_syntax_template.c"
398 #undef FUNC
399
400 #undef WRITE
401 #undef READWRITE
402 #undef RWContext
403 #undef xu
404 #undef xue
405 #undef xse
406 #undef u
407 #undef flag
408 #undef ue
409 #undef se
410 #undef infer
411 #undef more_rbsp_data
412 #undef byte_alignment
413 #undef allocate
414
415
416 static void cbs_h264_free_pps(void *unit, uint8_t *content)
417 {
418     H264RawPPS *pps = (H264RawPPS*)content;
419     av_buffer_unref(&pps->slice_group_id_ref);
420     av_freep(&content);
421 }
422
423 static void cbs_h264_free_sei_payload(H264RawSEIPayload *payload)
424 {
425     switch (payload->payload_type) {
426     case H264_SEI_TYPE_BUFFERING_PERIOD:
427     case H264_SEI_TYPE_PIC_TIMING:
428     case H264_SEI_TYPE_PAN_SCAN_RECT:
429     case H264_SEI_TYPE_RECOVERY_POINT:
430     case H264_SEI_TYPE_DISPLAY_ORIENTATION:
431         break;
432     case H264_SEI_TYPE_USER_DATA_REGISTERED:
433         av_buffer_unref(&payload->payload.user_data_registered.data_ref);
434         break;
435     case H264_SEI_TYPE_USER_DATA_UNREGISTERED:
436         av_buffer_unref(&payload->payload.user_data_unregistered.data_ref);
437         break;
438     default:
439         av_buffer_unref(&payload->payload.other.data_ref);
440         break;
441     }
442 }
443
444 static void cbs_h264_free_sei(void *unit, uint8_t *content)
445 {
446     H264RawSEI *sei = (H264RawSEI*)content;
447     int i;
448     for (i = 0; i < sei->payload_count; i++)
449         cbs_h264_free_sei_payload(&sei->payload[i]);
450     av_freep(&content);
451 }
452
453 static void cbs_h264_free_slice(void *unit, uint8_t *content)
454 {
455     H264RawSlice *slice = (H264RawSlice*)content;
456     av_buffer_unref(&slice->data_ref);
457     av_freep(&content);
458 }
459
460 static void cbs_h265_free_vps(void *unit, uint8_t *content)
461 {
462     H265RawVPS *vps = (H265RawVPS*)content;
463     av_buffer_unref(&vps->extension_data.data_ref);
464     av_freep(&content);
465 }
466
467 static void cbs_h265_free_sps(void *unit, uint8_t *content)
468 {
469     H265RawSPS *sps = (H265RawSPS*)content;
470     av_buffer_unref(&sps->extension_data.data_ref);
471     av_freep(&content);
472 }
473
474 static void cbs_h265_free_pps(void *unit, uint8_t *content)
475 {
476     H265RawPPS *pps = (H265RawPPS*)content;
477     av_buffer_unref(&pps->extension_data.data_ref);
478     av_freep(&content);
479 }
480
481 static void cbs_h265_free_slice(void *unit, uint8_t *content)
482 {
483     H265RawSlice *slice = (H265RawSlice*)content;
484     av_buffer_unref(&slice->data_ref);
485     av_freep(&content);
486 }
487
488 static void cbs_h265_free_sei_payload(H265RawSEIPayload *payload)
489 {
490     switch (payload->payload_type) {
491     case HEVC_SEI_TYPE_MASTERING_DISPLAY_INFO:
492     case HEVC_SEI_TYPE_CONTENT_LIGHT_LEVEL_INFO:
493         break;
494     default:
495         av_buffer_unref(&payload->payload.other.data_ref);
496         break;
497     }
498 }
499
500 static void cbs_h265_free_sei(void *unit, uint8_t *content)
501 {
502     H265RawSEI *sei = (H265RawSEI*)content;
503     int i;
504     for (i = 0; i < sei->payload_count; i++)
505         cbs_h265_free_sei_payload(&sei->payload[i]);
506     av_freep(&content);
507 }
508
509 static int cbs_h2645_fragment_add_nals(CodedBitstreamContext *ctx,
510                                        CodedBitstreamFragment *frag,
511                                        const H2645Packet *packet)
512 {
513     int err, i;
514
515     for (i = 0; i < packet->nb_nals; i++) {
516         const H2645NAL *nal = &packet->nals[i];
517         size_t size = nal->size;
518         uint8_t *data;
519
520         // Remove trailing zeroes.
521         while (size > 0 && nal->data[size - 1] == 0)
522             --size;
523         av_assert0(size > 0);
524
525         data = av_malloc(size + AV_INPUT_BUFFER_PADDING_SIZE);
526         if (!data)
527             return AVERROR(ENOMEM);
528         memcpy(data, nal->data, size);
529         memset(data + size, 0, AV_INPUT_BUFFER_PADDING_SIZE);
530
531         err = ff_cbs_insert_unit_data(ctx, frag, -1, nal->type,
532                                       data, size, NULL);
533         if (err < 0) {
534             av_freep(&data);
535             return err;
536         }
537     }
538
539     return 0;
540 }
541
542 static int cbs_h2645_split_fragment(CodedBitstreamContext *ctx,
543                                     CodedBitstreamFragment *frag,
544                                     int header)
545 {
546     enum AVCodecID codec_id = ctx->codec->codec_id;
547     CodedBitstreamH2645Context *priv = ctx->priv_data;
548     GetByteContext gbc;
549     int err;
550
551     av_assert0(frag->data && frag->nb_units == 0);
552     if (frag->data_size == 0)
553         return 0;
554
555     if (header && frag->data[0] && codec_id == AV_CODEC_ID_H264) {
556         // AVCC header.
557         size_t size, start, end;
558         int i, count, version;
559
560         priv->mp4 = 1;
561
562         bytestream2_init(&gbc, frag->data, frag->data_size);
563
564         if (bytestream2_get_bytes_left(&gbc) < 6)
565             return AVERROR_INVALIDDATA;
566
567         version = bytestream2_get_byte(&gbc);
568         if (version != 1) {
569             av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid AVCC header: "
570                    "first byte %u.", version);
571             return AVERROR_INVALIDDATA;
572         }
573
574         bytestream2_skip(&gbc, 3);
575         priv->nal_length_size = (bytestream2_get_byte(&gbc) & 3) + 1;
576
577         // SPS array.
578         count = bytestream2_get_byte(&gbc) & 0x1f;
579         start = bytestream2_tell(&gbc);
580         for (i = 0; i < count; i++) {
581             if (bytestream2_get_bytes_left(&gbc) < 2 * (count - i))
582                 return AVERROR_INVALIDDATA;
583             size = bytestream2_get_be16(&gbc);
584             if (bytestream2_get_bytes_left(&gbc) < size)
585                 return AVERROR_INVALIDDATA;
586             bytestream2_skip(&gbc, size);
587         }
588         end = bytestream2_tell(&gbc);
589
590         err = ff_h2645_packet_split(&priv->read_packet,
591                                     frag->data + start, end - start,
592                                     ctx->log_ctx, 1, 2, AV_CODEC_ID_H264, 1);
593         if (err < 0) {
594             av_log(ctx->log_ctx, AV_LOG_ERROR, "Failed to split AVCC SPS array.\n");
595             return err;
596         }
597         err = cbs_h2645_fragment_add_nals(ctx, frag, &priv->read_packet);
598         if (err < 0)
599             return err;
600
601         // PPS array.
602         count = bytestream2_get_byte(&gbc);
603         start = bytestream2_tell(&gbc);
604         for (i = 0; i < count; i++) {
605             if (bytestream2_get_bytes_left(&gbc) < 2 * (count - i))
606                 return AVERROR_INVALIDDATA;
607             size = bytestream2_get_be16(&gbc);
608             if (bytestream2_get_bytes_left(&gbc) < size)
609                 return AVERROR_INVALIDDATA;
610             bytestream2_skip(&gbc, size);
611         }
612         end = bytestream2_tell(&gbc);
613
614         err = ff_h2645_packet_split(&priv->read_packet,
615                                     frag->data + start, end - start,
616                                     ctx->log_ctx, 1, 2, AV_CODEC_ID_H264, 1);
617         if (err < 0) {
618             av_log(ctx->log_ctx, AV_LOG_ERROR, "Failed to split AVCC PPS array.\n");
619             return err;
620         }
621         err = cbs_h2645_fragment_add_nals(ctx, frag, &priv->read_packet);
622         if (err < 0)
623             return err;
624
625         if (bytestream2_get_bytes_left(&gbc) > 0) {
626             av_log(ctx->log_ctx, AV_LOG_WARNING, "%u bytes left at end of AVCC "
627                    "header.\n", bytestream2_get_bytes_left(&gbc));
628         }
629
630     } else if (header && frag->data[0] && codec_id == AV_CODEC_ID_HEVC) {
631         // HVCC header.
632         size_t size, start, end;
633         int i, j, nb_arrays, nal_unit_type, nb_nals, version;
634
635         priv->mp4 = 1;
636
637         bytestream2_init(&gbc, frag->data, frag->data_size);
638
639         if (bytestream2_get_bytes_left(&gbc) < 23)
640             return AVERROR_INVALIDDATA;
641
642         version = bytestream2_get_byte(&gbc);
643         if (version != 1) {
644             av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid HVCC header: "
645                    "first byte %u.", version);
646             return AVERROR_INVALIDDATA;
647         }
648
649         bytestream2_skip(&gbc, 20);
650         priv->nal_length_size = (bytestream2_get_byte(&gbc) & 3) + 1;
651
652         nb_arrays = bytestream2_get_byte(&gbc);
653         for (i = 0; i < nb_arrays; i++) {
654             nal_unit_type = bytestream2_get_byte(&gbc) & 0x3f;
655             nb_nals = bytestream2_get_be16(&gbc);
656
657             start = bytestream2_tell(&gbc);
658             for (j = 0; j < nb_nals; j++) {
659                 if (bytestream2_get_bytes_left(&gbc) < 2)
660                     return AVERROR_INVALIDDATA;
661                 size = bytestream2_get_be16(&gbc);
662                 if (bytestream2_get_bytes_left(&gbc) < size)
663                     return AVERROR_INVALIDDATA;
664                 bytestream2_skip(&gbc, size);
665             }
666             end = bytestream2_tell(&gbc);
667
668             err = ff_h2645_packet_split(&priv->read_packet,
669                                         frag->data + start, end - start,
670                                         ctx->log_ctx, 1, 2, AV_CODEC_ID_HEVC, 1);
671             if (err < 0) {
672                 av_log(ctx->log_ctx, AV_LOG_ERROR, "Failed to split "
673                        "HVCC array %d (%d NAL units of type %d).\n",
674                        i, nb_nals, nal_unit_type);
675                 return err;
676             }
677             err = cbs_h2645_fragment_add_nals(ctx, frag, &priv->read_packet);
678             if (err < 0)
679                 return err;
680         }
681
682     } else {
683         // Annex B, or later MP4 with already-known parameters.
684
685         err = ff_h2645_packet_split(&priv->read_packet,
686                                     frag->data, frag->data_size,
687                                     ctx->log_ctx,
688                                     priv->mp4, priv->nal_length_size,
689                                     codec_id, 1);
690         if (err < 0)
691             return err;
692
693         err = cbs_h2645_fragment_add_nals(ctx, frag, &priv->read_packet);
694         if (err < 0)
695             return err;
696     }
697
698     return 0;
699 }
700
701 #define cbs_h2645_replace_ps(h26n, ps_name, ps_var, id_element) \
702 static int cbs_h26 ## h26n ## _replace_ ## ps_var(CodedBitstreamContext *ctx, \
703                                                   CodedBitstreamUnit *unit)  \
704 { \
705     CodedBitstreamH26 ## h26n ## Context *priv = ctx->priv_data; \
706     H26 ## h26n ## Raw ## ps_name *ps_var = unit->content; \
707     unsigned int id = ps_var->id_element; \
708     if (id > FF_ARRAY_ELEMS(priv->ps_var)) { \
709         av_log(ctx->log_ctx, AV_LOG_ERROR, "Invalid " #ps_name \
710                " id : %d.\n", id); \
711         return AVERROR_INVALIDDATA; \
712     } \
713     if (priv->ps_var[id] == priv->active_ ## ps_var) \
714         priv->active_ ## ps_var = NULL ; \
715     av_buffer_unref(&priv->ps_var ## _ref[id]); \
716     if (unit->content_ref) \
717         priv->ps_var ## _ref[id] = av_buffer_ref(unit->content_ref); \
718     else \
719         priv->ps_var ## _ref[id] = av_buffer_alloc(sizeof(*ps_var)); \
720     if (!priv->ps_var ## _ref[id]) \
721         return AVERROR(ENOMEM); \
722     priv->ps_var[id] = (H26 ## h26n ## Raw ## ps_name *)priv->ps_var ## _ref[id]->data; \
723     if (!unit->content_ref) \
724         memcpy(priv->ps_var[id], ps_var, sizeof(*ps_var)); \
725     return 0; \
726 }
727
728 cbs_h2645_replace_ps(4, SPS, sps, seq_parameter_set_id)
729 cbs_h2645_replace_ps(4, PPS, pps, pic_parameter_set_id)
730 cbs_h2645_replace_ps(5, VPS, vps, vps_video_parameter_set_id)
731 cbs_h2645_replace_ps(5, SPS, sps, sps_seq_parameter_set_id)
732 cbs_h2645_replace_ps(5, PPS, pps, pps_pic_parameter_set_id)
733
734 static int cbs_h264_read_nal_unit(CodedBitstreamContext *ctx,
735                                   CodedBitstreamUnit *unit)
736 {
737     GetBitContext gbc;
738     int err;
739
740     err = init_get_bits(&gbc, unit->data, 8 * unit->data_size);
741     if (err < 0)
742         return err;
743
744     switch (unit->type) {
745     case H264_NAL_SPS:
746         {
747             H264RawSPS *sps;
748
749             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*sps), NULL);
750             if (err < 0)
751                 return err;
752             sps = unit->content;
753
754             err = cbs_h264_read_sps(ctx, &gbc, sps);
755             if (err < 0)
756                 return err;
757
758             err = cbs_h264_replace_sps(ctx, unit);
759             if (err < 0)
760                 return err;
761         }
762         break;
763
764     case H264_NAL_SPS_EXT:
765         {
766             err = ff_cbs_alloc_unit_content(ctx, unit,
767                                             sizeof(H264RawSPSExtension),
768                                             NULL);
769             if (err < 0)
770                 return err;
771
772             err = cbs_h264_read_sps_extension(ctx, &gbc, unit->content);
773             if (err < 0)
774                 return err;
775         }
776         break;
777
778     case H264_NAL_PPS:
779         {
780             H264RawPPS *pps;
781
782             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*pps),
783                                             &cbs_h264_free_pps);
784             if (err < 0)
785                 return err;
786             pps = unit->content;
787
788             err = cbs_h264_read_pps(ctx, &gbc, pps);
789             if (err < 0)
790                 return err;
791
792             err = cbs_h264_replace_pps(ctx, unit);
793             if (err < 0)
794                 return err;
795         }
796         break;
797
798     case H264_NAL_SLICE:
799     case H264_NAL_IDR_SLICE:
800     case H264_NAL_AUXILIARY_SLICE:
801         {
802             H264RawSlice *slice;
803             int pos, len;
804
805             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*slice),
806                                             &cbs_h264_free_slice);
807             if (err < 0)
808                 return err;
809             slice = unit->content;
810
811             err = cbs_h264_read_slice_header(ctx, &gbc, &slice->header);
812             if (err < 0)
813                 return err;
814
815             pos = get_bits_count(&gbc);
816             len = unit->data_size;
817             if (!unit->data[len - 1]) {
818                 int z;
819                 for (z = 0; z < len && !unit->data[len - z - 1]; z++);
820                 av_log(ctx->log_ctx, AV_LOG_DEBUG, "Deleted %d trailing zeroes "
821                        "from slice data.\n", z);
822                 len -= z;
823             }
824
825             slice->data_size = len - pos / 8;
826             slice->data_ref  = av_buffer_ref(unit->data_ref);
827             if (!slice->data_ref)
828                 return AVERROR(ENOMEM);
829             slice->data = unit->data + pos / 8;
830             slice->data_bit_start = pos % 8;
831         }
832         break;
833
834     case H264_NAL_AUD:
835         {
836             err = ff_cbs_alloc_unit_content(ctx, unit,
837                                             sizeof(H264RawAUD), NULL);
838             if (err < 0)
839                 return err;
840
841             err = cbs_h264_read_aud(ctx, &gbc, unit->content);
842             if (err < 0)
843                 return err;
844         }
845         break;
846
847     case H264_NAL_SEI:
848         {
849             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(H264RawSEI),
850                                             &cbs_h264_free_sei);
851             if (err < 0)
852                 return err;
853
854             err = cbs_h264_read_sei(ctx, &gbc, unit->content);
855             if (err < 0)
856                 return err;
857         }
858         break;
859
860     case H264_NAL_FILLER_DATA:
861         {
862             err = ff_cbs_alloc_unit_content(ctx, unit,
863                                             sizeof(H264RawFiller), NULL);
864             if (err < 0)
865                 return err;
866
867             err = cbs_h264_read_filler(ctx, &gbc, unit->content);
868             if (err < 0)
869                 return err;
870         }
871         break;
872
873     default:
874         return AVERROR(ENOSYS);
875     }
876
877     return 0;
878 }
879
880 static int cbs_h265_read_nal_unit(CodedBitstreamContext *ctx,
881                                   CodedBitstreamUnit *unit)
882 {
883     GetBitContext gbc;
884     int err;
885
886     err = init_get_bits(&gbc, unit->data, 8 * unit->data_size);
887     if (err < 0)
888         return err;
889
890     switch (unit->type) {
891     case HEVC_NAL_VPS:
892         {
893             H265RawVPS *vps;
894
895             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*vps),
896                                             &cbs_h265_free_vps);
897             if (err < 0)
898                 return err;
899             vps = unit->content;
900
901             err = cbs_h265_read_vps(ctx, &gbc, vps);
902             if (err < 0)
903                 return err;
904
905             err = cbs_h265_replace_vps(ctx, unit);
906             if (err < 0)
907                 return err;
908         }
909         break;
910     case HEVC_NAL_SPS:
911         {
912             H265RawSPS *sps;
913
914             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*sps),
915                                             &cbs_h265_free_sps);
916             if (err < 0)
917                 return err;
918             sps = unit->content;
919
920             err = cbs_h265_read_sps(ctx, &gbc, sps);
921             if (err < 0)
922                 return err;
923
924             err = cbs_h265_replace_sps(ctx, unit);
925             if (err < 0)
926                 return err;
927         }
928         break;
929
930     case HEVC_NAL_PPS:
931         {
932             H265RawPPS *pps;
933
934             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*pps),
935                                             &cbs_h265_free_pps);
936             if (err < 0)
937                 return err;
938             pps = unit->content;
939
940             err = cbs_h265_read_pps(ctx, &gbc, pps);
941             if (err < 0)
942                 return err;
943
944             err = cbs_h265_replace_pps(ctx, unit);
945             if (err < 0)
946                 return err;
947         }
948         break;
949
950     case HEVC_NAL_TRAIL_N:
951     case HEVC_NAL_TRAIL_R:
952     case HEVC_NAL_TSA_N:
953     case HEVC_NAL_TSA_R:
954     case HEVC_NAL_STSA_N:
955     case HEVC_NAL_STSA_R:
956     case HEVC_NAL_RADL_N:
957     case HEVC_NAL_RADL_R:
958     case HEVC_NAL_RASL_N:
959     case HEVC_NAL_RASL_R:
960     case HEVC_NAL_BLA_W_LP:
961     case HEVC_NAL_BLA_W_RADL:
962     case HEVC_NAL_BLA_N_LP:
963     case HEVC_NAL_IDR_W_RADL:
964     case HEVC_NAL_IDR_N_LP:
965     case HEVC_NAL_CRA_NUT:
966         {
967             H265RawSlice *slice;
968             int pos, len;
969
970             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(*slice),
971                                             &cbs_h265_free_slice);
972             if (err < 0)
973                 return err;
974             slice = unit->content;
975
976             err = cbs_h265_read_slice_segment_header(ctx, &gbc, &slice->header);
977             if (err < 0)
978                 return err;
979
980             pos = get_bits_count(&gbc);
981             len = unit->data_size;
982             if (!unit->data[len - 1]) {
983                 int z;
984                 for (z = 0; z < len && !unit->data[len - z - 1]; z++);
985                 av_log(ctx->log_ctx, AV_LOG_DEBUG, "Deleted %d trailing zeroes "
986                        "from slice data.\n", z);
987                 len -= z;
988             }
989
990             slice->data_size = len - pos / 8;
991             slice->data_ref  = av_buffer_ref(unit->data_ref);
992             if (!slice->data_ref)
993                 return AVERROR(ENOMEM);
994             slice->data = unit->data + pos / 8;
995             slice->data_bit_start = pos % 8;
996         }
997         break;
998
999     case HEVC_NAL_AUD:
1000         {
1001             err = ff_cbs_alloc_unit_content(ctx, unit,
1002                                             sizeof(H265RawAUD), NULL);
1003             if (err < 0)
1004                 return err;
1005
1006             err = cbs_h265_read_aud(ctx, &gbc, unit->content);
1007             if (err < 0)
1008                 return err;
1009         }
1010         break;
1011
1012     case HEVC_NAL_SEI_PREFIX:
1013         {
1014             err = ff_cbs_alloc_unit_content(ctx, unit, sizeof(H265RawSEI),
1015                                             &cbs_h265_free_sei);
1016
1017             if (err < 0)
1018                 return err;
1019
1020             err = cbs_h265_read_sei(ctx, &gbc, unit->content);
1021
1022             if (err < 0)
1023                 return err;
1024         }
1025         break;
1026
1027     default:
1028         return AVERROR(ENOSYS);
1029     }
1030
1031     return 0;
1032 }
1033
1034 static int cbs_h264_write_nal_unit(CodedBitstreamContext *ctx,
1035                                    CodedBitstreamUnit *unit,
1036                                    PutBitContext *pbc)
1037 {
1038     int err;
1039
1040     switch (unit->type) {
1041     case H264_NAL_SPS:
1042         {
1043             H264RawSPS *sps = unit->content;
1044
1045             err = cbs_h264_write_sps(ctx, pbc, sps);
1046             if (err < 0)
1047                 return err;
1048
1049             err = cbs_h264_replace_sps(ctx, unit);
1050             if (err < 0)
1051                 return err;
1052         }
1053         break;
1054
1055     case H264_NAL_SPS_EXT:
1056         {
1057             H264RawSPSExtension *sps_ext = unit->content;
1058
1059             err = cbs_h264_write_sps_extension(ctx, pbc, sps_ext);
1060             if (err < 0)
1061                 return err;
1062         }
1063         break;
1064
1065     case H264_NAL_PPS:
1066         {
1067             H264RawPPS *pps = unit->content;
1068
1069             err = cbs_h264_write_pps(ctx, pbc, pps);
1070             if (err < 0)
1071                 return err;
1072
1073             err = cbs_h264_replace_pps(ctx, unit);
1074             if (err < 0)
1075                 return err;
1076         }
1077         break;
1078
1079     case H264_NAL_SLICE:
1080     case H264_NAL_IDR_SLICE:
1081     case H264_NAL_AUXILIARY_SLICE:
1082         {
1083             H264RawSlice *slice = unit->content;
1084             GetBitContext gbc;
1085             int bits_left, end, zeroes;
1086
1087             err = cbs_h264_write_slice_header(ctx, pbc, &slice->header);
1088             if (err < 0)
1089                 return err;
1090
1091             if (slice->data) {
1092                 if (slice->data_size * 8 + 8 > put_bits_left(pbc))
1093                     return AVERROR(ENOSPC);
1094
1095                 init_get_bits(&gbc, slice->data, slice->data_size * 8);
1096                 skip_bits_long(&gbc, slice->data_bit_start);
1097
1098                 // Copy in two-byte blocks, but stop before copying the
1099                 // rbsp_stop_one_bit in the final byte.
1100                 while (get_bits_left(&gbc) > 23)
1101                     put_bits(pbc, 16, get_bits(&gbc, 16));
1102
1103                 bits_left = get_bits_left(&gbc);
1104                 end = get_bits(&gbc, bits_left);
1105
1106                 // rbsp_stop_one_bit must be present here.
1107                 av_assert0(end);
1108                 zeroes = ff_ctz(end);
1109                 if (bits_left > zeroes + 1)
1110                     put_bits(pbc, bits_left - zeroes - 1,
1111                              end >> (zeroes + 1));
1112                 put_bits(pbc, 1, 1);
1113                 while (put_bits_count(pbc) % 8 != 0)
1114                     put_bits(pbc, 1, 0);
1115             } else {
1116                 // No slice data - that was just the header.
1117                 // (Bitstream may be unaligned!)
1118             }
1119         }
1120         break;
1121
1122     case H264_NAL_AUD:
1123         {
1124             err = cbs_h264_write_aud(ctx, pbc, unit->content);
1125             if (err < 0)
1126                 return err;
1127         }
1128         break;
1129
1130     case H264_NAL_SEI:
1131         {
1132             err = cbs_h264_write_sei(ctx, pbc, unit->content);
1133             if (err < 0)
1134                 return err;
1135         }
1136         break;
1137
1138     case H264_NAL_FILLER_DATA:
1139         {
1140             err = cbs_h264_write_filler(ctx, pbc, unit->content);
1141             if (err < 0)
1142                 return err;
1143         }
1144         break;
1145
1146     default:
1147         av_log(ctx->log_ctx, AV_LOG_ERROR, "Write unimplemented for "
1148                "NAL unit type %"PRIu32".\n", unit->type);
1149         return AVERROR_PATCHWELCOME;
1150     }
1151
1152     return 0;
1153 }
1154
1155 static int cbs_h265_write_nal_unit(CodedBitstreamContext *ctx,
1156                                    CodedBitstreamUnit *unit,
1157                                    PutBitContext *pbc)
1158 {
1159     int err;
1160
1161     switch (unit->type) {
1162     case HEVC_NAL_VPS:
1163         {
1164             H265RawVPS *vps = unit->content;
1165
1166             err = cbs_h265_write_vps(ctx, pbc, vps);
1167             if (err < 0)
1168                 return err;
1169
1170             err = cbs_h265_replace_vps(ctx, unit);
1171             if (err < 0)
1172                 return err;
1173         }
1174         break;
1175
1176     case HEVC_NAL_SPS:
1177         {
1178             H265RawSPS *sps = unit->content;
1179
1180             err = cbs_h265_write_sps(ctx, pbc, sps);
1181             if (err < 0)
1182                 return err;
1183
1184             err = cbs_h265_replace_sps(ctx, unit);
1185             if (err < 0)
1186                 return err;
1187         }
1188         break;
1189
1190     case HEVC_NAL_PPS:
1191         {
1192             H265RawPPS *pps = unit->content;
1193
1194             err = cbs_h265_write_pps(ctx, pbc, pps);
1195             if (err < 0)
1196                 return err;
1197
1198             err = cbs_h265_replace_pps(ctx, unit);
1199             if (err < 0)
1200                 return err;
1201         }
1202         break;
1203
1204     case HEVC_NAL_TRAIL_N:
1205     case HEVC_NAL_TRAIL_R:
1206     case HEVC_NAL_TSA_N:
1207     case HEVC_NAL_TSA_R:
1208     case HEVC_NAL_STSA_N:
1209     case HEVC_NAL_STSA_R:
1210     case HEVC_NAL_RADL_N:
1211     case HEVC_NAL_RADL_R:
1212     case HEVC_NAL_RASL_N:
1213     case HEVC_NAL_RASL_R:
1214     case HEVC_NAL_BLA_W_LP:
1215     case HEVC_NAL_BLA_W_RADL:
1216     case HEVC_NAL_BLA_N_LP:
1217     case HEVC_NAL_IDR_W_RADL:
1218     case HEVC_NAL_IDR_N_LP:
1219     case HEVC_NAL_CRA_NUT:
1220         {
1221             H265RawSlice *slice = unit->content;
1222             GetBitContext gbc;
1223             int bits_left, end, zeroes;
1224
1225             err = cbs_h265_write_slice_segment_header(ctx, pbc, &slice->header);
1226             if (err < 0)
1227                 return err;
1228
1229             if (slice->data) {
1230                 if (slice->data_size * 8 + 8 > put_bits_left(pbc))
1231                     return AVERROR(ENOSPC);
1232
1233                 init_get_bits(&gbc, slice->data, slice->data_size * 8);
1234                 skip_bits_long(&gbc, slice->data_bit_start);
1235
1236                 // Copy in two-byte blocks, but stop before copying the
1237                 // rbsp_stop_one_bit in the final byte.
1238                 while (get_bits_left(&gbc) > 23)
1239                     put_bits(pbc, 16, get_bits(&gbc, 16));
1240
1241                 bits_left = get_bits_left(&gbc);
1242                 end = get_bits(&gbc, bits_left);
1243
1244                 // rbsp_stop_one_bit must be present here.
1245                 av_assert0(end);
1246                 zeroes = ff_ctz(end);
1247                 if (bits_left > zeroes + 1)
1248                     put_bits(pbc, bits_left - zeroes - 1,
1249                              end >> (zeroes + 1));
1250                 put_bits(pbc, 1, 1);
1251                 while (put_bits_count(pbc) % 8 != 0)
1252                     put_bits(pbc, 1, 0);
1253             } else {
1254                 // No slice data - that was just the header.
1255             }
1256         }
1257         break;
1258
1259     case HEVC_NAL_AUD:
1260         {
1261             err = cbs_h265_write_aud(ctx, pbc, unit->content);
1262             if (err < 0)
1263                 return err;
1264         }
1265         break;
1266
1267     case HEVC_NAL_SEI_PREFIX:
1268         {
1269             err = cbs_h265_write_sei(ctx, pbc, unit->content);
1270
1271             if (err < 0)
1272                 return err;
1273         }
1274         break;
1275
1276     default:
1277         av_log(ctx->log_ctx, AV_LOG_ERROR, "Write unimplemented for "
1278                "NAL unit type %"PRIu32".\n", unit->type);
1279         return AVERROR_PATCHWELCOME;
1280     }
1281
1282     return 0;
1283 }
1284
1285 static int cbs_h2645_write_nal_unit(CodedBitstreamContext *ctx,
1286                                     CodedBitstreamUnit *unit)
1287 {
1288     CodedBitstreamH2645Context *priv = ctx->priv_data;
1289     enum AVCodecID codec_id = ctx->codec->codec_id;
1290     PutBitContext pbc;
1291     int err;
1292
1293     if (!priv->write_buffer) {
1294         // Initial write buffer size is 1MB.
1295         priv->write_buffer_size = 1024 * 1024;
1296
1297     reallocate_and_try_again:
1298         err = av_reallocp(&priv->write_buffer, priv->write_buffer_size);
1299         if (err < 0) {
1300             av_log(ctx->log_ctx, AV_LOG_ERROR, "Unable to allocate a "
1301                    "sufficiently large write buffer (last attempt "
1302                    "%"SIZE_SPECIFIER" bytes).\n", priv->write_buffer_size);
1303             return err;
1304         }
1305     }
1306
1307     init_put_bits(&pbc, priv->write_buffer, priv->write_buffer_size);
1308
1309     if (codec_id == AV_CODEC_ID_H264)
1310         err = cbs_h264_write_nal_unit(ctx, unit, &pbc);
1311     else
1312         err = cbs_h265_write_nal_unit(ctx, unit, &pbc);
1313
1314     if (err == AVERROR(ENOSPC)) {
1315         // Overflow.
1316         priv->write_buffer_size *= 2;
1317         goto reallocate_and_try_again;
1318     }
1319     // Overflow but we didn't notice.
1320     av_assert0(put_bits_count(&pbc) <= 8 * priv->write_buffer_size);
1321
1322     if (err < 0) {
1323         // Write failed for some other reason.
1324         return err;
1325     }
1326
1327     if (put_bits_count(&pbc) % 8)
1328         unit->data_bit_padding = 8 - put_bits_count(&pbc) % 8;
1329     else
1330         unit->data_bit_padding = 0;
1331
1332     unit->data_size = (put_bits_count(&pbc) + 7) / 8;
1333     flush_put_bits(&pbc);
1334
1335     err = ff_cbs_alloc_unit_data(ctx, unit, unit->data_size);
1336     if (err < 0)
1337         return err;
1338
1339     memcpy(unit->data, priv->write_buffer, unit->data_size);
1340
1341     return 0;
1342 }
1343
1344 static int cbs_h2645_assemble_fragment(CodedBitstreamContext *ctx,
1345                                        CodedBitstreamFragment *frag)
1346 {
1347     uint8_t *data;
1348     size_t max_size, dp, sp;
1349     int err, i, zero_run;
1350
1351     for (i = 0; i < frag->nb_units; i++) {
1352         // Data should already all have been written when we get here.
1353         av_assert0(frag->units[i].data);
1354     }
1355
1356     max_size = 0;
1357     for (i = 0; i < frag->nb_units; i++) {
1358         // Start code + content with worst-case emulation prevention.
1359         max_size += 3 + frag->units[i].data_size * 3 / 2;
1360     }
1361
1362     data = av_malloc(max_size + AV_INPUT_BUFFER_PADDING_SIZE);
1363     if (!data)
1364         return AVERROR(ENOMEM);
1365
1366     dp = 0;
1367     for (i = 0; i < frag->nb_units; i++) {
1368         CodedBitstreamUnit *unit = &frag->units[i];
1369
1370         if (unit->data_bit_padding > 0) {
1371             if (i < frag->nb_units - 1)
1372                 av_log(ctx->log_ctx, AV_LOG_WARNING, "Probably invalid "
1373                        "unaligned padding on non-final NAL unit.\n");
1374             else
1375                 frag->data_bit_padding = unit->data_bit_padding;
1376         }
1377
1378         if ((ctx->codec->codec_id == AV_CODEC_ID_H264 &&
1379              (unit->type == H264_NAL_SPS ||
1380               unit->type == H264_NAL_PPS)) ||
1381             (ctx->codec->codec_id == AV_CODEC_ID_HEVC &&
1382              (unit->type == HEVC_NAL_VPS ||
1383               unit->type == HEVC_NAL_SPS ||
1384               unit->type == HEVC_NAL_PPS)) ||
1385             i == 0 /* (Assume this is the start of an access unit.) */) {
1386             // zero_byte
1387             data[dp++] = 0;
1388         }
1389         // start_code_prefix_one_3bytes
1390         data[dp++] = 0;
1391         data[dp++] = 0;
1392         data[dp++] = 1;
1393
1394         zero_run = 0;
1395         for (sp = 0; sp < unit->data_size; sp++) {
1396             if (zero_run < 2) {
1397                 if (unit->data[sp] == 0)
1398                     ++zero_run;
1399                 else
1400                     zero_run = 0;
1401             } else {
1402                 if ((unit->data[sp] & ~3) == 0) {
1403                     // emulation_prevention_three_byte
1404                     data[dp++] = 3;
1405                 }
1406                 zero_run = unit->data[sp] == 0;
1407             }
1408             data[dp++] = unit->data[sp];
1409         }
1410     }
1411
1412     av_assert0(dp <= max_size);
1413     err = av_reallocp(&data, dp + AV_INPUT_BUFFER_PADDING_SIZE);
1414     if (err)
1415         return err;
1416     memset(data + dp, 0, AV_INPUT_BUFFER_PADDING_SIZE);
1417
1418     frag->data_ref = av_buffer_create(data, dp + AV_INPUT_BUFFER_PADDING_SIZE,
1419                                       NULL, NULL, 0);
1420     if (!frag->data_ref) {
1421         av_freep(&data);
1422         return AVERROR(ENOMEM);
1423     }
1424
1425     frag->data = data;
1426     frag->data_size = dp;
1427
1428     return 0;
1429 }
1430
1431 static void cbs_h264_close(CodedBitstreamContext *ctx)
1432 {
1433     CodedBitstreamH264Context *h264 = ctx->priv_data;
1434     int i;
1435
1436     ff_h2645_packet_uninit(&h264->common.read_packet);
1437
1438     av_freep(&h264->common.write_buffer);
1439
1440     for (i = 0; i < FF_ARRAY_ELEMS(h264->sps); i++)
1441         av_buffer_unref(&h264->sps_ref[i]);
1442     for (i = 0; i < FF_ARRAY_ELEMS(h264->pps); i++)
1443         av_buffer_unref(&h264->pps_ref[i]);
1444 }
1445
1446 static void cbs_h265_close(CodedBitstreamContext *ctx)
1447 {
1448     CodedBitstreamH265Context *h265 = ctx->priv_data;
1449     int i;
1450
1451     ff_h2645_packet_uninit(&h265->common.read_packet);
1452
1453     av_freep(&h265->common.write_buffer);
1454
1455     for (i = 0; i < FF_ARRAY_ELEMS(h265->vps); i++)
1456         av_buffer_unref(&h265->vps_ref[i]);
1457     for (i = 0; i < FF_ARRAY_ELEMS(h265->sps); i++)
1458         av_buffer_unref(&h265->sps_ref[i]);
1459     for (i = 0; i < FF_ARRAY_ELEMS(h265->pps); i++)
1460         av_buffer_unref(&h265->pps_ref[i]);
1461 }
1462
1463 const CodedBitstreamType ff_cbs_type_h264 = {
1464     .codec_id          = AV_CODEC_ID_H264,
1465
1466     .priv_data_size    = sizeof(CodedBitstreamH264Context),
1467
1468     .split_fragment    = &cbs_h2645_split_fragment,
1469     .read_unit         = &cbs_h264_read_nal_unit,
1470     .write_unit        = &cbs_h2645_write_nal_unit,
1471     .assemble_fragment = &cbs_h2645_assemble_fragment,
1472
1473     .close             = &cbs_h264_close,
1474 };
1475
1476 const CodedBitstreamType ff_cbs_type_h265 = {
1477     .codec_id          = AV_CODEC_ID_HEVC,
1478
1479     .priv_data_size    = sizeof(CodedBitstreamH265Context),
1480
1481     .split_fragment    = &cbs_h2645_split_fragment,
1482     .read_unit         = &cbs_h265_read_nal_unit,
1483     .write_unit        = &cbs_h2645_write_nal_unit,
1484     .assemble_fragment = &cbs_h2645_assemble_fragment,
1485
1486     .close             = &cbs_h265_close,
1487 };
1488
1489 int ff_cbs_h264_add_sei_message(CodedBitstreamContext *ctx,
1490                                 CodedBitstreamFragment *au,
1491                                 const H264RawSEIPayload *payload)
1492 {
1493     H264RawSEI *sei;
1494     CodedBitstreamUnit *nal = NULL;
1495     int err, i;
1496
1497     // Find an existing SEI NAL unit to add to.
1498     for (i = 0; i < au->nb_units; i++) {
1499         if (au->units[i].type == H264_NAL_SEI) {
1500             nal = &au->units[i];
1501             break;
1502         }
1503     }
1504     if (nal) {
1505         sei = nal->content;
1506
1507     } else {
1508         // Need to make a new SEI NAL unit.  Insert it before the first
1509         // slice data NAL unit; if no slice data, add at the end.
1510         AVBufferRef *sei_ref;
1511
1512         sei = av_mallocz(sizeof(*sei));
1513         if (!sei)
1514             return AVERROR(ENOMEM);
1515
1516         sei->nal_unit_header.nal_unit_type = H264_NAL_SEI;
1517         sei->nal_unit_header.nal_ref_idc   = 0;
1518
1519         sei_ref = av_buffer_create((uint8_t*)sei, sizeof(*sei),
1520                                    &cbs_h264_free_sei, ctx, 0);
1521         if (!sei_ref) {
1522             av_freep(&sei);
1523             return AVERROR(ENOMEM);
1524         }
1525
1526         for (i = 0; i < au->nb_units; i++) {
1527             if (au->units[i].type == H264_NAL_SLICE ||
1528                 au->units[i].type == H264_NAL_IDR_SLICE)
1529                 break;
1530         }
1531
1532         err = ff_cbs_insert_unit_content(ctx, au, i, H264_NAL_SEI,
1533                                          sei, sei_ref);
1534         av_buffer_unref(&sei_ref);
1535         if (err < 0)
1536             return err;
1537     }
1538
1539     if (sei->payload_count >= H264_MAX_SEI_PAYLOADS) {
1540         av_log(ctx->log_ctx, AV_LOG_ERROR, "Too many payloads in "
1541                "SEI NAL unit.\n");
1542         return AVERROR(EINVAL);
1543     }
1544
1545     memcpy(&sei->payload[sei->payload_count], payload, sizeof(*payload));
1546     ++sei->payload_count;
1547
1548     return 0;
1549 }
1550
1551 int ff_cbs_h264_delete_sei_message(CodedBitstreamContext *ctx,
1552                                    CodedBitstreamFragment *au,
1553                                    CodedBitstreamUnit *nal,
1554                                    int position)
1555 {
1556     H264RawSEI *sei = nal->content;
1557
1558     av_assert0(nal->type == H264_NAL_SEI);
1559     av_assert0(position >= 0 && position < sei->payload_count);
1560
1561     if (position == 0 && sei->payload_count == 1) {
1562         // Deleting NAL unit entirely.
1563         int i;
1564
1565         for (i = 0; i < au->nb_units; i++) {
1566             if (&au->units[i] == nal)
1567                 break;
1568         }
1569         av_assert0(i < au->nb_units && "NAL unit not in access unit.");
1570
1571         return ff_cbs_delete_unit(ctx, au, i);
1572     } else {
1573         cbs_h264_free_sei_payload(&sei->payload[position]);
1574
1575         --sei->payload_count;
1576         memmove(sei->payload + position,
1577                 sei->payload + position + 1,
1578                 (sei->payload_count - position) * sizeof(*sei->payload));
1579
1580         return 0;
1581     }
1582 }