[apt.git] / methods / https.cc

//-*- mode: cpp; mode: fold -*-
// Description								/*{{{*/
// $Id: http.cc,v 1.59 2004/05/08 19:42:35 mdz Exp $
/* ######################################################################

   HTTPS Acquire Method - This is the HTTPS aquire method for APT.
   
   It uses libcurl

   ##################################################################### */
									/*}}}*/
// Include Files							/*{{{*/
#include <config.h>

#include <apt-pkg/fileutl.h>
#include <apt-pkg/acquire-method.h>
#include <apt-pkg/error.h>
#include <apt-pkg/hashes.h>
#include <apt-pkg/netrc.h>
#include <apt-pkg/configuration.h>

#include <sys/stat.h>
#include <sys/time.h>
#include <utime.h>
#include <unistd.h>
#include <signal.h>
#include <stdio.h>
#include <errno.h>
#include <string.h>
#include <iostream>
#include <sstream>

#include "config.h"
#include "https.h"
#include <apti18n.h>
									/*}}}*/
using namespace std;

size_t 
HttpsMethod::write_data(void *buffer, size_t size, size_t nmemb, void *userp)
{
   HttpsMethod *me = (HttpsMethod *)userp;

   if(me->File->Write(buffer, size*nmemb) != true)
      return false;

   return size*nmemb;
}

int 
HttpsMethod::progress_callback(void *clientp, double dltotal, double dlnow, 
			      double ultotal, double ulnow)
{
   HttpsMethod *me = (HttpsMethod *)clientp;
   if(dltotal > 0 && me->Res.Size == 0) {
      me->Res.Size = (unsigned long long)dltotal;
      me->URIStart(me->Res);
   }
   return 0;
}

void HttpsMethod::SetupProxy()  					/*{{{*/
{
   URI ServerName = Queue->Uri;

   // Curl should never read proxy settings from the environment, as
   // we determine which proxy to use.  Do this for consistency among
   // methods and prevent an environment variable overriding a
   // no-proxy ("DIRECT") setting in apt.conf.
   curl_easy_setopt(curl, CURLOPT_PROXY, "");

   // Determine the proxy setting - try https first, fallback to http and use env at last
   string UseProxy = _config->Find("Acquire::https::Proxy::" + ServerName.Host,
				   _config->Find("Acquire::http::Proxy::" + ServerName.Host).c_str());

   if (UseProxy.empty() == true)
      UseProxy = _config->Find("Acquire::https::Proxy", _config->Find("Acquire::http::Proxy").c_str());

   // User want to use NO proxy, so nothing to setup
   if (UseProxy == "DIRECT")
      return;

   if (UseProxy.empty() == false) 
   {
      // Parse no_proxy, a comma (,) separated list of domains we don't want to use
      // a proxy for so we stop right here if it is in the list
      if (getenv("no_proxy") != 0 && CheckDomainList(ServerName.Host,getenv("no_proxy")) == true)
	 return;
   } else {
      const char* result = getenv("https_proxy");
      // FIXME: Fall back to http_proxy is to remain compatible with
      // existing setups and behaviour of apt.conf.  This should be
      // deprecated in the future (including apt.conf).  Most other
      // programs do not fall back to http proxy settings and neither
      // should Apt.
      if (result == NULL)
         result = getenv("http_proxy");
      UseProxy = result == NULL ? "" : result;
   }

   // Determine what host and port to use based on the proxy settings
   if (UseProxy.empty() == false) 
   {
      Proxy = UseProxy;
      if (Proxy.Port != 1)
	 curl_easy_setopt(curl, CURLOPT_PROXYPORT, Proxy.Port);
      curl_easy_setopt(curl, CURLOPT_PROXY, Proxy.Host.c_str());
      if (Proxy.User.empty() == false || Proxy.Password.empty() == false)
      {
         curl_easy_setopt(curl, CURLOPT_PROXYUSERNAME, Proxy.User.c_str());
         curl_easy_setopt(curl, CURLOPT_PROXYPASSWORD, Proxy.Password.c_str());
      }
   }
}									/*}}}*/
// HttpsMethod::Fetch - Fetch an item					/*{{{*/
// ---------------------------------------------------------------------
/* This adds an item to the pipeline. We keep the pipeline at a fixed
   depth. */
