Various work.
[libdcp.git] / src / mxf.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 <boost/filesystem.hpp>
26 #include <boost/lexical_cast.hpp>
27 #include <libxml++/nodes/element.h>
28 #include "AS_DCP.h"
29 #include "KM_prng.h"
30 #include "KM_util.h"
31 #include "mxf.h"
32 #include "util.h"
33 #include "metadata.h"
34 #include "exceptions.h"
35 #include "kdm.h"
36
37 using std::string;
38 using std::list;
39 using std::pair;
40 using boost::shared_ptr;
41 using boost::lexical_cast;
42 using boost::dynamic_pointer_cast;
43 using namespace dcp;
44
45 MXF::MXF (boost::filesystem::path file)
46         : Content (file)
47         , _progress (0)
48         , _encryption_context (0)
49         , _decryption_context (0)
50         , _interop (false)
51 {
52
53 }
54
55 MXF::~MXF ()
56 {
57         delete _encryption_context;
58         delete _decryption_context;
59 }
60
61 void
62 MXF::fill_writer_info (ASDCP::WriterInfo* writer_info)
63 {
64         writer_info->ProductVersion = _metadata.product_version;
65         writer_info->CompanyName = _metadata.company_name;
66         writer_info->ProductName = _metadata.product_name.c_str();
67
68         if (_interop) {
69                 writer_info->LabelSetType = ASDCP::LS_MXF_INTEROP;
70         } else {
71                 writer_info->LabelSetType = ASDCP::LS_MXF_SMPTE;
72         }
73         unsigned int c;
74         Kumu::hex2bin (_id.c_str(), writer_info->AssetUUID, Kumu::UUID_Length, &c);
75         assert (c == Kumu::UUID_Length);
76
77         if (_key) {
78                 Kumu::GenRandomUUID (writer_info->ContextID);
79                 writer_info->EncryptedEssence = true;
80
81                 unsigned int c;
82                 Kumu::hex2bin (_key_id.c_str(), writer_info->CryptographicKeyID, Kumu::UUID_Length, &c);
83                 assert (c == Kumu::UUID_Length);
84         }
85 }
86
87 bool
88 MXF::equals (shared_ptr<const Content> other, EqualityOptions opt, boost::function<void (NoteType, string)> note) const
89 {
90         if (!Content::equals (other, opt, note)) {
91                 return false;
92         }
93         
94         shared_ptr<const MXF> other_mxf = dynamic_pointer_cast<const MXF> (other);
95         if (!other_mxf) {
96                 note (ERROR, "comparing an MXF asset with a non-MXF asset");
97                 return false;
98         }
99         
100         if (_file != other_mxf->file ()) {
101                 note (ERROR, "MXF names differ");
102                 if (!opt.mxf_names_can_differ) {
103                         return false;
104                 }
105         }
106         
107         return true;
108 }
109
110 void
111 MXF::write_to_cpl (xmlpp::Element* node) const
112 {
113         pair<string, string> const attr = cpl_node_attribute ();
114         xmlpp::Element* a = node->add_child (cpl_node_name ());
115         if (!attr.first.empty ()) {
116                 a->set_attribute (attr.first, attr.second);
117         }
118         a->add_child ("Id")->add_child_text ("urn:uuid:" + _id);
119         a->add_child ("AnnotationText")->add_child_text (_file.string ());
120         a->add_child ("EditRate")->add_child_text (lexical_cast<string> (_edit_rate) + " 1");
121         a->add_child ("IntrinsicDuration")->add_child_text (lexical_cast<string> (_intrinsic_duration));
122         a->add_child ("EntryPoint")->add_child_text (lexical_cast<string> (_entry_point));
123         a->add_child ("Duration")->add_child_text (lexical_cast<string> (_duration));
124         if (!_key_id.empty ()) {
125                 a->add_child("KeyId")->add_child_text ("urn:uuid:" + _key_id);
126         }
127 }
128
129 void
130 MXF::set_key (Key key)
131 {
132         _key = key;
133
134         if (_key_id.empty ()) {
135                 /* No key ID so far; we now need one */
136                 _key_id = make_uuid ();
137         }
138         
139         _decryption_context = new ASDCP::AESDecContext;
140         if (ASDCP_FAILURE (_decryption_context->InitKey (_key->value ()))) {
141                 throw MiscError ("could not set up decryption context");
142         }
143
144         _encryption_context = new ASDCP::AESEncContext;
145         if (ASDCP_FAILURE (_encryption_context->InitKey (_key->value ()))) {
146                 throw MiscError ("could not set up encryption context");
147         }
148         
149         uint8_t cbc_buffer[ASDCP::CBC_BLOCK_SIZE];
150         
151         Kumu::FortunaRNG rng;
152         if (ASDCP_FAILURE (_encryption_context->SetIVec (rng.FillRandom (cbc_buffer, ASDCP::CBC_BLOCK_SIZE)))) {
153                 throw MiscError ("could not set up CBC initialization vector");
154         }
155 }