+
+/** Check that REELTYPE_BY_VIDEO_CONTENT adds an extra reel, if necessary, at the end
+ * of all the video content to mop up anything afterward.
+ */
+BOOST_AUTO_TEST_CASE (reels_test3)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test3");
+ film->set_name ("reels_test3");
+ film->set_container (Ratio::from_id ("185"));
+ film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
+ film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
+
+ shared_ptr<Content> dcp (new DCPContent (film, "test/data/reels_test2"));
+ film->examine_and_add_content (dcp);
+ shared_ptr<Content> sub (new PlainTextFileContent (film, "test/data/subrip.srt"));
+ film->examine_and_add_content (sub);
+ wait_for_jobs ();
+
+ list<DCPTimePeriod> reels = film->reels();
+ BOOST_REQUIRE_EQUAL (reels.size(), 4);
+ list<DCPTimePeriod>::const_iterator i = reels.begin ();
+ BOOST_CHECK_EQUAL (i->from.get(), 0);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
+ BOOST_CHECK_EQUAL (i->to.get(), sub->full_length().ceil(film->video_frame_rate()).get());
+}
+
+/** Check creation of a multi-reel DCP with a single .srt subtitle file;
+ * make sure that the reel subtitle timing is done right.
+ */
+BOOST_AUTO_TEST_CASE (reels_test4)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test4");
+ film->set_name ("reels_test4");
+ film->set_container (Ratio::from_id ("185"));
+ film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
+ film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
+ film->set_interop (false);
+
+ /* 4 piece of 1s-long content */
+ shared_ptr<ImageContent> content[4];
+ for (int i = 0; i < 4; ++i) {
+ content[i].reset (new ImageContent (film, "test/data/flat_green.png"));
+ film->examine_and_add_content (content[i]);
+ wait_for_jobs ();
+ content[i]->video->set_length (24);
+ }
+
+ shared_ptr<PlainTextFileContent> subs (new PlainTextFileContent (film, "test/data/subrip3.srt"));
+ film->examine_and_add_content (subs);
+ wait_for_jobs ();
+
+ list<DCPTimePeriod> reels = film->reels();
+ BOOST_REQUIRE_EQUAL (reels.size(), 4);
+ list<DCPTimePeriod>::const_iterator i = reels.begin ();
+ BOOST_CHECK_EQUAL (i->from.get(), 0);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
+ ++i;
+ BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
+ BOOST_CHECK_EQUAL (i->to.get(), 96000 * 4);
+
+ film->make_dcp ();
+ wait_for_jobs ();
+
+ check_dcp ("test/data/reels_test4", film->dir (film->dcp_name()));
+}
+
+BOOST_AUTO_TEST_CASE (reels_test5)
+{
+ shared_ptr<Film> film = new_test_film ("reels_test5");
+ film->set_sequence (false);
+ shared_ptr<DCPContent> dcp (new DCPContent (film, "test/data/reels_test4"));
+ film->examine_and_add_content (dcp);
+ BOOST_REQUIRE (!wait_for_jobs ());
+
+ /* Set to 2123 but it will be rounded up to the next frame (4000) */
+ dcp->set_position(DCPTime(2123));
+
+ {
+ list<DCPTimePeriod> p = dcp->reels ();
+ BOOST_REQUIRE_EQUAL (p.size(), 4);
+ list<DCPTimePeriod>::const_iterator i = p.begin();
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 96000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 96000), DCPTime(4000 + 192000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 192000), DCPTime(4000 + 288000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 288000), DCPTime(4000 + 384000)));
+ }
+
+ {
+ dcp->set_trim_start (ContentTime::from_seconds (0.5));
+ list<DCPTimePeriod> p = dcp->reels ();
+ BOOST_REQUIRE_EQUAL (p.size(), 4);
+ list<DCPTimePeriod>::const_iterator i = p.begin();
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 336000)));
+ }
+
+ {
+ dcp->set_trim_end (ContentTime::from_seconds (0.5));
+ list<DCPTimePeriod> p = dcp->reels ();
+ BOOST_REQUIRE_EQUAL (p.size(), 4);
+ list<DCPTimePeriod>::const_iterator i = p.begin();
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 288000)));
+ }
+
+ {
+ dcp->set_trim_start (ContentTime::from_seconds (1.5));
+ list<DCPTimePeriod> p = dcp->reels ();
+ BOOST_REQUIRE_EQUAL (p.size(), 3);
+ list<DCPTimePeriod>::const_iterator i = p.begin();
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
+ BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 192000)));
+ }
+}
+
+/** 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 (film, "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(film, "test/data/flat_red.png").front();
+ film->examine_and_add_content (A);
+ BOOST_REQUIRE (!wait_for_jobs ());
+ shared_ptr<Content> B = content_factory(film, "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 (film, "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(film, "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(film2, film->dir(film->dcp_name())));
+ film2->examine_and_add_content(B);
+ film2->examine_and_add_content(content_factory(film, "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());
+}