bool HttpsMethod::Fetch(FetchItem *Itm)
{
   struct stat SBuf;
   struct curl_slist *headers=NULL;  
   char curl_errorstr[CURL_ERROR_SIZE];
   URI Uri = Itm->Uri;
   string remotehost = Uri.Host;

   // TODO:
   //       - http::Pipeline-Depth
   //       - error checking/reporting
   //       - more debug options? (CURLOPT_DEBUGFUNCTION?)

   curl_easy_reset(curl);
   SetupProxy();

   maybe_add_auth (Uri, _config->FindFile("Dir::Etc::netrc"));

   // callbacks
   curl_easy_setopt(curl, CURLOPT_URL, static_cast<string>(Uri).c_str());
   curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, write_data);
   curl_easy_setopt(curl, CURLOPT_WRITEDATA, this);
   curl_easy_setopt(curl, CURLOPT_PROGRESSFUNCTION, progress_callback);
   curl_easy_setopt(curl, CURLOPT_PROGRESSDATA, this);
   curl_easy_setopt(curl, CURLOPT_NOPROGRESS, false);
   curl_easy_setopt(curl, CURLOPT_FILETIME, true);

   // SSL parameters are set by default to the common (non mirror-specific) value
   // if available (or a default one) and gets overload by mirror-specific ones.

   // File containing the list of trusted CA.
   string cainfo = _config->Find("Acquire::https::CaInfo","");
   string knob = "Acquire::https::"+remotehost+"::CaInfo";
   cainfo = _config->Find(knob.c_str(),cainfo.c_str());
   if(cainfo.empty() == false)
      curl_easy_setopt(curl, CURLOPT_CAINFO,cainfo.c_str());

   // Check server certificate against previous CA list ...
   bool peer_verify = _config->FindB("Acquire::https::Verify-Peer",true);
   knob = "Acquire::https::" + remotehost + "::Verify-Peer";
   peer_verify = _config->FindB(knob.c_str(), peer_verify);
   curl_easy_setopt(curl, CURLOPT_SSL_VERIFYPEER, peer_verify);

   // ... and hostname against cert CN or subjectAltName
   bool verify = _config->FindB("Acquire::https::Verify-Host",true);
   knob = "Acquire::https::"+remotehost+"::Verify-Host";
   verify = _config->FindB(knob.c_str(),verify);
   int const default_verify = (verify == true) ? 2 : 0;
   curl_easy_setopt(curl, CURLOPT_SSL_VERIFYHOST, default_verify);

   // Also enforce issuer of server certificate using its cert
   string issuercert = _config->Find("Acquire::https::IssuerCert","");
   knob = "Acquire::https::"+remotehost+"::IssuerCert";
   issuercert = _config->Find(knob.c_str(),issuercert.c_str());
   if(issuercert.empty() == false)
      curl_easy_setopt(curl, CURLOPT_ISSUERCERT,issuercert.c_str());

   // For client authentication, certificate file ...
   string pem = _config->Find("Acquire::https::SslCert","");
   knob = "Acquire::https::"+remotehost+"::SslCert";
   pem = _config->Find(knob.c_str(),pem.c_str());
   if(pem.empty() == false)
      curl_easy_setopt(curl, CURLOPT_SSLCERT, pem.c_str());

   // ... and associated key.
   string key = _config->Find("Acquire::https::SslKey","");
   knob = "Acquire::https::"+remotehost+"::SslKey";
   key = _config->Find(knob.c_str(),key.c_str());
   if(key.empty() == false)
      curl_easy_setopt(curl, CURLOPT_SSLKEY, key.c_str());

   // Allow forcing SSL version to SSLv3 or TLSv1 (SSLv2 is not
   // supported by GnuTLS).
   long final_version = CURL_SSLVERSION_DEFAULT;
   string sslversion = _config->Find("Acquire::https::SslForceVersion","");
   knob = "Acquire::https::"+remotehost+"::SslForceVersion";
   sslversion = _config->Find(knob.c_str(),sslversion.c_str());
   if(sslversion == "TLSv1")
     final_version = CURL_SSLVERSION_TLSv1;
   else if(sslversion == "SSLv3")
     final_version = CURL_SSLVERSION_SSLv3;
   curl_easy_setopt(curl, CURLOPT_SSLVERSION, final_version);

   // CRL file
   string crlfile = _config->Find("Acquire::https::CrlFile","");
   knob = "Acquire::https::"+remotehost+"::CrlFile";
   crlfile = _config->Find(knob.c_str(),crlfile.c_str());
   if(crlfile.empty() == false)
      curl_easy_setopt(curl, CURLOPT_CRLFILE, crlfile.c_str());

   // cache-control
   if(_config->FindB("Acquire::https::No-Cache",
	_config->FindB("Acquire::http::No-Cache",false)) == false)
   {
      // cache enabled
      if (_config->FindB("Acquire::https::No-Store",
		_config->FindB("Acquire::http::No-Store",false)) == true)
	 headers = curl_slist_append(headers,"Cache-Control: no-store");
      stringstream ss;
      ioprintf(ss, "Cache-Control: max-age=%u", _config->FindI("Acquire::https::Max-Age",
		_config->FindI("Acquire::http::Max-Age",0)));
      headers = curl_slist_append(headers, ss.str().c_str());
   } else {
      // cache disabled by user
      headers = curl_slist_append(headers, "Cache-Control: no-cache");
      headers = curl_slist_append(headers, "Pragma: no-cache");
   }
   curl_easy_setopt(curl, CURLOPT_HTTPHEADER, headers);

   // speed limit
   int const dlLimit = _config->FindI("Acquire::https::Dl-Limit",
		_config->FindI("Acquire::http::Dl-Limit",0))*1024;
   if (dlLimit > 0)
      curl_easy_setopt(curl, CURLOPT_MAX_RECV_SPEED_LARGE, dlLimit);

   // set header
   curl_easy_setopt(curl, CURLOPT_USERAGENT,
	_config->Find("Acquire::https::User-Agent",
		_config->Find("Acquire::http::User-Agent",
			"Debian APT-CURL/1.0 (" PACKAGE_VERSION ")").c_str()).c_str());

   // set timeout
   int const timeout = _config->FindI("Acquire::https::Timeout",
		_config->FindI("Acquire::http::Timeout",120));
   curl_easy_setopt(curl, CURLOPT_CONNECTTIMEOUT, timeout);
   //set really low lowspeed timeout (see #497983)
   curl_easy_setopt(curl, CURLOPT_LOW_SPEED_LIMIT, DL_MIN_SPEED);
   curl_easy_setopt(curl, CURLOPT_LOW_SPEED_TIME, timeout);

   // set redirect options and default to 10 redirects
   bool const AllowRedirect = _config->FindB("Acquire::https::AllowRedirect",
	_config->FindB("Acquire::http::AllowRedirect",true));
   curl_easy_setopt(curl, CURLOPT_FOLLOWLOCATION, AllowRedirect);
   curl_easy_setopt(curl, CURLOPT_MAXREDIRS, 10);

   // debug
   if(_config->FindB("Debug::Acquire::https", false))
      curl_easy_setopt(curl, CURLOPT_VERBOSE, true);

   // error handling
   curl_errorstr[0] = '\0';
   curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, curl_errorstr);

   // If we ask for uncompressed files servers might respond with content-
   // negotation which lets us end up with compressed files we do not support,
   // see 657029, 657560 and co, so if we have no extension on the request
   // ask for text only. As a sidenote: If there is nothing to negotate servers
   // seem to be nice and ignore it.
   if (_config->FindB("Acquire::https::SendAccept", _config->FindB("Acquire::http::SendAccept", true)) == true)
   {
      size_t const filepos = Itm->Uri.find_last_of('/');
      string const file = Itm->Uri.substr(filepos + 1);
      if (flExtension(file) == file)
	 headers = curl_slist_append(headers, "Accept: text/*");
   }

   // if we have the file send an if-range query with a range header
   if (stat(Itm->DestFile.c_str(),&SBuf) >= 0 && SBuf.st_size > 0)
   {
      char Buf[1000];
      sprintf(Buf, "Range: bytes=%li-", (long) SBuf.st_size);
      headers = curl_slist_append(headers, Buf);
      sprintf(Buf, "If-Range: %s", TimeRFC1123(SBuf.st_mtime).c_str());
      headers = curl_slist_append(headers, Buf);
   }
   else if(Itm->LastModified > 0)
   {
      curl_easy_setopt(curl, CURLOPT_TIMECONDITION, CURL_TIMECOND_IFMODSINCE);
      curl_easy_setopt(curl, CURLOPT_TIMEVALUE, Itm->LastModified);
   }

   // go for it - if the file exists, append on it
   File = new FileFd(Itm->DestFile, FileFd::WriteAny);
   if (File->Size() > 0)
      File->Seek(File->Size());

   // keep apt updated
   Res.Filename = Itm->DestFile;

   // get it!
   CURLcode success = curl_easy_perform(curl);
   long curl_responsecode;
   curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &curl_responsecode);

   // If the server returns 200 OK but the If-Modified-Since condition is not
   // met, CURLINFO_CONDITION_UNMET will be set to 1
   long curl_condition_unmet = 0;
   curl_easy_getinfo(curl, CURLINFO_CONDITION_UNMET, &curl_condition_unmet);

   File->Close();
   curl_slist_free_all(headers);

   // cleanup
   if (success != 0)
   {
      _error->Error("%s", curl_errorstr);
      unlink(File->Name().c_str());
      return false;
   }

   // server says file not modified
   if (curl_responsecode == 304 || curl_condition_unmet == 1)
   {
      unlink(File->Name().c_str());
      Res.IMSHit = true;
      Res.LastModified = Itm->LastModified;
      Res.Size = 0;
      URIDone(Res);
      return true;
   }

   if (curl_responsecode != 200 && // OK
	 curl_responsecode != 206 && // Partial
	 curl_responsecode != 416) // invalid Range
   {
      char err[255];
      snprintf(err, sizeof(err) - 1, "HttpError%ld", curl_responsecode);
      SetFailReason(err);
      _error->Error("%s", err);
      // unlink, no need keep 401/404 page content in partial/
      unlink(File->Name().c_str());
      return false;
   }

   struct stat resultStat;
   if (unlikely(stat(File->Name().c_str(), &resultStat) != 0))
   {
      _error->Errno("stat", "Unable to access file %s", File->Name().c_str());
      return false;
   }
   Res.Size = resultStat.st_size;

   // invalid range-request
   if (curl_responsecode == 416)
   {
      unlink(File->Name().c_str());
      Res.Size = 0;
      delete File;
      Redirect(Itm->Uri);
      return true;
   }

   // check the downloaded result
   if (curl_responsecode == 304 || curl_condition_unmet)
   {
      unlink(File->Name().c_str());
      Res.IMSHit = true;
      Res.LastModified = Itm->LastModified;
      Res.Size = 0;
      URIDone(Res);
      return true;
   }
   Res.IMSHit = false;

   // Timestamp
   curl_easy_getinfo(curl, CURLINFO_FILETIME, &Res.LastModified);
   if (Res.LastModified != -1)
   {
      struct utimbuf UBuf;
      UBuf.actime = Res.LastModified;
      UBuf.modtime = Res.LastModified;
      utime(File->Name().c_str(),&UBuf);
   }
   else
      Res.LastModified = resultStat.st_mtime;

   // take hashes
   Hashes Hash;
   FileFd Fd(Res.Filename, FileFd::ReadOnly);
   Hash.AddFD(Fd);
   Res.TakeHashes(Hash);

   // keep apt updated
   URIDone(Res);

   // cleanup
   Res.Size = 0;
   delete File;

   return true;
};

