Copy test fix from v2.15.x.
[dcpomatic.git] / test / vf_test.cc
1 /*
2     Copyright (C) 2015-2019 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 /** @file  test/vf_Test.cc
22  *  @brief Various VF-related tests.
23  *  @ingroup specific
24  */
25
26 #include "lib/film.h"
27 #include "lib/dcp_content.h"
28 #include "lib/ffmpeg_content.h"
29 #include "lib/content_factory.h"
30 #include "lib/dcp_content_type.h"
31 #include "lib/video_content.h"
32 #include "lib/referenced_reel_asset.h"
33 #include "lib/player.h"
34 #include "test.h"
35 #include <dcp/cpl.h>
36 #include <dcp/reel.h>
37 #include <dcp/reel_picture_asset.h>
38 #include <dcp/reel_sound_asset.h>
39 #include <boost/test/unit_test.hpp>
40 #include <boost/foreach.hpp>
41 #include <iostream>
42
43 using std::list;
44 using std::string;
45 using std::cout;
46 using boost::shared_ptr;
47 using boost::dynamic_pointer_cast;
48
49 /** Test the logic which decides whether a DCP can be referenced or not */
50 BOOST_AUTO_TEST_CASE (vf_test1)
51 {
52         shared_ptr<Film> film = new_test_film ("vf_test1");
53         film->set_interop (false);
54         shared_ptr<DCPContent> dcp (new DCPContent ("test/data/reels_test2"));
55         film->examine_and_add_content (dcp);
56         BOOST_REQUIRE (!wait_for_jobs());
57
58         /* Multi-reel DCP can't be referenced if we are using a single reel for the project */
59         film->set_reel_type (REELTYPE_SINGLE);
60         string why_not;
61         BOOST_CHECK (!dcp->can_reference_video(film, why_not));
62         BOOST_CHECK (!dcp->can_reference_audio(film, why_not));
63         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_OPEN_SUBTITLE, why_not));
64         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_CLOSED_CAPTION, why_not));
65
66         /* Multi-reel DCP can be referenced if we are using by-video-content */
67         film->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
68         BOOST_CHECK (dcp->can_reference_video(film, why_not));
69         BOOST_CHECK (dcp->can_reference_audio(film, why_not));
70         /* (but reels_test2 has no texts to reference) */
71         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_OPEN_SUBTITLE, why_not));
72         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_CLOSED_CAPTION, why_not));
73
74         shared_ptr<FFmpegContent> other (new FFmpegContent("test/data/test.mp4"));
75         film->examine_and_add_content (other);
76         BOOST_REQUIRE (!wait_for_jobs());
77
78         /* Not possible if there is overlap; we only check video here as that's all test.mp4 has */
79         other->set_position (film, DCPTime());
80         BOOST_CHECK (!dcp->can_reference_video(film, why_not));
81
82         /* This should not be considered an overlap */
83         other->set_position (film, dcp->end(film));
84         BOOST_CHECK (dcp->can_reference_video(film, why_not));
85         BOOST_CHECK (dcp->can_reference_audio(film, why_not));
86         /* (reels_test2 has no texts to reference) */
87         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_OPEN_SUBTITLE, why_not));
88         BOOST_CHECK (!dcp->can_reference_text(film, TEXT_CLOSED_CAPTION, why_not));
89 }
90
91 /** Make a OV with video and audio and a VF referencing the OV and adding subs */
92 BOOST_AUTO_TEST_CASE (vf_test2)
93 {
94         /* Make the OV */
95         shared_ptr<Film> ov = new_test_film ("vf_test2_ov");
96         ov->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
97         ov->set_name ("vf_test2_ov");
98         shared_ptr<Content> video = content_factory ("test/data/flat_red.png").front();
99         ov->examine_and_add_content (video);
100         BOOST_REQUIRE (!wait_for_jobs());
101         video->video->set_length (24 * 5);
102         shared_ptr<Content> audio = content_factory ("test/data/white.wav").front();
103         ov->examine_and_add_content (audio);
104         BOOST_REQUIRE (!wait_for_jobs());
105         ov->make_dcp ();
106         BOOST_REQUIRE (!wait_for_jobs());
107
108         /* Make the VF */
109         shared_ptr<Film> vf = new_test_film ("vf_test2_vf");
110         vf->set_name ("vf_test2_vf");
111         vf->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
112         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
113         shared_ptr<DCPContent> dcp (new DCPContent(ov->dir (ov->dcp_name ())));
114         BOOST_REQUIRE (dcp);
115         vf->examine_and_add_content (dcp);
116         BOOST_REQUIRE (!wait_for_jobs());
117         dcp->set_reference_video (true);
118         dcp->set_reference_audio (true);
119         shared_ptr<Content> sub = content_factory("test/data/subrip4.srt").front();
120         vf->examine_and_add_content (sub);
121         BOOST_REQUIRE (!wait_for_jobs());
122         vf->make_dcp ();
123         BOOST_REQUIRE (!wait_for_jobs());
124         vf->write_metadata ();
125
126         dcp::DCP ov_c (ov->dir (ov->dcp_name ()));
127         ov_c.read ();
128         BOOST_REQUIRE_EQUAL (ov_c.cpls().size(), 1);
129         BOOST_REQUIRE_EQUAL (ov_c.cpls().front()->reels().size(), 1);
130         BOOST_REQUIRE (ov_c.cpls().front()->reels().front()->main_picture());
131         string const pic_id = ov_c.cpls().front()->reels().front()->main_picture()->id();
132         BOOST_REQUIRE (ov_c.cpls().front()->reels().front()->main_sound());
133         string const sound_id = ov_c.cpls().front()->reels().front()->main_sound()->id();
134         BOOST_REQUIRE (!ov_c.cpls().front()->reels().front()->main_subtitle());
135
136         dcp::DCP vf_c (vf->dir (vf->dcp_name ()));
137         vf_c.read ();
138         BOOST_REQUIRE_EQUAL (vf_c.cpls().size(), 1);
139         BOOST_REQUIRE_EQUAL (vf_c.cpls().front()->reels().size(), 1);
140         BOOST_REQUIRE (vf_c.cpls().front()->reels().front()->main_picture());
141         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_picture()->id(), pic_id);
142         BOOST_REQUIRE (vf_c.cpls().front()->reels().front()->main_sound());
143         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_sound()->id(), sound_id);
144         BOOST_REQUIRE (vf_c.cpls().front()->reels().front()->main_subtitle());
145 }
146
147 /** Test creation of a VF using a trimmed OV; the output should have entry point /
148  *  duration altered to effect the trimming.
149  */
150 BOOST_AUTO_TEST_CASE (vf_test3)
151 {
152         /* Make the OV */
153         shared_ptr<Film> ov = new_test_film ("vf_test3_ov");
154         ov->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
155         ov->set_name ("vf_test3_ov");
156         shared_ptr<Content> video = content_factory("test/data/flat_red.png").front();
157         ov->examine_and_add_content (video);
158         BOOST_REQUIRE (!wait_for_jobs());
159         video->video->set_length (24 * 5);
160         shared_ptr<Content> audio = content_factory("test/data/white.wav").front();
161         ov->examine_and_add_content (audio);
162         BOOST_REQUIRE (!wait_for_jobs());
163         ov->make_dcp ();
164         BOOST_REQUIRE (!wait_for_jobs());
165
166         /* Make the VF */
167         shared_ptr<Film> vf = new_test_film ("vf_test3_vf");
168         vf->set_name ("vf_test3_vf");
169         vf->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
170         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
171         shared_ptr<DCPContent> dcp (new DCPContent(ov->dir(ov->dcp_name())));
172         BOOST_REQUIRE (dcp);
173         dcp->set_trim_start (ContentTime::from_seconds (1));
174         dcp->set_trim_end (ContentTime::from_seconds (1));
175         vf->examine_and_add_content (dcp);
176         BOOST_REQUIRE (!wait_for_jobs());
177         dcp->set_reference_video (true);
178         dcp->set_reference_audio (true);
179         vf->make_dcp ();
180         BOOST_REQUIRE (!wait_for_jobs());
181         vf->write_metadata ();
182
183         dcp::DCP vf_c (vf->dir (vf->dcp_name ()));
184         vf_c.read ();
185         BOOST_REQUIRE_EQUAL (vf_c.cpls().size(), 1);
186         BOOST_REQUIRE_EQUAL (vf_c.cpls().front()->reels().size(), 1);
187         BOOST_REQUIRE (vf_c.cpls().front()->reels().front()->main_picture());
188         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_picture()->entry_point(), 24);
189         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_picture()->duration(), 72);
190         BOOST_REQUIRE (vf_c.cpls().front()->reels().front()->main_sound());
191         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_sound()->entry_point(), 24);
192         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().front()->main_sound()->duration(), 72);
193 }
194
195 /** Make a OV with video and audio and a VF referencing the OV and adding some more video */
196 BOOST_AUTO_TEST_CASE (vf_test4)
197 {
198         /* Make the OV */
199         shared_ptr<Film> ov = new_test_film ("vf_test4_ov");
200         ov->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
201         ov->set_name ("vf_test4_ov");
202         shared_ptr<Content> video = content_factory("test/data/flat_red.png").front();
203         ov->examine_and_add_content (video);
204         BOOST_REQUIRE (!wait_for_jobs());
205         video->video->set_length (24 * 5);
206         shared_ptr<Content> audio = content_factory("test/data/white.wav").front();
207         ov->examine_and_add_content (audio);
208         BOOST_REQUIRE (!wait_for_jobs());
209         ov->make_dcp ();
210         BOOST_REQUIRE (!wait_for_jobs());
211
212         /* Make the VF */
213         shared_ptr<Film> vf = new_test_film ("vf_test4_vf");
214         vf->set_name ("vf_test4_vf");
215         vf->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
216         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
217         vf->set_sequence (false);
218         shared_ptr<DCPContent> dcp (new DCPContent(ov->dir(ov->dcp_name())));
219         BOOST_REQUIRE (dcp);
220         vf->examine_and_add_content (dcp);
221         BOOST_REQUIRE (!wait_for_jobs());
222         dcp->set_position(vf, DCPTime::from_seconds(10));
223         dcp->set_reference_video (true);
224         dcp->set_reference_audio (true);
225         shared_ptr<Content> more_video = content_factory("test/data/flat_red.png").front();
226         vf->examine_and_add_content (more_video);
227         BOOST_REQUIRE (!wait_for_jobs());
228         more_video->set_position (vf, DCPTime());
229         vf->write_metadata ();
230         vf->make_dcp ();
231         BOOST_REQUIRE (!wait_for_jobs());
232
233         dcp::DCP ov_c (ov->dir (ov->dcp_name ()));
234         ov_c.read ();
235         BOOST_REQUIRE_EQUAL (ov_c.cpls().size(), 1);
236         BOOST_REQUIRE_EQUAL (ov_c.cpls().front()->reels().size(), 1);
237         BOOST_REQUIRE (ov_c.cpls().front()->reels().front()->main_picture());
238         string const pic_id = ov_c.cpls().front()->reels().front()->main_picture()->id();
239         BOOST_REQUIRE (ov_c.cpls().front()->reels().front()->main_sound());
240         string const sound_id = ov_c.cpls().front()->reels().front()->main_sound()->id();
241         BOOST_REQUIRE (!ov_c.cpls().front()->reels().front()->main_subtitle());
242
243         dcp::DCP vf_c (vf->dir (vf->dcp_name ()));
244         vf_c.read ();
245         BOOST_REQUIRE_EQUAL (vf_c.cpls().size(), 1);
246         BOOST_REQUIRE_EQUAL (vf_c.cpls().front()->reels().size(), 2);
247         BOOST_REQUIRE (vf_c.cpls().front()->reels().back()->main_picture());
248         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().back()->main_picture()->id(), pic_id);
249         BOOST_REQUIRE (vf_c.cpls().front()->reels().back()->main_sound());
250         BOOST_CHECK_EQUAL (vf_c.cpls().front()->reels().back()->main_sound()->id(), sound_id);
251 }
252
253 /** Test bug #1495 */
254 BOOST_AUTO_TEST_CASE (vf_test5)
255 {
256         /* Make the OV */
257         shared_ptr<Film> ov = new_test_film ("vf_test5_ov");
258         ov->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
259         ov->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
260         for (int i = 0; i < 3; ++i) {
261                 shared_ptr<Content> video = content_factory("test/data/flat_red.png").front();
262                 ov->examine_and_add_content (video);
263                 BOOST_REQUIRE (!wait_for_jobs());
264                 video->video->set_length (24 * 10);
265         }
266
267         BOOST_REQUIRE (!wait_for_jobs());
268         ov->make_dcp ();
269         BOOST_REQUIRE (!wait_for_jobs());
270
271         /* Make the VF */
272         shared_ptr<Film> vf = new_test_film ("vf_test5_vf");
273         vf->set_name ("vf_test5_vf");
274         vf->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
275         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
276         vf->set_sequence (false);
277         shared_ptr<DCPContent> dcp (new DCPContent(ov->dir(ov->dcp_name())));
278         BOOST_REQUIRE (dcp);
279         vf->examine_and_add_content (dcp);
280         BOOST_REQUIRE (!wait_for_jobs());
281         dcp->set_reference_video (true);
282         dcp->set_reference_audio (true);
283         dcp->set_trim_end (ContentTime::from_seconds(15));
284         vf->make_dcp ();
285         BOOST_REQUIRE (!wait_for_jobs());
286
287         /* Check that the selected reel assets are right */
288         shared_ptr<Player> player (new Player(vf, vf->playlist()));
289         list<ReferencedReelAsset> a = player->get_reel_assets();
290         BOOST_REQUIRE_EQUAL (a.size(), 4);
291         list<ReferencedReelAsset>::const_iterator i = a.begin();
292         BOOST_CHECK (i->period == DCPTimePeriod(DCPTime(0), DCPTime(960000)));
293         ++i;
294         BOOST_CHECK (i->period == DCPTimePeriod(DCPTime(0), DCPTime(960000)));
295         ++i;
296         BOOST_CHECK (i->period == DCPTimePeriod(DCPTime(960000), DCPTime(1440000)));
297         ++i;
298         BOOST_CHECK (i->period == DCPTimePeriod(DCPTime(960000), DCPTime(1440000)));
299         ++i;
300 }
301
302 /** Test bug #1528 */
303 BOOST_AUTO_TEST_CASE (vf_test6)
304 {
305         /* Make the OV */
306         shared_ptr<Film> ov = new_test_film ("vf_test6_ov");
307         ov->set_dcp_content_type (DCPContentType::from_isdcf_name("TST"));
308         ov->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
309         shared_ptr<Content> video = content_factory("test/data/flat_red.png").front();
310         ov->examine_and_add_content (video);
311         BOOST_REQUIRE (!wait_for_jobs());
312         video->video->set_length (24 * 10);
313         ov->make_dcp ();
314         BOOST_REQUIRE (!wait_for_jobs());
315
316         /* Make the VF */
317         shared_ptr<Film> vf = new_test_film ("vf_test6_vf");
318         vf->set_name ("vf_test6_vf");
319         vf->set_dcp_content_type (DCPContentType::from_isdcf_name("TST"));
320         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
321         vf->set_sequence (false);
322         shared_ptr<DCPContent> dcp (new DCPContent(ov->dir(ov->dcp_name())));
323         BOOST_REQUIRE (dcp);
324         vf->examine_and_add_content (dcp);
325         BOOST_REQUIRE (!wait_for_jobs());
326         dcp->set_reference_video (true);
327         dcp->set_reference_audio (true);
328
329         shared_ptr<Content> sub = content_factory("test/data/15s.srt").front();
330         vf->examine_and_add_content (sub);
331         BOOST_REQUIRE (!wait_for_jobs());
332
333         vf->make_dcp ();
334         BOOST_REQUIRE (!wait_for_jobs());
335 }
336
337 /** Test bug #1643 (the second part; referring fails if there are gaps) */
338 BOOST_AUTO_TEST_CASE (vf_test7)
339 {
340         /* First OV */
341         shared_ptr<Film> ov1 = new_test_film2 ("vf_test7_ov1");
342         ov1->set_video_frame_rate (24);
343         ov1->examine_and_add_content (content_factory("test/data/flat_red.png").front());
344         BOOST_REQUIRE (!wait_for_jobs());
345         ov1->make_dcp ();
346         BOOST_REQUIRE (!wait_for_jobs());
347
348         /* Second OV */
349         shared_ptr<Film> ov2 = new_test_film2 ("vf_test7_ov2");
350         ov2->set_video_frame_rate (24);
351         ov2->examine_and_add_content (content_factory("test/data/flat_red.png").front());
352         BOOST_REQUIRE (!wait_for_jobs());
353         ov2->make_dcp ();
354         BOOST_REQUIRE (!wait_for_jobs());
355
356         /* VF */
357         shared_ptr<Film> vf = new_test_film2 ("vf_test7_vf");
358         shared_ptr<DCPContent> ov1_dcp (new DCPContent(ov1->dir(ov1->dcp_name())));
359         vf->examine_and_add_content (ov1_dcp);
360         shared_ptr<DCPContent> ov2_dcp (new DCPContent(ov1->dir(ov1->dcp_name())));
361         vf->examine_and_add_content (ov2_dcp);
362         BOOST_REQUIRE (!wait_for_jobs());
363         vf->set_reel_type (REELTYPE_BY_VIDEO_CONTENT);
364         ov1_dcp->set_reference_video (true);
365         ov2_dcp->set_reference_video (true);
366         ov1_dcp->set_position (vf, DCPTime::from_seconds(1));
367         ov2_dcp->set_position (vf, DCPTime::from_seconds(20));
368         vf->write_metadata ();
369         vf->make_dcp ();
370         BOOST_REQUIRE (!wait_for_jobs());
371 }