decbf581244e499922493ea14a28503d945551cf
[libdcp.git] / test / mca_test.cc
1 /*
2     Copyright (C) 2020 Carl Hetherington <cth@carlh.net>
3
4     This file is part of libdcp.
5
6     libdcp 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     libdcp 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 libdcp.  If not, see <http://www.gnu.org/licenses/>.
18
19     In addition, as a special exception, the copyright holders give
20     permission to link the code of portions of this program with the
21     OpenSSL library under certain conditions as described in each
22     individual source file, and distribute linked combinations
23     including the two.
24
25     You must obey the GNU General Public License in all respects
26     for all of the code used other than OpenSSL.  If you modify
27     file(s) with this exception, you may extend this exception to your
28     version of the file(s), but you are not obligated to do so.  If you
29     do not wish to do so, delete this exception statement from your
30     version.  If you delete this exception statement from all source
31     files in the program, then also delete it here.
32 */
33
34
35 #include "compose.hpp"
36 #include "cpl.h"
37 #include "reel.h"
38 #include "reel_sound_asset.h"
39 #include "sound_asset.h"
40 #include "sound_asset_writer.h"
41 #include "test.h"
42 #include <libcxml/cxml.h>
43 #include <libxml++/libxml++.h>
44 #include <boost/test/unit_test.hpp>
45
46
47 using std::list;
48 using std::make_shared;
49 using std::shared_ptr;
50 using std::string;
51 using std::vector;
52
53
54 /** Check that when we read a MXF and write its MCA metadata to a CPL we get the same answer
55  *  as the original MXF for that CPL (for a couple of different MXFs).
56  */
57 BOOST_AUTO_TEST_CASE (parse_mca_descriptors_from_mxf_test)
58 {
59         for (int i = 1; i < 3; ++i) {
60                 auto sound_asset = make_shared<dcp::SoundAsset>(private_test / "data" / dcp::String::compose("51_sound_with_mca_%1.mxf", i));
61                 auto reel_sound_asset = make_shared<dcp::ReelSoundAsset>(sound_asset, 0);
62                 auto reel = make_shared<dcp::Reel>();
63                 reel->add (black_picture_asset(dcp::String::compose("build/test/parse_mca_descriptors_from_mxf_test%1", i), 24));
64                 reel->add (reel_sound_asset);
65
66                 dcp::CPL cpl("", dcp::ContentKind::FEATURE, dcp::Standard::SMPTE);
67                 cpl.add (reel);
68                 cpl.set_main_sound_configuration("51/L,R,C,LFE,Ls,Rs");
69                 cpl.set_main_sound_sample_rate(48000);
70                 cpl.set_main_picture_stored_area(dcp::Size(1998, 1080));
71                 cpl.set_main_picture_active_area(dcp::Size(1998, 1080));
72                 cpl.write_xml (dcp::String::compose("build/test/parse_mca_descriptors_from_mxf_test%1/cpl.xml", i), shared_ptr<dcp::CertificateChain>());
73
74                 cxml::Document ref("CompositionPlaylist", private_test / dcp::String::compose("51_sound_with_mca_%1.cpl", i));
75                 cxml::Document check("CompositionPlaylist", dcp::String::compose("build/test/parse_mca_descriptors_from_mxf_test%1/cpl.xml", i));
76
77                 vector<string> ignore;
78                 check_xml (
79                         dynamic_cast<xmlpp::Element*>(
80                                 ref.node_child("ReelList")->node_children("Reel").front()->node_child("AssetList")->node_child("CompositionMetadataAsset")->node_child("MCASubDescriptors")->node()
81                                 ),
82                         dynamic_cast<xmlpp::Element*>(
83                                 check.node_child("ReelList")->node_children("Reel").front()->node_child("AssetList")->node_child("CompositionMetadataAsset")->node_child("MCASubDescriptors")->node()
84                                 ),
85                         ignore,
86                         true
87                         );
88         }
89 }
90
91
92 /** Reproduce the MCA tags from one of the example files using libdcp */
93 BOOST_AUTO_TEST_CASE (write_mca_descriptors_to_mxf_test)
94 {
95         auto sound_asset = make_shared<dcp::SoundAsset>(dcp::Fraction(24, 1), 48000, 6, dcp::LanguageTag("en-US"), dcp::Standard::SMPTE);
96         auto writer = sound_asset->start_write("build/test/write_mca_descriptors_to_mxf_test.mxf");
97
98         float* samples[6];
99         for (int i = 0; i < 6; ++i) {
100                 samples[i] = new float[2000];
101                 memset (samples[i], 0, 2000 * sizeof(float));
102         }
103         for (int i = 0; i < 24; ++i) {
104                 writer->write(samples, 2000);
105         }
106         for (int i = 0; i < 6; ++i) {
107                 delete[] samples[i];
108         }
109
110         writer->finalize();
111
112         /* Make a CPL as a roundabout way to read the metadata we just wrote to the MXF */
113
114         shared_ptr<dcp::ReelSoundAsset> reel_sound_asset(new dcp::ReelSoundAsset(sound_asset, 0));
115         shared_ptr<dcp::Reel> reel(new dcp::Reel());
116         reel->add (black_picture_asset("build/test/write_mca_descriptors_to_mxf_test", 24));
117         reel->add (reel_sound_asset);
118
119         dcp::CPL cpl("", dcp::ContentKind::FEATURE, dcp::Standard::SMPTE);
120         cpl.add (reel);
121         cpl.set_main_sound_configuration("51/L,R,C,LFE,Ls,Rs");
122         cpl.set_main_sound_sample_rate(48000);
123         cpl.set_main_picture_stored_area(dcp::Size(1998, 1080));
124         cpl.set_main_picture_active_area(dcp::Size(1998, 1080));
125         cpl.write_xml ("build/test/write_mca_descriptors_to_mxf_test/cpl.xml", shared_ptr<dcp::CertificateChain>());
126
127         cxml::Document ref("CompositionPlaylist", private_test / "51_sound_with_mca_1.cpl");
128         cxml::Document check("CompositionPlaylist", "build/test/write_mca_descriptors_to_mxf_test/cpl.xml");
129
130         check_xml (
131                 dynamic_cast<xmlpp::Element*>(
132                         ref.node_child("ReelList")->node_children("Reel")[0]->node_child("AssetList")->node_child("CompositionMetadataAsset")->node_child("MCASubDescriptors")->node()
133                         ),
134                 dynamic_cast<xmlpp::Element*>(
135                         check.node_child("ReelList")->node_children("Reel")[0]->node_child("AssetList")->node_child("CompositionMetadataAsset")->node_child("MCASubDescriptors")->node()
136                         ),
137                 { "InstanceID", "MCALinkID", "SoundfieldGroupLinkID" },
138                 true
139                 );
140 }
141