int main()
{
   setlocale(LC_ALL, "");

   HttpsMethod Mth;
   curl_global_init(CURL_GLOBAL_SSL) ;

   return Mth.Run();
}
Commit	Line	Data
b9e9a44b	1	//-- mode: cpp; mode: fold --
d546f98d MV	2	// Description /{{{/
	3	// $Id: http.cc,v 1.59 2004/05/08 19:42:35 mdz Exp $
	4	/* ######################################################################
	5
ae58a985	6	HTTPS Acquire Method - This is the HTTPS aquire method for APT.
d546f98d MV	7
	8	It uses libcurl
	9
	10	##################################################################### */
	11	/}}}/
	12	// Include Files /{{{/
ea542140 DK	13	#include <config.h>
ea542140 DK	14
d546f98d MV	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>
592b7800	19	#include <apt-pkg/netrc.h>
472ff00e	20	#include <apt-pkg/configuration.h>
d546f98d MV	21
	22	#include <sys/stat.h>
	23	#include <sys/time.h>
	24	#include <utime.h>
	25	#include <unistd.h>
	26	#include <signal.h>
	27	#include <stdio.h>
	28	#include <errno.h>
	29	#include <string.h>
	30	#include <iostream>
d546f98d MV	31	#include <sstream>
	32
	33	#include "config.h"
	34	#include "https.h"
