No-op; fix GPL address and use the explicit-program-name version.
[dcpomatic.git] / src / lib / config.cc
1 /*
2     Copyright (C) 2012-2016 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 #include "config.h"
22 #include "filter.h"
23 #include "ratio.h"
24 #include "types.h"
25 #include "log.h"
26 #include "dcp_content_type.h"
27 #include "cinema_sound_processor.h"
28 #include "colour_conversion.h"
29 #include "cinema.h"
30 #include "util.h"
31 #include "cross.h"
32 #include "raw_convert.h"
33 #include <dcp/colour_matrix.h>
34 #include <dcp/certificate_chain.h>
35 #include <libcxml/cxml.h>
36 #include <glib.h>
37 #include <libxml++/libxml++.h>
38 #include <boost/filesystem.hpp>
39 #include <boost/algorithm/string.hpp>
40 #include <boost/foreach.hpp>
41 #include <boost/thread.hpp>
42 #include <cstdlib>
43 #include <fstream>
44 #include <iostream>
45
46 #include "i18n.h"
47
48 using std::vector;
49 using std::cout;
50 using std::ifstream;
51 using std::string;
52 using std::list;
53 using std::max;
54 using std::remove;
55 using std::exception;
56 using std::cerr;
57 using boost::shared_ptr;
58 using boost::optional;
59 using boost::algorithm::trim;
60
61 Config* Config::_instance = 0;
62
63 /** Construct default configuration */
64 Config::Config ()
65 {
66         set_defaults ();
67 }
68
69 void
70 Config::set_defaults ()
71 {
72         _num_local_encoding_threads = max (2U, boost::thread::hardware_concurrency ());
73         _server_port_base = 6192;
74         _use_any_servers = true;
75         _servers.clear ();
76         _only_servers_encode = false;
77         _tms_protocol = PROTOCOL_SCP;
78         _tms_ip = "";
79         _tms_path = ".";
80         _tms_user = "";
81         _tms_password = "";
82         _cinema_sound_processor = CinemaSoundProcessor::from_id (N_("dolby_cp750"));
83         _allow_any_dcp_frame_rate = false;
84         _language = optional<string> ();
85         _default_still_length = 10;
86         _default_container = Ratio::from_id ("185");
87         _default_dcp_content_type = DCPContentType::from_isdcf_name ("FTR");
88         _default_j2k_bandwidth = 100000000;
89         _default_audio_delay = 0;
90         _default_interop = false;
91         _mail_server = "";
92         _mail_port = 25;
93         _mail_user = "";
94         _mail_password = "";
95         _kdm_from = "";
96         _kdm_cc.clear ();
97         _kdm_bcc = "";
98         _check_for_updates = false;
99         _check_for_test_updates = false;
100         _maximum_j2k_bandwidth = 250000000;
101         _log_types = LogEntry::TYPE_GENERAL | LogEntry::TYPE_WARNING | LogEntry::TYPE_ERROR;
102         _analyse_ebur128 = true;
103         _automatic_audio_analysis = false;
104 #ifdef DCPOMATIC_WINDOWS
105         _win32_console = false;
106 #endif
107         _cinemas_file = path ("cinemas.xml");
108
109         _allowed_dcp_frame_rates.clear ();
110         _allowed_dcp_frame_rates.push_back (24);
111         _allowed_dcp_frame_rates.push_back (25);
112         _allowed_dcp_frame_rates.push_back (30);
113         _allowed_dcp_frame_rates.push_back (48);
114         _allowed_dcp_frame_rates.push_back (50);
115         _allowed_dcp_frame_rates.push_back (60);
116
117         set_kdm_email_to_default ();
118 }
119
120 void
121 Config::restore_defaults ()
122 {
123         Config::instance()->set_defaults ();
124         Config::instance()->changed ();
125 }
126
127 shared_ptr<dcp::CertificateChain>
128 Config::create_certificate_chain ()
129 {
130         return shared_ptr<dcp::CertificateChain> (
131                 new dcp::CertificateChain (
132                         openssl_path(),
133                         "dcpomatic.com",
134                         "dcpomatic.com",
135                         ".dcpomatic.smpte-430-2.ROOT",
136                         ".dcpomatic.smpte-430-2.INTERMEDIATE",
137                         "CS.dcpomatic.smpte-430-2.LEAF"
138                         )
139                 );
140 }
141
142 void
143 Config::read ()
144 {
145         if (!have_existing ("config.xml")) {
146                 cout << "No existing config.xml; creating chains.\n";
147                 /* Make a new set of signing certificates and key */
148                 _signer_chain = create_certificate_chain ();
149                 /* And similar for decryption of KDMs */
150                 _decryption_chain = create_certificate_chain ();
151                 cout << "Writing config.\n";
152                 write ();
153                 return;
154         }
155
156         cxml::Document f ("Config");
157         f.read_file (path ("config.xml"));
158         optional<string> c;
159
160         optional<int> version = f.optional_number_child<int> ("Version");
161
162         _num_local_encoding_threads = f.number_child<int> ("NumLocalEncodingThreads");
163         _default_directory = f.string_child ("DefaultDirectory");
164
165         boost::optional<int> b = f.optional_number_child<int> ("ServerPort");
166         if (!b) {
167                 b = f.optional_number_child<int> ("ServerPortBase");
168         }
169         _server_port_base = b.get ();
170
171         boost::optional<bool> u = f.optional_bool_child ("UseAnyServers");
172         _use_any_servers = u.get_value_or (true);
173
174         list<cxml::NodePtr> servers = f.node_children ("Server");
175         for (list<cxml::NodePtr>::iterator i = servers.begin(); i != servers.end(); ++i) {
176                 if ((*i)->node_children("HostName").size() == 1) {
177                         _servers.push_back ((*i)->string_child ("HostName"));
178                 } else {
179                         _servers.push_back ((*i)->content ());
180                 }
181         }
182
183         _only_servers_encode = f.optional_bool_child ("OnlyServersEncode").get_value_or (false);
184         _tms_protocol = static_cast<Protocol> (f.optional_number_child<int> ("TMSProtocol").get_value_or (static_cast<int> (PROTOCOL_SCP)));
185         _tms_ip = f.string_child ("TMSIP");
186         _tms_path = f.string_child ("TMSPath");
187         _tms_user = f.string_child ("TMSUser");
188         _tms_password = f.string_child ("TMSPassword");
189
190         c = f.optional_string_child ("SoundProcessor");
191         if (c) {
192                 _cinema_sound_processor = CinemaSoundProcessor::from_id (c.get ());
193         }
194         c = f.optional_string_child ("CinemaSoundProcessor");
195         if (c) {
196                 _cinema_sound_processor = CinemaSoundProcessor::from_id (c.get ());
197         }
198
199         _language = f.optional_string_child ("Language");
200
201         c = f.optional_string_child ("DefaultContainer");
202         if (c) {
203                 _default_container = Ratio::from_id (c.get ());
204         }
205
206         c = f.optional_string_child ("DefaultDCPContentType");
207         if (c) {
208                 _default_dcp_content_type = DCPContentType::from_isdcf_name (c.get ());
209         }
210
211         if (f.optional_string_child ("DCPMetadataIssuer")) {
212                 _dcp_issuer = f.string_child ("DCPMetadataIssuer");
213         } else if (f.optional_string_child ("DCPIssuer")) {
214                 _dcp_issuer = f.string_child ("DCPIssuer");
215         }
216
217         _dcp_creator = f.optional_string_child ("DCPCreator").get_value_or ("");
218
219         if (version && version.get() >= 2) {
220                 _default_isdcf_metadata = ISDCFMetadata (f.node_child ("ISDCFMetadata"));
221         } else {
222                 _default_isdcf_metadata = ISDCFMetadata (f.node_child ("DCIMetadata"));
223         }
224
225         _default_still_length = f.optional_number_child<int>("DefaultStillLength").get_value_or (10);
226         _default_j2k_bandwidth = f.optional_number_child<int>("DefaultJ2KBandwidth").get_value_or (200000000);
227         _default_audio_delay = f.optional_number_child<int>("DefaultAudioDelay").get_value_or (0);
228         _default_interop = f.optional_bool_child("DefaultInterop").get_value_or (false);
229
230         /* Load any cinemas from config.xml */
231         read_cinemas (f);
232
233         _mail_server = f.string_child ("MailServer");
234         _mail_port = f.optional_number_child<int> ("MailPort").get_value_or (25);
235         _mail_user = f.optional_string_child("MailUser").get_value_or ("");
236         _mail_password = f.optional_string_child("MailPassword").get_value_or ("");
237         _kdm_subject = f.optional_string_child ("KDMSubject").get_value_or (_("KDM delivery: $CPL_NAME"));
238         _kdm_from = f.string_child ("KDMFrom");
239         BOOST_FOREACH (cxml::ConstNodePtr i, f.node_children("KDMCC")) {
240                 if (!i->content().empty()) {
241                         _kdm_cc.push_back (i->content ());
242                 }
243         }
244         _kdm_bcc = f.optional_string_child ("KDMBCC").get_value_or ("");
245         _kdm_email = f.string_child ("KDMEmail");
246
247         _check_for_updates = f.optional_bool_child("CheckForUpdates").get_value_or (false);
248         _check_for_test_updates = f.optional_bool_child("CheckForTestUpdates").get_value_or (false);
249
250         _maximum_j2k_bandwidth = f.optional_number_child<int> ("MaximumJ2KBandwidth").get_value_or (250000000);
251         _allow_any_dcp_frame_rate = f.optional_bool_child ("AllowAnyDCPFrameRate").get_value_or (false);
252
253         _log_types = f.optional_number_child<int> ("LogTypes").get_value_or (LogEntry::TYPE_GENERAL | LogEntry::TYPE_WARNING | LogEntry::TYPE_ERROR);
254         _analyse_ebur128 = f.optional_bool_child("AnalyseEBUR128").get_value_or (true);
255         _automatic_audio_analysis = f.optional_bool_child ("AutomaticAudioAnalysis").get_value_or (false);
256 #ifdef DCPOMATIC_WINDOWS
257         _win32_console = f.optional_bool_child ("Win32Console").get_value_or (false);
258 #endif
259
260         list<cxml::NodePtr> his = f.node_children ("History");
261         for (list<cxml::NodePtr>::const_iterator i = his.begin(); i != his.end(); ++i) {
262                 _history.push_back ((*i)->content ());
263         }
264
265         cxml::NodePtr signer = f.optional_node_child ("Signer");
266         if (signer) {
267                 shared_ptr<dcp::CertificateChain> c (new dcp::CertificateChain ());
268                 /* Read the signing certificates and private key in from the config file */
269                 BOOST_FOREACH (cxml::NodePtr i, signer->node_children ("Certificate")) {
270                         c->add (dcp::Certificate (i->content ()));
271                 }
272                 c->set_key (signer->string_child ("PrivateKey"));
273                 _signer_chain = c;
274         } else {
275                 /* Make a new set of signing certificates and key */
276                 _signer_chain = create_certificate_chain ();
277         }
278
279         cxml::NodePtr decryption = f.optional_node_child ("Decryption");
280         if (decryption) {
281                 shared_ptr<dcp::CertificateChain> c (new dcp::CertificateChain ());
282                 BOOST_FOREACH (cxml::NodePtr i, decryption->node_children ("Certificate")) {
283                         c->add (dcp::Certificate (i->content ()));
284                 }
285                 c->set_key (decryption->string_child ("PrivateKey"));
286                 _decryption_chain = c;
287         } else {
288                 _decryption_chain = create_certificate_chain ();
289         }
290
291         list<cxml::NodePtr> dkdm = f.node_children ("DKDM");
292         BOOST_FOREACH (cxml::NodePtr i, f.node_children ("DKDM")) {
293                 _dkdms.push_back (dcp::EncryptedKDM (i->content ()));
294         }
295
296         _cinemas_file = f.optional_string_child("CinemasFile").get_value_or (path ("cinemas.xml").string ());
297
298         /* Replace any cinemas from config.xml with those from the configured file */
299         if (boost::filesystem::exists (_cinemas_file)) {
300                 cxml::Document f ("Cinemas");
301                 f.read_file (_cinemas_file);
302                 read_cinemas (f);
303         }
304 }
305
306 /** @return Filename to write configuration to */
307 boost::filesystem::path
308 Config::path (string file, bool create_directories)
309 {
310         boost::filesystem::path p;
311 #ifdef DCPOMATIC_OSX
312         p /= g_get_home_dir ();
313         p /= "Library";
314         p /= "Preferences";
315         p /= "com.dcpomatic";
316         p /= "2";
317 #else
318         p /= g_get_user_config_dir ();
319         p /= "dcpomatic2";
320 #endif
321         boost::system::error_code ec;
322         if (create_directories) {
323                 boost::filesystem::create_directories (p, ec);
324         }
325         p /= file;
326         return p;
327 }
328
329 /** @return Singleton instance */
330 Config *
331 Config::instance ()
332 {
333         if (_instance == 0) {
334                 _instance = new Config;
335                 try {
336                         _instance->read ();
337                 } catch (exception& e) {
338                         /* configuration load failed; never mind, just
339                            stick with the default.
340                         */
341                         cerr << "dcpomatic: warning: configuration did not load (" << e.what() << "); using defaults\n";
342                 } catch (...) {
343                         cerr << "dcpomatic: warning: configuration did not load; using defaults\n";
344                 }
345         }
346
347         return _instance;
348 }
349
350 /** Write our configuration to disk */
351 void
352 Config::write () const
353 {
354         write_config_xml ();
355         write_cinemas_xml ();
356 }
357
358 void
359 Config::write_config_xml () const
360 {
361         xmlpp::Document doc;
362         xmlpp::Element* root = doc.create_root_node ("Config");
363
364         root->add_child("Version")->add_child_text ("2");
365         root->add_child("NumLocalEncodingThreads")->add_child_text (raw_convert<string> (_num_local_encoding_threads));
366         root->add_child("DefaultDirectory")->add_child_text (_default_directory.string ());
367         root->add_child("ServerPortBase")->add_child_text (raw_convert<string> (_server_port_base));
368         root->add_child("UseAnyServers")->add_child_text (_use_any_servers ? "1" : "0");
369
370         for (vector<string>::const_iterator i = _servers.begin(); i != _servers.end(); ++i) {
371                 root->add_child("Server")->add_child_text (*i);
372         }
373
374         root->add_child("OnlyServersEncode")->add_child_text (_only_servers_encode ? "1" : "0");
375         root->add_child("TMSProtocol")->add_child_text (raw_convert<string> (_tms_protocol));
376         root->add_child("TMSIP")->add_child_text (_tms_ip);
377         root->add_child("TMSPath")->add_child_text (_tms_path);
378         root->add_child("TMSUser")->add_child_text (_tms_user);
379         root->add_child("TMSPassword")->add_child_text (_tms_password);
380         if (_cinema_sound_processor) {
381                 root->add_child("CinemaSoundProcessor")->add_child_text (_cinema_sound_processor->id ());
382         }
383         if (_language) {
384                 root->add_child("Language")->add_child_text (_language.get());
385         }
386         if (_default_container) {
387                 root->add_child("DefaultContainer")->add_child_text (_default_container->id ());
388         }
389         if (_default_dcp_content_type) {
390                 root->add_child("DefaultDCPContentType")->add_child_text (_default_dcp_content_type->isdcf_name ());
391         }
392         root->add_child("DCPIssuer")->add_child_text (_dcp_issuer);
393         root->add_child("DCPCreator")->add_child_text (_dcp_creator);
394
395         _default_isdcf_metadata.as_xml (root->add_child ("ISDCFMetadata"));
396
397         root->add_child("DefaultStillLength")->add_child_text (raw_convert<string> (_default_still_length));
398         root->add_child("DefaultJ2KBandwidth")->add_child_text (raw_convert<string> (_default_j2k_bandwidth));
399         root->add_child("DefaultAudioDelay")->add_child_text (raw_convert<string> (_default_audio_delay));
400         root->add_child("DefaultInterop")->add_child_text (_default_interop ? "1" : "0");
401         root->add_child("MailServer")->add_child_text (_mail_server);
402         root->add_child("MailPort")->add_child_text (raw_convert<string> (_mail_port));
403         root->add_child("MailUser")->add_child_text (_mail_user);
404         root->add_child("MailPassword")->add_child_text (_mail_password);
405         root->add_child("KDMSubject")->add_child_text (_kdm_subject);
406         root->add_child("KDMFrom")->add_child_text (_kdm_from);
407         BOOST_FOREACH (string i, _kdm_cc) {
408                 root->add_child("KDMCC")->add_child_text (i);
409         }
410         root->add_child("KDMBCC")->add_child_text (_kdm_bcc);
411         root->add_child("KDMEmail")->add_child_text (_kdm_email);
412
413         root->add_child("CheckForUpdates")->add_child_text (_check_for_updates ? "1" : "0");
414         root->add_child("CheckForTestUpdates")->add_child_text (_check_for_test_updates ? "1" : "0");
415
416         root->add_child("MaximumJ2KBandwidth")->add_child_text (raw_convert<string> (_maximum_j2k_bandwidth));
417         root->add_child("AllowAnyDCPFrameRate")->add_child_text (_allow_any_dcp_frame_rate ? "1" : "0");
418         root->add_child("LogTypes")->add_child_text (raw_convert<string> (_log_types));
419         root->add_child("AnalyseEBUR128")->add_child_text (_analyse_ebur128 ? "1" : "0");
420         root->add_child("AutomaticAudioAnalysis")->add_child_text (_automatic_audio_analysis ? "1" : "0");
421 #ifdef DCPOMATIC_WINDOWS
422         root->add_child("Win32Console")->add_child_text (_win32_console ? "1" : "0");
423 #endif
424
425         xmlpp::Element* signer = root->add_child ("Signer");
426         DCPOMATIC_ASSERT (_signer_chain);
427         BOOST_FOREACH (dcp::Certificate const & i, _signer_chain->root_to_leaf ()) {
428                 signer->add_child("Certificate")->add_child_text (i.certificate (true));
429         }
430         signer->add_child("PrivateKey")->add_child_text (_signer_chain->key().get ());
431
432         xmlpp::Element* decryption = root->add_child ("Decryption");
433         DCPOMATIC_ASSERT (_decryption_chain);
434         BOOST_FOREACH (dcp::Certificate const & i, _decryption_chain->root_to_leaf ()) {
435                 decryption->add_child("Certificate")->add_child_text (i.certificate (true));
436         }
437         decryption->add_child("PrivateKey")->add_child_text (_decryption_chain->key().get ());
438
439         for (vector<boost::filesystem::path>::const_iterator i = _history.begin(); i != _history.end(); ++i) {
440                 root->add_child("History")->add_child_text (i->string ());
441         }
442
443         BOOST_FOREACH (dcp::EncryptedKDM i, _dkdms) {
444                 root->add_child("DKDM")->add_child_text (i.as_xml ());
445         }
446
447         root->add_child("CinemasFile")->add_child_text (_cinemas_file.string());
448
449         try {
450                 doc.write_to_file_formatted (path("config.xml").string ());
451         } catch (xmlpp::exception& e) {
452                 string s = e.what ();
453                 trim (s);
454                 throw FileError (s, path("config.xml"));
455         }
456 }
457
458 void
459 Config::write_cinemas_xml () const
460 {
461         xmlpp::Document doc;
462         xmlpp::Element* root = doc.create_root_node ("Cinemas");
463         root->add_child("Version")->add_child_text ("1");
464
465         for (list<shared_ptr<Cinema> >::const_iterator i = _cinemas.begin(); i != _cinemas.end(); ++i) {
466                 (*i)->as_xml (root->add_child ("Cinema"));
467         }
468
469         try {
470                 doc.write_to_file_formatted (_cinemas_file.string ());
471         } catch (xmlpp::exception& e) {
472                 string s = e.what ();
473                 trim (s);
474                 throw FileError (s, _cinemas_file);
475         }
476 }
477
478 boost::filesystem::path
479 Config::default_directory_or (boost::filesystem::path a) const
480 {
481         if (_default_directory.empty()) {
482                 return a;
483         }
484
485         boost::system::error_code ec;
486         bool const e = boost::filesystem::exists (_default_directory, ec);
487         if (ec || !e) {
488                 return a;
489         }
490
491         return _default_directory;
492 }
493
494 void
495 Config::drop ()
496 {
497         delete _instance;
498         _instance = 0;
499 }
500
501 void
502 Config::changed (Property what)
503 {
504         cout << what << " changed in config.\n";
505         Changed (what);
506 }
507
508 void
509 Config::set_kdm_email_to_default ()
510 {
511         _kdm_subject = _("KDM delivery: $CPL_NAME");
512
513         _kdm_email = _(
514                 "Dear Projectionist\n\n"
515                 "Please find attached KDMs for $CPL_NAME.\n\n"
516                 "Cinema: $CINEMA_NAME\n"
517                 "Screen(s): $SCREENS\n\n"
518                 "The KDMs are valid from $START_TIME until $END_TIME.\n\n"
519                 "Best regards,\nDCP-o-matic"
520                 );
521 }
522
523 void
524 Config::reset_kdm_email ()
525 {
526         set_kdm_email_to_default ();
527         changed ();
528 }
529
530 void
531 Config::add_to_history (boost::filesystem::path p)
532 {
533         /* Remove existing instances of this path in the history */
534         _history.erase (remove (_history.begin(), _history.end(), p), _history.end ());
535
536         _history.insert (_history.begin (), p);
537         if (_history.size() > HISTORY_SIZE) {
538                 _history.pop_back ();
539         }
540
541         changed ();
542 }
543
544 bool
545 Config::have_existing (string file)
546 {
547         return boost::filesystem::exists (path (file, false));
548 }
549
550 void
551 Config::read_cinemas (cxml::Document const & f)
552 {
553         _cinemas.clear ();
554         list<cxml::NodePtr> cin = f.node_children ("Cinema");
555         for (list<cxml::NodePtr>::iterator i = cin.begin(); i != cin.end(); ++i) {
556                 /* Slightly grotty two-part construction of Cinema here so that we can use
557                    shared_from_this.
558                 */
559                 shared_ptr<Cinema> cinema (new Cinema (*i));
560                 cinema->read_screens (*i);
561                 _cinemas.push_back (cinema);
562         }
563 }
564
565 void
566 Config::set_cinemas_file (boost::filesystem::path file)
567 {
568         _cinemas_file = file;
569
570         if (boost::filesystem::exists (_cinemas_file)) {
571                 /* Existing file; read it in */
572                 cxml::Document f ("Cinemas");
573                 f.read_file (_cinemas_file);
574                 read_cinemas (f);
575         }
576
577         changed (OTHER);
578 }