1 //-*- mode: cpp; mode: fold -*-
3 // $Id: http.cc,v 1.59 2004/05/08 19:42:35 mdz Exp $
4 /* ######################################################################
6 HTTPS Acquire Method - This is the HTTPS acquire method for APT.
10 ##################################################################### */
12 // Include Files /*{{{*/
15 #include <apt-pkg/fileutl.h>
16 #include <apt-pkg/acquire-method.h>
17 #include <apt-pkg/error.h>
18 #include <apt-pkg/hashes.h>
19 #include <apt-pkg/netrc.h>
20 #include <apt-pkg/configuration.h>
21 #include <apt-pkg/macros.h>
22 #include <apt-pkg/strutl.h>
23 #include <apt-pkg/proxy.h>
41 HttpsMethod::parse_header(void *buffer
, size_t size
, size_t nmemb
, void *userp
)
43 size_t len
= size
* nmemb
;
44 HttpsMethod
*me
= (HttpsMethod
*)userp
;
45 std::string
line((char*) buffer
, len
);
46 for (--len
; len
> 0; --len
)
47 if (isspace(line
[len
]) == 0)
54 if (line
.empty() == true)
56 if (me
->Server
->Result
!= 416 && me
->Server
->StartPos
!= 0)
58 else if (me
->Server
->Result
== 416 && me
->Server
->Size
== me
->File
->FileSize())
60 me
->Server
->Result
= 200;
61 me
->Server
->StartPos
= me
->Server
->Size
;
62 // the actual size is not important for https as curl will deal with it
63 // by itself and e.g. doesn't bother us with transport-encoding…
64 me
->Server
->JunkSize
= std::numeric_limits
<unsigned long long>::max();
67 me
->Server
->StartPos
= 0;
69 me
->File
->Truncate(me
->Server
->StartPos
);
70 me
->File
->Seek(me
->Server
->StartPos
);
72 else if (me
->Server
->HeaderLine(line
) == false)
79 HttpsMethod::write_data(void *buffer
, size_t size
, size_t nmemb
, void *userp
)
81 HttpsMethod
*me
= (HttpsMethod
*)userp
;
82 size_t buffer_size
= size
* nmemb
;
83 // we don't need to count the junk here, just drop anything we get as
84 // we don't always know how long it would be, e.g. in chunked encoding.
85 if (me
->Server
->JunkSize
!= 0)
88 if (me
->ReceivedData
== false)
90 me
->URIStart(me
->Res
);
91 me
->ReceivedData
= true;
94 if(me
->File
->Write(buffer
, buffer_size
) != true)
101 HttpsMethod::progress_callback(void *clientp
, double dltotal
, double /*dlnow*/,
102 double /*ultotal*/, double /*ulnow*/)
104 HttpsMethod
*me
= (HttpsMethod
*)clientp
;
105 if(dltotal
> 0 && me
->Res
.Size
== 0) {
106 me
->Res
.Size
= (unsigned long long)dltotal
;
111 // HttpsServerState::HttpsServerState - Constructor /*{{{*/
112 HttpsServerState::HttpsServerState(URI Srv
,HttpsMethod
* /*Owner*/) : ServerState(Srv
, NULL
)
114 TimeOut
= _config
->FindI("Acquire::https::Timeout",TimeOut
);
119 void HttpsMethod::SetupProxy() /*{{{*/
121 URI ServerName
= Queue
->Uri
;
123 // Determine the proxy setting
124 AutoDetectProxy(ServerName
);
126 // Curl should never read proxy settings from the environment, as
127 // we determine which proxy to use. Do this for consistency among
128 // methods and prevent an environment variable overriding a
129 // no-proxy ("DIRECT") setting in apt.conf.
130 curl_easy_setopt(curl
, CURLOPT_PROXY
, "");
132 // Determine the proxy setting - try https first, fallback to http and use env at last
133 string UseProxy
= _config
->Find("Acquire::https::Proxy::" + ServerName
.Host
,
134 _config
->Find("Acquire::http::Proxy::" + ServerName
.Host
).c_str());
136 if (UseProxy
.empty() == true)
137 UseProxy
= _config
->Find("Acquire::https::Proxy", _config
->Find("Acquire::http::Proxy").c_str());
139 // User want to use NO proxy, so nothing to setup
140 if (UseProxy
== "DIRECT")
143 if (UseProxy
.empty() == false)
145 // Parse no_proxy, a comma (,) separated list of domains we don't want to use
146 // a proxy for so we stop right here if it is in the list
147 if (getenv("no_proxy") != 0 && CheckDomainList(ServerName
.Host
,getenv("no_proxy")) == true)
150 const char* result
= getenv("https_proxy");
151 // FIXME: Fall back to http_proxy is to remain compatible with
152 // existing setups and behaviour of apt.conf. This should be
153 // deprecated in the future (including apt.conf). Most other
154 // programs do not fall back to http proxy settings and neither
157 result
= getenv("http_proxy");
158 UseProxy
= result
== NULL
? "" : result
;
161 // Determine what host and port to use based on the proxy settings
162 if (UseProxy
.empty() == false)
166 curl_easy_setopt(curl
, CURLOPT_PROXYPORT
, Proxy
.Port
);
167 curl_easy_setopt(curl
, CURLOPT_PROXY
, Proxy
.Host
.c_str());
168 if (Proxy
.User
.empty() == false || Proxy
.Password
.empty() == false)
170 curl_easy_setopt(curl
, CURLOPT_PROXYUSERNAME
, Proxy
.User
.c_str());
171 curl_easy_setopt(curl
, CURLOPT_PROXYPASSWORD
, Proxy
.Password
.c_str());
175 // HttpsMethod::Fetch - Fetch an item /*{{{*/
176 // ---------------------------------------------------------------------
177 /* This adds an item to the pipeline. We keep the pipeline at a fixed
179 bool HttpsMethod::Fetch(FetchItem
*Itm
)
182 struct curl_slist
*headers
=NULL
;
183 char curl_errorstr
[CURL_ERROR_SIZE
];
185 string remotehost
= Uri
.Host
;
186 ReceivedData
= false;
189 // - http::Pipeline-Depth
190 // - error checking/reporting
191 // - more debug options? (CURLOPT_DEBUGFUNCTION?)
193 curl_easy_reset(curl
);
196 maybe_add_auth (Uri
, _config
->FindFile("Dir::Etc::netrc"));
199 curl_easy_setopt(curl
, CURLOPT_URL
, static_cast<string
>(Uri
).c_str());
200 curl_easy_setopt(curl
, CURLOPT_HEADERFUNCTION
, parse_header
);
201 curl_easy_setopt(curl
, CURLOPT_WRITEHEADER
, this);
202 curl_easy_setopt(curl
, CURLOPT_WRITEFUNCTION
, write_data
);
203 curl_easy_setopt(curl
, CURLOPT_WRITEDATA
, this);
204 curl_easy_setopt(curl
, CURLOPT_PROGRESSFUNCTION
, progress_callback
);
205 curl_easy_setopt(curl
, CURLOPT_PROGRESSDATA
, this);
207 curl_easy_setopt(curl
, CURLOPT_NOPROGRESS
, false);
208 curl_easy_setopt(curl
, CURLOPT_FILETIME
, true);
209 // only allow curl to handle https, not the other stuff it supports
210 curl_easy_setopt(curl
, CURLOPT_PROTOCOLS
, CURLPROTO_HTTPS
);
211 curl_easy_setopt(curl
, CURLOPT_REDIR_PROTOCOLS
, CURLPROTO_HTTPS
);
213 // SSL parameters are set by default to the common (non mirror-specific) value
214 // if available (or a default one) and gets overload by mirror-specific ones.
216 // File containing the list of trusted CA.
217 string cainfo
= _config
->Find("Acquire::https::CaInfo","");
218 string knob
= "Acquire::https::"+remotehost
+"::CaInfo";
219 cainfo
= _config
->Find(knob
.c_str(),cainfo
.c_str());
220 if(cainfo
.empty() == false)
221 curl_easy_setopt(curl
, CURLOPT_CAINFO
,cainfo
.c_str());
223 // Check server certificate against previous CA list ...
224 bool peer_verify
= _config
->FindB("Acquire::https::Verify-Peer",true);
225 knob
= "Acquire::https::" + remotehost
+ "::Verify-Peer";
226 peer_verify
= _config
->FindB(knob
.c_str(), peer_verify
);
227 curl_easy_setopt(curl
, CURLOPT_SSL_VERIFYPEER
, peer_verify
);
229 // ... and hostname against cert CN or subjectAltName
230 bool verify
= _config
->FindB("Acquire::https::Verify-Host",true);
231 knob
= "Acquire::https::"+remotehost
+"::Verify-Host";
232 verify
= _config
->FindB(knob
.c_str(),verify
);
233 int const default_verify
= (verify
== true) ? 2 : 0;
234 curl_easy_setopt(curl
, CURLOPT_SSL_VERIFYHOST
, default_verify
);
236 // Also enforce issuer of server certificate using its cert
237 string issuercert
= _config
->Find("Acquire::https::IssuerCert","");
238 knob
= "Acquire::https::"+remotehost
+"::IssuerCert";
239 issuercert
= _config
->Find(knob
.c_str(),issuercert
.c_str());
240 if(issuercert
.empty() == false)
241 curl_easy_setopt(curl
, CURLOPT_ISSUERCERT
,issuercert
.c_str());
243 // For client authentication, certificate file ...
244 string pem
= _config
->Find("Acquire::https::SslCert","");
245 knob
= "Acquire::https::"+remotehost
+"::SslCert";
246 pem
= _config
->Find(knob
.c_str(),pem
.c_str());
247 if(pem
.empty() == false)
248 curl_easy_setopt(curl
, CURLOPT_SSLCERT
, pem
.c_str());
250 // ... and associated key.
251 string key
= _config
->Find("Acquire::https::SslKey","");
252 knob
= "Acquire::https::"+remotehost
+"::SslKey";
253 key
= _config
->Find(knob
.c_str(),key
.c_str());
254 if(key
.empty() == false)
255 curl_easy_setopt(curl
, CURLOPT_SSLKEY
, key
.c_str());
257 // Allow forcing SSL version to SSLv3 or TLSv1 (SSLv2 is not
258 // supported by GnuTLS).
259 long final_version
= CURL_SSLVERSION_DEFAULT
;
260 string sslversion
= _config
->Find("Acquire::https::SslForceVersion","");
261 knob
= "Acquire::https::"+remotehost
+"::SslForceVersion";
262 sslversion
= _config
->Find(knob
.c_str(),sslversion
.c_str());
263 if(sslversion
== "TLSv1")
264 final_version
= CURL_SSLVERSION_TLSv1
;
265 else if(sslversion
== "SSLv3")
266 final_version
= CURL_SSLVERSION_SSLv3
;
267 curl_easy_setopt(curl
, CURLOPT_SSLVERSION
, final_version
);
270 string crlfile
= _config
->Find("Acquire::https::CrlFile","");
271 knob
= "Acquire::https::"+remotehost
+"::CrlFile";
272 crlfile
= _config
->Find(knob
.c_str(),crlfile
.c_str());
273 if(crlfile
.empty() == false)
274 curl_easy_setopt(curl
, CURLOPT_CRLFILE
, crlfile
.c_str());
277 if(_config
->FindB("Acquire::https::No-Cache",
278 _config
->FindB("Acquire::http::No-Cache",false)) == false)
281 if (_config
->FindB("Acquire::https::No-Store",
282 _config
->FindB("Acquire::http::No-Store",false)) == true)
283 headers
= curl_slist_append(headers
,"Cache-Control: no-store");
285 ioprintf(ss
, "Cache-Control: max-age=%u", _config
->FindI("Acquire::https::Max-Age",
286 _config
->FindI("Acquire::http::Max-Age",0)));
287 headers
= curl_slist_append(headers
, ss
.str().c_str());
289 // cache disabled by user
290 headers
= curl_slist_append(headers
, "Cache-Control: no-cache");
291 headers
= curl_slist_append(headers
, "Pragma: no-cache");
293 curl_easy_setopt(curl
, CURLOPT_HTTPHEADER
, headers
);
296 int const dlLimit
= _config
->FindI("Acquire::https::Dl-Limit",
297 _config
->FindI("Acquire::http::Dl-Limit",0))*1024;
299 curl_easy_setopt(curl
, CURLOPT_MAX_RECV_SPEED_LARGE
, dlLimit
);
302 curl_easy_setopt(curl
, CURLOPT_USERAGENT
,
303 _config
->Find("Acquire::https::User-Agent",
304 _config
->Find("Acquire::http::User-Agent",
305 "Debian APT-CURL/1.0 (" PACKAGE_VERSION
")").c_str()).c_str());
308 int const timeout
= _config
->FindI("Acquire::https::Timeout",
309 _config
->FindI("Acquire::http::Timeout",120));
310 curl_easy_setopt(curl
, CURLOPT_CONNECTTIMEOUT
, timeout
);
311 //set really low lowspeed timeout (see #497983)
312 curl_easy_setopt(curl
, CURLOPT_LOW_SPEED_LIMIT
, DL_MIN_SPEED
);
313 curl_easy_setopt(curl
, CURLOPT_LOW_SPEED_TIME
, timeout
);
315 // set redirect options and default to 10 redirects
316 bool const AllowRedirect
= _config
->FindB("Acquire::https::AllowRedirect",
317 _config
->FindB("Acquire::http::AllowRedirect",true));
318 curl_easy_setopt(curl
, CURLOPT_FOLLOWLOCATION
, AllowRedirect
);
319 curl_easy_setopt(curl
, CURLOPT_MAXREDIRS
, 10);
322 if(_config
->FindB("Debug::Acquire::https", false))
323 curl_easy_setopt(curl
, CURLOPT_VERBOSE
, true);
326 curl_errorstr
[0] = '\0';
327 curl_easy_setopt(curl
, CURLOPT_ERRORBUFFER
, curl_errorstr
);
329 // If we ask for uncompressed files servers might respond with content-
330 // negotiation which lets us end up with compressed files we do not support,
331 // see 657029, 657560 and co, so if we have no extension on the request
332 // ask for text only. As a sidenote: If there is nothing to negotate servers
333 // seem to be nice and ignore it.
334 if (_config
->FindB("Acquire::https::SendAccept", _config
->FindB("Acquire::http::SendAccept", true)) == true)
336 size_t const filepos
= Itm
->Uri
.find_last_of('/');
337 string
const file
= Itm
->Uri
.substr(filepos
+ 1);
338 if (flExtension(file
) == file
)
339 headers
= curl_slist_append(headers
, "Accept: text/*");
342 // if we have the file send an if-range query with a range header
343 if (stat(Itm
->DestFile
.c_str(),&SBuf
) >= 0 && SBuf
.st_size
> 0)
346 strprintf(Buf
, "Range: bytes=%lli-", (long long) SBuf
.st_size
);
347 headers
= curl_slist_append(headers
, Buf
.c_str());
348 strprintf(Buf
, "If-Range: %s", TimeRFC1123(SBuf
.st_mtime
).c_str());
349 headers
= curl_slist_append(headers
, Buf
.c_str());
351 else if(Itm
->LastModified
> 0)
353 curl_easy_setopt(curl
, CURLOPT_TIMECONDITION
, CURL_TIMECOND_IFMODSINCE
);
354 curl_easy_setopt(curl
, CURLOPT_TIMEVALUE
, Itm
->LastModified
);
357 // go for it - if the file exists, append on it
358 File
= new FileFd(Itm
->DestFile
, FileFd::WriteAny
);
359 Server
= new HttpsServerState(Itm
->Uri
, this);
362 Res
.Filename
= Itm
->DestFile
;
365 CURLcode success
= curl_easy_perform(curl
);
367 // If the server returns 200 OK but the If-Modified-Since condition is not
368 // met, CURLINFO_CONDITION_UNMET will be set to 1
369 long curl_condition_unmet
= 0;
370 curl_easy_getinfo(curl
, CURLINFO_CONDITION_UNMET
, &curl_condition_unmet
);
373 curl_slist_free_all(headers
);
378 _error
->Error("%s", curl_errorstr
);
379 unlink(File
->Name().c_str());
383 // server says file not modified
384 if (Server
->Result
== 304 || curl_condition_unmet
== 1)
386 unlink(File
->Name().c_str());
388 Res
.LastModified
= Itm
->LastModified
;
395 if (Server
->Result
!= 200 && // OK
396 Server
->Result
!= 206 && // Partial
397 Server
->Result
!= 416) // invalid Range
400 snprintf(err
, sizeof(err
) - 1, "HttpError%i", Server
->Result
);
402 _error
->Error("%s", err
);
403 // unlink, no need keep 401/404 page content in partial/
404 unlink(File
->Name().c_str());
406 Res
.LastModified
= 0;
410 struct stat resultStat
;
411 if (unlikely(stat(File
->Name().c_str(), &resultStat
) != 0))
413 _error
->Errno("stat", "Unable to access file %s", File
->Name().c_str());
416 Res
.Size
= resultStat
.st_size
;
418 // invalid range-request
419 if (Server
->Result
== 416)
421 unlink(File
->Name().c_str());
429 curl_easy_getinfo(curl
, CURLINFO_FILETIME
, &Res
.LastModified
);
430 if (Res
.LastModified
!= -1)
432 struct timeval times
[2];
433 times
[0].tv_sec
= Res
.LastModified
;
434 times
[1].tv_sec
= Res
.LastModified
;
435 times
[0].tv_usec
= times
[1].tv_usec
= 0;
436 utimes(File
->Name().c_str(), times
);
439 Res
.LastModified
= resultStat
.st_mtime
;
443 FileFd
Fd(Res
.Filename
, FileFd::ReadOnly
);
445 Res
.TakeHashes(Hash
);
459 setlocale(LC_ALL
, "");
462 curl_global_init(CURL_GLOBAL_SSL
) ;