ea542140	35	#include <apti18n.h>
d546f98d MV	36	/}}}/
	37	using namespace std;
	38
	39	size_t
	40	HttpsMethod::write_data(void buffer, size_t size, size_t nmemb, void userp)
	41	{
	42	HttpsMethod me = (HttpsMethod )userp;
	43
	44	if(me->File->Write(buffer, size*nmemb) != true)
	45	return false;
	46
	47	return size*nmemb;
	48	}
	49
	50	int
	51	HttpsMethod::progress_callback(void *clientp, double dltotal, double dlnow,
	52	double ultotal, double ulnow)
	53	{
	54	HttpsMethod me = (HttpsMethod )clientp;
	55	if(dltotal > 0 && me->Res.Size == 0) {
650faab0	56	me->Res.Size = (unsigned long long)dltotal;
d546f98d MV	57	me->URIStart(me->Res);
	58	}
	59	return 0;
	60	}
	61
4407a02f	62	void HttpsMethod::SetupProxy() /{{{/
d546f98d MV	63	{
	64	URI ServerName = Queue->Uri;
	65
5b63d2a9 MV	66	// Curl should never read proxy settings from the environment, as
	67	// we determine which proxy to use. Do this for consistency among
	68	// methods and prevent an environment variable overriding a
	69	// no-proxy ("DIRECT") setting in apt.conf.
	70	curl_easy_setopt(curl, CURLOPT_PROXY, "");
	71
4407a02f MV	72	// Determine the proxy setting - try https first, fallback to http and use env at last
	73	string UseProxy = _config->Find("Acquire::https::Proxy::" + ServerName.Host,
	74	_config->Find("Acquire::http::Proxy::" + ServerName.Host).c_str());
	75
	76	if (UseProxy.empty() == true)
	77	UseProxy = _config->Find("Acquire::https::Proxy", _config->Find("Acquire::http::Proxy").c_str());
	78
	79	// User want to use NO proxy, so nothing to setup
	80	if (UseProxy == "DIRECT")
	81	return;
	82
	83	if (UseProxy.empty() == false)
d546f98d	84	{
4407a02f MV	85	// Parse no_proxy, a comma (,) separated list of domains we don't want to use
	86	// a proxy for so we stop right here if it is in the list
	87	if (getenv("no_proxy") != 0 && CheckDomainList(ServerName.Host,getenv("no_proxy")) == true)
	88	return;
	89	} else {
5b63d2a9 MV	90	const char* result = getenv("https_proxy");
	91	// FIXME: Fall back to http_proxy is to remain compatible with
	92	// existing setups and behaviour of apt.conf. This should be
	93	// deprecated in the future (including apt.conf). Most other
	94	// programs do not fall back to http proxy settings and neither
	95	// should Apt.
	96	if (result == NULL)
	97	result = getenv("http_proxy");
4407a02f	98	UseProxy = result == NULL ? "" : result;
d546f98d	99	}
4407a02f	100
d546f98d	101	// Determine what host and port to use based on the proxy settings
4407a02f	102	if (UseProxy.empty() == false)
d546f98d	103	{
4407a02f MV	104	Proxy = UseProxy;
4407a02f MV	105	if (Proxy.Port != 1)
d546f98d MV	106	curl_easy_setopt(curl, CURLOPT_PROXYPORT, Proxy.Port);
d546f98d MV	107	curl_easy_setopt(curl, CURLOPT_PROXY, Proxy.Host.c_str());
5b63d2a9 MV	108	if (Proxy.User.empty() == false \|\| Proxy.Password.empty() == false)
	109	{
	110	curl_easy_setopt(curl, CURLOPT_PROXYUSERNAME, Proxy.User.c_str());
	111	curl_easy_setopt(curl, CURLOPT_PROXYPASSWORD, Proxy.Password.c_str());
	112	}
d546f98d	113	}
b9e9a44b	114	} /}}}/
d546f98d MV	115	// HttpsMethod::Fetch - Fetch an item /{{{/
	116	// ---------------------------------------------------------------------
	117	/* This adds an item to the pipeline. We keep the pipeline at a fixed
	118	depth. */
	119	bool HttpsMethod::Fetch(FetchItem *Itm)
	120	{
d546f98d MV	121	struct stat SBuf;
d546f98d MV	122	struct curl_slist *headers=NULL;
714ee06c	123	char curl_errorstr[CURL_ERROR_SIZE];
c769cd6f MV	124	URI Uri = Itm->Uri;
c769cd6f MV	125	string remotehost = Uri.Host;
d546f98d MV	126
d546f98d MV	127	// TODO:
d546f98d MV	128	// - http::Pipeline-Depth
	129	// - error checking/reporting
	130	// - more debug options? (CURLOPT_DEBUGFUNCTION?)
	131
5820530d	132	curl_easy_reset(curl);
d546f98d MV	133	SetupProxy();
d546f98d MV	134
1de1f703	135	maybe_add_auth (Uri, _config->FindFile("Dir::Etc::netrc"));
592b7800	136
d546f98d	137	// callbacks
01fc8930	138	curl_easy_setopt(curl, CURLOPT_URL, static_cast<string>(Uri).c_str());
d546f98d MV	139	curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, write_data);
	140	curl_easy_setopt(curl, CURLOPT_WRITEDATA, this);
	141	curl_easy_setopt(curl, CURLOPT_PROGRESSFUNCTION, progress_callback);
	142	curl_easy_setopt(curl, CURLOPT_PROGRESSDATA, this);
	143	curl_easy_setopt(curl, CURLOPT_NOPROGRESS, false);
