+
+/** Check reel split with a muxed video/audio source */
+BOOST_AUTO_TEST_CASE (reels_test6)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test6");
+ film->set_name ("reels_test6");
+ film->set_container (Ratio::from_id ("185"));
+ film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
+ shared_ptr<FFmpegContent> A (new FFmpegContent("test/data/test2.mp4"));
+ film->examine_and_add_content (A);
+ BOOST_REQUIRE (!wait_for_jobs ());
+
+ film->set_j2k_bandwidth (100000000);
+ film->set_reel_type (REELTYPE_BY_LENGTH);
+ /* This is just over 2.5s at 100Mbit/s; should correspond to 60 frames */
+ film->set_reel_length (31253154);
+ film->make_dcp ();
+ BOOST_REQUIRE (!wait_for_jobs ());
+}
+
+/** Check the case where the last bit of audio hangs over the end of the video
+ * and we are using REELTYPE_BY_VIDEO_CONTENT.
+ */
+BOOST_AUTO_TEST_CASE (reels_test7)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test7");
+ film->set_name ("reels_test7");
+ film->set_container (Ratio::from_id ("185"));
+ film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
+ shared_ptr<Content> A = content_factory("test/data/flat_red.png").front();
+ film->examine_and_add_content (A);
+ BOOST_REQUIRE (!wait_for_jobs ());
+ shared_ptr<Content> B = content_factory("test/data/awkward_length.wav").front();
+ film->examine_and_add_content (B);
+ BOOST_REQUIRE (!wait_for_jobs ());
+ film->set_video_frame_rate (24);
+ A->video->set_length (3 * 24);
+
+ film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
+ BOOST_REQUIRE_EQUAL (film->reels().size(), 2);
+ BOOST_CHECK (film->reels().front() == DCPTimePeriod(DCPTime(0), DCPTime::from_frames(3 * 24, 24)));
+ BOOST_CHECK (film->reels().back() == DCPTimePeriod(DCPTime::from_frames(3 * 24, 24), DCPTime::from_frames(3 * 24 + 1, 24)));
+
+ film->make_dcp ();
+ BOOST_REQUIRE (!wait_for_jobs ());
+}
+
+/** Check a reels-related error; make_dcp() would raise a ProgrammingError */
+BOOST_AUTO_TEST_CASE (reels_test8)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test8");
+ film->set_name ("reels_test8");
+ film->set_container (Ratio::from_id ("185"));
+ film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
+ shared_ptr<FFmpegContent> A (new FFmpegContent("test/data/test2.mp4"));
+ film->examine_and_add_content (A);
+ BOOST_REQUIRE (!wait_for_jobs ());
+
+ A->set_trim_end (ContentTime::from_seconds (1));
+ film->make_dcp ();
+ BOOST_REQUIRE (!wait_for_jobs ());
+}
+
+/** Check another reels-related error; make_dcp() would raise a ProgrammingError */
+BOOST_AUTO_TEST_CASE (reels_test9)
+{
+ shared_ptr<Film> film = new_test_film2("reels_test9a");
+ shared_ptr<FFmpegContent> A(new FFmpegContent("test/data/flat_red.png"));
+ film->examine_and_add_content(A);
+ BOOST_REQUIRE(!wait_for_jobs());
+ A->video->set_length(5 * 24);
+ film->set_video_frame_rate(24);
+ film->make_dcp();
+ BOOST_REQUIRE(!wait_for_jobs());
+
+ shared_ptr<Film> film2 = new_test_film2("reels_test9b");
+ shared_ptr<DCPContent> B(new DCPContent(film->dir(film->dcp_name())));
+ film2->examine_and_add_content(B);
+ film2->examine_and_add_content(content_factory("test/data/dcp_sub4.xml").front());
+ B->set_reference_video(true);
+ B->set_reference_audio(true);
+ BOOST_REQUIRE(!wait_for_jobs());
+ film2->set_reel_type(REELTYPE_BY_VIDEO_CONTENT);
+ film2->write_metadata();
+ film2->make_dcp();
+ BOOST_REQUIRE(!wait_for_jobs());
+}
+
+/** Another reels-related error; make_dcp() would raise a ProgrammingError
+ * in AudioBuffers::allocate due to an attempt to allocate a negatively-sized buffer.
+ * This was triggered by a VF where there are referenced audio reels followed by
+ * VF audio. When the VF audio arrives the Writer did not correctly skip over the
+ * referenced reels.
+ */
+BOOST_AUTO_TEST_CASE (reels_test10)
+{
+ /* Make the OV */
+ shared_ptr<Film> ov = new_test_film2("reels_test10_ov");
+ shared_ptr<FFmpegContent> A(new FFmpegContent("test/data/flat_red.png"));
+ ov->examine_and_add_content (A);
+ BOOST_REQUIRE (!wait_for_jobs());
+ A->video->set_length (5 * 24);
+
+ shared_ptr<FFmpegContent> B(new FFmpegContent("test/data/flat_red.png"));
+ ov->examine_and_add_content (B);
+ BOOST_REQUIRE (!wait_for_jobs());
+ B->video->set_length (5 * 24);
+
+ ov->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
+ ov->make_dcp ();
+ BOOST_REQUIRE (!wait_for_jobs());
+ ov->write_metadata ();
+
+ /* Now try to make the VF; this used to fail */
+ shared_ptr<Film> vf = new_test_film2("reels_test10_vf");
+ shared_ptr<DCPContent> ov_dcp(new DCPContent(ov->dir(ov->dcp_name())));
+ vf->examine_and_add_content (ov_dcp);
+ BOOST_REQUIRE (!wait_for_jobs());
+ vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
+ ov_dcp->set_reference_video (true);
+ ov_dcp->set_reference_audio (true);
+ vf->examine_and_add_content (content_factory("test/data/15s.srt").front());
+ BOOST_REQUIRE (!wait_for_jobs());
+
+ vf->make_dcp ();
+ BOOST_REQUIRE (!wait_for_jobs());
+ vf->write_metadata ();
+}