git.sesse.net Git - ffmpeg/blob - libavformat/mxfenc.c

   1 /*
   2  * MXF muxer
   3  * Copyright (c) 2008 GUCAS, Zhentan Feng <spyfeng at gmail 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 /*
  23  * References
  24  * SMPTE 336M KLV Data Encoding Protocol Using Key-Length-Value
  25  * SMPTE 377M MXF File Format Specifications
  26  * SMPTE 379M MXF Generic Container
  27  * SMPTE 381M Mapping MPEG Streams into the MXF Generic Container
  28  * SMPTE RP210: SMPTE Metadata Dictionary
  29  * SMPTE RP224: Registry of SMPTE Universal Labels
  30  */
  31
  32 //#define DEBUG
  33
  34 #include "mxf.h"
  35
  36 typedef struct {
  37     int local_tag;
  38     UID uid;
  39 } MXFLocalTagPair;
  40
  41 typedef struct {
  42     UID track_essence_element_key;
  43     const UID *essence_container_ul;
  44 } MXFStreamContext;
  45
  46 typedef struct MXFContext {
  47     int64_t header_byte_count;
  48     int64_t header_byte_count_offset;
  49     int64_t header_footer_partition_offset;
  50     int essence_container_count;
  51     uint8_t essence_containers_indices[sizeof(ff_mxf_essence_container_uls)/
  52                                        sizeof(*ff_mxf_essence_container_uls)];
  53 } MXFContext;
  54
  55 typedef struct {
  56     const UID key;
  57     void (*write)();
  58     enum CodecType type;
  59 } MXFDescriptorWriteTableEntry;
  60
  61 static const uint8_t uuid_base[]            = { 0xAD,0xAB,0x44,0x24,0x2f,0x25,0x4d,0xc7,0x92,0xff,0x29,0xbd };
  62 static const uint8_t umid_base[]            = { 0x06,0x0A,0x2B,0x34,0x01,0x01,0x01,0x01,0x01,0x01,0x0F,0x00,0x13,0x00,0x00,0x00 };
  63
  64 /**
  65  * complete key for operation pattern, partitions, and primer pack
  66  */
  67 static const uint8_t op1a_ul[]              = { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x01,0x0D,0x01,0x02,0x01,0x01,0x01,0x01,0x00 };
  68 static const uint8_t header_partition_key[] = { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0D,0x01,0x02,0x01,0x01,0x02,0x04,0x00 }; // ClosedComplete
  69 static const uint8_t footer_partition_key[] = { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0D,0x01,0x02,0x01,0x01,0x04,0x04,0x00 }; // ClosedComplete
  70 static const uint8_t primer_pack_key[]      = { 0x06,0x0E,0x2B,0x34,0x02,0x05,0x01,0x01,0x0D,0x01,0x02,0x01,0x01,0x05,0x01,0x00 };
  71
  72 /**
  73  * partial key for header metadata
  74  */
  75 static const uint8_t header_metadata_key[]  = { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0D,0x01,0x01,0x01,0x01 };
  76
  77 static const MXFCodecUL mxf_essence_element_key[] = {
  78     { { 0x06,0x0E,0x2B,0x34,0x01,0x02,0x01,0x01,0x0D,0x01,0x03,0x01,0x15,0x01,0x05,0x00 }, 14, CODEC_ID_MPEG2VIDEO},
  79     { { 0x06,0x0E,0x2B,0x34,0x01,0x02,0x01,0x01,0x0D,0x01,0x03,0x01,0x16,0x01,0x01,0x00 }, 14, CODEC_ID_PCM_S16LE},
  80     { { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, 0, CODEC_ID_NONE},
  81 };
  82
  83 static const uint8_t multiple_desc_ul[] = { 0x06,0x0E,0x2B,0x34,0x04,0x01,0x01,0x03,0x0D,0x01,0x03,0x01,0x02,0x7F,0x01,0x00 };
  84
  85 /**
  86  * SMPTE RP210 http://www.smpte-ra.org/mdd/index.html
  87  */
  88 static const MXFLocalTagPair mxf_local_tag_batch[] = {
  89     // preface set
  90     { 0x3C0A, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x01,0x01,0x15,0x02,0x00,0x00,0x00,0x00}}, /* Instance UID */
  91     { 0x3B02, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x01,0x10,0x02,0x04,0x00,0x00}}, /* Last Modified Date */
  92     { 0x3B05, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x03,0x01,0x02,0x01,0x05,0x00,0x00,0x00}}, /* Version */
  93     { 0x3B06, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x06,0x04,0x00,0x00}}, /* Identifications reference */
  94     { 0x3B03, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x02,0x01,0x00,0x00}}, /* Content Storage reference */
  95     { 0x3B09, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x01,0x02,0x02,0x03,0x00,0x00,0x00,0x00}}, /* Operational Pattern UL */
  96     { 0x3B0A, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x01,0x02,0x02,0x10,0x02,0x01,0x00,0x00}}, /* Essence Containers UL batch */
  97     { 0x3B0B, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x01,0x02,0x02,0x10,0x02,0x02,0x00,0x00}}, /* DM Schemes UL batch */
  98     // Identification
  99     { 0x3C09, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x20,0x07,0x01,0x01,0x00,0x00,0x00}}, /* This Generation UID */
 100     { 0x3C01, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x20,0x07,0x01,0x02,0x01,0x00,0x00}}, /* Company Name */
 101     { 0x3C02, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x20,0x07,0x01,0x03,0x01,0x00,0x00}}, /* Product Name */
 102     { 0x3C04, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x20,0x07,0x01,0x05,0x01,0x00,0x00}}, /* Version String */
 103     { 0x3C05, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x20,0x07,0x01,0x07,0x00,0x00,0x00}}, /* Product ID */
 104     { 0x3C06, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x01,0x10,0x02,0x03,0x00,0x00}}, /* Modification Date */
 105     // Content Storage
 106     { 0x1901, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x05,0x01,0x00,0x00}}, /* Package strong reference batch */
 107     // Essence Container Data
 108     { 0x2701, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x06,0x01,0x00,0x00,0x00}}, /* Linked Package UID */
 109     { 0x3F07, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x04,0x01,0x03,0x04,0x04,0x00,0x00,0x00,0x00}}, /* BodySID */
 110     // Package
 111     { 0x4401, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x01,0x01,0x15,0x10,0x00,0x00,0x00,0x00}}, /* Package UID */
 112     { 0x4405, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x01,0x10,0x01,0x03,0x00,0x00}}, /* Package Creation Date */
 113     { 0x4404, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x01,0x10,0x02,0x05,0x00,0x00}}, /* Package Modified Date */
 114     { 0x4403, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x06,0x05,0x00,0x00}}, /* Tracks Strong reference array */
 115     { 0x4701, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x02,0x03,0x00,0x00}}, /* Descriptor */
 116     // Track
 117     { 0x4801, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x01,0x07,0x01,0x01,0x00,0x00,0x00,0x00}}, /* Track ID */
 118     { 0x4804, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x01,0x03,0x00,0x00}}, /* Track Number */
 119     { 0x4B01, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x05,0x30,0x04,0x05,0x00,0x00,0x00,0x00}}, /* Edit Rate */
 120     { 0x4B02, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x01,0x03,0x01,0x03,0x00,0x00}}, /* Origin */
 121     { 0x4803, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x02,0x04,0x00,0x00}}, /* Sequence reference */
 122     // Sequence
 123     { 0x0201, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x04,0x07,0x01,0x00,0x00,0x00,0x00,0x00}}, /* Data Definition UL */
 124     { 0x0202, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x07,0x02,0x02,0x01,0x01,0x03,0x00,0x00}}, /* Duration */
 125     { 0x1001, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x06,0x09,0x00,0x00}}, /* Structural Components reference array */
 126     // Source Clip
 127     { 0x1201, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x07,0x02,0x01,0x03,0x01,0x0A,0x00,0x00}}, /* Start position */
 128     { 0x1101, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x03,0x01,0x00,0x00,0x00}}, /* SourcePackageID */
 129     { 0x1102, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x03,0x02,0x00,0x00,0x00}}, /* SourceTrackID */
 130     // File Descriptor
 131     { 0x3F01, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x04,0x06,0x01,0x01,0x04,0x06,0x0B,0x00,0x00}}, /* Sub Descriptors reference array */
 132     { 0x3006, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x06,0x01,0x01,0x03,0x05,0x00,0x00,0x00}}, /* Linked Track ID */
 133     { 0x3001, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x04,0x06,0x01,0x01,0x00,0x00,0x00,0x00}}, /* SampleRate */
 134     { 0x3004, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x06,0x01,0x01,0x04,0x01,0x02,0x00,0x00}}, /* Essence Container */
 135     // Generic Picture Essence Descriptor
 136     { 0x3203, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x04,0x01,0x05,0x02,0x02,0x00,0x00,0x00}}, /* Stored Width */
 137     { 0x3202, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x04,0x01,0x05,0x02,0x01,0x00,0x00,0x00}}, /* Stored Height */
 138     { 0x320E, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x01,0x04,0x01,0x01,0x01,0x01,0x00,0x00,0x00}}, /* Aspect Ratio */
 139     { 0x3201, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x04,0x01,0x06,0x01,0x00,0x00,0x00,0x00}}, /* Picture Essence Coding */
 140     // Generic Sound Essence Descriptor
 141     { 0x3D03, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x04,0x02,0x03,0x01,0x01,0x01,0x00,0x00}}, /* Audio sampling rate */
 142     { 0x3D07, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x05,0x04,0x02,0x01,0x01,0x04,0x00,0x00,0x00}}, /* ChannelCount */
 143     { 0x3D01, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x04,0x04,0x02,0x03,0x03,0x04,0x00,0x00,0x00}}, /* Quantization bits */
 144     { 0x3D06, {0x06,0x0E,0x2B,0x34,0x01,0x01,0x01,0x02,0x04,0x01,0x06,0x01,0x00,0x00,0x00,0x00}}, /* Sound Essence Compression */
 145 };
 146
 147 static void mxf_write_uuid(ByteIOContext *pb, enum CodecID type, int value)
 148 {
 149     put_buffer(pb, uuid_base, 12);
 150     put_be16(pb, type);
 151     put_be16(pb, value);
 152 }
 153
 154 static void mxf_write_umid(ByteIOContext *pb, enum CodecID type, int value)
 155 {
 156     put_buffer(pb, umid_base, 16);
 157     mxf_write_uuid(pb, type, value);
 158 }
 159
 160 static void mxf_write_refs_count(ByteIOContext *pb, int ref_count)
 161 {
 162     put_be32(pb, ref_count);
 163     put_be32(pb, 16);
 164 }
 165
 166 static int klv_encode_ber_length(ByteIOContext *pb, uint64_t len)
 167 {
 168     // Determine the best BER size
 169     int size;
 170     if (len < 128) {
 171         //short form
 172         put_byte(pb, len);
 173         return 1;
 174     }
 175
 176     size = (av_log2(len) >> 3) + 1;
 177
 178     // long form
 179     put_byte(pb, 0x80 + size);
 180     while(size) {
 181         size --;
 182         put_byte(pb, len >> 8 * size & 0xff);
 183     }
 184     return 0;
 185 }
 186
 187 /*
 188  * Get essence container ul and return its index position
 189  */
 190 static const UID *mxf_get_essence_container_ul(enum CodecID type, int *index)
 191 {
 192     const MXFCodecUL *uls = ff_mxf_essence_container_uls;
 193     for (*index = 0; *index < sizeof(ff_mxf_essence_container_uls)/sizeof(*ff_mxf_essence_container_uls); (*index)++)
 194         if (ff_mxf_essence_container_uls[*index].id == type)
 195             return &uls->uid;
 196     *index = -1;
 197     return NULL;
 198 }
 199
 200 static void mxf_write_primer_pack(AVFormatContext *s)
 201 {
 202     ByteIOContext *pb = s->pb;
 203     int local_tag_number, i = 0;
 204
 205     local_tag_number = sizeof(mxf_local_tag_batch) / sizeof(MXFLocalTagPair);
 206
 207     put_buffer(pb, primer_pack_key, 16);
 208     klv_encode_ber_length(pb, local_tag_number * 18 + 8);
 209
 210     put_be32(pb, local_tag_number); // local_tag num
 211     put_be32(pb, 18); // item size, always 18 according to the specs
 212
 213     for (i = 0; i < local_tag_number; i++) {
 214         put_be16(pb, mxf_local_tag_batch[i].local_tag);
 215         put_buffer(pb, mxf_local_tag_batch[i].uid, 16);
 216     }
 217 }
 218
 219 static void mxf_write_local_tag(ByteIOContext *pb, int size, int tag)
 220 {
 221     put_be16(pb, tag);
 222     put_be16(pb, size);
 223 }
 224
 225 static void mxf_write_metadata_key(ByteIOContext *pb, unsigned int value)
 226 {
 227     put_buffer(pb, header_metadata_key, 13);
 228     put_be24(pb, value);
 229 }
 230
 231 static void mxf_free(AVFormatContext *s)
 232 {
 233     AVStream *st;
 234     int i;
 235
 236     for (i = 0; i < s->nb_streams; i++) {
 237         st = s->streams[i];
 238         av_freep(&st->priv_data);
 239     }
 240 }
 241
 242 static const MXFDataDefinitionUL *mxf_get_data_definition_ul(enum CodecType type)
 243 {
 244     const MXFDataDefinitionUL *uls = ff_mxf_data_definition_uls;
 245     while (uls->type != CODEC_TYPE_DATA) {
 246         if (type == uls->type)
 247             break;
 248         uls++;
 249     }
 250     return uls;
 251 }
 252
 253 static void mxf_write_essence_container_refs(AVFormatContext *s)
 254 {
 255     MXFContext *c = s->priv_data;
 256     ByteIOContext *pb = s->pb;
 257     int i;
 258
 259     mxf_write_refs_count(pb, c->essence_container_count);
 260     av_log(s,AV_LOG_DEBUG, "essence container count:%d\n", c->essence_container_count);
 261     for (i = 0; i < c->essence_container_count; i++) {
 262         put_buffer(pb, ff_mxf_essence_container_uls[c->essence_containers_indices[i]].uid, 16);
 263         PRINT_KEY(s, "essence container ul:\n", ff_mxf_essence_container_uls[c->essence_containers_indices[i]].uid);
 264     }
 265 }
 266
 267 static void mxf_write_preface(AVFormatContext *s)
 268 {
 269     MXFContext *mxf = s->priv_data;
 270     ByteIOContext *pb = s->pb;
 271
 272     mxf_write_metadata_key(pb, 0x012f00);
 273     PRINT_KEY(s, "preface key", pb->buf_ptr - 16);
 274     klv_encode_ber_length(pb, 130 + 16 * mxf->essence_container_count);
 275
 276     // write preface set uid
 277     mxf_write_local_tag(pb, 16, 0x3C0A);
 278     mxf_write_uuid(pb, Preface, 0);
 279     PRINT_KEY(s, "preface uid", pb->buf_ptr - 16);
 280
 281     // write create date as unknown
 282     mxf_write_local_tag(pb, 8, 0x3B02);
 283     put_be64(pb, 0);
 284
 285     // write version
 286     mxf_write_local_tag(pb, 2, 0x3B05);
 287     put_be16(pb, 1);
 288
 289     // write identification_refs
 290     mxf_write_local_tag(pb, 16 + 8, 0x3B06);
 291     mxf_write_refs_count(pb, 1);
 292     mxf_write_uuid(pb, Identification, 0);
 293
 294     // write content_storage_refs
 295     mxf_write_local_tag(pb, 16, 0x3B03);
 296     mxf_write_uuid(pb, ContentStorage, 0);
 297
 298     mxf_write_local_tag(pb, 16, 0x3B09);
 299     put_buffer(pb, op1a_ul, 16);
 300
 301     // write essence_container_refs
 302     mxf_write_local_tag(pb, 8 + 16 * mxf->essence_container_count, 0x3B0A);
 303     mxf_write_essence_container_refs(s);
 304
 305     // write dm_scheme_refs
 306     mxf_write_local_tag(pb, 8, 0x3B0B);
 307     put_be64(pb, 0);
 308 }
 309
 310 /*
 311  * Write a local tag containing an ascii string as utf-16
 312  */
 313 static void mxf_write_local_tag_utf16(ByteIOContext *pb, int tag, const char *value)
 314 {
 315     int i, size = strlen(value);
 316     mxf_write_local_tag(pb, size*2, tag);
 317     for (i = 0; i < size; i++)
 318         put_be16(pb, value[i]);
 319 }
 320
 321 static void mxf_write_identification(AVFormatContext *s)
 322 {
 323     ByteIOContext *pb = s->pb;
 324     const char *company = "FFmpeg";
 325     const char *product = "OP1a Muxer";
 326     const char *version;
 327     int length;
 328
 329     mxf_write_metadata_key(pb, 0x013000);
 330     PRINT_KEY(s, "identification key", pb->buf_ptr - 16);
 331
 332     version = s->streams[0]->codec->flags & CODEC_FLAG_BITEXACT ?
 333         "0.0.0" : AV_STRINGIFY(LIBAVFORMAT_VERSION);
 334     length = 84 + (strlen(company)+strlen(product)+strlen(version))*2; // utf-16
 335     klv_encode_ber_length(pb, length);
 336
 337     // write uid
 338     mxf_write_local_tag(pb, 16, 0x3C0A);
 339     mxf_write_uuid(pb, Identification, 0);
 340     PRINT_KEY(s, "identification uid", pb->buf_ptr - 16);
 341
 342     // write generation uid
 343     mxf_write_local_tag(pb, 16, 0x3C09);
 344     mxf_write_uuid(pb, Identification, 1);
 345
 346     mxf_write_local_tag_utf16(pb, 0x3C01, company); // Company Name
 347     mxf_write_local_tag_utf16(pb, 0x3C02, product); // Product Name
 348     mxf_write_local_tag_utf16(pb, 0x3C04, version); // Version String
 349
 350     // write product uid
 351     mxf_write_local_tag(pb, 16, 0x3C05);
 352     mxf_write_uuid(pb, Identification, 2);
 353
 354     // write modified date
 355     mxf_write_local_tag(pb, 8, 0x3C06);
 356     put_be64(pb, 0);
 357 }
 358
 359 static void mxf_write_content_storage(AVFormatContext *s)
 360 {
 361     ByteIOContext *pb = s->pb;
 362
 363     mxf_write_metadata_key(pb, 0x011800);
 364     PRINT_KEY(s, "content storage key", pb->buf_ptr - 16);
 365     klv_encode_ber_length(pb, 64);
 366
 367     // write uid
 368     mxf_write_local_tag(pb, 16, 0x3C0A);
 369     mxf_write_uuid(pb, ContentStorage, 0);
 370     PRINT_KEY(s, "content storage uid", pb->buf_ptr - 16);
 371
 372     // write package reference
 373     mxf_write_local_tag(pb, 16 * 2 + 8, 0x1901);
 374     mxf_write_refs_count(pb, 2);
 375     mxf_write_uuid(pb, MaterialPackage, 0);
 376     mxf_write_uuid(pb, SourcePackage, 0);
 377 }
 378
 379 static void mxf_write_package(AVFormatContext *s, enum MXFMetadataSetType type)
 380 {
 381     ByteIOContext *pb = s->pb;
 382     int i;
 383
 384     if (type == MaterialPackage) {
 385         mxf_write_metadata_key(pb, 0x013600);
 386         PRINT_KEY(s, "Material Package key", pb->buf_ptr - 16);
 387         klv_encode_ber_length(pb, 92 + 16 * s->nb_streams);
 388     } else {
 389         mxf_write_metadata_key(pb, 0x013700);
 390         PRINT_KEY(s, "Source Package key", pb->buf_ptr - 16);
 391         klv_encode_ber_length(pb, 112 + 16 * s->nb_streams); // 20 bytes length for descriptor reference
 392     }
 393
 394     // write uid
 395     mxf_write_local_tag(pb, 16, 0x3C0A);
 396     mxf_write_uuid(pb, type, 0);
 397     av_log(s,AV_LOG_DEBUG, "package type:%d\n", type);
 398     PRINT_KEY(s, "package uid", pb->buf_ptr - 16);
 399
 400     // write package umid
 401     mxf_write_local_tag(pb, 32, 0x4401);
 402     mxf_write_umid(pb, type, 0);
 403     PRINT_KEY(s, "package umid second part", pb->buf_ptr - 16);
 404
 405     // write create date
 406     mxf_write_local_tag(pb, 8, 0x4405);
 407     put_be64(pb, 0);
 408
 409     // write modified date
 410     mxf_write_local_tag(pb, 8, 0x4404);
 411     put_be64(pb, 0);
 412
 413     // write track refs
 414     mxf_write_local_tag(pb, s->nb_streams * 16 + 8, 0x4403);
 415     mxf_write_refs_count(pb, s->nb_streams);
 416     for (i = 0; i < s->nb_streams; i++)
 417         mxf_write_uuid(pb, type == MaterialPackage ? Track : Track + TypeBottom, i);
 418
 419     // write multiple descriptor reference
 420     if (type == SourcePackage) {
 421         mxf_write_local_tag(pb, 16, 0x4701);
 422         mxf_write_uuid(pb, MultipleDescriptor, 0);
 423     }
 424 }
 425
 426 static void mxf_write_track(AVFormatContext *s, int stream_index, enum MXFMetadataSetType type, int *track_number_sign)
 427 {
 428     ByteIOContext *pb = s->pb;
 429     AVStream *st;
 430     MXFStreamContext *sc;
 431     const MXFCodecUL *element;
 432     int i = 0;
 433
 434     mxf_write_metadata_key(pb, 0x013b00);
 435     PRINT_KEY(s, "track key", pb->buf_ptr - 16);
 436     klv_encode_ber_length(pb, 80);
 437
 438     st = s->streams[stream_index];
 439     sc = st->priv_data;
 440
 441     // write track uid
 442     mxf_write_local_tag(pb, 16, 0x3C0A);
 443     mxf_write_uuid(pb, type == MaterialPackage ? Track : Track + TypeBottom, stream_index);
 444     PRINT_KEY(s, "track uid", pb->buf_ptr - 16);
 445
 446     // write track id
 447     mxf_write_local_tag(pb, 4, 0x4801);
 448     put_be32(pb, stream_index);
 449
 450     mxf_write_local_tag(pb, 4, 0x4804);
 451     if (type != MaterialPackage) {
 452         for (element = mxf_essence_element_key; element->id != CODEC_ID_NONE; element++) {
 453             if (st->codec->codec_id== element->id) {
 454                 // set essence_element key
 455                 memcpy(sc->track_essence_element_key, element->uid, 16);
 456                 sc->track_essence_element_key[15] += track_number_sign[i];
 457                 // write track number
 458                 put_buffer(pb, sc->track_essence_element_key + 12, 4);
 459
 460                 track_number_sign[i]++;
 461                 break;
 462             }
 463             i++;
 464         }
 465     } else
 466         put_be32(pb, 0); // track number of material package is 0
 467
 468     mxf_write_local_tag(pb, 8, 0x4B01);
 469     put_be32(pb, st->time_base.den);
 470     put_be32(pb, st->time_base.num);
 471
 472     // write origin
 473     mxf_write_local_tag(pb, 8, 0x4B02);
 474     put_be64(pb, 0);
 475
 476     // write sequence refs
 477     mxf_write_local_tag(pb, 16, 0x4803);
 478     mxf_write_uuid(pb, type == MaterialPackage ? Sequence: Sequence + TypeBottom, stream_index);
 479 }
 480
 481 static void mxf_write_common_fields(ByteIOContext *pb, AVStream *st)
 482 {
 483     const MXFDataDefinitionUL *data_def_ul;
 484
 485     // find data define uls
 486     data_def_ul = mxf_get_data_definition_ul(st->codec->codec_type);
 487     mxf_write_local_tag(pb, 16, 0x0201);
 488     put_buffer(pb, data_def_ul->uid, 16);
 489
 490     // write duration
 491     mxf_write_local_tag(pb, 8, 0x0202);
 492     put_be64(pb, st->duration);
 493 }
 494
 495 static void mxf_write_sequence(AVFormatContext *s, int stream_index, enum MXFMetadataSetType type)
 496 {
 497     ByteIOContext *pb = s->pb;
 498     AVStream *st;
 499
 500     mxf_write_metadata_key(pb, 0x010f00);
 501     PRINT_KEY(s, "sequence key", pb->buf_ptr - 16);
 502     klv_encode_ber_length(pb, 80);
 503
 504     st = s->streams[stream_index];
 505
 506     mxf_write_local_tag(pb, 16, 0x3C0A);
 507     mxf_write_uuid(pb, type == MaterialPackage ? Sequence: Sequence + TypeBottom, stream_index);
 508
 509     PRINT_KEY(s, "sequence uid", pb->buf_ptr - 16);
 510     mxf_write_common_fields(pb, st);
 511
 512     // write structural component
 513     mxf_write_local_tag(pb, 16 + 8, 0x1001);
 514     mxf_write_refs_count(pb, 1);
 515     mxf_write_uuid(pb, type == MaterialPackage ? SourceClip: SourceClip + TypeBottom, stream_index);
 516 }
 517
 518 static void mxf_write_structural_component(AVFormatContext *s, int stream_index, enum MXFMetadataSetType type)
 519 {
 520     ByteIOContext *pb = s->pb;
 521     AVStream *st;
 522     int i;
 523
 524     mxf_write_metadata_key(pb, 0x011100);
 525     PRINT_KEY(s, "sturctural component key", pb->buf_ptr - 16);
 526     klv_encode_ber_length(pb, 108);
 527
 528     st = s->streams[stream_index];
 529
 530     // write uid
 531     mxf_write_local_tag(pb, 16, 0x3C0A);
 532     mxf_write_uuid(pb, type == MaterialPackage ? SourceClip: SourceClip + TypeBottom, stream_index);
 533
 534     PRINT_KEY(s, "structural component uid", pb->buf_ptr - 16);
 535     mxf_write_common_fields(pb, st);
 536
 537     // write start_position
 538     mxf_write_local_tag(pb, 8, 0x1201);
 539     put_be64(pb, 0);
 540
 541     // write source package uid, end of the reference
 542     mxf_write_local_tag(pb, 32, 0x1101);
 543     if (type == SourcePackage) {
 544         for (i = 0; i < 4; i++)
 545             put_be64(pb, 0);
 546     } else
 547         mxf_write_umid(pb, SourcePackage, 0);
 548
 549     // write source track id
 550     mxf_write_local_tag(pb, 4, 0x1102);
 551     if (type == SourcePackage)
 552         put_be32(pb, 0);
 553     else
 554         put_be32(pb, stream_index);
 555 }
 556
 557 static void mxf_write_multi_descriptor(AVFormatContext *s)
 558 {
 559     ByteIOContext *pb = s->pb;
 560     int i;
 561
 562     mxf_write_metadata_key(pb, 0x014400);
 563     PRINT_KEY(s, "multiple descriptor key", pb->buf_ptr - 16);
 564     klv_encode_ber_length(pb, 64 + 16 * s->nb_streams);
 565
 566     mxf_write_local_tag(pb, 16, 0x3C0A);
 567     mxf_write_uuid(pb, MultipleDescriptor, 0);
 568     PRINT_KEY(s, "multi_desc uid", pb->buf_ptr - 16);
 569
 570     // write sample rate
 571     mxf_write_local_tag(pb, 8, 0x3001);
 572     put_be32(pb, s->streams[0]->time_base.den);
 573     put_be32(pb, s->streams[0]->time_base.num);
 574
 575     // write essence container ul
 576     mxf_write_local_tag(pb, 16, 0x3004);
 577     put_buffer(pb, multiple_desc_ul, 16);
 578
 579     // write sub descriptor refs
 580     mxf_write_local_tag(pb, s->nb_streams * 16 + 8, 0x3F01);
 581     mxf_write_refs_count(pb, s->nb_streams);
 582     for (i = 0; i < s->nb_streams; i++)
 583         mxf_write_uuid(pb, SubDescriptor, i);
 584 }
 585
 586 static void mxf_write_generic_desc(ByteIOContext *pb, const MXFDescriptorWriteTableEntry *desc_tbl, AVStream *st)
 587 {
 588     MXFStreamContext *sc = st->priv_data;
 589
 590     put_buffer(pb, desc_tbl->key, 16);
 591     klv_encode_ber_length(pb, 108);
 592
 593     mxf_write_local_tag(pb, 16, 0x3C0A);
 594     mxf_write_uuid(pb, SubDescriptor, st->index);
 595
 596     mxf_write_local_tag(pb, 4, 0x3006);
 597     put_be32(pb, st->index);
 598
 599     mxf_write_local_tag(pb, 8, 0x3001);
 600     put_be32(pb, st->time_base.den);
 601     put_be32(pb, st->time_base.num);
 602
 603     mxf_write_local_tag(pb, 16, 0x3004);
 604     put_buffer(pb, *sc->essence_container_ul, 16);
 605 }
 606
 607 static void mxf_write_mpegvideo_desc(AVFormatContext *s, const MXFDescriptorWriteTableEntry *desc_tbl, int stream_index)
 608 {
 609     ByteIOContext *pb = s->pb;
 610     AVStream *st;
 611
 612     st = s->streams[stream_index];
 613     mxf_write_generic_desc(pb, desc_tbl, st);
 614
 615     mxf_write_local_tag(pb, 4, 0x3203);
 616     put_be32(pb, st->codec->width);
 617
 618     mxf_write_local_tag(pb, 4, 0x3202);
 619     put_be32(pb, st->codec->height);
 620
 621     mxf_write_local_tag(pb, 8, 0x320E);
 622     put_be32(pb, st->codec->height * st->sample_aspect_ratio.den);
 623     put_be32(pb, st->codec->width  * st->sample_aspect_ratio.num);
 624
 625     // tmp write, will modified later
 626     mxf_write_local_tag(pb, 16, 0x3201);
 627     put_buffer(pb, ff_mxf_codec_uls->uid, 16);
 628 }
 629
 630 static void mxf_write_wav_desc(AVFormatContext *s, const MXFDescriptorWriteTableEntry *desc_tbl, int stream_index)
 631 {
 632     ByteIOContext *pb = s->pb;
 633     AVStream *st;
 634
 635     st = s->streams[stream_index];
 636     mxf_write_generic_desc(pb, desc_tbl, st);
 637
 638     // write audio sampling rate
 639     mxf_write_local_tag(pb, 8, 0x3D03);
 640     put_be32(pb, st->codec->sample_rate);
 641     put_be32(pb, 1);
 642
 643     mxf_write_local_tag(pb, 4, 0x3D07);
 644     put_be32(pb, st->codec->channels);
 645
 646     mxf_write_local_tag(pb, 4, 0x3D01);
 647     put_be32(pb, st->codec->bits_per_sample);
 648
 649     // tmp write, will modified later
 650     mxf_write_local_tag(pb, 16, 0x3201);
 651     put_buffer(pb, (ff_mxf_codec_uls + 8)->uid, 16);
 652 }
 653
 654 static const MXFDescriptorWriteTableEntry mxf_descriptor_write_table[] = {
 655     { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x51,0x00 }, mxf_write_mpegvideo_desc, CODEC_ID_MPEG2VIDEO},
 656     { { 0x06,0x0E,0x2B,0x34,0x02,0x53,0x01,0x01,0x0d,0x01,0x01,0x01,0x01,0x01,0x48,0x00 }, mxf_write_wav_desc, CODEC_ID_PCM_S16LE},
 657     { { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, NULL, CODEC_ID_NONE},
 658 };
 659
 660 static void mxf_build_structural_metadata(AVFormatContext *s, enum MXFMetadataSetType type)
 661 {
 662     int i;
 663     const MXFDescriptorWriteTableEntry *desc = NULL;
 664     int track_number_sign[sizeof(mxf_essence_element_key)/sizeof(MXFCodecUL)] = { 0 };
 665
 666     mxf_write_package(s, type);
 667     if (type == SourcePackage)
 668         mxf_write_multi_descriptor(s);
 669
 670     for (i = 0;i < s->nb_streams; i++) {
 671         mxf_write_track(s, i, type, track_number_sign);
 672         mxf_write_sequence(s, i, type);
 673         mxf_write_structural_component(s, i, type);
 674
 675         if (type == SourcePackage) {
 676             for (desc = mxf_descriptor_write_table; desc->write; desc++) {
 677                 if (s->streams[i]->codec->codec_id == desc->type) {
 678                     desc->write(s, desc, i);
 679                     break;
 680                 }
 681             }
 682         }
 683     }
 684 }
 685
 686 static int mxf_write_header_metadata_sets(AVFormatContext *s)
 687 {
 688     mxf_write_preface(s);
 689     mxf_write_identification(s);
 690     mxf_write_content_storage(s);
 691     mxf_build_structural_metadata(s, MaterialPackage);
 692     mxf_build_structural_metadata(s, SourcePackage);
 693     return 0;
 694 }
 695
 696 static void mxf_write_partition(AVFormatContext *s, int64_t byte_position, int bodysid, const uint8_t *key)
 697 {
 698     MXFContext *mxf = s->priv_data;
 699     ByteIOContext *pb = s->pb;
 700
 701     // write klv
 702     put_buffer(pb, key, 16);
 703
 704     klv_encode_ber_length(pb, 88 + 16 * mxf->essence_container_count);
 705
 706     // write partition value
 707     put_be16(pb, 1); // majorVersion
 708     put_be16(pb, 2); // minorVersion
 709     put_be32(pb, 1); // kagSize
 710
 711     put_be64(pb, byte_position); // thisPartition
 712     put_be64(pb, 0); // previousPartition
 713
 714     // set offset
 715     if (!byte_position)
 716         mxf->header_footer_partition_offset = url_ftell(pb);
 717     put_be64(pb, byte_position); // footerPartition,update later
 718
 719     // set offset
 720     if (!byte_position)
 721         mxf->header_byte_count_offset = url_ftell(pb);
 722     put_be64(pb, 0); // headerByteCount, update later
 723
 724     // no indexTable
 725     put_be64(pb, 0); // indexByteCount
 726     put_be32(pb, 0); // indexSID
 727     put_be64(pb, 0); // bodyOffset
 728
 729     put_be32(pb, bodysid); // bodySID
 730     put_buffer(pb, op1a_ul, 16); // operational pattern
 731
 732     // essence container
 733     mxf_write_essence_container_refs(s);
 734 }
 735
 736 static int mux_write_header(AVFormatContext *s)
 737 {
 738     MXFContext *mxf = s->priv_data;
 739     ByteIOContext *pb = s->pb;
 740     int64_t header_metadata_start, offset_now;
 741     int i, index;
 742     uint8_t present[sizeof(ff_mxf_essence_container_uls)/
 743                     sizeof(*ff_mxf_essence_container_uls)] = {0};
 744
 745     for (i = 0; i < s->nb_streams; i++) {
 746         AVStream *st = s->streams[i];
 747         MXFStreamContext *sc = av_mallocz(sizeof(MXFStreamContext));
 748         if (!sc)
 749             return AVERROR(ENOMEM);
 750         st->priv_data = sc;
 751         // set pts information
 752         if (st->codec->codec_type == CODEC_TYPE_VIDEO)
 753             av_set_pts_info(st, 64, 1, st->codec->time_base.den);
 754         else if (st->codec->codec_type == CODEC_TYPE_AUDIO)
 755             av_set_pts_info(st, 64, 1, st->codec->sample_rate);
 756         sc->essence_container_ul = mxf_get_essence_container_ul(st->codec->codec_id, &index);
 757         if (!sc->essence_container_ul) {
 758             av_log(s, AV_LOG_ERROR, "track %d: could not find essence container ul, "
 759                    "codec not currently supported in container\n", i);
 760             return -1;
 761         }
 762         if (!present[index]) {
 763             mxf->essence_containers_indices[mxf->essence_container_count++] = index;
 764             present[index] = 1;
 765         }
 766     }
 767
 768     mxf_write_partition(s, 0, 1, header_partition_key);
 769
 770     // mark the start of the headermetadata and calculate metadata size
 771     header_metadata_start = url_ftell(s->pb);
 772     mxf_write_primer_pack(s);
 773     if (mxf_write_header_metadata_sets(s) < 0)
 774         goto fail;
 775     offset_now = url_ftell(s->pb);
 776     mxf->header_byte_count = offset_now - header_metadata_start;
 777     // update header_byte_count
 778     url_fseek(pb, mxf->header_byte_count_offset, SEEK_SET);
 779     put_be64(pb, mxf->header_byte_count);
 780     url_fseek(pb, offset_now, SEEK_SET);
 781
 782     put_flush_packet(pb);
 783     return 0;
 784 fail:
 785     mxf_free(s);
 786     return -1;
 787 }
 788
 789 static int mux_write_packet(AVFormatContext *s, AVPacket *pkt)
 790 {
 791     ByteIOContext *pb = s->pb;
 792     AVStream *st = s->streams[pkt->stream_index];
 793     MXFStreamContext *sc = st->priv_data;
 794
 795     put_buffer(pb, sc->track_essence_element_key, 16); // write key
 796     klv_encode_ber_length(pb, pkt->size); // write length
 797     put_buffer(pb, pkt->data, pkt->size); // write value
 798
 799     put_flush_packet(pb);
 800     return 0;
 801 }
 802
 803 static void mxf_update_header_partition(AVFormatContext *s, int64_t footer_partition_offset)
 804 {
 805     MXFContext *mxf = s->priv_data;
 806     ByteIOContext *pb = s->pb;
 807
 808     url_fseek(pb, mxf->header_footer_partition_offset, SEEK_SET);
 809     put_be64(pb, footer_partition_offset);
 810     put_flush_packet(pb);
 811 }
 812
 813
 814 static int mux_write_footer(AVFormatContext *s)
 815 {
 816     ByteIOContext *pb = s->pb;
 817     int64_t byte_position= url_ftell(pb);
 818
 819     if (!url_is_streamed(s->pb)) {
 820         mxf_write_partition(s, byte_position, 0, footer_partition_key);
 821         put_flush_packet(pb);
 822         mxf_update_header_partition(s, byte_position);
 823     }
 824     mxf_free(s);
 825     return 0;
 826 }
 827
 828 AVOutputFormat mxf_muxer = {
 829     "mxf",
 830     NULL_IF_CONFIG_SMALL("Material eXchange Format"),
 831     NULL,
 832     "mxf",
 833     sizeof(MXFContext),
 834     CODEC_ID_PCM_S16LE,
 835     CODEC_ID_MPEG2VIDEO,
 836     mux_write_header,
 837     mux_write_packet,
 838     mux_write_footer,
 839 };
 840
 841