5820530d	144	curl_easy_setopt(curl, CURLOPT_FILETIME, true);
d546f98d	145
c769cd6f MV	146	// SSL parameters are set by default to the common (non mirror-specific) value
	147	// if available (or a default one) and gets overload by mirror-specific ones.
	148
	149	// File containing the list of trusted CA.
	150	string cainfo = _config->Find("Acquire::https::CaInfo","");
	151	string knob = "Acquire::https::"+remotehost+"::CaInfo";
	152	cainfo = _config->Find(knob.c_str(),cainfo.c_str());
46e39c8e	153	if(cainfo.empty() == false)
c769cd6f MV	154	curl_easy_setopt(curl, CURLOPT_CAINFO,cainfo.c_str());
	155
	156	// Check server certificate against previous CA list ...
	157	bool peer_verify = _config->FindB("Acquire::https::Verify-Peer",true);
	158	knob = "Acquire::https::" + remotehost + "::Verify-Peer";
	159	peer_verify = _config->FindB(knob.c_str(), peer_verify);
714ee06c MV	160	curl_easy_setopt(curl, CURLOPT_SSL_VERIFYPEER, peer_verify);
714ee06c MV	161
c769cd6f	162	// ... and hostname against cert CN or subjectAltName
c769cd6f MV	163	bool verify = _config->FindB("Acquire::https::Verify-Host",true);
	164	knob = "Acquire::https::"+remotehost+"::Verify-Host";
	165	verify = _config->FindB(knob.c_str(),verify);
