2 Copyright (C) 2015-2021 Carl Hetherington <cth@carlh.net>
4 This file is part of DCP-o-matic.
6 DCP-o-matic is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 DCP-o-matic is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with DCP-o-matic. If not, see <http://www.gnu.org/licenses/>.
22 /** @file test/reels_test.cc
23 * @brief Check manipulation of reels in various ways.
28 #include "lib/content_factory.h"
29 #include "lib/dcp_content.h"
30 #include "lib/dcp_content_type.h"
31 #include "lib/ffmpeg_content.h"
33 #include "lib/image_content.h"
34 #include "lib/make_dcp.h"
35 #include "lib/ratio.h"
36 #include "lib/string_text_file_content.h"
37 #include "lib/video_content.h"
41 #include <dcp/reel_picture_asset.h>
42 #include <dcp/reel_sound_asset.h>
43 #include <boost/test/unit_test.hpp>
50 using std::make_shared;
51 using std::shared_ptr;
54 using namespace dcpomatic;
57 /** Test Film::reels() */
58 BOOST_AUTO_TEST_CASE (reels_test1)
60 auto film = new_test_film ("reels_test1");
61 film->set_container (Ratio::from_id ("185"));
62 auto A = make_shared<FFmpegContent>("test/data/test.mp4");
63 film->examine_and_add_content (A);
64 auto B = make_shared<FFmpegContent>("test/data/test.mp4");
65 film->examine_and_add_content (B);
66 BOOST_REQUIRE (!wait_for_jobs());
67 BOOST_CHECK_EQUAL (A->full_length(film).get(), 288000);
69 film->set_reel_type (ReelType::SINGLE);
70 auto r = film->reels ();
71 BOOST_CHECK_EQUAL (r.size(), 1U);
72 BOOST_CHECK_EQUAL (r.front().from.get(), 0);
73 BOOST_CHECK_EQUAL (r.front().to.get(), 288000 * 2);
75 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
77 BOOST_CHECK_EQUAL (r.size(), 2U);
78 BOOST_CHECK_EQUAL (r.front().from.get(), 0);
79 BOOST_CHECK_EQUAL (r.front().to.get(), 288000);
80 BOOST_CHECK_EQUAL (r.back().from.get(), 288000);
81 BOOST_CHECK_EQUAL (r.back().to.get(), 288000 * 2);
83 film->set_j2k_bandwidth (100000000);
84 film->set_reel_type (ReelType::BY_LENGTH);
85 /* This is just over 2.5s at 100Mbit/s; should correspond to 60 frames */
86 film->set_reel_length (31253154);
88 BOOST_CHECK_EQUAL (r.size(), 3U);
90 BOOST_CHECK_EQUAL (i->from.get(), 0);
91 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(60, 24).get());
93 BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_frames(60, 24).get());
94 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(120, 24).get());
96 BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_frames(120, 24).get());
97 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(144, 24).get());
101 /** Make a short DCP with multi reels split by video content, then import
102 * this into a new project and make a new DCP referencing it.
104 BOOST_AUTO_TEST_CASE (reels_test2)
106 auto film = new_test_film ("reels_test2");
107 film->set_name ("reels_test2");
108 film->set_container (Ratio::from_id ("185"));
109 film->set_interop (false);
110 film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
113 shared_ptr<ImageContent> c (new ImageContent("test/data/flat_red.png"));
114 film->examine_and_add_content (c);
115 BOOST_REQUIRE (!wait_for_jobs());
116 c->video->set_length (24);
120 shared_ptr<ImageContent> c (new ImageContent("test/data/flat_green.png"));
121 film->examine_and_add_content (c);
122 BOOST_REQUIRE (!wait_for_jobs());
123 c->video->set_length (24);
127 shared_ptr<ImageContent> c (new ImageContent("test/data/flat_blue.png"));
128 film->examine_and_add_content (c);
129 BOOST_REQUIRE (!wait_for_jobs());
130 c->video->set_length (24);
133 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
134 BOOST_CHECK_EQUAL (film->reels().size(), 3U);
135 BOOST_REQUIRE (!wait_for_jobs());
137 make_and_verify_dcp (film);
139 check_dcp ("test/data/reels_test2", film->dir (film->dcp_name()));
141 auto c = make_shared<DCPContent>(film->dir(film->dcp_name()));
142 auto film2 = new_test_film2 ("reels_test2b", {c});
143 film2->set_reel_type (ReelType::BY_VIDEO_CONTENT);
145 auto r = film2->reels ();
146 BOOST_CHECK_EQUAL (r.size(), 3U);
148 BOOST_CHECK_EQUAL (i->from.get(), 0);
149 BOOST_CHECK_EQUAL (i->to.get(), 96000);
151 BOOST_CHECK_EQUAL (i->from.get(), 96000);
152 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
154 BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
155 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
157 c->set_reference_video (true);
158 c->set_reference_audio (true);
160 make_and_verify_dcp (film2, {dcp::VerificationNote::Code::EXTERNAL_ASSET});
164 /** Check that ReelType::BY_VIDEO_CONTENT adds an extra reel, if necessary, at the end
165 * of all the video content to mop up anything afterward.
167 BOOST_AUTO_TEST_CASE (reels_test3)
169 auto dcp = make_shared<DCPContent>("test/data/reels_test2");
170 auto sub = make_shared<StringTextFileContent>("test/data/subrip.srt");
171 auto film = new_test_film2 ("reels_test3", {dcp, sub});
172 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
174 auto reels = film->reels();
175 BOOST_REQUIRE_EQUAL (reels.size(), 4U);
176 auto i = reels.begin ();
177 BOOST_CHECK_EQUAL (i->from.get(), 0);
178 BOOST_CHECK_EQUAL (i->to.get(), 96000);
180 BOOST_CHECK_EQUAL (i->from.get(), 96000);
181 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
183 BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
184 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
186 BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
187 BOOST_CHECK_EQUAL (i->to.get(), sub->full_length(film).ceil(film->video_frame_rate()).get());
191 /** Check creation of a multi-reel DCP with a single .srt subtitle file;
192 * make sure that the reel subtitle timing is done right.
194 BOOST_AUTO_TEST_CASE (reels_test4)
196 auto film = new_test_film2 ("reels_test4");
197 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
198 film->set_interop (false);
200 /* 4 piece of 1s-long content */
201 shared_ptr<ImageContent> content[4];
202 for (int i = 0; i < 4; ++i) {
203 content[i].reset (new ImageContent("test/data/flat_green.png"));
204 film->examine_and_add_content (content[i]);
205 BOOST_REQUIRE (!wait_for_jobs());
206 content[i]->video->set_length (24);
209 auto subs = make_shared<StringTextFileContent>("test/data/subrip3.srt");
210 film->examine_and_add_content (subs);
211 BOOST_REQUIRE (!wait_for_jobs());
213 auto reels = film->reels();
214 BOOST_REQUIRE_EQUAL (reels.size(), 4U);
215 auto i = reels.begin ();
216 BOOST_CHECK_EQUAL (i->from.get(), 0);
217 BOOST_CHECK_EQUAL (i->to.get(), 96000);
219 BOOST_CHECK_EQUAL (i->from.get(), 96000);
220 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
222 BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
223 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
225 BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
226 BOOST_CHECK_EQUAL (i->to.get(), 96000 * 4);
228 make_and_verify_dcp (
231 dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
232 dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME,
233 dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION
236 check_dcp ("test/data/reels_test4", film->dir (film->dcp_name()));
240 BOOST_AUTO_TEST_CASE (reels_test5)
242 auto dcp = make_shared<DCPContent>("test/data/reels_test4");
243 auto film = new_test_film2 ("reels_test5", {dcp});
244 film->set_sequence (false);
246 /* Set to 2123 but it will be rounded up to the next frame (4000) */
247 dcp->set_position(film, DCPTime(2123));
250 auto p = dcp->reels (film);
251 BOOST_REQUIRE_EQUAL (p.size(), 4U);
253 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 96000)));
254 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 96000), DCPTime(4000 + 192000)));
255 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 192000), DCPTime(4000 + 288000)));
256 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 288000), DCPTime(4000 + 384000)));
260 dcp->set_trim_start (ContentTime::from_seconds (0.5));
261 auto p = dcp->reels (film);
262 BOOST_REQUIRE_EQUAL (p.size(), 4U);
264 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
265 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
266 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
267 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 336000)));
271 dcp->set_trim_end (ContentTime::from_seconds (0.5));
272 auto p = dcp->reels (film);
273 BOOST_REQUIRE_EQUAL (p.size(), 4U);
275 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
276 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
277 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
278 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 288000)));
282 dcp->set_trim_start (ContentTime::from_seconds (1.5));
283 auto p = dcp->reels (film);
284 BOOST_REQUIRE_EQUAL (p.size(), 3U);
286 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
287 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
288 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 192000)));
293 /** Check reel split with a muxed video/audio source */
294 BOOST_AUTO_TEST_CASE (reels_test6)
296 auto A = make_shared<FFmpegContent>("test/data/test2.mp4");
297 auto film = new_test_film2 ("reels_test6", {A});
299 film->set_j2k_bandwidth (100000000);
300 film->set_reel_type (ReelType::BY_LENGTH);
301 /* This is just over 2.5s at 100Mbit/s; should correspond to 60 frames */
302 film->set_reel_length (31253154);
303 make_and_verify_dcp (
306 dcp::VerificationNote::Code::INVALID_INTRINSIC_DURATION,
307 dcp::VerificationNote::Code::INVALID_DURATION,
312 /** Check the case where the last bit of audio hangs over the end of the video
313 * and we are using ReelType::BY_VIDEO_CONTENT.
315 BOOST_AUTO_TEST_CASE (reels_test7)
317 auto A = content_factory("test/data/flat_red.png").front();
318 auto B = content_factory("test/data/awkward_length.wav").front();
319 auto film = new_test_film2 ("reels_test7", { A, B });
320 film->set_video_frame_rate (24);
321 A->video->set_length (2 * 24);
323 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
324 BOOST_REQUIRE_EQUAL (film->reels().size(), 2U);
325 BOOST_CHECK (film->reels().front() == DCPTimePeriod(DCPTime(0), DCPTime::from_frames(2 * 24, 24)));
326 BOOST_CHECK (film->reels().back() == DCPTimePeriod(DCPTime::from_frames(2 * 24, 24), DCPTime::from_frames(3 * 24 + 1, 24)));
328 make_and_verify_dcp (film);
332 /** Check a reels-related error; make_dcp() would raise a ProgrammingError */
333 BOOST_AUTO_TEST_CASE (reels_test8)
335 auto A = make_shared<FFmpegContent>("test/data/test2.mp4");
336 auto film = new_test_film2 ("reels_test8", {A});
338 A->set_trim_end (ContentTime::from_seconds (1));
339 make_and_verify_dcp (film);
343 /** Check another reels-related error; make_dcp() would raise a ProgrammingError */
344 BOOST_AUTO_TEST_CASE (reels_test9)
346 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
347 auto film = new_test_film2("reels_test9a", {A});
348 A->video->set_length(5 * 24);
349 film->set_video_frame_rate(24);
350 make_and_verify_dcp (film);
352 auto B = make_shared<DCPContent>(film->dir(film->dcp_name()));
353 auto film2 = new_test_film2("reels_test9b", {B, content_factory("test/data/dcp_sub4.xml").front()});
354 B->set_reference_video(true);
355 B->set_reference_audio(true);
356 film2->set_reel_type(ReelType::BY_VIDEO_CONTENT);
357 film2->write_metadata();
358 make_and_verify_dcp (
361 dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
362 dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME
367 /** Another reels-related error; make_dcp() would raise a ProgrammingError
368 * in AudioBuffers::allocate due to an attempt to allocate a negatively-sized buffer.
369 * This was triggered by a VF where there are referenced audio reels followed by
370 * VF audio. When the VF audio arrives the Writer did not correctly skip over the
373 BOOST_AUTO_TEST_CASE (reels_test10)
376 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
377 auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
378 auto ov = new_test_film2("reels_test10_ov", {A, B});
379 A->video->set_length (5 * 24);
380 B->video->set_length (5 * 24);
382 ov->set_reel_type (ReelType::BY_VIDEO_CONTENT);
383 make_and_verify_dcp (ov);
384 ov->write_metadata ();
386 /* Now try to make the VF; this used to fail */
387 auto ov_dcp = make_shared<DCPContent>(ov->dir(ov->dcp_name()));
388 auto vf = new_test_film2("reels_test10_vf", {ov_dcp, content_factory("test/data/15s.srt").front()});
389 vf->set_reel_type (ReelType::BY_VIDEO_CONTENT);
390 ov_dcp->set_reference_video (true);
391 ov_dcp->set_reference_audio (true);
393 make_and_verify_dcp (
396 dcp::VerificationNote::Code::EXTERNAL_ASSET,
397 dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
398 dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME,
399 dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION,
404 /** Another reels error; ReelType::BY_VIDEO_CONTENT when the first content is not
407 BOOST_AUTO_TEST_CASE (reels_test11)
409 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
410 auto film = new_test_film2 ("reels_test11", {A});
411 film->set_video_frame_rate (24);
412 A->video->set_length (240);
413 A->set_video_frame_rate (24);
414 A->set_position (film, DCPTime::from_seconds(1));
415 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
416 make_and_verify_dcp (film);
417 BOOST_CHECK_EQUAL (A->position().get(), DCPTime::from_seconds(1).get());
418 BOOST_CHECK_EQUAL (A->end(film).get(), DCPTime::from_seconds(1 + 10).get());
420 auto r = film->reels ();
421 BOOST_CHECK_EQUAL (r.size(), 2U);
422 BOOST_CHECK_EQUAL (r.front().from.get(), 0);
423 BOOST_CHECK_EQUAL (r.front().to.get(), DCPTime::from_seconds(1).get());
424 BOOST_CHECK_EQUAL (r.back().from.get(), DCPTime::from_seconds(1).get());
425 BOOST_CHECK_EQUAL (r.back().to.get(), DCPTime::from_seconds(1 + 10).get());
429 /** For VFs to work right we have to make separate reels for empty bits between
432 BOOST_AUTO_TEST_CASE (reels_test12)
434 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
435 auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
436 auto film = new_test_film2 ("reels_test12", {A, B});
437 film->set_video_frame_rate (24);
438 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
439 film->set_sequence (false);
441 A->video->set_length (240);
442 A->set_video_frame_rate (24);
443 A->set_position (film, DCPTime::from_seconds(1));
445 B->video->set_length (120);
446 B->set_video_frame_rate (24);
447 B->set_position (film, DCPTime::from_seconds(14));
449 auto r = film->reels ();
450 BOOST_REQUIRE_EQUAL (r.size(), 4U);
453 BOOST_CHECK_EQUAL (i->from.get(), 0);
454 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(1).get());
456 BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(1).get());
457 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(11).get());
459 BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(11).get());
460 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(14).get());
462 BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(14).get());
463 BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_seconds(19).get());
474 dump_notes (vector<dcp::VerificationNote> const & notes)
476 for (auto i: notes) {
477 std::cout << dcp::note_to_string(i) << "\n";
482 /** Using less than 1 second's worth of content should not result in a reel
483 * of less than 1 second's duration.
485 BOOST_AUTO_TEST_CASE (reels_should_not_be_short1)
487 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
488 auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
489 auto film = new_test_film2 ("reels_should_not_be_short1", {A, B});
490 film->set_video_frame_rate (24);
492 A->video->set_length (23);
494 B->video->set_length (23);
495 B->set_position (film, DCPTime::from_frames(23, 24));
497 make_and_verify_dcp (film);
499 vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
500 auto notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd());
502 BOOST_REQUIRE (notes.empty());
506 /** Leaving less than 1 second's gap between two pieces of content with
507 * ReelType::BY_VIDEO_CONTENT should not make a <1s reel.
509 BOOST_AUTO_TEST_CASE (reels_should_not_be_short2)
511 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
512 auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
513 auto film = new_test_film2 ("reels_should_not_be_short2", {A, B});
514 film->set_video_frame_rate (24);
515 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
517 A->video->set_length (240);
519 B->video->set_length (240);
520 B->set_position (film, DCPTime::from_seconds(10.2));
522 make_and_verify_dcp (film);
524 vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
525 auto const notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd());
527 BOOST_REQUIRE (notes.empty());
531 /** Setting ReelType::BY_LENGTH and using a small length value should not make
534 BOOST_AUTO_TEST_CASE (reels_should_not_be_short3)
536 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
537 auto film = new_test_film2 ("reels_should_not_be_short3", {A});
538 film->set_video_frame_rate (24);
539 film->set_reel_type (ReelType::BY_LENGTH);
540 film->set_reel_length (1024 * 1024 * 10);
542 A->video->set_length (240);
544 make_and_verify_dcp (film);
546 auto const notes = dcp::verify({}, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd());
548 BOOST_REQUIRE (notes.empty());
552 /** Having one piece of content less than 1s long in ReelType::BY_VIDEO_CONTENT
553 * should not make a reel less than 1s long.
555 BOOST_AUTO_TEST_CASE (reels_should_not_be_short4)
557 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
558 auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
559 auto film = new_test_film2 ("reels_should_not_be_short4", {A, B});
560 film->set_video_frame_rate (24);
561 film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
563 A->video->set_length (240);
565 B->video->set_length (23);
566 B->set_position (film, DCPTime::from_frames(240, 24));
568 BOOST_CHECK_EQUAL (film->reels().size(), 1U);
569 BOOST_CHECK (film->reels().front() == dcpomatic::DCPTimePeriod(dcpomatic::DCPTime(), dcpomatic::DCPTime::from_frames(263, 24)));
571 film->write_metadata ();
572 make_dcp (film, TranscodeJob::ChangedBehaviour::IGNORE);
573 BOOST_REQUIRE (!wait_for_jobs());
575 vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
576 auto const notes = dcp::verify(dirs, boost::bind(&no_op), boost::bind(&no_op), TestPaths::xsd());
578 BOOST_REQUIRE (notes.empty());
582 /** Create a long DCP A then insert it repeatedly into a new project, trimming it differently each time.
583 * Make a DCP B from that project which refers to A and splits into reels. This was found to go wrong
584 * when looking at #2268.
586 BOOST_AUTO_TEST_CASE (repeated_dcp_into_reels)
589 auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
590 auto film1 = new_test_film2("repeated_dcp_into_reels1", { A });
591 auto constexpr frame_rate = 24;
592 auto constexpr length_in_seconds = 20;
593 auto constexpr total_frames = frame_rate * length_in_seconds;
594 film1->set_video_frame_rate(frame_rate);
595 A->video->set_length(total_frames);
596 make_and_verify_dcp(film1);
598 /* Make a new project that includes this long DCP 4 times, each
599 * trimmed to a quarter of the original, i.e.
600 * /----------------------|----------------------|----------------------|----------------------\
601 * | 1st quarter of film1 | 2nd quarter of film1 | 3rd quarter of film1 | 4th quarter of film1 |
602 * \----------------------|----------------------|----------------------|_---------------------/
605 shared_ptr<DCPContent> original_dcp[4] = {
606 make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
607 make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
608 make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
609 make_shared<DCPContent>(film1->dir(film1->dcp_name(false)))
612 auto film2 = new_test_film2("repeated_dcp_into_reels2", { original_dcp[0], original_dcp[1], original_dcp[2], original_dcp[3] });
613 film2->set_reel_type(ReelType::BY_VIDEO_CONTENT);
614 film2->set_video_frame_rate(frame_rate);
615 film2->set_sequence(false);
617 for (int i = 0; i < 4; ++i) {
618 original_dcp[i]->set_position(film2, DCPTime::from_frames(total_frames * i / 4, frame_rate));
619 original_dcp[i]->set_trim_start(ContentTime::from_frames(total_frames * i / 4, frame_rate));
620 original_dcp[i]->set_trim_end (ContentTime::from_frames(total_frames * (4 - i - 1) / 4, frame_rate));
621 original_dcp[i]->set_reference_video(true);
622 original_dcp[i]->set_reference_audio(true);
625 make_and_verify_dcp(film2, { dcp::VerificationNote::Code::EXTERNAL_ASSET });
627 dcp::DCP check1(film1->dir(film1->dcp_name()));
629 BOOST_REQUIRE(!check1.cpls().empty());
630 BOOST_REQUIRE(!check1.cpls()[0]->reels().empty());
631 auto picture = check1.cpls()[0]->reels()[0]->main_picture()->asset();
632 BOOST_REQUIRE(picture);
633 auto sound = check1.cpls()[0]->reels()[0]->main_sound()->asset();
634 BOOST_REQUIRE(sound);
636 dcp::DCP check2(film2->dir(film2->dcp_name()));
638 BOOST_REQUIRE(!check2.cpls().empty());
639 auto cpl = check2.cpls()[0];
640 BOOST_REQUIRE_EQUAL(cpl->reels().size(), 4U);
641 for (int i = 0; i < 4; ++i) {
642 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->entry_point().get_value_or(0), total_frames * i / 4);
643 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->duration().get_value_or(0), total_frames / 4);
644 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->id(), picture->id());
645 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->entry_point().get_value_or(0), total_frames * i / 4);
646 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->duration().get_value_or(0), total_frames / 4);
647 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->id(), sound->id());