test/reels_test.cc

   1 /*
   2     Copyright (C) 2015-2021 Carl Hetherington <cth@carlh.net>
   3
   4     This file is part of DCP-o-matic.
   5
   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.
  10
  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.
  15
  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/>.
  18
  19 */
  20
  21
  22 /** @file  test/reels_test.cc
  23  *  @brief Check manipulation of reels in various ways.
  24  *  @ingroup feature
  25  */
  26
  27
  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"
  32 #include "lib/film.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"
  38 #include "test.h"
  39 #include <dcp/cpl.h>
  40 #include <dcp/reel.h>
  41 #include <dcp/reel_picture_asset.h>
  42 #include <dcp/reel_sound_asset.h>
  43 #include <boost/test/unit_test.hpp>
  44 #include <iostream>
  45
  46
  47 using std::cout;
  48 using std::function;
  49 using std::list;
  50 using std::make_shared;
  51 using std::shared_ptr;
  52 using std::string;
  53 using std::vector;
  54 using namespace dcpomatic;
  55
  56
  57 /** Test Film::reels() */
  58 BOOST_AUTO_TEST_CASE (reels_test1)
  59 {
  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);
  68
  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);
  74
  75         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
  76         r = film->reels ();
  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);
  82
  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);
  87         r = film->reels ();
  88         BOOST_CHECK_EQUAL (r.size(), 3U);
  89         auto i = r.begin ();
  90         BOOST_CHECK_EQUAL (i->from.get(), 0);
  91         BOOST_CHECK_EQUAL (i->to.get(), DCPTime::from_frames(60, 24).get());
  92         ++i;
  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());
  95         ++i;
  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());
  98 }
  99
 100
 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.
 103  */
 104 BOOST_AUTO_TEST_CASE (reels_test2)
 105 {
 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"));
 111
 112         {
 113                 auto c = make_shared<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);
 117         }
 118
 119         {
 120                 auto c = make_shared<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);
 124         }
 125
 126         {
 127                 auto c = make_shared<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);
 131         }
 132
 133         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 134         BOOST_CHECK_EQUAL (film->reels().size(), 3U);
 135         BOOST_REQUIRE (!wait_for_jobs());
 136
 137         film->set_audio_channels(16);
 138
 139         make_and_verify_dcp (film);
 140
 141         check_dcp ("test/data/reels_test2", film->dir (film->dcp_name()));
 142
 143         auto c = make_shared<DCPContent>(film->dir(film->dcp_name()));
 144         auto film2 = new_test_film2 ("reels_test2b", {c});
 145         film2->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 146         film2->set_audio_channels(16);
 147
 148         auto r = film2->reels ();
 149         BOOST_CHECK_EQUAL (r.size(), 3U);
 150         auto i = r.begin ();
 151         BOOST_CHECK_EQUAL (i->from.get(), 0);
 152         BOOST_CHECK_EQUAL (i->to.get(), 96000);
 153         ++i;
 154         BOOST_CHECK_EQUAL (i->from.get(), 96000);
 155         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
 156         ++i;
 157         BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
 158         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
 159
 160         c->set_reference_video (true);
 161         c->set_reference_audio (true);
 162
 163         make_and_verify_dcp (film2, {dcp::VerificationNote::Code::EXTERNAL_ASSET});
 164 }
 165
 166
 167 /** Check that ReelType::BY_VIDEO_CONTENT adds an extra reel, if necessary, at the end
 168  *  of all the video content to mop up anything afterward.
 169  */
 170 BOOST_AUTO_TEST_CASE (reels_test3)
 171 {
 172         auto dcp = make_shared<DCPContent>("test/data/reels_test2");
 173         auto sub = make_shared<StringTextFileContent>("test/data/subrip.srt");
 174         auto film = new_test_film2 ("reels_test3", {dcp, sub});
 175         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 176
 177         auto reels = film->reels();
 178         BOOST_REQUIRE_EQUAL (reels.size(), 4U);
 179         auto i = reels.begin ();
 180         BOOST_CHECK_EQUAL (i->from.get(), 0);
 181         BOOST_CHECK_EQUAL (i->to.get(), 96000);
 182         ++i;
 183         BOOST_CHECK_EQUAL (i->from.get(), 96000);
 184         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
 185         ++i;
 186         BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
 187         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
 188         ++i;
 189         BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
 190         BOOST_CHECK_EQUAL (i->to.get(), sub->full_length(film).ceil(film->video_frame_rate()).get());
 191 }
 192
 193
 194 /** Check creation of a multi-reel DCP with a single .srt subtitle file;
 195  *  make sure that the reel subtitle timing is done right.
 196  */
 197 BOOST_AUTO_TEST_CASE (reels_test4)
 198 {
 199         auto film = new_test_film2 ("reels_test4");
 200         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 201         film->set_interop (false);
 202
 203         /* 4 piece of 1s-long content */
 204         shared_ptr<ImageContent> content[4];
 205         for (int i = 0; i < 4; ++i) {
 206                 content[i] = make_shared<ImageContent>("test/data/flat_green.png");
 207                 film->examine_and_add_content (content[i]);
 208                 BOOST_REQUIRE (!wait_for_jobs());
 209                 content[i]->video->set_length (24);
 210         }
 211
 212         auto subs = make_shared<StringTextFileContent>("test/data/subrip3.srt");
 213         film->examine_and_add_content (subs);
 214         BOOST_REQUIRE (!wait_for_jobs());
 215
 216         film->set_audio_channels(16);
 217
 218         auto reels = film->reels();
 219         BOOST_REQUIRE_EQUAL (reels.size(), 4U);
 220         auto i = reels.begin ();
 221         BOOST_CHECK_EQUAL (i->from.get(), 0);
 222         BOOST_CHECK_EQUAL (i->to.get(), 96000);
 223         ++i;
 224         BOOST_CHECK_EQUAL (i->from.get(), 96000);
 225         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 2);
 226         ++i;
 227         BOOST_CHECK_EQUAL (i->from.get(), 96000 * 2);
 228         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 3);
 229         ++i;
 230         BOOST_CHECK_EQUAL (i->from.get(), 96000 * 3);
 231         BOOST_CHECK_EQUAL (i->to.get(), 96000 * 4);
 232
 233         make_and_verify_dcp (
 234                 film,
 235                 {
 236                         dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
 237                         dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME,
 238                         dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION
 239                 });
 240
 241         check_dcp ("test/data/reels_test4", film->dir (film->dcp_name()));
 242 }
 243
 244
 245 BOOST_AUTO_TEST_CASE (reels_test5)
 246 {
 247         auto dcp = make_shared<DCPContent>("test/data/reels_test4");
 248         dcp->check_font_ids();
 249         auto film = new_test_film2 ("reels_test5", {dcp});
 250         film->set_sequence (false);
 251
 252         /* Set to 2123 but it will be rounded up to the next frame (4000) */
 253         dcp->set_position(film, DCPTime(2123));
 254
 255         {
 256                 auto p = dcp->reels (film);
 257                 BOOST_REQUIRE_EQUAL (p.size(), 4U);
 258                 auto i = p.begin();
 259                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 96000)));
 260                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 96000), DCPTime(4000 + 192000)));
 261                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 192000), DCPTime(4000 + 288000)));
 262                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 288000), DCPTime(4000 + 384000)));
 263         }
 264
 265         {
 266                 dcp->set_trim_start(film, ContentTime::from_seconds(0.5));
 267                 auto p = dcp->reels (film);
 268                 BOOST_REQUIRE_EQUAL (p.size(), 4U);
 269                 auto i = p.begin();
 270                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
 271                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
 272                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
 273                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 336000)));
 274         }
 275
 276         {
 277                 dcp->set_trim_end (ContentTime::from_seconds (0.5));
 278                 auto p = dcp->reels (film);
 279                 BOOST_REQUIRE_EQUAL (p.size(), 4U);
 280                 auto i = p.begin();
 281                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
 282                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
 283                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 240000)));
 284                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 240000), DCPTime(4000 + 288000)));
 285         }
 286
 287         {
 288                 dcp->set_trim_start(film, ContentTime::from_seconds(1.5));
 289                 auto p = dcp->reels (film);
 290                 BOOST_REQUIRE_EQUAL (p.size(), 3U);
 291                 auto i = p.begin();
 292                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 0), DCPTime(4000 + 48000)));
 293                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 48000), DCPTime(4000 + 144000)));
 294                 BOOST_CHECK (*i++ == DCPTimePeriod (DCPTime(4000 + 144000), DCPTime(4000 + 192000)));
 295         }
 296 }
 297
 298
 299 /** Check reel split with a muxed video/audio source */
 300 BOOST_AUTO_TEST_CASE (reels_test6)
 301 {
 302         auto A = make_shared<FFmpegContent>("test/data/test2.mp4");
 303         auto film = new_test_film2 ("reels_test6", {A});
 304
 305         film->set_j2k_bandwidth (100000000);
 306         film->set_reel_type (ReelType::BY_LENGTH);
 307         /* This is just over 2.5s at 100Mbit/s; should correspond to 60 frames */
 308         film->set_reel_length (31253154);
 309         make_and_verify_dcp (
 310                 film,
 311                 {
 312                         dcp::VerificationNote::Code::INVALID_INTRINSIC_DURATION,
 313                         dcp::VerificationNote::Code::INVALID_DURATION,
 314                 });
 315 }
 316
 317
 318 /** Check the case where the last bit of audio hangs over the end of the video
 319  *  and we are using ReelType::BY_VIDEO_CONTENT.
 320  */
 321 BOOST_AUTO_TEST_CASE (reels_test7)
 322 {
 323         auto A = content_factory("test/data/flat_red.png")[0];
 324         auto B = content_factory("test/data/awkward_length.wav")[0];
 325         auto film = new_test_film2 ("reels_test7", { A, B });
 326         film->set_video_frame_rate (24);
 327         A->video->set_length (2 * 24);
 328
 329         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 330         BOOST_REQUIRE_EQUAL (film->reels().size(), 2U);
 331         BOOST_CHECK (film->reels().front() == DCPTimePeriod(DCPTime(0), DCPTime::from_frames(2 * 24, 24)));
 332         BOOST_CHECK (film->reels().back() == DCPTimePeriod(DCPTime::from_frames(2 * 24, 24), DCPTime::from_frames(3 * 24 + 1, 24)));
 333
 334         make_and_verify_dcp (film);
 335 }
 336
 337
 338 /** Check a reels-related error; make_dcp() would raise a ProgrammingError */
 339 BOOST_AUTO_TEST_CASE (reels_test8)
 340 {
 341         auto A = make_shared<FFmpegContent>("test/data/test2.mp4");
 342         auto film = new_test_film2 ("reels_test8", {A});
 343
 344         A->set_trim_end (ContentTime::from_seconds (1));
 345         make_and_verify_dcp (film);
 346 }
 347
 348
 349 /** Check another reels-related error; make_dcp() would raise a ProgrammingError */
 350 BOOST_AUTO_TEST_CASE (reels_test9)
 351 {
 352         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 353         auto film = new_test_film2("reels_test9a", {A});
 354         A->video->set_length(5 * 24);
 355         film->set_video_frame_rate(24);
 356         make_and_verify_dcp (film);
 357
 358         auto B = make_shared<DCPContent>(film->dir(film->dcp_name()));
 359         auto film2 = new_test_film2("reels_test9b", {B, content_factory("test/data/dcp_sub4.xml")[0]});
 360         B->set_reference_video(true);
 361         B->set_reference_audio(true);
 362         film2->set_reel_type(ReelType::BY_VIDEO_CONTENT);
 363         film2->write_metadata();
 364         make_and_verify_dcp (
 365                 film2,
 366                 {
 367                         dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
 368                         dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME
 369                 });
 370 }
 371
 372
 373 /** Another reels-related error; make_dcp() would raise a ProgrammingError
 374  *  in AudioBuffers::allocate due to an attempt to allocate a negatively-sized buffer.
 375  *  This was triggered by a VF where there are referenced audio reels followed by
 376  *  VF audio.  When the VF audio arrives the Writer did not correctly skip over the
 377  *  referenced reels.
 378  */
 379 BOOST_AUTO_TEST_CASE (reels_test10)
 380 {
 381         /* Make the OV */
 382         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 383         auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
 384         auto ov = new_test_film2("reels_test10_ov", {A, B});
 385         A->video->set_length (5 * 24);
 386         B->video->set_length (5 * 24);
 387
 388         ov->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 389         make_and_verify_dcp (ov);
 390         ov->write_metadata ();
 391
 392         /* Now try to make the VF; this used to fail */
 393         auto ov_dcp = make_shared<DCPContent>(ov->dir(ov->dcp_name()));
 394         auto vf = new_test_film2("reels_test10_vf", {ov_dcp, content_factory("test/data/15s.srt")[0]});
 395         vf->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 396         ov_dcp->set_reference_video (true);
 397         ov_dcp->set_reference_audio (true);
 398
 399         make_and_verify_dcp (
 400                 vf,
 401                 {
 402                         dcp::VerificationNote::Code::EXTERNAL_ASSET,
 403                         dcp::VerificationNote::Code::MISSING_SUBTITLE_LANGUAGE,
 404                         dcp::VerificationNote::Code::INVALID_SUBTITLE_FIRST_TEXT_TIME,
 405                         dcp::VerificationNote::Code::INVALID_SUBTITLE_DURATION,
 406                 });
 407 }
 408
 409
 410 /** Another reels error; ReelType::BY_VIDEO_CONTENT when the first content is not
 411  *  at time 0.
 412  */
 413 BOOST_AUTO_TEST_CASE (reels_test11)
 414 {
 415         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 416         auto film = new_test_film2 ("reels_test11", {A});
 417         film->set_video_frame_rate (24);
 418         A->video->set_length (240);
 419         A->set_video_frame_rate(film, 24);
 420         A->set_position (film, DCPTime::from_seconds(1));
 421         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 422         make_and_verify_dcp (film);
 423         BOOST_CHECK_EQUAL (A->position().get(), DCPTime::from_seconds(1).get());
 424         BOOST_CHECK_EQUAL (A->end(film).get(), DCPTime::from_seconds(1 + 10).get());
 425
 426         auto r = film->reels ();
 427         BOOST_CHECK_EQUAL (r.size(), 2U);
 428         BOOST_CHECK_EQUAL (r.front().from.get(), 0);
 429         BOOST_CHECK_EQUAL (r.front().to.get(), DCPTime::from_seconds(1).get());
 430         BOOST_CHECK_EQUAL (r.back().from.get(), DCPTime::from_seconds(1).get());
 431         BOOST_CHECK_EQUAL (r.back().to.get(), DCPTime::from_seconds(1 + 10).get());
 432 }
 433
 434
 435 /** For VFs to work right we have to make separate reels for empty bits between
 436  *  video content.
 437  */
 438 BOOST_AUTO_TEST_CASE (reels_test12)
 439 {
 440         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 441         auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
 442         auto film = new_test_film2 ("reels_test12", {A, B});
 443         film->set_video_frame_rate (24);
 444         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 445         film->set_sequence (false);
 446
 447         A->video->set_length (240);
 448         A->set_video_frame_rate(film, 24);
 449         A->set_position (film, DCPTime::from_seconds(1));
 450
 451         B->video->set_length (120);
 452         B->set_video_frame_rate(film, 24);
 453         B->set_position (film, DCPTime::from_seconds(14));
 454
 455         auto r = film->reels ();
 456         BOOST_REQUIRE_EQUAL (r.size(), 4U);
 457         auto i = r.begin ();
 458
 459         BOOST_CHECK_EQUAL (i->from.get(), 0);
 460         BOOST_CHECK_EQUAL (i->to.get(),   DCPTime::from_seconds(1).get());
 461         ++i;
 462         BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(1).get());
 463         BOOST_CHECK_EQUAL (i->to.get(),   DCPTime::from_seconds(11).get());
 464         ++i;
 465         BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(11).get());
 466         BOOST_CHECK_EQUAL (i->to.get(),   DCPTime::from_seconds(14).get());
 467         ++i;
 468         BOOST_CHECK_EQUAL (i->from.get(), DCPTime::from_seconds(14).get());
 469         BOOST_CHECK_EQUAL (i->to.get(),   DCPTime::from_seconds(19).get());
 470 }
 471
 472
 473 static void
 474 no_op ()
 475 {
 476
 477 }
 478
 479 static void
 480 dump_notes (vector<dcp::VerificationNote> const & notes)
 481 {
 482         for (auto i: notes) {
 483                 std::cout << dcp::note_to_string(i) << "\n";
 484         }
 485 }
 486
 487
 488 /** Using less than 1 second's worth of content should not result in a reel
 489  *  of less than 1 second's duration.
 490  */
 491 BOOST_AUTO_TEST_CASE (reels_should_not_be_short1)
 492 {
 493         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 494         auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
 495         auto film = new_test_film2 ("reels_should_not_be_short1", {A, B});
 496         film->set_video_frame_rate (24);
 497
 498         A->video->set_length (23);
 499
 500         B->video->set_length (23);
 501         B->set_position (film, DCPTime::from_frames(23, 24));
 502
 503         make_and_verify_dcp (film);
 504
 505         vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
 506         auto notes = dcp::verify(dirs, {}, boost::bind(&no_op), boost::bind(&no_op), {}, TestPaths::xsd());
 507         dump_notes (notes);
 508         BOOST_REQUIRE (notes.empty());
 509 }
 510
 511
 512 /** Leaving less than 1 second's gap between two pieces of content with
 513  *  ReelType::BY_VIDEO_CONTENT should not make a <1s reel.
 514  */
 515 BOOST_AUTO_TEST_CASE (reels_should_not_be_short2)
 516 {
 517         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 518         auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
 519         auto film = new_test_film2 ("reels_should_not_be_short2", {A, B});
 520         film->set_video_frame_rate (24);
 521         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 522
 523         A->video->set_length (240);
 524
 525         B->video->set_length (240);
 526         B->set_position (film, DCPTime::from_seconds(10.2));
 527
 528         make_and_verify_dcp (film);
 529
 530         vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
 531         auto const notes = dcp::verify(dirs, {}, boost::bind(&no_op), boost::bind(&no_op), {}, TestPaths::xsd());
 532         dump_notes (notes);
 533         BOOST_REQUIRE (notes.empty());
 534 }
 535
 536
 537 /** Setting ReelType::BY_LENGTH and using a small length value should not make
 538  *  <1s reels.
 539  */
 540 BOOST_AUTO_TEST_CASE (reels_should_not_be_short3)
 541 {
 542         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 543         auto film = new_test_film2 ("reels_should_not_be_short3", {A});
 544         film->set_video_frame_rate (24);
 545         film->set_reel_type (ReelType::BY_LENGTH);
 546         film->set_reel_length (1024 * 1024 * 10);
 547
 548         A->video->set_length (240);
 549
 550         make_and_verify_dcp (film);
 551
 552         auto const notes = dcp::verify({}, {}, boost::bind(&no_op), boost::bind(&no_op), {}, TestPaths::xsd());
 553         dump_notes (notes);
 554         BOOST_REQUIRE (notes.empty());
 555 }
 556
 557
 558 /** Having one piece of content less than 1s long in ReelType::BY_VIDEO_CONTENT
 559  *  should not make a reel less than 1s long.
 560  */
 561 BOOST_AUTO_TEST_CASE (reels_should_not_be_short4)
 562 {
 563         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 564         auto B = make_shared<FFmpegContent>("test/data/flat_red.png");
 565         auto film = new_test_film2 ("reels_should_not_be_short4", {A, B});
 566         film->set_video_frame_rate (24);
 567         film->set_reel_type (ReelType::BY_VIDEO_CONTENT);
 568
 569         A->video->set_length (240);
 570
 571         B->video->set_length (23);
 572         B->set_position (film, DCPTime::from_frames(240, 24));
 573
 574         BOOST_CHECK_EQUAL (film->reels().size(), 1U);
 575         BOOST_CHECK (film->reels().front() == dcpomatic::DCPTimePeriod(dcpomatic::DCPTime(), dcpomatic::DCPTime::from_frames(263, 24)));
 576
 577         film->write_metadata ();
 578         make_dcp (film, TranscodeJob::ChangedBehaviour::IGNORE);
 579         BOOST_REQUIRE (!wait_for_jobs());
 580
 581         vector<boost::filesystem::path> dirs = { film->dir(film->dcp_name(false)) };
 582         auto const notes = dcp::verify(dirs, {}, boost::bind(&no_op), boost::bind(&no_op), {}, TestPaths::xsd());
 583         dump_notes (notes);
 584         BOOST_REQUIRE (notes.empty());
 585 }
 586
 587
 588 /** Create a long DCP A then insert it repeatedly into a new project, trimming it differently each time.
 589  *  Make a DCP B from that project which refers to A and splits into reels.  This was found to go wrong
 590  *  when looking at #2268.
 591  */
 592 BOOST_AUTO_TEST_CASE (repeated_dcp_into_reels)
 593 {
 594         /* Make a 20s DCP */
 595         auto A = make_shared<FFmpegContent>("test/data/flat_red.png");
 596         auto film1 = new_test_film2("repeated_dcp_into_reels1", { A });
 597         auto constexpr frame_rate = 24;
 598         auto constexpr length_in_seconds = 20;
 599         auto constexpr total_frames = frame_rate * length_in_seconds;
 600         film1->set_video_frame_rate(frame_rate);
 601         A->video->set_length(total_frames);
 602         make_and_verify_dcp(film1);
 603
 604         /* Make a new project that includes this long DCP 4 times, each
 605          * trimmed to a quarter of the original, i.e.
 606          * /----------------------|----------------------|----------------------|----------------------\
 607          * | 1st quarter of film1 | 2nd quarter of film1 | 3rd quarter of film1 | 4th quarter of film1 |
 608          * \----------------------|----------------------|----------------------|_---------------------/
 609          */
 610
 611         shared_ptr<DCPContent> original_dcp[4] = {
 612                  make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
 613                  make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
 614                  make_shared<DCPContent>(film1->dir(film1->dcp_name(false))),
 615                  make_shared<DCPContent>(film1->dir(film1->dcp_name(false)))
 616         };
 617
 618         auto film2 = new_test_film2("repeated_dcp_into_reels2", { original_dcp[0], original_dcp[1], original_dcp[2], original_dcp[3] });
 619         film2->set_reel_type(ReelType::BY_VIDEO_CONTENT);
 620         film2->set_video_frame_rate(frame_rate);
 621         film2->set_sequence(false);
 622
 623         for (int i = 0; i < 4; ++i) {
 624                 original_dcp[i]->set_position(film2, DCPTime::from_frames(total_frames * i / 4, frame_rate));
 625                 original_dcp[i]->set_trim_start(film2, ContentTime::from_frames(total_frames * i / 4, frame_rate));
 626                 original_dcp[i]->set_trim_end  (ContentTime::from_frames(total_frames * (4 - i - 1) / 4, frame_rate));
 627                 original_dcp[i]->set_reference_video(true);
 628                 original_dcp[i]->set_reference_audio(true);
 629         }
 630
 631         make_and_verify_dcp(film2, { dcp::VerificationNote::Code::EXTERNAL_ASSET });
 632
 633         dcp::DCP check1(film1->dir(film1->dcp_name()));
 634         check1.read();
 635         BOOST_REQUIRE(!check1.cpls().empty());
 636         BOOST_REQUIRE(!check1.cpls()[0]->reels().empty());
 637         auto picture = check1.cpls()[0]->reels()[0]->main_picture()->asset();
 638         BOOST_REQUIRE(picture);
 639         auto sound = check1.cpls()[0]->reels()[0]->main_sound()->asset();
 640         BOOST_REQUIRE(sound);
 641
 642         dcp::DCP check2(film2->dir(film2->dcp_name()));
 643         check2.read();
 644         BOOST_REQUIRE(!check2.cpls().empty());
 645         auto cpl = check2.cpls()[0];
 646         BOOST_REQUIRE_EQUAL(cpl->reels().size(), 4U);
 647         for (int i = 0; i < 4; ++i) {
 648                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->entry_point().get_value_or(0), total_frames * i / 4);
 649                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->duration().get_value_or(0), total_frames / 4);
 650                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_picture()->id(), picture->id());
 651                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->entry_point().get_value_or(0), total_frames * i / 4);
 652                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->duration().get_value_or(0), total_frames / 4);
 653                 BOOST_REQUIRE_EQUAL(cpl->reels()[i]->main_sound()->id(), sound->id());
 654         }
 655 }