52b22cea DK	166	int const default_verify = (verify == true) ? 2 : 0;
52b22cea DK	167	curl_easy_setopt(curl, CURLOPT_SSL_VERIFYHOST, default_verify);
c769cd6f	168
46e39c8e MV	169	// Also enforce issuer of server certificate using its cert
	170	string issuercert = _config->Find("Acquire::https::IssuerCert","");
	171	knob = "Acquire::https::"+remotehost+"::IssuerCert";
	172	issuercert = _config->Find(knob.c_str(),issuercert.c_str());
	173	if(issuercert.empty() == false)
	174	curl_easy_setopt(curl, CURLOPT_ISSUERCERT,issuercert.c_str());
	175
c769cd6f	176	// For client authentication, certificate file ...
714ee06c	177	string pem = _config->Find("Acquire::https::SslCert","");
c769cd6f MV	178	knob = "Acquire::https::"+remotehost+"::SslCert";
c769cd6f MV	179	pem = _config->Find(knob.c_str(),pem.c_str());
46e39c8e	180	if(pem.empty() == false)
714ee06c	181	curl_easy_setopt(curl, CURLOPT_SSLCERT, pem.c_str());
c769cd6f MV	182
	183	// ... and associated key.
	184	string key = _config->Find("Acquire::https::SslKey","");
	185	knob = "Acquire::https::"+remotehost+"::SslKey";
	186	key = _config->Find(knob.c_str(),key.c_str());
46e39c8e	187	if(key.empty() == false)
c769cd6f MV	188	curl_easy_setopt(curl, CURLOPT_SSLKEY, key.c_str());
	189
	190	// Allow forcing SSL version to SSLv3 or TLSv1 (SSLv2 is not
	191	// supported by GnuTLS).
	192	long final_version = CURL_SSLVERSION_DEFAULT;
	193	string sslversion = _config->Find("Acquire::https::SslForceVersion","");
	194	knob = "Acquire::https::"+remotehost+"::SslForceVersion";
	195	sslversion = _config->Find(knob.c_str(),sslversion.c_str());
	196	if(sslversion == "TLSv1")
	197	final_version = CURL_SSLVERSION_TLSv1;
	198	else if(sslversion == "SSLv3")
	199	final_version = CURL_SSLVERSION_SSLv3;
	200	curl_easy_setopt(curl, CURLOPT_SSLVERSION, final_version);
d546f98d	201
46e39c8e MV	202	// CRL file
	203	string crlfile = _config->Find("Acquire::https::CrlFile","");
	204	knob = "Acquire::https::"+remotehost+"::CrlFile";
	205	crlfile = _config->Find(knob.c_str(),crlfile.c_str());
	206	if(crlfile.empty() == false)
	207	curl_easy_setopt(curl, CURLOPT_CRLFILE, crlfile.c_str());
	208
