X-Git-Url: https://git.carlh.net/gitweb/?p=dcpomatic.git;a=blobdiff_plain;f=test%2Freels_test.cc;h=82123b3e178d9680dd60c3b954236ef2d18a1094;hp=51cb1f2005dcbe655036bbedc3455a4b8ee71d9c;hb=fb0e2ead59a442700c671270c7d57b5bffeaeab3;hpb=2169abd0f6d569492122ad699253ab7c792f4969 diff --git a/test/reels_test.cc b/test/reels_test.cc index 51cb1f200..82123b3e1 100644 --- a/test/reels_test.cc +++ b/test/reels_test.cc @@ -1,5 +1,5 @@ /* - Copyright (C) 2015-2016 Carl Hetherington + Copyright (C) 2015-2021 Carl Hetherington This file is part of DCP-o-matic. @@ -18,54 +18,71 @@ */ -#include "lib/film.h" -#include "lib/ratio.h" + +/** @file test/reels_test.cc + * @brief Check manipulation of reels in various ways. + * @ingroup feature + */ + + +#include "lib/content_factory.h" +#include "lib/dcp_content.h" +#include "lib/dcp_content_type.h" #include "lib/ffmpeg_content.h" +#include "lib/film.h" #include "lib/image_content.h" -#include "lib/dcp_content_type.h" -#include "lib/dcp_content.h" +#include "lib/make_dcp.h" +#include "lib/ratio.h" +#include "lib/string_text_file_content.h" #include "lib/video_content.h" -#include "lib/text_subtitle_content.h" #include "test.h" #include -#include +#include + +using std::cout; +using std::function; using std::list; -using boost::shared_ptr; +using std::make_shared; +using std::shared_ptr; +using std::string; +using std::vector; +using namespace dcpomatic; + /** Test Film::reels() */ BOOST_AUTO_TEST_CASE (reels_test1) { - shared_ptr film = new_test_film ("reels_test1"); + auto film = new_test_film ("reels_test1"); film->set_container (Ratio::from_id ("185")); - shared_ptr A (new FFmpegContent (film, "test/data/test.mp4")); + auto A = make_shared("test/data/test.mp4"); film->examine_and_add_content (A); - shared_ptr B (new FFmpegContent (film, "test/data/test.mp4")); + auto B = make_shared("test/data/test.mp4"); film->examine_and_add_content (B); - wait_for_jobs (); - BOOST_CHECK_EQUAL (A->full_length().get(), 288000); + BOOST_REQUIRE (!wait_for_jobs()); + BOOST_CHECK_EQUAL (A->full_length(film).get(), 288000); - film->set_reel_type (REELTYPE_SINGLE); - list r = film->reels (); - BOOST_CHECK_EQUAL (r.size(), 1); + film->set_reel_type (ReelType::SINGLE); + auto r = film->reels (); + BOOST_CHECK_EQUAL (r.size(), 1U); BOOST_CHECK_EQUAL (r.front().from.get(), 0); BOOST_CHECK_EQUAL (r.front().to.get(), 288000 * 2); - film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); r = film->reels (); - BOOST_CHECK_EQUAL (r.size(), 2); + BOOST_CHECK_EQUAL (r.size(), 2U); BOOST_CHECK_EQUAL (r.front().from.get(), 0); BOOST_CHECK_EQUAL (r.front().to.get(), 288000); BOOST_CHECK_EQUAL (r.back().from.get(), 288000); BOOST_CHECK_EQUAL (r.back().to.get(), 288000 * 2); film->set_j2k_bandwidth (100000000); - film->set_reel_type (REELTYPE_BY_LENGTH); + 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); r = film->reels (); - BOOST_CHECK_EQUAL (r.size(), 3); - list::const_iterator i = r.begin (); + BOOST_CHECK_EQUAL (r.size(), 3U); + auto i = r.begin (); BOOST_CHECK_EQUAL (i->from.get(), 0); BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(60, 24).get()); ++i; @@ -76,58 +93,54 @@ BOOST_AUTO_TEST_CASE (reels_test1) BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(144, 24).get()); } + /** Make a short DCP with multi reels split by video content, then import * this into a new project and make a new DCP referencing it. */ BOOST_AUTO_TEST_CASE (reels_test2) { - shared_ptr film = new_test_film ("reels_test2"); + auto film = new_test_film ("reels_test2"); film->set_name ("reels_test2"); film->set_container (Ratio::from_id ("185")); + film->set_interop (false); film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST")); { - shared_ptr c (new ImageContent (film, "test/data/flat_red.png")); + shared_ptr c (new ImageContent("test/data/flat_red.png")); film->examine_and_add_content (c); - wait_for_jobs (); + BOOST_REQUIRE (!wait_for_jobs()); c->video->set_length (24); } { - shared_ptr c (new ImageContent (film, "test/data/flat_green.png")); + shared_ptr c (new ImageContent("test/data/flat_green.png")); film->examine_and_add_content (c); - wait_for_jobs (); + BOOST_REQUIRE (!wait_for_jobs()); c->video->set_length (24); } { - shared_ptr c (new ImageContent (film, "test/data/flat_blue.png")); + shared_ptr c (new ImageContent("test/data/flat_blue.png")); film->examine_and_add_content (c); - wait_for_jobs (); + BOOST_REQUIRE (!wait_for_jobs()); c->video->set_length (24); } - film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT); - wait_for_jobs (); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + BOOST_CHECK_EQUAL (film->reels().size(), 3U); + BOOST_REQUIRE (!wait_for_jobs()); - film->make_dcp (); - wait_for_jobs (); + make_and_verify_dcp (film); check_dcp ("test/data/reels_test2", film->dir (film->dcp_name())); - shared_ptr film2 = new_test_film ("reels_test2b"); - film2->set_name ("reels_test2b"); - film2->set_container (Ratio::from_id ("185")); - film2->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST")); - film2->set_reel_type (REELTYPE_BY_VIDEO_CONTENT); + auto c = make_shared(film->dir(film->dcp_name())); + auto film2 = new_test_film2 ("reels_test2b", {c}); + film2->set_reel_type (ReelType::BY_VIDEO_CONTENT); - shared_ptr c (new DCPContent (film2, film->dir (film->dcp_name ()))); - film2->examine_and_add_content (c); - wait_for_jobs (); - - list r = film2->reels (); - BOOST_CHECK_EQUAL (r.size(), 3); - list::const_iterator i = r.begin (); + auto r = film2->reels (); + BOOST_CHECK_EQUAL (r.size(), 3U); + auto i = r.begin (); BOOST_CHECK_EQUAL (i->from.get(), 0); BOOST_CHECK_EQUAL (i->to.get(), 96000); ++i; @@ -140,30 +153,23 @@ BOOST_AUTO_TEST_CASE (reels_test2) c->set_reference_video (true); c->set_reference_audio (true); - film2->make_dcp (); - wait_for_jobs (); + make_and_verify_dcp (film2, {dcp::VerificationNote::Code::EXTERNAL_ASSET}); } -/** Check that REELTYPE_BY_VIDEO_CONTENT adds an extra reel, if necessary, at the end + +/** 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 = 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 dcp (new DCPContent (film, "test/data/reels_test2")); - film->examine_and_add_content (dcp); - shared_ptr sub (new TextSubtitleContent (film, "test/data/subrip.srt")); - film->examine_and_add_content (sub); - wait_for_jobs (); - - list reels = film->reels(); - BOOST_REQUIRE_EQUAL (reels.size(), 4); - list::const_iterator i = reels.begin (); + auto dcp = make_shared("test/data/reels_test2"); + auto sub = make_shared("test/data/subrip.srt"); + auto film = new_test_film2 ("reels_test3", {dcp, sub}); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + + auto reels = film->reels(); + BOOST_REQUIRE_EQUAL (reels.size(), 4U); + auto i = reels.begin (); BOOST_CHECK_EQUAL (i->from.get(), 0); BOOST_CHECK_EQUAL (i->to.get(), 96000); ++i; @@ -174,36 +180,35 @@ BOOST_AUTO_TEST_CASE (reels_test3) 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().round_up(film->video_frame_rate()).get()); + BOOST_CHECK_EQUAL (i->to.get(), sub->full_length(film).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 = 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); + auto film = new_test_film2 ("reels_test4"); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + film->set_interop (false); /* 4 piece of 1s-long content */ shared_ptr content[4]; for (int i = 0; i < 4; ++i) { - content[i].reset (new ImageContent (film, "test/data/flat_green.png")); + content[i].reset (new ImageContent("test/data/flat_green.png")); film->examine_and_add_content (content[i]); - wait_for_jobs (); + BOOST_REQUIRE (!wait_for_jobs()); content[i]->video->set_length (24); } - shared_ptr subs (new TextSubtitleContent (film, "test/data/subrip3.srt")); + auto subs = make_shared("test/data/subrip3.srt"); film->examine_and_add_content (subs); - wait_for_jobs (); + BOOST_REQUIRE (!wait_for_jobs()); - list reels = film->reels(); - BOOST_REQUIRE_EQUAL (reels.size(), 4); - list::const_iterator i = reels.begin (); + auto reels = film->reels(); + BOOST_REQUIRE_EQUAL (reels.size(), 4U); + auto i = reels.begin (); BOOST_CHECK_EQUAL (i->from.get(), 0); BOOST_CHECK_EQUAL (i->to.get(), 96000); ++i; @@ -216,60 +221,356 @@ BOOST_AUTO_TEST_CASE (reels_test4) BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3); BOOST_CHECK_EQUAL (i->to.get(), 96000 * 4); - film->make_dcp (); - wait_for_jobs (); + make_and_verify_dcp ( + film, + { + dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE, + dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME, + dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION + }); check_dcp ("test/data/reels_test4", film->dir (film->dcp_name())); } + BOOST_AUTO_TEST_CASE (reels_test5) { - shared_ptr film = new_test_film ("reels_test4"); - shared_ptr dcp (new DCPContent (film, "test/data/reels_test4")); - film->examine_and_add_content (dcp); - wait_for_jobs (); + auto dcp = make_shared("test/data/reels_test4"); + auto film = new_test_film2 ("reels_test5", {dcp}); + film->set_sequence (false); - dcp->set_position(DCPTime(123)); + /* Set to 2123 but it will be rounded up to the next frame (4000) */ + dcp->set_position(film, DCPTime(2123)); { - list p = dcp->reels (); - BOOST_REQUIRE_EQUAL (p.size(), 4); - list::const_iterator i = p.begin(); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 0), DCPTime(123 + 96000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 96000), DCPTime(123 + 192000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 192000), DCPTime(123 + 288000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 288000), DCPTime(123 + 384000))); + auto p = dcp->reels (film); + BOOST_REQUIRE_EQUAL (p.size(), 4U); + auto 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 p = dcp->reels (); - BOOST_REQUIRE_EQUAL (p.size(), 4); - list::const_iterator i = p.begin(); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 0), DCPTime(123 + 48000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 48000), DCPTime(123 + 144000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 144000), DCPTime(123 + 240000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 240000), DCPTime(123 + 336000))); + auto p = dcp->reels (film); + BOOST_REQUIRE_EQUAL (p.size(), 4U); + auto 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 p = dcp->reels (); - BOOST_REQUIRE_EQUAL (p.size(), 4); - list::const_iterator i = p.begin(); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 0), DCPTime(123 + 48000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 48000), DCPTime(123 + 144000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 144000), DCPTime(123 + 240000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 240000), DCPTime(123 + 288000))); + auto p = dcp->reels (film); + BOOST_REQUIRE_EQUAL (p.size(), 4U); + auto 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 p = dcp->reels (); - BOOST_REQUIRE_EQUAL (p.size(), 3); - list::const_iterator i = p.begin(); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 0), DCPTime(123 + 48000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 48000), DCPTime(123 + 144000))); - BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(123 + 144000), DCPTime(123 + 192000))); + auto p = dcp->reels (film); + BOOST_REQUIRE_EQUAL (p.size(), 3U); + auto 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) +{ + auto A = make_shared("test/data/test2.mp4"); + auto film = new_test_film2 ("reels_test6", {A}); + + 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); + make_and_verify_dcp ( + film, + { + dcp::VerificationNote::Code::INVALID_INTRINSIC_DURATION, + dcp::VerificationNote::Code::INVALID_DURATION, + }); +} + + +/** 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) +{ + auto A = content_factory("test/data/flat_red.png").front(); + auto B = content_factory("test/data/awkward_length.wav").front(); + auto film = new_test_film2 ("reels_test7", { A, B }); + film->set_video_frame_rate (24); + A->video->set_length (2 * 24); + + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + BOOST_REQUIRE_EQUAL (film->reels().size(), 2U); + BOOST_CHECK (film->reels().front() == DCPTimePeriod(DCPTime(0), DCPTime::from_frames(2 * 24, 24))); + BOOST_CHECK (film->reels().back() == DCPTimePeriod(DCPTime::from_frames(2 * 24, 24), DCPTime::from_frames(3 * 24 + 1, 24))); + + make_and_verify_dcp (film); +} + + +/** Check a reels-related error; make_dcp() would raise a ProgrammingError */ +BOOST_AUTO_TEST_CASE (reels_test8) +{ + auto A = make_shared("test/data/test2.mp4"); + auto film = new_test_film2 ("reels_test8", {A}); + + A->set_trim_end (ContentTime::from_seconds (1)); + make_and_verify_dcp (film); +} + + +/** Check another reels-related error; make_dcp() would raise a ProgrammingError */ +BOOST_AUTO_TEST_CASE (reels_test9) +{ + auto A = make_shared("test/data/flat_red.png"); + auto film = new_test_film2("reels_test9a", {A}); + A->video->set_length(5 * 24); + film->set_video_frame_rate(24); + make_and_verify_dcp (film); + + auto B = make_shared(film->dir(film->dcp_name())); + auto film2 = new_test_film2("reels_test9b", {B, content_factory("test/data/dcp_sub4.xml").front()}); + B->set_reference_video(true); + B->set_reference_audio(true); + film2->set_reel_type(ReelType::BY_VIDEO_CONTENT); + film2->write_metadata(); + make_and_verify_dcp ( + film2, + { + dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE, + dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME + }); +} + + +/** 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 */ + auto A = make_shared("test/data/flat_red.png"); + auto B = make_shared("test/data/flat_red.png"); + auto ov = new_test_film2("reels_test10_ov", {A, B}); + A->video->set_length (5 * 24); + B->video->set_length (5 * 24); + + ov->set_reel_type (ReelType::BY_VIDEO_CONTENT); + make_and_verify_dcp (ov); + ov->write_metadata (); + + /* Now try to make the VF; this used to fail */ + auto ov_dcp = make_shared(ov->dir(ov->dcp_name())); + auto vf = new_test_film2("reels_test10_vf", {ov_dcp, content_factory("test/data/15s.srt").front()}); + vf->set_reel_type (ReelType::BY_VIDEO_CONTENT); + ov_dcp->set_reference_video (true); + ov_dcp->set_reference_audio (true); + + make_and_verify_dcp ( + vf, + { + dcp::VerificationNote::Code::EXTERNAL_ASSET, + dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE, + dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME, + dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION, + }); +} + + +/** Another reels error; ReelType::BY_VIDEO_CONTENT when the first content is not + * at time 0. + */ +BOOST_AUTO_TEST_CASE (reels_test11) +{ + auto A = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_test11", {A}); + film->set_video_frame_rate (24); + A->video->set_length (240); + A->set_video_frame_rate (24); + A->set_position (film, DCPTime::from_seconds(1)); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + make_and_verify_dcp (film); + BOOST_CHECK_EQUAL (A->position().get(), DCPTime::from_seconds(1).get()); + BOOST_CHECK_EQUAL (A->end(film).get(), DCPTime::from_seconds(1 + 10).get()); + + auto r = film->reels (); + BOOST_CHECK_EQUAL (r.size(), 2U); + BOOST_CHECK_EQUAL (r.front().from.get(), 0); + BOOST_CHECK_EQUAL (r.front().to.get(), DCPTime::from_seconds(1).get()); + BOOST_CHECK_EQUAL (r.back().from.get(), DCPTime::from_seconds(1).get()); + BOOST_CHECK_EQUAL (r.back().to.get(), DCPTime::from_seconds(1 + 10).get()); +} + + +/** For VFs to work right we have to make separate reels for empty bits between + * video content. + */ +BOOST_AUTO_TEST_CASE (reels_test12) +{ + auto A = make_shared("test/data/flat_red.png"); + auto B = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_test12", {A, B}); + film->set_video_frame_rate (24); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + film->set_sequence (false); + + A->video->set_length (240); + A->set_video_frame_rate (24); + A->set_position (film, DCPTime::from_seconds(1)); + + B->video->set_length (120); + B->set_video_frame_rate (24); + B->set_position (film, DCPTime::from_seconds(14)); + + auto r = film->reels (); + BOOST_REQUIRE_EQUAL (r.size(), 4U); + auto i = r.begin (); + + BOOST_CHECK_EQUAL (i->from.get(), 0); + BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(1).get()); + ++i; + BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(1).get()); + BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(11).get()); + ++i; + BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(11).get()); + BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(14).get()); + ++i; + BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(14).get()); + BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(19).get()); +} + + +static void +no_op () +{ + +} + +static void +dump_notes (vector const & notes) +{ + for (auto i: notes) { + std::cout << dcp::note_to_string(i) << "\n"; + } +} + + +/** Using less than 1 second's worth of content should not result in a reel + * of less than 1 second's duration. + */ +BOOST_AUTO_TEST_CASE (reels_should_not_be_short1) +{ + auto A = make_shared("test/data/flat_red.png"); + auto B = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_should_not_be_short1", {A, B}); + film->set_video_frame_rate (24); + + A->video->set_length (23); + + B->video->set_length (23); + B->set_position (film, DCPTime::from_frames(23, 24)); + + make_and_verify_dcp (film); + + vector dirs = { film->dir(film->dcp_name(false)) }; + auto notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd()); + dump_notes (notes); + BOOST_REQUIRE (notes.empty()); +} + + +/** Leaving less than 1 second's gap between two pieces of content with + * ReelType::BY_VIDEO_CONTENT should not make a <1s reel. + */ +BOOST_AUTO_TEST_CASE (reels_should_not_be_short2) +{ + auto A = make_shared("test/data/flat_red.png"); + auto B = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_should_not_be_short2", {A, B}); + film->set_video_frame_rate (24); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + + A->video->set_length (240); + + B->video->set_length (240); + B->set_position (film, DCPTime::from_seconds(10.2)); + + make_and_verify_dcp (film); + + vector dirs = { film->dir(film->dcp_name(false)) }; + auto const notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd()); + dump_notes (notes); + BOOST_REQUIRE (notes.empty()); +} + + +/** Setting ReelType::BY_LENGTH and using a small length value should not make + * <1s reels. + */ +BOOST_AUTO_TEST_CASE (reels_should_not_be_short3) +{ + auto A = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_should_not_be_short3", {A}); + film->set_video_frame_rate (24); + film->set_reel_type (ReelType::BY_LENGTH); + film->set_reel_length (1024 * 1024 * 10); + + A->video->set_length (240); + + make_and_verify_dcp (film); + + auto const notes = dcp::verify({}, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd()); + dump_notes (notes); + BOOST_REQUIRE (notes.empty()); +} + + +/** Having one piece of content less than 1s long in ReelType::BY_VIDEO_CONTENT + * should not make a reel less than 1s long. + */ +BOOST_AUTO_TEST_CASE (reels_should_not_be_short4) +{ + auto A = make_shared("test/data/flat_red.png"); + auto B = make_shared("test/data/flat_red.png"); + auto film = new_test_film2 ("reels_should_not_be_short4", {A, B}); + film->set_video_frame_rate (24); + film->set_reel_type (ReelType::BY_VIDEO_CONTENT); + + A->video->set_length (240); + + B->video->set_length (23); + B->set_position (film, DCPTime::from_frames(240, 24)); + + BOOST_CHECK_EQUAL (film->reels().size(), 1U); + BOOST_CHECK (film->reels().front() == dcpomatic::DCPTimePeriod(dcpomatic::DCPTime(), dcpomatic::DCPTime::from_frames(263, 24))); + + film->write_metadata (); + make_dcp (film, TranscodeJob::ChangedBehaviour::IGNORE); + BOOST_REQUIRE (!wait_for_jobs()); + + vector dirs = { film->dir(film->dcp_name(false)) }; + auto const notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd()); + dump_notes (notes); + BOOST_REQUIRE (notes.empty()); +} +