764491c0a63ea5d31af368d41411b660b8f56934
[dcpomatic.git] / test / torture_test.cc
1 /*
2     Copyright (C) 2017 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/torture_test.cc
22  *  @brief Tricky arrangements of content whose resulting DCPs are checked programmatically.
23  *  @ingroup completedcp
24  */
25
26 #include "lib/audio_content.h"
27 #include "lib/film.h"
28 #include "lib/dcp_content_type.h"
29 #include "lib/ratio.h"
30 #include "lib/content_factory.h"
31 #include "lib/video_content.h"
32 #include "test.h"
33 #include <dcp/cpl.h>
34 #include <dcp/reel.h>
35 #include <dcp/reel_sound_asset.h>
36 #include <dcp/reel_picture_asset.h>
37 #include <dcp/sound_asset.h>
38 #include <dcp/mono_picture_asset.h>
39 #include <dcp/mono_picture_frame.h>
40 #include <dcp/openjpeg_image.h>
41 #include <boost/test/unit_test.hpp>
42 #include <iostream>
43
44 using std::list;
45 using std::cout;
46 using boost::shared_ptr;
47 using boost::dynamic_pointer_cast;
48 using namespace dcpomatic;
49
50 /** Test start/end trim and positioning of some audio content */
51 BOOST_AUTO_TEST_CASE (torture_test1)
52 {
53         shared_ptr<Film> film = new_test_film ("torture_test1");
54         film->set_dcp_content_type (DCPContentType::from_isdcf_name ("FTR"));
55         film->set_name ("torture_test1");
56         film->set_container (Ratio::from_id ("185"));
57         film->set_sequence (false);
58
59         /* Staircase at an offset of 2000 samples, trimmed both start and end, with a gain of exactly 2 (linear) */
60         shared_ptr<Content> staircase = content_factory("test/data/staircase.wav").front ();
61         film->examine_and_add_content (staircase);
62         BOOST_REQUIRE (!wait_for_jobs());
63         staircase->set_position (film, DCPTime::from_frames (2000, film->audio_frame_rate()));
64         staircase->set_trim_start (ContentTime::from_frames (12, 48000));
65         staircase->set_trim_end (ContentTime::from_frames (35, 48000));
66         staircase->audio->set_gain (20 * log10(2));
67
68         /* And again at an offset of 50000 samples, trimmed both start and end, with a gain of exactly 2 (linear) */
69         staircase = content_factory("test/data/staircase.wav").front ();
70         film->examine_and_add_content (staircase);
71         BOOST_REQUIRE (!wait_for_jobs());
72         staircase->set_position (film, DCPTime::from_frames(50000, film->audio_frame_rate()));
73         staircase->set_trim_start (ContentTime::from_frames (12, 48000));
74         staircase->set_trim_end (ContentTime::from_frames (35, 48000));
75         staircase->audio->set_gain (20 * log10(2));
76
77         /* 1s of red at 5s in */
78         shared_ptr<Content> red = content_factory("test/data/flat_red.png").front ();
79         film->examine_and_add_content (red);
80         BOOST_REQUIRE (!wait_for_jobs());
81         red->set_position (film, DCPTime::from_seconds(5));
82         red->video->set_length (24);
83
84         film->set_video_frame_rate (24);
85         film->write_metadata ();
86         film->make_dcp ();
87         BOOST_REQUIRE (!wait_for_jobs());
88
89         dcp::DCP dcp ("build/test/torture_test1/" + film->dcp_name(false));
90         dcp.read ();
91
92         list<shared_ptr<dcp::CPL> > cpls = dcp.cpls ();
93         BOOST_REQUIRE_EQUAL (cpls.size(), 1);
94         list<shared_ptr<dcp::Reel> > reels = cpls.front()->reels ();
95         BOOST_REQUIRE_EQUAL (reels.size(), 1);
96
97         /* Check sound */
98
99         shared_ptr<dcp::ReelSoundAsset> reel_sound = reels.front()->main_sound();
100         BOOST_REQUIRE (reel_sound);
101         shared_ptr<dcp::SoundAsset> sound = reel_sound->asset();
102         BOOST_REQUIRE (sound);
103         BOOST_CHECK_EQUAL (sound->intrinsic_duration(), 144);
104
105         shared_ptr<dcp::SoundAssetReader> sound_reader = sound->start_read ();
106
107         /* First frame silent */
108         shared_ptr<const dcp::SoundFrame> fr = sound_reader->get_frame (0);
109         for (int i = 0; i < fr->samples(); ++i) {
110                 for (int j = 0; j < 6; ++j) {
111                         BOOST_CHECK_EQUAL (fr->get(j, i), 0);
112                 }
113         }
114
115         /* The first staircase is 4800 - 12 - 35 = 4753 samples.  One frame is 2000 samples, so we span 3 frames */
116
117         BOOST_REQUIRE_EQUAL (fr->samples(), 2000);
118
119         int stair = 12;
120
121         fr = sound_reader->get_frame (1);
122         for (int i = 0; i < fr->samples(); ++i) {
123                 for (int j = 0; j < 6; ++j) {
124                         if (j == 2) {
125                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
126                                 ++stair;
127                         } else {
128                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
129                         }
130                 }
131         }
132
133         fr = sound_reader->get_frame (2);
134         for (int i = 0; i < fr->samples(); ++i) {
135                 for (int j = 0; j < 6; ++j) {
136                         if (j == 2) {
137                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
138                                 ++stair;
139                         } else {
140                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
141                         }
142                 }
143         }
144
145         fr = sound_reader->get_frame (3);
146         for (int i = 0; i < fr->samples(); ++i) {
147                 for (int j = 0; j < 6; ++j) {
148                         if (j == 2 && i < (4753 - (2000 * 2))) {
149                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
150                                 ++stair;
151                         } else {
152                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
153                         }
154                 }
155         }
156
157         /* Then some silence */
158
159         for (int i = 4; i < 24; ++i) {
160                 fr = sound_reader->get_frame (i);
161                 for (int j = 0; j < fr->samples(); ++j) {
162                         for (int k = 0; k < 6; ++k) {
163                                 BOOST_CHECK_EQUAL (fr->get(k, j), 0);
164                         }
165                 }
166         }
167
168         /* Then the same thing again */
169
170         stair = 12;
171
172         fr = sound_reader->get_frame (25);
173         for (int i = 0; i < fr->samples(); ++i) {
174                 for (int j = 0; j < 6; ++j) {
175                         if (j == 2) {
176                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
177                                 ++stair;
178                         } else {
179                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
180                         }
181                 }
182         }
183
184         fr = sound_reader->get_frame (26);
185         for (int i = 0; i < fr->samples(); ++i) {
186                 for (int j = 0; j < 6; ++j) {
187                         if (j == 2) {
188                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
189                                 ++stair;
190                         } else {
191                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
192                         }
193                 }
194         }
195
196         fr = sound_reader->get_frame (27);
197         for (int i = 0; i < fr->samples(); ++i) {
198                 for (int j = 0; j < 6; ++j) {
199                         if (j == 2 && i < (4753 - (2000 * 2))) {
200                                 BOOST_CHECK_EQUAL ((fr->get(j, i) + 128) >> 8, stair * 2);
201                                 ++stair;
202                         } else {
203                                 BOOST_CHECK_EQUAL (fr->get(j, i), 0);
204                         }
205                 }
206         }
207
208         /* Then some silence */
209
210         for (int i = 28; i < 144; ++i) {
211                 fr = sound_reader->get_frame (i);
212                 for (int j = 0; j < fr->samples(); ++j) {
213                         for (int k = 0; k < 6; ++k) {
214                                 BOOST_CHECK_EQUAL (fr->get(k, j), 0);
215                         }
216                 }
217         }
218
219         /* Check picture */
220
221         shared_ptr<dcp::ReelPictureAsset> reel_picture = reels.front()->main_picture();
222         BOOST_REQUIRE (reel_picture);
223         shared_ptr<dcp::MonoPictureAsset> picture = dynamic_pointer_cast<dcp::MonoPictureAsset> (reel_picture->asset());
224         BOOST_REQUIRE (picture);
225         BOOST_CHECK_EQUAL (picture->intrinsic_duration(), 144);
226
227         shared_ptr<dcp::MonoPictureAssetReader> picture_reader = picture->start_read ();
228
229         /* First 5 * 24 = 120 frames should be black */
230
231         shared_ptr<dcp::OpenJPEGImage> ref;
232         for (int i = 0; i < 120; ++i) {
233                 shared_ptr<const dcp::MonoPictureFrame> fr = picture_reader->get_frame (i);
234                 shared_ptr<dcp::OpenJPEGImage> image = fr->xyz_image ();
235                 dcp::Size const size = image->size ();
236                 if (i == 0) {
237                         for (int c = 0; c < 3; ++c) {
238                                 for (int y = 0; y < size.height; ++y) {
239                                         for (int x = 0; x < size.width; ++x) {
240                                                 BOOST_REQUIRE_EQUAL (image->data(c)[y * size.height + x], 0);
241                                         }
242                                 }
243                         }
244                         ref = image;
245                 } else {
246                         for (int c = 0; c < 3; ++c) {
247                                 BOOST_REQUIRE_MESSAGE (
248                                         memcmp (image->data(c), ref->data(c), size.width * size.height * sizeof(int)) == 0,
249                                         "failed on frame " << i << " component " << c
250                                         );
251                         }
252                 }
253         }
254
255         /* Then 24 red */
256
257         for (int i = 120; i < 144; ++i) {
258                 shared_ptr<const dcp::MonoPictureFrame> fr = picture_reader->get_frame (i);
259                 shared_ptr<dcp::OpenJPEGImage> image = fr->xyz_image ();
260                 dcp::Size const size = image->size ();
261                 if (i == 120) {
262                         for (int y = 0; y < size.height; ++y) {
263                                 for (int x = 0; x < size.width; ++x) {
264                                         BOOST_REQUIRE_MESSAGE (
265                                                 abs(image->data(0)[y * size.height + x] - 2808) <= 2,
266                                                 "failed on frame " << i << " with image data " << image->data(0)[y * size.height + x]
267                                                 );
268                                         BOOST_REQUIRE_MESSAGE (
269                                                 abs(image->data(1)[y * size.height + x] - 2176) <= 2,
270                                                 "failed on frame " << i << " with image data " << image->data(1)[y * size.height + x]
271                                                 );
272                                         BOOST_REQUIRE_MESSAGE (
273                                                 abs(image->data(2)[y * size.height + x] - 865) <= 2,
274                                                 "failed on frame " << i << " with image data " << image->data(2)[y * size.height + x]
275                                                 );
276                                 }
277                         }
278                         ref = image;
279                 } else {
280                         for (int c = 0; c < 3; ++c) {
281                                 BOOST_REQUIRE_MESSAGE (
282                                         memcmp (image->data(c), ref->data(c), size.width * size.height * sizeof(int)) == 0,
283                                         "failed on frame " << i << " component " << c
284                                         );
285                         }
286                 }
287         }
288
289 }