d546f98d	209	// cache-control
b9e9a44b DK	210	if(_config->FindB("Acquire::https::No-Cache",
b9e9a44b DK	211	_config->FindB("Acquire::http::No-Cache",false)) == false)
d546f98d MV	212	{
d546f98d MV	213	// cache enabled
b9e9a44b DK	214	if (_config->FindB("Acquire::https::No-Store",
b9e9a44b DK	215	_config->FindB("Acquire::http::No-Store",false)) == true)
d546f98d	216	headers = curl_slist_append(headers,"Cache-Control: no-store");
8654fae9	217	stringstream ss;
b9e9a44b DK	218	ioprintf(ss, "Cache-Control: max-age=%u", _config->FindI("Acquire::https::Max-Age",
b9e9a44b DK	219	_config->FindI("Acquire::http::Max-Age",0)));
d546f98d MV	220	headers = curl_slist_append(headers, ss.str().c_str());
	221	} else {
	222	// cache disabled by user
	223	headers = curl_slist_append(headers, "Cache-Control: no-cache");
	224	headers = curl_slist_append(headers, "Pragma: no-cache");
	225	}
	226	curl_easy_setopt(curl, CURLOPT_HTTPHEADER, headers);
	227
d546f98d	228	// speed limit
46e39c8e	229	int const dlLimit = _config->FindI("Acquire::https::Dl-Limit",
b9e9a44b	230	_config->FindI("Acquire::http::Dl-Limit",0))*1024;
d546f98d MV	231	if (dlLimit > 0)
	232	curl_easy_setopt(curl, CURLOPT_MAX_RECV_SPEED_LARGE, dlLimit);
	233
	234	// set header
9f542bae DK	235	curl_easy_setopt(curl, CURLOPT_USERAGENT,
	236	_config->Find("Acquire::https::User-Agent",
	237	_config->Find("Acquire::http::User-Agent",
335e2c82	238	"Debian APT-CURL/1.0 (" PACKAGE_VERSION ")").c_str()).c_str());
d546f98d	239
cc615257	240	// set timeout
46e39c8e	241	int const timeout = _config->FindI("Acquire::https::Timeout",
b9e9a44b	242	_config->FindI("Acquire::http::Timeout",120));
cc615257	243	curl_easy_setopt(curl, CURLOPT_CONNECTTIMEOUT, timeout);
43cf55db	244	//set really low lowspeed timeout (see #497983)
5085e660	245	curl_easy_setopt(curl, CURLOPT_LOW_SPEED_LIMIT, DL_MIN_SPEED);
43cf55db	246	curl_easy_setopt(curl, CURLOPT_LOW_SPEED_TIME, timeout);
cc615257	247
668ce84d	248	// set redirect options and default to 10 redirects
46e39c8e	249	bool const AllowRedirect = _config->FindB("Acquire::https::AllowRedirect",
b9e9a44b	250	_config->FindB("Acquire::http::AllowRedirect",true));
668ce84d MV	251	curl_easy_setopt(curl, CURLOPT_FOLLOWLOCATION, AllowRedirect);
	252	curl_easy_setopt(curl, CURLOPT_MAXREDIRS, 10);
	253
d546f98d	254	// debug
714ee06c	255	if(_config->FindB("Debug::Acquire::https", false))
d546f98d MV	256	curl_easy_setopt(curl, CURLOPT_VERBOSE, true);
d546f98d MV	257
714ee06c	258	// error handling
cc418115	259	curl_errorstr[0] = '\0';
714ee06c MV	260	curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, curl_errorstr);
714ee06c MV	261
6f4501f9 DK	262	// If we ask for uncompressed files servers might respond with content-
	263	// negotation which lets us end up with compressed files we do not support,
	264	// see 657029, 657560 and co, so if we have no extension on the request
	265	// ask for text only. As a sidenote: If there is nothing to negotate servers
	266	// seem to be nice and ignore it.
	267	if (_config->FindB("Acquire::https::SendAccept", _config->FindB("Acquire::http::SendAccept", true)) == true)
	268	{
	269	size_t const filepos = Itm->Uri.find_last_of('/');
	270	string const file = Itm->Uri.substr(filepos + 1);
	271	if (flExtension(file) == file)
	272	headers = curl_slist_append(headers, "Accept: text/*");
	273	}
	274
d6039f9e	275	// if we have the file send an if-range query with a range header
4c499611 MV	276	if (stat(Itm->DestFile.c_str(),&SBuf) >= 0 && SBuf.st_size > 0)
	277	{
	278	char Buf[1000];
85050e76	279	sprintf(Buf, "Range: bytes=%li-", (long) SBuf.st_size);
4c499611	280	headers = curl_slist_append(headers, Buf);
8654fae9 DK	281	sprintf(Buf, "If-Range: %s", TimeRFC1123(SBuf.st_mtime).c_str());
	282	headers = curl_slist_append(headers, Buf);
	283	}
