Missing Destroy() call.
[dcpomatic.git] / src / wx / kdm_output_panel.cc
1 /*
2     Copyright (C) 2015-2018 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
22 #include "kdm_output_panel.h"
23 #include "kdm_timing_panel.h"
24 #include "confirm_kdm_email_dialog.h"
25 #include "wx_util.h"
26 #include "kdm_advanced_dialog.h"
27 #include "name_format_editor.h"
28 #include "check_box.h"
29 #include "dcpomatic_button.h"
30 #include "lib/config.h"
31 #include "lib/cinema.h"
32 #include "lib/send_kdm_email_job.h"
33 #include "lib/warnings.h"
34 #include <dcp/exceptions.h>
35 #include <dcp/types.h>
36 #ifdef DCPOMATIC_USE_OWN_PICKER
37 #include "dir_picker_ctrl.h"
38 #else
39 DCPOMATIC_DISABLE_WARNINGS
40 #include <wx/filepicker.h>
41 DCPOMATIC_ENABLE_WARNINGS
42 #endif
43 DCPOMATIC_DISABLE_WARNINGS
44 #include <wx/stdpaths.h>
45 DCPOMATIC_ENABLE_WARNINGS
46
47
48 using std::exception;
49 using std::function;
50 using std::list;
51 using std::make_pair;
52 using std::make_shared;
53 using std::pair;
54 using std::shared_ptr;
55 using std::string;
56 #if BOOST_VERSION >= 106100
57 using namespace boost::placeholders;
58 #endif
59
60
61 KDMOutputPanel::KDMOutputPanel (wxWindow* parent)
62         : wxPanel (parent, wxID_ANY)
63         , _forensic_mark_video (true)
64         , _forensic_mark_audio (true)
65         , _forensic_mark_audio_up_to (12)
66 {
67         auto table = new wxFlexGridSizer (2, DCPOMATIC_SIZER_X_GAP, 0);
68         table->AddGrowableCol (1);
69
70         add_label_to_sizer (table, this, _("KDM type"), true, 0, wxLEFT | wxRIGHT | wxALIGN_CENTRE_VERTICAL);
71
72         auto type = new wxBoxSizer (wxHORIZONTAL);
73         _type = new wxChoice (this, wxID_ANY);
74         _type->Append ("Modified Transitional 1", ((void *) dcp::Formulation::MODIFIED_TRANSITIONAL_1));
75         _type->Append ("DCI Any", ((void *) dcp::Formulation::DCI_ANY));
76         _type->Append ("DCI Specific", ((void *) dcp::Formulation::DCI_SPECIFIC));
77         _type->Append ("Multiple Modified Transitional 1", ((void *) dcp::Formulation::MULTIPLE_MODIFIED_TRANSITIONAL_1));
78         _type->Append ("Modified Transitional 1 (without AuthorizedDeviceInfo)", ((void *) dcp::Formulation::MODIFIED_TRANSITIONAL_TEST));
79         type->Add (_type, 1, wxTOP, DCPOMATIC_CHOICE_TOP_PAD);
80         _type->SetSelection (0);
81         auto advanced = new Button (this, _("Advanced..."));
82         type->Add (advanced, 0, wxLEFT | wxALIGN_CENTER_VERTICAL, DCPOMATIC_SIZER_X_GAP);
83         table->Add (type, 1, wxTOP, DCPOMATIC_CHOICE_TOP_PAD);
84
85         add_label_to_sizer (table, this, _("Folder / ZIP name format"), true, 0, wxALIGN_CENTER_VERTICAL | wxLEFT | wxRIGHT);
86         _container_name_format = new NameFormatEditor (this, Config::instance()->kdm_container_name_format(), dcp::NameFormat::Map(), dcp::NameFormat::Map(), "");
87         table->Add (_container_name_format->panel(), 1, wxEXPAND);
88
89         auto format = create_label (this, _("Filename format"), true);
90         auto align = new wxBoxSizer (wxHORIZONTAL);
91 #ifdef DCPOMATIC_OSX
92         align->Add (format, 0, wxTOP, 2);
93         table->Add (align, 0, wxALIGN_RIGHT | wxRIGHT, DCPOMATIC_SIZER_GAP - 2);
94 #else
95         align->Add (format, 0, wxLEFT, DCPOMATIC_SIZER_GAP - 2);
96         table->Add (align, 0, wxTOP | wxRIGHT | wxALIGN_TOP, DCPOMATIC_SIZER_GAP);
97 #endif
98         dcp::NameFormat::Map titles;
99         titles['f'] = wx_to_std (_("film name"));
100         titles['c'] = wx_to_std (_("cinema"));
101         titles['s'] = wx_to_std (_("screen"));
102         titles['b'] = wx_to_std (_("from date/time"));
103         titles['e'] = wx_to_std (_("to date/time"));
104         dcp::NameFormat::Map ex;
105         ex['f'] = "Bambi";
106         ex['c'] = "Lumière";
107         ex['s'] = "Screen 1";
108         ex['b'] = "2012/03/15 12:30";
109         ex['e'] = "2012/03/22 02:30";
110         _filename_format = new NameFormatEditor (this, Config::instance()->kdm_filename_format(), titles, ex, ".xml");
111         table->Add (_filename_format->panel(), 1, wxEXPAND);
112
113         _write_to = new CheckBox (this, _("Write to"));
114         table->Add (_write_to, 1, wxEXPAND);
115
116 #ifdef DCPOMATIC_USE_OWN_PICKER
117         _folder = new DirPickerCtrl (this);
118 #else
119         _folder = new wxDirPickerCtrl (this, wxID_ANY, wxEmptyString, wxDirSelectorPromptStr, wxDefaultPosition, wxSize (300, -1));
120 #endif
121
122         auto path = Config::instance()->default_kdm_directory();
123         if (path) {
124                 _folder->SetPath (std_to_wx (path->string ()));
125         } else {
126                 _folder->SetPath (wxStandardPaths::Get().GetDocumentsDir());
127         }
128
129         table->Add (_folder, 1, wxEXPAND);
130
131         auto write_options = new wxBoxSizer(wxVERTICAL);
132         _write_flat = new wxRadioButton (this, wxID_ANY, _("Write all KDMs to the same folder"), wxDefaultPosition, wxDefaultSize, wxRB_GROUP);
133         write_options->Add (_write_flat, 1, wxTOP | wxBOTTOM, DCPOMATIC_BUTTON_STACK_GAP);
134         _write_folder = new wxRadioButton (this, wxID_ANY, _("Write a folder for each cinema's KDMs"));
135         write_options->Add (_write_folder, 1, wxTOP | wxBOTTOM, DCPOMATIC_BUTTON_STACK_GAP);
136         _write_zip = new wxRadioButton (this, wxID_ANY, _("Write a ZIP file for each cinema's KDMs"));
137         write_options->Add (_write_zip, 1, wxTOP | wxBOTTOM, DCPOMATIC_BUTTON_STACK_GAP);
138         table->AddSpacer (0);
139         table->Add (write_options);
140
141         _email = new CheckBox (this, _("Send by email"));
142         table->Add (_email, 1, wxEXPAND);
143         table->AddSpacer (0);
144
145         switch (Config::instance()->last_kdm_write_type().get_value_or(Config::KDM_WRITE_FLAT)) {
146         case Config::KDM_WRITE_FLAT:
147                 _write_flat->SetValue (true);
148                 break;
149         case Config::KDM_WRITE_FOLDER:
150                 _write_folder->SetValue (true);
151                 break;
152         case Config::KDM_WRITE_ZIP:
153                 _write_zip->SetValue (true);
154                 break;
155         }
156
157         _write_to->SetValue (true);
158
159         _write_to->Bind     (wxEVT_CHECKBOX, boost::bind (&KDMOutputPanel::setup_sensitivity, this));
160         _email->Bind        (wxEVT_CHECKBOX, boost::bind (&KDMOutputPanel::setup_sensitivity, this));
161         _write_flat->Bind   (wxEVT_RADIOBUTTON, boost::bind (&KDMOutputPanel::kdm_write_type_changed, this));
162         _write_folder->Bind (wxEVT_RADIOBUTTON, boost::bind (&KDMOutputPanel::kdm_write_type_changed, this));
163         _write_zip->Bind    (wxEVT_RADIOBUTTON, boost::bind (&KDMOutputPanel::kdm_write_type_changed, this));
164         advanced->Bind      (wxEVT_BUTTON, boost::bind (&KDMOutputPanel::advanced_clicked, this));
165
166         SetSizer (table);
167 }
168
169 void
170 KDMOutputPanel::setup_sensitivity ()
171 {
172         bool const write = _write_to->GetValue ();
173         _folder->Enable (write);
174         _write_flat->Enable (write);
175         _write_folder->Enable (write);
176         _write_zip->Enable (write);
177 }
178
179 void
180 KDMOutputPanel::advanced_clicked ()
181 {
182         auto d = new KDMAdvancedDialog (this, _forensic_mark_video, _forensic_mark_audio, _forensic_mark_audio_up_to);
183         d->ShowModal ();
184         _forensic_mark_video = d->forensic_mark_video ();
185         _forensic_mark_audio = d->forensic_mark_audio ();
186         _forensic_mark_audio_up_to = d->forensic_mark_audio_up_to ();
187         d->Destroy ();
188 }
189
190 void
191 KDMOutputPanel::kdm_write_type_changed ()
192 {
193         if (_write_flat->GetValue()) {
194                 Config::instance()->set_last_kdm_write_type (Config::KDM_WRITE_FLAT);
195         } else if (_write_folder->GetValue()) {
196                 Config::instance()->set_last_kdm_write_type (Config::KDM_WRITE_FOLDER);
197         } else if (_write_zip->GetValue()) {
198                 Config::instance()->set_last_kdm_write_type (Config::KDM_WRITE_ZIP);
199         }
200 }
201
202 pair<shared_ptr<Job>, int>
203 KDMOutputPanel::make (
204         list<KDMWithMetadataPtr> kdms, string name, function<bool (boost::filesystem::path)> confirm_overwrite
205         )
206 {
207         auto const cinema_kdms = collect (kdms);
208
209         /* Decide whether to proceed */
210
211         bool proceed = true;
212
213         if (_email->GetValue ()) {
214
215                 if (Config::instance()->mail_server().empty ()) {
216                         proceed = false;
217                         error_dialog (this, _("You must set up a mail server in Preferences before you can send emails."));
218                 }
219
220                 bool cinemas_with_no_email = false;
221                 for (auto i: cinema_kdms) {
222                         if (i.front()->emails().empty()) {
223                                 cinemas_with_no_email = true;
224                         }
225                 }
226
227                 if (proceed && cinemas_with_no_email && !confirm_dialog (
228                             this,
229                             _("You have selected some cinemas that have no configured email address.  Do you want to continue?")
230                             )) {
231                         proceed = false;
232                 }
233
234                 if (proceed && Config::instance()->confirm_kdm_email ()) {
235                         list<string> emails;
236                         for (auto const& i: cinema_kdms) {
237                                 for (auto j: i.front()->emails()) {
238                                         emails.push_back (j);
239                                 }
240                         }
241
242                         if (!emails.empty ()) {
243                                 auto d = new ConfirmKDMEmailDialog (this, emails);
244                                 if (d->ShowModal() == wxID_CANCEL) {
245                                         proceed = false;
246                                 }
247                                 d->Destroy ();
248                         }
249                 }
250         }
251
252         if (!proceed) {
253                 return make_pair (shared_ptr<Job>(), 0);
254         }
255
256         Config::instance()->set_kdm_filename_format (_filename_format->get ());
257
258         int written = 0;
259         shared_ptr<Job> job;
260
261         try {
262
263                 if (_write_to->GetValue()) {
264                         if (_write_flat->GetValue()) {
265                                 written = write_files (
266                                         kdms,
267                                         directory(),
268                                         _filename_format->get(),
269                                         confirm_overwrite
270                                         );
271                         } else if (_write_folder->GetValue()) {
272                                 written = write_directories (
273                                         collect (kdms),
274                                         directory(),
275                                         _container_name_format->get(),
276                                         _filename_format->get(),
277                                         confirm_overwrite
278                                         );
279                         } else if (_write_zip->GetValue()) {
280                                 written = write_zip_files (
281                                         collect (kdms),
282                                         directory(),
283                                         _container_name_format->get(),
284                                         _filename_format->get(),
285                                         confirm_overwrite
286                                         );
287                         }
288                 }
289
290                 if (_email->GetValue ()) {
291                         job = make_shared<SendKDMEmailJob>(
292                                 cinema_kdms,
293                                 _container_name_format->get(),
294                                 _filename_format->get(),
295                                 name
296                                 );
297                 }
298
299         } catch (dcp::NotEncryptedError& e) {
300                 error_dialog (this, _("CPL's content is not encrypted."));
301         } catch (exception& e) {
302                 error_dialog (this, std_to_wx(e.what()));
303         } catch (...) {
304                 error_dialog (this, _("An unknown exception occurred."));
305         }
306
307         return make_pair (job, written);
308 }
309
310 dcp::Formulation
311 KDMOutputPanel::formulation () const
312 {
313         return (dcp::Formulation) reinterpret_cast<intptr_t> (_type->GetClientData (_type->GetSelection()));
314 }
315
316 boost::filesystem::path
317 KDMOutputPanel::directory () const
318 {
319         return wx_to_std (_folder->GetPath ());
320 }