More player debugging for butler video-full states.
[dcpomatic.git] / src / lib / internet.cc
1 /*
2     Copyright (C) 2014-2015 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 "scoped_temporary.h"
22 #include "compose.hpp"
23 #include "exceptions.h"
24 #include "cross.h"
25 #include "util.h"
26 #include <curl/curl.h>
27 #include <zip.h>
28 #include <boost/function.hpp>
29 #include <boost/optional.hpp>
30 #include <boost/filesystem.hpp>
31 #include <boost/algorithm/string.hpp>
32 #include <string>
33
34 #include "i18n.h"
35
36 using std::string;
37 using std::list;
38 using boost::optional;
39 using boost::function;
40 using boost::algorithm::trim;
41
42
43 static size_t
44 get_from_url_data (void* buffer, size_t size, size_t nmemb, void* stream)
45 {
46         FILE* f = reinterpret_cast<FILE*> (stream);
47         return fwrite (buffer, size, nmemb, f);
48 }
49
50 optional<string>
51 get_from_url (string url, bool pasv, ScopedTemporary& temp)
52 {
53         CURL* curl = curl_easy_init ();
54         curl_easy_setopt (curl, CURLOPT_URL, url.c_str());
55
56         FILE* f = temp.open ("wb");
57         curl_easy_setopt (curl, CURLOPT_WRITEFUNCTION, get_from_url_data);
58         curl_easy_setopt (curl, CURLOPT_WRITEDATA, f);
59         curl_easy_setopt (curl, CURLOPT_FTP_USE_EPSV, 0);
60         curl_easy_setopt (curl, CURLOPT_FTP_USE_EPRT, 0);
61         if (!pasv) {
62                 curl_easy_setopt (curl, CURLOPT_FTPPORT, "-");
63         }
64
65         /* Maximum time is 20s */
66         curl_easy_setopt (curl, CURLOPT_TIMEOUT, 20);
67
68         CURLcode const cr = curl_easy_perform (curl);
69
70         temp.close ();
71         curl_easy_cleanup (curl);
72         if (cr != CURLE_OK) {
73                 return String::compose (_("Download failed (%1 error %2)"), url, (int) cr);
74         }
75
76         return optional<string>();
77 }
78
79 optional<string>
80 get_from_url (string url, bool pasv, function<void (boost::filesystem::path)> load)
81 {
82         ScopedTemporary temp;
83         optional<string> e = get_from_url (url, pasv, temp);
84         if (e) {
85                 return e;
86         }
87         load (temp.file());
88         return optional<string>();
89 }
90
91 /** @param url URL of ZIP file.
92  *  @param file Filename within ZIP file.
93  *  @param load Function passed a (temporary) filesystem path of the unpacked file.
94  */
95 optional<string>
96 get_from_zip_url (string url, string file, bool pasv, function<void (boost::filesystem::path)> load)
97 {
98         /* Download the ZIP file to temp_zip */
99         ScopedTemporary temp_zip;
100         optional<string> e = get_from_url (url, pasv, temp_zip);
101         if (e) {
102                 return e;
103         }
104
105         /* Open the ZIP file and read `file' out of it */
106
107 #ifdef DCPOMATIC_HAVE_ZIP_SOURCE_T
108         /* This is the way to do it with newer versions of libzip, and is required on Windows.
109            The zip_source_t API is missing in the libzip versions shipped with Ubuntu 14.04,
110            Centos 6, Centos 7, Debian 7 and Debian 8.
111         */
112
113         FILE* zip_file = fopen_boost (temp_zip.file (), "rb");
114         if (!zip_file) {
115                 return optional<string> (_("Could not open downloaded ZIP file"));
116         }
117
118         zip_source_t* zip_source = zip_source_filep_create (zip_file, 0, -1, 0);
119         if (!zip_source) {
120                 return optional<string> (_("Could not open downloaded ZIP file"));
121         }
122
123         zip_error_t error;
124         zip_error_init (&error);
125         zip_t* zip = zip_open_from_source (zip_source, ZIP_RDONLY, &error);
126         if (!zip) {
127                 return String::compose (_("Could not open downloaded ZIP file (%1:%2: %3)"), error.zip_err, error.sys_err, error.str ? error.str : "");
128         }
129
130 #else
131         struct zip* zip = zip_open (temp_zip.c_str(), 0, 0);
132 #endif
133
134         struct zip_file* file_in_zip = zip_fopen (zip, file.c_str(), 0);
135         if (!file_in_zip) {
136                 return optional<string> (_("Unexpected ZIP file contents"));
137         }
138
139         ScopedTemporary temp_cert;
140         FILE* f = temp_cert.open ("wb");
141         char buffer[4096];
142         while (true) {
143                 int const N = zip_fread (file_in_zip, buffer, sizeof (buffer));
144                 checked_fwrite (buffer, N, f, temp_cert.file());
145                 if (N < int (sizeof (buffer))) {
146                         break;
147                 }
148         }
149         zip_fclose (file_in_zip);
150         zip_close (zip);
151         temp_cert.close ();
152
153         load (temp_cert.file ());
154         return optional<string> ();
155 }