libhb/muxmp4.c

   1 /* $Id: muxmp4.c,v 1.24 2005/11/04 13:09:41 titer Exp $
   2
   3    This file is part of the HandBrake source code.
   4    Homepage: <http://handbrake.fr/>.
   5    It may be used under the terms of the GNU General Public License. */
   6
   7 #include "mp4v2/mp4v2.h"
   8 #include "a52dec/a52.h"
   9
  10 #include "hb.h"
  11
  12 struct hb_mux_object_s
  13 {
  14     HB_MUX_COMMON;
  15
  16     hb_job_t * job;
  17
  18     /* libmp4v2 handle */
  19     MP4FileHandle file;
  20
  21     int64_t sum_dur;    // sum of video frame durations so far
  22
  23     // bias to keep render offsets in ctts atom positive (set up by encx264)
  24     int64_t init_delay;
  25
  26     /* Chapter state information for muxing */
  27     MP4TrackId chapter_track;
  28     int current_chapter;
  29     uint64_t chapter_duration;
  30 };
  31
  32 struct hb_mux_data_s
  33 {
  34     MP4TrackId  track;
  35     uint8_t     subtitle;
  36     int         sub_format;
  37
  38     uint64_t    sum_dur; // sum of the frame durations so far
  39 };
  40
  41 /* Tune video track chunk duration.
  42  * libmp4v2 default duration == dusamplerate == 1 second.
  43  * Per van's suggestion we desire duration == 4 frames.
  44  * Should be invoked immediately after track creation.
  45  *
  46  * return true on fail, false on success.
  47  */
  48 static int MP4TuneTrackDurationPerChunk( hb_mux_object_t* m, MP4TrackId trackId )
  49 {
  50     uint32_t tscale;
  51     MP4Duration dur;
  52
  53     tscale = MP4GetTrackTimeScale( m->file, trackId );
  54     dur = (MP4Duration)ceil( (double)tscale * (double)m->job->vrate_base / (double)m->job->vrate * 4.0 );
  55
  56     if( !MP4SetTrackDurationPerChunk( m->file, trackId, dur ))
  57     {
  58         hb_error( "muxmp4.c: MP4SetTrackDurationPerChunk failed!" );
  59         *m->job->die = 1;
  60         return 0;
  61     }
  62
  63     hb_deep_log( 2, "muxmp4: track %u, chunk duration %"PRIu64, MP4FindTrackIndex( m->file, trackId ), dur );
  64     return 1;
  65 }
  66
  67 /**********************************************************************
  68  * MP4Init
  69  **********************************************************************
  70  * Allocates hb_mux_data_t structures, create file and write headers
  71  *********************************************************************/
  72 static int MP4Init( hb_mux_object_t * m )
  73 {
  74     hb_job_t   * job   = m->job;
  75     hb_title_t * title = job->title;
  76
  77     hb_audio_t    * audio;
  78     hb_mux_data_t * mux_data;
  79     int i;
  80     int subtitle_default;
  81
  82     /* Flags for enabling/disabling tracks in an MP4. */
  83     typedef enum { TRACK_DISABLED = 0x0, TRACK_ENABLED = 0x1, TRACK_IN_MOVIE = 0x2, TRACK_IN_PREVIEW = 0x4, TRACK_IN_POSTER = 0x8}  track_header_flags;
  84
  85     /* Create an empty mp4 file */
  86     if (job->largeFileSize)
  87     /* Use 64-bit MP4 file */
  88     {
  89         m->file = MP4Create( job->file, MP4_DETAILS_ERROR, MP4_CREATE_64BIT_DATA );
  90         hb_deep_log( 2, "muxmp4: using 64-bit MP4 formatting.");
  91     }
  92     else
  93     /* Limit MP4s to less than 4 GB */
  94     {
  95         m->file = MP4Create( job->file, MP4_DETAILS_ERROR, 0 );
  96     }
  97
  98     if (m->file == MP4_INVALID_FILE_HANDLE)
  99     {
 100         hb_error("muxmp4.c: MP4Create failed!");
 101         *job->die = 1;
 102         return 0;
 103     }
 104
 105     /* Video track */
 106     mux_data      = calloc(1, sizeof( hb_mux_data_t ) );
 107     job->mux_data = mux_data;
 108
 109     if (!(MP4SetTimeScale( m->file, 90000 )))
 110     {
 111         hb_error("muxmp4.c: MP4SetTimeScale failed!");
 112         *job->die = 1;
 113         return 0;
 114     }
 115
 116     if( job->vcodec == HB_VCODEC_X264 )
 117     {
 118         /* Stolen from mp4creator */
 119         MP4SetVideoProfileLevel( m->file, 0x7F );
 120                 mux_data->track = MP4AddH264VideoTrack( m->file, 90000,
 121                         MP4_INVALID_DURATION, job->width, job->height,
 122                         job->config.h264.sps[1], /* AVCProfileIndication */
 123                         job->config.h264.sps[2], /* profile_compat */
 124                         job->config.h264.sps[3], /* AVCLevelIndication */
 125                         3 );      /* 4 bytes length before each NAL unit */
 126         if ( mux_data->track == MP4_INVALID_TRACK_ID )
 127         {
 128             hb_error( "muxmp4.c: MP4AddH264VideoTrack failed!" );
 129             *job->die = 1;
 130             return 0;
 131         }
 132
 133         /* Tune track chunk duration */
 134         if( !MP4TuneTrackDurationPerChunk( m, mux_data->track ))
 135         {
 136             return 0;
 137         }
 138
 139         MP4AddH264SequenceParameterSet( m->file, mux_data->track,
 140                 job->config.h264.sps, job->config.h264.sps_length );
 141         MP4AddH264PictureParameterSet( m->file, mux_data->track,
 142                 job->config.h264.pps, job->config.h264.pps_length );
 143
 144                 if( job->h264_level == 30 || job->ipod_atom)
 145                 {
 146                         hb_deep_log( 2, "muxmp4: adding iPod atom");
 147                         MP4AddIPodUUID(m->file, mux_data->track);
 148                 }
 149
 150         m->init_delay = job->config.h264.init_delay;
 151     }
 152     else /* FFmpeg or XviD */
 153     {
 154         MP4SetVideoProfileLevel( m->file, MPEG4_SP_L3 );
 155         mux_data->track = MP4AddVideoTrack( m->file, 90000,
 156                 MP4_INVALID_DURATION, job->width, job->height,
 157                 MP4_MPEG4_VIDEO_TYPE );
 158         if (mux_data->track == MP4_INVALID_TRACK_ID)
 159         {
 160             hb_error("muxmp4.c: MP4AddVideoTrack failed!");
 161             *job->die = 1;
 162             return 0;
 163         }
 164
 165         /* Tune track chunk duration */
 166         if( !MP4TuneTrackDurationPerChunk( m, mux_data->track ))
 167         {
 168             return 0;
 169         }
 170
 171         /* VOL from FFmpeg or XviD */
 172         if (!(MP4SetTrackESConfiguration( m->file, mux_data->track,
 173                 job->config.mpeg4.bytes, job->config.mpeg4.length )))
 174         {
 175             hb_error("muxmp4.c: MP4SetTrackESConfiguration failed!");
 176             *job->die = 1;
 177             return 0;
 178         }
 179     }
 180
 181     // COLR atom for color and gamma correction.
 182     // Per the notes at:
 183     //   http://developer.apple.com/quicktime/icefloe/dispatch019.html#colr
 184     //   http://forum.doom9.org/showthread.php?t=133982#post1090068
 185     // the user can set it from job->color_matrix, otherwise by default
 186     // we say anything that's likely to be HD content is ITU BT.709 and
 187     // DVD, SD TV & other content is ITU BT.601.  We look at the title height
 188     // rather than the job height here to get uncropped input dimensions.
 189     if( job->color_matrix == 1 )
 190     {
 191         // ITU BT.601 DVD or SD TV content
 192         MP4AddColr(m->file, mux_data->track, 6, 1, 6);
 193     }
 194     else if( job->color_matrix == 2 )
 195     {
 196         // ITU BT.709 HD content
 197         MP4AddColr(m->file, mux_data->track, 1, 1, 1);
 198     }
 199     else if ( job->title->width >= 1280 || job->title->height >= 720 )
 200     {
 201         // we guess that 720p or above is ITU BT.709 HD content
 202         MP4AddColr(m->file, mux_data->track, 1, 1, 1);
 203     }
 204     else
 205     {
 206         // ITU BT.601 DVD or SD TV content
 207         MP4AddColr(m->file, mux_data->track, 6, 1, 6);
 208     }
 209
 210     if( job->anamorphic.mode )
 211     {
 212         /* PASP atom for anamorphic video */
 213         float width, height;
 214
 215         width  = job->anamorphic.par_width;
 216
 217         height = job->anamorphic.par_height;
 218
 219         MP4AddPixelAspectRatio(m->file, mux_data->track, (uint32_t)width, (uint32_t)height);
 220
 221         MP4SetTrackFloatProperty(m->file, mux_data->track, "tkhd.width", job->width * (width / height));
 222     }
 223
 224         /* add the audio tracks */
 225     for( i = 0; i < hb_list_count( title->list_audio ); i++ )
 226     {
 227         audio = hb_list_item( title->list_audio, i );
 228         mux_data = calloc(1, sizeof( hb_mux_data_t ) );
 229         audio->priv.mux_data = mux_data;
 230
 231         if( audio->config.out.codec == HB_ACODEC_AC3 )
 232         {
 233             uint8_t fscod = 0;
 234             uint8_t bsid = audio->config.in.version;
 235             uint8_t bsmod = audio->config.in.mode;
 236             uint8_t acmod = audio->config.flags.ac3 & 0x7;
 237             uint8_t lfeon = (audio->config.flags.ac3 & A52_LFE) ? 1 : 0;
 238             uint8_t bit_rate_code = 0;
 239
 240             /*
 241              * Rewrite AC3 information into correct format for dac3 atom
 242              */
 243             switch( audio->config.in.samplerate )
 244             {
 245             case 48000:
 246                 fscod = 0;
 247                 break;
 248             case 44100:
 249                 fscod = 1;
 250                 break;
 251             case 32000:
 252                 fscod = 2;
 253                 break;
 254             default:
 255                 /*
 256                  * Error value, tells decoder to not decode this audio.
 257                  */
 258                 fscod = 3;
 259                 break;
 260             }
 261
 262             switch( audio->config.in.bitrate )
 263             {
 264             case 32000:
 265                 bit_rate_code = 0;
 266                 break;
 267             case 40000:
 268                 bit_rate_code = 1;
 269                 break;
 270             case 48000:
 271                 bit_rate_code = 2;
 272                 break;
 273             case 56000:
 274                 bit_rate_code = 3;
 275                 break;
 276             case 64000:
 277                 bit_rate_code = 4;
 278                 break;
 279             case 80000:
 280                 bit_rate_code = 5;
 281                 break;
 282             case 96000:
 283                 bit_rate_code = 6;
 284                 break;
 285             case 112000:
 286                 bit_rate_code = 7;
 287                 break;
 288             case 128000:
 289                 bit_rate_code = 8;
 290                 break;
 291             case 160000:
 292                 bit_rate_code = 9;
 293                 break;
 294             case 192000:
 295                 bit_rate_code = 10;
 296                 break;
 297             case 224000:
 298                 bit_rate_code = 11;
 299                 break;
 300             case 256000:
 301                 bit_rate_code = 12;
 302                 break;
 303             case 320000:
 304                 bit_rate_code = 13;
 305                 break;
 306             case 384000:
 307                 bit_rate_code = 14;
 308                 break;
 309             case 448000:
 310                 bit_rate_code = 15;
 311                 break;
 312             case 512000:
 313                 bit_rate_code = 16;
 314                 break;
 315             case 576000:
 316                 bit_rate_code = 17;
 317                 break;
 318             case 640000:
 319                 bit_rate_code = 18;
 320                 break;
 321             default:
 322                 hb_error("Unknown AC3 bitrate");
 323                 bit_rate_code = 0;
 324                 break;
 325             }
 326
 327             mux_data->track = MP4AddAC3AudioTrack(
 328                 m->file,
 329                 audio->config.out.samplerate,
 330                 fscod,
 331                 bsid,
 332                 bsmod,
 333                 acmod,
 334                 lfeon,
 335                 bit_rate_code);
 336
 337             /* Tune track chunk duration */
 338             MP4TuneTrackDurationPerChunk( m, mux_data->track );
 339
 340             if (audio->config.out.name == NULL) {
 341                 MP4SetTrackBytesProperty(
 342                     m->file, mux_data->track,
 343                     "udta.name.value",
 344                     (const uint8_t*)"Surround", strlen("Surround"));
 345             }
 346             else {
 347                 MP4SetTrackBytesProperty(
 348                     m->file, mux_data->track,
 349                     "udta.name.value",
 350                     (const uint8_t*)(audio->config.out.name),
 351                     strlen(audio->config.out.name));
 352             }
 353         } else {
 354             mux_data->track = MP4AddAudioTrack(
 355                 m->file,
 356                 audio->config.out.samplerate, 1024, MP4_MPEG4_AUDIO_TYPE );
 357
 358             /* Tune track chunk duration */
 359             MP4TuneTrackDurationPerChunk( m, mux_data->track );
 360
 361             if (audio->config.out.name == NULL) {
 362                 MP4SetTrackBytesProperty(
 363                     m->file, mux_data->track,
 364                     "udta.name.value",
 365                     (const uint8_t*)"Stereo", strlen("Stereo"));
 366             }
 367             else {
 368                 MP4SetTrackBytesProperty(
 369                     m->file, mux_data->track,
 370                     "udta.name.value",
 371                     (const uint8_t*)(audio->config.out.name),
 372                     strlen(audio->config.out.name));
 373             }
 374
 375             MP4SetAudioProfileLevel( m->file, 0x0F );
 376             MP4SetTrackESConfiguration(
 377                 m->file, mux_data->track,
 378                 audio->priv.config.aac.bytes, audio->priv.config.aac.length );
 379
 380             /* Set the correct number of channels for this track */
 381              MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.mp4a.channels", (uint16_t)HB_AMIXDOWN_GET_DISCRETE_CHANNEL_COUNT(audio->config.out.mixdown));
 382         }
 383
 384         /* Set the language for this track */
 385         MP4SetTrackLanguage(m->file, mux_data->track, audio->config.lang.iso639_2);
 386
 387         if( hb_list_count( title->list_audio ) > 1 )
 388         {
 389             /* Set the audio track alternate group */
 390             MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.alternate_group", 1);
 391         }
 392
 393         if (i == 0) {
 394             /* Enable the first audio track */
 395             MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.flags", (TRACK_ENABLED | TRACK_IN_MOVIE));
 396         }
 397         else
 398             /* Disable the other audio tracks so QuickTime doesn't play
 399                them all at once. */
 400         {
 401             MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.flags", (TRACK_DISABLED | TRACK_IN_MOVIE));
 402             hb_deep_log( 2, "muxmp4: disabled extra audio track %u", MP4FindTrackIndex( m->file, mux_data->track ));
 403         }
 404
 405     }
 406
 407     // Quicktime requires that at least one subtitle is enabled,
 408     // else it doesn't show any of the subtitles.
 409     // So check to see if any of the subtitles are flagged to be
 410     // the defualt.  The default will the the enabled track, else
 411     // enable the first track.
 412     subtitle_default = 0;
 413     for( i = 0; i < hb_list_count( job->list_subtitle ); i++ )
 414     {
 415         hb_subtitle_t *subtitle = hb_list_item( job->list_subtitle, i );
 416
 417         if( subtitle && subtitle->format == TEXTSUB &&
 418             subtitle->config.dest == PASSTHRUSUB )
 419         {
 420             if ( subtitle->config.default_track )
 421                 subtitle_default = 1;
 422         }
 423     }
 424     for( i = 0; i < hb_list_count( job->list_subtitle ); i++ )
 425     {
 426         hb_subtitle_t *subtitle = hb_list_item( job->list_subtitle, i );
 427
 428         if( subtitle && subtitle->format == TEXTSUB &&
 429             subtitle->config.dest == PASSTHRUSUB )
 430         {
 431             uint64_t width, height = 60;
 432             if( job->anamorphic.mode )
 433                 width = job->width * ( (float) job->anamorphic.par_width / job->anamorphic.par_height );
 434             else
 435                 width = job->width;
 436
 437             mux_data = calloc(1, sizeof( hb_mux_data_t ) );
 438             subtitle->mux_data = mux_data;
 439             mux_data->subtitle = 1;
 440             mux_data->sub_format = subtitle->format;
 441             mux_data->track = MP4AddSubtitleTrack( m->file, 90000, width, height );
 442
 443             MP4SetTrackLanguage(m->file, mux_data->track, subtitle->iso639_2);
 444
 445             /* Tune track chunk duration */
 446             MP4TuneTrackDurationPerChunk( m, mux_data->track );
 447
 448             const uint8_t textColor[4] = { 255,255,255,255 };
 449
 450             MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.alternate_group", 2);
 451
 452             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.dataReferenceIndex", 1);
 453             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.horizontalJustification", 1);
 454             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.verticalJustification", 0);
 455
 456             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.bgColorAlpha", 255);
 457
 458             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.defTextBoxBottom", height);
 459             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.defTextBoxRight", width);
 460
 461             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontID", 1);
 462             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontSize", 24);
 463
 464             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontColorRed", textColor[0]);
 465             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontColorGreen", textColor[1]);
 466             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontColorBlue", textColor[2]);
 467             MP4SetTrackIntegerProperty(m->file, mux_data->track, "mdia.minf.stbl.stsd.tx3g.fontColorAlpha", textColor[3]);
 468
 469             /* translate the track */
 470             uint8_t* val;
 471             uint8_t nval[36];
 472             uint32_t *ptr32 = (uint32_t*) nval;
 473             uint32_t size;
 474
 475             MP4GetTrackBytesProperty(m->file, mux_data->track, "tkhd.matrix", &val, &size);
 476             memcpy(nval, val, size);
 477
 478             const uint32_t ytranslation = (job->height - height) * 0x10000;
 479
 480 #ifdef WORDS_BIGENDIAN
 481             ptr32[7] = ytranslation;
 482 #else
 483             /* we need to switch the endianness, as the file format expects big endian */
 484             ptr32[7] = ((ytranslation & 0x000000FF) << 24) + ((ytranslation & 0x0000FF00) << 8) +
 485                             ((ytranslation & 0x00FF0000) >> 8) + ((ytranslation & 0xFF000000) >> 24);
 486 #endif
 487
 488             MP4SetTrackBytesProperty(m->file, mux_data->track, "tkhd.matrix", nval, size);
 489             if ( !subtitle_default || subtitle->config.default_track ) {
 490                 /* Enable the default subtitle track */
 491                 MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.flags", (TRACK_ENABLED | TRACK_IN_MOVIE));
 492                 subtitle_default = 1;
 493             }
 494             else
 495             {
 496                 MP4SetTrackIntegerProperty(m->file, mux_data->track, "tkhd.flags", (TRACK_DISABLED | TRACK_IN_MOVIE));
 497             }
 498         }
 499     }
 500
 501     if (job->chapter_markers)
 502     {
 503         /* add a text track for the chapters. We add the 'chap' atom to track
 504            one which is usually the video track & should never be disabled.
 505            The Quicktime spec says it doesn't matter which media track the
 506            chap atom is on but it has to be an enabled track. */
 507         MP4TrackId textTrack;
 508         textTrack = MP4AddChapterTextTrack(m->file, 1, 0);
 509
 510         m->chapter_track = textTrack;
 511         m->chapter_duration = 0;
 512         m->current_chapter = job->chapter_start;
 513     }
 514
 515     /* Add encoded-by metadata listing version and build date */
 516     char *tool_string;
 517     tool_string = (char *)malloc(80);
 518     snprintf( tool_string, 80, "HandBrake %s %i", HB_PROJECT_VERSION, HB_PROJECT_BUILD);
 519
 520     /* allocate,fetch,populate,store,free tags structure */
 521     const MP4Tags* tags;
 522     tags = MP4TagsAlloc();
 523     MP4TagsFetch( tags, m->file );
 524     MP4TagsSetEncodingTool( tags, tool_string );
 525     MP4TagsStore( tags, m->file );
 526     MP4TagsFree( tags );
 527
 528     free(tool_string);
 529
 530     return 0;
 531 }
 532
 533 typedef struct stylerecord_s {
 534     enum style_s {ITALIC, BOLD, UNDERLINE} style;
 535     uint16_t start;
 536     uint16_t stop;
 537     struct stylerecord_s *next;
 538 } stylerecord;
 539
 540 static void hb_makestylerecord( stylerecord **stack,
 541                                 enum style_s style, int start )
 542 {
 543     stylerecord *record = calloc( sizeof( stylerecord ), 1 );
 544
 545     if( record )
 546     {
 547         record->style = style;
 548         record->start = start;
 549         record->next = *stack;
 550         *stack = record;
 551     }
 552 }
 553
 554 static void hb_makestyleatom( stylerecord *record, uint8_t *style)
 555 {
 556     uint8_t face = 1;
 557     hb_log("Made style '%s' from %d to %d\n",
 558            record->style == ITALIC ? "Italic" : record->style == BOLD ? "Bold" : "Underline", record->start, record->stop);
 559
 560     switch( record->style )
 561     {
 562     case ITALIC:
 563         face = 2;
 564         break;
 565     case BOLD:
 566         face = 1;
 567         break;
 568     case UNDERLINE:
 569         face = 4;
 570         break;
 571     default:
 572         face = 2;
 573         break;
 574     }
 575
 576     style[0] = (record->start >> 8) & 0xff; // startChar
 577     style[1] = record->start & 0xff;
 578     style[2] = (record->stop >> 8) & 0xff;   // endChar
 579     style[3] = record->stop & 0xff;
 580     style[4] = (1 >> 8) & 0xff;    // font-ID
 581     style[5] = 1 & 0xff;
 582     style[6] = face;   // face-style-flags: 1 bold; 2 italic; 4 underline
 583     style[7] = 24;      // font-size
 584     style[8] = 255;     // r
 585     style[9] = 255;     // g
 586     style[10] = 255;    // b
 587     style[11] = 255;    // a
 588
 589 }
 590
 591 /*
 592  * Copy the input to output removing markup and adding markup to the style
 593  * atom where appropriate.
 594  */
 595 static void hb_muxmp4_process_subtitle_style( uint8_t *input,
 596                                               uint8_t *output,
 597                                               uint8_t *style, uint16_t *stylesize )
 598 {
 599     uint8_t *reader = input;
 600     uint8_t *writer = output;
 601     uint8_t stylecount = 0;
 602
 603     stylerecord *stylestack = NULL;
 604
 605     while(*reader != '\0') {
 606         if (*reader == '<') {
 607             /*
 608              * possible markup, peek at the next chr
 609              */
 610             switch(*(reader+1)) {
 611             case 'i':
 612                 if (*(reader+2) == '>') {
 613                     reader += 3;
 614                     hb_makestylerecord(&stylestack, ITALIC, writer-output);
 615                 } else {
 616                     *writer++ = *reader++;
 617                 }
 618                 break;
 619             case 'b':
 620                 if (*(reader+2) == '>') {
 621                     reader += 3;
 622                     hb_makestylerecord(&stylestack, BOLD, writer-output);
 623                 } else {
 624                     *writer++ = *reader++;
 625                 }
 626                 break;
 627             case 'u':
 628                 if (*(reader+2) == '>') {
 629                     reader += 3;
 630                     hb_makestylerecord(&stylestack, UNDERLINE, writer-output);
 631                 } else {
 632                     *writer++ = *reader++;
 633                 }
 634                 break;
 635             case '/':
 636                 switch(*(reader+2)) {
 637                 case 'i':
 638                     if (*(reader+3) == '>') {
 639                         if (stylestack && stylestack->style == ITALIC) {
 640                             uint8_t style_record[12];
 641                             stylestack->stop = writer - output;
 642                             hb_makestyleatom(stylestack, style_record);
 643
 644                             memcpy(style + 10 + (12 * stylecount), style_record, 12);
 645                             stylecount++;
 646
 647                             stylestack = stylestack->next;
 648                         } else {
 649                             hb_error("Mismatched Subtitle markup '%s'", input);
 650                         }
 651                         reader += 4;
 652                     } else {
 653                         *writer++ = *reader++;
 654                     }
 655                     break;
 656                 case 'b':
 657                     if (*(reader+3) == '>') {
 658                         if (stylestack && stylestack->style == BOLD) {
 659                             uint8_t style_record[12];
 660                             stylestack->stop = writer - output;
 661                             hb_makestyleatom(stylestack, style_record);
 662
 663                             memcpy(style + 10 + (12 * stylecount), style_record, 12);
 664                             stylecount++;
 665
 666                             stylestack = stylestack->next;
 667                         } else {
 668                             hb_error("Mismatched Subtitle markup '%s'", input);
 669                         }
 670
 671                         reader += 4;
 672                     } else {
 673                         *writer++ = *reader++;
 674                     }
 675                     break;
 676                 case 'u':
 677                     if (*(reader+3) == '>') {
 678                         if (stylestack && stylestack->style == UNDERLINE) {
 679                             uint8_t style_record[12];
 680                             stylestack->stop = writer - output;
 681                             hb_makestyleatom(stylestack, style_record);
 682
 683                             memcpy(style + 10 + (12 * stylecount), style_record, 12);
 684                             stylecount++;
 685
 686                             stylestack = stylestack->next;
 687                         } else {
 688                             hb_error("Mismatched Subtitle markup '%s'", input);
 689                         }
 690                         reader += 4;
 691                     } else {
 692                         *writer++ = *reader++;
 693                     }
 694                     break;
 695                 default:
 696                     *writer++ = *reader++;
 697                     break;
 698                 }
 699                 break;
 700             default:
 701                 *writer++ = *reader++;
 702                 break;
 703             }
 704         } else {
 705             *writer++ = *reader++;
 706         }
 707     }
 708     *writer = '\0';
 709
 710     if( stylecount )
 711     {
 712         *stylesize = 10 + ( stylecount * 12 );
 713
 714         memcpy( style + 4, "styl", 4);
 715
 716         style[0] = 0;
 717         style[1] = 0;
 718         style[2] = (*stylesize >> 8) & 0xff;
 719         style[3] = *stylesize & 0xff;
 720         style[8] = (stylecount >> 8) & 0xff;
 721         style[9] = stylecount & 0xff;
 722
 723     }
 724
 725 }
 726
 727 static int MP4Mux( hb_mux_object_t * m, hb_mux_data_t * mux_data,
 728                    hb_buffer_t * buf )
 729 {
 730     hb_job_t * job = m->job;
 731     int64_t duration;
 732     int64_t offset = 0;
 733
 734     if( mux_data == job->mux_data )
 735     {
 736         /* Video */
 737
 738         // if there are b-frames compute the render offset
 739         // (we'll need it for both the video frame & the chapter track)
 740         if ( m->init_delay )
 741         {
 742             offset = buf->start + m->init_delay - m->sum_dur;
 743             if ( offset < 0 )
 744             {
 745                 hb_log("MP4Mux: illegal render offset %"PRId64", start %"PRId64","
 746                        "stop %"PRId64", sum_dur %"PRId64,
 747                        offset, buf->start, buf->stop, m->sum_dur );
 748                 offset = 0;
 749             }
 750         }
 751
 752         /* Add the sample before the new frame.
 753            It is important that this be calculated prior to the duration
 754            of the new video sample, as we want to sync to right after it.
 755            (This is because of how durations for text tracks work in QT) */
 756         if( job->chapter_markers && buf->new_chap )
 757         {
 758             hb_chapter_t *chapter = NULL;
 759
 760             // this chapter is postioned by writing out the previous chapter.
 761             // the duration of the previous chapter is the duration up to but
 762             // not including the current frame minus the duration of all
 763             // chapters up to the previous.
 764             // The initial and final chapters can be very short (a second or
 765             // less) since they're not really chapters but just a placeholder to
 766             // insert a cell command. We don't write chapters shorter than 1.5 sec.
 767             duration = m->sum_dur - m->chapter_duration + offset;
 768             if ( duration >= (90000*3)/2 )
 769             {
 770                 chapter = hb_list_item( m->job->title->list_chapter,
 771                                         buf->new_chap - 2 );
 772
 773                 MP4AddChapter( m->file,
 774                                m->chapter_track,
 775                                duration,
 776                                (chapter != NULL) ? chapter->title : NULL);
 777
 778                 m->current_chapter = buf->new_chap;
 779                 m->chapter_duration += duration;
 780             }
 781         }
 782
 783         // We're getting the frames in decode order but the timestamps are
 784         // for presentation so we have to use durations and effectively
 785         // compute a DTS.
 786         duration = buf->stop - buf->start;
 787         if ( duration <= 0 )
 788         {
 789             /* We got an illegal mp4/h264 duration. This shouldn't
 790                be possible and usually indicates a bug in the upstream code.
 791                Complain in the hope that someone will go find the bug but
 792                try to fix the error so that the file will still be playable. */
 793             hb_log("MP4Mux: illegal duration %"PRId64", start %"PRId64","
 794                    "stop %"PRId64", sum_dur %"PRId64,
 795                    duration, buf->start, buf->stop, m->sum_dur );
 796             /* we don't know when the next frame starts so we can't pick a
 797                valid duration for this one. we pick something "short"
 798                (roughly 1/3 of an NTSC frame time) to take time from
 799                the next frame. */
 800             duration = 1000;
 801         }
 802         m->sum_dur += duration;
 803     }
 804     else
 805     {
 806         /* Audio */
 807         duration = MP4_INVALID_DURATION;
 808     }
 809
 810     /* Here's where the sample actually gets muxed. */
 811     if( job->vcodec == HB_VCODEC_X264 && mux_data == job->mux_data )
 812     {
 813         /* Compute dependency flags.
 814          *
 815          * This mechanism is (optionally) used by media players such as QuickTime
 816          * to offer better scrubbing performance. The most influential bits are
 817          * MP4_SDT_HAS_NO_DEPENDENTS and MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED.
 818          *
 819          * Other bits are possible but no example media using such bits have been
 820          * found.
 821          *
 822          * It is acceptable to supply 0-bits for any samples which characteristics
 823          * cannot be positively guaranteed.
 824          */
 825         int sync = 0;
 826         uint32_t dflags = 0;
 827
 828         /* encoding layer signals if frame is referenced by other frames */
 829         if( buf->flags & HB_FRAME_REF )
 830             dflags |= MP4_SDT_HAS_DEPENDENTS;
 831         else
 832             dflags |= MP4_SDT_HAS_NO_DEPENDENTS; /* disposable */
 833
 834         switch( buf->frametype )
 835         {
 836             case HB_FRAME_IDR:
 837                 sync = 1;
 838                 break;
 839             case HB_FRAME_I:
 840                 dflags |= MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED;
 841                 break;
 842             case HB_FRAME_P:
 843                 dflags |= MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED;
 844                 break;
 845             case HB_FRAME_BREF:
 846             case HB_FRAME_B:
 847             default:
 848                 break; /* nothing to mark */
 849         }
 850
 851         if( !MP4WriteSampleDependency( m->file,
 852                                        mux_data->track,
 853                                        buf->data,
 854                                        buf->size,
 855                                        duration,
 856                                        offset,
 857                                        sync,
 858                                        dflags ))
 859         {
 860             hb_error("Failed to write to output file, disk full?");
 861             *job->die = 1;
 862         }
 863     }
 864     else if (mux_data->subtitle)
 865     {
 866         if( mux_data->sub_format == TEXTSUB )
 867         {
 868             /* Write an empty sample */
 869             if ( mux_data->sum_dur < buf->start )
 870             {
 871                 uint8_t empty[2] = {0,0};
 872                 if( !MP4WriteSample( m->file,
 873                                     mux_data->track,
 874                                     empty,
 875                                     2,
 876                                     buf->start - mux_data->sum_dur,
 877                                     0,
 878                                     1 ))
 879                 {
 880                     hb_error("Failed to write to output file, disk full?");
 881                     *job->die = 1;
 882                 }
 883                 mux_data->sum_dur += buf->start - mux_data->sum_dur;
 884             }
 885             uint8_t styleatom[2048];;
 886             uint16_t stylesize = 0;
 887             uint8_t buffer[2048];
 888             uint16_t buffersize = 0;
 889             uint8_t output[2048];
 890
 891             *buffer = '\0';
 892
 893             /*
 894              * Copy the subtitle into buffer stripping markup and creating
 895              * style atoms for them.
 896              */
 897             hb_muxmp4_process_subtitle_style( buf->data,
 898                                               buffer,
 899                                               styleatom, &stylesize );
 900
 901             buffersize = strlen((char*)buffer);
 902
 903             hb_deep_log(3, "MuxMP4:Sub:%fs:%"PRId64":%"PRId64":%"PRId64": %s",
 904                         (float)buf->start / 90000, buf->start, buf->stop,
 905                         (buf->stop - buf->start), buffer);
 906
 907             hb_log("MuxMP4: sub len: %d, style_len %d", buffersize, stylesize);
 908
 909             /* Write the subtitle sample */
 910             memcpy( output + 2, buffer, buffersize );
 911             memcpy( output + 2 + buffersize, styleatom, stylesize);
 912             output[0] = ( buffersize >> 8 ) & 0xff;
 913             output[1] = buffersize & 0xff;
 914
 915             if( !MP4WriteSample( m->file,
 916                                  mux_data->track,
 917                                  output,
 918                                  buffersize + stylesize + 2,
 919                                  buf->stop - buf->start,
 920                                  0,
 921                                  1 ))
 922             {
 923                 hb_error("Failed to write to output file, disk full?");
 924                 *job->die = 1;
 925             }
 926
 927             mux_data->sum_dur += (buf->stop - buf->start);
 928             hb_deep_log(3, "MuxMP4:Total time elapsed:%"PRId64, mux_data->sum_dur);
 929         }
 930     }
 931     else
 932     {
 933         /*
 934          * Audio
 935          */
 936         if( !MP4WriteSample( m->file,
 937                              mux_data->track,
 938                              buf->data,
 939                              buf->size,
 940                              duration,
 941                              offset,
 942                              ( buf->frametype & HB_FRAME_KEY ) != 0 ))
 943         {
 944             hb_error("Failed to write to output file, disk full?");
 945             *job->die = 1;
 946         }
 947     }
 948
 949
 950     return 0;
 951 }
 952
 953 static int MP4End( hb_mux_object_t * m )
 954 {
 955     hb_job_t   * job   = m->job;
 956     hb_title_t * title = job->title;
 957
 958     /* Write our final chapter marker */
 959     if( m->job->chapter_markers )
 960     {
 961         hb_chapter_t *chapter = NULL;
 962         int64_t duration = m->sum_dur - m->chapter_duration;
 963         /* The final chapter can have a very short duration - if it's less
 964          * than 1.5 seconds just skip it. */
 965         if ( duration >= (90000*3)/2 )
 966         {
 967
 968             chapter = hb_list_item( m->job->title->list_chapter,
 969                                     m->current_chapter - 1 );
 970
 971             MP4AddChapter( m->file,
 972                            m->chapter_track,
 973                            duration,
 974                            (chapter != NULL) ? chapter->title : NULL);
 975         }
 976     }
 977
 978     if (job->areBframes)
 979     {
 980            // Insert track edit to get A/V back in sync.  The edit amount is
 981            // the init_delay.
 982            int64_t edit_amt = m->init_delay;
 983            MP4AddTrackEdit(m->file, 1, MP4_INVALID_EDIT_ID, edit_amt,
 984                            MP4GetTrackDuration(m->file, 1), 0);
 985             if ( m->job->chapter_markers )
 986             {
 987                 // apply same edit to chapter track to keep it in sync with video
 988                 MP4AddTrackEdit(m->file, m->chapter_track, MP4_INVALID_EDIT_ID,
 989                                 edit_amt,
 990                                 MP4GetTrackDuration(m->file, m->chapter_track), 0);
 991             }
 992      }
 993
 994     /*
 995      * Write the MP4 iTunes metadata if we have any metadata
 996      */
 997     if( title->metadata )
 998     {
 999         hb_metadata_t *md = title->metadata;
1000         const MP4Tags* tags;
1001
1002         hb_deep_log( 2, "Writing Metadata to output file...");
1003
1004         /* allocate tags structure */
1005         tags = MP4TagsAlloc();
1006         /* fetch data from MP4 file (in case it already has some data) */
1007         MP4TagsFetch( tags, m->file );
1008
1009         /* populate */
1010         if( strlen( md->name ))
1011             MP4TagsSetName( tags, md->name );
1012         if( strlen( md->artist ))
1013             MP4TagsSetArtist( tags, md->artist );
1014         if( strlen( md->composer ))
1015             MP4TagsSetComposer( tags, md->composer );
1016         if( strlen( md->comment ))
1017             MP4TagsSetComments( tags, md->comment );
1018         if( strlen( md->release_date ))
1019             MP4TagsSetReleaseDate( tags, md->release_date );
1020         if( strlen( md->album ))
1021             MP4TagsSetAlbum( tags, md->album );
1022         if( strlen( md->genre ))
1023             MP4TagsSetGenre( tags, md->genre );
1024
1025         if( md->coverart )
1026         {
1027             MP4TagArtwork art;
1028             art.data = md->coverart;
1029             art.size = md->coverart_size;
1030             art.type = MP4_ART_UNDEFINED; // delegate typing to libmp4v2
1031             MP4TagsAddArtwork( tags, &art );
1032         }
1033
1034         /* push data to MP4 file */
1035         MP4TagsStore( tags, m->file );
1036         /* free memory associated with structure */
1037         MP4TagsFree( tags );
1038     }
1039
1040     MP4Close( m->file );
1041
1042     if ( job->mp4_optimize )
1043     {
1044         hb_log( "muxmp4: optimizing file" );
1045         char filename[1024]; memset( filename, 0, 1024 );
1046         snprintf( filename, 1024, "%s.tmp", job->file );
1047         MP4Optimize( job->file, filename, MP4_DETAILS_ERROR );
1048         remove( job->file );
1049         rename( filename, job->file );
1050     }
1051
1052     return 0;
1053 }
1054
1055 hb_mux_object_t * hb_mux_mp4_init( hb_job_t * job )
1056 {
1057     hb_mux_object_t * m = calloc( sizeof( hb_mux_object_t ), 1 );
1058     m->init      = MP4Init;
1059     m->mux       = MP4Mux;
1060     m->end       = MP4End;
1061     m->job       = job;
1062     return m;
1063 }
1064