swaroop: allow ScreenKDM subclasses for different KDM types.
[dcpomatic.git] / src / lib / encrypted_ecinema_kdm.cc
1 /*
2     Copyright (C) 2019 Carl Hetherington <cth@carlh.net>
3
4     This file is part of DCP-o-matic.
5
6     DCP-o-matic 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     DCP-o-matic 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 DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21 #ifdef DCPOMATIC_VARIANT_SWAROOP
22
23 #include "encrypted_ecinema_kdm.h"
24 #include "exceptions.h"
25 #include "cross.h"
26 #include <dcp/key.h>
27 #include <dcp/certificate.h>
28 #include <dcp/util.h>
29 #include <libcxml/cxml.h>
30 #include <libxml++/libxml++.h>
31 #include <openssl/rsa.h>
32 #include <openssl/err.h>
33 #include <iostream>
34
35 using std::cout;
36 using std::string;
37 using boost::shared_ptr;
38 using dcp::Certificate;
39
40 EncryptedECinemaKDM::EncryptedECinemaKDM (string id, string name, dcp::Key content_key, Certificate recipient)
41         : _id (id)
42         , _name (name)
43 {
44         RSA* rsa = recipient.public_key ();
45         _content_key = dcp::Data (RSA_size(rsa));
46         int const N = RSA_public_encrypt (content_key.length(), content_key.value(), _content_key.data().get(), rsa, RSA_PKCS1_OAEP_PADDING);
47         if (N == -1) {
48                 throw KDMError ("Could not encrypt ECinema KDM", ERR_error_string(ERR_get_error(), 0));
49         }
50
51 }
52
53 EncryptedECinemaKDM::EncryptedECinemaKDM (string xml)
54 {
55         cxml::Document doc ("ECinemaSecurityMessage");
56         doc.read_string (xml);
57         _id = doc.string_child ("Id");
58         _name = doc.string_child ("Name");
59         _content_key = dcp::Data (256);
60         int const len = dcp::base64_decode (doc.string_child("Key"), _content_key.data().get(), _content_key.size());
61         _content_key.set_size (len);
62 }
63
64 string
65 EncryptedECinemaKDM::as_xml () const
66 {
67         string key;
68
69         /* Lazy overallocation */
70         char out[_content_key.size() * 2];
71         Kumu::base64encode (_content_key.data().get(), _content_key.size(), out, _content_key.size() * 2);
72         int const N = strlen (out);
73         string lines;
74         for (int i = 0; i < N; ++i) {
75                 if (i > 0 && (i % 64) == 0) {
76                         lines += "\n";
77                 }
78                 lines += out[i];
79         }
80
81         xmlpp::Document document;
82         xmlpp::Element* root = document.create_root_node ("ECinemaSecurityMessage");
83         root->add_child("Id")->add_child_text(_id);
84         root->add_child("Name")->add_child_text(_name);
85         root->add_child("Key")->add_child_text(lines);
86         return document.write_to_string ("UTF-8");
87 }
88
89 void
90 EncryptedECinemaKDM::as_xml (boost::filesystem::path path) const
91 {
92         FILE* f = fopen_boost (path, "w");
93         string const x = as_xml ();
94         fwrite (x.c_str(), 1, x.length(), f);
95         fclose (f);
96 }
97
98 #endif