Try to fix application of namespace to MainStereoscopicPicture nodes.
[libdcp.git] / src / mxf_asset.cc
1 /*
2     Copyright (C) 2012 Carl Hetherington <cth@carlh.net>
3
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.
8
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.
13
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.
17
18 */
19
20 /** @file  src/asset.cc
21  *  @brief Parent class for assets of DCPs made up of MXF files.
22  */
23
24 #include <iostream>
25 #include <fstream>
26 #include <boost/filesystem.hpp>
27 #include <boost/lexical_cast.hpp>
28 #include <libxml++/nodes/element.h>
29 #include "AS_DCP.h"
30 #include "KM_prng.h"
31 #include "KM_util.h"
32 #include "mxf_asset.h"
33 #include "util.h"
34 #include "metadata.h"
35 #include "exceptions.h"
36 #include "kdm.h"
37
38 using std::string;
39 using std::list;
40 using std::pair;
41 using boost::shared_ptr;
42 using boost::lexical_cast;
43 using boost::dynamic_pointer_cast;
44 using namespace libdcp;
45
46 MXFAsset::MXFAsset (string directory, string file_name)
47         : Asset (directory, file_name)
48         , _progress (0)
49         , _encrypted (false)
50         , _encryption_context (0)
51         , _decryption_context (0)
52 {
53
54 }
55
56 MXFAsset::MXFAsset (string directory, string file_name, boost::signals2::signal<void (float)>* progress, int edit_rate, int intrinsic_duration, bool encrypted)
57         : Asset (directory, file_name, edit_rate, intrinsic_duration)
58         , _progress (progress)
59         , _encrypted (encrypted)
60         , _encryption_context (0)
61         , _decryption_context (0)
62 {
63         if (_encrypted) {
64                 _key_id = make_uuid ();
65                 uint8_t key_buffer[ASDCP::KeyLen];
66                 Kumu::FortunaRNG rng;
67                 rng.FillRandom (key_buffer, ASDCP::KeyLen);
68                 char key_string[ASDCP::KeyLen * 4];
69                 Kumu::bin2hex (key_buffer, ASDCP::KeyLen, key_string, ASDCP::KeyLen * 4);
70                 _key_value = key_string;
71                         
72                 _encryption_context = new ASDCP::AESEncContext;
73                 if (ASDCP_FAILURE (_encryption_context->InitKey (key_buffer))) {
74                         throw MiscError ("could not set up encryption context");
75                 }
76
77                 uint8_t cbc_buffer[ASDCP::CBC_BLOCK_SIZE];
78                 
79                 if (ASDCP_FAILURE (_encryption_context->SetIVec (rng.FillRandom (cbc_buffer, ASDCP::CBC_BLOCK_SIZE)))) {
80                         throw MiscError ("could not set up CBC initialization vector");
81                 }
82         }
83 }
84
85 MXFAsset::~MXFAsset ()
86 {
87         delete _encryption_context;
88 }
89
90 void
91 MXFAsset::fill_writer_info (ASDCP::WriterInfo* writer_info, string uuid, bool interop, MXFMetadata const & metadata)
92 {
93         writer_info->ProductVersion = metadata.product_version;
94         writer_info->CompanyName = metadata.company_name;
95         writer_info->ProductName = metadata.product_name.c_str();
96
97         if (interop) {
98                 writer_info->LabelSetType = ASDCP::LS_MXF_INTEROP;
99         } else {
100                 writer_info->LabelSetType = ASDCP::LS_MXF_SMPTE;
101         }
102         unsigned int c;
103         Kumu::hex2bin (uuid.c_str(), writer_info->AssetUUID, Kumu::UUID_Length, &c);
104         assert (c == Kumu::UUID_Length);
105
106         if (_encrypted) {
107                 Kumu::GenRandomUUID (writer_info->ContextID);
108                 writer_info->EncryptedEssence = true;
109
110                 unsigned int c;
111                 Kumu::hex2bin (_key_id.c_str(), writer_info->CryptographicKeyID, Kumu::UUID_Length, &c);
112                 assert (c == Kumu::UUID_Length);
113         }
114 }
115
116 bool
117 MXFAsset::equals (shared_ptr<const Asset> other, EqualityOptions opt, boost::function<void (NoteType, string)> note) const
118 {
119         if (!Asset::equals (other, opt, note)) {
120                 return false;
121         }
122         
123         shared_ptr<const MXFAsset> other_mxf = dynamic_pointer_cast<const MXFAsset> (other);
124         if (!other_mxf) {
125                 note (ERROR, "comparing an MXF asset with a non-MXF asset");
126                 return false;
127         }
128         
129         if (_file_name != other_mxf->_file_name) {
130                 note (ERROR, "MXF names differ");
131                 if (!opt.mxf_names_can_differ) {
132                         return false;
133                 }
134         }
135         
136         return true;
137 }
138
139 void
140 MXFAsset::add_typed_key_id (xmlpp::Element* parent) const
141 {
142         xmlpp::Element* typed_key_id = parent->add_child("TypedKeyId");
143         typed_key_id->add_child("KeyType")->add_child_text(key_type ());
144         typed_key_id->add_child("KeyId")->add_child_text("urn:uuid:" + _key_id);
145 }
146
147 void
148 MXFAsset::write_to_cpl (xmlpp::Element* node, bool interop) const
149 {
150         pair<string, string> const attr = cpl_node_attribute (interop);
151         xmlpp::Element* a = node->add_child (cpl_node_name ());
152         if (!attr.first.empty ()) {
153                 a->set_attribute (attr.first, attr.second);
154         }
155         a->add_child ("Id")->add_child_text ("urn:uuid:" + _uuid);
156         a->add_child ("AnnotationText")->add_child_text (_file_name);
157         a->add_child ("EditRate")->add_child_text (lexical_cast<string> (_edit_rate) + " 1");
158         a->add_child ("IntrinsicDuration")->add_child_text (lexical_cast<string> (_intrinsic_duration));
159         a->add_child ("EntryPoint")->add_child_text (lexical_cast<string> (_entry_point));
160         a->add_child ("Duration")->add_child_text (lexical_cast<string> (_duration));
161         if (_encrypted) {
162                 a->add_child("KeyId")->add_child_text ("urn:uuid:" + _key_id);
163         }
164 }
165
166 void
167 MXFAsset::set_kdm_cipher (KDMCipher cipher)
168 {
169         _decryption_context = new ASDCP::AESDecContext;
170         if (ASDCP_FAILURE (_decryption_context->InitKey (cipher.key_raw ()))) {
171                 throw MiscError ("could not set up decryption context");
172         }
173 }