2 Copyright (C) 2012-2014 Carl Hetherington <cth@carlh.net>
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "sound_mxf.h"
26 #include "picture_mxf.h"
27 #include "subtitle_content.h"
28 #include "mono_picture_mxf.h"
29 #include "stereo_picture_mxf.h"
32 #include "exceptions.h"
36 #include "compose.hpp"
38 #include "decrypted_kdm.h"
39 #include "decrypted_kdm_key.h"
40 #include <xmlsec/xmldsig.h>
41 #include <xmlsec/app.h>
42 #include <libxml++/libxml++.h>
43 #include <boost/filesystem.hpp>
44 #include <boost/algorithm/string.hpp>
45 #include <boost/lexical_cast.hpp>
53 using std::stringstream;
59 using boost::shared_ptr;
60 using boost::lexical_cast;
61 using boost::algorithm::starts_with;
64 DCP::DCP (boost::filesystem::path directory)
65 : _directory (directory)
67 boost::filesystem::create_directories (directory);
68 _directory = boost::filesystem::canonical (_directory);
71 template<class T> void
72 survivable_error (bool keep_going, dcp::DCP::ReadErrors* errors, T const & e)
76 errors->push_back (shared_ptr<T> (new T (e)));
84 DCP::read (bool keep_going, ReadErrors* errors)
86 /* Read the ASSETMAP */
88 boost::filesystem::path asset_map_file;
89 if (boost::filesystem::exists (_directory / "ASSETMAP")) {
90 asset_map_file = _directory / "ASSETMAP";
91 } else if (boost::filesystem::exists (_directory / "ASSETMAP.xml")) {
92 asset_map_file = _directory / "ASSETMAP.xml";
94 boost::throw_exception (DCPReadError (String::compose ("could not find AssetMap file `%1'", asset_map_file.string())));
97 cxml::Document asset_map ("AssetMap");
98 asset_map.read_file (asset_map_file);
99 list<shared_ptr<cxml::Node> > asset_nodes = asset_map.node_child("AssetList")->node_children ("Asset");
100 map<string, boost::filesystem::path> paths;
101 for (list<shared_ptr<cxml::Node> >::const_iterator i = asset_nodes.begin(); i != asset_nodes.end(); ++i) {
102 if ((*i)->node_child("ChunkList")->node_children("Chunk").size() != 1) {
103 boost::throw_exception (XMLError ("unsupported asset chunk count"));
105 string p = (*i)->node_child("ChunkList")->node_child("Chunk")->string_child ("Path");
106 if (starts_with (p, "file://")) {
109 paths.insert (make_pair ((*i)->string_child ("Id"), p));
112 /* Read all the assets from the asset map */
113 for (map<string, boost::filesystem::path>::const_iterator i = paths.begin(); i != paths.end(); ++i) {
114 boost::filesystem::path path = _directory / i->second;
116 if (!boost::filesystem::exists (path)) {
117 survivable_error (keep_going, errors, MissingAssetError (path));
121 if (boost::algorithm::ends_with (path.string(), ".xml")) {
122 xmlpp::DomParser* p = new xmlpp::DomParser;
124 p->parse_file (path.string());
125 } catch (std::exception& e) {
130 string const root = p->get_document()->get_root_node()->get_name ();
133 if (root == "CompositionPlaylist") {
134 _assets.push_back (shared_ptr<CPL> (new CPL (path)));
135 } else if (root == "DCSubtitle") {
136 _assets.push_back (shared_ptr<SubtitleContent> (new SubtitleContent (path, false)));
138 } else if (boost::algorithm::ends_with (path.string(), ".mxf")) {
139 ASDCP::EssenceType_t type;
140 if (ASDCP::EssenceType (path.string().c_str(), type) != ASDCP::RESULT_OK) {
141 throw DCPReadError ("Could not find essence type");
144 case ASDCP::ESS_UNKNOWN:
145 case ASDCP::ESS_MPEG2_VES:
146 throw DCPReadError ("MPEG2 video essences are not supported");
147 case ASDCP::ESS_JPEG_2000:
148 _assets.push_back (shared_ptr<MonoPictureMXF> (new MonoPictureMXF (path)));
150 case ASDCP::ESS_PCM_24b_48k:
151 case ASDCP::ESS_PCM_24b_96k:
152 _assets.push_back (shared_ptr<SoundMXF> (new SoundMXF (path)));
154 case ASDCP::ESS_JPEG_2000_S:
155 _assets.push_back (shared_ptr<StereoPictureMXF> (new StereoPictureMXF (path)));
157 case ASDCP::ESS_TIMED_TEXT:
158 _assets.push_back (shared_ptr<SubtitleContent> (new SubtitleContent (path, true)));
161 throw DCPReadError ("Unknown MXF essence type");
166 list<shared_ptr<CPL> > cpl = cpls ();
167 for (list<shared_ptr<CPL> >::const_iterator i = cpl.begin(); i != cpl.end(); ++i) {
168 (*i)->resolve_refs (list_of_type<Asset, Object> (assets ()));
173 DCP::equals (DCP const & other, EqualityOptions opt, boost::function<void (NoteType, string)> note) const
175 if (_assets.size() != other._assets.size()) {
176 note (ERROR, String::compose ("Asset counts differ: %1 vs %2", _assets.size(), other._assets.size()));
180 list<shared_ptr<Asset> >::const_iterator a = _assets.begin ();
181 list<shared_ptr<Asset> >::const_iterator b = other._assets.begin ();
183 while (a != _assets.end ()) {
184 if (!(*a)->equals (*b, opt, note)) {
195 DCP::add (boost::shared_ptr<Asset> asset)
197 _assets.push_back (asset);
200 class AssetComparator
203 bool operator() (shared_ptr<const Content> a, shared_ptr<const Content> b) {
204 return a->id() < b->id();
209 DCP::encrypted () const
211 list<shared_ptr<CPL> > cpl = cpls ();
212 for (list<shared_ptr<CPL> >::const_iterator i = cpl.begin(); i != cpl.end(); ++i) {
213 if ((*i)->encrypted ()) {
222 DCP::add (DecryptedKDM const & kdm)
224 list<DecryptedKDMKey> keys = kdm.keys ();
225 list<shared_ptr<CPL> > cpl = cpls ();
227 for (list<shared_ptr<CPL> >::iterator i = cpl.begin(); i != cpl.end(); ++i) {
228 for (list<DecryptedKDMKey>::iterator j = keys.begin(); j != keys.end(); ++j) {
229 if (j->cpl_id() == (*i)->id()) {
236 boost::filesystem::path
237 DCP::write_pkl (Standard standard, string pkl_uuid, XMLMetadata metadata, shared_ptr<const Signer> signer) const
239 boost::filesystem::path p = _directory;
241 s << pkl_uuid << "_pkl.xml";
246 if (standard == INTEROP) {
247 pkl = doc.create_root_node("PackingList", "http://www.digicine.com/PROTO-ASDCP-PKL-20040311#");
249 pkl = doc.create_root_node("PackingList", "http://www.smpte-ra.org/schemas/429-8/2007/PKL");
253 pkl->set_namespace_declaration ("http://www.w3.org/2000/09/xmldsig#", "dsig");
256 pkl->add_child("Id")->add_child_text ("urn:uuid:" + pkl_uuid);
258 /* XXX: this is a bit of a hack */
259 assert (cpls().size() > 0);
260 pkl->add_child("AnnotationText")->add_child_text (cpls().front()->annotation_text ());
262 pkl->add_child("IssueDate")->add_child_text (metadata.issue_date);
263 pkl->add_child("Issuer")->add_child_text (metadata.issuer);
264 pkl->add_child("Creator")->add_child_text (metadata.creator);
266 xmlpp::Element* asset_list = pkl->add_child("AssetList");
267 for (list<shared_ptr<Asset> >::const_iterator i = _assets.begin(); i != _assets.end(); ++i) {
268 (*i)->write_to_pkl (asset_list, standard);
272 signer->sign (pkl, standard);
275 doc.write_to_file (p.string (), "UTF-8");
279 /** Write the VOLINDEX file.
280 * @param standard DCP standard to use (INTEROP or SMPTE)
283 DCP::write_volindex (Standard standard) const
285 boost::filesystem::path p = _directory;
298 xmlpp::Element* root;
302 root = doc.create_root_node ("VolumeIndex", "http://www.digicine.com/PROTO-ASDCP-AM-20040311#");
305 root = doc.create_root_node ("VolumeIndex", "http://www.smpte-ra.org/schemas/429-9/2007/AM");
311 root->add_child("Index")->add_child_text ("1");
312 doc.write_to_file (p.string (), "UTF-8");
316 DCP::write_assetmap (Standard standard, string pkl_uuid, int pkl_length, XMLMetadata metadata) const
318 boost::filesystem::path p = _directory;
332 xmlpp::Element* root;
336 root = doc.create_root_node ("AssetMap", "http://www.digicine.com/PROTO-ASDCP-AM-20040311#");
339 root = doc.create_root_node ("AssetMap", "http://www.smpte-ra.org/schemas/429-9/2007/AM");
345 root->add_child("Id")->add_child_text ("urn:uuid:" + make_uuid());
346 root->add_child("AnnotationText")->add_child_text ("Created by " + metadata.creator);
350 root->add_child("VolumeCount")->add_child_text ("1");
351 root->add_child("IssueDate")->add_child_text (metadata.issue_date);
352 root->add_child("Issuer")->add_child_text (metadata.issuer);
353 root->add_child("Creator")->add_child_text (metadata.creator);
356 root->add_child("Creator")->add_child_text (metadata.creator);
357 root->add_child("VolumeCount")->add_child_text ("1");
358 root->add_child("IssueDate")->add_child_text (metadata.issue_date);
359 root->add_child("Issuer")->add_child_text (metadata.issuer);
365 xmlpp::Node* asset_list = root->add_child ("AssetList");
367 xmlpp::Node* asset = asset_list->add_child ("Asset");
368 asset->add_child("Id")->add_child_text ("urn:uuid:" + pkl_uuid);
369 asset->add_child("PackingList")->add_child_text ("true");
370 xmlpp::Node* chunk_list = asset->add_child ("ChunkList");
371 xmlpp::Node* chunk = chunk_list->add_child ("Chunk");
372 chunk->add_child("Path")->add_child_text (pkl_uuid + "_pkl.xml");
373 chunk->add_child("VolumeIndex")->add_child_text ("1");
374 chunk->add_child("Offset")->add_child_text ("0");
375 chunk->add_child("Length")->add_child_text (lexical_cast<string> (pkl_length));
377 for (list<shared_ptr<Asset> >::const_iterator i = _assets.begin(); i != _assets.end(); ++i) {
378 (*i)->write_to_assetmap (asset_list, _directory);
381 /* This must not be the _formatted version otherwise signature digests will be wrong */
382 doc.write_to_file (p.string (), "UTF-8");
385 /** Write all the XML files for this DCP.
386 * @param standand INTEROP or SMPTE.
387 * @param metadata Metadata to use for PKL and asset map files.
388 * @param signer Signer to use, or 0.
393 XMLMetadata metadata,
394 shared_ptr<const Signer> signer
397 list<shared_ptr<CPL> > cpl = cpls ();
398 for (list<shared_ptr<CPL> >::const_iterator i = cpl.begin(); i != cpl.end(); ++i) {
399 string const filename = (*i)->id() + "_cpl.xml";
400 (*i)->write_xml (_directory / filename, standard, signer);
403 string const pkl_uuid = make_uuid ();
404 boost::filesystem::path const pkl_path = write_pkl (standard, pkl_uuid, metadata, signer);
406 write_volindex (standard);
407 write_assetmap (standard, pkl_uuid, boost::filesystem::file_size (pkl_path), metadata);
410 list<shared_ptr<CPL> >
413 return list_of_type<Asset, CPL> (_assets);