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_deep_log(3, "Made style '%s' from %d to %d",
 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     stylerecord *stylestack = NULL;
 603     stylerecord *oldrecord = 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                             oldrecord = stylestack;
 648                             stylestack = stylestack->next;
 649                             free(oldrecord);
 650                         } else {
 651                             hb_error("Mismatched Subtitle markup '%s'", input);
 652                         }
 653                         reader += 4;
 654                     } else {
 655                         *writer++ = *reader++;
 656                     }
 657                     break;
 658                 case 'b':
 659                     if (*(reader+3) == '>') {
 660                         if (stylestack && stylestack->style == BOLD) {
 661                             uint8_t style_record[12];
 662                             stylestack->stop = writer - output;
 663                             hb_makestyleatom(stylestack, style_record);
 664
 665                             memcpy(style + 10 + (12 * stylecount), style_record, 12);
 666                             stylecount++;
 667                             oldrecord = stylestack;
 668                             stylestack = stylestack->next;
 669                             free(oldrecord);
 670                         } else {
 671                             hb_error("Mismatched Subtitle markup '%s'", input);
 672                         }
 673
 674                         reader += 4;
 675                     } else {
 676                         *writer++ = *reader++;
 677                     }
 678                     break;
 679                 case 'u':
 680                     if (*(reader+3) == '>') {
 681                         if (stylestack && stylestack->style == UNDERLINE) {
 682                             uint8_t style_record[12];
 683                             stylestack->stop = writer - output;
 684                             hb_makestyleatom(stylestack, style_record);
 685
 686                             memcpy(style + 10 + (12 * stylecount), style_record, 12);
 687                             stylecount++;
 688
 689                             oldrecord = stylestack;
 690                             stylestack = stylestack->next;
 691                             free(oldrecord);
 692                         } else {
 693                             hb_error("Mismatched Subtitle markup '%s'", input);
 694                         }
 695                         reader += 4;
 696                     } else {
 697                         *writer++ = *reader++;
 698                     }
 699                     break;
 700                 default:
 701                     *writer++ = *reader++;
 702                     break;
 703                 }
 704                 break;
 705             default:
 706                 *writer++ = *reader++;
 707                 break;
 708             }
 709         } else {
 710             *writer++ = *reader++;
 711         }
 712     }
 713     *writer = '\0';
 714
 715     if( stylecount )
 716     {
 717         *stylesize = 10 + ( stylecount * 12 );
 718
 719         memcpy( style + 4, "styl", 4);
 720
 721         style[0] = 0;
 722         style[1] = 0;
 723         style[2] = (*stylesize >> 8) & 0xff;
 724         style[3] = *stylesize & 0xff;
 725         style[8] = (stylecount >> 8) & 0xff;
 726         style[9] = stylecount & 0xff;
 727
 728     }
 729
 730 }
 731
 732 static int MP4Mux( hb_mux_object_t * m, hb_mux_data_t * mux_data,
 733                    hb_buffer_t * buf )
 734 {
 735     hb_job_t * job = m->job;
 736     int64_t duration;
 737     int64_t offset = 0;
 738
 739     if( mux_data == job->mux_data )
 740     {
 741         /* Video */
 742
 743         // if there are b-frames compute the render offset
 744         // (we'll need it for both the video frame & the chapter track)
 745         if ( m->init_delay )
 746         {
 747             offset = buf->start + m->init_delay - m->sum_dur;
 748             if ( offset < 0 )
 749             {
 750                 hb_log("MP4Mux: illegal render offset %"PRId64", start %"PRId64","
 751                        "stop %"PRId64", sum_dur %"PRId64,
 752                        offset, buf->start, buf->stop, m->sum_dur );
 753                 offset = 0;
 754             }
 755         }
 756
 757         /* Add the sample before the new frame.
 758            It is important that this be calculated prior to the duration
 759            of the new video sample, as we want to sync to right after it.
 760            (This is because of how durations for text tracks work in QT) */
 761         if( job->chapter_markers && buf->new_chap )
 762         {
 763             hb_chapter_t *chapter = NULL;
 764
 765             // this chapter is postioned by writing out the previous chapter.
 766             // the duration of the previous chapter is the duration up to but
 767             // not including the current frame minus the duration of all
 768             // chapters up to the previous.
 769             // The initial and final chapters can be very short (a second or
 770             // less) since they're not really chapters but just a placeholder to
 771             // insert a cell command. We don't write chapters shorter than 1.5 sec.
 772             duration = m->sum_dur - m->chapter_duration + offset;
 773             if ( duration >= (90000*3)/2 )
 774             {
 775                 chapter = hb_list_item( m->job->title->list_chapter,
 776                                         buf->new_chap - 2 );
 777
 778                 MP4AddChapter( m->file,
 779                                m->chapter_track,
 780                                duration,
 781                                (chapter != NULL) ? chapter->title : NULL);
 782
 783                 m->current_chapter = buf->new_chap;
 784                 m->chapter_duration += duration;
 785             }
 786         }
 787
 788         // We're getting the frames in decode order but the timestamps are
 789         // for presentation so we have to use durations and effectively
 790         // compute a DTS.
 791         duration = buf->stop - buf->start;
 792         if ( duration <= 0 )
 793         {
 794             /* We got an illegal mp4/h264 duration. This shouldn't
 795                be possible and usually indicates a bug in the upstream code.
 796                Complain in the hope that someone will go find the bug but
 797                try to fix the error so that the file will still be playable. */
 798             hb_log("MP4Mux: illegal duration %"PRId64", start %"PRId64","
 799                    "stop %"PRId64", sum_dur %"PRId64,
 800                    duration, buf->start, buf->stop, m->sum_dur );
 801             /* we don't know when the next frame starts so we can't pick a
 802                valid duration for this one. we pick something "short"
 803                (roughly 1/3 of an NTSC frame time) to take time from
 804                the next frame. */
 805             duration = 1000;
 806         }
 807         m->sum_dur += duration;
 808     }
 809     else
 810     {
 811         /* Audio */
 812         duration = MP4_INVALID_DURATION;
 813     }
 814
 815     /* Here's where the sample actually gets muxed. */
 816     if( job->vcodec == HB_VCODEC_X264 && mux_data == job->mux_data )
 817     {
 818         /* Compute dependency flags.
 819          *
 820          * This mechanism is (optionally) used by media players such as QuickTime
 821          * to offer better scrubbing performance. The most influential bits are
 822          * MP4_SDT_HAS_NO_DEPENDENTS and MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED.
 823          *
 824          * Other bits are possible but no example media using such bits have been
 825          * found.
 826          *
 827          * It is acceptable to supply 0-bits for any samples which characteristics
 828          * cannot be positively guaranteed.
 829          */
 830         int sync = 0;
 831         uint32_t dflags = 0;
 832
 833         /* encoding layer signals if frame is referenced by other frames */
 834         if( buf->flags & HB_FRAME_REF )
 835             dflags |= MP4_SDT_HAS_DEPENDENTS;
 836         else
 837             dflags |= MP4_SDT_HAS_NO_DEPENDENTS; /* disposable */
 838
 839         switch( buf->frametype )
 840         {
 841             case HB_FRAME_IDR:
 842                 sync = 1;
 843                 break;
 844             case HB_FRAME_I:
 845                 dflags |= MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED;
 846                 break;
 847             case HB_FRAME_P:
 848                 dflags |= MP4_SDT_EARLIER_DISPLAY_TIMES_ALLOWED;
 849                 break;
 850             case HB_FRAME_BREF:
 851             case HB_FRAME_B:
 852             default:
 853                 break; /* nothing to mark */
 854         }
 855
 856         if( !MP4WriteSampleDependency( m->file,
 857                                        mux_data->track,
 858                                        buf->data,
 859                                        buf->size,
 860                                        duration,
 861                                        offset,
 862                                        sync,
 863                                        dflags ))
 864         {
 865             hb_error("Failed to write to output file, disk full?");
 866             *job->die = 1;
 867         }
 868     }
 869     else if (mux_data->subtitle)
 870     {
 871         if( mux_data->sub_format == TEXTSUB )
 872         {
 873             /* Write an empty sample */
 874             if ( mux_data->sum_dur < buf->start )
 875             {
 876                 uint8_t empty[2] = {0,0};
 877                 if( !MP4WriteSample( m->file,
 878                                     mux_data->track,
 879                                     empty,
 880                                     2,
 881                                     buf->start - mux_data->sum_dur,
 882                                     0,
 883                                     1 ))
 884                 {
 885                     hb_error("Failed to write to output file, disk full?");
 886                     *job->die = 1;
 887                 }
 888                 mux_data->sum_dur += buf->start - mux_data->sum_dur;
 889             }
 890             uint8_t styleatom[2048];;
 891             uint16_t stylesize = 0;
 892             uint8_t buffer[2048];
 893             uint16_t buffersize = 0;
 894             uint8_t output[2048];
 895
 896             *buffer = '\0';
 897
 898             /*
 899              * Copy the subtitle into buffer stripping markup and creating
 900              * style atoms for them.
 901              */
 902             hb_muxmp4_process_subtitle_style( buf->data,
 903                                               buffer,
 904                                               styleatom, &stylesize );
 905
 906             buffersize = strlen((char*)buffer);
 907
 908             hb_deep_log(3, "MuxMP4:Sub:%fs:%"PRId64":%"PRId64":%"PRId64": %s",
 909                         (float)buf->start / 90000, buf->start, buf->stop,
 910                         (buf->stop - buf->start), buffer);
 911
 912             /* Write the subtitle sample */
 913             memcpy( output + 2, buffer, buffersize );
 914             memcpy( output + 2 + buffersize, styleatom, stylesize);
 915             output[0] = ( buffersize >> 8 ) & 0xff;
 916             output[1] = buffersize & 0xff;
 917
 918             if( !MP4WriteSample( m->file,
 919                                  mux_data->track,
 920                                  output,
 921                                  buffersize + stylesize + 2,
 922                                  buf->stop - buf->start,
 923                                  0,
 924                                  1 ))
 925             {
 926                 hb_error("Failed to write to output file, disk full?");
 927                 *job->die = 1;
 928             }
 929
 930             mux_data->sum_dur += (buf->stop - buf->start);
 931             hb_deep_log(3, "MuxMP4:Total time elapsed:%"PRId64, mux_data->sum_dur);
 932         }
 933     }
 934     else
 935     {
 936         /*
 937          * Audio
 938          */
 939         if( !MP4WriteSample( m->file,
 940                              mux_data->track,
 941                              buf->data,
 942                              buf->size,
 943                              duration,
 944                              offset,
 945                              ( buf->frametype & HB_FRAME_KEY ) != 0 ))
 946         {
 947             hb_error("Failed to write to output file, disk full?");
 948             *job->die = 1;
 949         }
 950     }
 951
 952
 953     return 0;
 954 }
 955
 956 static int MP4End( hb_mux_object_t * m )
 957 {
 958     hb_job_t   * job   = m->job;
 959     hb_title_t * title = job->title;
 960
 961     /* Write our final chapter marker */
 962     if( m->job->chapter_markers )
 963     {
 964         hb_chapter_t *chapter = NULL;
 965         int64_t duration = m->sum_dur - m->chapter_duration;
 966         /* The final chapter can have a very short duration - if it's less
 967          * than 1.5 seconds just skip it. */
 968         if ( duration >= (90000*3)/2 )
 969         {
 970
 971             chapter = hb_list_item( m->job->title->list_chapter,
 972                                     m->current_chapter - 1 );
 973
 974             MP4AddChapter( m->file,
 975                            m->chapter_track,
 976                            duration,
 977                            (chapter != NULL) ? chapter->title : NULL);
 978         }
 979     }
 980
 981     if (job->areBframes)
 982     {
 983            // Insert track edit to get A/V back in sync.  The edit amount is
 984            // the init_delay.
 985            int64_t edit_amt = m->init_delay;
 986            MP4AddTrackEdit(m->file, 1, MP4_INVALID_EDIT_ID, edit_amt,
 987                            MP4GetTrackDuration(m->file, 1), 0);
 988             if ( m->job->chapter_markers )
 989             {
 990                 // apply same edit to chapter track to keep it in sync with video
 991                 MP4AddTrackEdit(m->file, m->chapter_track, MP4_INVALID_EDIT_ID,
 992                                 edit_amt,
 993                                 MP4GetTrackDuration(m->file, m->chapter_track), 0);
 994             }
 995      }
 996
 997     /*
 998      * Write the MP4 iTunes metadata if we have any metadata
 999      */
1000     if( title->metadata )
1001     {
1002         hb_metadata_t *md = title->metadata;
1003         const MP4Tags* tags;
1004
1005         hb_deep_log( 2, "Writing Metadata to output file...");
1006
1007         /* allocate tags structure */
1008         tags = MP4TagsAlloc();
1009         /* fetch data from MP4 file (in case it already has some data) */
1010         MP4TagsFetch( tags, m->file );
1011
1012         /* populate */
1013         if( strlen( md->name ))
1014             MP4TagsSetName( tags, md->name );
1015         if( strlen( md->artist ))
1016             MP4TagsSetArtist( tags, md->artist );
1017         if( strlen( md->composer ))
1018             MP4TagsSetComposer( tags, md->composer );
1019         if( strlen( md->comment ))
1020             MP4TagsSetComments( tags, md->comment );
1021         if( strlen( md->release_date ))
1022             MP4TagsSetReleaseDate( tags, md->release_date );
1023         if( strlen( md->album ))
1024             MP4TagsSetAlbum( tags, md->album );
1025         if( strlen( md->genre ))
1026             MP4TagsSetGenre( tags, md->genre );
1027
1028         if( md->coverart )
1029         {
1030             MP4TagArtwork art;
1031             art.data = md->coverart;
1032             art.size = md->coverart_size;
1033             art.type = MP4_ART_UNDEFINED; // delegate typing to libmp4v2
1034             MP4TagsAddArtwork( tags, &art );
1035         }
1036
1037         /* push data to MP4 file */
1038         MP4TagsStore( tags, m->file );
1039         /* free memory associated with structure */
1040         MP4TagsFree( tags );
1041     }
1042
1043     MP4Close( m->file );
1044
1045     if ( job->mp4_optimize )
1046     {
1047         hb_log( "muxmp4: optimizing file" );
1048         char filename[1024]; memset( filename, 0, 1024 );
1049         snprintf( filename, 1024, "%s.tmp", job->file );
1050         MP4Optimize( job->file, filename, MP4_DETAILS_ERROR );
1051         remove( job->file );
1052         rename( filename, job->file );
1053     }
1054
1055     return 0;
1056 }
1057
1058 hb_mux_object_t * hb_mux_mp4_init( hb_job_t * job )
1059 {
1060     hb_mux_object_t * m = calloc( sizeof( hb_mux_object_t ), 1 );
1061     m->init      = MP4Init;
1062     m->mux       = MP4Mux;
1063     m->end       = MP4End;
1064     m->job       = job;
1065     return m;
1066 }
1067