3cbb0088ac7960a184a738fcf193200aa9c21965
[ntk/apt.git] / methods / https.cc
1 // -*- mode: cpp; mode: fold -*-
2 // Description /*{{{*/
3 // $Id: http.cc,v 1.59 2004/05/08 19:42:35 mdz Exp $
4 /* ######################################################################
5
6 HTTPS Acquire Method - This is the HTTPS aquire method for APT.
7
8 It uses libcurl
9
10 ##################################################################### */
11 /*}}}*/
12 // Include Files /*{{{*/
13 #include <apt-pkg/fileutl.h>
14 #include <apt-pkg/acquire-method.h>
15 #include <apt-pkg/error.h>
16 #include <apt-pkg/hashes.h>
17
18 #include <sys/stat.h>
19 #include <sys/time.h>
20 #include <utime.h>
21 #include <unistd.h>
22 #include <signal.h>
23 #include <stdio.h>
24 #include <errno.h>
25 #include <string.h>
26 #include <iostream>
27 #include <apti18n.h>
28 #include <sstream>
29
30 #include "config.h"
31 #include "https.h"
32
33 /*}}}*/
34 using namespace std;
35
36 size_t
37 HttpsMethod::write_data(void *buffer, size_t size, size_t nmemb, void *userp)
38 {
39 HttpsMethod *me = (HttpsMethod *)userp;
40
41 if(me->File->Write(buffer, size*nmemb) != true)
42 return false;
43
44 return size*nmemb;
45 }
46
47 int
48 HttpsMethod::progress_callback(void *clientp, double dltotal, double dlnow,
49 double ultotal, double ulnow)
50 {
51 HttpsMethod *me = (HttpsMethod *)clientp;
52 if(dltotal > 0 && me->Res.Size == 0) {
53 me->Res.Size = (unsigned long)dltotal;
54 me->URIStart(me->Res);
55 }
56 return 0;
57 }
58
59 void HttpsMethod::SetupProxy()
60 {
61 URI ServerName = Queue->Uri;
62
63 // Determine the proxy setting
64 string SpecificProxy = _config->Find("Acquire::http::Proxy::" + ServerName.Host);
65 if (!SpecificProxy.empty())
66 {
67 if (SpecificProxy == "DIRECT")
68 Proxy = "";
69 else
70 Proxy = SpecificProxy;
71 }
72 else
73 {
74 string DefProxy = _config->Find("Acquire::http::Proxy");
75 if (!DefProxy.empty())
76 {
77 Proxy = DefProxy;
78 }
79 else
80 {
81 char* result = getenv("http_proxy");
82 Proxy = result ? result : "";
83 }
84 }
85
86 // Parse no_proxy, a , separated list of domains
87 if (getenv("no_proxy") != 0)
88 {
89 if (CheckDomainList(ServerName.Host,getenv("no_proxy")) == true)
90 Proxy = "";
91 }
92
93 // Determine what host and port to use based on the proxy settings
94 string Host;
95 if (Proxy.empty() == true || Proxy.Host.empty() == true)
96 {
97 }
98 else
99 {
100 if (Proxy.Port != 0)
101 curl_easy_setopt(curl, CURLOPT_PROXYPORT, Proxy.Port);
102 curl_easy_setopt(curl, CURLOPT_PROXY, Proxy.Host.c_str());
103 }
104 }
105
106
107 // HttpsMethod::Fetch - Fetch an item /*{{{*/
108 // ---------------------------------------------------------------------
109 /* This adds an item to the pipeline. We keep the pipeline at a fixed
110 depth. */
111 bool HttpsMethod::Fetch(FetchItem *Itm)
112 {
113 stringstream ss;
114 struct stat SBuf;
115 struct curl_slist *headers=NULL;
116 char curl_errorstr[CURL_ERROR_SIZE];
117 long curl_responsecode;
118 URI Uri = Itm->Uri;
119 string remotehost = Uri.Host;
120
121 // TODO:
122 // - http::Pipeline-Depth
123 // - error checking/reporting
124 // - more debug options? (CURLOPT_DEBUGFUNCTION?)
125
126 curl_easy_reset(curl);
127 SetupProxy();
128
129 // callbacks
130 curl_easy_setopt(curl, CURLOPT_URL, Itm->Uri.c_str());
131 curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, write_data);
132 curl_easy_setopt(curl, CURLOPT_WRITEDATA, this);
133 curl_easy_setopt(curl, CURLOPT_PROGRESSFUNCTION, progress_callback);
134 curl_easy_setopt(curl, CURLOPT_PROGRESSDATA, this);
135 curl_easy_setopt(curl, CURLOPT_NOPROGRESS, false);
136 curl_easy_setopt(curl, CURLOPT_FAILONERROR, true);
137 curl_easy_setopt(curl, CURLOPT_FILETIME, true);
138
139 // SSL parameters are set by default to the common (non mirror-specific) value
140 // if available (or a default one) and gets overload by mirror-specific ones.
141
142 // File containing the list of trusted CA.
143 string cainfo = _config->Find("Acquire::https::CaInfo","");
144 string knob = "Acquire::https::"+remotehost+"::CaInfo";
145 cainfo = _config->Find(knob.c_str(),cainfo.c_str());
146 if(cainfo != "")
147 curl_easy_setopt(curl, CURLOPT_CAINFO,cainfo.c_str());
148
149 // Check server certificate against previous CA list ...
150 bool peer_verify = _config->FindB("Acquire::https::Verify-Peer",true);
151 knob = "Acquire::https::" + remotehost + "::Verify-Peer";
152 peer_verify = _config->FindB(knob.c_str(), peer_verify);
153 curl_easy_setopt(curl, CURLOPT_SSL_VERIFYPEER, peer_verify);
154
155 // ... and hostname against cert CN or subjectAltName
156 int default_verify = 2;
157 bool verify = _config->FindB("Acquire::https::Verify-Host",true);
158 knob = "Acquire::https::"+remotehost+"::Verify-Host";
159 verify = _config->FindB(knob.c_str(),verify);
160 if (!verify)
161 default_verify = 0;
162 curl_easy_setopt(curl, CURLOPT_SSL_VERIFYHOST, verify);
163
164 // For client authentication, certificate file ...
165 string pem = _config->Find("Acquire::https::SslCert","");
166 knob = "Acquire::https::"+remotehost+"::SslCert";
167 pem = _config->Find(knob.c_str(),pem.c_str());
168 if(pem != "")
169 curl_easy_setopt(curl, CURLOPT_SSLCERT, pem.c_str());
170
171 // ... and associated key.
172 string key = _config->Find("Acquire::https::SslKey","");
173 knob = "Acquire::https::"+remotehost+"::SslKey";
174 key = _config->Find(knob.c_str(),key.c_str());
175 if(key != "")
176 curl_easy_setopt(curl, CURLOPT_SSLKEY, key.c_str());
177
178 // Allow forcing SSL version to SSLv3 or TLSv1 (SSLv2 is not
179 // supported by GnuTLS).
180 long final_version = CURL_SSLVERSION_DEFAULT;
181 string sslversion = _config->Find("Acquire::https::SslForceVersion","");
182 knob = "Acquire::https::"+remotehost+"::SslForceVersion";
183 sslversion = _config->Find(knob.c_str(),sslversion.c_str());
184 if(sslversion == "TLSv1")
185 final_version = CURL_SSLVERSION_TLSv1;
186 else if(sslversion == "SSLv3")
187 final_version = CURL_SSLVERSION_SSLv3;
188 curl_easy_setopt(curl, CURLOPT_SSLVERSION, final_version);
189
190 // cache-control
191 if(_config->FindB("Acquire::http::No-Cache",false) == false)
192 {
193 // cache enabled
194 if (_config->FindB("Acquire::http::No-Store",false) == true)
195 headers = curl_slist_append(headers,"Cache-Control: no-store");
196 ioprintf(ss, "Cache-Control: max-age=%u", _config->FindI("Acquire::http::Max-Age",0));
197 headers = curl_slist_append(headers, ss.str().c_str());
198 } else {
199 // cache disabled by user
200 headers = curl_slist_append(headers, "Cache-Control: no-cache");
201 headers = curl_slist_append(headers, "Pragma: no-cache");
202 }
203 curl_easy_setopt(curl, CURLOPT_HTTPHEADER, headers);
204
205 // speed limit
206 int dlLimit = _config->FindI("Acquire::http::Dl-Limit",0)*1024;
207 if (dlLimit > 0)
208 curl_easy_setopt(curl, CURLOPT_MAX_RECV_SPEED_LARGE, dlLimit);
209
210 // set header
211 curl_easy_setopt(curl, CURLOPT_USERAGENT,"Debian APT-CURL/1.0 ("VERSION")");
212
213 // set timeout
214 int timeout = _config->FindI("Acquire::http::Timeout",120);
215 curl_easy_setopt(curl, CURLOPT_CONNECTTIMEOUT, timeout);
216 //set really low lowspeed timeout (see #497983)
217 int dlMin = 1;
218 curl_easy_setopt(curl, CURLOPT_LOW_SPEED_LIMIT, dlMin);
219 curl_easy_setopt(curl, CURLOPT_LOW_SPEED_TIME, timeout);
220
221 // set redirect options and default to 10 redirects
222 bool AllowRedirect = _config->FindI("Acquire::https::AllowRedirect", true);
223 curl_easy_setopt(curl, CURLOPT_FOLLOWLOCATION, AllowRedirect);
224 curl_easy_setopt(curl, CURLOPT_MAXREDIRS, 10);
225
226 // debug
227 if(_config->FindB("Debug::Acquire::https", false))
228 curl_easy_setopt(curl, CURLOPT_VERBOSE, true);
229
230 // error handling
231 curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, curl_errorstr);
232
233 // if we have the file send an if-range query with a range header
234 if (stat(Itm->DestFile.c_str(),&SBuf) >= 0 && SBuf.st_size > 0)
235 {
236 char Buf[1000];
237 sprintf(Buf,"Range: bytes=%li-\r\nIf-Range: %s\r\n",
238 (long)SBuf.st_size - 1,
239 TimeRFC1123(SBuf.st_mtime).c_str());
240 headers = curl_slist_append(headers, Buf);
241 }
242 else if(Itm->LastModified > 0)
243 {
244 curl_easy_setopt(curl, CURLOPT_TIMECONDITION, CURL_TIMECOND_IFMODSINCE);
245 curl_easy_setopt(curl, CURLOPT_TIMEVALUE, Itm->LastModified);
246 }
247
248 // go for it - if the file exists, append on it
249 File = new FileFd(Itm->DestFile, FileFd::WriteAny);
250 if (File->Size() > 0)
251 File->Seek(File->Size() - 1);
252
253 // keep apt updated
254 Res.Filename = Itm->DestFile;
255
256 // get it!
257 CURLcode success = curl_easy_perform(curl);
258 curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &curl_responsecode);
259
260 long curl_servdate;
261 curl_easy_getinfo(curl, CURLINFO_FILETIME, &curl_servdate);
262
263 // cleanup
264 if(success != 0)
265 {
266 _error->Error("%s", curl_errorstr);
267 Fail();
268 return true;
269 }
270 File->Close();
271
272 // Timestamp
273 struct utimbuf UBuf;
274 if (curl_servdate != -1) {
275 UBuf.actime = curl_servdate;
276 UBuf.modtime = curl_servdate;
277 utime(File->Name().c_str(),&UBuf);
278 }
279
280 // check the downloaded result
281 struct stat Buf;
282 if (stat(File->Name().c_str(),&Buf) == 0)
283 {
284 Res.Filename = File->Name();
285 Res.LastModified = Buf.st_mtime;
286 Res.IMSHit = false;
287 if (curl_responsecode == 304)
288 {
289 unlink(File->Name().c_str());
290 Res.IMSHit = true;
291 Res.LastModified = Itm->LastModified;
292 Res.Size = 0;
293 URIDone(Res);
294 return true;
295 }
296 Res.Size = Buf.st_size;
297 }
298
299 // take hashes
300 Hashes Hash;
301 FileFd Fd(Res.Filename, FileFd::ReadOnly);
302 Hash.AddFD(Fd.Fd(), Fd.Size());
303 Res.TakeHashes(Hash);
304
305 // keep apt updated
306 URIDone(Res);
307
308 // cleanup
309 Res.Size = 0;
310 delete File;
311 curl_slist_free_all(headers);
312
313 return true;
314 };
315
316 int main()
317 {
318 setlocale(LC_ALL, "");
319
320 HttpsMethod Mth;
321 curl_global_init(CURL_GLOBAL_SSL) ;
322
323 return Mth.Run();
324 }
325
326