Add option to limit DCP output to the "Bv2.0 profile" (#2470).v2.16.45

I'm far from convinced about the point/sense of all these "profiles"
(rather than just implementing or at least tolerating the standard)
but lots of people are having problems with "QC" processes failing
their DCPs with complaints related to MCASubDescriptors.  It seems to
make sense to have an option to turn them off - at least for now,
until either the "QC" situation settles down or any bugs in DCP-o-matic
are found and fixed.

1 files changed, 95 insertions, 0 deletions

diff --git a/test/bv20_test.cc b/test/bv20_test.cc
new file mode 100644
index 000000000..5530a05d0
--- /dev/null
+++ b/test/bv20_test.cc
@@ -0,0 +1,95 @@
+/*
+    Copyright (C) 2023 Carl Hetherington <cth@carlh.net>
+
+    This file is part of DCP-o-matic.
+
+    DCP-o-matic is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    DCP-o-matic is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
+
+*/
+
+
+#include "lib/content_factory.h"
+#include "lib/film.h"
+#include "test.h"
+#include <dcp/warnings.h>
+LIBDCP_DISABLE_WARNINGS
+#include <asdcp/Metadata.h>
+LIBDCP_ENABLE_WARNINGS
+#include <dcp/sound_asset.h>
+#include <dcp/util.h>
+#include <boost/test/unit_test.hpp>
+
+
+using std::shared_ptr;
+
+
+bool
+has_cpl_mca_subdescriptors(shared_ptr<const Film> film)
+{
+	auto cpl = dcp::file_to_string(find_file(film->dir(film->dcp_name()), "cpl_"));
+	return cpl.find("MCASubDescriptors") != std::string::npos;
+}
+
+
+bool
+has_mxf_mca_subdescriptors(shared_ptr<const Film> film)
+{
+	/* One day hopefully libdcp will read these descriptors and we can find out from the SoundAsset
+	 * whether they exist.
+	 */
+
+	ASDCP::PCM::MXFReader reader;
+	auto r = reader.OpenRead(find_file(film->dir(film->dcp_name()), "pcm_").string());
+	BOOST_REQUIRE(!ASDCP_FAILURE(r));
+
+	ASDCP::MXF::WaveAudioDescriptor* essence_descriptor = nullptr;
+	auto const rr = reader.OP1aHeader().GetMDObjectByType(
+		dcp::asdcp_smpte_dict->ul(ASDCP::MDD_WaveAudioDescriptor),
+		reinterpret_cast<ASDCP::MXF::InterchangeObject**>(&essence_descriptor)
+		);
+
+	if (!KM_SUCCESS(rr)) {
+		return false;
+	}
+
+	return essence_descriptor->SubDescriptors.size() > 0;
+}
+
+
+BOOST_AUTO_TEST_CASE(bv21_extensions_used_when_not_limited)
+{
+	auto picture = content_factory("test/data/flat_red.png");
+	auto sound = content_factory("test/data/sine_440.wav");
+	auto film = new_test_film2("bv21_extensions_used_when_not_limited", { picture.front(), sound.front() });
+
+	make_and_verify_dcp(film);
+
+	BOOST_CHECK(has_cpl_mca_subdescriptors(film));
+	BOOST_CHECK(has_mxf_mca_subdescriptors(film));
+}
+
+
+BOOST_AUTO_TEST_CASE(bv21_extensions_not_used_when_limited)
+{
+	auto picture = content_factory("test/data/flat_red.png");
+	auto sound = content_factory("test/data/sine_440.wav");
+	auto film = new_test_film2("bv21_extensions_not_used_when_limited", { picture.front(), sound.front () });
+	film->set_limit_to_smpte_bv20(true);
+
+	make_and_verify_dcp(film);
+
+	BOOST_CHECK(!has_cpl_mca_subdescriptors(film));
+	BOOST_CHECK(!has_mxf_mca_subdescriptors(film));
+}
+