X-Git-Url: http://www.project-moonshot.org/gitweb/?a=blobdiff_plain;f=xmltooling%2Fsoap%2Fimpl%2FCURLSOAPTransport.cpp;h=c05184f05cc3c143306d64ca07c32d3e53616671;hb=6f80ef82fc120408b0b242d35f77dd92213ba318;hp=f1a6022bb9039053ae559f22357465338e4f19a3;hpb=3b5baf5d6419dedaff7f9db1c60f3fd629e6aca5;p=shibboleth%2Fcpp-xmltooling.git diff --git a/xmltooling/soap/impl/CURLSOAPTransport.cpp b/xmltooling/soap/impl/CURLSOAPTransport.cpp index f1a6022..c05184f 100644 --- a/xmltooling/soap/impl/CURLSOAPTransport.cpp +++ b/xmltooling/soap/impl/CURLSOAPTransport.cpp @@ -1,27 +1,32 @@ -/* - * Copyright 2001-2007 Internet2 - * - * Licensed under the Apache License, Version 2.0 (the "License"); - * you may not use this file except in compliance with the License. - * You may obtain a copy of the License at +/** + * Licensed to the University Corporation for Advanced Internet + * Development, Inc. (UCAID) under one or more contributor license + * agreements. See the NOTICE file distributed with this work for + * additional information regarding copyright ownership. + * + * UCAID licenses this file to you under the Apache License, + * Version 2.0 (the "License"); you may not use this file except + * in compliance with the License. You may obtain a copy of the + * License at * - * http://www.apache.org/licenses/LICENSE-2.0 + * http://www.apache.org/licenses/LICENSE-2.0 * - * Unless required by applicable law or agreed to in writing, software - * distributed under the License is distributed on an "AS IS" BASIS, - * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. - * See the License for the specific language governing permissions and - * limitations under the License. + * Unless required by applicable law or agreed to in writing, + * software distributed under the License is distributed on an + * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, + * either express or implied. See the License for the specific + * language governing permissions and limitations under the License. */ /** * CURLSOAPTransport.cpp - * - * libcurl-based SOAPTransport implementation + * + * libcurl-based SOAPTransport implementation. */ #include "internal.h" #include "exceptions.h" +#include "logging.h" #include "security/CredentialCriteria.h" #include "security/OpenSSLTrustEngine.h" #include "security/OpenSSLCredential.h" @@ -32,11 +37,10 @@ #include #include -#include #include +using namespace xmltooling::logging; using namespace xmltooling; -using namespace log4cpp; using namespace std; namespace xmltooling { @@ -46,13 +50,13 @@ namespace xmltooling { { public: CURLPool() : m_size(0), m_lock(Mutex::create()), - m_log(Category::getInstance(XMLTOOLING_LOGCAT".SOAPTransport.CURLPool")) {} + m_log(Category::getInstance(XMLTOOLING_LOGCAT ".SOAPTransport.CURL")) {} ~CURLPool(); - - CURL* get(const char* to, const char* endpoint); - void put(const char* to, const char* endpoint, CURL* handle); - - private: + + CURL* get(const SOAPTransport::Address& addr); + void put(const char* from, const char* to, const char* endpoint, CURL* handle); + + private: typedef map > poolmap_t; poolmap_t m_bindingMap; list< vector* > m_pools; @@ -60,34 +64,42 @@ namespace xmltooling { Mutex* m_lock; Category& m_log; }; - - static XMLTOOL_DLLLOCAL CURLPool* g_CURLPool = NULL; - + + static XMLTOOL_DLLLOCAL CURLPool* g_CURLPool = nullptr; + class XMLTOOL_DLLLOCAL CURLSOAPTransport : public HTTPSOAPTransport, public OpenSSLSOAPTransport { public: - CURLSOAPTransport(const char* peerName, const char* endpoint) - : m_peerName(peerName ? peerName : ""), m_endpoint(endpoint), m_handle(NULL), m_headers(NULL), + CURLSOAPTransport(const Address& addr) + : m_sender(addr.m_from ? addr.m_from : ""), m_peerName(addr.m_to ? addr.m_to : ""), m_endpoint(addr.m_endpoint), + m_handle(nullptr), m_keepHandle(false), m_headers(nullptr), #ifndef XMLTOOLING_NO_XMLSEC - m_cred(NULL), m_trustEngine(NULL), m_peerResolver(NULL), m_mandatory(false), + m_cred(nullptr), m_trustEngine(nullptr), m_peerResolver(nullptr), m_mandatory(false), #endif - m_ssl_callback(NULL), m_ssl_userptr(NULL), m_chunked(true), m_secure(false) { - m_handle = g_CURLPool->get(peerName, endpoint); - curl_easy_setopt(m_handle,CURLOPT_URL,endpoint); + m_openssl_ops(SSL_OP_ALL|SSL_OP_NO_SSLv2|SSL_OP_NO_SSLv3), m_ssl_callback(nullptr), m_ssl_userptr(nullptr), + m_chunked(true), m_authenticated(false), m_cacheTag(nullptr) { + m_handle = g_CURLPool->get(addr); + curl_easy_setopt(m_handle,CURLOPT_URL,addr.m_endpoint); curl_easy_setopt(m_handle,CURLOPT_CONNECTTIMEOUT,15); curl_easy_setopt(m_handle,CURLOPT_TIMEOUT,30); curl_easy_setopt(m_handle,CURLOPT_HTTPAUTH,0); - curl_easy_setopt(m_handle,CURLOPT_USERPWD,NULL); + curl_easy_setopt(m_handle,CURLOPT_USERPWD,nullptr); curl_easy_setopt(m_handle,CURLOPT_SSL_VERIFYHOST,2); curl_easy_setopt(m_handle,CURLOPT_HEADERDATA,this); m_headers=curl_slist_append(m_headers,"Content-Type: text/xml"); } - + virtual ~CURLSOAPTransport() { curl_slist_free_all(m_headers); - curl_easy_setopt(m_handle,CURLOPT_ERRORBUFFER,NULL); - curl_easy_setopt(m_handle,CURLOPT_PRIVATE,m_secure ? "secure" : NULL); // Save off security "state". - g_CURLPool->put(m_peerName.c_str(), m_endpoint.c_str(), m_handle); + if (m_keepHandle) { + curl_easy_setopt(m_handle, CURLOPT_USERAGENT, nullptr); + curl_easy_setopt(m_handle, CURLOPT_ERRORBUFFER, nullptr); + curl_easy_setopt(m_handle, CURLOPT_PRIVATE, m_authenticated ? "secure" : nullptr); // Save off security "state". + g_CURLPool->put(m_sender.c_str(), m_peerName.c_str(), m_endpoint.c_str(), m_handle); + } + else { + curl_easy_cleanup(m_handle); + } } bool isConfidential() const { @@ -97,40 +109,40 @@ namespace xmltooling { bool setConnectTimeout(long timeout) { return (curl_easy_setopt(m_handle,CURLOPT_CONNECTTIMEOUT,timeout)==CURLE_OK); } - + bool setTimeout(long timeout) { return (curl_easy_setopt(m_handle,CURLOPT_TIMEOUT,timeout)==CURLE_OK); } - - bool setAuth(transport_auth_t authType, const char* username=NULL, const char* password=NULL); - + + bool setAuth(transport_auth_t authType, const char* username=nullptr, const char* password=nullptr); + bool setVerifyHost(bool verify) { return (curl_easy_setopt(m_handle,CURLOPT_SSL_VERIFYHOST,verify ? 2 : 0)==CURLE_OK); } - + #ifndef XMLTOOLING_NO_XMLSEC - bool setCredential(const Credential* cred=NULL) { + bool setCredential(const Credential* cred=nullptr) { const OpenSSLCredential* down = dynamic_cast(cred); if (!down) { - m_cred = NULL; - return (cred==NULL); + m_cred = nullptr; + return (cred==nullptr); } m_cred = down; return true; } - + bool setTrustEngine( - const X509TrustEngine* trustEngine=NULL, - const CredentialResolver* peerResolver=NULL, - CredentialCriteria* criteria=NULL, + const X509TrustEngine* trustEngine=nullptr, + const CredentialResolver* peerResolver=nullptr, + CredentialCriteria* criteria=nullptr, bool mandatory=true ) { const OpenSSLTrustEngine* down = dynamic_cast(trustEngine); if (!down) { - m_trustEngine = NULL; - m_peerResolver = NULL; - m_criteria = NULL; - return (trustEngine==NULL); + m_trustEngine = nullptr; + m_peerResolver = nullptr; + m_criteria = nullptr; + return (trustEngine==nullptr); } m_trustEngine = down; m_peerResolver = peerResolver; @@ -138,52 +150,74 @@ namespace xmltooling { m_mandatory = mandatory; return true; } - + #endif - + bool useChunkedEncoding(bool chunked=true) { m_chunked = chunked; return true; } - void send(istream& in); - + bool followRedirects(bool follow, unsigned int maxRedirs) { + return ( + curl_easy_setopt(m_handle, CURLOPT_FOLLOWLOCATION, (follow ? 1 : 0)) == CURLE_OK && + curl_easy_setopt(m_handle, CURLOPT_MAXREDIRS, (follow ? maxRedirs : 0)) == CURLE_OK + ); + } + + bool setCacheTag(string* cacheTag) { + m_cacheTag = cacheTag; + return true; + } + + bool setProviderOption(const char* provider, const char* option, const char* value); + + void send(istream& in) { + send(&in); + } + + void send(istream* in=nullptr); + istream& receive() { return m_stream; } - - bool isSecure() const { - return m_secure; + + bool isAuthenticated() const { + return m_authenticated; } - void setSecure(bool secure) { - m_secure = secure; + void setAuthenticated(bool auth) { + m_authenticated = auth; } string getContentType() const; - + long getStatusCode() const; + bool setRequestHeader(const char* name, const char* val) { string temp(name); temp=temp + ": " + val; m_headers=curl_slist_append(m_headers,temp.c_str()); return true; } - + const vector& getResponseHeader(const char* val) const; - - bool setSSLCallback(ssl_ctx_callback_fn fn, void* userptr=NULL) { + + bool setSSLCallback(ssl_ctx_callback_fn fn, void* userptr=nullptr) { m_ssl_callback=fn; m_ssl_userptr=userptr; return true; } - private: + private: // per-call state - string m_peerName,m_endpoint,m_simplecreds; + string m_sender,m_peerName,m_endpoint,m_simplecreds; CURL* m_handle; + bool m_keepHandle; stringstream m_stream; struct curl_slist* m_headers; + string m_useragent; map > m_response_headers; + vector m_saved_options; #ifndef XMLTOOLING_NO_XMLSEC const OpenSSLCredential* m_cred; const OpenSSLTrustEngine* m_trustEngine; @@ -191,11 +225,13 @@ namespace xmltooling { CredentialCriteria* m_criteria; bool m_mandatory; #endif + int m_openssl_ops; ssl_ctx_callback_fn m_ssl_callback; void* m_ssl_userptr; bool m_chunked; - bool m_secure; - + bool m_authenticated; + string* m_cacheTag; + friend size_t XMLTOOL_DLLLOCAL curl_header_hook(void* ptr, size_t size, size_t nmemb, void* stream); friend CURLcode XMLTOOL_DLLLOCAL xml_ssl_ctx_callback(CURL* curl, SSL_CTX* ssl_ctx, void* userptr); friend int XMLTOOL_DLLLOCAL verify_callback(X509_STORE_CTX* x509_ctx, void* arg); @@ -211,19 +247,12 @@ namespace xmltooling { int XMLTOOL_DLLLOCAL verify_callback(X509_STORE_CTX* x509_ctx, void* arg); #endif - SOAPTransport* CURLSOAPTransportFactory(const pair& dest) + SOAPTransport* CURLSOAPTransportFactory(const SOAPTransport::Address& addr) { - return new CURLSOAPTransport(dest.first, dest.second); + return new CURLSOAPTransport(addr); } }; -void xmltooling::registerSOAPTransports() -{ - XMLToolingConfig& conf=XMLToolingConfig::getConfig(); - conf.SOAPTransportManager.registerFactory("http", CURLSOAPTransportFactory); - conf.SOAPTransportManager.registerFactory("https", CURLSOAPTransportFactory); -} - void xmltooling::initSOAPTransports() { g_CURLPool=new CURLPool(); @@ -232,7 +261,7 @@ void xmltooling::initSOAPTransports() void xmltooling::termSOAPTransports() { delete g_CURLPool; - g_CURLPool = NULL; + g_CURLPool = nullptr; } CURLPool::~CURLPool() @@ -244,20 +273,25 @@ CURLPool::~CURLPool() delete m_lock; } -CURL* CURLPool::get(const char* to, const char* endpoint) +CURL* CURLPool::get(const SOAPTransport::Address& addr) { #ifdef _DEBUG xmltooling::NDC("get"); #endif - m_log.debug("getting connection handle to %s", endpoint); + m_log.debug("getting connection handle to %s", addr.m_endpoint); + string key(addr.m_endpoint); + if (addr.m_from) + key = key + '|' + addr.m_from; + if (addr.m_to) + key = key + '|' + addr.m_to; m_lock->lock(); - poolmap_t::iterator i=m_bindingMap.find(string(to) + "|" + endpoint); - + poolmap_t::iterator i=m_bindingMap.find(key); + if (i!=m_bindingMap.end()) { // Move this pool to the front of the list. m_pools.remove(&(i->second)); m_pools.push_front(&(i->second)); - + // If a free connection exists, return it. if (!(i->second.empty())) { CURL* handle=i->second.back(); @@ -268,38 +302,44 @@ CURL* CURLPool::get(const char* to, const char* endpoint) return handle; } } - + m_lock->unlock(); m_log.debug("nothing free in pool, returning new connection handle"); - + // Create a new connection and set non-varying options. CURL* handle=curl_easy_init(); if (!handle) - return NULL; + return nullptr; curl_easy_setopt(handle,CURLOPT_NOPROGRESS,1); curl_easy_setopt(handle,CURLOPT_NOSIGNAL,1); curl_easy_setopt(handle,CURLOPT_FAILONERROR,1); - curl_easy_setopt(handle,CURLOPT_SSLVERSION,3); + // This may (but probably won't) help with < 7.20 bug in DNS caching. + curl_easy_setopt(handle,CURLOPT_DNS_CACHE_TIMEOUT,120); + curl_easy_setopt(handle,CURLOPT_SSL_CIPHER_LIST,"ALL:!aNULL:!LOW:!EXPORT:!RC4:!SSLv2"); // Verification of the peer is via TrustEngine only. curl_easy_setopt(handle,CURLOPT_SSL_VERIFYPEER,0); + curl_easy_setopt(handle,CURLOPT_CAINFO,nullptr); curl_easy_setopt(handle,CURLOPT_HEADERFUNCTION,&curl_header_hook); curl_easy_setopt(handle,CURLOPT_WRITEFUNCTION,&curl_write_hook); curl_easy_setopt(handle,CURLOPT_DEBUGFUNCTION,&curl_debug_hook); - return handle; } -void CURLPool::put(const char* to, const char* endpoint, CURL* handle) +void CURLPool::put(const char* from, const char* to, const char* endpoint, CURL* handle) { - string key = string(to) + "|" + endpoint; + string key(endpoint); + if (from) + key = key + '|' + from; + if (to) + key = key + '|' + to; m_lock->lock(); poolmap_t::iterator i=m_bindingMap.find(key); if (i==m_bindingMap.end()) m_pools.push_front(&(m_bindingMap.insert(poolmap_t::value_type(key,vector(1,handle))).first->second)); else i->second.push_back(handle); - - CURL* killit=NULL; + + CURL* killit=nullptr; if (++m_size > 256) { // Kick a handle out from the back of the bus. while (true) { @@ -310,7 +350,7 @@ void CURLPool::put(const char* to, const char* endpoint, CURL* handle) m_size--; break; } - + // Move an empty pool up to the front so we don't keep hitting it. m_pools.pop_back(); m_pools.push_front(corpse); @@ -331,7 +371,7 @@ bool CURLSOAPTransport::setAuth(transport_auth_t authType, const char* username, if (authType==transport_auth_none) { if (curl_easy_setopt(m_handle,CURLOPT_HTTPAUTH,0)!=CURLE_OK) return false; - return (curl_easy_setopt(m_handle,CURLOPT_USERPWD,NULL)==CURLE_OK); + return (curl_easy_setopt(m_handle,CURLOPT_USERPWD,nullptr)==CURLE_OK); } long flag=0; switch (authType) { @@ -347,6 +387,60 @@ bool CURLSOAPTransport::setAuth(transport_auth_t authType, const char* username, return (curl_easy_setopt(m_handle,CURLOPT_USERPWD,m_simplecreds.c_str())==CURLE_OK); } +bool CURLSOAPTransport::setProviderOption(const char* provider, const char* option, const char* value) +{ + if (!provider || !option || !value) { + return false; + } + else if (!strcmp(provider, "OpenSSL")) { + if (!strcmp(option, "SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION") && (*value=='1' || *value=='t')) { + // If the new option to enable buggy rengotiation is available, set it. + // Otherwise, signal false if this is newer than 0.9.8k, because that + // means it's 0.9.8l, which blocks renegotiation, and therefore will + // not honor this request. Older versions are buggy, so behave as though + // the flag was set anyway, so we signal true. +#if defined(SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION) + m_openssl_ops |= SSL_OP_ALLOW_UNSAFE_LEGACY_RENEGOTIATION; + return true; +#elif (OPENSSL_VERSION_NUMBER > 0x009080bfL) + return false; +#else + return true; +#endif + } + return false; + } + else if (strcmp(provider, "CURL")) { + return false; + } + + // For libcurl, the option is an enum and the value type depends on the option. + CURLoption opt = static_cast(strtol(option, nullptr, 10)); + if (opt < CURLOPTTYPE_OBJECTPOINT) + return (curl_easy_setopt(m_handle, opt, strtol(value, nullptr, 10)) == CURLE_OK); +#ifdef CURLOPTTYPE_OFF_T + else if (opt < CURLOPTTYPE_OFF_T) { + if (value) + m_saved_options.push_back(value); + return (curl_easy_setopt(m_handle, opt, value ? m_saved_options.back().c_str() : nullptr) == CURLE_OK); + } +# ifdef HAVE_CURL_OFF_T + else if (sizeof(curl_off_t) == sizeof(long)) + return (curl_easy_setopt(m_handle, opt, strtol(value, nullptr, 10)) == CURLE_OK); +# else + else if (sizeof(off_t) == sizeof(long)) + return (curl_easy_setopt(m_handle, opt, strtol(value, nullptr, 10)) == CURLE_OK); +# endif + return false; +#else + else { + if (value) + m_saved_options.push_back(value); + return (curl_easy_setopt(m_handle, opt, value ? m_saved_options.back().c_str() : nullptr) == CURLE_OK); + } +#endif +} + const vector& CURLSOAPTransport::getResponseHeader(const char* name) const { static vector emptyVector; @@ -354,7 +448,7 @@ const vector& CURLSOAPTransport::getResponseHeader(const char* name) con map >::const_iterator i=m_response_headers.find(name); if (i!=m_response_headers.end()) return i->second; - + for (map >::const_iterator j=m_response_headers.begin(); j!=m_response_headers.end(); j++) { #ifdef HAVE_STRCASECMP if (!strcasecmp(j->first.c_str(), name)) @@ -363,24 +457,36 @@ const vector& CURLSOAPTransport::getResponseHeader(const char* name) con #endif return j->second; } - + return emptyVector; } string CURLSOAPTransport::getContentType() const { - char* content_type=NULL; + char* content_type=nullptr; curl_easy_getinfo(m_handle,CURLINFO_CONTENT_TYPE,&content_type); return content_type ? content_type : ""; } -void CURLSOAPTransport::send(istream& in) +long CURLSOAPTransport::getStatusCode() const +{ + long code=200; + if (curl_easy_getinfo(m_handle, CURLINFO_RESPONSE_CODE, &code) != CURLE_OK) + code = 200; + return code; +} + +void CURLSOAPTransport::send(istream* in) { #ifdef _DEBUG xmltooling::NDC ndc("send"); #endif - Category& log=Category::getInstance(XMLTOOLING_LOGCAT".SOAPTransport"); - Category& log_curl=Category::getInstance(XMLTOOLING_LOGCAT".libcurl"); + Category& log=Category::getInstance(XMLTOOLING_LOGCAT ".SOAPTransport.CURL"); + Category& log_curl=Category::getInstance(XMLTOOLING_LOGCAT ".libcurl"); + + // For this implementation, it's sufficient to check for https as a sign of transport security. + if (m_mandatory && !isConfidential()) + throw IOException("Blocking unprotected HTTP request, transport authentication by server required."); string msg; @@ -390,22 +496,28 @@ void CURLSOAPTransport::send(istream& in) // Setup standard per-call curl properties. curl_easy_setopt(m_handle,CURLOPT_DEBUGDATA,&log_curl); curl_easy_setopt(m_handle,CURLOPT_FILE,&m_stream); - curl_easy_setopt(m_handle,CURLOPT_POST,1); - if (m_chunked) { + if (m_chunked && in) { + curl_easy_setopt(m_handle,CURLOPT_POST,1); m_headers=curl_slist_append(m_headers,"Transfer-Encoding: chunked"); curl_easy_setopt(m_handle,CURLOPT_READFUNCTION,&curl_read_hook); - curl_easy_setopt(m_handle,CURLOPT_READDATA,&in); + curl_easy_setopt(m_handle,CURLOPT_READDATA,in); } - else { + else if (in) { char buf[1024]; - while (in) { - in.read(buf,1024); - msg.append(buf,in.gcount()); + while (*in) { + in->read(buf,1024); + msg.append(buf,in->gcount()); } - curl_easy_setopt(m_handle,CURLOPT_READFUNCTION,NULL); + curl_easy_setopt(m_handle,CURLOPT_POST,1); + curl_easy_setopt(m_handle,CURLOPT_READFUNCTION,nullptr); curl_easy_setopt(m_handle,CURLOPT_POSTFIELDS,msg.c_str()); curl_easy_setopt(m_handle,CURLOPT_POSTFIELDSIZE,msg.length()); } + else { + curl_easy_setopt(m_handle,CURLOPT_HTTPGET,1); + curl_easy_setopt(m_handle,CURLOPT_FOLLOWLOCATION,1); + curl_easy_setopt(m_handle,CURLOPT_MAXREDIRS,6); + } char curl_errorbuf[CURL_ERROR_SIZE]; curl_errorbuf[0]=0; @@ -413,6 +525,24 @@ void CURLSOAPTransport::send(istream& in) if (log_curl.isDebugEnabled()) curl_easy_setopt(m_handle,CURLOPT_VERBOSE,1); + // Check for cache tag. + if (m_cacheTag && !m_cacheTag->empty()) { + string hdr("If-None-Match: "); + hdr += *m_cacheTag; + m_headers = curl_slist_append(m_headers, hdr.c_str()); + } + + m_useragent = XMLToolingConfig::getConfig().user_agent; + if (!m_useragent.empty()) { + curl_version_info_data* curlver = curl_version_info(CURLVERSION_NOW); + + if (curlver) { + m_useragent = m_useragent + " libcurl/" + curlver->version + ' ' + curlver->ssl_version; + } + + curl_easy_setopt(m_handle, CURLOPT_USERAGENT, m_useragent.c_str()); + } + // Set request headers. curl_easy_setopt(m_handle,CURLOPT_HTTPHEADER,m_headers); @@ -426,23 +556,37 @@ void CURLSOAPTransport::send(istream& in) // Restore security "state". Necessary because the callback only runs // when handshakes occur. Even new TCP connections won't execute it. - char* priv=NULL; + char* priv=nullptr; curl_easy_getinfo(m_handle,CURLINFO_PRIVATE,&priv); if (priv) - m_secure=true; + m_authenticated=true; } else { - curl_easy_setopt(m_handle,CURLOPT_SSL_CTX_FUNCTION,NULL); - curl_easy_setopt(m_handle,CURLOPT_SSL_CTX_DATA,NULL); + curl_easy_setopt(m_handle,CURLOPT_SSL_CTX_FUNCTION,nullptr); + curl_easy_setopt(m_handle,CURLOPT_SSL_CTX_DATA,nullptr); } - + // Make the call. log.debug("sending SOAP message to %s", m_endpoint.c_str()); - if (curl_easy_perform(m_handle) != CURLE_OK) { + CURLcode code = curl_easy_perform(m_handle); + if (code != CURLE_OK) { + if (code == CURLE_SSL_CIPHER) { + log.error("on Red Hat 6+, make sure libcurl used is built with OpenSSL"); + } throw IOException( - string("CURLSOAPTransport failed while contacting SOAP responder: ") + + string("CURLSOAPTransport failed while contacting SOAP endpoint (") + m_endpoint + "): " + (curl_errorbuf[0] ? curl_errorbuf : "no further information available")); } + + // This won't prevent every possible failed connection from being kept, but it's something. + m_keepHandle = true; + + // Check for outgoing cache tag. + if (m_cacheTag) { + const vector& tags = getResponseHeader("ETag"); + if (!tags.empty()) + *m_cacheTag = tags.front(); + } } // callback to buffer headers from server @@ -475,10 +619,10 @@ size_t xmltooling::curl_header_hook(void* ptr, size_t size, size_t nmemb, void* // callback to send data to server size_t xmltooling::curl_read_hook(void* ptr, size_t size, size_t nmemb, void* stream) { - // *stream is actually an istream object - istream& buf=*(reinterpret_cast(stream)); - buf.read(reinterpret_cast(ptr),size*nmemb); - return buf.gcount(); + // stream is actually an istream pointer + istream* buf=reinterpret_cast(stream); + buf->read(reinterpret_cast(ptr),size*nmemb); + return buf->gcount(); } // callback to buffer data from server @@ -503,8 +647,8 @@ int xmltooling::curl_debug_hook(CURL* handle, curl_infotype type, char* data, si #ifndef XMLTOOLING_NO_XMLSEC int xmltooling::verify_callback(X509_STORE_CTX* x509_ctx, void* arg) { - Category& log = Category::getInstance("OpenSSL"); - log.debug("invoking X509 verify callback"); + Category& log=Category::getInstance(XMLTOOLING_LOGCAT ".SOAPTransport.CURL"); + log.debug("invoking custom X.509 verify callback"); #if (OPENSSL_VERSION_NUMBER >= 0x00907000L) CURLSOAPTransport* ctx = reinterpret_cast(arg); #else @@ -521,27 +665,41 @@ int xmltooling::verify_callback(X509_STORE_CTX* x509_ctx, void* arg) bool success=false; if (ctx->m_criteria) { - ctx->m_criteria->setUsage(CredentialCriteria::TLS_CREDENTIAL); + ctx->m_criteria->setUsage(Credential::TLS_CREDENTIAL); // Bypass name check (handled for us by curl). - ctx->m_criteria->setPeerName(NULL); + ctx->m_criteria->setPeerName(nullptr); success = ctx->m_trustEngine->validate(x509_ctx->cert,x509_ctx->untrusted,*(ctx->m_peerResolver),ctx->m_criteria); } else { // Bypass name check (handled for us by curl). CredentialCriteria cc; - cc.setUsage(CredentialCriteria::TLS_CREDENTIAL); + cc.setUsage(Credential::TLS_CREDENTIAL); success = ctx->m_trustEngine->validate(x509_ctx->cert,x509_ctx->untrusted,*(ctx->m_peerResolver),&cc); } - + if (!success) { log.error("supplied TrustEngine failed to validate SSL/TLS server certificate"); - x509_ctx->error=X509_V_ERR_APPLICATION_VERIFICATION; // generic error, check log for plugin specifics - ctx->setSecure(false); + if (x509_ctx->cert) { + BIO* b = BIO_new(BIO_s_mem()); + X509_print(b, x509_ctx->cert); + BUF_MEM* bptr = nullptr; + BIO_get_mem_ptr(b, &bptr); + if (bptr && bptr->length > 0) { + string s(bptr->data, bptr->length); + if (ctx->m_mandatory) + log.error(s); + else + log.debug(s); + } + BIO_free(b); + } + x509_ctx->error = X509_V_ERR_APPLICATION_VERIFICATION; // generic error, check log for plugin specifics + ctx->setAuthenticated(false); return ctx->m_mandatory ? 0 : 1; } - + // Signal success. Hopefully it doesn't matter what's actually in the structure now. - ctx->setSecure(true); + ctx->setAuthenticated(true); return 1; } #endif @@ -551,12 +709,21 @@ CURLcode xmltooling::xml_ssl_ctx_callback(CURL* curl, SSL_CTX* ssl_ctx, void* us { CURLSOAPTransport* conf = reinterpret_cast(userptr); + // Default flags manually disable SSLv2 and SSLv3 so we're not dependent on libcurl + // to do it. Also disable the ticket option where implemented, since this breaks a + // variety of servers. Newer libcurl also does this for us. +#ifdef SSL_OP_NO_TICKET + SSL_CTX_set_options(ssl_ctx, conf->m_openssl_ops|SSL_OP_NO_TICKET); +#else + SSL_CTX_set_options(ssl_ctx, conf->m_openssl_ops); +#endif + #ifndef XMLTOOLING_NO_XMLSEC if (conf->m_cred) conf->m_cred->attach(ssl_ctx); if (conf->m_trustEngine) { - SSL_CTX_set_verify(ssl_ctx,SSL_VERIFY_PEER,NULL); + SSL_CTX_set_verify(ssl_ctx,SSL_VERIFY_PEER,nullptr); #if (OPENSSL_VERSION_NUMBER >= 0x00907000L) // With 0.9.7, we can pass a callback argument directly. SSL_CTX_set_cert_verify_callback(ssl_ctx,verify_callback,userptr); @@ -564,14 +731,14 @@ CURLcode xmltooling::xml_ssl_ctx_callback(CURL* curl, SSL_CTX* ssl_ctx, void* us // With 0.9.6, there's no argument, so we're going to use a really embarrassing hack and // stuff the argument in the depth property where it will get copied to the context object // that's handed to the callback. - SSL_CTX_set_cert_verify_callback(ssl_ctx,reinterpret_cast(verify_callback),NULL); + SSL_CTX_set_cert_verify_callback(ssl_ctx,reinterpret_cast(verify_callback),nullptr); SSL_CTX_set_verify_depth(ssl_ctx,reinterpret_cast(userptr)); #endif } #endif - + if (conf->m_ssl_callback && !conf->m_ssl_callback(conf, ssl_ctx, conf->m_ssl_userptr)) return CURLE_SSL_CERTPROBLEM; - + return CURLE_OK; }