You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1953 lines
72KB

  1. /*
  2. * MXF demuxer.
  3. * Copyright (c) 2006 SmartJog S.A., Baptiste Coudurier <baptiste dot coudurier at smartjog dot com>
  4. *
  5. * This file is part of FFmpeg.
  6. *
  7. * FFmpeg is free software; you can redistribute it and/or
  8. * modify it under the terms of the GNU Lesser General Public
  9. * License as published by the Free Software Foundation; either
  10. * version 2.1 of the License, or (at your option) any later version.
  11. *
  12. * FFmpeg is distributed in the hope that it will be useful,
  13. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15. * Lesser General Public License for more details.
  16. *
  17. * You should have received a copy of the GNU Lesser General Public
  18. * License along with FFmpeg; if not, write to the Free Software
  19. * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20. */
  21. /*
  22. * References
  23. * SMPTE 336M KLV Data Encoding Protocol Using Key-Length-Value
  24. * SMPTE 377M MXF File Format Specifications
  25. * SMPTE 378M Operational Pattern 1a
  26. * SMPTE 379M MXF Generic Container
  27. * SMPTE 381M Mapping MPEG Streams into the MXF Generic Container
  28. * SMPTE 382M Mapping AES3 and Broadcast Wave Audio into the MXF Generic Container
  29. * SMPTE 383M Mapping DV-DIF Data to the MXF Generic Container
  30. *
  31. * Principle
  32. * Search for Track numbers which will identify essence element KLV packets.
  33. * Search for SourcePackage which define tracks which contains Track numbers.
  34. * Material Package contains tracks with reference to SourcePackage tracks.
  35. * Search for Descriptors (Picture, Sound) which contains codec info and parameters.
  36. * Assign Descriptors to correct Tracks.
  37. *
  38. * Metadata reading functions read Local Tags, get InstanceUID(0x3C0A) then add MetaDataSet to MXFContext.
  39. * Metadata parsing resolves Strong References to objects.
  40. *
  41. * Simple demuxer, only OP1A supported and some files might not work at all.
  42. * Only tracks with associated descriptors will be decoded. "Highly Desirable" SMPTE 377M D.1
  43. */
  44. //#define DEBUG
  45. #include "libavutil/aes.h"
  46. #include "libavutil/mathematics.h"
  47. #include "libavcodec/bytestream.h"
  48. #include "avformat.h"
  49. #include "internal.h"
  50. #include "mxf.h"
  51. typedef enum {
  52. Header,
  53. BodyPartition,
  54. Footer
  55. } MXFPartitionType;
  56. typedef enum {
  57. OP1a,
  58. OP1b,
  59. OP1c,
  60. OP2a,
  61. OP2b,
  62. OP2c,
  63. OP3a,
  64. OP3b,
  65. OP3c,
  66. OPAtom,
  67. OPSONYOpt, /* FATE sample, violates the spec in places */
  68. } MXFOP;
  69. typedef struct {
  70. int closed;
  71. int complete;
  72. MXFPartitionType type;
  73. uint64_t previous_partition;
  74. int index_sid;
  75. int body_sid;
  76. int64_t this_partition;
  77. int64_t essence_offset; /* absolute offset of essence */
  78. int64_t essence_length;
  79. int32_t kag_size;
  80. int64_t header_byte_count;
  81. int64_t index_byte_count;
  82. int pack_length;
  83. } MXFPartition;
  84. typedef struct {
  85. UID uid;
  86. enum MXFMetadataSetType type;
  87. UID source_container_ul;
  88. } MXFCryptoContext;
  89. typedef struct {
  90. UID uid;
  91. enum MXFMetadataSetType type;
  92. UID source_package_uid;
  93. UID data_definition_ul;
  94. int64_t duration;
  95. int64_t start_position;
  96. int source_track_id;
  97. } MXFStructuralComponent;
  98. typedef struct {
  99. UID uid;
  100. enum MXFMetadataSetType type;
  101. UID data_definition_ul;
  102. UID *structural_components_refs;
  103. int structural_components_count;
  104. int64_t duration;
  105. } MXFSequence;
  106. typedef struct {
  107. UID uid;
  108. enum MXFMetadataSetType type;
  109. MXFSequence *sequence; /* mandatory, and only one */
  110. UID sequence_ref;
  111. int track_id;
  112. uint8_t track_number[4];
  113. AVRational edit_rate;
  114. } MXFTrack;
  115. typedef struct {
  116. UID uid;
  117. enum MXFMetadataSetType type;
  118. UID essence_container_ul;
  119. UID essence_codec_ul;
  120. AVRational sample_rate;
  121. AVRational aspect_ratio;
  122. int width;
  123. int height;
  124. int channels;
  125. int bits_per_sample;
  126. UID *sub_descriptors_refs;
  127. int sub_descriptors_count;
  128. int linked_track_id;
  129. uint8_t *extradata;
  130. int extradata_size;
  131. enum PixelFormat pix_fmt;
  132. } MXFDescriptor;
  133. typedef struct {
  134. UID uid;
  135. enum MXFMetadataSetType type;
  136. int edit_unit_byte_count;
  137. int index_sid;
  138. int body_sid;
  139. AVRational index_edit_rate;
  140. uint64_t index_start_position;
  141. uint64_t index_duration;
  142. int8_t *temporal_offset_entries;
  143. int *flag_entries;
  144. uint64_t *stream_offset_entries;
  145. int nb_index_entries;
  146. } MXFIndexTableSegment;
  147. typedef struct {
  148. UID uid;
  149. enum MXFMetadataSetType type;
  150. UID package_uid;
  151. UID *tracks_refs;
  152. int tracks_count;
  153. MXFDescriptor *descriptor; /* only one */
  154. UID descriptor_ref;
  155. } MXFPackage;
  156. typedef struct {
  157. UID uid;
  158. enum MXFMetadataSetType type;
  159. } MXFMetadataSet;
  160. /* decoded index table */
  161. typedef struct {
  162. int index_sid;
  163. int body_sid;
  164. int nb_ptses; /* number of PTSes or total duration of index */
  165. int64_t first_dts; /* DTS = EditUnit + first_dts */
  166. int64_t *ptses; /* maps EditUnit -> PTS */
  167. int nb_segments;
  168. MXFIndexTableSegment **segments; /* sorted by IndexStartPosition */
  169. AVIndexEntry *fake_index; /* used for calling ff_index_search_timestamp() */
  170. } MXFIndexTable;
  171. typedef struct {
  172. MXFPartition *partitions;
  173. unsigned partitions_count;
  174. MXFOP op;
  175. UID *packages_refs;
  176. int packages_count;
  177. MXFMetadataSet **metadata_sets;
  178. int metadata_sets_count;
  179. AVFormatContext *fc;
  180. struct AVAES *aesc;
  181. uint8_t *local_tags;
  182. int local_tags_count;
  183. uint64_t footer_partition;
  184. KLVPacket current_klv_data;
  185. int current_klv_index;
  186. int run_in;
  187. MXFPartition *current_partition;
  188. int parsing_backward;
  189. int64_t last_forward_tell;
  190. int last_forward_partition;
  191. int current_edit_unit;
  192. int nb_index_tables;
  193. MXFIndexTable *index_tables;
  194. } MXFContext;
  195. enum MXFWrappingScheme {
  196. Frame,
  197. Clip,
  198. };
  199. /* NOTE: klv_offset is not set (-1) for local keys */
  200. typedef int MXFMetadataReadFunc(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset);
  201. typedef struct {
  202. const UID key;
  203. MXFMetadataReadFunc *read;
  204. int ctx_size;
  205. enum MXFMetadataSetType type;
  206. } MXFMetadataReadTableEntry;
  207. /* partial keys to match */
  208. static const uint8_t mxf_header_partition_pack_key[] = { 0x06,0x0e,0x2b,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x02 };
  209. static const uint8_t mxf_essence_element_key[] = { 0x06,0x0e,0x2b,0x34,0x01,0x02,0x01,0x01,0x0d,0x01,0x03,0x01 };
  210. static const uint8_t mxf_avid_essence_element_key[] = { 0x06,0x0e,0x2b,0x34,0x01,0x02,0x01,0x01,0x0e,0x04,0x03,0x01 };
  211. static const uint8_t mxf_system_item_key[] = { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0D,0x01,0x03,0x01,0x04 };
  212. static const uint8_t mxf_klv_key[] = { 0x06,0x0e,0x2b,0x34 };
  213. /* complete keys to match */
  214. static const uint8_t mxf_crypto_source_container_ul[] = { 0x06,0x0e,0x2b,0x34,0x01,0x01,0x01,0x09,0x06,0x01,0x01,0x02,0x02,0x00,0x00,0x00 };
  215. static const uint8_t mxf_encrypted_triplet_key[] = { 0x06,0x0e,0x2b,0x34,0x02,0x04,0x01,0x07,0x0d,0x01,0x03,0x01,0x02,0x7e,0x01,0x00 };
  216. static const uint8_t mxf_encrypted_essence_container[] = { 0x06,0x0e,0x2b,0x34,0x04,0x01,0x01,0x07,0x0d,0x01,0x03,0x01,0x02,0x0b,0x01,0x00 };
  217. static const uint8_t mxf_sony_mpeg4_extradata[] = { 0x06,0x0e,0x2b,0x34,0x04,0x01,0x01,0x01,0x0e,0x06,0x06,0x02,0x02,0x01,0x00,0x00 };
  218. #define IS_KLV_KEY(x, y) (!memcmp(x, y, sizeof(y)))
  219. static int64_t klv_decode_ber_length(AVIOContext *pb)
  220. {
  221. uint64_t size = avio_r8(pb);
  222. if (size & 0x80) { /* long form */
  223. int bytes_num = size & 0x7f;
  224. /* SMPTE 379M 5.3.4 guarantee that bytes_num must not exceed 8 bytes */
  225. if (bytes_num > 8)
  226. return -1;
  227. size = 0;
  228. while (bytes_num--)
  229. size = size << 8 | avio_r8(pb);
  230. }
  231. return size;
  232. }
  233. static int mxf_read_sync(AVIOContext *pb, const uint8_t *key, unsigned size)
  234. {
  235. int i, b;
  236. for (i = 0; i < size && !url_feof(pb); i++) {
  237. b = avio_r8(pb);
  238. if (b == key[0])
  239. i = 0;
  240. else if (b != key[i])
  241. i = -1;
  242. }
  243. return i == size;
  244. }
  245. static int klv_read_packet(KLVPacket *klv, AVIOContext *pb)
  246. {
  247. if (!mxf_read_sync(pb, mxf_klv_key, 4))
  248. return -1;
  249. klv->offset = avio_tell(pb) - 4;
  250. memcpy(klv->key, mxf_klv_key, 4);
  251. avio_read(pb, klv->key + 4, 12);
  252. klv->length = klv_decode_ber_length(pb);
  253. return klv->length == -1 ? -1 : 0;
  254. }
  255. static int mxf_get_stream_index(AVFormatContext *s, KLVPacket *klv)
  256. {
  257. int i;
  258. for (i = 0; i < s->nb_streams; i++) {
  259. MXFTrack *track = s->streams[i]->priv_data;
  260. /* SMPTE 379M 7.3 */
  261. if (!memcmp(klv->key + sizeof(mxf_essence_element_key), track->track_number, sizeof(track->track_number)))
  262. return i;
  263. }
  264. /* return 0 if only one stream, for OP Atom files with 0 as track number */
  265. return s->nb_streams == 1 ? 0 : -1;
  266. }
  267. /* XXX: use AVBitStreamFilter */
  268. static int mxf_get_d10_aes3_packet(AVIOContext *pb, AVStream *st, AVPacket *pkt, int64_t length)
  269. {
  270. const uint8_t *buf_ptr, *end_ptr;
  271. uint8_t *data_ptr;
  272. int i;
  273. if (length > 61444) /* worst case PAL 1920 samples 8 channels */
  274. return -1;
  275. length = av_get_packet(pb, pkt, length);
  276. if (length < 0)
  277. return length;
  278. data_ptr = pkt->data;
  279. end_ptr = pkt->data + length;
  280. buf_ptr = pkt->data + 4; /* skip SMPTE 331M header */
  281. for (; buf_ptr + st->codec->channels*4 < end_ptr; ) {
  282. for (i = 0; i < st->codec->channels; i++) {
  283. uint32_t sample = bytestream_get_le32(&buf_ptr);
  284. if (st->codec->bits_per_coded_sample == 24)
  285. bytestream_put_le24(&data_ptr, (sample >> 4) & 0xffffff);
  286. else
  287. bytestream_put_le16(&data_ptr, (sample >> 12) & 0xffff);
  288. }
  289. buf_ptr += 32 - st->codec->channels*4; // always 8 channels stored SMPTE 331M
  290. }
  291. av_shrink_packet(pkt, data_ptr - pkt->data);
  292. return 0;
  293. }
  294. static int mxf_decrypt_triplet(AVFormatContext *s, AVPacket *pkt, KLVPacket *klv)
  295. {
  296. static const uint8_t checkv[16] = {0x43, 0x48, 0x55, 0x4b, 0x43, 0x48, 0x55, 0x4b, 0x43, 0x48, 0x55, 0x4b, 0x43, 0x48, 0x55, 0x4b};
  297. MXFContext *mxf = s->priv_data;
  298. AVIOContext *pb = s->pb;
  299. int64_t end = avio_tell(pb) + klv->length;
  300. int64_t size;
  301. uint64_t orig_size;
  302. uint64_t plaintext_size;
  303. uint8_t ivec[16];
  304. uint8_t tmpbuf[16];
  305. int index;
  306. if (!mxf->aesc && s->key && s->keylen == 16) {
  307. mxf->aesc = av_malloc(av_aes_size);
  308. if (!mxf->aesc)
  309. return -1;
  310. av_aes_init(mxf->aesc, s->key, 128, 1);
  311. }
  312. // crypto context
  313. avio_skip(pb, klv_decode_ber_length(pb));
  314. // plaintext offset
  315. klv_decode_ber_length(pb);
  316. plaintext_size = avio_rb64(pb);
  317. // source klv key
  318. klv_decode_ber_length(pb);
  319. avio_read(pb, klv->key, 16);
  320. if (!IS_KLV_KEY(klv, mxf_essence_element_key))
  321. return -1;
  322. index = mxf_get_stream_index(s, klv);
  323. if (index < 0)
  324. return -1;
  325. // source size
  326. klv_decode_ber_length(pb);
  327. orig_size = avio_rb64(pb);
  328. if (orig_size < plaintext_size)
  329. return -1;
  330. // enc. code
  331. size = klv_decode_ber_length(pb);
  332. if (size < 32 || size - 32 < orig_size)
  333. return -1;
  334. avio_read(pb, ivec, 16);
  335. avio_read(pb, tmpbuf, 16);
  336. if (mxf->aesc)
  337. av_aes_crypt(mxf->aesc, tmpbuf, tmpbuf, 1, ivec, 1);
  338. if (memcmp(tmpbuf, checkv, 16))
  339. av_log(s, AV_LOG_ERROR, "probably incorrect decryption key\n");
  340. size -= 32;
  341. size = av_get_packet(pb, pkt, size);
  342. if (size < 0)
  343. return size;
  344. else if (size < plaintext_size)
  345. return AVERROR_INVALIDDATA;
  346. size -= plaintext_size;
  347. if (mxf->aesc)
  348. av_aes_crypt(mxf->aesc, &pkt->data[plaintext_size],
  349. &pkt->data[plaintext_size], size >> 4, ivec, 1);
  350. av_shrink_packet(pkt, orig_size);
  351. pkt->stream_index = index;
  352. avio_skip(pb, end - avio_tell(pb));
  353. return 0;
  354. }
  355. static int mxf_read_primer_pack(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  356. {
  357. MXFContext *mxf = arg;
  358. int item_num = avio_rb32(pb);
  359. int item_len = avio_rb32(pb);
  360. if (item_len != 18) {
  361. av_log(mxf->fc, AV_LOG_ERROR, "unsupported primer pack item length\n");
  362. return -1;
  363. }
  364. if (item_num > UINT_MAX / item_len)
  365. return -1;
  366. mxf->local_tags_count = item_num;
  367. mxf->local_tags = av_malloc(item_num*item_len);
  368. if (!mxf->local_tags)
  369. return -1;
  370. avio_read(pb, mxf->local_tags, item_num*item_len);
  371. return 0;
  372. }
  373. static int mxf_read_partition_pack(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  374. {
  375. MXFContext *mxf = arg;
  376. MXFPartition *partition;
  377. UID op;
  378. uint64_t footer_partition;
  379. if (mxf->partitions_count+1 >= UINT_MAX / sizeof(*mxf->partitions))
  380. return AVERROR(ENOMEM);
  381. mxf->partitions = av_realloc(mxf->partitions, (mxf->partitions_count + 1) * sizeof(*mxf->partitions));
  382. if (!mxf->partitions)
  383. return AVERROR(ENOMEM);
  384. if (mxf->parsing_backward) {
  385. /* insert the new partition pack in the middle
  386. * this makes the entries in mxf->partitions sorted by offset */
  387. memmove(&mxf->partitions[mxf->last_forward_partition+1],
  388. &mxf->partitions[mxf->last_forward_partition],
  389. (mxf->partitions_count - mxf->last_forward_partition)*sizeof(*mxf->partitions));
  390. partition = mxf->current_partition = &mxf->partitions[mxf->last_forward_partition];
  391. } else {
  392. mxf->last_forward_partition++;
  393. partition = mxf->current_partition = &mxf->partitions[mxf->partitions_count];
  394. }
  395. memset(partition, 0, sizeof(*partition));
  396. mxf->partitions_count++;
  397. partition->pack_length = avio_tell(pb) - klv_offset + size;
  398. switch(uid[13]) {
  399. case 2:
  400. partition->type = Header;
  401. break;
  402. case 3:
  403. partition->type = BodyPartition;
  404. break;
  405. case 4:
  406. partition->type = Footer;
  407. break;
  408. default:
  409. av_log(mxf->fc, AV_LOG_ERROR, "unknown partition type %i\n", uid[13]);
  410. return AVERROR_INVALIDDATA;
  411. }
  412. /* consider both footers to be closed (there is only Footer and CompleteFooter) */
  413. partition->closed = partition->type == Footer || !(uid[14] & 1);
  414. partition->complete = uid[14] > 2;
  415. avio_skip(pb, 4);
  416. partition->kag_size = avio_rb32(pb);
  417. partition->this_partition = avio_rb64(pb);
  418. partition->previous_partition = avio_rb64(pb);
  419. footer_partition = avio_rb64(pb);
  420. partition->header_byte_count = avio_rb64(pb);
  421. partition->index_byte_count = avio_rb64(pb);
  422. partition->index_sid = avio_rb32(pb);
  423. avio_skip(pb, 8);
  424. partition->body_sid = avio_rb32(pb);
  425. avio_read(pb, op, sizeof(UID));
  426. /* some files don'thave FooterPartition set in every partition */
  427. if (footer_partition) {
  428. if (mxf->footer_partition && mxf->footer_partition != footer_partition) {
  429. av_log(mxf->fc, AV_LOG_ERROR, "inconsistent FooterPartition value: %li != %li\n",
  430. mxf->footer_partition, footer_partition);
  431. } else {
  432. mxf->footer_partition = footer_partition;
  433. }
  434. }
  435. av_dlog(mxf->fc, "PartitionPack: ThisPartition = 0x%lx, PreviousPartition = 0x%lx, "
  436. "FooterPartition = 0x%lx, IndexSID = %i, BodySID = %i\n",
  437. partition->this_partition,
  438. partition->previous_partition, footer_partition,
  439. partition->index_sid, partition->body_sid);
  440. if (op[12] == 1 && op[13] == 1) mxf->op = OP1a;
  441. else if (op[12] == 1 && op[13] == 2) mxf->op = OP1b;
  442. else if (op[12] == 1 && op[13] == 3) mxf->op = OP1c;
  443. else if (op[12] == 2 && op[13] == 1) mxf->op = OP2a;
  444. else if (op[12] == 2 && op[13] == 2) mxf->op = OP2b;
  445. else if (op[12] == 2 && op[13] == 3) mxf->op = OP2c;
  446. else if (op[12] == 3 && op[13] == 1) mxf->op = OP3a;
  447. else if (op[12] == 3 && op[13] == 2) mxf->op = OP3b;
  448. else if (op[12] == 3 && op[13] == 3) mxf->op = OP3c;
  449. else if (op[12] == 0x10) mxf->op = OPAtom;
  450. else if (op[12] == 64&& op[13] == 1) mxf->op = OPSONYOpt;
  451. else {
  452. av_log(mxf->fc, AV_LOG_ERROR, "unknown operational pattern: %02xh %02xh - guessing OP1a\n", op[12], op[13]);
  453. mxf->op = OP1a;
  454. }
  455. if (partition->kag_size <= 0 || partition->kag_size > (1 << 20)) {
  456. av_log(mxf->fc, AV_LOG_WARNING, "invalid KAGSize %i - guessing ", partition->kag_size);
  457. if (mxf->op == OPSONYOpt)
  458. partition->kag_size = 512;
  459. else
  460. partition->kag_size = 1;
  461. av_log(mxf->fc, AV_LOG_WARNING, "%i\n", partition->kag_size);
  462. }
  463. return 0;
  464. }
  465. static int mxf_add_metadata_set(MXFContext *mxf, void *metadata_set)
  466. {
  467. if (mxf->metadata_sets_count+1 >= UINT_MAX / sizeof(*mxf->metadata_sets))
  468. return AVERROR(ENOMEM);
  469. mxf->metadata_sets = av_realloc(mxf->metadata_sets, (mxf->metadata_sets_count + 1) * sizeof(*mxf->metadata_sets));
  470. if (!mxf->metadata_sets)
  471. return -1;
  472. mxf->metadata_sets[mxf->metadata_sets_count] = metadata_set;
  473. mxf->metadata_sets_count++;
  474. return 0;
  475. }
  476. static int mxf_read_cryptographic_context(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  477. {
  478. MXFCryptoContext *cryptocontext = arg;
  479. if (size != 16)
  480. return -1;
  481. if (IS_KLV_KEY(uid, mxf_crypto_source_container_ul))
  482. avio_read(pb, cryptocontext->source_container_ul, 16);
  483. return 0;
  484. }
  485. static int mxf_read_content_storage(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  486. {
  487. MXFContext *mxf = arg;
  488. switch (tag) {
  489. case 0x1901:
  490. mxf->packages_count = avio_rb32(pb);
  491. if (mxf->packages_count >= UINT_MAX / sizeof(UID))
  492. return -1;
  493. mxf->packages_refs = av_malloc(mxf->packages_count * sizeof(UID));
  494. if (!mxf->packages_refs)
  495. return -1;
  496. avio_skip(pb, 4); /* useless size of objects, always 16 according to specs */
  497. avio_read(pb, (uint8_t *)mxf->packages_refs, mxf->packages_count * sizeof(UID));
  498. break;
  499. }
  500. return 0;
  501. }
  502. static int mxf_read_source_clip(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  503. {
  504. MXFStructuralComponent *source_clip = arg;
  505. switch(tag) {
  506. case 0x0202:
  507. source_clip->duration = avio_rb64(pb);
  508. break;
  509. case 0x1201:
  510. source_clip->start_position = avio_rb64(pb);
  511. break;
  512. case 0x1101:
  513. /* UMID, only get last 16 bytes */
  514. avio_skip(pb, 16);
  515. avio_read(pb, source_clip->source_package_uid, 16);
  516. break;
  517. case 0x1102:
  518. source_clip->source_track_id = avio_rb32(pb);
  519. break;
  520. }
  521. return 0;
  522. }
  523. static int mxf_read_material_package(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  524. {
  525. MXFPackage *package = arg;
  526. switch(tag) {
  527. case 0x4403:
  528. package->tracks_count = avio_rb32(pb);
  529. if (package->tracks_count >= UINT_MAX / sizeof(UID))
  530. return -1;
  531. package->tracks_refs = av_malloc(package->tracks_count * sizeof(UID));
  532. if (!package->tracks_refs)
  533. return -1;
  534. avio_skip(pb, 4); /* useless size of objects, always 16 according to specs */
  535. avio_read(pb, (uint8_t *)package->tracks_refs, package->tracks_count * sizeof(UID));
  536. break;
  537. }
  538. return 0;
  539. }
  540. static int mxf_read_track(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  541. {
  542. MXFTrack *track = arg;
  543. switch(tag) {
  544. case 0x4801:
  545. track->track_id = avio_rb32(pb);
  546. break;
  547. case 0x4804:
  548. avio_read(pb, track->track_number, 4);
  549. break;
  550. case 0x4B01:
  551. track->edit_rate.den = avio_rb32(pb);
  552. track->edit_rate.num = avio_rb32(pb);
  553. break;
  554. case 0x4803:
  555. avio_read(pb, track->sequence_ref, 16);
  556. break;
  557. }
  558. return 0;
  559. }
  560. static int mxf_read_sequence(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  561. {
  562. MXFSequence *sequence = arg;
  563. switch(tag) {
  564. case 0x0202:
  565. sequence->duration = avio_rb64(pb);
  566. break;
  567. case 0x0201:
  568. avio_read(pb, sequence->data_definition_ul, 16);
  569. break;
  570. case 0x1001:
  571. sequence->structural_components_count = avio_rb32(pb);
  572. if (sequence->structural_components_count >= UINT_MAX / sizeof(UID))
  573. return -1;
  574. sequence->structural_components_refs = av_malloc(sequence->structural_components_count * sizeof(UID));
  575. if (!sequence->structural_components_refs)
  576. return -1;
  577. avio_skip(pb, 4); /* useless size of objects, always 16 according to specs */
  578. avio_read(pb, (uint8_t *)sequence->structural_components_refs, sequence->structural_components_count * sizeof(UID));
  579. break;
  580. }
  581. return 0;
  582. }
  583. static int mxf_read_source_package(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  584. {
  585. MXFPackage *package = arg;
  586. switch(tag) {
  587. case 0x4403:
  588. package->tracks_count = avio_rb32(pb);
  589. if (package->tracks_count >= UINT_MAX / sizeof(UID))
  590. return -1;
  591. package->tracks_refs = av_malloc(package->tracks_count * sizeof(UID));
  592. if (!package->tracks_refs)
  593. return -1;
  594. avio_skip(pb, 4); /* useless size of objects, always 16 according to specs */
  595. avio_read(pb, (uint8_t *)package->tracks_refs, package->tracks_count * sizeof(UID));
  596. break;
  597. case 0x4401:
  598. /* UMID, only get last 16 bytes */
  599. avio_skip(pb, 16);
  600. avio_read(pb, package->package_uid, 16);
  601. break;
  602. case 0x4701:
  603. avio_read(pb, package->descriptor_ref, 16);
  604. break;
  605. }
  606. return 0;
  607. }
  608. static int mxf_read_index_entry_array(AVIOContext *pb, MXFIndexTableSegment *segment)
  609. {
  610. int i, j, length;
  611. segment->nb_index_entries = avio_rb32(pb);
  612. length = avio_rb32(pb);
  613. if (!(segment->temporal_offset_entries=av_calloc(segment->nb_index_entries, sizeof(*segment->temporal_offset_entries))) ||
  614. !(segment->flag_entries = av_calloc(segment->nb_index_entries, sizeof(*segment->flag_entries))) ||
  615. !(segment->stream_offset_entries = av_calloc(segment->nb_index_entries, sizeof(*segment->stream_offset_entries))))
  616. return AVERROR(ENOMEM);
  617. for (i = 0; i < segment->nb_index_entries; i++) {
  618. segment->temporal_offset_entries[i] = avio_r8(pb);
  619. avio_r8(pb); /* KeyFrameOffset */
  620. segment->flag_entries[i] = avio_r8(pb);
  621. segment->stream_offset_entries[i] = avio_rb64(pb);
  622. avio_skip(pb, length - 11);
  623. }
  624. return 0;
  625. }
  626. static int mxf_read_index_table_segment(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  627. {
  628. MXFIndexTableSegment *segment = arg;
  629. switch(tag) {
  630. case 0x3F05:
  631. segment->edit_unit_byte_count = avio_rb32(pb);
  632. av_dlog(NULL, "EditUnitByteCount %d\n", segment->edit_unit_byte_count);
  633. break;
  634. case 0x3F06:
  635. segment->index_sid = avio_rb32(pb);
  636. av_dlog(NULL, "IndexSID %d\n", segment->index_sid);
  637. break;
  638. case 0x3F07:
  639. segment->body_sid = avio_rb32(pb);
  640. av_dlog(NULL, "BodySID %d\n", segment->body_sid);
  641. break;
  642. case 0x3F0A:
  643. av_dlog(NULL, "IndexEntryArray found\n");
  644. return mxf_read_index_entry_array(pb, segment);
  645. case 0x3F0B:
  646. segment->index_edit_rate.num = avio_rb32(pb);
  647. segment->index_edit_rate.den = avio_rb32(pb);
  648. av_dlog(NULL, "IndexEditRate %d/%d\n", segment->index_edit_rate.num,
  649. segment->index_edit_rate.den);
  650. break;
  651. case 0x3F0C:
  652. segment->index_start_position = avio_rb64(pb);
  653. av_dlog(NULL, "IndexStartPosition %"PRId64"\n", segment->index_start_position);
  654. break;
  655. case 0x3F0D:
  656. segment->index_duration = avio_rb64(pb);
  657. av_dlog(NULL, "IndexDuration %"PRId64"\n", segment->index_duration);
  658. break;
  659. }
  660. return 0;
  661. }
  662. static void mxf_read_pixel_layout(AVIOContext *pb, MXFDescriptor *descriptor)
  663. {
  664. int code, value, ofs = 0;
  665. char layout[16] = {0};
  666. do {
  667. code = avio_r8(pb);
  668. value = avio_r8(pb);
  669. av_dlog(NULL, "pixel layout: code %#x\n", code);
  670. if (ofs < 16) {
  671. layout[ofs++] = code;
  672. layout[ofs++] = value;
  673. }
  674. } while (code != 0); /* SMPTE 377M E.2.46 */
  675. ff_mxf_decode_pixel_layout(layout, &descriptor->pix_fmt);
  676. }
  677. static int mxf_read_generic_descriptor(void *arg, AVIOContext *pb, int tag, int size, UID uid, int64_t klv_offset)
  678. {
  679. MXFDescriptor *descriptor = arg;
  680. switch(tag) {
  681. case 0x3F01:
  682. descriptor->sub_descriptors_count = avio_rb32(pb);
  683. if (descriptor->sub_descriptors_count >= UINT_MAX / sizeof(UID))
  684. return -1;
  685. descriptor->sub_descriptors_refs = av_malloc(descriptor->sub_descriptors_count * sizeof(UID));
  686. if (!descriptor->sub_descriptors_refs)
  687. return -1;
  688. avio_skip(pb, 4); /* useless size of objects, always 16 according to specs */
  689. avio_read(pb, (uint8_t *)descriptor->sub_descriptors_refs, descriptor->sub_descriptors_count * sizeof(UID));
  690. break;
  691. case 0x3004:
  692. avio_read(pb, descriptor->essence_container_ul, 16);
  693. break;
  694. case 0x3006:
  695. descriptor->linked_track_id = avio_rb32(pb);
  696. break;
  697. case 0x3201: /* PictureEssenceCoding */
  698. avio_read(pb, descriptor->essence_codec_ul, 16);
  699. break;
  700. case 0x3203:
  701. descriptor->width = avio_rb32(pb);
  702. break;
  703. case 0x3202:
  704. descriptor->height = avio_rb32(pb);
  705. break;
  706. case 0x320E:
  707. descriptor->aspect_ratio.num = avio_rb32(pb);
  708. descriptor->aspect_ratio.den = avio_rb32(pb);
  709. break;
  710. case 0x3D03:
  711. descriptor->sample_rate.num = avio_rb32(pb);
  712. descriptor->sample_rate.den = avio_rb32(pb);
  713. break;
  714. case 0x3D06: /* SoundEssenceCompression */
  715. avio_read(pb, descriptor->essence_codec_ul, 16);
  716. break;
  717. case 0x3D07:
  718. descriptor->channels = avio_rb32(pb);
  719. break;
  720. case 0x3D01:
  721. descriptor->bits_per_sample = avio_rb32(pb);
  722. break;
  723. case 0x3401:
  724. mxf_read_pixel_layout(pb, descriptor);
  725. break;
  726. default:
  727. /* Private uid used by SONY C0023S01.mxf */
  728. if (IS_KLV_KEY(uid, mxf_sony_mpeg4_extradata)) {
  729. descriptor->extradata = av_malloc(size + FF_INPUT_BUFFER_PADDING_SIZE);
  730. if (!descriptor->extradata)
  731. return -1;
  732. descriptor->extradata_size = size;
  733. avio_read(pb, descriptor->extradata, size);
  734. }
  735. break;
  736. }
  737. return 0;
  738. }
  739. /*
  740. * Match an uid independently of the version byte and up to len common bytes
  741. * Returns: boolean
  742. */
  743. static int mxf_match_uid(const UID key, const UID uid, int len)
  744. {
  745. int i;
  746. for (i = 0; i < len; i++) {
  747. if (i != 7 && key[i] != uid[i])
  748. return 0;
  749. }
  750. return 1;
  751. }
  752. static const MXFCodecUL *mxf_get_codec_ul(const MXFCodecUL *uls, UID *uid)
  753. {
  754. while (uls->uid[0]) {
  755. if(mxf_match_uid(uls->uid, *uid, uls->matching_len))
  756. break;
  757. uls++;
  758. }
  759. return uls;
  760. }
  761. static void *mxf_resolve_strong_ref(MXFContext *mxf, UID *strong_ref, enum MXFMetadataSetType type)
  762. {
  763. int i;
  764. if (!strong_ref)
  765. return NULL;
  766. for (i = 0; i < mxf->metadata_sets_count; i++) {
  767. if (!memcmp(*strong_ref, mxf->metadata_sets[i]->uid, 16) &&
  768. (type == AnyType || mxf->metadata_sets[i]->type == type)) {
  769. return mxf->metadata_sets[i];
  770. }
  771. }
  772. return NULL;
  773. }
  774. static const MXFCodecUL mxf_picture_essence_container_uls[] = {
  775. // video essence container uls
  776. { { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x02,0x0D,0x01,0x03,0x01,0x02,0x04,0x60,0x01 }, 14, CODEC_ID_MPEG2VIDEO }, /* MPEG-ES Frame wrapped */
  777. { { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x01,0x0D,0x01,0x03,0x01,0x02,0x02,0x41,0x01 }, 14, CODEC_ID_DVVIDEO }, /* DV 625 25mbps */
  778. { { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, 0, CODEC_ID_NONE },
  779. };
  780. static const MXFCodecUL mxf_sound_essence_container_uls[] = {
  781. // sound essence container uls
  782. { { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x01,0x0D,0x01,0x03,0x01,0x02,0x06,0x01,0x00 }, 14, CODEC_ID_PCM_S16LE }, /* BWF Frame wrapped */
  783. { { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x02,0x0D,0x01,0x03,0x01,0x02,0x04,0x40,0x01 }, 14, CODEC_ID_MP2 }, /* MPEG-ES Frame wrapped, 0x40 ??? stream id */
  784. { { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x01,0x0D,0x01,0x03,0x01,0x02,0x01,0x01,0x01 }, 14, CODEC_ID_PCM_S16LE }, /* D-10 Mapping 50Mbps PAL Extended Template */
  785. { { 0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0xFF,0x4B,0x46,0x41,0x41,0x00,0x0D,0x4D,0x4F }, 14, CODEC_ID_PCM_S16LE }, /* 0001GL00.MXF.A1.mxf_opatom.mxf */
  786. { { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, 0, CODEC_ID_NONE },
  787. };
  788. static int mxf_get_sorted_table_segments(MXFContext *mxf, int *nb_sorted_segments, MXFIndexTableSegment ***sorted_segments)
  789. {
  790. int i, j, nb_segments = 0;
  791. MXFIndexTableSegment **unsorted_segments;
  792. int last_body_sid = -1, last_index_sid = -1, last_index_start = -1;
  793. /* count number of segments, allocate arrays and copy unsorted segments */
  794. for (i = 0; i < mxf->metadata_sets_count; i++)
  795. if (mxf->metadata_sets[i]->type == IndexTableSegment)
  796. nb_segments++;
  797. if (!(unsorted_segments = av_calloc(nb_segments, sizeof(*unsorted_segments))) ||
  798. !(*sorted_segments = av_calloc(nb_segments, sizeof(**sorted_segments)))) {
  799. av_free(unsorted_segments);
  800. return AVERROR(ENOMEM);
  801. }
  802. for (i = j = 0; i < mxf->metadata_sets_count; i++)
  803. if (mxf->metadata_sets[i]->type == IndexTableSegment)
  804. unsorted_segments[j++] = (MXFIndexTableSegment*)mxf->metadata_sets[i];
  805. *nb_sorted_segments = 0;
  806. /* sort segments by {BodySID, IndexSID, IndexStartPosition}, remove duplicates while we're at it */
  807. for (i = 0; i < nb_segments; i++) {
  808. int best = -1, best_body_sid = -1, best_index_sid = -1, best_index_start = -1;
  809. for (j = 0; j < nb_segments; j++) {
  810. MXFIndexTableSegment *s = unsorted_segments[j];
  811. /* Require larger BosySID, IndexSID or IndexStartPosition then the previous entry. This removes duplicates.
  812. * We want the smallest values for the keys than what we currently have, unless this is the first such entry this time around.
  813. */
  814. if ((i == 0 || s->body_sid > last_body_sid || s->index_sid > last_index_sid || s->index_start_position > last_index_start) &&
  815. (best == -1 || s->body_sid < best_body_sid || s->index_sid < best_index_sid || s->index_start_position < best_index_start)) {
  816. best = j;
  817. best_body_sid = s->body_sid;
  818. best_index_sid = s->index_sid;
  819. best_index_start = s->index_start_position;
  820. }
  821. }
  822. /* no suitable entry found -> we're done */
  823. if (best == -1)
  824. break;
  825. (*sorted_segments)[(*nb_sorted_segments)++] = unsorted_segments[best];
  826. last_body_sid = best_body_sid;
  827. last_index_sid = best_index_sid;
  828. last_index_start = best_index_start;
  829. }
  830. av_free(unsorted_segments);
  831. return 0;
  832. }
  833. /**
  834. * Computes the absolute file offset of the given essence container offset
  835. */
  836. static int mxf_absolute_bodysid_offset(MXFContext *mxf, int body_sid, int64_t offset, int64_t *offset_out)
  837. {
  838. int x;
  839. int64_t offset_in = offset; /* for logging */
  840. for (x = 0; x < mxf->partitions_count; x++) {
  841. MXFPartition *p = &mxf->partitions[x];
  842. if (p->body_sid != body_sid)
  843. continue;
  844. if (offset < p->essence_length || !p->essence_length) {
  845. *offset_out = p->essence_offset + offset;
  846. return 0;
  847. }
  848. offset -= p->essence_length;
  849. }
  850. av_log(mxf->fc, AV_LOG_ERROR, "failed to find absolute offset of %lx in BodySID %i - partial file?\n",
  851. offset_in, body_sid);
  852. return AVERROR_INVALIDDATA;
  853. }
  854. /**
  855. * Returns the end position of the essence container with given BodySID, or zero if unknown
  856. */
  857. static int64_t mxf_essence_container_end(MXFContext *mxf, int body_sid)
  858. {
  859. int x;
  860. int64_t ret = 0;
  861. for (x = 0; x < mxf->partitions_count; x++) {
  862. MXFPartition *p = &mxf->partitions[x];
  863. if (p->body_sid != body_sid)
  864. continue;
  865. if (!p->essence_length)
  866. return 0;
  867. ret = p->essence_offset + p->essence_length;
  868. }
  869. return ret;
  870. }
  871. /* EditUnit -> absolute offset */
  872. static int mxf_edit_unit_absolute_offset(MXFContext *mxf, MXFIndexTable *index_table, int64_t edit_unit, int64_t *edit_unit_out, int64_t *offset_out, int nag)
  873. {
  874. int i;
  875. int offset_temp = 0;
  876. for (i = 0; i < index_table->nb_segments; i++) {
  877. MXFIndexTableSegment *s = index_table->segments[i];
  878. edit_unit = FFMAX(edit_unit, s->index_start_position); /* clamp if trying to seek before start */
  879. if (edit_unit < s->index_start_position + s->index_duration) {
  880. int64_t index = edit_unit - s->index_start_position;
  881. if (s->edit_unit_byte_count)
  882. offset_temp += s->edit_unit_byte_count * index;
  883. else if (s->nb_index_entries) {
  884. if (s->nb_index_entries == 2 * s->index_duration + 1)
  885. index *= 2; /* Avid index */
  886. if (index < 0 || index > s->nb_index_entries) {
  887. av_log(mxf->fc, AV_LOG_ERROR, "IndexSID %i segment at %"PRId64" IndexEntryArray too small\n",
  888. index_table->index_sid, s->index_start_position);
  889. return AVERROR_INVALIDDATA;
  890. }
  891. offset_temp = s->stream_offset_entries[index];
  892. } else {
  893. av_log(mxf->fc, AV_LOG_ERROR, "IndexSID %i segment at %"PRId64" missing EditUnitByteCount and IndexEntryArray\n",
  894. index_table->index_sid, s->index_start_position);
  895. return AVERROR_INVALIDDATA;
  896. }
  897. if (edit_unit_out)
  898. *edit_unit_out = edit_unit;
  899. return mxf_absolute_bodysid_offset(mxf, index_table->body_sid, offset_temp, offset_out);
  900. } else {
  901. /* EditUnitByteCount == 0 for VBR indexes, which is fine since they use explicit StreamOffsets */
  902. offset_temp += s->edit_unit_byte_count * s->index_duration;
  903. }
  904. }
  905. if (nag)
  906. av_log(mxf->fc, AV_LOG_ERROR, "failed to map EditUnit %"PRId64" in IndexSID %i to an offset\n", edit_unit, index_table->index_sid);
  907. return AVERROR_INVALIDDATA;
  908. }
  909. static int mxf_compute_ptses_fake_index(MXFContext *mxf, MXFIndexTable *index_table)
  910. {
  911. int i, j, x;
  912. int8_t max_temporal_offset = -128;
  913. /* first compute how many entries we have */
  914. for (i = 0; i < index_table->nb_segments; i++) {
  915. MXFIndexTableSegment *s = index_table->segments[i];
  916. if (!s->nb_index_entries)
  917. return 0; /* no TemporalOffsets */
  918. index_table->nb_ptses += s->index_duration;
  919. }
  920. /* paranoid check */
  921. if (index_table->nb_ptses <= 0)
  922. return 0;
  923. if (!(index_table->ptses = av_calloc(index_table->nb_ptses, sizeof(int64_t))) ||
  924. !(index_table->fake_index = av_calloc(index_table->nb_ptses, sizeof(AVIndexEntry)))) {
  925. av_freep(&index_table->ptses);
  926. return AVERROR(ENOMEM);
  927. }
  928. /* we may have a few bad TemporalOffsets
  929. * make sure the corresponding PTSes don't have the bogus value 0 */
  930. for (x = 0; x < index_table->nb_ptses; x++)
  931. index_table->ptses[x] = AV_NOPTS_VALUE;
  932. /**
  933. * We have this:
  934. *
  935. * x TemporalOffset
  936. * 0: 0
  937. * 1: 1
  938. * 2: 1
  939. * 3: -2
  940. * 4: 1
  941. * 5: 1
  942. * 6: -2
  943. *
  944. * We want to transform it into this:
  945. *
  946. * x DTS PTS
  947. * 0: -1 0
  948. * 1: 0 3
  949. * 2: 1 1
  950. * 3: 2 2
  951. * 4: 3 6
  952. * 5: 4 4
  953. * 6: 5 5
  954. *
  955. * We do this by bucket sorting x by x+TemporalOffset[x] into mxf->ptses,
  956. * then settings mxf->first_dts = -max(TemporalOffset[x]).
  957. * The latter makes DTS <= PTS.
  958. */
  959. for (i = x = 0; i < index_table->nb_segments; i++) {
  960. MXFIndexTableSegment *s = index_table->segments[i];
  961. int index_delta = 1;
  962. if (s->nb_index_entries == 2 * s->index_duration + 1)
  963. index_delta = 2; /* Avid index */
  964. for (j = 0; j < s->nb_index_entries; j += index_delta, x++) {
  965. int offset = s->temporal_offset_entries[j] / index_delta;
  966. int index = x + offset;
  967. index_table->fake_index[x].timestamp = x;
  968. index_table->fake_index[x].flags = !(s->flag_entries[j] & 0x30) ? AVINDEX_KEYFRAME : 0;
  969. if (index < 0 || index >= index_table->nb_ptses) {
  970. av_log(mxf->fc, AV_LOG_ERROR,
  971. "index entry %i + TemporalOffset %i = %i, which is out of bounds\n",
  972. x, offset, index);
  973. continue;
  974. }
  975. index_table->ptses[index] = x;
  976. max_temporal_offset = FFMAX(max_temporal_offset, offset);
  977. }
  978. }
  979. index_table->first_dts = -max_temporal_offset;
  980. return 0;
  981. }
  982. /**
  983. * Sorts and collects index table segments into index tables.
  984. * Also computes PTSes if possible.
  985. */
  986. static int mxf_compute_index_tables(MXFContext *mxf)
  987. {
  988. int i, j, k, ret, nb_sorted_segments;
  989. MXFIndexTableSegment **sorted_segments = NULL;
  990. if ((ret = mxf_get_sorted_table_segments(mxf, &nb_sorted_segments, &sorted_segments)) ||
  991. nb_sorted_segments <= 0) {
  992. av_log(mxf->fc, AV_LOG_WARNING, "broken or empty index\n");
  993. return 0;
  994. }
  995. /* sanity check and count unique BodySIDs/IndexSIDs */
  996. for (i = 0; i < nb_sorted_segments; i++) {
  997. if (i == 0 || sorted_segments[i-1]->index_sid != sorted_segments[i]->index_sid)
  998. mxf->nb_index_tables++;
  999. else if (sorted_segments[i-1]->body_sid != sorted_segments[i]->body_sid) {
  1000. av_log(mxf->fc, AV_LOG_ERROR, "found inconsistent BodySID\n");
  1001. ret = AVERROR_INVALIDDATA;
  1002. goto finish_decoding_index;
  1003. }
  1004. }
  1005. if (!(mxf->index_tables = av_calloc(mxf->nb_index_tables, sizeof(MXFIndexTable)))) {
  1006. av_log(mxf->fc, AV_LOG_ERROR, "failed to allocate index tables\n");
  1007. ret = AVERROR(ENOMEM);
  1008. goto finish_decoding_index;
  1009. }
  1010. /* distribute sorted segments to index tables */
  1011. for (i = j = 0; i < nb_sorted_segments; i++) {
  1012. if (i != 0 && sorted_segments[i-1]->index_sid != sorted_segments[i]->index_sid) {
  1013. /* next IndexSID */
  1014. j++;
  1015. }
  1016. mxf->index_tables[j].nb_segments++;
  1017. }
  1018. for (i = j = 0; j < mxf->nb_index_tables; i += mxf->index_tables[j++].nb_segments) {
  1019. MXFIndexTable *t = &mxf->index_tables[j];
  1020. if (!(t->segments = av_calloc(t->nb_segments, sizeof(MXFIndexTableSegment*)))) {
  1021. av_log(mxf->fc, AV_LOG_ERROR, "failed to allocate IndexTableSegment pointer array\n");
  1022. ret = AVERROR(ENOMEM);
  1023. goto finish_decoding_index;
  1024. }
  1025. if (sorted_segments[i]->index_start_position)
  1026. av_log(mxf->fc, AV_LOG_WARNING, "IndexSID %i starts at EditUnit %"PRId64" - seeking may not work as expected\n",
  1027. sorted_segments[i]->index_sid, sorted_segments[i]->index_start_position);
  1028. memcpy(t->segments, &sorted_segments[i], t->nb_segments * sizeof(MXFIndexTableSegment*));
  1029. t->index_sid = sorted_segments[i]->index_sid;
  1030. t->body_sid = sorted_segments[i]->body_sid;
  1031. if ((ret = mxf_compute_ptses_fake_index(mxf, t)) < 0)
  1032. goto finish_decoding_index;
  1033. /* fix zero IndexDurations */
  1034. for (k = 0; k < t->nb_segments; k++) {
  1035. if (t->segments[k]->index_duration)
  1036. continue;
  1037. if (t->nb_segments > 1)
  1038. av_log(mxf->fc, AV_LOG_WARNING, "IndexSID %i segment %i has zero IndexDuration and there's more than one segment\n",
  1039. t->index_sid, k);
  1040. if (mxf->fc->nb_streams <= 0) {
  1041. av_log(mxf->fc, AV_LOG_WARNING, "no streams?\n");
  1042. break;
  1043. }
  1044. /* assume the first stream's duration is reasonable
  1045. * leave index_duration = 0 on further segments in case we have any (unlikely)
  1046. */
  1047. t->segments[k]->index_duration = mxf->fc->streams[0]->duration;
  1048. break;
  1049. }
  1050. }
  1051. ret = 0;
  1052. finish_decoding_index:
  1053. av_free(sorted_segments);
  1054. return ret;
  1055. }
  1056. static int mxf_parse_structural_metadata(MXFContext *mxf)
  1057. {
  1058. MXFPackage *material_package = NULL;
  1059. MXFPackage *temp_package = NULL;
  1060. int i, j, k, ret;
  1061. av_dlog(mxf->fc, "metadata sets count %d\n", mxf->metadata_sets_count);
  1062. /* TODO: handle multiple material packages (OP3x) */
  1063. for (i = 0; i < mxf->packages_count; i++) {
  1064. material_package = mxf_resolve_strong_ref(mxf, &mxf->packages_refs[i], MaterialPackage);
  1065. if (material_package) break;
  1066. }
  1067. if (!material_package) {
  1068. av_log(mxf->fc, AV_LOG_ERROR, "no material package found\n");
  1069. return -1;
  1070. }
  1071. for (i = 0; i < material_package->tracks_count; i++) {
  1072. MXFPackage *source_package = NULL;
  1073. MXFTrack *material_track = NULL;
  1074. MXFTrack *source_track = NULL;
  1075. MXFTrack *temp_track = NULL;
  1076. MXFDescriptor *descriptor = NULL;
  1077. MXFStructuralComponent *component = NULL;
  1078. UID *essence_container_ul = NULL;
  1079. const MXFCodecUL *codec_ul = NULL;
  1080. const MXFCodecUL *container_ul = NULL;
  1081. AVStream *st;
  1082. if (!(material_track = mxf_resolve_strong_ref(mxf, &material_package->tracks_refs[i], Track))) {
  1083. av_log(mxf->fc, AV_LOG_ERROR, "could not resolve material track strong ref\n");
  1084. continue;
  1085. }
  1086. if (!(material_track->sequence = mxf_resolve_strong_ref(mxf, &material_track->sequence_ref, Sequence))) {
  1087. av_log(mxf->fc, AV_LOG_ERROR, "could not resolve material track sequence strong ref\n");
  1088. continue;
  1089. }
  1090. /* TODO: handle multiple source clips */
  1091. for (j = 0; j < material_track->sequence->structural_components_count; j++) {
  1092. /* TODO: handle timecode component */
  1093. component = mxf_resolve_strong_ref(mxf, &material_track->sequence->structural_components_refs[j], SourceClip);
  1094. if (!component)
  1095. continue;
  1096. for (k = 0; k < mxf->packages_count; k++) {
  1097. temp_package = mxf_resolve_strong_ref(mxf, &mxf->packages_refs[k], SourcePackage);
  1098. if (!temp_package)
  1099. continue;
  1100. if (!memcmp(temp_package->package_uid, component->source_package_uid, 16)) {
  1101. source_package = temp_package;
  1102. break;
  1103. }
  1104. }
  1105. if (!source_package) {
  1106. av_dlog(mxf->fc, "material track %d: no corresponding source package found\n", material_track->track_id);
  1107. break;
  1108. }
  1109. for (k = 0; k < source_package->tracks_count; k++) {
  1110. if (!(temp_track = mxf_resolve_strong_ref(mxf, &source_package->tracks_refs[k], Track))) {
  1111. av_log(mxf->fc, AV_LOG_ERROR, "could not resolve source track strong ref\n");
  1112. ret = -1;
  1113. goto fail_and_free;
  1114. }
  1115. if (temp_track->track_id == component->source_track_id) {
  1116. source_track = temp_track;
  1117. break;
  1118. }
  1119. }
  1120. if (!source_track) {
  1121. av_log(mxf->fc, AV_LOG_ERROR, "material track %d: no corresponding source track found\n", material_track->track_id);
  1122. break;
  1123. }
  1124. }
  1125. if (!source_track)
  1126. continue;
  1127. if (!(source_track->sequence = mxf_resolve_strong_ref(mxf, &source_track->sequence_ref, Sequence))) {
  1128. av_log(mxf->fc, AV_LOG_ERROR, "could not resolve source track sequence strong ref\n");
  1129. ret = -1;
  1130. goto fail_and_free;
  1131. }
  1132. /* 0001GL00.MXF.A1.mxf_opatom.mxf has the same SourcePackageID as 0001GL.MXF.V1.mxf_opatom.mxf
  1133. * This would result in both files appearing to have two streams. Work around this by sanity checking DataDefinition */
  1134. if (memcmp(material_track->sequence->data_definition_ul, source_track->sequence->data_definition_ul, 16)) {
  1135. av_log(mxf->fc, AV_LOG_ERROR, "material track %d: DataDefinition mismatch\n", material_track->track_id);
  1136. continue;
  1137. }
  1138. st = avformat_new_stream(mxf->fc, NULL);
  1139. if (!st) {
  1140. av_log(mxf->fc, AV_LOG_ERROR, "could not allocate stream\n");
  1141. ret = AVERROR(ENOMEM);
  1142. goto fail_and_free;
  1143. }
  1144. st->id = source_track->track_id;
  1145. st->priv_data = source_track;
  1146. st->duration = component->duration;
  1147. if (st->duration == -1)
  1148. st->duration = AV_NOPTS_VALUE;
  1149. st->start_time = component->start_position;
  1150. avpriv_set_pts_info(st, 64, material_track->edit_rate.num, material_track->edit_rate.den);
  1151. PRINT_KEY(mxf->fc, "data definition ul", source_track->sequence->data_definition_ul);
  1152. codec_ul = mxf_get_codec_ul(ff_mxf_data_definition_uls, &source_track->sequence->data_definition_ul);
  1153. st->codec->codec_type = codec_ul->id;
  1154. source_package->descriptor = mxf_resolve_strong_ref(mxf, &source_package->descriptor_ref, AnyType);
  1155. if (source_package->descriptor) {
  1156. if (source_package->descriptor->type == MultipleDescriptor) {
  1157. for (j = 0; j < source_package->descriptor->sub_descriptors_count; j++) {
  1158. MXFDescriptor *sub_descriptor = mxf_resolve_strong_ref(mxf, &source_package->descriptor->sub_descriptors_refs[j], Descriptor);
  1159. if (!sub_descriptor) {
  1160. av_log(mxf->fc, AV_LOG_ERROR, "could not resolve sub descriptor strong ref\n");
  1161. continue;
  1162. }
  1163. if (sub_descriptor->linked_track_id == source_track->track_id) {
  1164. descriptor = sub_descriptor;
  1165. break;
  1166. }
  1167. }
  1168. } else if (source_package->descriptor->type == Descriptor)
  1169. descriptor = source_package->descriptor;
  1170. }
  1171. if (!descriptor) {
  1172. av_log(mxf->fc, AV_LOG_INFO, "source track %d: stream %d, no descriptor found\n", source_track->track_id, st->index);
  1173. continue;
  1174. }
  1175. PRINT_KEY(mxf->fc, "essence codec ul", descriptor->essence_codec_ul);
  1176. PRINT_KEY(mxf->fc, "essence container ul", descriptor->essence_container_ul);
  1177. essence_container_ul = &descriptor->essence_container_ul;
  1178. /* HACK: replacing the original key with mxf_encrypted_essence_container
  1179. * is not allowed according to s429-6, try to find correct information anyway */
  1180. if (IS_KLV_KEY(essence_container_ul, mxf_encrypted_essence_container)) {
  1181. av_log(mxf->fc, AV_LOG_INFO, "broken encrypted mxf file\n");
  1182. for (k = 0; k < mxf->metadata_sets_count; k++) {
  1183. MXFMetadataSet *metadata = mxf->metadata_sets[k];
  1184. if (metadata->type == CryptoContext) {
  1185. essence_container_ul = &((MXFCryptoContext *)metadata)->source_container_ul;
  1186. break;
  1187. }
  1188. }
  1189. }
  1190. /* TODO: drop PictureEssenceCoding and SoundEssenceCompression, only check EssenceContainer */
  1191. codec_ul = mxf_get_codec_ul(ff_mxf_codec_uls, &descriptor->essence_codec_ul);
  1192. st->codec->codec_id = codec_ul->id;
  1193. if (descriptor->extradata) {
  1194. st->codec->extradata = descriptor->extradata;
  1195. st->codec->extradata_size = descriptor->extradata_size;
  1196. }
  1197. if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
  1198. container_ul = mxf_get_codec_ul(mxf_picture_essence_container_uls, essence_container_ul);
  1199. if (st->codec->codec_id == CODEC_ID_NONE)
  1200. st->codec->codec_id = container_ul->id;
  1201. st->codec->width = descriptor->width;
  1202. st->codec->height = descriptor->height;
  1203. if (st->codec->codec_id == CODEC_ID_RAWVIDEO)
  1204. st->codec->pix_fmt = descriptor->pix_fmt;
  1205. st->need_parsing = AVSTREAM_PARSE_HEADERS;
  1206. } else if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
  1207. container_ul = mxf_get_codec_ul(mxf_sound_essence_container_uls, essence_container_ul);
  1208. if (st->codec->codec_id == CODEC_ID_NONE)
  1209. st->codec->codec_id = container_ul->id;
  1210. st->codec->channels = descriptor->channels;
  1211. st->codec->bits_per_coded_sample = descriptor->bits_per_sample;
  1212. st->codec->sample_rate = descriptor->sample_rate.num / descriptor->sample_rate.den;
  1213. /* TODO: implement CODEC_ID_RAWAUDIO */
  1214. if (st->codec->codec_id == CODEC_ID_PCM_S16LE) {
  1215. if (descriptor->bits_per_sample > 16 && descriptor->bits_per_sample <= 24)
  1216. st->codec->codec_id = CODEC_ID_PCM_S24LE;
  1217. else if (descriptor->bits_per_sample == 32)
  1218. st->codec->codec_id = CODEC_ID_PCM_S32LE;
  1219. } else if (st->codec->codec_id == CODEC_ID_PCM_S16BE) {
  1220. if (descriptor->bits_per_sample > 16 && descriptor->bits_per_sample <= 24)
  1221. st->codec->codec_id = CODEC_ID_PCM_S24BE;
  1222. else if (descriptor->bits_per_sample == 32)
  1223. st->codec->codec_id = CODEC_ID_PCM_S32BE;
  1224. } else if (st->codec->codec_id == CODEC_ID_MP2) {
  1225. st->need_parsing = AVSTREAM_PARSE_FULL;
  1226. }
  1227. }
  1228. if (st->codec->codec_type != AVMEDIA_TYPE_DATA && (*essence_container_ul)[15] > 0x01) {
  1229. /* TODO: decode timestamps */
  1230. st->need_parsing = AVSTREAM_PARSE_TIMESTAMPS;
  1231. }
  1232. }
  1233. ret = 0;
  1234. fail_and_free:
  1235. return ret;
  1236. }
  1237. static const MXFMetadataReadTableEntry mxf_metadata_read_table[] = {
  1238. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x05,0x01,0x00 }, mxf_read_primer_pack },
  1239. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x02,0x01,0x00 }, mxf_read_partition_pack },
  1240. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x02,0x02,0x00 }, mxf_read_partition_pack },
  1241. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x02,0x03,0x00 }, mxf_read_partition_pack },
  1242. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x02,0x04,0x00 }, mxf_read_partition_pack },
  1243. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x03,0x01,0x00 }, mxf_read_partition_pack },
  1244. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x03,0x02,0x00 }, mxf_read_partition_pack },
  1245. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x03,0x03,0x00 }, mxf_read_partition_pack },
  1246. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x03,0x04,0x00 }, mxf_read_partition_pack },
  1247. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x04,0x02,0x00 }, mxf_read_partition_pack },
  1248. { { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x04,0x04,0x00 }, mxf_read_partition_pack },
  1249. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x18,0x00 }, mxf_read_content_storage, 0, AnyType },
  1250. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x37,0x00 }, mxf_read_source_package, sizeof(MXFPackage), SourcePackage },
  1251. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x36,0x00 }, mxf_read_material_package, sizeof(MXFPackage), MaterialPackage },
  1252. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x0F,0x00 }, mxf_read_sequence, sizeof(MXFSequence), Sequence },
  1253. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x11,0x00 }, mxf_read_source_clip, sizeof(MXFStructuralComponent), SourceClip },
  1254. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x44,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), MultipleDescriptor },
  1255. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x42,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* Generic Sound */
  1256. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x28,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* CDCI */
  1257. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x29,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* RGBA */
  1258. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x51,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* MPEG 2 Video */
  1259. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x48,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* Wave */
  1260. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x47,0x00 }, mxf_read_generic_descriptor, sizeof(MXFDescriptor), Descriptor }, /* AES3 */
  1261. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x3A,0x00 }, mxf_read_track, sizeof(MXFTrack), Track }, /* Static Track */
  1262. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x3B,0x00 }, mxf_read_track, sizeof(MXFTrack), Track }, /* Generic Track */
  1263. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x04,0x01,0x02,0x02,0x00,0x00 }, mxf_read_cryptographic_context, sizeof(MXFCryptoContext), CryptoContext },
  1264. { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x02,0x01,0x01,0x10,0x01,0x00 }, mxf_read_index_table_segment, sizeof(MXFIndexTableSegment), IndexTableSegment },
  1265. { { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, NULL, 0, AnyType },
  1266. };
  1267. static int mxf_read_local_tags(MXFContext *mxf, KLVPacket *klv, MXFMetadataReadFunc *read_child, int ctx_size, enum MXFMetadataSetType type)
  1268. {
  1269. AVIOContext *pb = mxf->fc->pb;
  1270. MXFMetadataSet *ctx = ctx_size ? av_mallocz(ctx_size) : mxf;
  1271. uint64_t klv_end = avio_tell(pb) + klv->length;
  1272. if (!ctx)
  1273. return -1;
  1274. while (avio_tell(pb) + 4 < klv_end) {
  1275. int tag = avio_rb16(pb);
  1276. int size = avio_rb16(pb); /* KLV specified by 0x53 */
  1277. uint64_t next = avio_tell(pb) + size;
  1278. UID uid = {0};
  1279. av_dlog(mxf->fc, "local tag %#04x size %d\n", tag, size);
  1280. if (!size) { /* ignore empty tag, needed for some files with empty UMID tag */
  1281. av_log(mxf->fc, AV_LOG_ERROR, "local tag %#04x with 0 size\n", tag);
  1282. continue;
  1283. }
  1284. if (tag > 0x7FFF) { /* dynamic tag */
  1285. int i;
  1286. for (i = 0; i < mxf->local_tags_count; i++) {
  1287. int local_tag = AV_RB16(mxf->local_tags+i*18);
  1288. if (local_tag == tag) {
  1289. memcpy(uid, mxf->local_tags+i*18+2, 16);
  1290. av_dlog(mxf->fc, "local tag %#04x\n", local_tag);
  1291. PRINT_KEY(mxf->fc, "uid", uid);
  1292. }
  1293. }
  1294. }
  1295. if (ctx_size && tag == 0x3C0A)
  1296. avio_read(pb, ctx->uid, 16);
  1297. else if (read_child(ctx, pb, tag, size, uid, -1) < 0)
  1298. return -1;
  1299. avio_seek(pb, next, SEEK_SET);
  1300. }
  1301. if (ctx_size) ctx->type = type;
  1302. return ctx_size ? mxf_add_metadata_set(mxf, ctx) : 0;
  1303. }
  1304. /**
  1305. * Seeks to the previous partition, if possible
  1306. * @return <= 0 if we should stop parsing, > 0 if we should keep going
  1307. */
  1308. static int mxf_seek_to_previous_partition(MXFContext *mxf)
  1309. {
  1310. AVIOContext *pb = mxf->fc->pb;
  1311. if (!mxf->current_partition ||
  1312. mxf->run_in + mxf->current_partition->previous_partition <= mxf->last_forward_tell)
  1313. return 0; /* we've parsed all partitions */
  1314. /* seek to previous partition */
  1315. avio_seek(pb, mxf->run_in + mxf->current_partition->previous_partition, SEEK_SET);
  1316. mxf->current_partition = NULL;
  1317. av_dlog(mxf->fc, "seeking to previous partition\n");
  1318. return 1;
  1319. }
  1320. /**
  1321. * Called when essence is encountered
  1322. * @return <= 0 if we should stop parsing, > 0 if we should keep going
  1323. */
  1324. static int mxf_parse_handle_essence(MXFContext *mxf)
  1325. {
  1326. AVIOContext *pb = mxf->fc->pb;
  1327. int64_t ret;
  1328. if (!mxf->current_partition) {
  1329. av_log(mxf->fc, AV_LOG_ERROR, "found essence prior to PartitionPack\n");
  1330. return AVERROR_INVALIDDATA;
  1331. }
  1332. if (mxf->parsing_backward) {
  1333. return mxf_seek_to_previous_partition(mxf);
  1334. } else {
  1335. if (!mxf->footer_partition) {
  1336. av_dlog(mxf->fc, "no footer\n");
  1337. return 0;
  1338. }
  1339. av_dlog(mxf->fc, "seeking to footer\n");
  1340. /* remember where we were so we don't end up seeking further back than this */
  1341. mxf->last_forward_tell = avio_tell(pb);
  1342. if (!pb->seekable) {
  1343. av_log(mxf->fc, AV_LOG_INFO, "file is not seekable - not parsing footer\n");
  1344. return -1;
  1345. }
  1346. /* seek to footer partition and parse backward */
  1347. if ((ret = avio_seek(pb, mxf->run_in + mxf->footer_partition, SEEK_SET)) < 0) {
  1348. av_log(mxf->fc, AV_LOG_ERROR, "failed to seek to footer @ 0x%"PRIx64" (%"PRId64") - partial file?\n",
  1349. mxf->run_in + mxf->footer_partition, ret);
  1350. return ret;
  1351. }
  1352. mxf->current_partition = NULL;
  1353. mxf->parsing_backward = 1;
  1354. }
  1355. return 1;
  1356. }
  1357. /**
  1358. * Called when the next partition or EOF is encountered
  1359. * @return <= 0 if we should stop parsing, > 0 if we should keep going
  1360. */
  1361. static int mxf_parse_handle_partition_or_eof(MXFContext *mxf)
  1362. {
  1363. return mxf->parsing_backward ? mxf_seek_to_previous_partition(mxf) : 1;
  1364. }
  1365. /**
  1366. * Figures out the proper offset and length of the essence container in each partition
  1367. */
  1368. static void mxf_compute_essence_containers(MXFContext *mxf)
  1369. {
  1370. int x;
  1371. /* everything is already correct */
  1372. if (mxf->op == OPAtom)
  1373. return;
  1374. for (x = 0; x < mxf->partitions_count; x++) {
  1375. MXFPartition *p = &mxf->partitions[x];
  1376. if (!p->body_sid)
  1377. continue; /* BodySID == 0 -> no essence */
  1378. if (x >= mxf->partitions_count - 1)
  1379. break; /* last partition - can't compute length (and we don't need to) */
  1380. /* essence container spans to the next partition */
  1381. p->essence_length = mxf->partitions[x+1].this_partition - p->essence_offset;
  1382. if (p->essence_length < 0) {
  1383. /* next ThisPartition < essence_offset */
  1384. p->essence_length = 0;
  1385. av_log(mxf->fc, AV_LOG_ERROR, "partition %i: bad ThisPartition = %lx\n",
  1386. x+1, mxf->partitions[x+1].this_partition);
  1387. }
  1388. }
  1389. }
  1390. static int64_t round_to_kag(int64_t position, int kag_size)
  1391. {
  1392. /* TODO: account for run-in? the spec isn't clear whether KAG should account for it */
  1393. /* NOTE: kag_size may be any integer between 1 - 2^10 */
  1394. int64_t ret = (position / kag_size) * kag_size;
  1395. return ret == position ? ret : ret + kag_size;
  1396. }
  1397. static int mxf_read_header(AVFormatContext *s, AVFormatParameters *ap)
  1398. {
  1399. MXFContext *mxf = s->priv_data;
  1400. KLVPacket klv;
  1401. int64_t essence_offset = 0;
  1402. int ret;
  1403. mxf->last_forward_tell = INT64_MAX;
  1404. if (!mxf_read_sync(s->pb, mxf_header_partition_pack_key, 14)) {
  1405. av_log(s, AV_LOG_ERROR, "could not find header partition pack key\n");
  1406. return -1;
  1407. }
  1408. avio_seek(s->pb, -14, SEEK_CUR);
  1409. mxf->fc = s;
  1410. mxf->run_in = avio_tell(s->pb);
  1411. while (!url_feof(s->pb)) {
  1412. const MXFMetadataReadTableEntry *metadata;
  1413. if (klv_read_packet(&klv, s->pb) < 0) {
  1414. /* EOF - seek to previous partition or stop */
  1415. if(mxf_parse_handle_partition_or_eof(mxf) <= 0)
  1416. break;
  1417. else
  1418. continue;
  1419. }
  1420. PRINT_KEY(s, "read header", klv.key);
  1421. av_dlog(s, "size %"PRIu64" offset %#"PRIx64"\n", klv.length, klv.offset);
  1422. if (IS_KLV_KEY(klv.key, mxf_encrypted_triplet_key) ||
  1423. IS_KLV_KEY(klv.key, mxf_essence_element_key) ||
  1424. IS_KLV_KEY(klv.key, mxf_avid_essence_element_key) ||
  1425. IS_KLV_KEY(klv.key, mxf_system_item_key)) {
  1426. if (!mxf->current_partition->essence_offset) {
  1427. /* for OP1a we compute essence_offset
  1428. * for OPAtom we point essence_offset after the KL (usually op1a_essence_offset + 20 or 25)
  1429. * TODO: for OP1a we could eliminate this entire if statement, always stopping parsing at op1a_essence_offset
  1430. * for OPAtom we still need the actual essence_offset though (the KL's length can vary)
  1431. */
  1432. int64_t op1a_essence_offset =
  1433. round_to_kag(mxf->current_partition->this_partition +
  1434. mxf->current_partition->pack_length, mxf->current_partition->kag_size) +
  1435. round_to_kag(mxf->current_partition->header_byte_count, mxf->current_partition->kag_size) +
  1436. round_to_kag(mxf->current_partition->index_byte_count, mxf->current_partition->kag_size);
  1437. if (mxf->op == OPAtom) {
  1438. /* point essence_offset to the actual data
  1439. * OPAtom has all the essence in one big KLV
  1440. */
  1441. mxf->current_partition->essence_offset = avio_tell(s->pb);
  1442. mxf->current_partition->essence_length = klv.length;
  1443. } else {
  1444. /* NOTE: op1a_essence_offset may be less than to klv.offset (C0023S01.mxf) */
  1445. mxf->current_partition->essence_offset = op1a_essence_offset;
  1446. }
  1447. }
  1448. if (!essence_offset)
  1449. essence_offset = klv.offset;
  1450. /* seek to footer, previous partition or stop */
  1451. if (mxf_parse_handle_essence(mxf) <= 0)
  1452. break;
  1453. continue;
  1454. } else if (!memcmp(klv.key, mxf_header_partition_pack_key, 13) &&
  1455. klv.key[13] >= 2 && klv.key[13] <= 4 && mxf->current_partition) {
  1456. /* next partition pack - keep going, seek to previous partition or stop */
  1457. if(mxf_parse_handle_partition_or_eof(mxf) <= 0)
  1458. break;
  1459. }
  1460. for (metadata = mxf_metadata_read_table; metadata->read; metadata++) {
  1461. if (IS_KLV_KEY(klv.key, metadata->key)) {
  1462. int res;
  1463. if (klv.key[5] == 0x53) {
  1464. res = mxf_read_local_tags(mxf, &klv, metadata->read, metadata->ctx_size, metadata->type);
  1465. } else {
  1466. uint64_t next = avio_tell(s->pb) + klv.length;
  1467. res = metadata->read(mxf, s->pb, 0, klv.length, klv.key, klv.offset);
  1468. avio_seek(s->pb, next, SEEK_SET);
  1469. }
  1470. if (res < 0) {
  1471. av_log(s, AV_LOG_ERROR, "error reading header metadata\n");
  1472. return -1;
  1473. }
  1474. break;
  1475. }
  1476. }
  1477. if (!metadata->read)
  1478. avio_skip(s->pb, klv.length);
  1479. }
  1480. /* FIXME avoid seek */
  1481. if (!essence_offset) {
  1482. av_log(s, AV_LOG_ERROR, "no essence\n");
  1483. return AVERROR_INVALIDDATA;
  1484. }
  1485. avio_seek(s->pb, essence_offset, SEEK_SET);
  1486. mxf_compute_essence_containers(mxf);
  1487. /* we need to do this before computing the index tables
  1488. * to be able to fill in zero IndexDurations with st->duration */
  1489. if ((ret = mxf_parse_structural_metadata(mxf)) < 0)
  1490. return ret;
  1491. if ((ret = mxf_compute_index_tables(mxf)) < 0)
  1492. return ret;
  1493. if (mxf->nb_index_tables > 1) {
  1494. /* TODO: look up which IndexSID to use via EssenceContainerData */
  1495. av_log(mxf->fc, AV_LOG_INFO, "got %i index tables - only the first one (IndexSID %i) will be used\n",
  1496. mxf->nb_index_tables, mxf->index_tables[0].index_sid);
  1497. } else if (mxf->nb_index_tables == 0 && mxf->op == OPAtom) {
  1498. av_log(mxf->fc, AV_LOG_ERROR, "cannot demux OPAtom without an index\n");
  1499. return AVERROR_INVALIDDATA;
  1500. }
  1501. return 0;
  1502. }
  1503. /**
  1504. * Computes DTS and PTS for the given video packet based on its offset.
  1505. */
  1506. static void mxf_packet_timestamps(MXFContext *mxf, AVPacket *pkt)
  1507. {
  1508. int64_t next_ofs;
  1509. MXFIndexTable *t = &mxf->index_tables[0];
  1510. /* this is called from the OP1a demuxing logic, which means there may be no index tables */
  1511. if (mxf->nb_index_tables <= 0)
  1512. return;
  1513. /* find mxf->current_edit_unit so that the next edit unit starts ahead of pkt->pos */
  1514. for (;;) {
  1515. if (mxf_edit_unit_absolute_offset(mxf, t, mxf->current_edit_unit + 1, NULL, &next_ofs, 0) < 0)
  1516. break;
  1517. if (next_ofs > pkt->pos)
  1518. break;
  1519. mxf->current_edit_unit++;
  1520. }
  1521. if (mxf->current_edit_unit >= t->nb_ptses)
  1522. return;
  1523. pkt->dts = mxf->current_edit_unit + t->first_dts;
  1524. pkt->pts = t->ptses[mxf->current_edit_unit];
  1525. }
  1526. static int mxf_read_packet_old(AVFormatContext *s, AVPacket *pkt)
  1527. {
  1528. KLVPacket klv;
  1529. while (!url_feof(s->pb)) {
  1530. if (klv_read_packet(&klv, s->pb) < 0)
  1531. return -1;
  1532. PRINT_KEY(s, "read packet", klv.key);
  1533. av_dlog(s, "size %"PRIu64" offset %#"PRIx64"\n", klv.length, klv.offset);
  1534. if (IS_KLV_KEY(klv.key, mxf_encrypted_triplet_key)) {
  1535. int res = mxf_decrypt_triplet(s, pkt, &klv);
  1536. if (res < 0) {
  1537. av_log(s, AV_LOG_ERROR, "invalid encoded triplet\n");
  1538. return -1;
  1539. }
  1540. return 0;
  1541. }
  1542. if (IS_KLV_KEY(klv.key, mxf_essence_element_key) ||
  1543. IS_KLV_KEY(klv.key, mxf_avid_essence_element_key)) {
  1544. int index = mxf_get_stream_index(s, &klv);
  1545. if (index < 0) {
  1546. av_log(s, AV_LOG_ERROR, "error getting stream index %d\n", AV_RB32(klv.key+12));
  1547. goto skip;
  1548. }
  1549. if (s->streams[index]->discard == AVDISCARD_ALL)
  1550. goto skip;
  1551. /* check for 8 channels AES3 element */
  1552. if (klv.key[12] == 0x06 && klv.key[13] == 0x01 && klv.key[14] == 0x10) {
  1553. if (mxf_get_d10_aes3_packet(s->pb, s->streams[index], pkt, klv.length) < 0) {
  1554. av_log(s, AV_LOG_ERROR, "error reading D-10 aes3 frame\n");
  1555. return -1;
  1556. }
  1557. } else {
  1558. int ret = av_get_packet(s->pb, pkt, klv.length);
  1559. if (ret < 0)
  1560. return ret;
  1561. }
  1562. pkt->stream_index = index;
  1563. pkt->pos = klv.offset;
  1564. if (s->streams[index]->codec->codec_type == AVMEDIA_TYPE_VIDEO)
  1565. mxf_packet_timestamps(s->priv_data, pkt); /* offset -> EditUnit -> DTS/PTS */
  1566. return 0;
  1567. } else
  1568. skip:
  1569. avio_skip(s->pb, klv.length);
  1570. }
  1571. return AVERROR_EOF;
  1572. }
  1573. static int mxf_read_packet(AVFormatContext *s, AVPacket *pkt)
  1574. {
  1575. MXFContext *mxf = s->priv_data;
  1576. int ret, size;
  1577. int64_t ret64, pos, next_pos;
  1578. AVStream *st;
  1579. MXFIndexTable *t;
  1580. if (mxf->op != OPAtom)
  1581. return mxf_read_packet_old(s, pkt);
  1582. /* OPAtom - clip wrapped demuxing */
  1583. /* NOTE: mxf_read_header() makes sure nb_index_tables > 0 for OPAtom */
  1584. st = s->streams[0];
  1585. t = &mxf->index_tables[0];
  1586. if (mxf->current_edit_unit >= st->duration)
  1587. return AVERROR_EOF;
  1588. if ((ret = mxf_edit_unit_absolute_offset(mxf, t, mxf->current_edit_unit, NULL, &pos, 1)) < 0)
  1589. return ret;
  1590. /* compute size by finding the next edit unit or the end of the essence container
  1591. * not pretty, but it works */
  1592. if ((ret = mxf_edit_unit_absolute_offset(mxf, t, mxf->current_edit_unit + 1, NULL, &next_pos, 0)) < 0 &&
  1593. (next_pos = mxf_essence_container_end(mxf, t->body_sid)) <= 0) {
  1594. av_log(s, AV_LOG_ERROR, "unable to compute the size of the last packet\n");
  1595. return AVERROR_INVALIDDATA;
  1596. }
  1597. if ((size = next_pos - pos) <= 0) {
  1598. av_log(s, AV_LOG_ERROR, "bad size: %i\n", size);
  1599. return AVERROR_INVALIDDATA;
  1600. }
  1601. if ((ret64 = avio_seek(s->pb, pos, SEEK_SET)) < 0)
  1602. return ret64;
  1603. if ((ret = av_get_packet(s->pb, pkt, size)) != size)
  1604. return ret < 0 ? ret : AVERROR_EOF;
  1605. if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO && t->ptses &&
  1606. mxf->current_edit_unit >= 0 && mxf->current_edit_unit < t->nb_ptses) {
  1607. pkt->dts = mxf->current_edit_unit + t->first_dts;
  1608. pkt->pts = t->ptses[mxf->current_edit_unit];
  1609. }
  1610. pkt->stream_index = 0;
  1611. mxf->current_edit_unit++;
  1612. return 0;
  1613. }
  1614. static int mxf_read_close(AVFormatContext *s)
  1615. {
  1616. MXFContext *mxf = s->priv_data;
  1617. MXFIndexTableSegment *seg;
  1618. int i, j;
  1619. av_freep(&mxf->packages_refs);
  1620. for (i = 0; i < s->nb_streams; i++)
  1621. s->streams[i]->priv_data = NULL;
  1622. for (i = 0; i < mxf->metadata_sets_count; i++) {
  1623. switch (mxf->metadata_sets[i]->type) {
  1624. case MultipleDescriptor:
  1625. av_freep(&((MXFDescriptor *)mxf->metadata_sets[i])->sub_descriptors_refs);
  1626. break;
  1627. case Sequence:
  1628. av_freep(&((MXFSequence *)mxf->metadata_sets[i])->structural_components_refs);
  1629. break;
  1630. case SourcePackage:
  1631. case MaterialPackage:
  1632. av_freep(&((MXFPackage *)mxf->metadata_sets[i])->tracks_refs);
  1633. break;
  1634. case IndexTableSegment:
  1635. seg = (MXFIndexTableSegment *)mxf->metadata_sets[i];
  1636. av_freep(&seg->temporal_offset_entries);
  1637. av_freep(&seg->flag_entries);
  1638. av_freep(&seg->stream_offset_entries);
  1639. break;
  1640. default:
  1641. break;
  1642. }
  1643. av_freep(&mxf->metadata_sets[i]);
  1644. }
  1645. av_freep(&mxf->partitions);
  1646. av_freep(&mxf->metadata_sets);
  1647. av_freep(&mxf->aesc);
  1648. av_freep(&mxf->local_tags);
  1649. for (i = 0; i < mxf->nb_index_tables; i++) {
  1650. av_freep(&mxf->index_tables[i].segments);
  1651. av_freep(&mxf->index_tables[i].fake_index);
  1652. }
  1653. av_freep(&mxf->index_tables);
  1654. return 0;
  1655. }
  1656. static int mxf_probe(AVProbeData *p) {
  1657. uint8_t *bufp = p->buf;
  1658. uint8_t *end = p->buf + p->buf_size;
  1659. if (p->buf_size < sizeof(mxf_header_partition_pack_key))
  1660. return 0;
  1661. /* Must skip Run-In Sequence and search for MXF header partition pack key SMPTE 377M 5.5 */
  1662. end -= sizeof(mxf_header_partition_pack_key);
  1663. for (; bufp < end; bufp++) {
  1664. if (IS_KLV_KEY(bufp, mxf_header_partition_pack_key))
  1665. return AVPROBE_SCORE_MAX;
  1666. }
  1667. return 0;
  1668. }
  1669. /* rudimentary byte seek */
  1670. /* XXX: use MXF Index */
  1671. static int mxf_read_seek(AVFormatContext *s, int stream_index, int64_t sample_time, int flags)
  1672. {
  1673. AVStream *st = s->streams[stream_index];
  1674. int64_t seconds;
  1675. MXFContext* mxf = s->priv_data;
  1676. int64_t seekpos;
  1677. int ret;
  1678. MXFIndexTable *t;
  1679. if (mxf->index_tables <= 0) {
  1680. if (!s->bit_rate)
  1681. return -1;
  1682. if (sample_time < 0)
  1683. sample_time = 0;
  1684. seconds = av_rescale(sample_time, st->time_base.num, st->time_base.den);
  1685. if (avio_seek(s->pb, (s->bit_rate * seconds) >> 3, SEEK_SET) < 0)
  1686. return -1;
  1687. ff_update_cur_dts(s, st, sample_time);
  1688. } else {
  1689. t = &mxf->index_tables[0];
  1690. /* clamp above zero, else ff_index_search_timestamp() returns negative
  1691. * this also means we allow seeking before the start */
  1692. sample_time = FFMAX(sample_time, 0);
  1693. if (t->fake_index) {
  1694. /* behave as if we have a proper index */
  1695. if ((sample_time = ff_index_search_timestamp(t->fake_index, t->nb_ptses, sample_time, flags)) < 0)
  1696. return sample_time;
  1697. } else {
  1698. /* no IndexEntryArray (one or more CBR segments)
  1699. * make sure we don't seek past the end */
  1700. sample_time = FFMIN(sample_time, st->duration - 1);
  1701. }
  1702. if ((ret = mxf_edit_unit_absolute_offset(mxf, t, sample_time, &sample_time, &seekpos, 1)) << 0)
  1703. return ret;
  1704. av_update_cur_dts(s, st, sample_time);
  1705. mxf->current_edit_unit = sample_time;
  1706. avio_seek(s->pb, seekpos, SEEK_SET);
  1707. }
  1708. return 0;
  1709. }
  1710. AVInputFormat ff_mxf_demuxer = {
  1711. .name = "mxf",
  1712. .long_name = NULL_IF_CONFIG_SMALL("Material eXchange Format"),
  1713. .priv_data_size = sizeof(MXFContext),
  1714. .read_probe = mxf_probe,
  1715. .read_header = mxf_read_header,
  1716. .read_packet = mxf_read_packet,
  1717. .read_close = mxf_read_close,
  1718. .read_seek = mxf_read_seek,
  1719. };