Try to fix text-file-checking test on Windows.
[dcpomatic.git] / test / test.cc
1 /*
2     Copyright (C) 2012-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
23 /** @file  test/test.cc
24  *  @brief Overall test stuff and useful methods for tests.
25  */
26
27
28 #include "lib/compose.hpp"
29 #include "lib/config.h"
30 #include "lib/cross.h"
31 #include "lib/dcp_content_type.h"
32 #include "lib/dcpomatic_log.h"
33 #include "lib/encode_server_finder.h"
34 #include "lib/ffmpeg_image_proxy.h"
35 #include "lib/file_log.h"
36 #include "lib/film.h"
37 #include "lib/image.h"
38 #include "lib/job.h"
39 #include "lib/job_manager.h"
40 #include "lib/log_entry.h"
41 #include "lib/ratio.h"
42 #include "lib/signal_manager.h"
43 #include "lib/util.h"
44 #include "test.h"
45 #include <dcp/cpl.h>
46 #include <dcp/dcp.h>
47 #include <dcp/mono_picture_asset.h>
48 #include <dcp/mono_picture_frame.h>
49 #include <dcp/openjpeg_image.h>
50 #include <dcp/reel.h>
51 #include <dcp/reel_picture_asset.h>
52 #include <asdcp/AS_DCP.h>
53 #include <png.h>
54 #include <sndfile.h>
55 #include <libxml++/libxml++.h>
56 extern "C" {
57 #include <libavformat/avformat.h>
58 }
59 #define BOOST_TEST_DYN_LINK
60 #define BOOST_TEST_MODULE dcpomatic_test
61 #include <boost/test/unit_test.hpp>
62 #include <boost/algorithm/string.hpp>
63 #include <iostream>
64 #include <list>
65 #include <vector>
66
67
68 using std::abs;
69 using std::cerr;
70 using std::cout;
71 using std::list;
72 using std::make_shared;
73 using std::min;
74 using std::shared_ptr;
75 using std::string;
76 using std::vector;
77 using boost::scoped_array;
78 using std::dynamic_pointer_cast;
79 #if BOOST_VERSION >= 106100
80 using namespace boost::placeholders;
81 #endif
82
83
84 boost::filesystem::path
85 TestPaths::TestPaths::private_data ()
86 {
87         char* env = getenv("DCPOMATIC_TEST_PRIVATE");
88         if (env) {
89                 return boost::filesystem::path(env);
90         }
91
92         return boost::filesystem::canonical(boost::filesystem::path ("..") / boost::filesystem::path ("dcpomatic-test-private"));
93 }
94
95
96 boost::filesystem::path TestPaths::xsd ()
97 {
98         return boost::filesystem::canonical(boost::filesystem::path("..") / boost::filesystem::path("libdcp") / boost::filesystem::path("xsd"));
99 }
100
101
102 void
103 setup_test_config ()
104 {
105         Config::instance()->set_master_encoding_threads (boost::thread::hardware_concurrency());
106         Config::instance()->set_server_encoding_threads (1);
107         Config::instance()->set_server_port_base (61921);
108         Config::instance()->set_default_isdcf_metadata (ISDCFMetadata ());
109         Config::instance()->set_default_container (Ratio::from_id ("185"));
110         Config::instance()->set_default_dcp_content_type (static_cast<DCPContentType*> (0));
111         Config::instance()->set_default_audio_delay (0);
112         Config::instance()->set_default_j2k_bandwidth (100000000);
113         Config::instance()->set_default_interop (false);
114         Config::instance()->set_default_still_length (10);
115         Config::instance()->set_log_types (
116                 LogEntry::TYPE_GENERAL | LogEntry::TYPE_WARNING |
117                 LogEntry::TYPE_ERROR | LogEntry::TYPE_DEBUG_THREE_D |
118                 LogEntry::TYPE_DEBUG_ENCODE | LogEntry::TYPE_DEBUG_PLAYER |
119                 LogEntry::TYPE_DISK
120                 );
121         Config::instance()->set_automatic_audio_analysis (false);
122         auto signer = make_shared<dcp::CertificateChain>(dcp::file_to_string("test/data/signer_chain"));
123         signer->set_key(dcp::file_to_string("test/data/signer_key"));
124         Config::instance()->set_signer_chain (signer);
125         auto decryption = make_shared<dcp::CertificateChain>(dcp::file_to_string("test/data/decryption_chain"));
126         decryption->set_key(dcp::file_to_string("test/data/decryption_key"));
127         Config::instance()->set_decryption_chain (decryption);
128 }
129
130
131 class TestSignalManager : public SignalManager
132 {
133 public:
134         /* No wakes in tests: we call ui_idle ourselves */
135         void wake_ui ()
136         {
137
138         }
139 };
140
141 struct TestConfig
142 {
143         TestConfig ()
144         {
145                 State::override_path = "build/test/state";
146                 boost::filesystem::remove_all (*State::override_path);
147
148                 dcpomatic_setup ();
149                 setup_test_config ();
150
151                 EncodeServerFinder::instance()->stop ();
152
153                 signal_manager = new TestSignalManager ();
154
155                 dcpomatic_log.reset (new FileLog("build/test/log"));
156         }
157
158         ~TestConfig ()
159         {
160                 JobManager::drop ();
161         }
162 };
163
164
165 BOOST_GLOBAL_FIXTURE (TestConfig);
166
167
168 boost::filesystem::path
169 test_film_dir (string name)
170 {
171         boost::filesystem::path p;
172         p /= "build";
173         p /= "test";
174         p /= name;
175         return p;
176 }
177
178
179 shared_ptr<Film>
180 new_test_film (string name)
181 {
182         auto p = test_film_dir (name);
183         if (boost::filesystem::exists (p)) {
184                 boost::filesystem::remove_all (p);
185         }
186
187         auto film = make_shared<Film>(p);
188         film->write_metadata ();
189         return film;
190 }
191
192
193 shared_ptr<Film>
194 new_test_film2 (string name, vector<shared_ptr<Content>> content, Cleanup* cleanup)
195 {
196         auto p = test_film_dir (name);
197         if (boost::filesystem::exists (p)) {
198                 boost::filesystem::remove_all (p);
199         }
200         if (cleanup) {
201                 cleanup->add (p);
202         }
203
204         auto film = make_shared<Film>(p);
205         film->set_dcp_content_type (DCPContentType::from_isdcf_name ("TST"));
206         film->set_container (Ratio::from_id ("185"));
207         film->write_metadata ();
208
209         for (auto i: content) {
210                 film->examine_and_add_content (i);
211                 BOOST_REQUIRE (!wait_for_jobs());
212         }
213
214         return film;
215 }
216
217
218 void
219 check_wav_file (boost::filesystem::path ref, boost::filesystem::path check)
220 {
221         SF_INFO ref_info;
222         ref_info.format = 0;
223         auto ref_file = sf_open (ref.string().c_str(), SFM_READ, &ref_info);
224         BOOST_CHECK (ref_file);
225
226         SF_INFO check_info;
227         check_info.format = 0;
228         auto check_file = sf_open (check.string().c_str(), SFM_READ, &check_info);
229         BOOST_CHECK (check_file);
230
231         BOOST_CHECK_EQUAL (ref_info.frames, check_info.frames);
232         BOOST_CHECK_EQUAL (ref_info.samplerate, check_info.samplerate);
233         BOOST_CHECK_EQUAL (ref_info.channels, check_info.channels);
234         BOOST_CHECK_EQUAL (ref_info.format, check_info.format);
235
236         /* buffer_size is in frames */
237         sf_count_t const buffer_size = 65536 * ref_info.channels;
238         scoped_array<int32_t> ref_buffer (new int32_t[buffer_size]);
239         scoped_array<int32_t> check_buffer (new int32_t[buffer_size]);
240
241         sf_count_t N = ref_info.frames;
242         while (N) {
243                 sf_count_t this_time = min (buffer_size, N);
244                 sf_count_t r = sf_readf_int (ref_file, ref_buffer.get(), this_time);
245                 BOOST_CHECK_EQUAL (r, this_time);
246                 r = sf_readf_int (check_file, check_buffer.get(), this_time);
247                 BOOST_CHECK_EQUAL (r, this_time);
248
249                 for (sf_count_t i = 0; i < this_time; ++i) {
250                         BOOST_REQUIRE_MESSAGE (
251                                 abs (ref_buffer[i] - check_buffer[i]) <= 65536,
252                                 ref << " differs from " << check << " at " << (ref_info.frames - N + i) << " of " << ref_info.frames
253                                 << "(" << ref_buffer[i] << " vs " << check_buffer[i] << ")"
254                                 );
255                 }
256
257                 N -= this_time;
258         }
259 }
260
261
262 void
263 check_mxf_audio_file (boost::filesystem::path ref, boost::filesystem::path check)
264 {
265         ASDCP::PCM::MXFReader ref_reader;
266         BOOST_REQUIRE (!ASDCP_FAILURE (ref_reader.OpenRead (ref.string().c_str())));
267
268         ASDCP::PCM::AudioDescriptor ref_desc;
269         BOOST_REQUIRE (!ASDCP_FAILURE (ref_reader.FillAudioDescriptor (ref_desc)));
270
271         ASDCP::PCM::MXFReader check_reader;
272         BOOST_REQUIRE (!ASDCP_FAILURE (check_reader.OpenRead (check.string().c_str())));
273
274         ASDCP::PCM::AudioDescriptor check_desc;
275         BOOST_REQUIRE (!ASDCP_FAILURE (check_reader.FillAudioDescriptor (check_desc)));
276
277         BOOST_REQUIRE_EQUAL (ref_desc.ContainerDuration, check_desc.ContainerDuration);
278
279         ASDCP::PCM::FrameBuffer ref_buffer (Kumu::Megabyte);
280         ASDCP::PCM::FrameBuffer check_buffer (Kumu::Megabyte);
281         for (size_t i = 0; i < ref_desc.ContainerDuration; ++i) {
282                 ref_reader.ReadFrame (i, ref_buffer, 0);
283                 check_reader.ReadFrame (i, check_buffer, 0);
284                 BOOST_REQUIRE (memcmp(ref_buffer.RoData(), check_buffer.RoData(), ref_buffer.Size()) == 0);
285         }
286 }
287
288
289 /** @return true if the files are the same, otherwise false */
290 bool
291 mxf_atmos_files_same (boost::filesystem::path ref, boost::filesystem::path check, bool verbose)
292 {
293         ASDCP::ATMOS::MXFReader ref_reader;
294         BOOST_REQUIRE (!ASDCP_FAILURE(ref_reader.OpenRead(ref.string().c_str())));
295
296         ASDCP::ATMOS::AtmosDescriptor ref_desc;
297         BOOST_REQUIRE (!ASDCP_FAILURE(ref_reader.FillAtmosDescriptor(ref_desc)));
298
299         ASDCP::ATMOS::MXFReader check_reader;
300         BOOST_REQUIRE (!ASDCP_FAILURE(check_reader.OpenRead(check.string().c_str())));
301
302         ASDCP::ATMOS::AtmosDescriptor check_desc;
303         BOOST_REQUIRE (!ASDCP_FAILURE(check_reader.FillAtmosDescriptor(check_desc)));
304
305         if (ref_desc.EditRate.Numerator != check_desc.EditRate.Numerator) {
306                 if (verbose) {
307                         std::cout << "EditRate.Numerator differs.\n";
308                 }
309                 return false;
310         }
311         if (ref_desc.EditRate.Denominator != check_desc.EditRate.Denominator) {
312                 if (verbose) {
313                         std::cout << "EditRate.Denominator differs.\n";
314                 }
315                 return false;
316         }
317         if (ref_desc.ContainerDuration != check_desc.ContainerDuration) {
318                 if (verbose) {
319                         std::cout << "EditRate.ContainerDuration differs.\n";
320                 }
321                 return false;
322         }
323         if (ref_desc.FirstFrame != check_desc.FirstFrame) {
324                 if (verbose) {
325                         std::cout << "EditRate.FirstFrame differs.\n";
326                 }
327                 return false;
328         }
329         if (ref_desc.MaxChannelCount != check_desc.MaxChannelCount) {
330                 if (verbose) {
331                         std::cout << "EditRate.MaxChannelCount differs.\n";
332                 }
333                 return false;
334         }
335         if (ref_desc.MaxObjectCount != check_desc.MaxObjectCount) {
336                 if (verbose) {
337                         std::cout << "EditRate.MaxObjectCount differs.\n";
338                 }
339                 return false;
340         }
341         if (ref_desc.AtmosVersion != check_desc.AtmosVersion) {
342                 if (verbose) {
343                         std::cout << "EditRate.AtmosVersion differs.\n";
344                 }
345                 return false;
346         }
347
348         ASDCP::DCData::FrameBuffer ref_buffer (Kumu::Megabyte);
349         ASDCP::DCData::FrameBuffer check_buffer (Kumu::Megabyte);
350         for (size_t i = 0; i < ref_desc.ContainerDuration; ++i) {
351                 ref_reader.ReadFrame (i, ref_buffer, 0);
352                 check_reader.ReadFrame (i, check_buffer, 0);
353                 if (memcmp(ref_buffer.RoData(), check_buffer.RoData(), ref_buffer.Size())) {
354                         if (verbose) {
355                                 std::cout << "data differs.\n";
356                         }
357                         return false;
358                 }
359         }
360
361         return true;
362 }
363
364
365 static
366 double
367 rms_error (boost::filesystem::path ref, boost::filesystem::path check)
368 {
369         FFmpegImageProxy ref_proxy (ref, VideoRange::FULL);
370         auto ref_image = ref_proxy.image().image;
371         FFmpegImageProxy check_proxy (check, VideoRange::FULL);
372         auto check_image = check_proxy.image().image;
373
374         BOOST_REQUIRE_EQUAL (ref_image->pixel_format(), check_image->pixel_format());
375         AVPixelFormat const format = ref_image->pixel_format();
376
377         BOOST_REQUIRE (ref_image->size() == check_image->size());
378         int const width = ref_image->size().width;
379         int const height = ref_image->size().height;
380
381         double sum_square = 0;
382         switch (format) {
383                 case AV_PIX_FMT_RGBA:
384                 {
385                         for (int y = 0; y < height; ++y) {
386                                 uint8_t* p = ref_image->data()[0] + y * ref_image->stride()[0];
387                                 uint8_t* q = check_image->data()[0] + y * check_image->stride()[0];
388                                 for (int x = 0; x < width; ++x) {
389                                         for (int c = 0; c < 4; ++c) {
390                                                 sum_square += pow((*p++ - *q++), 2);
391                                         }
392                                 }
393                         }
394                         break;
395                 }
396                 case AV_PIX_FMT_RGB24:
397                 {
398                         for (int y = 0; y < height; ++y) {
399                                 uint8_t* p = ref_image->data()[0] + y * ref_image->stride()[0];
400                                 uint8_t* q = check_image->data()[0] + y * check_image->stride()[0];
401                                 for (int x = 0; x < width; ++x) {
402                                         for (int c = 0; c < 3; ++c) {
403                                                 sum_square += pow((*p++ - *q++), 2);
404                                         }
405                                 }
406                         }
407                         break;
408                 }
409                 case AV_PIX_FMT_RGB48BE:
410                 {
411                         for (int y = 0; y < height; ++y) {
412                                 uint16_t* p = reinterpret_cast<uint16_t*>(ref_image->data()[0] + y * ref_image->stride()[0]);
413                                 uint16_t* q = reinterpret_cast<uint16_t*>(check_image->data()[0] + y * check_image->stride()[0]);
414                                 for (int x = 0; x < width; ++x) {
415                                         for (int c = 0; c < 3; ++c) {
416                                                 sum_square += pow((*p++ - *q++), 2);
417                                         }
418                                 }
419                         }
420                         break;
421                 }
422                 default:
423                         BOOST_REQUIRE_MESSAGE (false, "unrecognised pixel format " << format);
424         }
425
426         return sqrt(sum_square / (height * width));
427 }
428
429
430 BOOST_AUTO_TEST_CASE (rms_error_test)
431 {
432         BOOST_CHECK_CLOSE (rms_error("test/data/check_image0.png", "test/data/check_image0.png"), 0, 0.001);
433         BOOST_CHECK_CLOSE (rms_error("test/data/check_image0.png", "test/data/check_image1.png"), 2.2778, 0.001);
434         BOOST_CHECK_CLOSE (rms_error("test/data/check_image0.png", "test/data/check_image2.png"), 59.8896, 0.001);
435         BOOST_CHECK_CLOSE (rms_error("test/data/check_image0.png", "test/data/check_image3.png"), 0.89164, 0.001);
436 }
437
438
439 void
440 check_image (boost::filesystem::path ref, boost::filesystem::path check, double threshold)
441 {
442         double const e = rms_error (ref, check);
443         BOOST_CHECK_MESSAGE (e < threshold, ref << " differs from " << check << " " << e);
444 }
445
446
447 void
448 check_file (boost::filesystem::path ref, boost::filesystem::path check, bool binary_mode)
449 {
450         auto N = boost::filesystem::file_size (ref);
451         BOOST_CHECK_EQUAL (N, boost::filesystem::file_size (check));
452         auto ref_file = fopen_boost (ref, binary_mode ? "rb" : "r");
453         BOOST_CHECK (ref_file);
454         auto check_file = fopen_boost (check, binary_mode ? "rb" : "r");
455         BOOST_CHECK (check_file);
456
457         int const buffer_size = 65536;
458         uint8_t* ref_buffer = new uint8_t[buffer_size];
459         uint8_t* check_buffer = new uint8_t[buffer_size];
460
461         string error = "File " + check.string() + " differs from reference " + ref.string();
462
463         while (N) {
464                 uintmax_t this_time = min (uintmax_t (buffer_size), N);
465                 size_t r = fread (ref_buffer, 1, this_time, ref_file);
466                 BOOST_CHECK_EQUAL (r, this_time);
467                 r = fread (check_buffer, 1, this_time, check_file);
468                 BOOST_CHECK_EQUAL (r, this_time);
469
470                 BOOST_CHECK_MESSAGE (memcmp (ref_buffer, check_buffer, this_time) == 0, error);
471                 if (memcmp (ref_buffer, check_buffer, this_time)) {
472                         break;
473                 }
474
475                 N -= this_time;
476         }
477
478         delete[] ref_buffer;
479         delete[] check_buffer;
480
481         fclose (ref_file);
482         fclose (check_file);
483 }
484
485
486 static void
487 note (dcp::NoteType t, string n)
488 {
489         if (t == dcp::NoteType::ERROR) {
490                 cerr << n << "\n";
491         }
492 }
493
494
495 void
496 check_dcp (boost::filesystem::path ref, shared_ptr<const Film> film)
497 {
498         check_dcp (ref, film->dir(film->dcp_name()));
499 }
500
501
502 void
503 check_dcp (boost::filesystem::path ref, boost::filesystem::path check)
504 {
505         dcp::DCP ref_dcp (ref);
506         ref_dcp.read ();
507         dcp::DCP check_dcp (check);
508         check_dcp.read ();
509
510         dcp::EqualityOptions options;
511         options.max_mean_pixel_error = 5;
512         options.max_std_dev_pixel_error = 5;
513         options.max_audio_sample_error = 255;
514         options.cpl_annotation_texts_can_differ = true;
515         options.reel_annotation_texts_can_differ = true;
516         options.reel_hashes_can_differ = true;
517         options.issue_dates_can_differ = true;
518
519         BOOST_CHECK (ref_dcp.equals (check_dcp, options, boost::bind (note, _1, _2)));
520 }
521
522 void
523 check_xml (xmlpp::Element* ref, xmlpp::Element* test, list<string> ignore)
524 {
525         BOOST_CHECK_EQUAL (ref->get_name (), test->get_name ());
526         BOOST_CHECK_EQUAL (ref->get_namespace_prefix (), test->get_namespace_prefix ());
527
528         if (find (ignore.begin(), ignore.end(), ref->get_name()) != ignore.end ()) {
529                 return;
530         }
531
532         auto ref_children = ref->get_children ();
533         auto test_children = test->get_children ();
534         BOOST_REQUIRE_MESSAGE (
535                 ref_children.size() == test_children.size(),
536                 ref->get_name() << " has " << ref_children.size() << " or " << test_children.size() << " children"
537                 );
538
539         auto k = ref_children.begin ();
540         auto l = test_children.begin ();
541         while (k != ref_children.end ()) {
542
543                 /* XXX: should be doing xmlpp::EntityReference, xmlpp::XIncludeEnd, xmlpp::XIncludeStart */
544
545                 auto ref_el = dynamic_cast<xmlpp::Element*>(*k);
546                 auto test_el = dynamic_cast<xmlpp::Element*>(*l);
547                 BOOST_CHECK ((ref_el && test_el) || (!ref_el && !test_el));
548                 if (ref_el && test_el) {
549                         check_xml (ref_el, test_el, ignore);
550                 }
551
552                 auto ref_cn = dynamic_cast<xmlpp::ContentNode*>(*k);
553                 auto test_cn = dynamic_cast<xmlpp::ContentNode*>(*l);
554                 BOOST_CHECK ((ref_cn && test_cn) || (!ref_cn && !test_cn));
555                 if (ref_cn && test_cn) {
556                         BOOST_CHECK_EQUAL (ref_cn->get_content(), test_cn->get_content ());
557                 }
558
559                 ++k;
560                 ++l;
561         }
562
563         auto ref_attributes = ref->get_attributes ();
564         auto test_attributes = test->get_attributes ();
565         BOOST_CHECK_EQUAL (ref_attributes.size(), test_attributes.size ());
566
567         auto m = ref_attributes.begin();
568         auto n = test_attributes.begin();
569         while (m != ref_attributes.end ()) {
570                 BOOST_CHECK_EQUAL ((*m)->get_name(), (*n)->get_name());
571                 BOOST_CHECK_EQUAL ((*m)->get_value(), (*n)->get_value());
572
573                 ++m;
574                 ++n;
575         }
576 }
577
578 void
579 check_xml (boost::filesystem::path ref, boost::filesystem::path test, list<string> ignore)
580 {
581         auto ref_parser = new xmlpp::DomParser(ref.string());
582         auto ref_root = ref_parser->get_document()->get_root_node();
583         auto test_parser = new xmlpp::DomParser(test.string());
584         auto test_root = test_parser->get_document()->get_root_node();
585
586         check_xml (ref_root, test_root, ignore);
587 }
588
589 bool
590 wait_for_jobs ()
591 {
592         auto jm = JobManager::instance ();
593         while (jm->work_to_do()) {
594                 while (signal_manager->ui_idle()) {}
595                 dcpomatic_sleep_seconds (1);
596         }
597
598         if (jm->errors ()) {
599                 int N = 0;
600                 for (auto i: jm->_jobs) {
601                         if (i->finished_in_error()) {
602                                 ++N;
603                         }
604                 }
605                 cerr << N << " errors.\n";
606
607                 for (auto i: jm->_jobs) {
608                         if (i->finished_in_error()) {
609                                 cerr << i->name() << ":\n"
610                                      << "\tsummary: " << i->error_summary() << "\n"
611                                      << "\tdetails: " << i->error_details() << "\n";
612                         }
613                 }
614         }
615
616         while (signal_manager->ui_idle ()) {}
617
618         if (jm->errors ()) {
619                 JobManager::drop ();
620                 return true;
621         }
622
623         return false;
624 }
625
626
627 class Memory
628 {
629 public:
630         Memory () {}
631
632         ~Memory ()
633         {
634                 free (data);
635         }
636
637         Memory (Memory const&) = delete;
638         Memory& operator= (Memory const&) = delete;
639
640         uint8_t* data = nullptr;
641         size_t size = 0;
642 };
643
644
645 static void
646 png_write_data (png_structp png_ptr, png_bytep data, png_size_t length)
647 {
648         auto mem = reinterpret_cast<Memory*>(png_get_io_ptr(png_ptr));
649         size_t size = mem->size + length;
650
651         if (mem->data) {
652                 mem->data = reinterpret_cast<uint8_t*>(realloc(mem->data, size));
653         } else {
654                 mem->data = reinterpret_cast<uint8_t*>(malloc(size));
655         }
656
657         BOOST_REQUIRE (mem->data);
658
659         memcpy (mem->data + mem->size, data, length);
660         mem->size += length;
661 }
662
663
664 static void
665 png_flush (png_structp)
666 {
667
668 }
669
670
671 static void
672 png_error_fn (png_structp png_ptr, char const * message)
673 {
674         reinterpret_cast<Image*>(png_get_error_ptr(png_ptr))->png_error (message);
675 }
676
677
678 void
679 write_image (shared_ptr<const Image> image, boost::filesystem::path file)
680 {
681         int png_color_type = 0;
682         int bits_per_pixel = 0;
683         switch (image->pixel_format()) {
684         case AV_PIX_FMT_RGB24:
685                 png_color_type = PNG_COLOR_TYPE_RGB;
686                 bits_per_pixel = 8;
687                 break;
688         case AV_PIX_FMT_XYZ12LE:
689                 png_color_type = PNG_COLOR_TYPE_RGB;
690                 bits_per_pixel = 16;
691                 break;
692         default:
693                 BOOST_REQUIRE_MESSAGE (false, "unexpected pixel format " << image->pixel_format());
694         }
695
696         /* error handling? */
697         png_structp png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, reinterpret_cast<void*>(const_cast<Image*>(image.get())), png_error_fn, 0);
698         BOOST_REQUIRE (png_ptr);
699
700         Memory state;
701
702         png_set_write_fn (png_ptr, &state, png_write_data, png_flush);
703
704         png_infop info_ptr = png_create_info_struct(png_ptr);
705         BOOST_REQUIRE (info_ptr);
706
707         png_set_IHDR (png_ptr, info_ptr, image->size().width, image->size().height, bits_per_pixel, png_color_type, PNG_INTERLACE_NONE, PNG_COMPRESSION_TYPE_DEFAULT, PNG_FILTER_TYPE_DEFAULT);
708
709         png_byte ** row_pointers = reinterpret_cast<png_byte **>(png_malloc(png_ptr, image->size().height * sizeof(png_byte *)));
710         for (int i = 0; i < image->size().height; ++i) {
711                 row_pointers[i] = (png_byte *) (image->data()[0] + i * image->stride()[0]);
712         }
713
714         png_write_info (png_ptr, info_ptr);
715         png_write_image (png_ptr, row_pointers);
716         png_write_end (png_ptr, info_ptr);
717
718         png_destroy_write_struct (&png_ptr, &info_ptr);
719         png_free (png_ptr, row_pointers);
720
721         dcp::ArrayData(state.data, state.size).write(file);
722 }
723
724
725 void
726 check_ffmpeg (boost::filesystem::path ref, boost::filesystem::path check, int audio_tolerance)
727 {
728         int const r = system (String::compose("ffcmp -t %1 %2 %3", audio_tolerance, ref.string(), check.string()).c_str());
729         BOOST_REQUIRE_EQUAL (WEXITSTATUS(r), 0);
730 }
731
732 void
733 check_one_frame (boost::filesystem::path dcp_dir, int64_t index, boost::filesystem::path ref)
734 {
735         dcp::DCP dcp (dcp_dir);
736         dcp.read ();
737         auto asset = dynamic_pointer_cast<dcp::MonoPictureAsset> (dcp.cpls().front()->reels().front()->main_picture()->asset());
738         BOOST_REQUIRE (asset);
739         auto frame = asset->start_read()->get_frame(index);
740         auto ref_frame (new dcp::MonoPictureFrame (ref));
741
742         auto image = frame->xyz_image ();
743         auto ref_image = ref_frame->xyz_image ();
744
745         BOOST_REQUIRE (image->size() == ref_image->size());
746
747         int off = 0;
748         for (int y = 0; y < ref_image->size().height; ++y) {
749                 for (int x = 0; x < ref_image->size().width; ++x) {
750                         BOOST_REQUIRE_EQUAL (ref_image->data(0)[off], image->data(0)[off]);
751                         BOOST_REQUIRE_EQUAL (ref_image->data(1)[off], image->data(1)[off]);
752                         BOOST_REQUIRE_EQUAL (ref_image->data(2)[off], image->data(2)[off]);
753                         ++off;
754                 }
755         }
756 }
757
758 boost::filesystem::path
759 dcp_file (shared_ptr<const Film> film, string prefix)
760 {
761         auto i = boost::filesystem::directory_iterator (film->dir(film->dcp_name()));
762         while (i != boost::filesystem::directory_iterator() && !boost::algorithm::starts_with (i->path().leaf().string(), prefix)) {
763                 ++i;
764         }
765
766         BOOST_REQUIRE (i != boost::filesystem::directory_iterator());
767         return i->path();
768 }
769
770 boost::filesystem::path
771 subtitle_file (shared_ptr<Film> film)
772 {
773         for (auto i: boost::filesystem::directory_iterator(film->directory().get() / film->dcp_name (false))) {
774                 if (boost::filesystem::is_directory(i.path())) {
775                         for (auto j: boost::filesystem::directory_iterator(i.path())) {
776                                 if (boost::algorithm::starts_with(j.path().leaf().string(), "sub_")) {
777                                         return j.path();
778                                 }
779                         }
780                 }
781         }
782
783         BOOST_REQUIRE (false);
784         /* Remove warning */
785         return boost::filesystem::path("/");
786 }
787
788 void
789 make_random_file (boost::filesystem::path path, size_t size)
790 {
791         auto t = fopen_boost(path, "wb");
792         BOOST_REQUIRE (t);
793         for (size_t i = 0; i < size; ++i) {
794                 uint8_t r = rand() & 0xff;
795                 fwrite (&r, 1, 1, t);
796         }
797         fclose (t);
798 }
799
800
801 LogSwitcher::LogSwitcher (shared_ptr<Log> log)
802         : _old (dcpomatic_log)
803 {
804         dcpomatic_log = log;
805 }
806
807
808 LogSwitcher::~LogSwitcher ()
809 {
810         dcpomatic_log = _old;
811 }
812
813 std::ostream&
814 dcp::operator<< (std::ostream& s, dcp::Size i)
815 {
816         s << i.width << "x" << i.height;
817         return s;
818 }
819
820 std::ostream&
821 dcp::operator<< (std::ostream& s, dcp::Standard t)
822 {
823         switch (t) {
824         case Standard::INTEROP:
825                 s << "interop";
826                 break;
827         case Standard::SMPTE:
828                 s << "smpte";
829                 break;
830         }
831         return s;
832 }
833
834 std::ostream&
835 operator<< (std::ostream&s, VideoFrameType f)
836 {
837         s << video_frame_type_to_string(f);
838         return s;
839 }
840
841
842 void
843 Cleanup::add (boost::filesystem::path path)
844 {
845         _paths.push_back (path);
846 }
847
848
849 void
850 Cleanup::run ()
851 {
852         boost::system::error_code ec;
853         for (auto i: _paths) {
854                 boost::filesystem::remove_all (i, ec);
855         }
856 }
857
858
859 void stage (string, boost::optional<boost::filesystem::path>) {}
860 void progress (float) {}
861
862
863 void
864 make_and_verify_dcp (shared_ptr<Film> film, vector<dcp::VerificationNote::Code> ignore)
865 {
866         film->write_metadata ();
867         film->make_dcp ();
868         BOOST_REQUIRE (!wait_for_jobs());
869         auto notes = dcp::verify ({film->dir(film->dcp_name())}, &stage, &progress, TestPaths::xsd());
870         bool ok = true;
871         for (auto i: notes) {
872                 if (find(ignore.begin(), ignore.end(), i.code()) == ignore.end()) {
873                         std::cout << "\t" << dcp::note_to_string(i) << "\n";
874                         ok = false;
875                 }
876         }
877         BOOST_CHECK(ok);
878 }
879