FFmpeg
movenc.c
Go to the documentation of this file.
1 /*
2  * MOV, 3GP, MP4 muxer
3  * Copyright (c) 2003 Thomas Raivio
4  * Copyright (c) 2004 Gildas Bazin <gbazin at videolan dot org>
5  * Copyright (c) 2009 Baptiste Coudurier <baptiste dot coudurier at gmail dot com>
6  *
7  * This file is part of FFmpeg.
8  *
9  * FFmpeg is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * FFmpeg is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with FFmpeg; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22  */
23 
24 #include "config_components.h"
25 
26 #include <stdint.h>
27 #include <inttypes.h>
28 
29 #include "movenc.h"
30 #include "avformat.h"
31 #include "avio_internal.h"
32 #include "dovi_isom.h"
33 #include "riff.h"
34 #include "avio.h"
35 #include "isom.h"
36 #include "av1.h"
37 #include "avc.h"
38 #include "evc.h"
39 #include "libavcodec/ac3_parser_internal.h"
40 #include "libavcodec/dnxhddata.h"
41 #include "libavcodec/flac.h"
42 #include "libavcodec/get_bits.h"
43 
44 #include "libavcodec/internal.h"
45 #include "libavcodec/put_bits.h"
46 #include "libavcodec/vc1_common.h"
47 #include "libavcodec/raw.h"
48 #include "internal.h"
49 #include "libavutil/avstring.h"
50 #include "libavutil/channel_layout.h"
51 #include "libavutil/csp.h"
52 #include "libavutil/intfloat.h"
53 #include "libavutil/mathematics.h"
54 #include "libavutil/libm.h"
55 #include "libavutil/opt.h"
56 #include "libavutil/dict.h"
57 #include "libavutil/pixdesc.h"
58 #include "libavutil/stereo3d.h"
59 #include "libavutil/timecode.h"
60 #include "libavutil/dovi_meta.h"
61 #include "libavutil/uuid.h"
62 #include "hevc.h"
63 #include "rtpenc.h"
64 #include "mov_chan.h"
65 #include "movenc_ttml.h"
66 #include "mux.h"
67 #include "rawutils.h"
68 #include "ttmlenc.h"
69 #include "version.h"
70 #include "vpcc.h"
71 
72 static const AVOption options[] = {
73  { "movflags", "MOV muxer flags", offsetof(MOVMuxContext, flags), AV_OPT_TYPE_FLAGS, {.i64 = 0}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
74  { "rtphint", "Add RTP hint tracks", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_RTP_HINT}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
75  { "moov_size", "maximum moov size so it can be placed at the begin", offsetof(MOVMuxContext, reserved_moov_size), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, 0 },
76  { "empty_moov", "Make the initial moov atom empty", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_EMPTY_MOOV}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
77  { "frag_keyframe", "Fragment at video keyframes", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_FRAG_KEYFRAME}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
78  { "frag_every_frame", "Fragment at every frame", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_FRAG_EVERY_FRAME}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
79  { "separate_moof", "Write separate moof/mdat atoms for each track", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_SEPARATE_MOOF}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
80  { "frag_custom", "Flush fragments on caller requests", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_FRAG_CUSTOM}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
81  { "isml", "Create a live smooth streaming feed (for pushing to a publishing point)", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_ISML}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
82  { "faststart", "Run a second pass to put the index (moov atom) at the beginning of the file", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_FASTSTART}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
83  { "omit_tfhd_offset", "Omit the base data offset in tfhd atoms", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_OMIT_TFHD_OFFSET}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
84  { "disable_chpl", "Disable Nero chapter atom", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_DISABLE_CHPL}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
85  { "default_base_moof", "Set the default-base-is-moof flag in tfhd atoms", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_DEFAULT_BASE_MOOF}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
86  { "dash", "Write DASH compatible fragmented MP4", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_DASH}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
87  { "cmaf", "Write CMAF compatible fragmented MP4", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_CMAF}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
88  { "frag_discont", "Signal that the next fragment is discontinuous from earlier ones", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_FRAG_DISCONT}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
89  { "delay_moov", "Delay writing the initial moov until the first fragment is cut, or until the first fragment flush", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_DELAY_MOOV}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
90  { "global_sidx", "Write a global sidx index at the start of the file", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_GLOBAL_SIDX}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
91  { "skip_sidx", "Skip writing of sidx atom", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_SKIP_SIDX}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
92  { "write_colr", "Write colr atom even if the color info is unspecified (Experimental, may be renamed or changed, do not use from scripts)", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_WRITE_COLR}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
93  { "prefer_icc", "If writing colr atom prioritise usage of ICC profile if it exists in stream packet side data", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_PREFER_ICC}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
94  { "write_gama", "Write deprecated gama atom", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_WRITE_GAMA}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
95  { "use_metadata_tags", "Use mdta atom for metadata.", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_USE_MDTA}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
96  { "skip_trailer", "Skip writing the mfra/tfra/mfro trailer for fragmented files", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_SKIP_TRAILER}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
97  { "negative_cts_offsets", "Use negative CTS offsets (reducing the need for edit lists)", 0, AV_OPT_TYPE_CONST, {.i64 = FF_MOV_FLAG_NEGATIVE_CTS_OFFSETS}, INT_MIN, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM, "movflags" },
98  FF_RTP_FLAG_OPTS(MOVMuxContext, rtp_flags),
99  { "skip_iods", "Skip writing iods atom.", offsetof(MOVMuxContext, iods_skip), AV_OPT_TYPE_BOOL, {.i64 = 1}, 0, 1, AV_OPT_FLAG_ENCODING_PARAM},
100  { "iods_audio_profile", "iods audio profile atom.", offsetof(MOVMuxContext, iods_audio_profile), AV_OPT_TYPE_INT, {.i64 = -1}, -1, 255, AV_OPT_FLAG_ENCODING_PARAM},
101  { "iods_video_profile", "iods video profile atom.", offsetof(MOVMuxContext, iods_video_profile), AV_OPT_TYPE_INT, {.i64 = -1}, -1, 255, AV_OPT_FLAG_ENCODING_PARAM},
102  { "frag_duration", "Maximum fragment duration", offsetof(MOVMuxContext, max_fragment_duration), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
103  { "min_frag_duration", "Minimum fragment duration", offsetof(MOVMuxContext, min_fragment_duration), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
104  { "frag_size", "Maximum fragment size", offsetof(MOVMuxContext, max_fragment_size), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
105  { "ism_lookahead", "Number of lookahead entries for ISM files", offsetof(MOVMuxContext, ism_lookahead), AV_OPT_TYPE_INT, {.i64 = 0}, 0, 255, AV_OPT_FLAG_ENCODING_PARAM},
106  { "video_track_timescale", "set timescale of all video tracks", offsetof(MOVMuxContext, video_track_timescale), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
107  { "brand", "Override major brand", offsetof(MOVMuxContext, major_brand), AV_OPT_TYPE_STRING, {.str = NULL}, .flags = AV_OPT_FLAG_ENCODING_PARAM },
108  { "use_editlist", "use edit list", offsetof(MOVMuxContext, use_editlist), AV_OPT_TYPE_BOOL, {.i64 = -1}, -1, 1, AV_OPT_FLAG_ENCODING_PARAM},
109  { "fragment_index", "Fragment number of the next fragment", offsetof(MOVMuxContext, fragments), AV_OPT_TYPE_INT, {.i64 = 1}, 1, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
110  { "mov_gamma", "gamma value for gama atom", offsetof(MOVMuxContext, gamma), AV_OPT_TYPE_FLOAT, {.dbl = 0.0 }, 0.0, 10, AV_OPT_FLAG_ENCODING_PARAM},
111  { "frag_interleave", "Interleave samples within fragments (max number of consecutive samples, lower is tighter interleaving, but with more overhead)", offsetof(MOVMuxContext, frag_interleave), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM },
112  { "encryption_scheme", "Configures the encryption scheme, allowed values are none, cenc-aes-ctr", offsetof(MOVMuxContext, encryption_scheme_str), AV_OPT_TYPE_STRING, {.str = NULL}, .flags = AV_OPT_FLAG_ENCODING_PARAM },
113  { "encryption_key", "The media encryption key (hex)", offsetof(MOVMuxContext, encryption_key), AV_OPT_TYPE_BINARY, .flags = AV_OPT_FLAG_ENCODING_PARAM },
114  { "encryption_kid", "The media encryption key identifier (hex)", offsetof(MOVMuxContext, encryption_kid), AV_OPT_TYPE_BINARY, .flags = AV_OPT_FLAG_ENCODING_PARAM },
115  { "use_stream_ids_as_track_ids", "use stream ids as track ids", offsetof(MOVMuxContext, use_stream_ids_as_track_ids), AV_OPT_TYPE_BOOL, {.i64 = 0}, 0, 1, AV_OPT_FLAG_ENCODING_PARAM},
116  { "write_btrt", "force or disable writing btrt", offsetof(MOVMuxContext, write_btrt), AV_OPT_TYPE_BOOL, {.i64 = -1}, -1, 1, AV_OPT_FLAG_ENCODING_PARAM},
117  { "write_tmcd", "force or disable writing tmcd", offsetof(MOVMuxContext, write_tmcd), AV_OPT_TYPE_BOOL, {.i64 = -1}, -1, 1, AV_OPT_FLAG_ENCODING_PARAM},
118  { "write_prft", "Write producer reference time box with specified time source", offsetof(MOVMuxContext, write_prft), AV_OPT_TYPE_INT, {.i64 = MOV_PRFT_NONE}, 0, MOV_PRFT_NB-1, AV_OPT_FLAG_ENCODING_PARAM, "prft"},
119  { "wallclock", NULL, 0, AV_OPT_TYPE_CONST, {.i64 = MOV_PRFT_SRC_WALLCLOCK}, 0, 0, AV_OPT_FLAG_ENCODING_PARAM, "prft"},
120  { "pts", NULL, 0, AV_OPT_TYPE_CONST, {.i64 = MOV_PRFT_SRC_PTS}, 0, 0, AV_OPT_FLAG_ENCODING_PARAM, "prft"},
121  { "empty_hdlr_name", "write zero-length name string in hdlr atoms within mdia and minf atoms", offsetof(MOVMuxContext, empty_hdlr_name), AV_OPT_TYPE_BOOL, {.i64 = 0}, 0, 1, AV_OPT_FLAG_ENCODING_PARAM},
122  { "movie_timescale", "set movie timescale", offsetof(MOVMuxContext, movie_timescale), AV_OPT_TYPE_INT, {.i64 = MOV_TIMESCALE}, 1, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
123  { NULL },
124 };
125 
126 static const AVClass mov_isobmff_muxer_class = {
127  .class_name = "mov/mp4/tgp/psp/tg2/ipod/ismv/f4v muxer",
128  .item_name = av_default_item_name,
129  .option = options,
130  .version = LIBAVUTIL_VERSION_INT,
131 };
132 
133 static int get_moov_size(AVFormatContext *s);
134 static int mov_write_single_packet(AVFormatContext *s, AVPacket *pkt);
135 
136 static int utf8len(const uint8_t *b)
137 {
138  int len = 0;
139  int val;
140  while (*b) {
141  GET_UTF8(val, *b++, return -1;)
142  len++;
143  }
144  return len;
145 }
146 
147 //FIXME support 64 bit variant with wide placeholders
148 static int64_t update_size(AVIOContext *pb, int64_t pos)
149 {
150  int64_t curpos = avio_tell(pb);
151  avio_seek(pb, pos, SEEK_SET);
152  avio_wb32(pb, curpos - pos); /* rewrite size */
153  avio_seek(pb, curpos, SEEK_SET);
154 
155  return curpos - pos;
156 }
157 
158 static int co64_required(const MOVTrack *track)
159 {
160  if (track->entry > 0 && track->cluster[track->entry - 1].pos + track->data_offset > UINT32_MAX)
161  return 1;
162  return 0;
163 }
164 
165 static int is_cover_image(const AVStream *st)
166 {
167  /* Eg. AV_DISPOSITION_ATTACHED_PIC | AV_DISPOSITION_TIMED_THUMBNAILS
168  * is encoded as sparse video track */
169  return st && st->disposition == AV_DISPOSITION_ATTACHED_PIC;
170 }
171 
172 static int rtp_hinting_needed(const AVStream *st)
173 {
174  /* Add hint tracks for each real audio and video stream */
175  if (is_cover_image(st))
176  return 0;
177  return st->codecpar->codec_type == AVMEDIA_TYPE_VIDEO ||
178  st->codecpar->codec_type == AVMEDIA_TYPE_AUDIO;
179 }
180 
181 /* Chunk offset atom */
182 static int mov_write_stco_tag(AVIOContext *pb, MOVTrack *track)
183 {
184  int i;
185  int mode64 = co64_required(track); // use 32 bit size variant if possible
186  int64_t pos = avio_tell(pb);
187  avio_wb32(pb, 0); /* size */
188  if (mode64)
189  ffio_wfourcc(pb, "co64");
190  else
191  ffio_wfourcc(pb, "stco");
192  avio_wb32(pb, 0); /* version & flags */
193  avio_wb32(pb, track->chunkCount); /* entry count */
194  for (i = 0; i < track->entry; i++) {
195  if (!track->cluster[i].chunkNum)
196  continue;
197  if (mode64 == 1)
198  avio_wb64(pb, track->cluster[i].pos + track->data_offset);
199  else
200  avio_wb32(pb, track->cluster[i].pos + track->data_offset);
201  }
202  return update_size(pb, pos);
203 }
204 
205 /* Sample size atom */
206 static int mov_write_stsz_tag(AVIOContext *pb, MOVTrack *track)
207 {
208  int equalChunks = 1;
209  int i, j, entries = 0, tst = -1, oldtst = -1;
210 
211  int64_t pos = avio_tell(pb);
212  avio_wb32(pb, 0); /* size */
213  ffio_wfourcc(pb, "stsz");
214  avio_wb32(pb, 0); /* version & flags */
215 
216  for (i = 0; i < track->entry; i++) {
217  tst = track->cluster[i].size / track->cluster[i].entries;
218  if (oldtst != -1 && tst != oldtst)
219  equalChunks = 0;
220  oldtst = tst;
221  entries += track->cluster[i].entries;
222  }
223  if (equalChunks && track->entry) {
224  int sSize = track->entry ? track->cluster[0].size / track->cluster[0].entries : 0;
225  sSize = FFMAX(1, sSize); // adpcm mono case could make sSize == 0
226  avio_wb32(pb, sSize); // sample size
227  avio_wb32(pb, entries); // sample count
228  } else {
229  avio_wb32(pb, 0); // sample size
230  avio_wb32(pb, entries); // sample count
231  for (i = 0; i < track->entry; i++) {
232  for (j = 0; j < track->cluster[i].entries; j++) {
233  avio_wb32(pb, track->cluster[i].size /
234  track->cluster[i].entries);
235  }
236  }
237  }
238  return update_size(pb, pos);
239 }
240 
241 /* Sample to chunk atom */
242 static int mov_write_stsc_tag(AVIOContext *pb, MOVTrack *track)
243 {
244  int index = 0, oldval = -1, i;
245  int64_t entryPos, curpos;
246 
247  int64_t pos = avio_tell(pb);
248  avio_wb32(pb, 0); /* size */
249  ffio_wfourcc(pb, "stsc");
250  avio_wb32(pb, 0); // version & flags
251  entryPos = avio_tell(pb);
252  avio_wb32(pb, track->chunkCount); // entry count
253  for (i = 0; i < track->entry; i++) {
254  if (oldval != track->cluster[i].samples_in_chunk && track->cluster[i].chunkNum) {
255  avio_wb32(pb, track->cluster[i].chunkNum); // first chunk
256  avio_wb32(pb, track->cluster[i].samples_in_chunk); // samples per chunk
257  avio_wb32(pb, 0x1); // sample description index
258  oldval = track->cluster[i].samples_in_chunk;
259  index++;
260  }
261  }
262  curpos = avio_tell(pb);
263  avio_seek(pb, entryPos, SEEK_SET);
264  avio_wb32(pb, index); // rewrite size
265  avio_seek(pb, curpos, SEEK_SET);
266 
267  return update_size(pb, pos);
268 }
269 
270 /* Sync sample atom */
271 static int mov_write_stss_tag(AVIOContext *pb, MOVTrack *track, uint32_t flag)
272 {
273  int64_t curpos, entryPos;
274  int i, index = 0;
275  int64_t pos = avio_tell(pb);
276  avio_wb32(pb, 0); // size
277  ffio_wfourcc(pb, flag == MOV_SYNC_SAMPLE ? "stss" : "stps");
278  avio_wb32(pb, 0); // version & flags
279  entryPos = avio_tell(pb);
280  avio_wb32(pb, track->entry); // entry count
281  for (i = 0; i < track->entry; i++) {
282  if (track->cluster[i].flags & flag) {
283  avio_wb32(pb, i + 1);
284  index++;
285  }
286  }
287  curpos = avio_tell(pb);
288  avio_seek(pb, entryPos, SEEK_SET);
289  avio_wb32(pb, index); // rewrite size
290  avio_seek(pb, curpos, SEEK_SET);
291  return update_size(pb, pos);
292 }
293 
294 /* Sample dependency atom */
295 static int mov_write_sdtp_tag(AVIOContext *pb, MOVTrack *track)
296 {
297  int i;
298  uint8_t leading, dependent, reference, redundancy;
299  int64_t pos = avio_tell(pb);
300  avio_wb32(pb, 0); // size
301  ffio_wfourcc(pb, "sdtp");
302  avio_wb32(pb, 0); // version & flags
303  for (i = 0; i < track->entry; i++) {
304  dependent = MOV_SAMPLE_DEPENDENCY_YES;
305  leading = reference = redundancy = MOV_SAMPLE_DEPENDENCY_UNKNOWN;
306  if (track->cluster[i].flags & MOV_DISPOSABLE_SAMPLE) {
307  reference = MOV_SAMPLE_DEPENDENCY_NO;
308  }
309  if (track->cluster[i].flags & MOV_SYNC_SAMPLE) {
310  dependent = MOV_SAMPLE_DEPENDENCY_NO;
311  }
312  avio_w8(pb, (leading << 6) | (dependent << 4) |
313  (reference << 2) | redundancy);
314  }
315  return update_size(pb, pos);
316 }
317 
318 static int mov_write_amr_tag(AVIOContext *pb, MOVTrack *track)
319 {
320  avio_wb32(pb, 0x11); /* size */
321  if (track->mode == MODE_MOV) ffio_wfourcc(pb, "samr");
322  else ffio_wfourcc(pb, "damr");
323  ffio_wfourcc(pb, "FFMP");
324  avio_w8(pb, 0); /* decoder version */
325 
326  avio_wb16(pb, 0x81FF); /* Mode set (all modes for AMR_NB) */
327  avio_w8(pb, 0x00); /* Mode change period (no restriction) */
328  avio_w8(pb, 0x01); /* Frames per sample */
329  return 0x11;
330 }
331 
332 struct eac3_info {
333  AVPacket *pkt;
334  uint8_t ec3_done;
335  uint8_t num_blocks;
336 
337  /* Layout of the EC3SpecificBox */
338  /* maximum bitrate */
339  uint16_t data_rate;
340  int8_t ac3_bit_rate_code;
341  /* number of independent substreams */
342  uint8_t num_ind_sub;
343  struct {
344  /* sample rate code (see ff_ac3_sample_rate_tab) 2 bits */
345  uint8_t fscod;
346  /* bit stream identification 5 bits */
347  uint8_t bsid;
348  /* one bit reserved */
349  /* audio service mixing (not supported yet) 1 bit */
350  /* bit stream mode 3 bits */
351  uint8_t bsmod;
352  /* audio coding mode 3 bits */
353  uint8_t acmod;
354  /* sub woofer on 1 bit */
355  uint8_t lfeon;
356  /* 3 bits reserved */
357  /* number of dependent substreams associated with this substream 4 bits */
358  uint8_t num_dep_sub;
359  /* channel locations of the dependent substream(s), if any, 9 bits */
360  uint16_t chan_loc;
361  /* if there is no dependent substream, then one bit reserved instead */
362  } substream[1]; /* TODO: support 8 independent substreams */
363 };
364 
365 static int mov_write_ac3_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
366 {
367  struct eac3_info *info = track->eac3_priv;
368  PutBitContext pbc;
369  uint8_t buf[3];
370 
371  if (!info || !info->ec3_done) {
372  av_log(s, AV_LOG_ERROR,
373  "Cannot write moov atom before AC3 packets."
374  " Set the delay_moov flag to fix this.\n");
375  return AVERROR(EINVAL);
376  }
377 
378  if (info->substream[0].bsid > 8) {
379  av_log(s, AV_LOG_ERROR,
380  "RealAudio AC-3/DolbyNet with bsid %d is not defined by the "
381  "ISOBMFF specification in ETSI TS 102 366!\n",
382  info->substream[0].bsid);
383  return AVERROR(EINVAL);
384  }
385 
386  if (info->ac3_bit_rate_code < 0) {
387  av_log(s, AV_LOG_ERROR,
388  "No valid AC3 bit rate code for data rate of %d!\n",
389  info->data_rate);
390  return AVERROR(EINVAL);
391  }
392 
393  avio_wb32(pb, 11);
394  ffio_wfourcc(pb, "dac3");
395 
396  init_put_bits(&pbc, buf, sizeof(buf));
397  put_bits(&pbc, 2, info->substream[0].fscod);
398  put_bits(&pbc, 5, info->substream[0].bsid);
399  put_bits(&pbc, 3, info->substream[0].bsmod);
400  put_bits(&pbc, 3, info->substream[0].acmod);
401  put_bits(&pbc, 1, info->substream[0].lfeon);
402  put_bits(&pbc, 5, info->ac3_bit_rate_code); // bit_rate_code
403  put_bits(&pbc, 5, 0); // reserved
404 
405  flush_put_bits(&pbc);
406  avio_write(pb, buf, sizeof(buf));
407 
408  return 11;
409 }
410 
411 static int handle_eac3(MOVMuxContext *mov, AVPacket *pkt, MOVTrack *track)
412 {
413  AC3HeaderInfo *hdr = NULL;
414  struct eac3_info *info;
415  int num_blocks, ret;
416 
417  if (!track->eac3_priv) {
418  if (!(track->eac3_priv = av_mallocz(sizeof(*info))))
419  return AVERROR(ENOMEM);
420 
421  ((struct eac3_info *)track->eac3_priv)->ac3_bit_rate_code = -1;
422  }
423  info = track->eac3_priv;
424 
425  if (!info->pkt && !(info->pkt = av_packet_alloc()))
426  return AVERROR(ENOMEM);
427 
428  if ((ret = avpriv_ac3_parse_header(&hdr, pkt->data, pkt->size)) < 0) {
429  if (ret == AVERROR(ENOMEM))
430  goto end;
431 
432  /* drop the packets until we see a good one */
433  if (!track->entry) {
434  av_log(mov->fc, AV_LOG_WARNING, "Dropping invalid packet from start of the stream\n");
435  ret = 0;
436  } else
437  ret = AVERROR_INVALIDDATA;
438  goto end;
439  }
440 
441  info->data_rate = FFMAX(info->data_rate, hdr->bit_rate / 1000);
442  info->ac3_bit_rate_code = FFMAX(info->ac3_bit_rate_code,
443  hdr->ac3_bit_rate_code);
444  num_blocks = hdr->num_blocks;
445 
446  if (!info->ec3_done) {
447  /* AC-3 substream must be the first one */
448  if (hdr->bitstream_id <= 10 && hdr->substreamid != 0) {
449  ret = AVERROR(EINVAL);
450  goto end;
451  }
452 
453  /* this should always be the case, given that our AC-3 parser
454  * concatenates dependent frames to their independent parent */
455  if (hdr->frame_type == EAC3_FRAME_TYPE_INDEPENDENT ||
456  hdr->frame_type == EAC3_FRAME_TYPE_AC3_CONVERT) {
457  /* substream ids must be incremental */
458  if (hdr->substreamid > info->num_ind_sub + 1) {
459  ret = AVERROR(EINVAL);
460  goto end;
461  }
462 
463  if (hdr->substreamid == info->num_ind_sub + 1) {
464  //info->num_ind_sub++;
465  avpriv_request_sample(mov->fc, "Multiple independent substreams");
466  ret = AVERROR_PATCHWELCOME;
467  goto end;
468  } else if (hdr->substreamid < info->num_ind_sub ||
469  hdr->substreamid == 0 && info->substream[0].bsid) {
470  info->ec3_done = 1;
471  goto concatenate;
472  }
473  } else {
474  if (hdr->substreamid != 0) {
475  avpriv_request_sample(mov->fc, "Multiple non EAC3 independent substreams");
476  ret = AVERROR_PATCHWELCOME;
477  goto end;
478  }
479  }
480 
481  /* fill the info needed for the "dec3" atom */
482  info->substream[hdr->substreamid].fscod = hdr->sr_code;
483  info->substream[hdr->substreamid].bsid = hdr->bitstream_id;
484  info->substream[hdr->substreamid].bsmod = hdr->bitstream_mode;
485  info->substream[hdr->substreamid].acmod = hdr->channel_mode;
486  info->substream[hdr->substreamid].lfeon = hdr->lfe_on;
487 
488  if (track->par->codec_id == AV_CODEC_ID_AC3) {
489  // with AC-3 we only require the information of a single packet,
490  // so we can finish as soon as the basic values of the bit stream
491  // have been set to the track's informational structure.
492  info->ec3_done = 1;
493  goto concatenate;
494  }
495 
496  /* Parse dependent substream(s), if any */
497  if (pkt->size != hdr->frame_size) {
498  int cumul_size = hdr->frame_size;
499  int parent = hdr->substreamid;
500 
501  while (cumul_size != pkt->size) {
502  GetBitContext gbc;
503  int i;
504  ret = avpriv_ac3_parse_header(&hdr, pkt->data + cumul_size, pkt->size - cumul_size);
505  if (ret < 0)
506  goto end;
507  if (hdr->frame_type != EAC3_FRAME_TYPE_DEPENDENT) {
508  ret = AVERROR(EINVAL);
509  goto end;
510  }
511  info->substream[parent].num_dep_sub++;
512  ret /= 8;
513 
514  /* header is parsed up to lfeon, but custom channel map may be needed */
515  init_get_bits8(&gbc, pkt->data + cumul_size + ret, pkt->size - cumul_size - ret);
516  /* skip bsid */
517  skip_bits(&gbc, 5);
518  /* skip volume control params */
519  for (i = 0; i < (hdr->channel_mode ? 1 : 2); i++) {
520  skip_bits(&gbc, 5); // skip dialog normalization
521  if (get_bits1(&gbc)) {
522  skip_bits(&gbc, 8); // skip compression gain word
523  }
524  }
525  /* get the dependent stream channel map, if exists */
526  if (get_bits1(&gbc))
527  info->substream[parent].chan_loc |= (get_bits(&gbc, 16) >> 5) & 0x1f;
528  else
529  info->substream[parent].chan_loc |= hdr->channel_mode;
530  cumul_size += hdr->frame_size;
531  }
532  }
533  }
534 
535 concatenate:
536  if (!info->num_blocks && num_blocks == 6) {
537  ret = pkt->size;
538  goto end;
539  }
540  else if (info->num_blocks + num_blocks > 6) {
541  ret = AVERROR_INVALIDDATA;
542  goto end;
543  }
544 
545  if (!info->num_blocks) {
546  ret = av_packet_ref(info->pkt, pkt);
547  if (!ret)
548  info->num_blocks = num_blocks;
549  goto end;
550  } else {
551  if ((ret = av_grow_packet(info->pkt, pkt->size)) < 0)
552  goto end;
553  memcpy(info->pkt->data + info->pkt->size - pkt->size, pkt->data, pkt->size);
554  info->num_blocks += num_blocks;
555  info->pkt->duration += pkt->duration;
556  if (info->num_blocks != 6)
557  goto end;
558  av_packet_unref(pkt);
559  av_packet_move_ref(pkt, info->pkt);
560  info->num_blocks = 0;
561  }
562  ret = pkt->size;
563 
564 end:
565  av_free(hdr);
566 
567  return ret;
568 }
569 
570 static int mov_write_eac3_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
571 {
572  PutBitContext pbc;
573  uint8_t *buf;
574  struct eac3_info *info;
575  int size, i;
576 
577  if (!track->eac3_priv) {
578  av_log(s, AV_LOG_ERROR,
579  "Cannot write moov atom before EAC3 packets parsed.\n");
580  return AVERROR(EINVAL);
581  }
582 
583  info = track->eac3_priv;
584  size = 2 + ((34 * (info->num_ind_sub + 1) + 7) >> 3);
585  buf = av_malloc(size);
586  if (!buf) {
587  return AVERROR(ENOMEM);
588  }
589 
590  init_put_bits(&pbc, buf, size);
591  put_bits(&pbc, 13, info->data_rate);
592  put_bits(&pbc, 3, info->num_ind_sub);
593  for (i = 0; i <= info->num_ind_sub; i++) {
594  put_bits(&pbc, 2, info->substream[i].fscod);
595  put_bits(&pbc, 5, info->substream[i].bsid);
596  put_bits(&pbc, 1, 0); /* reserved */
597  put_bits(&pbc, 1, 0); /* asvc */
598  put_bits(&pbc, 3, info->substream[i].bsmod);
599  put_bits(&pbc, 3, info->substream[i].acmod);
600  put_bits(&pbc, 1, info->substream[i].lfeon);
601  put_bits(&pbc, 5, 0); /* reserved */
602  put_bits(&pbc, 4, info->substream[i].num_dep_sub);
603  if (!info->substream[i].num_dep_sub) {
604  put_bits(&pbc, 1, 0); /* reserved */
605  } else {
606  put_bits(&pbc, 9, info->substream[i].chan_loc);
607  }
608  }
609  flush_put_bits(&pbc);
610  size = put_bytes_output(&pbc);
611 
612  avio_wb32(pb, size + 8);
613  ffio_wfourcc(pb, "dec3");
614  avio_write(pb, buf, size);
615 
616  av_free(buf);
617 
618  return size;
619 }
620 
621 /**
622  * This function writes extradata "as is".
623  * Extradata must be formatted like a valid atom (with size and tag).
624  */
625 static int mov_write_extradata_tag(AVIOContext *pb, MOVTrack *track)
626 {
627  avio_write(pb, track->par->extradata, track->par->extradata_size);
628  return track->par->extradata_size;
629 }
630 
631 static int mov_write_enda_tag(AVIOContext *pb)
632 {
633  avio_wb32(pb, 10);
634  ffio_wfourcc(pb, "enda");
635  avio_wb16(pb, 1); /* little endian */
636  return 10;
637 }
638 
639 static int mov_write_enda_tag_be(AVIOContext *pb)
640 {
641  avio_wb32(pb, 10);
642  ffio_wfourcc(pb, "enda");
643  avio_wb16(pb, 0); /* big endian */
644  return 10;
645 }
646 
647 static void put_descr(AVIOContext *pb, int tag, unsigned int size)
648 {
649  int i = 3;
650  avio_w8(pb, tag);
651  for (; i > 0; i--)
652  avio_w8(pb, (size >> (7 * i)) | 0x80);
653  avio_w8(pb, size & 0x7F);
654 }
655 
656 static unsigned compute_avg_bitrate(MOVTrack *track)
657 {
658  uint64_t size = 0;
659  int i;
660  if (!track->track_duration)
661  return 0;
662  for (i = 0; i < track->entry; i++)
663  size += track->cluster[i].size;
664  return size * 8 * track->timescale / track->track_duration;
665 }
666 
667 struct mpeg4_bit_rate_values {
668  uint32_t buffer_size; ///< Size of the decoding buffer for the elementary stream in bytes.
669  uint32_t max_bit_rate; ///< Maximum rate in bits/second over any window of one second.
670  uint32_t avg_bit_rate; ///< Average rate in bits/second over the entire presentation.
671 };
672 
673 static struct mpeg4_bit_rate_values calculate_mpeg4_bit_rates(MOVTrack *track)
674 {
675  AVCPBProperties *props = track->st ?
676  (AVCPBProperties*)av_stream_get_side_data(track->st,
677  AV_PKT_DATA_CPB_PROPERTIES,
678  NULL) :
679  NULL;
680  struct mpeg4_bit_rate_values bit_rates = { 0 };
681 
682  bit_rates.avg_bit_rate = compute_avg_bitrate(track);
683  if (!bit_rates.avg_bit_rate) {
684  // if the average bit rate cannot be calculated at this point, such as
685  // in the case of fragmented MP4, utilize the following values as
686  // fall-back in priority order:
687  //
688  // 1. average bit rate property
689  // 2. bit rate (usually average over the whole clip)
690  // 3. maximum bit rate property
691 
692  if (props && props->avg_bitrate) {
693  bit_rates.avg_bit_rate = props->avg_bitrate;
694  } else if (track->par->bit_rate) {
695  bit_rates.avg_bit_rate = track->par->bit_rate;
696  } else if (props && props->max_bitrate) {
697  bit_rates.avg_bit_rate = props->max_bitrate;
698  }
699  }
700 
701  // (FIXME should be max rate in any 1 sec window)
702  bit_rates.max_bit_rate = FFMAX(track->par->bit_rate,
703  bit_rates.avg_bit_rate);
704 
705  // utilize values from properties if we have them available
706  if (props) {
707  bit_rates.max_bit_rate = FFMAX(bit_rates.max_bit_rate,
708  props->max_bitrate);
709  bit_rates.buffer_size = props->buffer_size / 8;
710  }
711 
712  return bit_rates;
713 }
714 
715 static int mov_write_esds_tag(AVIOContext *pb, MOVTrack *track) // Basic
716 {
717  struct mpeg4_bit_rate_values bit_rates = calculate_mpeg4_bit_rates(track);
718  int64_t pos = avio_tell(pb);
719  int decoder_specific_info_len = track->vos_len ? 5 + track->vos_len : 0;
720 
721  avio_wb32(pb, 0); // size
722  ffio_wfourcc(pb, "esds");
723  avio_wb32(pb, 0); // Version
724 
725  // ES descriptor
726  put_descr(pb, 0x03, 3 + 5+13 + decoder_specific_info_len + 5+1);
727  avio_wb16(pb, track->track_id);
728  avio_w8(pb, 0x00); // flags (= no flags)
729 
730  // DecoderConfig descriptor
731  put_descr(pb, 0x04, 13 + decoder_specific_info_len);
732 
733  // Object type indication
734  if ((track->par->codec_id == AV_CODEC_ID_MP2 ||
735  track->par->codec_id == AV_CODEC_ID_MP3) &&
736  track->par->sample_rate > 24000)
737  avio_w8(pb, 0x6B); // 11172-3
738  else
739  avio_w8(pb, ff_codec_get_tag(ff_mp4_obj_type, track->par->codec_id));
740 
741  // the following fields is made of 6 bits to identify the streamtype (4 for video, 5 for audio)
742  // plus 1 bit to indicate upstream and 1 bit set to 1 (reserved)
743  if (track->par->codec_id == AV_CODEC_ID_DVD_SUBTITLE)
744  avio_w8(pb, (0x38 << 2) | 1); // flags (= NeroSubpicStream)
745  else if (track->par->codec_type == AVMEDIA_TYPE_AUDIO)
746  avio_w8(pb, 0x15); // flags (= Audiostream)
747  else
748  avio_w8(pb, 0x11); // flags (= Visualstream)
749 
750  avio_wb24(pb, bit_rates.buffer_size); // Buffersize DB
751  avio_wb32(pb, bit_rates.max_bit_rate); // maxbitrate
752  avio_wb32(pb, bit_rates.avg_bit_rate);
753 
754  if (track->vos_len) {
755  // DecoderSpecific info descriptor
756  put_descr(pb, 0x05, track->vos_len);
757  avio_write(pb, track->vos_data, track->vos_len);
758  }
759 
760  // SL descriptor
761  put_descr(pb, 0x06, 1);
762  avio_w8(pb, 0x02);
763  return update_size(pb, pos);
764 }
765 
766 static int mov_pcm_le_gt16(enum AVCodecID codec_id)
767 {
768  return codec_id == AV_CODEC_ID_PCM_S24LE ||
769  codec_id == AV_CODEC_ID_PCM_S32LE ||
770  codec_id == AV_CODEC_ID_PCM_F32LE ||
771  codec_id == AV_CODEC_ID_PCM_F64LE;
772 }
773 
774 static int mov_pcm_be_gt16(enum AVCodecID codec_id)
775 {
776  return codec_id == AV_CODEC_ID_PCM_S24BE ||
777  codec_id == AV_CODEC_ID_PCM_S32BE ||
778  codec_id == AV_CODEC_ID_PCM_F32BE ||
779  codec_id == AV_CODEC_ID_PCM_F64BE;
780 }
781 
782 static int mov_write_ms_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
783 {
784  int ret;
785  int64_t pos = avio_tell(pb);
786  avio_wb32(pb, 0);
787  avio_wl32(pb, track->tag); // store it byteswapped
788  track->par->codec_tag = av_bswap16(track->tag >> 16);
789  if ((ret = ff_put_wav_header(s, pb, track->par, 0)) < 0)
790  return ret;
791  return update_size(pb, pos);
792 }
793 
794 static int mov_write_wfex_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
795 {
796  int ret;
797  int64_t pos = avio_tell(pb);
798  avio_wb32(pb, 0);
799  ffio_wfourcc(pb, "wfex");
800  if ((ret = ff_put_wav_header(s, pb, track->st->codecpar, FF_PUT_WAV_HEADER_FORCE_WAVEFORMATEX)) < 0)
801  return ret;
802  return update_size(pb, pos);
803 }
804 
805 static int mov_write_dfla_tag(AVIOContext *pb, MOVTrack *track)
806 {
807  int64_t pos = avio_tell(pb);
808  avio_wb32(pb, 0);
809  ffio_wfourcc(pb, "dfLa");
810  avio_w8(pb, 0); /* version */
811  avio_wb24(pb, 0); /* flags */
812 
813  /* Expect the encoder to pass a METADATA_BLOCK_TYPE_STREAMINFO. */
814  if (track->par->extradata_size != FLAC_STREAMINFO_SIZE)
815  return AVERROR_INVALIDDATA;
816 
817  /* TODO: Write other METADATA_BLOCK_TYPEs if the encoder makes them available. */
818  avio_w8(pb, 1 << 7 | FLAC_METADATA_TYPE_STREAMINFO); /* LastMetadataBlockFlag << 7 | BlockType */
819  avio_wb24(pb, track->par->extradata_size); /* Length */
820  avio_write(pb, track->par->extradata, track->par->extradata_size); /* BlockData[Length] */
821 
822  return update_size(pb, pos);
823 }
824 
825 static int mov_write_dops_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
826 {
827  int64_t pos = avio_tell(pb);
828  int channels, channel_map;
829  avio_wb32(pb, 0);
830  ffio_wfourcc(pb, "dOps");
831  avio_w8(pb, 0); /* Version */
832  if (track->par->extradata_size < 19) {
833  av_log(s, AV_LOG_ERROR, "invalid extradata size\n");
834  return AVERROR_INVALIDDATA;
835  }
836  /* extradata contains an Ogg OpusHead, other than byte-ordering and
837  OpusHead's preceeding magic/version, OpusSpecificBox is currently
838  identical. */
839  channels = AV_RB8(track->par->extradata + 9);
840  channel_map = AV_RB8(track->par->extradata + 18);
841 
842  avio_w8(pb, channels); /* OuputChannelCount */
843  avio_wb16(pb, AV_RL16(track->par->extradata + 10)); /* PreSkip */
844  avio_wb32(pb, AV_RL32(track->par->extradata + 12)); /* InputSampleRate */
845  avio_wb16(pb, AV_RL16(track->par->extradata + 16)); /* OutputGain */
846  avio_w8(pb, channel_map); /* ChannelMappingFamily */
847  /* Write the rest of the header out without byte-swapping. */
848  if (channel_map) {
849  if (track->par->extradata_size < 21 + channels) {
850  av_log(s, AV_LOG_ERROR, "invalid extradata size\n");
851  return AVERROR_INVALIDDATA;
852  }
853  avio_write(pb, track->par->extradata + 19, 2 + channels); /* ChannelMappingTable */
854  }
855 
856  return update_size(pb, pos);
857 }
858 
859 static int mov_write_dmlp_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
860 {
861  int64_t pos = avio_tell(pb);
862  int length;
863  avio_wb32(pb, 0);
864  ffio_wfourcc(pb, "dmlp");
865 
866  if (track->vos_len < 20) {
867  av_log(s, AV_LOG_ERROR,
868  "Cannot write moov atom before TrueHD packets."
869  " Set the delay_moov flag to fix this.\n");
870  return AVERROR(EINVAL);
871  }
872 
873  length = (AV_RB16(track->vos_data) & 0xFFF) * 2;
874  if (length < 20 || length > track->vos_len)
875  return AVERROR_INVALIDDATA;
876 
877  // Only TrueHD is supported
878  if (AV_RB32(track->vos_data + 4) != 0xF8726FBA)
879  return AVERROR_INVALIDDATA;
880 
881  avio_wb32(pb, AV_RB32(track->vos_data + 8)); /* format_info */
882  avio_wb16(pb, AV_RB16(track->vos_data + 18) << 1); /* peak_data_rate */
883  avio_wb32(pb, 0); /* reserved */
884 
885  return update_size(pb, pos);
886 }
887 
888 static int mov_write_chan_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
889 {
890  uint32_t layout_tag, bitmap, *channel_desc;
891  int64_t pos = avio_tell(pb);
892  int num_desc, ret;
893 
894  if (track->multichannel_as_mono)
895  return 0;
896 
897  ret = ff_mov_get_channel_layout_tag(track->par, &layout_tag,
898  &bitmap, &channel_desc);
899 
900  if (ret < 0) {
901  if (ret == AVERROR(ENOSYS)) {
902  av_log(s, AV_LOG_WARNING, "not writing 'chan' tag due to "
903  "lack of channel information\n");
904  ret = 0;
905  }
906 
907  return ret;
908  }
909 
910  if (layout_tag == MOV_CH_LAYOUT_MONO && track->mono_as_fc > 0) {
911  av_assert0(!channel_desc);
912  channel_desc = av_malloc(sizeof(*channel_desc));
913  if (!channel_desc)
914  return AVERROR(ENOMEM);
915 
916  layout_tag = 0;
917  bitmap = 0;
918  *channel_desc = 3; // channel label "Center"
919  }
920 
921  num_desc = layout_tag ? 0 : track->par->ch_layout.nb_channels;
922 
923  avio_wb32(pb, 0); // Size
924  ffio_wfourcc(pb, "chan"); // Type
925  avio_w8(pb, 0); // Version
926  avio_wb24(pb, 0); // Flags
927  avio_wb32(pb, layout_tag); // mChannelLayoutTag
928  avio_wb32(pb, bitmap); // mChannelBitmap
929  avio_wb32(pb, num_desc); // mNumberChannelDescriptions
930 
931  for (int i = 0; i < num_desc; i++) {
932  avio_wb32(pb, channel_desc[i]); // mChannelLabel
933  avio_wb32(pb, 0); // mChannelFlags
934  avio_wl32(pb, 0); // mCoordinates[0]
935  avio_wl32(pb, 0); // mCoordinates[1]
936  avio_wl32(pb, 0); // mCoordinates[2]
937  }
938 
939  av_free(channel_desc);
940 
941  return update_size(pb, pos);
942 }
943 
944 static int mov_write_wave_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
945 {
946  int64_t pos = avio_tell(pb);
947 
948  avio_wb32(pb, 0); /* size */
949  ffio_wfourcc(pb, "wave");
950 
951  if (track->par->codec_id != AV_CODEC_ID_QDM2) {
952  avio_wb32(pb, 12); /* size */
953  ffio_wfourcc(pb, "frma");
954  avio_wl32(pb, track->tag);
955  }
956 
957  if (track->par->codec_id == AV_CODEC_ID_AAC) {
958  /* useless atom needed by mplayer, ipod, not needed by quicktime */
959  avio_wb32(pb, 12); /* size */
960  ffio_wfourcc(pb, "mp4a");
961  avio_wb32(pb, 0);
962  mov_write_esds_tag(pb, track);
963  } else if (mov_pcm_le_gt16(track->par->codec_id)) {
964  mov_write_enda_tag(pb);
965  } else if (mov_pcm_be_gt16(track->par->codec_id)) {
966  mov_write_enda_tag_be(pb);
967  } else if (track->par->codec_id == AV_CODEC_ID_AMR_NB) {
968  mov_write_amr_tag(pb, track);
969  } else if (track->par->codec_id == AV_CODEC_ID_AC3) {
970  mov_write_ac3_tag(s, pb, track);
971  } else if (track->par->codec_id == AV_CODEC_ID_EAC3) {
972  mov_write_eac3_tag(s, pb, track);
973  } else if (track->par->codec_id == AV_CODEC_ID_ALAC ||
974  track->par->codec_id == AV_CODEC_ID_QDM2) {
975  mov_write_extradata_tag(pb, track);
976  } else if (track->par->codec_id == AV_CODEC_ID_ADPCM_MS ||
977  track->par->codec_id == AV_CODEC_ID_ADPCM_IMA_WAV) {
978  mov_write_ms_tag(s, pb, track);
979  }
980 
981  avio_wb32(pb, 8); /* size */
982  avio_wb32(pb, 0); /* null tag */
983 
984  return update_size(pb, pos);
985 }
986 
987 static int mov_write_dvc1_structs(MOVTrack *track, uint8_t *buf)
988 {
989  uint8_t *unescaped;
990  const uint8_t *start, *next, *end = track->vos_data + track->vos_len;
991  int unescaped_size, seq_found = 0;
992  int level = 0, interlace = 0;
993  int packet_seq = track->vc1_info.packet_seq;
994  int packet_entry = track->vc1_info.packet_entry;
995  int slices = track->vc1_info.slices;
996  PutBitContext pbc;
997 
998  if (track->start_dts == AV_NOPTS_VALUE) {
999  /* No packets written yet, vc1_info isn't authoritative yet. */
1000  /* Assume inline sequence and entry headers. */
1001  packet_seq = packet_entry = 1;
1002  av_log(NULL, AV_LOG_WARNING,
1003  "moov atom written before any packets, unable to write correct "
1004  "dvc1 atom. Set the delay_moov flag to fix this.\n");
1005  }
1006 
1007  unescaped = av_mallocz(track->vos_len + AV_INPUT_BUFFER_PADDING_SIZE);
1008  if (!unescaped)
1009  return AVERROR(ENOMEM);
1010  start = find_next_marker(track->vos_data, end);
1011  for (next = start; next < end; start = next) {
1012  GetBitContext gb;
1013  int size;
1014  next = find_next_marker(start + 4, end);
1015  size = next - start - 4;
1016  if (size <= 0)
1017  continue;
1018  unescaped_size = vc1_unescape_buffer(start + 4, size, unescaped);
1019  init_get_bits(&gb, unescaped, 8 * unescaped_size);
1020  if (AV_RB32(start) == VC1_CODE_SEQHDR) {
1021  int profile = get_bits(&gb, 2);
1022  if (profile != PROFILE_ADVANCED) {
1023  av_free(unescaped);
1024  return AVERROR(ENOSYS);
1025  }
1026  seq_found = 1;
1027  level = get_bits(&gb, 3);
1028  /* chromaformat, frmrtq_postproc, bitrtq_postproc, postprocflag,
1029  * width, height */
1030  skip_bits_long(&gb, 2 + 3 + 5 + 1 + 2*12);
1031  skip_bits(&gb, 1); /* broadcast */
1032  interlace = get_bits1(&gb);
1033  skip_bits(&gb, 4); /* tfcntrflag, finterpflag, reserved, psf */
1034  }
1035  }
1036  if (!seq_found) {
1037  av_free(unescaped);
1038  return AVERROR(ENOSYS);
1039  }
1040 
1041  init_put_bits(&pbc, buf, 7);
1042  /* VC1DecSpecStruc */
1043  put_bits(&pbc, 4, 12); /* profile - advanced */
1044  put_bits(&pbc, 3, level);
1045  put_bits(&pbc, 1, 0); /* reserved */
1046  /* VC1AdvDecSpecStruc */
1047  put_bits(&pbc, 3, level);
1048  put_bits(&pbc, 1, 0); /* cbr */
1049  put_bits(&pbc, 6, 0); /* reserved */
1050  put_bits(&pbc, 1, !interlace); /* no interlace */
1051  put_bits(&pbc, 1, !packet_seq); /* no multiple seq */
1052  put_bits(&pbc, 1, !packet_entry); /* no multiple entry */
1053  put_bits(&pbc, 1, !slices); /* no slice code */
1054  put_bits(&pbc, 1, 0); /* no bframe */
1055  put_bits(&pbc, 1, 0); /* reserved */
1056 
1057  /* framerate */
1058  if (track->st->avg_frame_rate.num > 0 && track->st->avg_frame_rate.den > 0)
1059  put_bits32(&pbc, track->st->avg_frame_rate.num / track->st->avg_frame_rate.den);
1060  else
1061  put_bits32(&pbc, 0xffffffff);
1062 
1063  flush_put_bits(&pbc);
1064 
1065  av_free(unescaped);
1066 
1067  return 0;
1068 }
1069 
1070 static int mov_write_dvc1_tag(AVIOContext *pb, MOVTrack *track)
1071 {
1072  uint8_t buf[7] = { 0 };
1073  int ret;
1074 
1075  if ((ret = mov_write_dvc1_structs(track, buf)) < 0)
1076  return ret;
1077 
1078  avio_wb32(pb, track->vos_len + 8 + sizeof(buf));
1079  ffio_wfourcc(pb, "dvc1");
1080  avio_write(pb, buf, sizeof(buf));
1081  avio_write(pb, track->vos_data, track->vos_len);
1082 
1083  return 0;
1084 }
1085 
1086 static int mov_write_glbl_tag(AVIOContext *pb, MOVTrack *track)
1087 {
1088  avio_wb32(pb, track->vos_len + 8);
1089  ffio_wfourcc(pb, "glbl");
1090  avio_write(pb, track->vos_data, track->vos_len);
1091  return 8 + track->vos_len;
1092 }
1093 
1094 /**
1095  * Compute flags for 'lpcm' tag.
1096  * See CoreAudioTypes and AudioStreamBasicDescription at Apple.
1097  */
1098 static int mov_get_lpcm_flags(enum AVCodecID codec_id)
1099 {
1100  switch (codec_id) {
1101  case AV_CODEC_ID_PCM_F32BE:
1102  case AV_CODEC_ID_PCM_F64BE:
1103  return 11;
1104  case AV_CODEC_ID_PCM_F32LE:
1105  case AV_CODEC_ID_PCM_F64LE:
1106  return 9;
1107  case AV_CODEC_ID_PCM_U8:
1108  return 10;
1109  case AV_CODEC_ID_PCM_S16BE:
1110  case AV_CODEC_ID_PCM_S24BE:
1111  case AV_CODEC_ID_PCM_S32BE:
1112  return 14;
1113  case AV_CODEC_ID_PCM_S8:
1114  case AV_CODEC_ID_PCM_S16LE:
1115  case AV_CODEC_ID_PCM_S24LE:
1116  case AV_CODEC_ID_PCM_S32LE:
1117  return 12;
1118  default:
1119  return 0;
1120  }
1121 }
1122 
1123 static int get_cluster_duration(MOVTrack *track, int cluster_idx)
1124 {
1125  int64_t next_dts;
1126 
1127  if (cluster_idx >= track->entry)
1128  return 0;
1129 
1130  if (cluster_idx + 1 == track->entry)
1131  next_dts = track->track_duration + track->start_dts;
1132  else
1133  next_dts = track->cluster[cluster_idx + 1].dts;
1134 
1135  next_dts -= track->cluster[cluster_idx].dts;
1136 
1137  av_assert0(next_dts >= 0);
1138  av_assert0(next_dts <= INT_MAX);
1139 
1140  return next_dts;
1141 }
1142 
1143 static int get_samples_per_packet(MOVTrack *track)
1144 {
1145  int i, first_duration;
1146 
1147 // return track->par->frame_size;
1148 
1149  /* use 1 for raw PCM */
1150  if (!track->audio_vbr)
1151  return 1;
1152 
1153  /* check to see if duration is constant for all clusters */
1154  if (!track->entry)
1155  return 0;
1156  first_duration = get_cluster_duration(track, 0);
1157  for (i = 1; i < track->entry; i++) {
1158  if (get_cluster_duration(track, i) != first_duration)
1159  return 0;
1160  }
1161  return first_duration;
1162 }
1163 
1164 static int mov_write_btrt_tag(AVIOContext *pb, MOVTrack *track)
1165 {
1166  int64_t pos = avio_tell(pb);
1167  struct mpeg4_bit_rate_values bit_rates = calculate_mpeg4_bit_rates(track);
1168  if (!bit_rates.max_bit_rate && !bit_rates.avg_bit_rate &&
1169  !bit_rates.buffer_size)
1170  // no useful data to be written, skip
1171  return 0;
1172 
1173  avio_wb32(pb, 0); /* size */
1174  ffio_wfourcc(pb, "btrt");
1175 
1176  avio_wb32(pb, bit_rates.buffer_size);
1177  avio_wb32(pb, bit_rates.max_bit_rate);
1178  avio_wb32(pb, bit_rates.avg_bit_rate);
1179 
1180  return update_size(pb, pos);
1181 }
1182 
1183 static int mov_write_chnl_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
1184 {
1185  int64_t pos = avio_tell(pb);
1186  int config = 0;
1187  int ret;
1188  uint8_t *speaker_pos = NULL;
1189  const AVChannelLayout *layout = &track->par->ch_layout;
1190 
1191  ret = ff_mov_get_channel_config_from_layout(layout, &config);
1192  if (ret || !config) {
1193  config = 0;
1194  speaker_pos = av_malloc(layout->nb_channels);
1195  ret = ff_mov_get_channel_positions_from_layout(layout,
1196  speaker_pos, layout->nb_channels);
1197  if (ret) {
1198  char buf[128] = {0};
1199 
1200  av_freep(&speaker_pos);
1201  av_channel_layout_describe(layout, buf, sizeof(buf));
1202  av_log(s, AV_LOG_ERROR, "unsupported channel layout %s\n", buf);
1203  return ret;
1204  }
1205  }
1206 
1207  avio_wb32(pb, 0); /* size */
1208  ffio_wfourcc(pb, "chnl");
1209  avio_wb32(pb, 0); /* version & flags */
1210 
1211  avio_w8(pb, 1); /* stream_structure */
1212  avio_w8(pb, config);
1213  if (config) {
1214  avio_wb64(pb, 0);
1215  } else {
1216  for (int i = 0; i < layout->nb_channels; i++)
1217  avio_w8(pb, speaker_pos[i]);
1218  av_freep(&speaker_pos);
1219  }
1220 
1221  return update_size(pb, pos);
1222 }
1223 
1224 static int mov_write_pcmc_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
1225 {
1226  int64_t pos = avio_tell(pb);
1227  int format_flags;
1228  int sample_size;
1229 
1230  avio_wb32(pb, 0); /* size */
1231  ffio_wfourcc(pb, "pcmC");
1232  avio_wb32(pb, 0); /* version & flags */
1233 
1234  /* 0x01: indicates little-endian format */
1235  format_flags = (track->par->codec_id == AV_CODEC_ID_PCM_F32LE ||
1236  track->par->codec_id == AV_CODEC_ID_PCM_F64LE ||
1237  track->par->codec_id == AV_CODEC_ID_PCM_S16LE ||
1238  track->par->codec_id == AV_CODEC_ID_PCM_S24LE ||
1239  track->par->codec_id == AV_CODEC_ID_PCM_S32LE);
1240  avio_w8(pb, format_flags);
1241  sample_size = track->par->bits_per_raw_sample;
1242  if (!sample_size)
1243  sample_size = av_get_exact_bits_per_sample(track->par->codec_id);
1244  av_assert0(sample_size);
1245  avio_w8(pb, sample_size);
1246 
1247  return update_size(pb, pos);
1248 }
1249 
1250 static int mov_write_audio_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov, MOVTrack *track)
1251 {
1252  int64_t pos = avio_tell(pb);
1253  int version = 0;
1254  uint32_t tag = track->tag;
1255  int ret = 0;
1256 
1257  if (track->mode == MODE_MOV) {
1258  if (track->timescale > UINT16_MAX || !track->par->ch_layout.nb_channels) {
1259  if (mov_get_lpcm_flags(track->par->codec_id))
1260  tag = AV_RL32("lpcm");
1261  version = 2;
1262  } else if (track->audio_vbr || mov_pcm_le_gt16(track->par->codec_id) ||
1263  mov_pcm_be_gt16(track->par->codec_id) ||
1264  track->par->codec_id == AV_CODEC_ID_ADPCM_MS ||
1265  track->par->codec_id == AV_CODEC_ID_ADPCM_IMA_WAV ||
1266  track->par->codec_id == AV_CODEC_ID_QDM2) {
1267  version = 1;
1268  }
1269  }
1270 
1271  avio_wb32(pb, 0); /* size */
1272  if (mov->encryption_scheme != MOV_ENC_NONE) {
1273  ffio_wfourcc(pb, "enca");
1274  } else {
1275  avio_wl32(pb, tag); // store it byteswapped
1276  }
1277  avio_wb32(pb, 0); /* Reserved */
1278  avio_wb16(pb, 0); /* Reserved */
1279  avio_wb16(pb, 1); /* Data-reference index, XXX == 1 */
1280 
1281  /* SoundDescription */
1282  avio_wb16(pb, version); /* Version */
1283  avio_wb16(pb, 0); /* Revision level */
1284  avio_wb32(pb, 0); /* Reserved */
1285 
1286  if (version == 2) {
1287  avio_wb16(pb, 3);
1288  avio_wb16(pb, 16);
1289  avio_wb16(pb, 0xfffe);
1290  avio_wb16(pb, 0);
1291  avio_wb32(pb, 0x00010000);
1292  avio_wb32(pb, 72);
1293  avio_wb64(pb, av_double2int(track->par->sample_rate));
1294  avio_wb32(pb, track->par->ch_layout.nb_channels);
1295  avio_wb32(pb, 0x7F000000);
1296  avio_wb32(pb, av_get_bits_per_sample(track->par->codec_id));
1297  avio_wb32(pb, mov_get_lpcm_flags(track->par->codec_id));
1298  avio_wb32(pb, track->sample_size);
1299  avio_wb32(pb, get_samples_per_packet(track));
1300  } else {
1301  if (track->mode == MODE_MOV) {
1302  avio_wb16(pb, track->par->ch_layout.nb_channels);
1303  if (track->par->codec_id == AV_CODEC_ID_PCM_U8 ||
1304  track->par->codec_id == AV_CODEC_ID_PCM_S8)
1305  avio_wb16(pb, 8); /* bits per sample */
1306  else if (track->par->codec_id == AV_CODEC_ID_ADPCM_G726)
1307  avio_wb16(pb, track->par->bits_per_coded_sample);
1308  else
1309  avio_wb16(pb, 16);
1310  avio_wb16(pb, track->audio_vbr ? -2 : 0); /* compression ID */
1311  } else { /* reserved for mp4/3gp */
1312  avio_wb16(pb, track->par->ch_layout.nb_channels);
1313  if (track->par->codec_id == AV_CODEC_ID_FLAC ||
1314  track->par->codec_id == AV_CODEC_ID_ALAC) {
1315  avio_wb16(pb, track->par->bits_per_raw_sample);
1316  } else {
1317  avio_wb16(pb, 16);
1318  }
1319  avio_wb16(pb, 0);
1320  }
1321 
1322  avio_wb16(pb, 0); /* packet size (= 0) */
1323  if (track->par->codec_id == AV_CODEC_ID_OPUS)
1324  avio_wb16(pb, 48000);
1325  else if (track->par->codec_id == AV_CODEC_ID_TRUEHD)
1326  avio_wb32(pb, track->par->sample_rate);
1327  else
1328  avio_wb16(pb, track->par->sample_rate <= UINT16_MAX ?
1329  track->par->sample_rate : 0);
1330 
1331  if (track->par->codec_id != AV_CODEC_ID_TRUEHD)
1332  avio_wb16(pb, 0); /* Reserved */
1333  }
1334 
1335  if (version == 1) { /* SoundDescription V1 extended info */
1336  if (mov_pcm_le_gt16(track->par->codec_id) ||
1337  mov_pcm_be_gt16(track->par->codec_id))
1338  avio_wb32(pb, 1); /* must be 1 for uncompressed formats */
1339  else
1340  avio_wb32(pb, track->par->frame_size); /* Samples per packet */
1341  avio_wb32(pb, track->sample_size / track->par->ch_layout.nb_channels); /* Bytes per packet */
1342  avio_wb32(pb, track->sample_size); /* Bytes per frame */
1343  avio_wb32(pb, 2); /* Bytes per sample */
1344  }
1345 
1346  if (track->mode == MODE_MOV &&
1347  (track->par->codec_id == AV_CODEC_ID_AAC ||
1348  track->par->codec_id == AV_CODEC_ID_AC3 ||
1349  track->par->codec_id == AV_CODEC_ID_EAC3 ||
1350  track->par->codec_id == AV_CODEC_ID_AMR_NB ||
1351  track->par->codec_id == AV_CODEC_ID_ALAC ||
1352  track->par->codec_id == AV_CODEC_ID_ADPCM_MS ||
1353  track->par->codec_id == AV_CODEC_ID_ADPCM_IMA_WAV ||
1354  track->par->codec_id == AV_CODEC_ID_QDM2 ||
1355  (mov_pcm_le_gt16(track->par->codec_id) && version==1) ||
1356  (mov_pcm_be_gt16(track->par->codec_id) && version==1)))
1357  ret = mov_write_wave_tag(s, pb, track);
1358  else if (track->tag == MKTAG('m','p','4','a'))
1359  ret = mov_write_esds_tag(pb, track);
1360  else if (track->par->codec_id == AV_CODEC_ID_AMR_NB)
1361  ret = mov_write_amr_tag(pb, track);
1362  else if (track->par->codec_id == AV_CODEC_ID_AC3)
1363  ret = mov_write_ac3_tag(s, pb, track);
1364  else if (track->par->codec_id == AV_CODEC_ID_EAC3)
1365  ret = mov_write_eac3_tag(s, pb, track);
1366  else if (track->par->codec_id == AV_CODEC_ID_ALAC)
1367  ret = mov_write_extradata_tag(pb, track);
1368  else if (track->par->codec_id == AV_CODEC_ID_WMAPRO)
1369  ret = mov_write_wfex_tag(s, pb, track);
1370  else if (track->par->codec_id == AV_CODEC_ID_FLAC)
1371  ret = mov_write_dfla_tag(pb, track);
1372  else if (track->par->codec_id == AV_CODEC_ID_OPUS)
1373  ret = mov_write_dops_tag(s, pb, track);
1374  else if (track->par->codec_id == AV_CODEC_ID_TRUEHD)
1375  ret = mov_write_dmlp_tag(s, pb, track);
1376  else if (tag == MOV_MP4_IPCM_TAG || tag == MOV_MP4_FPCM_TAG) {
1377  if (track->par->ch_layout.nb_channels > 1)
1378  ret = mov_write_chnl_tag(s, pb, track);
1379  if (ret < 0)
1380  return ret;
1381  ret = mov_write_pcmc_tag(s, pb, track);
1382  } else if (track->vos_len > 0)
1383  ret = mov_write_glbl_tag(pb, track);
1384 
1385  if (ret < 0)
1386  return ret;
1387 
1388  if (track->mode == MODE_MOV && track->par->codec_type == AVMEDIA_TYPE_AUDIO
1389  && ((ret = mov_write_chan_tag(s, pb, track)) < 0)) {
1390  return ret;
1391  }
1392 
1393  if (mov->encryption_scheme != MOV_ENC_NONE
1394  && ((ret = ff_mov_cenc_write_sinf_tag(track, pb, mov->encryption_kid)) < 0)) {
1395  return ret;
1396  }
1397 
1398  if (mov->write_btrt &&
1399  ((ret = mov_write_btrt_tag(pb, track)) < 0))
1400  return ret;
1401 
1402  ret = update_size(pb, pos);
1403  return ret;
1404 }
1405 
1406 static int mov_write_d263_tag(AVIOContext *pb)
1407 {
1408  avio_wb32(pb, 0xf); /* size */
1409  ffio_wfourcc(pb, "d263");
1410  ffio_wfourcc(pb, "FFMP");
1411  avio_w8(pb, 0); /* decoder version */
1412  /* FIXME use AVCodecContext level/profile, when encoder will set values */
1413  avio_w8(pb, 0xa); /* level */
1414  avio_w8(pb, 0); /* profile */
1415  return 0xf;
1416 }
1417 
1418 static int mov_write_av1c_tag(AVIOContext *pb, MOVTrack *track)
1419 {
1420  int64_t pos = avio_tell(pb);
1421 
1422  avio_wb32(pb, 0);
1423  ffio_wfourcc(pb, "av1C");
1424  ff_isom_write_av1c(pb, track->vos_data, track->vos_len, track->mode != MODE_AVIF);
1425  return update_size(pb, pos);
1426 }
1427 
1428 static int mov_write_avcc_tag(AVIOContext *pb, MOVTrack *track)
1429 {
1430  int64_t pos = avio_tell(pb);
1431 
1432  avio_wb32(pb, 0);
1433  ffio_wfourcc(pb, "avcC");
1434  ff_isom_write_avcc(pb, track->vos_data, track->vos_len);
1435  return update_size(pb, pos);
1436 }
1437 
1438 static int mov_write_vpcc_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
1439 {
1440  int64_t pos = avio_tell(pb);
1441 
1442  avio_wb32(pb, 0);
1443  ffio_wfourcc(pb, "vpcC");
1444  ff_isom_write_vpcc(s, pb, track->vos_data, track->vos_len, track->par);
1445  return update_size(pb, pos);
1446 }
1447 
1448 static int mov_write_hvcc_tag(AVIOContext *pb, MOVTrack *track)
1449 {
1450  int64_t pos = avio_tell(pb);
1451 
1452  avio_wb32(pb, 0);
1453  ffio_wfourcc(pb, "hvcC");
1454  if (track->tag == MKTAG('h','v','c','1'))
1455  ff_isom_write_hvcc(pb, track->vos_data, track->vos_len, 1);
1456  else
1457  ff_isom_write_hvcc(pb, track->vos_data, track->vos_len, 0);
1458  return update_size(pb, pos);
1459 }
1460 
1461 static int mov_write_evcc_tag(AVIOContext *pb, MOVTrack *track)
1462 {
1463  int64_t pos = avio_tell(pb);
1464 
1465  avio_wb32(pb, 0);
1466  ffio_wfourcc(pb, "evcC");
1467 
1468  if (track->tag == MKTAG('e','v','c','1'))
1469  ff_isom_write_evcc(pb, track->vos_data, track->vos_len, 1);
1470  else
1471  ff_isom_write_evcc(pb, track->vos_data, track->vos_len, 0);
1472 
1473  return update_size(pb, pos);
1474 }
1475 
1476 /* also used by all avid codecs (dv, imx, meridien) and their variants */
1477 static int mov_write_avid_tag(AVIOContext *pb, MOVTrack *track)
1478 {
1479  int interlaced;
1480  int cid;
1481  int display_width = track->par->width;
1482 
1483  if (track->vos_data && track->vos_len > 0x29) {
1484  if (ff_dnxhd_parse_header_prefix(track->vos_data) != 0) {
1485  /* looks like a DNxHD bit stream */
1486  interlaced = (track->vos_data[5] & 2);
1487  cid = AV_RB32(track->vos_data + 0x28);
1488  } else {
1489  av_log(NULL, AV_LOG_WARNING, "Could not locate DNxHD bit stream in vos_data\n");
1490  return 0;
1491  }
1492  } else {
1493  av_log(NULL, AV_LOG_WARNING, "Could not locate DNxHD bit stream, vos_data too small\n");
1494  return 0;
1495  }
1496 
1497  avio_wb32(pb, 24); /* size */
1498  ffio_wfourcc(pb, "ACLR");
1499  ffio_wfourcc(pb, "ACLR");
1500  ffio_wfourcc(pb, "0001");
1501  if (track->par->color_range == AVCOL_RANGE_MPEG || /* Legal range (16-235) */
1502  track->par->color_range == AVCOL_RANGE_UNSPECIFIED) {
1503  avio_wb32(pb, 1); /* Corresponds to 709 in official encoder */
1504  } else { /* Full range (0-255) */
1505  avio_wb32(pb, 2); /* Corresponds to RGB in official encoder */
1506  }
1507  avio_wb32(pb, 0); /* unknown */
1508 
1509  if (track->tag == MKTAG('A','V','d','h')) {
1510  avio_wb32(pb, 32);
1511  ffio_wfourcc(pb, "ADHR");
1512  ffio_wfourcc(pb, "0001");
1513  avio_wb32(pb, cid);
1514  avio_wb32(pb, 0); /* unknown */
1515  avio_wb32(pb, 1); /* unknown */
1516  avio_wb32(pb, 0); /* unknown */
1517  avio_wb32(pb, 0); /* unknown */
1518  return 0;
1519  }
1520 
1521  avio_wb32(pb, 24); /* size */
1522  ffio_wfourcc(pb, "APRG");
1523  ffio_wfourcc(pb, "APRG");
1524  ffio_wfourcc(pb, "0001");
1525  avio_wb32(pb, 1); /* unknown */
1526  avio_wb32(pb, 0); /* unknown */
1527 
1528  avio_wb32(pb, 120); /* size */
1529  ffio_wfourcc(pb, "ARES");
1530  ffio_wfourcc(pb, "ARES");
1531  ffio_wfourcc(pb, "0001");
1532  avio_wb32(pb, cid); /* dnxhd cid, some id ? */
1533  if ( track->par->sample_aspect_ratio.num > 0
1534  && track->par->sample_aspect_ratio.den > 0)
1535  display_width = display_width * track->par->sample_aspect_ratio.num / track->par->sample_aspect_ratio.den;
1536  avio_wb32(pb, display_width);
1537  /* values below are based on samples created with quicktime and avid codecs */
1538  if (interlaced) {
1539  avio_wb32(pb, track->par->height / 2);
1540  avio_wb32(pb, 2); /* unknown */
1541  avio_wb32(pb, 0); /* unknown */
1542  avio_wb32(pb, 4); /* unknown */
1543  } else {
1544  avio_wb32(pb, track->par->height);
1545  avio_wb32(pb, 1); /* unknown */
1546  avio_wb32(pb, 0); /* unknown */
1547  if (track->par->height == 1080)
1548  avio_wb32(pb, 5); /* unknown */
1549  else
1550  avio_wb32(pb, 6); /* unknown */
1551  }
1552  /* padding */
1553  ffio_fill(pb, 0, 10 * 8);
1554 
1555  return 0;
1556 }
1557 
1558 static int mov_write_dpxe_tag(AVIOContext *pb, MOVTrack *track)
1559 {
1560  avio_wb32(pb, 12);
1561  ffio_wfourcc(pb, "DpxE");
1562  if (track->par->extradata_size >= 12 &&
1563  !memcmp(&track->par->extradata[4], "DpxE", 4)) {
1564  avio_wb32(pb, track->par->extradata[11]);
1565  } else {
1566  avio_wb32(pb, 1);
1567  }
1568  return 0;
1569 }
1570 
1571 static int mov_get_dv_codec_tag(AVFormatContext *s, MOVTrack *track)
1572 {
1573  int tag;
1574 
1575  if (track->par->width == 720) { /* SD */
1576  if (track->par->height == 480) { /* NTSC */
1577  if (track->par->format == AV_PIX_FMT_YUV422P) tag = MKTAG('d','v','5','n');
1578  else tag = MKTAG('d','v','c',' ');
1579  }else if (track->par->format == AV_PIX_FMT_YUV422P) tag = MKTAG('d','v','5','p');
1580  else if (track->par->format == AV_PIX_FMT_YUV420P) tag = MKTAG('d','v','c','p');
1581  else tag = MKTAG('d','v','p','p');
1582  } else if (track->par->height == 720) { /* HD 720 line */
1583  if (track->st->time_base.den == 50) tag = MKTAG('d','v','h','q');
1584  else tag = MKTAG('d','v','h','p');
1585  } else if (track->par->height == 1080) { /* HD 1080 line */
1586  if (track->st->time_base.den == 25) tag = MKTAG('d','v','h','5');
1587  else tag = MKTAG('d','v','h','6');
1588  } else {
1589  av_log(s, AV_LOG_ERROR, "unsupported height for dv codec\n");
1590  return 0;
1591  }
1592 
1593  return tag;
1594 }
1595 
1596 static int defined_frame_rate(AVFormatContext *s, AVStream *st)
1597 {
1598  AVRational rational_framerate = st->avg_frame_rate;
1599  int rate = 0;
1600  if (rational_framerate.den != 0)
1601  rate = av_q2d(rational_framerate);
1602  return rate;
1603 }
1604 
1605 static int mov_get_mpeg2_xdcam_codec_tag(AVFormatContext *s, MOVTrack *track)
1606 {
1607  int tag = track->par->codec_tag;
1608  int interlaced = track->par->field_order > AV_FIELD_PROGRESSIVE;
1609  AVStream *st = track->st;
1610  int rate = defined_frame_rate(s, st);
1611 
1612  if (!tag)
1613  tag = MKTAG('m', '2', 'v', '1'); //fallback tag
1614 
1615  if (track->par->format == AV_PIX_FMT_YUV420P) {
1616  if (track->par->width == 1280 && track->par->height == 720) {
1617  if (!interlaced) {
1618  if (rate == 24) tag = MKTAG('x','d','v','4');
1619  else if (rate == 25) tag = MKTAG('x','d','v','5');
1620  else if (rate == 30) tag = MKTAG('x','d','v','1');
1621  else if (rate == 50) tag = MKTAG('x','d','v','a');
1622  else if (rate == 60) tag = MKTAG('x','d','v','9');
1623  }
1624  } else if (track->par->width == 1440 && track->par->height == 1080) {
1625  if (!interlaced) {
1626  if (rate == 24) tag = MKTAG('x','d','v','6');
1627  else if (rate == 25) tag = MKTAG('x','d','v','7');
1628  else if (rate == 30) tag = MKTAG('x','d','v','8');
1629  } else {
1630  if (rate == 25) tag = MKTAG('x','d','v','3');
1631  else if (rate == 30) tag = MKTAG('x','d','v','2');
1632  }
1633  } else if (track->par->width == 1920 && track->par->height == 1080) {
1634  if (!interlaced) {
1635  if (rate == 24) tag = MKTAG('x','d','v','d');
1636  else if (rate == 25) tag = MKTAG('x','d','v','e');
1637  else if (rate == 30) tag = MKTAG('x','d','v','f');
1638  } else {
1639  if (rate == 25) tag = MKTAG('x','d','v','c');
1640  else if (rate == 30) tag = MKTAG('x','d','v','b');
1641  }
1642  }
1643  } else if (track->par->format == AV_PIX_FMT_YUV422P) {
1644  if (track->par->width == 1280 && track->par->height == 720) {
1645  if (!interlaced) {
1646  if (rate == 24) tag = MKTAG('x','d','5','4');
1647  else if (rate == 25) tag = MKTAG('x','d','5','5');
1648  else if (rate == 30) tag = MKTAG('x','d','5','1');
1649  else if (rate == 50) tag = MKTAG('x','d','5','a');
1650  else if (rate == 60) tag = MKTAG('x','d','5','9');
1651  }
1652  } else if (track->par->width == 1920 && track->par->height == 1080) {
1653  if (!interlaced) {
1654  if (rate == 24) tag = MKTAG('x','d','5','d');
1655  else if (rate == 25) tag = MKTAG('x','d','5','e');
1656  else if (rate == 30) tag = MKTAG('x','d','5','f');
1657  } else {
1658  if (rate == 25) tag = MKTAG('x','d','5','c');
1659  else if (rate == 30) tag = MKTAG('x','d','5','b');
1660  }
1661  }
1662  }
1663 
1664  return tag;
1665 }
1666 
1667 static int mov_get_h264_codec_tag(AVFormatContext *s, MOVTrack *track)
1668 {
1669  int tag = track->par->codec_tag;
1670  int interlaced = track->par->field_order > AV_FIELD_PROGRESSIVE;
1671  AVStream *st = track->st;
1672  int rate = defined_frame_rate(s, st);
1673 
1674  if (!tag)
1675  tag = MKTAG('a', 'v', 'c', 'i'); //fallback tag
1676 
1677  if (track->par->format == AV_PIX_FMT_YUV420P10) {
1678  if (track->par->width == 960 && track->par->height == 720) {
1679  if (!interlaced) {
1680  if (rate == 24) tag = MKTAG('a','i','5','p');
1681  else if (rate == 25) tag = MKTAG('a','i','5','q');
1682  else if (rate == 30) tag = MKTAG('a','i','5','p');
1683  else if (rate == 50) tag = MKTAG('a','i','5','q');
1684  else if (rate == 60) tag = MKTAG('a','i','5','p');
1685  }
1686  } else if (track->par->width == 1440 && track->par->height == 1080) {
1687  if (!interlaced) {
1688  if (rate == 24) tag = MKTAG('a','i','5','3');
1689  else if (rate == 25) tag = MKTAG('a','i','5','2');
1690  else if (rate == 30) tag = MKTAG('a','i','5','3');
1691  } else {
1692  if (rate == 50) tag = MKTAG('a','i','5','5');
1693  else if (rate == 60) tag = MKTAG('a','i','5','6');
1694  }
1695  }
1696  } else if (track->par->format == AV_PIX_FMT_YUV422P10) {
1697  if (track->par->width == 1280 && track->par->height == 720) {
1698  if (!interlaced) {
1699  if (rate == 24) tag = MKTAG('a','i','1','p');
1700  else if (rate == 25) tag = MKTAG('a','i','1','q');
1701  else if (rate == 30) tag = MKTAG('a','i','1','p');
1702  else if (rate == 50) tag = MKTAG('a','i','1','q');
1703  else if (rate == 60) tag = MKTAG('a','i','1','p');
1704  }
1705  } else if (track->par->width == 1920 && track->par->height == 1080) {
1706  if (!interlaced) {
1707  if (rate == 24) tag = MKTAG('a','i','1','3');
1708  else if (rate == 25) tag = MKTAG('a','i','1','2');
1709  else if (rate == 30) tag = MKTAG('a','i','1','3');
1710  } else {
1711  if (rate == 25) tag = MKTAG('a','i','1','5');
1712  else if (rate == 50) tag = MKTAG('a','i','1','5');
1713  else if (rate == 60) tag = MKTAG('a','i','1','6');
1714  }
1715  } else if ( track->par->width == 4096 && track->par->height == 2160
1716  || track->par->width == 3840 && track->par->height == 2160
1717  || track->par->width == 2048 && track->par->height == 1080) {
1718  tag = MKTAG('a','i','v','x');
1719  }
1720  }
1721 
1722  return tag;
1723 }
1724 
1725 static int mov_get_evc_codec_tag(AVFormatContext *s, MOVTrack *track)
1726 {
1727  int tag = track->par->codec_tag;
1728 
1729  if (!tag)
1730  tag = MKTAG('e', 'v', 'c', '1');
1731 
1732  return tag;
1733 }
1734 
1735 static const struct {
1736  enum AVPixelFormat pix_fmt;
1737  uint32_t tag;
1738  unsigned bps;
1739 } mov_pix_fmt_tags[] = {
1740  { AV_PIX_FMT_YUYV422, MKTAG('y','u','v','2'), 0 },
1741  { AV_PIX_FMT_YUYV422, MKTAG('y','u','v','s'), 0 },
1742  { AV_PIX_FMT_UYVY422, MKTAG('2','v','u','y'), 0 },
1743  { AV_PIX_FMT_RGB555BE,MKTAG('r','a','w',' '), 16 },
1744  { AV_PIX_FMT_RGB555LE,MKTAG('L','5','5','5'), 16 },
1745  { AV_PIX_FMT_RGB565LE,MKTAG('L','5','6','5'), 16 },
1746  { AV_PIX_FMT_RGB565BE,MKTAG('B','5','6','5'), 16 },
1747  { AV_PIX_FMT_GRAY16BE,MKTAG('b','1','6','g'), 16 },
1748  { AV_PIX_FMT_RGB24, MKTAG('r','a','w',' '), 24 },
1749  { AV_PIX_FMT_BGR24, MKTAG('2','4','B','G'), 24 },
1750  { AV_PIX_FMT_ARGB, MKTAG('r','a','w',' '), 32 },
1751  { AV_PIX_FMT_BGRA, MKTAG('B','G','R','A'), 32 },
1752  { AV_PIX_FMT_RGBA, MKTAG('R','G','B','A'), 32 },
1753  { AV_PIX_FMT_ABGR, MKTAG('A','B','G','R'), 32 },
1754  { AV_PIX_FMT_RGB48BE, MKTAG('b','4','8','r'), 48 },
1755 };
1756 
1757 static int mov_get_dnxhd_codec_tag(AVFormatContext *s, MOVTrack *track)
1758 {
1759  int tag = MKTAG('A','V','d','n');
1760  if (track->par->profile != AV_PROFILE_UNKNOWN &&
1761  track->par->profile != AV_PROFILE_DNXHD)
1762  tag = MKTAG('A','V','d','h');
1763  return tag;
1764 }
1765 
1766 static int mov_get_rawvideo_codec_tag(AVFormatContext *s, MOVTrack *track)
1767 {
1768  int tag = track->par->codec_tag;
1769  int i;
1770  enum AVPixelFormat pix_fmt;
1771 
1772  for (i = 0; i < FF_ARRAY_ELEMS(mov_pix_fmt_tags); i++) {
1773  if (track->par->format == mov_pix_fmt_tags[i].pix_fmt) {
1774  tag = mov_pix_fmt_tags[i].tag;
1775  track->par->bits_per_coded_sample = mov_pix_fmt_tags[i].bps;
1776  if (track->par->codec_tag == mov_pix_fmt_tags[i].tag)
1777  break;
1778  }
1779  }
1780 
1781  pix_fmt = avpriv_pix_fmt_find(PIX_FMT_LIST_MOV,
1782  track->par->bits_per_coded_sample);
1783  if (tag == MKTAG('r','a','w',' ') &&
1784  track->par->format != pix_fmt &&
1785  track->par->format != AV_PIX_FMT_GRAY8 &&
1786  track->par->format != AV_PIX_FMT_NONE)
1787  av_log(s, AV_LOG_ERROR, "%s rawvideo cannot be written to mov, output file will be unreadable\n",
1788  av_get_pix_fmt_name(track->par->format));
1789  return tag;
1790 }
1791 
1792 static unsigned int mov_get_codec_tag(AVFormatContext *s, MOVTrack *track)
1793 {
1794  unsigned int tag = track->par->codec_tag;
1795 
1796  // "rtp " is used to distinguish internally created RTP-hint tracks
1797  // (with rtp_ctx) from other tracks.
1798  if (tag == MKTAG('r','t','p',' '))
1799  tag = 0;
1800  if (!tag || (s->strict_std_compliance >= FF_COMPLIANCE_NORMAL &&
1801  (track->par->codec_id == AV_CODEC_ID_DVVIDEO ||
1802  track->par->codec_id == AV_CODEC_ID_RAWVIDEO ||
1803  track->par->codec_id == AV_CODEC_ID_H263 ||
1804  track->par->codec_id == AV_CODEC_ID_H264 ||
1805  track->par->codec_id == AV_CODEC_ID_DNXHD ||
1806  track->par->codec_id == AV_CODEC_ID_MPEG2VIDEO ||
1807  av_get_bits_per_sample(track->par->codec_id)))) { // pcm audio
1808  if (track->par->codec_id == AV_CODEC_ID_DVVIDEO)
1809  tag = mov_get_dv_codec_tag(s, track);
1810  else if (track->par->codec_id == AV_CODEC_ID_RAWVIDEO)
1811  tag = mov_get_rawvideo_codec_tag(s, track);
1812  else if (track->par->codec_id == AV_CODEC_ID_MPEG2VIDEO)
1813  tag = mov_get_mpeg2_xdcam_codec_tag(s, track);
1814  else if (track->par->codec_id == AV_CODEC_ID_H264)
1815  tag = mov_get_h264_codec_tag(s, track);
1816  else if (track->par->codec_id == AV_CODEC_ID_EVC)
1817  tag = mov_get_evc_codec_tag(s, track);
1818  else if (track->par->codec_id == AV_CODEC_ID_DNXHD)
1819  tag = mov_get_dnxhd_codec_tag(s, track);
1820  else if (track->par->codec_type == AVMEDIA_TYPE_VIDEO) {
1821  tag = ff_codec_get_tag(ff_codec_movvideo_tags, track->par->codec_id);
1822  if (!tag) { // if no mac fcc found, try with Microsoft tags
1823  tag = ff_codec_get_tag(ff_codec_bmp_tags, track->par->codec_id);
1824  if (tag)
1825  av_log(s, AV_LOG_WARNING, "Using MS style video codec tag, "
1826  "the file may be unplayable!\n");
1827  }
1828  } else if (track->par->codec_type == AVMEDIA_TYPE_AUDIO) {
1829  tag = ff_codec_get_tag(ff_codec_movaudio_tags, track->par->codec_id);
1830  if (!tag) { // if no mac fcc found, try with Microsoft tags
1831  int ms_tag = ff_codec_get_tag(ff_codec_wav_tags, track->par->codec_id);
1832  if (ms_tag) {
1833  tag = MKTAG('m', 's', ((ms_tag >> 8) & 0xff), (ms_tag & 0xff));
1834  av_log(s, AV_LOG_WARNING, "Using MS style audio codec tag, "
1835  "the file may be unplayable!\n");
1836  }
1837  }
1838  } else if (track->par->codec_type == AVMEDIA_TYPE_SUBTITLE)
1839  tag = ff_codec_get_tag(ff_codec_movsubtitle_tags, track->par->codec_id);
1840  }
1841 
1842  return tag;
1843 }
1844 
1845 static const AVCodecTag codec_cover_image_tags[] = {
1846  { AV_CODEC_ID_MJPEG, 0xD },
1847  { AV_CODEC_ID_PNG, 0xE },
1848  { AV_CODEC_ID_BMP, 0x1B },
1849  { AV_CODEC_ID_NONE, 0 },
1850 };
1851 
1852 static unsigned int validate_codec_tag(const AVCodecTag *const *tags,
1853  unsigned int tag, int codec_id)
1854 {
1855  int i;
1856 
1857  /**
1858  * Check that tag + id is in the table
1859  */
1860  for (i = 0; tags && tags[i]; i++) {
1861  const AVCodecTag *codec_tags = tags[i];
1862  while (codec_tags->id != AV_CODEC_ID_NONE) {
1863  if (ff_toupper4(codec_tags->tag) == ff_toupper4(tag) &&
1864  codec_tags->id == codec_id)
1865  return codec_tags->tag;
1866  codec_tags++;
1867  }
1868  }
1869  return 0;
1870 }
1871 
1872 static unsigned int mov_find_codec_tag(AVFormatContext *s, MOVTrack *track)
1873 {
1874  if (is_cover_image(track->st))
1875  return ff_codec_get_tag(codec_cover_image_tags, track->par->codec_id);
1876 
1877  if (track->mode == MODE_IPOD)
1878  if (!av_match_ext(s->url, "m4a") &&
1879  !av_match_ext(s->url, "m4v") &&
1880  !av_match_ext(s->url, "m4b"))
1881  av_log(s, AV_LOG_WARNING, "Warning, extension is not .m4a nor .m4v "
1882  "Quicktime/Ipod might not play the file\n");
1883 
1884  if (track->mode == MODE_MOV) {
1885  return mov_get_codec_tag(s, track);
1886  } else
1887  return validate_codec_tag(s->oformat->codec_tag, track->par->codec_tag,
1888  track->par->codec_id);
1889 }
1890 
1891 /** Write uuid atom.
1892  * Needed to make file play in iPods running newest firmware
1893  * goes after avcC atom in moov.trak.mdia.minf.stbl.stsd.avc1
1894  */
1895 static int mov_write_uuid_tag_ipod(AVIOContext *pb)
1896 {
1897  avio_wb32(pb, 28);
1898  ffio_wfourcc(pb, "uuid");
1899  avio_wb32(pb, 0x6b6840f2);
1900  avio_wb32(pb, 0x5f244fc5);
1901  avio_wb32(pb, 0xba39a51b);
1902  avio_wb32(pb, 0xcf0323f3);
1903  avio_wb32(pb, 0x0);
1904  return 28;
1905 }
1906 
1907 static const uint16_t fiel_data[] = {
1908  0x0000, 0x0100, 0x0201, 0x0206, 0x0209, 0x020e
1909 };
1910 
1911 static int mov_write_fiel_tag(AVIOContext *pb, MOVTrack *track, int field_order)
1912 {
1913  unsigned mov_field_order = 0;
1914  if (field_order < FF_ARRAY_ELEMS(fiel_data))
1915  mov_field_order = fiel_data[field_order];
1916  else
1917  return 0;
1918  avio_wb32(pb, 10);
1919  ffio_wfourcc(pb, "fiel");
1920  avio_wb16(pb, mov_field_order);
1921  return 10;
1922 }
1923 
1924 static int mov_write_subtitle_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
1925 {
1926  MOVMuxContext *mov = s->priv_data;
1927  int ret = AVERROR_BUG;
1928  int64_t pos = avio_tell(pb);
1929  avio_wb32(pb, 0); /* size */
1930  avio_wl32(pb, track->tag); // store it byteswapped
1931  avio_wb32(pb, 0); /* Reserved */
1932  avio_wb16(pb, 0); /* Reserved */
1933  avio_wb16(pb, 1); /* Data-reference index */
1934 
1935  if (track->par->codec_id == AV_CODEC_ID_DVD_SUBTITLE)
1936  mov_write_esds_tag(pb, track);
1937  else if (track->par->codec_id == AV_CODEC_ID_TTML) {
1938  switch (track->par->codec_tag) {
1939  case MOV_ISMV_TTML_TAG:
1940  // ISMV dfxp requires no extradata.
1941  break;
1942  case MOV_MP4_TTML_TAG:
1943  // As specified in 14496-30, XMLSubtitleSampleEntry
1944  // Namespace
1945  avio_put_str(pb, "http://www.w3.org/ns/ttml");
1946  // Empty schema_location
1947  avio_w8(pb, 0);
1948  // Empty auxiliary_mime_types
1949  avio_w8(pb, 0);
1950  break;
1951  default:
1952  av_log(NULL, AV_LOG_ERROR,
1953  "Unknown codec tag '%s' utilized for TTML stream with "
1954  "index %d (track id %d)!\n",
1955  av_fourcc2str(track->par->codec_tag), track->st->index,
1956  track->track_id);
1957  return AVERROR(EINVAL);
1958  }
1959  } else if (track->par->extradata_size)
1960  avio_write(pb, track->par->extradata, track->par->extradata_size);
1961 
1962  if (mov->write_btrt &&
1963  ((ret = mov_write_btrt_tag(pb, track)) < 0))
1964  return ret;
1965 
1966  return update_size(pb, pos);
1967 }
1968 
1969 static int mov_write_st3d_tag(AVFormatContext *s, AVIOContext *pb, AVStereo3D *stereo_3d)
1970 {
1971  int8_t stereo_mode;
1972 
1973  if (stereo_3d->flags != 0) {
1974  av_log(s, AV_LOG_WARNING, "Unsupported stereo_3d flags %x. st3d not written.\n", stereo_3d->flags);
1975  return 0;
1976  }
1977 
1978  switch (stereo_3d->type) {
1979  case AV_STEREO3D_2D:
1980  stereo_mode = 0;
1981  break;
1982  case AV_STEREO3D_TOPBOTTOM:
1983  stereo_mode = 1;
1984  break;
1985  case AV_STEREO3D_SIDEBYSIDE:
1986  stereo_mode = 2;
1987  break;
1988  default:
1989  av_log(s, AV_LOG_WARNING, "Unsupported stereo_3d type %s. st3d not written.\n", av_stereo3d_type_name(stereo_3d->type));
1990  return 0;
1991  }
1992  avio_wb32(pb, 13); /* size */
1993  ffio_wfourcc(pb, "st3d");
1994  avio_wb32(pb, 0); /* version = 0 & flags = 0 */
1995  avio_w8(pb, stereo_mode);
1996  return 13;
1997 }
1998 
1999 static int mov_write_sv3d_tag(AVFormatContext *s, AVIOContext *pb, AVSphericalMapping *spherical_mapping)
2000 {
2001  int64_t sv3d_pos, svhd_pos, proj_pos;
2002  const char* metadata_source = s->flags & AVFMT_FLAG_BITEXACT ? "Lavf" : LIBAVFORMAT_IDENT;
2003 
2004  if (spherical_mapping->projection != AV_SPHERICAL_EQUIRECTANGULAR &&
2005  spherical_mapping->projection != AV_SPHERICAL_EQUIRECTANGULAR_TILE &&
2006  spherical_mapping->projection != AV_SPHERICAL_CUBEMAP) {
2007  av_log(s, AV_LOG_WARNING, "Unsupported projection %d. sv3d not written.\n", spherical_mapping->projection);
2008  return 0;
2009  }
2010 
2011  sv3d_pos = avio_tell(pb);
2012  avio_wb32(pb, 0); /* size */
2013  ffio_wfourcc(pb, "sv3d");
2014 
2015  svhd_pos = avio_tell(pb);
2016  avio_wb32(pb, 0); /* size */
2017  ffio_wfourcc(pb, "svhd");
2018  avio_wb32(pb, 0); /* version = 0 & flags = 0 */
2019  avio_put_str(pb, metadata_source);
2020  update_size(pb, svhd_pos);
2021 
2022  proj_pos = avio_tell(pb);
2023  avio_wb32(pb, 0); /* size */
2024  ffio_wfourcc(pb, "proj");
2025 
2026  avio_wb32(pb, 24); /* size */
2027  ffio_wfourcc(pb, "prhd");
2028  avio_wb32(pb, 0); /* version = 0 & flags = 0 */
2029  avio_wb32(pb, spherical_mapping->yaw);
2030  avio_wb32(pb, spherical_mapping->pitch);
2031  avio_wb32(pb, spherical_mapping->roll);
2032 
2033  switch (spherical_mapping->projection) {
2034  case AV_SPHERICAL_EQUIRECTANGULAR:
2035  case AV_SPHERICAL_EQUIRECTANGULAR_TILE:
2036  avio_wb32(pb, 28); /* size */
2037  ffio_wfourcc(pb, "equi");
2038  avio_wb32(pb, 0); /* version = 0 & flags = 0 */
2039  avio_wb32(pb, spherical_mapping->bound_top);
2040  avio_wb32(pb, spherical_mapping->bound_bottom);
2041  avio_wb32(pb, spherical_mapping->bound_left);
2042  avio_wb32(pb, spherical_mapping->bound_right);
2043  break;
2044  case AV_SPHERICAL_CUBEMAP:
2045  avio_wb32(pb, 20); /* size */
2046  ffio_wfourcc(pb, "cbmp");
2047  avio_wb32(pb, 0); /* version = 0 & flags = 0 */
2048  avio_wb32(pb, 0); /* layout */
2049  avio_wb32(pb, spherical_mapping->padding); /* padding */
2050  break;
2051  }
2052  update_size(pb, proj_pos);
2053 
2054  return update_size(pb, sv3d_pos);
2055 }
2056 
2057 static int mov_write_dvcc_dvvc_tag(AVFormatContext *s, AVIOContext *pb, AVDOVIDecoderConfigurationRecord *dovi)
2058 {
2059  uint8_t buf[ISOM_DVCC_DVVC_SIZE];
2060 
2061  avio_wb32(pb, 32); /* size = 8 + 24 */
2062  if (dovi->dv_profile > 10)
2063  ffio_wfourcc(pb, "dvwC");
2064  else if (dovi->dv_profile > 7)
2065  ffio_wfourcc(pb, "dvvC");
2066  else
2067  ffio_wfourcc(pb, "dvcC");
2068 
2069  ff_isom_put_dvcc_dvvc(s, buf, dovi);
2070  avio_write(pb, buf, sizeof(buf));
2071 
2072  return 32; /* 8 + 24 */
2073 }
2074 
2075 static int mov_write_clap_tag(AVIOContext *pb, MOVTrack *track)
2076 {
2077  avio_wb32(pb, 40);
2078  ffio_wfourcc(pb, "clap");
2079  avio_wb32(pb, track->par->width); /* apertureWidth_N */
2080  avio_wb32(pb, 1); /* apertureWidth_D (= 1) */
2081  avio_wb32(pb, track->height); /* apertureHeight_N */
2082  avio_wb32(pb, 1); /* apertureHeight_D (= 1) */
2083  avio_wb32(pb, 0); /* horizOff_N (= 0) */
2084  avio_wb32(pb, 1); /* horizOff_D (= 1) */
2085  avio_wb32(pb, 0); /* vertOff_N (= 0) */
2086  avio_wb32(pb, 1); /* vertOff_D (= 1) */
2087  return 40;
2088 }
2089 
2090 static int mov_write_pasp_tag(AVIOContext *pb, MOVTrack *track)
2091 {
2092  AVRational sar;
2093  av_reduce(&sar.num, &sar.den, track->par->sample_aspect_ratio.num,
2094  track->par->sample_aspect_ratio.den, INT_MAX);
2095 
2096  avio_wb32(pb, 16);
2097  ffio_wfourcc(pb, "pasp");
2098  avio_wb32(pb, sar.num);
2099  avio_wb32(pb, sar.den);
2100  return 16;
2101 }
2102 
2103 static int mov_write_gama_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track, double gamma)
2104 {
2105  uint32_t gama = 0;
2106  if (gamma <= 0.0)
2107  gamma = av_csp_approximate_trc_gamma(track->par->color_trc);
2108  av_log(s, AV_LOG_DEBUG, "gamma value %g\n", gamma);
2109 
2110  if (gamma > 1e-6) {
2111  gama = (uint32_t)lrint((double)(1<<16) * gamma);
2112  av_log(s, AV_LOG_DEBUG, "writing gama value %"PRId32"\n", gama);
2113 
2114  av_assert0(track->mode == MODE_MOV);
2115  avio_wb32(pb, 12);
2116  ffio_wfourcc(pb, "gama");
2117  avio_wb32(pb, gama);
2118  return 12;
2119  } else {
2120  av_log(s, AV_LOG_WARNING, "gamma value unknown, unable to write gama atom\n");
2121  }
2122  return 0;
2123 }
2124 
2125 static int mov_write_colr_tag(AVIOContext *pb, MOVTrack *track, int prefer_icc)
2126 {
2127  int64_t pos = avio_tell(pb);
2128 
2129  // Ref (MOV): https://developer.apple.com/library/mac/technotes/tn2162/_index.html#//apple_ref/doc/uid/DTS40013070-CH1-TNTAG9
2130  // Ref (MP4): ISO/IEC 14496-12:2012
2131 
2132  const uint8_t *icc_profile;
2133  size_t icc_profile_size;
2134 
2135  if (prefer_icc) {
2136  icc_profile = av_stream_get_side_data(track->st, AV_PKT_DATA_ICC_PROFILE, &icc_profile_size);
2137 
2138  if (icc_profile) {
2139  avio_wb32(pb, 12 + icc_profile_size);
2140  ffio_wfourcc(pb, "colr");
2141  ffio_wfourcc(pb, "prof");
2142  avio_write(pb, icc_profile, icc_profile_size);
2143  return 12 + icc_profile_size;
2144  }
2145  else {
2146  av_log(NULL, AV_LOG_INFO, "no ICC profile found, will write nclx/nclc colour info instead\n");
2147  }
2148  }
2149 
2150  /* We should only ever be called for MOV, MP4 and AVIF. */
2151  av_assert0(track->mode == MODE_MOV || track->mode == MODE_MP4 ||
2152  track->mode == MODE_AVIF);
2153 
2154  avio_wb32(pb, 0); /* size */
2155  ffio_wfourcc(pb, "colr");
2156  if (track->mode == MODE_MP4 || track->mode == MODE_AVIF)
2157  ffio_wfourcc(pb, "nclx");
2158  else
2159  ffio_wfourcc(pb, "nclc");
2160  // Do not try to guess the color info if it is AVCOL_PRI_UNSPECIFIED.
2161  // e.g., Dolby Vision for Apple devices should be set to AVCOL_PRI_UNSPECIFIED. See
2162  // https://developer.apple.com/av-foundation/High-Dynamic-Range-Metadata-for-Apple-Devices.pdf
2163  avio_wb16(pb, track->par->color_primaries);
2164  avio_wb16(pb, track->par->color_trc);
2165  avio_wb16(pb, track->par->color_space);
2166  if (track->mode == MODE_MP4 || track->mode == MODE_AVIF) {
2167  int full_range = track->par->color_range == AVCOL_RANGE_JPEG;
2168  avio_w8(pb, full_range << 7);
2169  }
2170 
2171  return update_size(pb, pos);
2172 }
2173 
2174 static int mov_write_clli_tag(AVIOContext *pb, MOVTrack *track)
2175 {
2176  const uint8_t *side_data;
2177  const AVContentLightMetadata *content_light_metadata;
2178 
2179  side_data = av_stream_get_side_data(track->st, AV_PKT_DATA_CONTENT_LIGHT_LEVEL, NULL);
2180  if (!side_data) {
2181  return 0;
2182  }
2183  content_light_metadata = (const AVContentLightMetadata*)side_data;
2184 
2185  avio_wb32(pb, 12); // size
2186  ffio_wfourcc(pb, "clli");
2187  avio_wb16(pb, content_light_metadata->MaxCLL);
2188  avio_wb16(pb, content_light_metadata->MaxFALL);
2189  return 12;
2190 }
2191 
2192 static inline int64_t rescale_mdcv(AVRational q, int b)
2193 {
2194  return av_rescale(q.num, b, q.den);
2195 }
2196 
2197 static int mov_write_mdcv_tag(AVIOContext *pb, MOVTrack *track)
2198 {
2199  const int chroma_den = 50000;
2200  const int luma_den = 10000;
2201  const uint8_t *side_data;
2202  const AVMasteringDisplayMetadata *metadata;
2203 
2204  side_data = av_stream_get_side_data(track->st, AV_PKT_DATA_MASTERING_DISPLAY_METADATA, NULL);
2205  metadata = (const AVMasteringDisplayMetadata*)side_data;
2206  if (!metadata || !metadata->has_primaries || !metadata->has_luminance) {
2207  return 0;
2208  }
2209 
2210  avio_wb32(pb, 32); // size
2211  ffio_wfourcc(pb, "mdcv");
2212  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[1][0], chroma_den));
2213  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[1][1], chroma_den));
2214  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[2][0], chroma_den));
2215  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[2][1], chroma_den));
2216  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[0][0], chroma_den));
2217  avio_wb16(pb, rescale_mdcv(metadata->display_primaries[0][1], chroma_den));
2218  avio_wb16(pb, rescale_mdcv(metadata->white_point[0], chroma_den));
2219  avio_wb16(pb, rescale_mdcv(metadata->white_point[1], chroma_den));
2220  avio_wb32(pb, rescale_mdcv(metadata->max_luminance, luma_den));
2221  avio_wb32(pb, rescale_mdcv(metadata->min_luminance, luma_den));
2222  return 32;
2223 }
2224 
2225 static void find_compressor(char * compressor_name, int len, MOVTrack *track)
2226 {
2227  AVDictionaryEntry *encoder;
2228  int xdcam_res = (track->par->width == 1280 && track->par->height == 720)
2229  || (track->par->width == 1440 && track->par->height == 1080)
2230  || (track->par->width == 1920 && track->par->height == 1080);
2231 
2232  if ((track->mode == MODE_AVIF ||
2233  track->mode == MODE_MOV ||
2234  track->mode == MODE_MP4) &&
2235  (encoder = av_dict_get(track->st->metadata, "encoder", NULL, 0))) {
2236  av_strlcpy(compressor_name, encoder->value, 32);
2237  } else if (track->par->codec_id == AV_CODEC_ID_MPEG2VIDEO && xdcam_res) {
2238  int interlaced = track->par->field_order > AV_FIELD_PROGRESSIVE;
2239  AVStream *st = track->st;
2240  int rate = defined_frame_rate(NULL, st);
2241  av_strlcatf(compressor_name, len, "XDCAM");
2242  if (track->par->format == AV_PIX_FMT_YUV422P) {
2243  av_strlcatf(compressor_name, len, " HD422");
2244  } else if(track->par->width == 1440) {
2245  av_strlcatf(compressor_name, len, " HD");
2246  } else
2247  av_strlcatf(compressor_name, len, " EX");
2248 
2249  av_strlcatf(compressor_name, len, " %d%c", track->par->height, interlaced ? 'i' : 'p');
2250 
2251  av_strlcatf(compressor_name, len, "%d", rate * (interlaced + 1));
2252  }
2253 }
2254 
2255 static int mov_write_ccst_tag(AVIOContext *pb)
2256 {
2257  int64_t pos = avio_tell(pb);
2258  // Write sane defaults:
2259  // all_ref_pics_intra = 0 : all samples can use any type of reference.
2260  // intra_pred_used = 1 : intra prediction may or may not be used.
2261  // max_ref_per_pic = 15 : reserved value to indicate that any number of
2262  // reference images can be used.
2263  uint8_t ccstValue = (0 << 7) | /* all_ref_pics_intra */
2264  (1 << 6) | /* intra_pred_used */
2265  (15 << 2); /* max_ref_per_pic */
2266  avio_wb32(pb, 0); /* size */
2267  ffio_wfourcc(pb, "ccst");
2268  avio_wb32(pb, 0); /* Version & flags */
2269  avio_w8(pb, ccstValue);
2270  avio_wb24(pb, 0); /* reserved */
2271  return update_size(pb, pos);
2272 }
2273 
2274 static int mov_write_aux_tag(AVIOContext *pb, const char *aux_type)
2275 {
2276  int64_t pos = avio_tell(pb);
2277  avio_wb32(pb, 0); /* size */
2278  ffio_wfourcc(pb, aux_type);
2279  avio_wb32(pb, 0); /* Version & flags */
2280  avio_write(pb, "urn:mpeg:mpegB:cicp:systems:auxiliary:alpha\0", 44);
2281  return update_size(pb, pos);
2282 }
2283 
2284 static int mov_write_video_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov, MOVTrack *track)
2285 {
2286  int ret = AVERROR_BUG;
2287  int64_t pos = avio_tell(pb);
2288  char compressor_name[32] = { 0 };
2289  int avid = 0;
2290 
2291  int uncompressed_ycbcr = ((track->par->codec_id == AV_CODEC_ID_RAWVIDEO && track->par->format == AV_PIX_FMT_UYVY422)
2292  || (track->par->codec_id == AV_CODEC_ID_RAWVIDEO && track->par->format == AV_PIX_FMT_YUYV422)
2293  || track->par->codec_id == AV_CODEC_ID_V308
2294  || track->par->codec_id == AV_CODEC_ID_V408
2295  || track->par->codec_id == AV_CODEC_ID_V410
2296  || track->par->codec_id == AV_CODEC_ID_V210);
2297 
2298  avio_wb32(pb, 0); /* size */
2299  if (mov->encryption_scheme != MOV_ENC_NONE) {
2300  ffio_wfourcc(pb, "encv");
2301  } else {
2302  avio_wl32(pb, track->tag); // store it byteswapped
2303  }
2304  avio_wb32(pb, 0); /* Reserved */
2305  avio_wb16(pb, 0); /* Reserved */
2306  avio_wb16(pb, 1); /* Data-reference index */
2307 
2308  if (uncompressed_ycbcr) {
2309  avio_wb16(pb, 2); /* Codec stream version */
2310  } else {
2311  avio_wb16(pb, 0); /* Codec stream version */
2312  }
2313  avio_wb16(pb, 0); /* Codec stream revision (=0) */
2314  if (track->mode == MODE_MOV) {
2315  ffio_wfourcc(pb, "FFMP"); /* Vendor */
2316  if (track->par->codec_id == AV_CODEC_ID_RAWVIDEO || uncompressed_ycbcr) {
2317  avio_wb32(pb, 0); /* Temporal Quality */
2318  avio_wb32(pb, 0x400); /* Spatial Quality = lossless*/
2319  } else {
2320  avio_wb32(pb, 0x200); /* Temporal Quality = normal */
2321  avio_wb32(pb, 0x200); /* Spatial Quality = normal */
2322  }
2323  } else {
2324  ffio_fill(pb, 0, 3 * 4); /* Reserved */
2325  }
2326  avio_wb16(pb, track->par->width); /* Video width */
2327  avio_wb16(pb, track->height); /* Video height */
2328  avio_wb32(pb, 0x00480000); /* Horizontal resolution 72dpi */
2329  avio_wb32(pb, 0x00480000); /* Vertical resolution 72dpi */
2330  avio_wb32(pb, 0); /* Data size (= 0) */
2331  avio_wb16(pb, 1); /* Frame count (= 1) */
2332 
2333  find_compressor(compressor_name, 32, track);
2334  avio_w8(pb, strlen(compressor_name));
2335  avio_write(pb, compressor_name, 31);
2336 
2337  if (track->mode == MODE_MOV &&
2338  (track->par->codec_id == AV_CODEC_ID_V410 || track->par->codec_id == AV_CODEC_ID_V210))
2339  avio_wb16(pb, 0x18);
2340  else if (track->mode == MODE_MOV && track->par->bits_per_coded_sample)
2341  avio_wb16(pb, track->par->bits_per_coded_sample |
2342  (track->par->format == AV_PIX_FMT_GRAY8 ? 0x20 : 0));
2343  else
2344  avio_wb16(pb, 0x18); /* Reserved */
2345 
2346  if (track->mode == MODE_MOV && track->par->format == AV_PIX_FMT_PAL8) {
2347  int pal_size, i;
2348  avio_wb16(pb, 0); /* Color table ID */
2349  avio_wb32(pb, 0); /* Color table seed */
2350  avio_wb16(pb, 0x8000); /* Color table flags */
2351  if (track->par->bits_per_coded_sample < 0 || track->par->bits_per_coded_sample > 8)
2352  return AVERROR(EINVAL);
2353  pal_size = 1 << track->par->bits_per_coded_sample;
2354  avio_wb16(pb, pal_size - 1); /* Color table size (zero-relative) */
2355  for (i = 0; i < pal_size; i++) {
2356  uint32_t rgb = track->palette[i];
2357  uint16_t r = (rgb >> 16) & 0xff;
2358  uint16_t g = (rgb >> 8) & 0xff;
2359  uint16_t b = rgb & 0xff;
2360  avio_wb16(pb, 0);
2361  avio_wb16(pb, (r << 8) | r);
2362  avio_wb16(pb, (g << 8) | g);
2363  avio_wb16(pb, (b << 8) | b);
2364  }
2365  } else
2366  avio_wb16(pb, 0xffff); /* Reserved */
2367 
2368  if (track->tag == MKTAG('m','p','4','v'))
2369  mov_write_esds_tag(pb, track);
2370  else if (track->par->codec_id == AV_CODEC_ID_H263)
2371  mov_write_d263_tag(pb);
2372  else if (track->par->codec_id == AV_CODEC_ID_AVUI ||
2373  track->par->codec_id == AV_CODEC_ID_SVQ3) {
2374  mov_write_extradata_tag(pb, track);
2375  avio_wb32(pb, 0);
2376  } else if (track->par->codec_id == AV_CODEC_ID_DNXHD) {
2377  mov_write_avid_tag(pb, track);
2378  avid = 1;
2379  } else if (track->par->codec_id == AV_CODEC_ID_HEVC)
2380  mov_write_hvcc_tag(pb, track);
2381  else if (track->par->codec_id == AV_CODEC_ID_H264 && !TAG_IS_AVCI(track->tag)) {
2382  mov_write_avcc_tag(pb, track);
2383  if (track->mode == MODE_IPOD)
2384  mov_write_uuid_tag_ipod(pb);
2385  }
2386  else if (track->par->codec_id ==AV_CODEC_ID_EVC) {
2387  mov_write_evcc_tag(pb, track);
2388  } else if (track->par->codec_id == AV_CODEC_ID_VP9) {
2389  mov_write_vpcc_tag(mov->fc, pb, track);
2390  } else if (track->par->codec_id == AV_CODEC_ID_AV1) {
2391  mov_write_av1c_tag(pb, track);
2392  } else if (track->par->codec_id == AV_CODEC_ID_VC1 && track->vos_len > 0)
2393  mov_write_dvc1_tag(pb, track);
2394  else if (track->par->codec_id == AV_CODEC_ID_VP6F ||
2395  track->par->codec_id == AV_CODEC_ID_VP6A) {
2396  /* Don't write any potential extradata here - the cropping
2397  * is signalled via the normal width/height fields. */
2398  } else if (track->par->codec_id == AV_CODEC_ID_R10K) {
2399  if (track->par->codec_tag == MKTAG('R','1','0','k'))
2400  mov_write_dpxe_tag(pb, track);
2401  } else if (track->vos_len > 0)
2402  mov_write_glbl_tag(pb, track);
2403 
2404  if (track->par->codec_id != AV_CODEC_ID_H264 &&
2405  track->par->codec_id != AV_CODEC_ID_MPEG4 &&
2406  track->par->codec_id != AV_CODEC_ID_DNXHD) {
2407  int field_order = track->par->field_order;
2408 
2409  if (field_order != AV_FIELD_UNKNOWN)
2410  mov_write_fiel_tag(pb, track, field_order);
2411  }
2412 
2413  if (mov->flags & FF_MOV_FLAG_WRITE_GAMA) {
2414  if (track->mode == MODE_MOV)
2415  mov_write_gama_tag(s, pb, track, mov->gamma);
2416  else
2417  av_log(mov->fc, AV_LOG_WARNING, "Not writing 'gama' atom. Format is not MOV.\n");
2418  }
2419  if (track->mode == MODE_MOV || track->mode == MODE_MP4 || track->mode == MODE_AVIF) {
2420  int has_color_info = track->par->color_primaries != AVCOL_PRI_UNSPECIFIED &&
2421  track->par->color_trc != AVCOL_TRC_UNSPECIFIED &&
2422  track->par->color_space != AVCOL_SPC_UNSPECIFIED;
2423  if (has_color_info || mov->flags & FF_MOV_FLAG_WRITE_COLR ||
2424  av_stream_get_side_data(track->st, AV_PKT_DATA_ICC_PROFILE, NULL)) {
2425  int prefer_icc = mov->flags & FF_MOV_FLAG_PREFER_ICC || !has_color_info;
2426  mov_write_colr_tag(pb, track, prefer_icc);
2427  }
2428  } else if (mov->flags & FF_MOV_FLAG_WRITE_COLR) {
2429  av_log(mov->fc, AV_LOG_WARNING, "Not writing 'colr' atom. Format is not MOV or MP4 or AVIF.\n");
2430  }
2431 
2432  if (track->mode == MODE_MOV || track->mode == MODE_MP4) {
2433  mov_write_clli_tag(pb, track);
2434  mov_write_mdcv_tag(pb, track);
2435  }
2436 
2437  if (track->mode == MODE_MP4 && mov->fc->strict_std_compliance <= FF_COMPLIANCE_UNOFFICIAL) {
2438  AVStereo3D* stereo_3d = (AVStereo3D*) av_stream_get_side_data(track->st, AV_PKT_DATA_STEREO3D, NULL);
2439  AVSphericalMapping* spherical_mapping = (AVSphericalMapping*)av_stream_get_side_data(track->st, AV_PKT_DATA_SPHERICAL, NULL);
2440  AVDOVIDecoderConfigurationRecord *dovi = (AVDOVIDecoderConfigurationRecord *)
2441  av_stream_get_side_data(track->st, AV_PKT_DATA_DOVI_CONF, NULL);
2442 
2443  if (stereo_3d)
2444  mov_write_st3d_tag(s, pb, stereo_3d);
2445  if (spherical_mapping)
2446  mov_write_sv3d_tag(mov->fc, pb, spherical_mapping);
2447  if (dovi)
2448  mov_write_dvcc_dvvc_tag(s, pb, dovi);
2449  }
2450 
2451  if (track->par->sample_aspect_ratio.den && track->par->sample_aspect_ratio.num) {
2452  mov_write_pasp_tag(pb, track);
2453  }
2454 
2455  if (uncompressed_ycbcr){
2456  mov_write_clap_tag(pb, track);
2457  }
2458 
2459  if (mov->encryption_scheme != MOV_ENC_NONE) {
2460  ff_mov_cenc_write_sinf_tag(track, pb, mov->encryption_kid);
2461  }
2462 
2463  if (mov->write_btrt &&
2464  ((ret = mov_write_btrt_tag(pb, track)) < 0))
2465  return ret;
2466 
2467  /* extra padding for avid stsd */
2468  /* https://developer.apple.com/library/mac/documentation/QuickTime/QTFF/QTFFChap2/qtff2.html#//apple_ref/doc/uid/TP40000939-CH204-61112 */
2469  if (avid)
2470  avio_wb32(pb, 0);
2471 
2472  if (track->mode == MODE_AVIF) {
2473  mov_write_ccst_tag(pb);
2474  if (s->nb_streams > 0 && track == &mov->tracks[1])
2475  mov_write_aux_tag(pb, "auxi");
2476  }
2477 
2478  return update_size(pb, pos);
2479 }
2480 
2481 static int mov_write_rtp_tag(AVIOContext *pb, MOVTrack *track)
2482 {
2483  int64_t pos = avio_tell(pb);
2484  avio_wb32(pb, 0); /* size */
2485  ffio_wfourcc(pb, "rtp ");
2486  avio_wb32(pb, 0); /* Reserved */
2487  avio_wb16(pb, 0); /* Reserved */
2488  avio_wb16(pb, 1); /* Data-reference index */
2489 
2490  avio_wb16(pb, 1); /* Hint track version */
2491  avio_wb16(pb, 1); /* Highest compatible version */
2492  avio_wb32(pb, track->max_packet_size); /* Max packet size */
2493 
2494  avio_wb32(pb, 12); /* size */
2495  ffio_wfourcc(pb, "tims");
2496  avio_wb32(pb, track->timescale);
2497 
2498  return update_size(pb, pos);
2499 }
2500 
2501 static int mov_write_source_reference_tag(AVIOContext *pb, MOVTrack *track, const char *reel_name)
2502 {
2503  uint64_t str_size =strlen(reel_name);
2504  int64_t pos = avio_tell(pb);
2505 
2506  if (str_size >= UINT16_MAX){
2507  av_log(NULL, AV_LOG_ERROR, "reel_name length %"PRIu64" is too large\n", str_size);
2508  avio_wb16(pb, 0);
2509  return AVERROR(EINVAL);
2510  }
2511 
2512  avio_wb32(pb, 0); /* size */
2513  ffio_wfourcc(pb, "name"); /* Data format */
2514  avio_wb16(pb, str_size); /* string size */
2515  avio_wb16(pb, track->language); /* langcode */
2516  avio_write(pb, reel_name, str_size); /* reel name */
2517  return update_size(pb,pos);
2518 }
2519 
2520 static int mov_write_tmcd_tag(AVIOContext *pb, MOVTrack *track)
2521 {
2522  int64_t pos = avio_tell(pb);
2523 #if 1
2524  int frame_duration;
2525  int nb_frames;
2526  AVDictionaryEntry *t = NULL;
2527 
2528  if (!track->st->avg_frame_rate.num || !track->st->avg_frame_rate.den) {
2529  av_log(NULL, AV_LOG_ERROR, "avg_frame_rate not set for tmcd track.\n");
2530  return AVERROR(EINVAL);
2531  } else {
2532  frame_duration = av_rescale(track->timescale, track->st->avg_frame_rate.den, track->st->avg_frame_rate.num);
2533  nb_frames = ROUNDED_DIV(track->st->avg_frame_rate.num, track->st->avg_frame_rate.den);
2534  }
2535 
2536  if (nb_frames > 255) {
2537  av_log(NULL, AV_LOG_ERROR, "fps %d is too large\n", nb_frames);
2538  return AVERROR(EINVAL);
2539  }
2540 
2541  avio_wb32(pb, 0); /* size */
2542  ffio_wfourcc(pb, "tmcd"); /* Data format */
2543  avio_wb32(pb, 0); /* Reserved */
2544  avio_wb32(pb, 1); /* Data reference index */
2545  avio_wb32(pb, 0); /* Flags */
2546  avio_wb32(pb, track->timecode_flags); /* Flags (timecode) */
2547  avio_wb32(pb, track->timescale); /* Timescale */
2548  avio_wb32(pb, frame_duration); /* Frame duration */
2549  avio_w8(pb, nb_frames); /* Number of frames */
2550  avio_w8(pb, 0); /* Reserved */
2551 
2552  t = av_dict_get(track->st->metadata, "reel_name", NULL, 0);
2553  if (t && utf8len(t->value) && track->mode != MODE_MP4)
2554  mov_write_source_reference_tag(pb, track, t->value);
2555  else
2556  avio_wb16(pb, 0); /* zero size */
2557 #else
2558 
2559  avio_wb32(pb, 0); /* size */
2560  ffio_wfourcc(pb, "tmcd"); /* Data format */
2561  avio_wb32(pb, 0); /* Reserved */
2562  avio_wb32(pb, 1); /* Data reference index */
2563  if (track->par->extradata_size)
2564  avio_write(pb, track->par->extradata, track->par->extradata_size);
2565 #endif
2566  return update_size(pb, pos);
2567 }
2568 
2569 static int mov_write_gpmd_tag(AVIOContext *pb, const MOVTrack *track)
2570 {
2571  int64_t pos = avio_tell(pb);
2572  avio_wb32(pb, 0); /* size */
2573  ffio_wfourcc(pb, "gpmd");
2574  avio_wb32(pb, 0); /* Reserved */
2575  avio_wb16(pb, 0); /* Reserved */
2576  avio_wb16(pb, 1); /* Data-reference index */
2577  avio_wb32(pb, 0); /* Reserved */
2578  return update_size(pb, pos);
2579 }
2580 
2581 static int mov_write_stsd_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov, MOVTrack *track)
2582 {
2583  int64_t pos = avio_tell(pb);
2584  int ret = 0;
2585  avio_wb32(pb, 0); /* size */
2586  ffio_wfourcc(pb, "stsd");
2587  avio_wb32(pb, 0); /* version & flags */
2588  avio_wb32(pb, 1); /* entry count */
2589  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO)
2590  ret = mov_write_video_tag(s, pb, mov, track);
2591  else if (track->par->codec_type == AVMEDIA_TYPE_AUDIO)
2592  ret = mov_write_audio_tag(s, pb, mov, track);
2593  else if (track->par->codec_type == AVMEDIA_TYPE_SUBTITLE)
2594  ret = mov_write_subtitle_tag(s, pb, track);
2595  else if (track->par->codec_tag == MKTAG('r','t','p',' '))
2596  ret = mov_write_rtp_tag(pb, track);
2597  else if (track->par->codec_tag == MKTAG('t','m','c','d'))
2598  ret = mov_write_tmcd_tag(pb, track);
2599  else if (track->par->codec_tag == MKTAG('g','p','m','d'))
2600  ret = mov_write_gpmd_tag(pb, track);
2601 
2602  if (ret < 0)
2603  return ret;
2604 
2605  return update_size(pb, pos);
2606 }
2607 
2608 static int mov_write_ctts_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
2609 {
2610  MOVMuxContext *mov = s->priv_data;
2611  MOVCtts *ctts_entries;
2612  uint32_t entries = 0;
2613  uint32_t atom_size;
2614  int i;
2615 
2616  ctts_entries = av_malloc_array((track->entry + 1), sizeof(*ctts_entries)); /* worst case */
2617  if (!ctts_entries)
2618  return AVERROR(ENOMEM);
2619  ctts_entries[0].count = 1;
2620  ctts_entries[0].duration = track->cluster[0].cts;
2621  for (i = 1; i < track->entry; i++) {
2622  if (track->cluster[i].cts == ctts_entries[entries].duration) {
2623  ctts_entries[entries].count++; /* compress */
2624  } else {
2625  entries++;
2626  ctts_entries[entries].duration = track->cluster[i].cts;
2627  ctts_entries[entries].count = 1;
2628  }
2629  }
2630  entries++; /* last one */
2631  atom_size = 16 + (entries * 8);
2632  avio_wb32(pb, atom_size); /* size */
2633  ffio_wfourcc(pb, "ctts");
2634  if (mov->flags & FF_MOV_FLAG_NEGATIVE_CTS_OFFSETS)
2635  avio_w8(pb, 1); /* version */
2636  else
2637  avio_w8(pb, 0); /* version */
2638  avio_wb24(pb, 0); /* flags */
2639  avio_wb32(pb, entries); /* entry count */
2640  for (i = 0; i < entries; i++) {
2641  avio_wb32(pb, ctts_entries[i].count);
2642  avio_wb32(pb, ctts_entries[i].duration);
2643  }
2644  av_free(ctts_entries);
2645  return atom_size;
2646 }
2647 
2648 /* Time to sample atom */
2649 static int mov_write_stts_tag(AVIOContext *pb, MOVTrack *track)
2650 {
2651  MOVStts *stts_entries = NULL;
2652  uint32_t entries = -1;
2653  uint32_t atom_size;
2654  int i;
2655 
2656  if (track->par->codec_type == AVMEDIA_TYPE_AUDIO && !track->audio_vbr) {
2657  stts_entries = av_malloc(sizeof(*stts_entries)); /* one entry */
2658  if (!stts_entries)
2659  return AVERROR(ENOMEM);
2660  stts_entries[0].count = track->sample_count;
2661  stts_entries[0].duration = 1;
2662  entries = 1;
2663  } else {
2664  if (track->entry) {
2665  stts_entries = av_malloc_array(track->entry, sizeof(*stts_entries)); /* worst case */
2666  if (!stts_entries)
2667  return AVERROR(ENOMEM);
2668  }
2669  for (i = 0; i < track->entry; i++) {
2670  int duration = get_cluster_duration(track, i);
2671  if (i && duration == stts_entries[entries].duration) {
2672  stts_entries[entries].count++; /* compress */
2673  } else {
2674  entries++;
2675  stts_entries[entries].duration = duration;
2676  stts_entries[entries].count = 1;
2677  }
2678  }
2679  entries++; /* last one */
2680  }
2681  atom_size = 16 + (entries * 8);
2682  avio_wb32(pb, atom_size); /* size */
2683  ffio_wfourcc(pb, "stts");
2684  avio_wb32(pb, 0); /* version & flags */
2685  avio_wb32(pb, entries); /* entry count */
2686  for (i = 0; i < entries; i++) {
2687  avio_wb32(pb, stts_entries[i].count);
2688  avio_wb32(pb, stts_entries[i].duration);
2689  }
2690  av_free(stts_entries);
2691  return atom_size;
2692 }
2693 
2694 static int mov_write_dref_tag(AVIOContext *pb)
2695 {
2696  avio_wb32(pb, 28); /* size */
2697  ffio_wfourcc(pb, "dref");
2698  avio_wb32(pb, 0); /* version & flags */
2699  avio_wb32(pb, 1); /* entry count */
2700 
2701  avio_wb32(pb, 0xc); /* size */
2702  //FIXME add the alis and rsrc atom
2703  ffio_wfourcc(pb, "url ");
2704  avio_wb32(pb, 1); /* version & flags */
2705 
2706  return 28;
2707 }
2708 
2709 static int mov_preroll_write_stbl_atoms(AVIOContext *pb, MOVTrack *track)
2710 {
2711  struct sgpd_entry {
2712  int count;
2713  int16_t roll_distance;
2714  int group_description_index;
2715  };
2716 
2717  struct sgpd_entry *sgpd_entries = NULL;
2718  int entries = -1;
2719  int group = 0;
2720  int i, j;
2721 
2722  const int OPUS_SEEK_PREROLL_MS = 80;
2723  int roll_samples = av_rescale_q(OPUS_SEEK_PREROLL_MS,
2724  (AVRational){1, 1000},
2725  (AVRational){1, 48000});
2726 
2727  if (!track->entry)
2728  return 0;
2729 
2730  sgpd_entries = av_malloc_array(track->entry, sizeof(*sgpd_entries));
2731  if (!sgpd_entries)
2732  return AVERROR(ENOMEM);
2733 
2734  av_assert0(track->par->codec_id == AV_CODEC_ID_OPUS || track->par->codec_id == AV_CODEC_ID_AAC);
2735 
2736  if (track->par->codec_id == AV_CODEC_ID_OPUS) {
2737  for (i = 0; i < track->entry; i++) {
2738  int roll_samples_remaining = roll_samples;
2739  int distance = 0;
2740  for (j = i - 1; j >= 0; j--) {
2741  roll_samples_remaining -= get_cluster_duration(track, j);
2742  distance++;
2743  if (roll_samples_remaining <= 0)
2744  break;
2745  }
2746  /* We don't have enough preceeding samples to compute a valid
2747  roll_distance here, so this sample can't be independently
2748  decoded. */
2749  if (roll_samples_remaining > 0)
2750  distance = 0;
2751  /* Verify distance is a maximum of 32 (2.5ms) packets. */
2752  if (distance > 32)
2753  return AVERROR_INVALIDDATA;
2754  if (i && distance == sgpd_entries[entries].roll_distance) {
2755  sgpd_entries[entries].count++;
2756  } else {
2757  entries++;
2758  sgpd_entries[entries].count = 1;
2759  sgpd_entries[entries].roll_distance = distance;
2760  sgpd_entries[entries].group_description_index = distance ? ++group : 0;
2761  }
2762  }
2763  } else {
2764  entries++;
2765  sgpd_entries[entries].count = track->sample_count;
2766  sgpd_entries[entries].roll_distance = 1;
2767  sgpd_entries[entries].group_description_index = ++group;
2768  }
2769  entries++;
2770 
2771  if (!group) {
2772  av_free(sgpd_entries);
2773  return 0;
2774  }
2775 
2776  /* Write sgpd tag */
2777  avio_wb32(pb, 24 + (group * 2)); /* size */
2778  ffio_wfourcc(pb, "sgpd");
2779  avio_wb32(pb, 1 << 24); /* fullbox */
2780  ffio_wfourcc(pb, "roll");
2781  avio_wb32(pb, 2); /* default_length */
2782  avio_wb32(pb, group); /* entry_count */
2783  for (i = 0; i < entries; i++) {
2784  if (sgpd_entries[i].group_description_index) {
2785  avio_wb16(pb, -sgpd_entries[i].roll_distance); /* roll_distance */
2786  }
2787  }
2788 
2789  /* Write sbgp tag */
2790  avio_wb32(pb, 20 + (entries * 8)); /* size */
2791  ffio_wfourcc(pb, "sbgp");
2792  avio_wb32(pb, 0); /* fullbox */
2793  ffio_wfourcc(pb, "roll");
2794  avio_wb32(pb, entries); /* entry_count */
2795  for (i = 0; i < entries; i++) {
2796  avio_wb32(pb, sgpd_entries[i].count); /* sample_count */
2797  avio_wb32(pb, sgpd_entries[i].group_description_index); /* group_description_index */
2798  }
2799 
2800  av_free(sgpd_entries);
2801  return 0;
2802 }
2803 
2804 static int mov_write_stbl_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov, MOVTrack *track)
2805 {
2806  int64_t pos = avio_tell(pb);
2807  int ret = 0;
2808 
2809  avio_wb32(pb, 0); /* size */
2810  ffio_wfourcc(pb, "stbl");
2811  if ((ret = mov_write_stsd_tag(s, pb, mov, track)) < 0)
2812  return ret;
2813  mov_write_stts_tag(pb, track);
2814  if ((track->par->codec_type == AVMEDIA_TYPE_VIDEO ||
2815  track->par->codec_id == AV_CODEC_ID_TRUEHD ||
2816  track->par->codec_id == AV_CODEC_ID_MPEGH_3D_AUDIO ||
2817  track->par->codec_tag == MKTAG('r','t','p',' ')) &&
2818  track->has_keyframes && track->has_keyframes < track->entry)
2819  mov_write_stss_tag(pb, track, MOV_SYNC_SAMPLE);
2820  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO && track->has_disposable)
2821  mov_write_sdtp_tag(pb, track);
2822  if (track->mode == MODE_MOV && track->flags & MOV_TRACK_STPS)
2823  mov_write_stss_tag(pb, track, MOV_PARTIAL_SYNC_SAMPLE);
2824  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO &&
2825  track->flags & MOV_TRACK_CTTS && track->entry) {
2826 
2827  if ((ret = mov_write_ctts_tag(s, pb, track)) < 0)
2828  return ret;
2829  }
2830  mov_write_stsc_tag(pb, track);
2831  mov_write_stsz_tag(pb, track);
2832  mov_write_stco_tag(pb, track);
2833  if (track->cenc.aes_ctr) {
2834  ff_mov_cenc_write_stbl_atoms(&track->cenc, pb);
2835  }
2836  if (track->par->codec_id == AV_CODEC_ID_OPUS || track->par->codec_id == AV_CODEC_ID_AAC) {
2837  mov_preroll_write_stbl_atoms(pb, track);
2838  }
2839  return update_size(pb, pos);
2840 }
2841 
2842 static int mov_write_dinf_tag(AVIOContext *pb)
2843 {
2844  int64_t pos = avio_tell(pb);
2845  avio_wb32(pb, 0); /* size */
2846  ffio_wfourcc(pb, "dinf");
2847  mov_write_dref_tag(pb);
2848  return update_size(pb, pos);
2849 }
2850 
2851 static int mov_write_nmhd_tag(AVIOContext *pb)
2852 {
2853  avio_wb32(pb, 12);
2854  ffio_wfourcc(pb, "nmhd");
2855  avio_wb32(pb, 0);
2856  return 12;
2857 }
2858 
2859 static int mov_write_sthd_tag(AVIOContext *pb)
2860 {
2861  avio_wb32(pb, 12);
2862  ffio_wfourcc(pb, "sthd");
2863  avio_wb32(pb, 0);
2864  return 12;
2865 }
2866 
2867 static int mov_write_tcmi_tag(AVIOContext *pb, MOVTrack *track)
2868 {
2869  int64_t pos = avio_tell(pb);
2870  const char *font = "Lucida Grande";
2871  avio_wb32(pb, 0); /* size */
2872  ffio_wfourcc(pb, "tcmi"); /* timecode media information atom */
2873  avio_wb32(pb, 0); /* version & flags */
2874  avio_wb16(pb, 0); /* text font */
2875  avio_wb16(pb, 0); /* text face */
2876  avio_wb16(pb, 12); /* text size */
2877  avio_wb16(pb, 0); /* (unknown, not in the QT specs...) */
2878  avio_wb16(pb, 0x0000); /* text color (red) */
2879  avio_wb16(pb, 0x0000); /* text color (green) */
2880  avio_wb16(pb, 0x0000); /* text color (blue) */
2881  avio_wb16(pb, 0xffff); /* background color (red) */
2882  avio_wb16(pb, 0xffff); /* background color (green) */
2883  avio_wb16(pb, 0xffff); /* background color (blue) */
2884  avio_w8(pb, strlen(font)); /* font len (part of the pascal string) */
2885  avio_write(pb, font, strlen(font)); /* font name */
2886  return update_size(pb, pos);
2887 }
2888 
2889 static int mov_write_gmhd_tag(AVIOContext *pb, MOVTrack *track)
2890 {
2891  int64_t pos = avio_tell(pb);
2892  avio_wb32(pb, 0); /* size */
2893  ffio_wfourcc(pb, "gmhd");
2894  avio_wb32(pb, 0x18); /* gmin size */
2895  ffio_wfourcc(pb, "gmin");/* generic media info */
2896  avio_wb32(pb, 0); /* version & flags */
2897  avio_wb16(pb, 0x40); /* graphics mode = */
2898  avio_wb16(pb, 0x8000); /* opColor (r?) */
2899  avio_wb16(pb, 0x8000); /* opColor (g?) */
2900  avio_wb16(pb, 0x8000); /* opColor (b?) */
2901  avio_wb16(pb, 0); /* balance */
2902  avio_wb16(pb, 0); /* reserved */
2903 
2904  /*
2905  * This special text atom is required for
2906  * Apple Quicktime chapters. The contents
2907  * don't appear to be documented, so the
2908  * bytes are copied verbatim.
2909  */
2910  if (track->tag != MKTAG('c','6','0','8')) {
2911  avio_wb32(pb, 0x2C); /* size */
2912  ffio_wfourcc(pb, "text");
2913  avio_wb16(pb, 0x01);
2914  avio_wb32(pb, 0x00);
2915  avio_wb32(pb, 0x00);
2916  avio_wb32(pb, 0x00);
2917  avio_wb32(pb, 0x01);
2918  avio_wb32(pb, 0x00);
2919  avio_wb32(pb, 0x00);
2920  avio_wb32(pb, 0x00);
2921  avio_wb32(pb, 0x00004000);
2922  avio_wb16(pb, 0x0000);
2923  }
2924 
2925  if (track->par->codec_tag == MKTAG('t','m','c','d')) {
2926  int64_t tmcd_pos = avio_tell(pb);
2927  avio_wb32(pb, 0); /* size */
2928  ffio_wfourcc(pb, "tmcd");
2929  mov_write_tcmi_tag(pb, track);
2930  update_size(pb, tmcd_pos);
2931  } else if (track->par->codec_tag == MKTAG('g','p','m','d')) {
2932  int64_t gpmd_pos = avio_tell(pb);
2933  avio_wb32(pb, 0); /* size */
2934  ffio_wfourcc(pb, "gpmd");
2935  avio_wb32(pb, 0); /* version */
2936  update_size(pb, gpmd_pos);
2937  }
2938  return update_size(pb, pos);
2939 }
2940 
2941 static int mov_write_smhd_tag(AVIOContext *pb)
2942 {
2943  avio_wb32(pb, 16); /* size */
2944  ffio_wfourcc(pb, "smhd");
2945  avio_wb32(pb, 0); /* version & flags */
2946  avio_wb16(pb, 0); /* reserved (balance, normally = 0) */
2947  avio_wb16(pb, 0); /* reserved */
2948  return 16;
2949 }
2950 
2951 static int mov_write_vmhd_tag(AVIOContext *pb)
2952 {
2953  avio_wb32(pb, 0x14); /* size (always 0x14) */
2954  ffio_wfourcc(pb, "vmhd");
2955  avio_wb32(pb, 0x01); /* version & flags */
2956  avio_wb64(pb, 0); /* reserved (graphics mode = copy) */
2957  return 0x14;
2958 }
2959 
2960 static int is_clcp_track(MOVTrack *track)
2961 {
2962  return track->tag == MKTAG('c','7','0','8') ||
2963  track->tag == MKTAG('c','6','0','8');
2964 }
2965 
2966 static int mov_write_hdlr_tag(AVFormatContext *s, AVIOContext *pb, MOVTrack *track)
2967 {
2968  MOVMuxContext *mov = s->priv_data;
2969  const char *hdlr, *descr = NULL, *hdlr_type = NULL;
2970  int64_t pos = avio_tell(pb);
2971  size_t descr_len;
2972 
2973  hdlr = "dhlr";
2974  hdlr_type = "url ";
2975  descr = "DataHandler";
2976 
2977  if (track) {
2978  hdlr = (track->mode == MODE_MOV) ? "mhlr" : "\0\0\0\0";
2979  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO) {
2980  if (track->mode == MODE_AVIF) {
2981  hdlr_type = (track == &mov->tracks[0]) ? "pict" : "auxv";
2982  descr = "PictureHandler";
2983  } else {
2984  hdlr_type = "vide";
2985  descr = "VideoHandler";
2986  }
2987  } else if (track->par->codec_type == AVMEDIA_TYPE_AUDIO) {
2988  hdlr_type = "soun";
2989  descr = "SoundHandler";
2990  } else if (track->par->codec_type == AVMEDIA_TYPE_SUBTITLE) {
2991  if (is_clcp_track(track)) {
2992  hdlr_type = "clcp";
2993  descr = "ClosedCaptionHandler";
2994  } else {
2995  if (track->tag == MKTAG('t','x','3','g')) {
2996  hdlr_type = "sbtl";
2997  } else if (track->tag == MKTAG('m','p','4','s')) {
2998  hdlr_type = "subp";
2999  } else if (track->tag == MOV_MP4_TTML_TAG) {
3000  hdlr_type = "subt";
3001  } else {
3002  hdlr_type = "text";
3003  }
3004  descr = "SubtitleHandler";
3005  }
3006  } else if (track->par->codec_tag == MKTAG('r','t','p',' ')) {
3007  hdlr_type = "hint";
3008  descr = "HintHandler";
3009  } else if (track->par->codec_tag == MKTAG('t','m','c','d')) {
3010  hdlr_type = "tmcd";
3011  descr = "TimeCodeHandler";
3012  } else if (track->par->codec_tag == MKTAG('g','p','m','d')) {
3013  hdlr_type = "meta";
3014  descr = "GoPro MET"; // GoPro Metadata
3015  } else {
3016  av_log(s, AV_LOG_WARNING,
3017  "Unknown hdlr_type for %s, writing dummy values\n",
3018  av_fourcc2str(track->par->codec_tag));
3019  }
3020  if (track->st) {
3021  // hdlr.name is used by some players to identify the content title
3022  // of the track. So if an alternate handler description is
3023  // specified, use it.
3024  AVDictionaryEntry *t;
3025  t = av_dict_get(track->st->metadata, "handler_name", NULL, 0);
3026  if (t && utf8len(t->value))
3027  descr = t->value;
3028  }
3029  }
3030 
3031  if (mov->empty_hdlr_name) /* expressly allowed by QTFF and not prohibited in ISO 14496-12 8.4.3.3 */
3032  descr = "";
3033 
3034  avio_wb32(pb, 0); /* size */
3035  ffio_wfourcc(pb, "hdlr");
3036  avio_wb32(pb, 0); /* Version & flags */
3037  avio_write(pb, hdlr, 4); /* handler */
3038  ffio_wfourcc(pb, hdlr_type); /* handler type */
3039  avio_wb32(pb, 0); /* reserved */
3040  avio_wb32(pb, 0); /* reserved */
3041  avio_wb32(pb, 0); /* reserved */
3042  descr_len = strlen(descr);
3043  if (!track || track->mode == MODE_MOV)
3044  avio_w8(pb, descr_len); /* pascal string */
3045  avio_write(pb, descr, descr_len); /* handler description */
3046  if (track && track->mode != MODE_MOV)
3047  avio_w8(pb, 0); /* c string */
3048  return update_size(pb, pos);
3049 }
3050 
3051 static int mov_write_pitm_tag(AVIOContext *pb, int item_id)
3052 {
3053  int64_t pos = avio_tell(pb);
3054  avio_wb32(pb, 0); /* size */
3055  ffio_wfourcc(pb, "pitm");
3056  avio_wb32(pb, 0); /* Version & flags */
3057  avio_wb16(pb, item_id); /* item_id */
3058  return update_size(pb, pos);
3059 }
3060 
3061 static int mov_write_iloc_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3062 {
3063  int64_t pos = avio_tell(pb);
3064  avio_wb32(pb, 0); /* size */
3065  ffio_wfourcc(pb, "iloc");
3066  avio_wb32(pb, 0); /* Version & flags */
3067  avio_w8(pb, (4 << 4) + 4); /* offset_size(4) and length_size(4) */
3068  avio_w8(pb, 0); /* base_offset_size(4) and reserved(4) */
3069  avio_wb16(pb, s->nb_streams); /* item_count */
3070 
3071  for (int i = 0; i < s->nb_streams; i++) {
3072  avio_wb16(pb, i + 1); /* item_id */
3073  avio_wb16(pb, 0); /* data_reference_index */
3074  avio_wb16(pb, 1); /* extent_count */
3075  mov->avif_extent_pos[i] = avio_tell(pb);
3076  avio_wb32(pb, 0); /* extent_offset (written later) */
3077  // For animated AVIF, we simply write the first packet's size.
3078  avio_wb32(pb, mov->avif_extent_length[i]); /* extent_length */
3079  }
3080 
3081  return update_size(pb, pos);
3082 }
3083 
3084 static int mov_write_iinf_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3085 {
3086  int64_t iinf_pos = avio_tell(pb);
3087  avio_wb32(pb, 0); /* size */
3088  ffio_wfourcc(pb, "iinf");
3089  avio_wb32(pb, 0); /* Version & flags */
3090  avio_wb16(pb, s->nb_streams); /* entry_count */
3091 
3092  for (int i = 0; i < s->nb_streams; i++) {
3093  int64_t infe_pos = avio_tell(pb);
3094  avio_wb32(pb, 0); /* size */
3095  ffio_wfourcc(pb, "infe");
3096  avio_w8(pb, 0x2); /* Version */
3097  avio_wb24(pb, 0); /* flags */
3098  avio_wb16(pb, i + 1); /* item_id */
3099  avio_wb16(pb, 0); /* item_protection_index */
3100  avio_write(pb, "av01", 4); /* item_type */
3101  avio_write(pb, !i ? "Color\0" : "Alpha\0", 6); /* item_name */
3102  update_size(pb, infe_pos);
3103  }
3104 
3105  return update_size(pb, iinf_pos);
3106 }
3107 
3108 
3109 static int mov_write_iref_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3110 {
3111  int64_t auxl_pos;
3112  int64_t iref_pos = avio_tell(pb);
3113  avio_wb32(pb, 0); /* size */
3114  ffio_wfourcc(pb, "iref");
3115  avio_wb32(pb, 0); /* Version & flags */
3116 
3117  auxl_pos = avio_tell(pb);
3118  avio_wb32(pb, 0); /* size */
3119  ffio_wfourcc(pb, "auxl");
3120  avio_wb16(pb, 2); /* from_item_ID */
3121  avio_wb16(pb, 1); /* reference_count */
3122  avio_wb16(pb, 1); /* to_item_ID */
3123  update_size(pb, auxl_pos);
3124 
3125  return update_size(pb, iref_pos);
3126 }
3127 
3128 static int mov_write_ispe_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s,
3129  int stream_index)
3130 {
3131  int64_t pos = avio_tell(pb);
3132  avio_wb32(pb, 0); /* size */
3133  ffio_wfourcc(pb, "ispe");
3134  avio_wb32(pb, 0); /* Version & flags */
3135  avio_wb32(pb, s->streams[stream_index]->codecpar->width); /* image_width */
3136  avio_wb32(pb, s->streams[stream_index]->codecpar->height); /* image_height */
3137  return update_size(pb, pos);
3138 }
3139 
3140 static int mov_write_pixi_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s,
3141  int stream_index)
3142 {
3143  int64_t pos = avio_tell(pb);
3144  const AVPixFmtDescriptor *pixdesc =
3145  av_pix_fmt_desc_get(s->streams[stream_index]->codecpar->format);
3146  avio_wb32(pb, 0); /* size */
3147  ffio_wfourcc(pb, "pixi");
3148  avio_wb32(pb, 0); /* Version & flags */
3149  avio_w8(pb, pixdesc->nb_components); /* num_channels */
3150  for (int i = 0; i < pixdesc->nb_components; ++i) {
3151  avio_w8(pb, pixdesc->comp[i].depth); /* bits_per_channel */
3152  }
3153  return update_size(pb, pos);
3154 }
3155 
3156 static int mov_write_ipco_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3157 {
3158  int64_t pos = avio_tell(pb);
3159  avio_wb32(pb, 0); /* size */
3160  ffio_wfourcc(pb, "ipco");
3161  for (int i = 0; i < s->nb_streams; i++) {
3162  mov_write_ispe_tag(pb, mov, s, i);
3163  mov_write_pixi_tag(pb, mov, s, i);
3164  mov_write_av1c_tag(pb, &mov->tracks[i]);
3165  if (!i)
3166  mov_write_colr_tag(pb, &mov->tracks[0], 0);
3167  else
3168  mov_write_aux_tag(pb, "auxC");
3169  }
3170  return update_size(pb, pos);
3171 }
3172 
3173 static int mov_write_ipma_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3174 {
3175  int64_t pos = avio_tell(pb);
3176  avio_wb32(pb, 0); /* size */
3177  ffio_wfourcc(pb, "ipma");
3178  avio_wb32(pb, 0); /* Version & flags */
3179  avio_wb32(pb, s->nb_streams); /* entry_count */
3180 
3181  for (int i = 0, index = 1; i < s->nb_streams; i++) {
3182  avio_wb16(pb, i + 1); /* item_ID */
3183  avio_w8(pb, 4); /* association_count */
3184 
3185  // ispe association.
3186  avio_w8(pb, index++); /* essential and property_index */
3187  // pixi association.
3188  avio_w8(pb, index++); /* essential and property_index */
3189  // av1C association.
3190  avio_w8(pb, 0x80 | index++); /* essential and property_index */
3191  // colr/auxC association.
3192  avio_w8(pb, index++); /* essential and property_index */
3193  }
3194  return update_size(pb, pos);
3195 }
3196 
3197 static int mov_write_iprp_tag(AVIOContext *pb, MOVMuxContext *mov, AVFormatContext *s)
3198 {
3199  int64_t pos = avio_tell(pb);
3200  avio_wb32(pb, 0); /* size */
3201  ffio_wfourcc(pb, "iprp");
3202  mov_write_ipco_tag(pb, mov, s);
3203  mov_write_ipma_tag(pb, mov, s);
3204  return update_size(pb, pos);
3205 }
3206 
3207 static int mov_write_hmhd_tag(AVIOContext *pb)
3208 {
3209  /* This atom must be present, but leaving the values at zero
3210  * seems harmless. */
3211  avio_wb32(pb, 28); /* size */
3212  ffio_wfourcc(pb, "hmhd");
3213  avio_wb32(pb, 0); /* version, flags */
3214  avio_wb16(pb, 0); /* maxPDUsize */
3215  avio_wb16(pb, 0); /* avgPDUsize */
3216  avio_wb32(pb, 0); /* maxbitrate */
3217  avio_wb32(pb, 0); /* avgbitrate */
3218  avio_wb32(pb, 0); /* reserved */
3219  return 28;
3220 }
3221 
3222 static int mov_write_minf_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov, MOVTrack *track)
3223 {
3224  int64_t pos = avio_tell(pb);
3225  int ret;
3226 
3227  avio_wb32(pb, 0); /* size */
3228  ffio_wfourcc(pb, "minf");
3229  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO)
3230  mov_write_vmhd_tag(pb);
3231  else if (track->par->codec_type == AVMEDIA_TYPE_AUDIO)
3232  mov_write_smhd_tag(pb);
3233  else if (track->par->codec_type == AVMEDIA_TYPE_SUBTITLE) {
3234  if (track->tag == MKTAG('t','e','x','t') || is_clcp_track(track)) {
3235  mov_write_gmhd_tag(pb, track);
3236  } else if (track->tag == MOV_MP4_TTML_TAG) {
3237  mov_write_sthd_tag(pb);
3238  } else {
3239  mov_write_nmhd_tag(pb);
3240  }
3241  } else if (track->tag == MKTAG('r','t','p',' ')) {
3242  mov_write_hmhd_tag(pb);
3243  } else if (track->tag == MKTAG('t','m','c','d')) {
3244  if (track->mode != MODE_MOV)
3245  mov_write_nmhd_tag(pb);
3246  else
3247  mov_write_gmhd_tag(pb, track);
3248  } else if (track->tag == MKTAG('g','p','m','d')) {
3249  mov_write_gmhd_tag(pb, track);
3250  }
3251  if (track->mode == MODE_MOV) /* ISO 14496-12 8.4.3.1 specifies hdlr only within mdia or meta boxes */
3252  mov_write_hdlr_tag(s, pb, NULL);
3253  mov_write_dinf_tag(pb);
3254  if ((ret = mov_write_stbl_tag(s, pb, mov, track)) < 0)
3255  return ret;
3256  return update_size(pb, pos);
3257 }
3258 
3259 static void get_pts_range(MOVMuxContext *mov, MOVTrack *track,
3260  int64_t *start, int64_t *end)
3261 {
3262  if (track->tag == MKTAG('t','m','c','d') && mov->nb_meta_tmcd) {
3263  // tmcd tracks gets track_duration set in mov_write_moov_tag from
3264  // another track's duration, while the end_pts may be left at zero.
3265  // Calculate the pts duration for that track instead.
3266  get_pts_range(mov, &mov->tracks[track->src_track], start, end);
3267  *start = av_rescale(*start, track->timescale,
3268  mov->tracks[track->src_track].timescale);
3269  *end = av_rescale(*end, track->timescale,
3270  mov->tracks[track->src_track].timescale);
3271  return;
3272  }
3273  if (track->end_pts != AV_NOPTS_VALUE &&
3274  track->start_dts != AV_NOPTS_VALUE &&
3275  track->start_cts != AV_NOPTS_VALUE) {
3276  *start = track->start_dts + track->start_cts;
3277  *end = track->end_pts;
3278  return;
3279  }
3280  *start = 0;
3281  *end = track->track_duration;
3282 }
3283 
3284 static int64_t calc_samples_pts_duration(MOVMuxContext *mov, MOVTrack *track)
3285 {
3286  int64_t start, end;
3287  get_pts_range(mov, track, &start, &end);
3288  return end - start;
3289 }
3290 
3291 // Calculate the actual duration of the track, after edits.
3292 // If it starts with a pts < 0, that is removed by the edit list.
3293 // If it starts with a pts > 0, the edit list adds a delay before that.
3294 // Thus, with edit lists enabled, the post-edit output of the file is
3295 // starting with pts=0.
3296 static int64_t calc_pts_duration(MOVMuxContext *mov, MOVTrack *track)
3297 {
3298  int64_t start, end;
3299  get_pts_range(mov, track, &start, &end);
3300  if (mov->use_editlist != 0)
3301  start = 0;
3302  return end - start;
3303 }
3304 
3305 static int mov_mdhd_mvhd_tkhd_version(MOVMuxContext *mov, MOVTrack *track, int64_t duration)
3306 {
3307  if (track && track->mode == MODE_ISM)
3308  return 1;
3309  if (duration < INT32_MAX)
3310  return 0;
3311  return 1;
3312 }
3313 
3314 static int mov_write_mdhd_tag(AVIOContext *pb, MOVMuxContext *mov,
3315  MOVTrack *track)
3316 {
3317  int64_t duration = calc_samples_pts_duration(mov, track);
3318  int version = mov_mdhd_mvhd_tkhd_version(mov, track, duration);
3319 
3320  (version == 1) ? avio_wb32(pb, 44) : avio_wb32(pb, 32); /* size */
3321  ffio_wfourcc(pb, "mdhd");
3322  avio_w8(pb, version);
3323  avio_wb24(pb, 0); /* flags */
3324  if (version == 1) {
3325  avio_wb64(pb, track->time);
3326  avio_wb64(pb, track->time);
3327  } else {
3328  avio_wb32(pb, track->time); /* creation time */
3329  avio_wb32(pb, track->time); /* modification time */
3330  }
3331  avio_wb32(pb, track->timescale); /* time scale (sample rate for audio) */
3332  if (!track->entry && mov->mode == MODE_ISM)
3333  (version == 1) ? avio_wb64(pb, UINT64_C(0xffffffffffffffff)) : avio_wb32(pb, 0xffffffff);
3334  else if (!track->entry)
3335  (version == 1) ? avio_wb64(pb, 0) : avio_wb32(pb, 0);
3336  else
3337  (version == 1) ? avio_wb64(pb, duration) : avio_wb32(pb, duration); /* duration */
3338  avio_wb16(pb, track->language); /* language */
3339  avio_wb16(pb, 0); /* reserved (quality) */
3340 
3341  if (version != 0 && track->mode == MODE_MOV) {
3342  av_log(NULL, AV_LOG_ERROR,
3343  "FATAL error, file duration too long for timebase, this file will not be\n"
3344  "playable with QuickTime. Choose a different timebase with "
3345  "-video_track_timescale or a different container format\n");
3346  }
3347 
3348  return 32;
3349 }
3350 
3351 static int mov_write_mdia_tag(AVFormatContext *s, AVIOContext *pb,
3352  MOVMuxContext *mov, MOVTrack *track)
3353 {
3354  int64_t pos = avio_tell(pb);
3355  int ret;
3356 
3357  avio_wb32(pb, 0); /* size */
3358  ffio_wfourcc(pb, "mdia");
3359  mov_write_mdhd_tag(pb, mov, track);
3360  mov_write_hdlr_tag(s, pb, track);
3361  if ((ret = mov_write_minf_tag(s, pb, mov, track)) < 0)
3362  return ret;
3363  return update_size(pb, pos);
3364 }
3365 
3366 /* transformation matrix
3367  |a b u|
3368  |c d v|
3369  |tx ty w| */
3370 static void write_matrix(AVIOContext *pb, int16_t a, int16_t b, int16_t c,
3371  int16_t d, int16_t tx, int16_t ty)
3372 {
3373  avio_wb32(pb, a << 16); /* 16.16 format */
3374  avio_wb32(pb, b << 16); /* 16.16 format */
3375  avio_wb32(pb, 0); /* u in 2.30 format */
3376  avio_wb32(pb, c << 16); /* 16.16 format */
3377  avio_wb32(pb, d << 16); /* 16.16 format */
3378  avio_wb32(pb, 0); /* v in 2.30 format */
3379  avio_wb32(pb, tx << 16); /* 16.16 format */
3380  avio_wb32(pb, ty << 16); /* 16.16 format */
3381  avio_wb32(pb, 1 << 30); /* w in 2.30 format */
3382 }
3383 
3384 static int mov_write_tkhd_tag(AVIOContext *pb, MOVMuxContext *mov,
3385  MOVTrack *track, AVStream *st)
3386 {
3387  int64_t duration = av_rescale_rnd(calc_pts_duration(mov, track),
3388  mov->movie_timescale, track->timescale,
3389  AV_ROUND_UP);
3390  int version;
3391  int flags = MOV_TKHD_FLAG_IN_MOVIE;
3392  int group = 0;
3393 
3394  uint32_t *display_matrix = NULL;
3395  size_t display_matrix_size;
3396  int i;
3397 
3398  if (mov->mode == MODE_AVIF)
3399  if (!mov->avif_loop_count)
3400  duration = INT64_MAX;
3401  else
3402  duration *= mov->avif_loop_count;
3403 
3404  if (st) {
3405  if (mov->per_stream_grouping)
3406  group = st->index;
3407  else
3408  group = st->codecpar->codec_type;
3409 
3410  display_matrix = (uint32_t*)av_stream_get_side_data(st, AV_PKT_DATA_DISPLAYMATRIX,
3411  &display_matrix_size);
3412  if (display_matrix && display_matrix_size < 9 * sizeof(*display_matrix))
3413  display_matrix = NULL;
3414  }
3415 
3416  if (track->flags & MOV_TRACK_ENABLED)
3417  flags |= MOV_TKHD_FLAG_ENABLED;
3418 
3419  version = mov_mdhd_mvhd_tkhd_version(mov, track, duration);
3420 
3421  (version == 1) ? avio_wb32(pb, 104) : avio_wb32(pb, 92); /* size */
3422  ffio_wfourcc(pb, "tkhd");
3423  avio_w8(pb, version);
3424  avio_wb24(pb, flags);
3425  if (version == 1) {
3426  avio_wb64(pb, track->time);
3427  avio_wb64(pb, track->time);
3428  } else {
3429  avio_wb32(pb, track->time); /* creation time */
3430  avio_wb32(pb, track->time); /* modification time */
3431  }
3432  avio_wb32(pb, track->track_id); /* track-id */
3433  avio_wb32(pb, 0); /* reserved */
3434  if (!track->entry && mov->mode == MODE_ISM)
3435  (version == 1) ? avio_wb64(pb, UINT64_C(0xffffffffffffffff)) : avio_wb32(pb, 0xffffffff);
3436  else if (!track->entry)
3437  (version == 1) ? avio_wb64(pb, 0) : avio_wb32(pb, 0);
3438  else
3439  (version == 1) ? avio_wb64(pb, duration) : avio_wb32(pb, duration);
3440 
3441  avio_wb32(pb, 0); /* reserved */
3442  avio_wb32(pb, 0); /* reserved */
3443  avio_wb16(pb, 0); /* layer */
3444  avio_wb16(pb, group); /* alternate group) */
3445  /* Volume, only for audio */
3446  if (track->par->codec_type == AVMEDIA_TYPE_AUDIO)
3447  avio_wb16(pb, 0x0100);
3448  else
3449  avio_wb16(pb, 0);
3450  avio_wb16(pb, 0); /* reserved */
3451 
3452  /* Matrix structure */
3453  if (display_matrix) {
3454  for (i = 0; i < 9; i++)
3455  avio_wb32(pb, display_matrix[i]);
3456  } else {
3457  write_matrix(pb, 1, 0, 0, 1, 0, 0);
3458  }
3459  /* Track width and height, for visual only */
3460  if (st && (track->par->codec_type == AVMEDIA_TYPE_VIDEO ||
3461  track->par->codec_type == AVMEDIA_TYPE_SUBTITLE)) {
3462  int64_t track_width_1616;
3463  if (track->mode == MODE_MOV || track->mode == MODE_AVIF) {
3464  track_width_1616 = track->par->width * 0x10000ULL;
3465  } else {
3466  track_width_1616 = av_rescale(st->sample_aspect_ratio.num,
3467  track->par->width * 0x10000LL,
3468  st->sample_aspect_ratio.den);
3469  if (!track_width_1616 ||
3470  track->height != track->par->height ||
3471  track_width_1616 > UINT32_MAX)
3472  track_width_1616 = track->par->width * 0x10000ULL;
3473  }
3474  if (track_width_1616 > UINT32_MAX) {
3475  av_log(mov->fc, AV_LOG_WARNING, "track width is too large\n");
3476  track_width_1616 = 0;
3477  }
3478  avio_wb32(pb, track_width_1616);
3479  if (track->height > 0xFFFF) {
3480  av_log(mov->fc, AV_LOG_WARNING, "track height is too large\n");
3481  avio_wb32(pb, 0);
3482  } else
3483  avio_wb32(pb, track->height * 0x10000U);
3484  } else {
3485  avio_wb32(pb, 0);
3486  avio_wb32(pb, 0);
3487  }
3488  return 0x5c;
3489 }
3490 
3491 static int mov_write_tapt_tag(AVIOContext *pb, MOVTrack *track)
3492 {
3493  int32_t width = av_rescale(track->par->sample_aspect_ratio.num, track->par->width,
3494  track->par->sample_aspect_ratio.den);
3495 
3496  int64_t pos = avio_tell(pb);
3497 
3498  avio_wb32(pb, 0); /* size */
3499  ffio_wfourcc(pb, "tapt");
3500 
3501  avio_wb32(pb, 20);
3502  ffio_wfourcc(pb, "clef");
3503  avio_wb32(pb, 0);
3504  avio_wb32(pb, width << 16);
3505  avio_wb32(pb, track->par->height << 16);
3506 
3507  avio_wb32(pb, 20);
3508  ffio_wfourcc(pb, "prof");
3509  avio_wb32(pb, 0);
3510  avio_wb32(pb, width << 16);
3511  avio_wb32(pb, track->par->height << 16);
3512 
3513  avio_wb32(pb, 20);
3514  ffio_wfourcc(pb, "enof");
3515  avio_wb32(pb, 0);
3516  avio_wb32(pb, track->par->width << 16);
3517  avio_wb32(pb, track->par->height << 16);
3518 
3519  return update_size(pb, pos);
3520 }
3521 
3522 // This box is written in the following cases:
3523 // * Seems important for the psp playback. Without it the movie seems to hang.
3524 // * Used for specifying the looping behavior of animated AVIF (as specified
3525 // in Section 9.6 of the HEIF specification ISO/IEC 23008-12).
3526 static int mov_write_edts_tag(AVIOContext *pb, MOVMuxContext *mov,
3527  MOVTrack *track)
3528 {
3529  int64_t duration = av_rescale_rnd(calc_samples_pts_duration(mov, track),
3530  mov->movie_timescale, track->timescale,
3531  AV_ROUND_UP);
3532  int version = duration < INT32_MAX ? 0 : 1;
3533  int entry_size, entry_count, size;
3534  int64_t delay, start_ct = track->start_cts;
3535  int64_t start_dts = track->start_dts;
3536  int flags = 0;
3537 
3538  if (track->entry) {
3539  if (start_dts != track->cluster[0].dts || start_ct != track->cluster[0].cts) {
3540 
3541  av_log(mov->fc, AV_LOG_DEBUG,
3542  "EDTS using dts:%"PRId64" cts:%d instead of dts:%"PRId64" cts:%"PRId64" tid:%d\n",
3543  track->cluster[0].dts, track->cluster[0].cts,
3544  start_dts, start_ct, track->track_id);
3545  start_dts = track->cluster[0].dts;
3546  start_ct = track->cluster[0].cts;
3547  }
3548  }
3549 
3550  delay = av_rescale_rnd(start_dts + start_ct, mov->movie_timescale,
3551  track->timescale, AV_ROUND_DOWN);
3552 
3553  if (mov->mode == MODE_AVIF) {
3554  delay = 0;
3555  // Section 9.6.3 of ISO/IEC 23008-12: flags specifies repetition of the
3556  // edit list as follows: (flags & 1) equal to 0 specifies that the edit
3557  // list is not repeated, while (flags & 1) equal to 1 specifies that the
3558  // edit list is repeated.
3559  flags = mov->avif_loop_count != 1;
3560  start_ct = 0;
3561  }
3562 
3563  version |= delay < INT32_MAX ? 0 : 1;
3564 
3565  entry_size = (version == 1) ? 20 : 12;
3566  entry_count = 1 + (delay > 0);
3567  size = 24 + entry_count * entry_size;
3568 
3569  /* write the atom data */
3570  avio_wb32(pb, size);
3571  ffio_wfourcc(pb, "edts");
3572  avio_wb32(pb, size - 8);
3573  ffio_wfourcc(pb, "elst");
3574  avio_w8(pb, version);
3575  avio_wb24(pb, flags); /* flags */
3576 
3577  avio_wb32(pb, entry_count);
3578  if (delay > 0) { /* add an empty edit to delay presentation */
3579  /* In the positive delay case, the delay includes the cts
3580  * offset, and the second edit list entry below trims out
3581  * the same amount from the actual content. This makes sure
3582  * that the offset last sample is included in the edit
3583  * list duration as well. */
3584  if (version == 1) {
3585  avio_wb64(pb, delay);
3586  avio_wb64(pb, -1);
3587  } else {
3588  avio_wb32(pb, delay);
3589  avio_wb32(pb, -1);
3590  }
3591  avio_wb32(pb, 0x00010000);
3592  } else if (mov->mode != MODE_AVIF) {
3593  /* Avoid accidentally ending up with start_ct = -1 which has got a
3594  * special meaning. Normally start_ct should end up positive or zero
3595  * here, but use FFMIN in case dts is a small positive integer
3596  * rounded to 0 when represented in movie timescale units. */
3597  av_assert0(av_rescale_rnd(start_dts, mov->movie_timescale, track->timescale, AV_ROUND_DOWN) <= 0);
3598  start_ct = -FFMIN(start_dts, 0);
3599  /* Note, this delay is calculated from the pts of the first sample,
3600  * ensuring that we don't reduce the duration for cases with
3601  * dts<0 pts=0. */
3602  duration += delay;
3603  }
3604 
3605  /* For fragmented files, we don't know the full length yet. Setting
3606  * duration to 0 allows us to only specify the offset, including
3607  * the rest of the content (from all future fragments) without specifying
3608  * an explicit duration. */
3609  if (mov->flags & FF_MOV_FLAG_FRAGMENT)
3610  duration = 0;
3611 
3612  /* duration */
3613  if (version == 1) {
3614  avio_wb64(pb, duration);
3615  avio_wb64(pb, start_ct);
3616  } else {
3617  avio_wb32(pb, duration);
3618  avio_wb32(pb, start_ct);
3619  }
3620  avio_wb32(pb, 0x00010000);
3621  return size;
3622 }
3623 
3624 static int mov_write_tref_tag(AVIOContext *pb, MOVTrack *track)
3625 {
3626  avio_wb32(pb, 20); // size
3627  ffio_wfourcc(pb, "tref");
3628  avio_wb32(pb, 12); // size (subatom)
3629  avio_wl32(pb, track->tref_tag);
3630  avio_wb32(pb, track->tref_id);
3631  return 20;
3632 }
3633 
3634 // goes at the end of each track! ... Critical for PSP playback ("Incompatible data" without it)
3635 static int mov_write_uuid_tag_psp(AVIOContext *pb, MOVTrack *mov)
3636 {
3637  avio_wb32(pb, 0x34); /* size ... reports as 28 in mp4box! */
3638  ffio_wfourcc(pb, "uuid");
3639  ffio_wfourcc(pb, "USMT");
3640  avio_wb32(pb, 0x21d24fce);
3641  avio_wb32(pb, 0xbb88695c);
3642  avio_wb32(pb, 0xfac9c740);
3643  avio_wb32(pb, 0x1c); // another size here!
3644  ffio_wfourcc(pb, "MTDT");
3645  avio_wb32(pb, 0x00010012);
3646  avio_wb32(pb, 0x0a);
3647  avio_wb32(pb, 0x55c40000);
3648  avio_wb32(pb, 0x1);
3649  avio_wb32(pb, 0x0);
3650  return 0x34;
3651 }
3652 
3653 static int mov_write_udta_sdp(AVIOContext *pb, MOVTrack *track)
3654 {
3655  AVFormatContext *ctx = track->rtp_ctx;
3656  char buf[1000] = "";
3657  int len;
3658 
3659  ff_sdp_write_media(buf, sizeof(buf), ctx->streams[0], track->src_track,
3660  NULL, NULL, 0, 0, ctx);
3661  av_strlcatf(buf, sizeof(buf), "a=control:streamid=%d\r\n", track->track_id);
3662  len = strlen(buf);
3663 
3664  avio_wb32(pb, len + 24);
3665  ffio_wfourcc(pb, "udta");
3666  avio_wb32(pb, len + 16);
3667  ffio_wfourcc(pb, "hnti");
3668  avio_wb32(pb, len + 8);
3669  ffio_wfourcc(pb, "sdp ");
3670  avio_write(pb, buf, len);
3671  return len + 24;
3672 }
3673 
3674 static int mov_write_track_metadata(AVIOContext *pb, AVStream *st,
3675  const char *tag, const char *str)
3676 {
3677  int64_t pos = avio_tell(pb);
3678  AVDictionaryEntry *t = av_dict_get(st->metadata, str, NULL, 0);
3679  if (!t || !utf8len(t->value))
3680  return 0;
3681 
3682  avio_wb32(pb, 0); /* size */
3683  ffio_wfourcc(pb, tag); /* type */
3684  avio_write(pb, t->value, strlen(t->value)); /* UTF8 string value */
3685  return update_size(pb, pos);
3686 }
3687 
3688 static int mov_write_track_kind(AVIOContext *pb, const char *scheme_uri,
3689  const char *value)
3690 {
3691  int64_t pos = avio_tell(pb);
3692 
3693  /* Box|FullBox basics */
3694  avio_wb32(pb, 0); /* size placeholder */
3695  ffio_wfourcc(pb, (const unsigned char *)"kind");
3696  avio_w8(pb, 0); /* version = 0 */
3697  avio_wb24(pb, 0); /* flags = 0 */
3698 
3699  /* Required null-terminated scheme URI */
3700  avio_write(pb, (const unsigned char *)scheme_uri,
3701  strlen(scheme_uri));
3702  avio_w8(pb, 0);
3703 
3704  /* Optional value string */
3705  if (value && value[0])
3706  avio_write(pb, (const unsigned char *)value,
3707  strlen(value));
3708 
3709  avio_w8(pb, 0);
3710 
3711  return update_size(pb, pos);
3712 }
3713 
3714 static int mov_write_track_kinds(AVIOContext *pb, AVStream *st)
3715 {
3716  int ret = AVERROR_BUG;
3717 
3718  for (int i = 0; ff_mov_track_kind_table[i].scheme_uri; i++) {
3719  const struct MP4TrackKindMapping map = ff_mov_track_kind_table[i];
3720 
3721  for (int j = 0; map.value_maps[j].disposition; j++) {
3722  const struct MP4TrackKindValueMapping value_map = map.value_maps[j];
3723  if (!(st->disposition & value_map.disposition))
3724  continue;
3725 
3726  if ((ret = mov_write_track_kind(pb, map.scheme_uri, value_map.value)) < 0)
3727  return ret;
3728  }
3729  }
3730 
3731  return 0;
3732 }
3733 
3734 static int mov_write_track_udta_tag(AVIOContext *pb, MOVMuxContext *mov,
3735  AVStream *st)
3736 {
3737  AVIOContext *pb_buf;
3738  int ret, size;
3739  uint8_t *buf;
3740 
3741  if (!st)
3742  return 0;
3743 
3744  ret = avio_open_dyn_buf(&pb_buf);
3745  if (ret < 0)
3746  return ret;
3747 
3748  if (mov->mode & (MODE_MP4|MODE_MOV))
3749  mov_write_track_metadata(pb_buf, st, "name", "title");
3750 
3751  if (mov->mode & MODE_MP4) {
3752  if ((ret = mov_write_track_kinds(pb_buf, st)) < 0)
3753  return ret;
3754  }
3755 
3756  if ((size = avio_get_dyn_buf(pb_buf, &buf)) > 0) {
3757  avio_wb32(pb, size + 8);
3758  ffio_wfourcc(pb, "udta");
3759  avio_write(pb, buf, size);
3760  }
3761  ffio_free_dyn_buf(&pb_buf);
3762 
3763  return 0;
3764 }
3765 
3766 static int mov_write_trak_tag(AVFormatContext *s, AVIOContext *pb, MOVMuxContext *mov,
3767  MOVTrack *track, AVStream *st)
3768 {
3769  int64_t pos = avio_tell(pb);
3770  int entry_backup = track->entry;
3771  int chunk_backup = track->chunkCount;
3772  int ret;
3773 
3774  /* If we want to have an empty moov, but some samples already have been
3775  * buffered (delay_moov), pretend that no samples have been written yet. */
3776  if (mov->flags & FF_MOV_FLAG_EMPTY_MOOV)
3777  track->chunkCount = track->entry = 0;
3778 
3779  avio_wb32(pb, 0); /* size */
3780  ffio_wfourcc(pb, "trak");
3781  mov_write_tkhd_tag(pb, mov, track, st);
3782 
3783  av_assert2(mov->use_editlist >= 0);
3784 
3785  if (track->start_dts != AV_NOPTS_VALUE) {
3786  if (mov->use_editlist)
3787  mov_write_edts_tag(pb, mov, track); // PSP Movies and several other cases require edts box
3788  else if ((track->entry && track->cluster[0].dts) || track->mode == MODE_PSP || is_clcp_track(track))
3789  av_log(mov->fc, AV_LOG_WARNING,
3790  "Not writing any edit list even though one would have been required\n");
3791  }
3792 
3793  if (mov->is_animated_avif)
3794  mov_write_edts_tag(pb, mov, track);
3795 
3796  if (track->tref_tag)
3797  mov_write_tref_tag(pb, track);
3798 
3799  if ((ret = mov_write_mdia_tag(s, pb, mov, track)) < 0)
3800  return ret;
3801  if (track->mode == MODE_PSP)
3802  mov_write_uuid_tag_psp(pb, track); // PSP Movies require this uuid box
3803  if (track->tag == MKTAG('r','t','p',' '))
3804  mov_write_udta_sdp(pb, track);
3805  if (track->mode == MODE_MOV) {
3806  if (track->par->codec_type == AVMEDIA_TYPE_VIDEO) {
3807  double sample_aspect_ratio = av_q2d(st->sample_aspect_ratio);
3808  if (st->sample_aspect_ratio.num && 1.0 != sample_aspect_ratio) {
3809  mov_write_tapt_tag(pb, track);
3810  }
3811  }
3812  if (is_clcp_track(track) && st->sample_aspect_ratio.num) {
3813  mov_write_tapt_tag(pb, track);
3814  }
3815  }
3816  mov_write_track_udta_tag(pb, mov, st);
3817  track->entry = entry_backup;
3818  track->chunkCount = chunk_backup;
3819  return update_size(pb, pos);
3820 }
3821 
3822 static int mov_write_iods_tag(AVIOContext *pb, MOVMuxContext *mov)
3823 {
3824  int i, has_audio = 0, has_video = 0;
3825  int64_t pos = avio_tell(pb);
3826  int audio_profile = mov->iods_audio_profile;
3827  int video_profile = mov->iods_video_profile;
3828  for (i = 0; i < mov->nb_streams; i++) {
3829  if (mov->tracks[i].entry > 0 || mov->flags & FF_MOV_FLAG_EMPTY_MOOV) {
3830  has_audio |= mov->tracks[i].par->codec_type == AVMEDIA_TYPE_AUDIO;
3831  has_video |= mov->tracks[i].par->codec_type == AVMEDIA_TYPE_VIDEO;
3832  }
3833  }
3834  if (audio_profile < 0)
3835  audio_profile = 0xFF - has_audio;
3836  if (video_profile < 0)
3837  video_profile = 0xFF - has_video;
3838  avio_wb32(pb, 0x0); /* size */
3839  ffio_wfourcc(pb, "iods");
3840  avio_wb32(pb, 0); /* version & flags */
3841  put_descr(pb, 0x10, 7);
3842  avio_wb16(pb, 0x004f);
3843  avio_w8(pb, 0xff);
3844  avio_w8(pb, 0xff);
3845  avio_w8(pb, audio_profile);
3846  avio_w8(pb, video_profile);
3847  avio_w8(pb, 0xff);
3848  return update_size(pb, pos);
3849 }
3850 
3851 static int mov_write_trex_tag(AVIOContext *pb, MOVTrack *track)
3852 {
3853  avio_wb32(pb, 0x20); /* size */
3854  ffio_wfourcc(pb, "trex");
3855  avio_wb32(pb, 0); /* version & flags */
3856  avio_wb32(pb, track->track_id); /* track ID */
3857  avio_wb32(pb, 1); /* default sample description index */
3858  avio_wb32(pb, 0); /* default sample duration */
3859  avio_wb32(pb, 0); /* default sample size */
3860  avio_wb32(pb, 0); /* default sample flags */
3861  return 0;
3862 }
3863 
3864 static int mov_write_mvex_tag(AVIOContext *pb, MOVMuxContext *mov)
3865 {
3866  int64_t pos = avio_tell(pb);
3867  int i;
3868  avio_wb32(pb, 0x0); /* size */
3869  ffio_wfourcc(pb, "mvex");
3870  for (i = 0; i < mov->nb_streams; i++)
3871  mov_write_trex_tag(pb, &mov->tracks[i]);
3872  return update_size(pb, pos);
3873 }
3874 
3875 static int mov_write_mvhd_tag(AVIOContext *pb, MOVMuxContext *mov)
3876 {
3877  int max_track_id = 1, i;
3878  int64_t max_track_len = 0;
3879  int version;
3880  int timescale;
3881 
3882  for (i = 0; i < mov->nb_streams; i++) {
3883  if (mov->tracks[i].entry > 0 && mov->tracks[i].timescale) {
3884  int64_t max_track_len_temp = av_rescale_rnd(
3885  calc_pts_duration(mov, &mov->tracks[i]),
3886  mov->movie_timescale,
3887  mov->tracks[i].timescale,
3888  AV_ROUND_UP);
3889  if (max_track_len < max_track_len_temp)
3890  max_track_len = max_track_len_temp;
3891  if (max_track_id < mov->tracks[i].track_id)
3892  max_track_id = mov->tracks[i].track_id;
3893  }
3894  }
3895  /* If using delay_moov, make sure the output is the same as if no
3896  * samples had been written yet. */
3897  if (mov->flags & FF_MOV_FLAG_EMPTY_MOOV) {
3898  max_track_len = 0;
3899  max_track_id = 1;
3900  }
3901 
3902  version = mov_mdhd_mvhd_tkhd_version(mov, NULL, max_track_len);
3903  avio_wb32(pb, version == 1 ? 120 : 108); /* size */
3904 
3905  ffio_wfourcc(pb, "mvhd");
3906  avio_w8(pb, version);
3907  avio_wb24(pb, 0); /* flags */
3908  if (version == 1) {
3909  avio_wb64(pb, mov->time);
3910  avio_wb64(pb, mov->time);
3911  } else {
3912  avio_wb32(pb, mov->time); /* creation time */
3913  avio_wb32(pb, mov->time); /* modification time */
3914  }
3915 
3916  timescale = mov->movie_timescale;
3917  if (mov->mode == MODE_AVIF && !timescale)
3918  timescale = mov->tracks[0].timescale;
3919 
3920  avio_wb32(pb, timescale);
3921  (version == 1) ? avio_wb64(pb, max_track_len) : avio_wb32(pb, max_track_len); /* duration of longest track */
3922 
3923  avio_wb32(pb, 0x00010000); /* reserved (preferred rate) 1.0 = normal */
3924  avio_wb16(pb, 0x0100); /* reserved (preferred volume) 1.0 = normal */
3925  ffio_fill(pb, 0, 2 + 2 * 4); /* reserved */
3926 
3927  /* Matrix structure */
3928  write_matrix(pb, 1, 0, 0, 1, 0, 0);
3929 
3930  avio_wb32(pb, 0); /* reserved (preview time) */
3931  avio_wb32(pb, 0); /* reserved (preview duration) */
3932  avio_wb32(pb, 0); /* reserved (poster time) */
3933  avio_wb32(pb, 0); /* reserved (selection time) */
3934  avio_wb32(pb, 0); /* reserved (selection duration) */
3935  avio_wb32(pb, 0); /* reserved (current time) */
3936  avio_wb32(pb, max_track_id + 1); /* Next track id */
3937  return 0x6c;
3938 }
3939 
3940 static int mov_write_itunes_hdlr_tag(AVIOContext *pb, MOVMuxContext *mov,
3941  AVFormatContext *s)
3942 {
3943  avio_wb32(pb, 33); /* size */
3944  ffio_wfourcc(pb, "hdlr");
3945  avio_wb32(pb, 0);
3946  avio_wb32(pb, 0);
3947  ffio_wfourcc(pb, "mdir");
3948  ffio_wfourcc(pb, "appl");
3949  avio_wb32(pb, 0);
3950  avio_wb32(pb, 0);
3951  avio_w8(pb, 0);
3952  return 33;
3953 }
3954 
3955 /* helper function to write a data tag with the specified string as data */
3956 static int mov_write_string_data_tag(AVIOContext *pb, const char *data, int lang, int long_style)
3957 {
3958  size_t data_len = strlen(data);
3959  if (long_style) {
3960  int size = 16 + data_len;
3961  avio_wb32(pb, size); /* size */
3962  ffio_wfourcc(pb, "data");
3963  avio_wb32(pb, 1);
3964  avio_wb32(pb, 0);
3965  avio_write(pb, data, data_len);
3966  return size;
3967  } else {
3968  avio_wb16(pb, data_len); /* string length */
3969  if (!lang)
3970  lang = ff_mov_iso639_to_lang("und", 1);
3971  avio_wb16(pb, lang);
3972  avio_write(pb, data, data_len);
3973  return data_len + 4;
3974  }
3975 }
3976 
3977 static int mov_write_string_tag(AVIOContext *pb, const char *name,
3978  const char *value, int lang, int long_style)
3979 {
3980  int size = 0;
3981  if (value && value[0]) {
3982  int64_t pos = avio_tell(pb);
3983  avio_wb32(pb, 0); /* size */
3984  ffio_wfourcc(pb, name);
3985  mov_write_string_data_tag(pb, value, lang, long_style);
3986  size = update_size(pb, pos);
3987  }
3988  return size;
3989 }
3990 
3991 static AVDictionaryEntry *get_metadata_lang(AVFormatContext *s,
3992  const char *tag, int *lang)
3993 {
3994  int l, len, len2;
3995  AVDictionaryEntry *t, *t2 = NULL;
3996  char tag2[16];
3997 
3998  *lang = 0;
3999 
4000  if (!(t = av_dict_get(s->metadata, tag, NULL, 0)))
4001  return NULL;
4002 
4003  len = strlen(t->key);
4004  snprintf(tag2, sizeof(tag2), "%s-", tag);
4005  while ((t2 = av_dict_get(s->metadata, tag2, t2, AV_DICT_IGNORE_SUFFIX))) {
4006  len2 = strlen(t2->key);
4007  if (len2 == len + 4 && !strcmp(t->value, t2->value)
4008  && (l = ff_mov_iso639_to_lang(&t2->key[len2 - 3], 1)) >= 0) {
4009  *lang = l;
4010  return t;
4011  }
4012  }
4013  return t;
4014 }
4015 
4016 static int mov_write_string_metadata(AVFormatContext *s, AVIOContext *pb,
4017  const char *name, const char *tag,
4018  int long_style)
4019 {
4020  int lang;
4021  AVDictionaryEntry *t = get_metadata_lang(s, tag, &lang);
4022  if (!t)
4023  return 0;
4024  return mov_write_string_tag(pb, name, t->value, lang, long_style);
4025 }
4026 
4027 /* iTunes bpm number */
4028 static int mov_write_tmpo_tag(AVIOContext *pb, AVFormatContext *s)
4029 {
4030  AVDictionaryEntry *t = av_dict_get(s->metadata, "tmpo", NULL, 0);
4031  int size = 0, tmpo = t ? atoi(t->value) : 0;
4032  if (tmpo) {
4033  size = 26;
4034  avio_wb32(pb, size);
4035  ffio_wfourcc(pb, "tmpo");
4036  avio_wb32(pb, size-8); /* size */
4037  ffio_wfourcc(pb, "data");
4038  avio_wb32(pb, 0x15); //type specifier
4039  avio_wb32(pb, 0);
4040  avio_wb16(pb, tmpo); // data
4041  }
4042  return size;
4043 }
4044 
4045 /* 3GPP TS 26.244 */
4046 static int mov_write_loci_tag(AVFormatContext *s, AVIOContext *pb)
4047 {
4048  int lang;
4049  int64_t pos = avio_tell(pb);
4050  double latitude, longitude, altitude;
4051  int32_t latitude_fix, longitude_fix, altitude_fix;
4052  AVDictionaryEntry *t = get_metadata_lang(s, "location", &lang);
4053  const char *ptr, *place = "";
4054  char *end;
4055  static const char *astronomical_body = "earth";
4056  if (!t)
4057  return 0;
4058 
4059  ptr = t->value;
4060  latitude = strtod(ptr, &end);
4061  if (end == ptr) {
4062  av_log(s, AV_LOG_WARNING, "malformed location metadata\n");
4063  return 0;
4064  }
4065  ptr = end;
4066  longitude = strtod(ptr, &end);
4067  if (end == ptr) {
4068  av_log(s, AV_LOG_WARNING, "malformed location metadata\n");
4069  return 0;
4070  }
4071  ptr = end;
4072  altitude = strtod(ptr, &end);
4073  /* If no altitude was present, the default 0 should be fine */
4074  if (*end == '/')
4075  place = end + 1;
4076 
4077  latitude_fix = (int32_t) ((1 << 16) * latitude);
4078  longitude_fix = (int32_t) ((1 << 16) * longitude);
4079  altitude_fix = (int32_t) ((1 << 16) * altitude);
4080 
4081  avio_wb32(pb, 0); /* size */
4082  ffio_wfourcc(pb, "loci"); /* type */
4083  avio_wb32(pb, 0); /* version + flags */
4084  avio_wb16(pb, lang);
4085  avio_write(pb, place, strlen(place) + 1);
4086  avio_w8(pb, 0); /* role of place (0 == shooting location, 1 == real location, 2 == fictional location) */
4087  avio_wb32(pb, longitude_fix);
4088  avio_wb32(pb, latitude_fix);
4089  avio_wb32(pb, altitude_fix);
4090  avio_write(pb, astronomical_body, strlen(astronomical_body) + 1);
4091  avio_w8(pb, 0); /* additional notes, null terminated string */
4092 
4093  return update_size(pb, pos);
4094 }
4095 
4096 /* iTunes track or disc number */
4097 static int mov_write_trkn_tag(AVIOContext *pb, MOVMuxContext *mov,
4098  AVFormatContext *s, int disc)
4099 {
4100  AVDictionaryEntry *t = av_dict_get(s->metadata,
4101  disc ? "disc" : "track",
4102  NULL, 0);
4103  int size = 0, track = t ? atoi(t->value) : 0;
4104  if (track) {
4105  int tracks = 0;
4106  char *slash = strchr(t->value, '/');
4107  if (slash)
4108  tracks = atoi(slash + 1);
4109  avio_wb32(pb, 32); /* size */
4110  ffio_wfourcc(pb, disc ? "disk" : "trkn");
4111  avio_wb32(pb, 24); /* size */
4112  ffio_wfourcc(pb, "data");
4113  avio_wb32(pb, 0); // 8 bytes empty
4114  avio_wb32(pb, 0);
4115  avio_wb16(pb, 0); // empty
4116  avio_wb16(pb, track); // track / disc number
4117  avio_wb16(pb, tracks); // total track / disc number
4118  avio_wb16(pb, 0); // empty
4119  size = 32;
4120  }
4121  return size;
4122 }
4123 
4124 static int mov_write_int8_metadata(AVFormatContext *s, AVIOContext *pb,
4125  const char *name, const char *tag,
4126  int len)
4127 {
4128  AVDictionaryEntry *t = NULL;
4129  uint8_t num;
4130  int size = 24 + len;
4131 
4132  if (len != 1 && len != 4)
4133  return -1;
4134 
4135  if (!(t = av_dict_get(s->metadata, tag, NULL, 0)))
4136  return 0;
4137  num = atoi(t->value);
4138 
4139  avio_wb32(pb, size);
4140  ffio_wfourcc(pb, name);
4141  avio_wb32(pb, size - 8);
4142  ffio_wfourcc(pb, "data");
4143  avio_wb32(pb, 0x15);
4144  avio_wb32(pb, 0);
4145  if (len==4) avio_wb32(pb, num);
4146  else avio_w8 (pb, num);
4147 
4148  return size;
4149 }
4150 
4151 static int mov_write_covr(AVIOContext *pb, AVFormatContext *s)
4152 {
4153  MOVMuxContext *mov = s->priv_data;
4154  int64_t pos = 0;
4155  int i;
4156 
4157  for (i = 0; i < s->nb_streams; i++) {
4158  MOVTrack *trk = &mov->tracks[i];
4159 
4160  if (!is_cover_image(trk->st) || trk->cover_image->size <= 0)
4161  continue;
4162 
4163  if (!pos) {
4164  pos = avio_tell(pb);
4165  avio_wb32(pb, 0);
4166  ffio_wfourcc(pb, "covr");
4167  }
4168  avio_wb32(pb, 16 + trk->cover_image->size);
4169  ffio_wfourcc(pb, "data");
4170  avio_wb32(pb, trk->tag);
4171  avio_wb32(pb , 0);
4172  avio_write(pb, trk->cover_image->data, trk->cover_image->size);
4173  }
4174 
4175  return pos ? update_size(pb, pos) : 0;
4176 }
4177 
4178 /* iTunes meta data list */
4179 static int mov_write_ilst_tag(AVIOContext *pb, MOVMuxContext *mov,
4180  AVFormatContext *s)
4181 {
4182  int64_t pos = avio_tell(pb);
4183  avio_wb32(pb, 0); /* size */
4184  ffio_wfourcc(pb, "ilst");
4185  mov_write_string_metadata(s, pb, "\251nam", "title" , 1);
4186  mov_write_string_metadata(s, pb, "\251ART", "artist" , 1);
4187  mov_write_string_metadata(s, pb, "aART", "album_artist", 1);
4188  mov_write_string_metadata(s, pb, "\251wrt", "composer" , 1);
4189  mov_write_string_metadata(s, pb, "\251alb", "album" , 1);
4190  mov_write_string_metadata(s, pb, "\251day", "date" , 1);
4191  if (!mov_write_string_metadata(s, pb, "\251too", "encoding_tool", 1)) {
4192  if (!(s->flags & AVFMT_FLAG_BITEXACT))
4193  mov_write_string_tag(pb, "\251too", LIBAVFORMAT_IDENT, 0, 1);
4194  }
4195  mov_write_string_metadata(s, pb, "\251cmt", "comment" , 1);
4196  mov_write_string_metadata(s, pb, "\251gen", "genre" , 1);
4197  mov_write_string_metadata(s, pb, "cprt", "copyright", 1);
4198  mov_write_string_metadata(s, pb, "\251grp", "grouping" , 1);
4199  mov_write_string_metadata(s, pb, "\251lyr", "lyrics" , 1);
4200  mov_write_string_metadata(s, pb, "desc", "description",1);
4201  mov_write_string_metadata(s, pb, "ldes", "synopsis" , 1);
4202  mov_write_string_metadata(s, pb, "tvsh", "show" , 1);
4203  mov_write_string_metadata(s, pb, "tven", "episode_id",1);
4204  mov_write_string_metadata(s, pb, "tvnn", "network" , 1);
4205  mov_write_string_metadata(s, pb, "keyw", "keywords" , 1);
4206  mov_write_int8_metadata (s, pb, "tves", "episode_sort",4);
4207  mov_write_int8_metadata (s, pb, "tvsn", "season_number",4);
4208  mov_write_int8_metadata (s, pb, "stik", "media_type",1);
4209  mov_write_int8_metadata (s, pb, "hdvd", "hd_video", 1);
4210  mov_write_int8_metadata (s, pb, "pgap", "gapless_playback",1);
4211  mov_write_int8_metadata (s, pb, "cpil", "compilation", 1);
4212  mov_write_covr(pb, s);
4213  mov_write_trkn_tag(pb, mov, s, 0); // track number
4214  mov_write_trkn_tag(pb, mov, s, 1); // disc number
4215  mov_write_tmpo_tag(pb, s);
4216  return update_size(pb, pos);
4217 }
4218 
4219 static int mov_write_mdta_hdlr_tag(AVIOContext *pb, MOVMuxContext *mov,
4220  AVFormatContext *s)
4221 {