d6039f9e MV	284	else if(Itm->LastModified > 0)
	285	{
	286	curl_easy_setopt(curl, CURLOPT_TIMECONDITION, CURL_TIMECOND_IFMODSINCE);
	287	curl_easy_setopt(curl, CURLOPT_TIMEVALUE, Itm->LastModified);
4c499611	288	}
d546f98d MV	289
	290	// go for it - if the file exists, append on it
	291	File = new FileFd(Itm->DestFile, FileFd::WriteAny);
d6039f9e	292	if (File->Size() > 0)
85050e76 DK	293	File->Seek(File->Size());
85050e76 DK	294
d546f98d MV	295	// keep apt updated
	296	Res.Filename = Itm->DestFile;
	297
	298	// get it!
	299	CURLcode success = curl_easy_perform(curl);
85050e76	300	long curl_responsecode;
4c499611	301	curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &curl_responsecode);
d546f98d	302
1dea08eb MV	303	// If the server returns 200 OK but the If-Modified-Since condition is not
	304	// met, CURLINFO_CONDITION_UNMET will be set to 1
	305	long curl_condition_unmet = 0;
	306	curl_easy_getinfo(curl, CURLINFO_CONDITION_UNMET, &curl_condition_unmet);
	307
db1f1469	308	File->Close();
85050e76	309	curl_slist_free_all(headers);
db1f1469	310
d546f98d	311	// cleanup
85050e76	312	if (success != 0)
4c499611	313	{
9b5d79ec	314	_error->Error("%s", curl_errorstr);
db1f1469	315	unlink(File->Name().c_str());
85050e76 DK	316	return false;
	317	}
	318
	319	// server says file not modified
	320	if (curl_responsecode == 304 \|\| curl_condition_unmet == 1)
	321	{
	322	unlink(File->Name().c_str());
	323	Res.IMSHit = true;
	324	Res.LastModified = Itm->LastModified;
	325	Res.Size = 0;
	326	URIDone(Res);
d546f98d MV	327	return true;
	328	}
	329
85050e76 DK	330	if (curl_responsecode != 200 && // OK
	331	curl_responsecode != 206 && // Partial
	332	curl_responsecode != 416) // invalid Range
	333	{
	334	char err[255];
	335	snprintf(err, sizeof(err) - 1, "HttpError%ld", curl_responsecode);
	336	SetFailReason(err);
	337	_error->Error("%s", err);
	338	// unlink, no need keep 401/404 page content in partial/
	339	unlink(File->Name().c_str());
	340	return false;
	341	}
	342
	343	struct stat resultStat;
	344	if (unlikely(stat(File->Name().c_str(), &resultStat) != 0))
	345	{
	346	_error->Errno("stat", "Unable to access file %s", File->Name().c_str());
	347	return false;
	348	}
	349	Res.Size = resultStat.st_size;
	350
	351	// invalid range-request
	352	if (curl_responsecode == 416)
	353	{
	354	unlink(File->Name().c_str());
	355	Res.Size = 0;
	356	delete File;
	357	Redirect(Itm->Uri);
	358	return true;
5820530d OS	359	}
5820530d OS	360
d546f98d	361	// check the downloaded result
85050e76	362	if (curl_responsecode == 304 \|\| curl_condition_unmet)
d546f98d	363	{
85050e76 DK	364	unlink(File->Name().c_str());
	365	Res.IMSHit = true;
	366	Res.LastModified = Itm->LastModified;
	367	Res.Size = 0;
	368	URIDone(Res);
	369	return true;
d546f98d	370	}
85050e76 DK	371	Res.IMSHit = false;
	372
	373	// Timestamp
	374	curl_easy_getinfo(curl, CURLINFO_FILETIME, &Res.LastModified);
	375	if (Res.LastModified != -1)
	376	{
	377	struct utimbuf UBuf;
	378	UBuf.actime = Res.LastModified;
	379	UBuf.modtime = Res.LastModified;
	380	utime(File->Name().c_str(),&UBuf);
	381	}
	382	else
	383	Res.LastModified = resultStat.st_mtime;
d546f98d MV	384
	385	// take hashes
	386	Hashes Hash;
	387	FileFd Fd(Res.Filename, FileFd::ReadOnly);
109eb151	388	Hash.AddFD(Fd);
d546f98d	389	Res.TakeHashes(Hash);
85050e76	390
d546f98d MV	391	// keep apt updated
	392	URIDone(Res);
	393
	394	// cleanup
d546f98d MV	395	Res.Size = 0;
d546f98d MV	396	delete File;
d546f98d MV	397
	398	return true;
	399	};
	400
	401	int main()
	402	{
	403	setlocale(LC_ALL, "");
	404
	405	HttpsMethod Mth;
	406	curl_global_init(CURL_GLOBAL_SSL) ;
	407
	408	return Mth.Run();
	409	}
	410
	411