xmltooling/XMLToolingConfig.cpp

   1 /**
   2  * Licensed to the University Corporation for Advanced Internet
   3  * Development, Inc. (UCAID) under one or more contributor license
   4  * agreements. See the NOTICE file distributed with this work for
   5  * additional information regarding copyright ownership.
   6  *
   7  * UCAID licenses this file to you under the Apache License,
   8  * Version 2.0 (the "License"); you may not use this file except
   9  * in compliance with the License. You may obtain a copy of the
  10  * License at
  11  *
  12  * http://www.apache.org/licenses/LICENSE-2.0
  13  *
  14  * Unless required by applicable law or agreed to in writing,
  15  * software distributed under the License is distributed on an
  16  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND,
  17  * either express or implied. See the License for the specific
  18  * language governing permissions and limitations under the License.
  19  */
  20
  21 /**
  22  * XMLToolingConfig.cpp
  23  *
  24  * Library configuration.
  25  */
  26
  27 #include "internal.h"
  28 #include "exceptions.h"
  29 #include "logging.h"
  30 #include "XMLToolingConfig.h"
  31 #include "encryption/Encryption.h"
  32 #include "encryption/Encrypter.h"
  33 #include "impl/UnknownElement.h"
  34 #include "io/HTTPResponse.h"
  35 #include "security/TrustEngine.h"
  36 #include "security/OpenSSLCryptoX509CRL.h"
  37 #include "security/CredentialResolver.h"
  38 #include "security/KeyInfoResolver.h"
  39 #include "security/PathValidator.h"
  40 #include "signature/KeyInfo.h"
  41 #include "signature/Signature.h"
  42 #include "soap/SOAP.h"
  43 #include "soap/SOAPTransport.h"
  44 #include "util/NDC.h"
  45 #include "util/PathResolver.h"
  46 #include "util/ReplayCache.h"
  47 #include "util/StorageService.h"
  48 #include "util/TemplateEngine.h"
  49 #include "util/Threads.h"
  50 #include "util/URLEncoder.h"
  51 #include "validation/ValidatorSuite.h"
  52
  53 #ifdef HAVE_DLFCN_H
  54 # include <dlfcn.h>
  55 #endif
  56
  57 #include <stdexcept>
  58 #include <boost/ptr_container/ptr_vector.hpp>
  59
  60 #if defined(XMLTOOLING_LOG4SHIB)
  61 # include <log4shib/PropertyConfigurator.hh>
  62 # include <log4shib/OstreamAppender.hh>
  63 #elif defined(XMLTOOLING_LOG4CPP)
  64 # include <log4cpp/PropertyConfigurator.hh>
  65 # include <log4cpp/OstreamAppender.hh>
  66 #endif
  67 #include <xercesc/util/PlatformUtils.hpp>
  68 #include <xercesc/util/XMLUniDefs.hpp>
  69 #ifndef XMLTOOLING_NO_XMLSEC
  70 # include <curl/curl.h>
  71 # include <openssl/err.h>
  72 # include <openssl/evp.h>
  73 # include <xsec/framework/XSECAlgorithmMapper.hpp>
  74 # include <xsec/framework/XSECException.hpp>
  75 # include <xsec/framework/XSECProvider.hpp>
  76 # include <xsec/transformers/TXFMBase.hpp>
  77 #endif
  78
  79 using namespace soap11;
  80 using namespace xmltooling::logging;
  81 using namespace xmltooling;
  82 using namespace xercesc;
  83 using namespace boost;
  84 using namespace std;
  85
  86 #ifdef WIN32
  87 # if (OPENSSL_VERSION_NUMBER >= 0x00908000)
  88 #  define XMLTOOLING_OPENSSL_HAVE_SHA2 1
  89 # endif
  90 #endif
  91
  92
  93 DECL_XMLTOOLING_EXCEPTION_FACTORY(XMLParserException,xmltooling);
  94 DECL_XMLTOOLING_EXCEPTION_FACTORY(XMLObjectException,xmltooling);
  95 DECL_XMLTOOLING_EXCEPTION_FACTORY(MarshallingException,xmltooling);
  96 DECL_XMLTOOLING_EXCEPTION_FACTORY(UnmarshallingException,xmltooling);
  97 DECL_XMLTOOLING_EXCEPTION_FACTORY(UnknownElementException,xmltooling);
  98 DECL_XMLTOOLING_EXCEPTION_FACTORY(UnknownAttributeException,xmltooling);
  99 DECL_XMLTOOLING_EXCEPTION_FACTORY(UnknownExtensionException,xmltooling);
 100 DECL_XMLTOOLING_EXCEPTION_FACTORY(ValidationException,xmltooling);
 101 DECL_XMLTOOLING_EXCEPTION_FACTORY(IOException,xmltooling);
 102
 103 #ifndef XMLTOOLING_NO_XMLSEC
 104 using namespace xmlencryption;
 105 using namespace xmlsignature;
 106     DECL_XMLTOOLING_EXCEPTION_FACTORY(XMLSecurityException,xmltooling);
 107     DECL_XMLTOOLING_EXCEPTION_FACTORY(SignatureException,xmlsignature);
 108     DECL_XMLTOOLING_EXCEPTION_FACTORY(EncryptionException,xmlencryption);
 109 #endif
 110
 111 namespace {
 112     static XMLToolingInternalConfig g_config;
 113 #ifndef XMLTOOLING_NO_XMLSEC
 114     static ptr_vector<Mutex> g_openssl_locks;
 115
 116     extern "C" void openssl_locking_callback(int mode,int n,const char *file,int line)
 117     {
 118         if (mode & CRYPTO_LOCK)
 119             g_openssl_locks[n].lock();
 120         else
 121             g_openssl_locks[n].unlock();
 122     }
 123
 124 # ifndef WIN32
 125     extern "C" unsigned long openssl_thread_id(void)
 126     {
 127         return (unsigned long)(pthread_self());
 128     }
 129 # endif
 130
 131 # ifdef XMLTOOLING_XMLSEC_DEBUGLOGGING
 132     class TXFMOutputLog : public TXFMBase {
 133             TXFMOutputLog();
 134     public:
 135         TXFMOutputLog(DOMDocument* doc) : TXFMBase(doc), m_log(Category::getInstance(XMLTOOLING_LOGCAT".Signature.Debugger")) {
 136             input = nullptr;
 137         }
 138         ~TXFMOutputLog() {
 139             m_log.debug("\n----- END SIGNATURE DEBUG -----\n");
 140         }
 141
 142             void setInput(TXFMBase *newInput) {
 143                 input = newInput;
 144                 if (newInput->getOutputType() != TXFMBase::BYTE_STREAM)
 145                         throw XSECException(XSECException::TransformInputOutputFail, "OutputLog transform requires BYTE_STREAM input");
 146                 keepComments = input->getCommentsStatus();
 147             m_log.debug("\n----- BEGIN SIGNATURE DEBUG -----\n");
 148         }
 149
 150             TXFMBase::ioType getInputType() {
 151             return TXFMBase::BYTE_STREAM;
 152         }
 153             TXFMBase::ioType getOutputType() {
 154             return TXFMBase::BYTE_STREAM;
 155         }
 156             TXFMBase::nodeType getNodeType() {
 157             return TXFMBase::DOM_NODE_NONE;
 158         }
 159
 160             unsigned int readBytes(XMLByte * const toFill, const unsigned int maxToFill) {
 161                 unsigned int sz = input->readBytes(toFill, maxToFill);
 162             m_log.debug(string(reinterpret_cast<char* const>(toFill), sz));
 163                 return sz;
 164         }
 165
 166             DOMDocument* getDocument() {
 167             return nullptr;
 168         }
 169             DOMNode* getFragmentNode() {
 170             return nullptr;
 171         }
 172             const XMLCh* getFragmentId() {
 173             return nullptr;
 174         }
 175
 176     private:
 177         Category& m_log;
 178     };
 179
 180     TXFMBase* TXFMOutputLogFactory(DOMDocument* doc) {
 181         if (Category::getInstance(XMLTOOLING_LOGCAT".Signature.Debugger").isDebugEnabled())
 182             return new TXFMOutputLog(doc);
 183         return nullptr;
 184     }
 185 # endif
 186
 187 #endif
 188
 189 #ifdef WIN32
 190     BOOL LogEvent(
 191         LPCSTR  lpUNCServerName,
 192         WORD  wType,
 193         DWORD  dwEventID,
 194         PSID  lpUserSid,
 195         LPCSTR  message)
 196     {
 197         LPCSTR  messages[] = {message, nullptr};
 198
 199         HANDLE hElog = RegisterEventSource(lpUNCServerName, "OpenSAML XMLTooling Library");
 200         BOOL res = ReportEvent(hElog, wType, 0, dwEventID, lpUserSid, 1, 0, messages, nullptr);
 201         return (DeregisterEventSource(hElog) && res);
 202     }
 203 #endif
 204 }
 205
 206 XMLToolingConfig& XMLToolingConfig::getConfig()
 207 {
 208     return g_config;
 209 }
 210
 211 XMLToolingInternalConfig& XMLToolingInternalConfig::getInternalConfig()
 212 {
 213     return g_config;
 214 }
 215
 216 #ifndef XMLTOOLING_NO_XMLSEC
 217 XMLToolingConfig::XMLToolingConfig()
 218     : m_keyInfoResolver(nullptr), m_replayCache(nullptr), m_pathResolver(nullptr), m_templateEngine(nullptr), m_urlEncoder(nullptr), clock_skew_secs(180)
 219 #else
 220 XMLToolingConfig::XMLToolingConfig()
 221     : m_pathResolver(nullptr), m_templateEngine(nullptr), m_urlEncoder(nullptr), clock_skew_secs(180)
 222 #endif
 223 {
 224 }
 225
 226 XMLToolingConfig::~XMLToolingConfig()
 227 {
 228 }
 229
 230 #ifndef XMLTOOLING_LITE
 231 const KeyInfoResolver* XMLToolingConfig::getKeyInfoResolver() const
 232 {
 233     return m_keyInfoResolver;
 234 }
 235
 236 ReplayCache* XMLToolingConfig::getReplayCache() const
 237 {
 238     return m_replayCache;
 239 }
 240
 241 void XMLToolingConfig::setKeyInfoResolver(xmltooling::KeyInfoResolver *keyInfoResolver)
 242 {
 243     delete m_keyInfoResolver;
 244     m_keyInfoResolver = keyInfoResolver;
 245 }
 246
 247 void XMLToolingConfig::setReplayCache(ReplayCache* replayCache)
 248 {
 249     delete m_replayCache;
 250     m_replayCache = replayCache;
 251 }
 252 #endif
 253
 254 PathResolver* XMLToolingConfig::getPathResolver() const
 255 {
 256     return m_pathResolver;
 257 }
 258
 259 TemplateEngine* XMLToolingConfig::getTemplateEngine() const
 260 {
 261     return m_templateEngine;
 262 }
 263
 264 const URLEncoder* XMLToolingConfig::getURLEncoder() const
 265 {
 266     return m_urlEncoder;
 267 }
 268
 269 void XMLToolingConfig::setPathResolver(PathResolver* pathResolver)
 270 {
 271     delete m_pathResolver;
 272     m_pathResolver = pathResolver;
 273 }
 274
 275 void XMLToolingConfig::setTemplateEngine(TemplateEngine* templateEngine)
 276 {
 277     delete m_templateEngine;
 278     m_templateEngine = templateEngine;
 279 }
 280
 281 void XMLToolingConfig::setURLEncoder(URLEncoder* urlEncoder)
 282 {
 283     delete m_urlEncoder;
 284     m_urlEncoder = urlEncoder;
 285 }
 286
 287 XMLToolingInternalConfig::XMLToolingInternalConfig() :
 288 #ifndef XMLTOOLING_NO_XMLSEC
 289     m_xsecProvider(nullptr),
 290 #endif
 291     m_initCount(0), m_lock(Mutex::create()), m_parserPool(nullptr), m_validatingPool(nullptr)
 292 {
 293 }
 294
 295 XMLToolingInternalConfig::~XMLToolingInternalConfig()
 296 {
 297 }
 298
 299 bool XMLToolingInternalConfig::log_config(const char* config)
 300 {
 301     try {
 302         if (!config || !*config)
 303             config=getenv("XMLTOOLING_LOG_CONFIG");
 304         if (!config || !*config)
 305             config="WARN";
 306
 307         bool level=false;
 308         Category& root = Category::getRoot();
 309         if (!strcmp(config,"DEBUG")) {
 310             root.setPriority(Priority::DEBUG);
 311             level=true;
 312         }
 313         else if (!strcmp(config,"INFO")) {
 314             root.setPriority(Priority::INFO);
 315             level=true;
 316         }
 317         else if (!strcmp(config,"NOTICE")) {
 318             root.setPriority(Priority::NOTICE);
 319             level=true;
 320         }
 321         else if (!strcmp(config,"WARN")) {
 322             root.setPriority(Priority::WARN);
 323             level=true;
 324         }
 325         else if (!strcmp(config,"ERROR")) {
 326             root.setPriority(Priority::ERROR);
 327             level=true;
 328         }
 329         else if (!strcmp(config,"CRIT")) {
 330             root.setPriority(Priority::CRIT);
 331             level=true;
 332         }
 333         else if (!strcmp(config,"ALERT")) {
 334             root.setPriority(Priority::ALERT);
 335             level=true;
 336         }
 337         else if (!strcmp(config,"EMERG")) {
 338             root.setPriority(Priority::EMERG);
 339             level=true;
 340         }
 341         else if (!strcmp(config,"FATAL")) {
 342             root.setPriority(Priority::FATAL);
 343             level=true;
 344         }
 345         if (level) {
 346             root.setAppender(new OstreamAppender("default",&cerr));
 347         }
 348         else {
 349             string path(config);
 350             PropertyConfigurator::configure(m_pathResolver ? m_pathResolver->resolve(path, PathResolver::XMLTOOLING_CFG_FILE) : path);
 351         }
 352
 353 #ifndef XMLTOOLING_NO_XMLSEC
 354         Category::getInstance(XMLTOOLING_LOGCAT".Signature.Debugger").setAdditivity(false);
 355 #endif
 356         }
 357     catch (const ConfigureFailure& e) {
 358         string msg = string("error in file permissions or logging configuration: ") + e.what();
 359         Category::getInstance(XMLTOOLING_LOGCAT".Logging").crit(msg);
 360 #ifdef WIN32
 361         LogEvent(nullptr, EVENTLOG_ERROR_TYPE, 2100, nullptr, msg.c_str());
 362 #endif
 363         return false;
 364     }
 365
 366     return true;
 367 }
 368
 369 bool XMLToolingInternalConfig::init()
 370 {
 371 #ifdef _DEBUG
 372     xmltooling::NDC ndc("init");
 373 #endif
 374     Category& log=Category::getInstance(XMLTOOLING_LOGCAT".Config");
 375
 376     Lock initLock(m_lock);
 377
 378     if (m_initCount == INT_MAX) {
 379         log.crit("library initialized too many times");
 380         return false;
 381     }
 382
 383     if (m_initCount >= 1) {
 384         ++m_initCount;
 385         return true;
 386     }
 387
 388     try {
 389         log.debug("library initialization started");
 390
 391 #ifndef XMLTOOLING_NO_XMLSEC
 392         if (curl_global_init(CURL_GLOBAL_ALL)) {
 393             log.fatal("failed to initialize libcurl, OpenSSL, or Winsock");
 394             return false;
 395         }
 396         curl_version_info_data* curlver = curl_version_info(CURLVERSION_NOW);
 397         if (curlver) {
 398             log.debug("libcurl %s initialization complete", curlver->version);
 399             if (!(curlver->features & CURL_VERSION_SSL)) {
 400                 log.warn("libcurl lacks TLS/SSL support, this will greatly limit functionality");
 401             }
 402         }
 403         else {
 404             log.debug("libcurl %s initialization complete", LIBCURL_VERSION);
 405         }
 406 #endif
 407
 408         XMLPlatformUtils::Initialize();
 409         log.debug("Xerces %s initialization complete", XERCES_FULLVERSIONDOT);
 410
 411 #ifndef XMLTOOLING_NO_XMLSEC
 412         XSECPlatformUtils::Initialise();
 413 # ifdef XMLTOOLING_XMLSEC_DEBUGLOGGING
 414         XSECPlatformUtils::SetReferenceLoggingSink(TXFMOutputLogFactory);
 415 # endif
 416         m_xsecProvider=new XSECProvider();
 417         log.debug("XML-Security %s initialization complete", XSEC_FULLVERSIONDOT);
 418 #endif
 419
 420         m_parserPool=new ParserPool();
 421         m_validatingPool=new ParserPool(true,true);
 422
 423         // Load catalogs from deprecated path setting.
 424         if (!catalog_path.empty())
 425             m_validatingPool->loadCatalogs(catalog_path.c_str());
 426
 427         // default registrations
 428         XMLObjectBuilder::registerDefaultBuilder(new UnknownElementBuilder());
 429
 430         registerSOAPClasses();
 431
 432         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(XMLParserException,xmltooling);
 433         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(XMLObjectException,xmltooling);
 434         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(MarshallingException,xmltooling);
 435         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(UnmarshallingException,xmltooling);
 436         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(UnknownElementException,xmltooling);
 437         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(UnknownAttributeException,xmltooling);
 438         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(ValidationException,xmltooling);
 439         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(IOException,xmltooling);
 440
 441 #ifndef XMLTOOLING_NO_XMLSEC
 442         XMLObjectBuilder::registerBuilder(QName(xmlconstants::XMLSIG_NS,Signature::LOCAL_NAME),new SignatureBuilder());
 443         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(XMLSecurityException,xmltooling);
 444         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(SignatureException,xmlsignature);
 445         REGISTER_XMLTOOLING_EXCEPTION_FACTORY(EncryptionException,xmlencryption);
 446         registerKeyInfoClasses();
 447         registerEncryptionClasses();
 448         registerCredentialResolvers();
 449         registerKeyInfoResolvers();
 450         registerPathValidators();
 451         registerTrustEngines();
 452         registerXMLAlgorithms();
 453         m_keyInfoResolver = KeyInfoResolverManager.newPlugin(INLINE_KEYINFO_RESOLVER,nullptr);
 454 #endif
 455
 456 #ifndef XMLTOOLING_LITE
 457         registerStorageServices();
 458 #endif
 459         registerSOAPTransports();
 460         initSOAPTransports();
 461
 462         m_pathResolver = new PathResolver();
 463         m_urlEncoder = new URLEncoder();
 464
 465         HTTPResponse::getAllowedSchemes().push_back("https");
 466         HTTPResponse::getAllowedSchemes().push_back("http");
 467
 468         // Register xml:id as an ID attribute.
 469         static const XMLCh xmlid[] = UNICODE_LITERAL_2(i,d);
 470         AttributeExtensibleXMLObject::registerIDAttribute(QName(xmlconstants::XML_NS, xmlid));
 471     }
 472     catch (const xercesc::XMLException&) {
 473         log.fatal("caught exception while initializing Xerces");
 474 #ifndef XMLTOOLING_NO_XMLSEC
 475         curl_global_cleanup();
 476 #endif
 477         return false;
 478     }
 479
 480 #ifndef XMLTOOLING_NO_XMLSEC
 481     // Set up OpenSSL locking.
 482     for (int i=0; i<CRYPTO_num_locks(); i++)
 483         g_openssl_locks.push_back(Mutex::create());
 484     CRYPTO_set_locking_callback(openssl_locking_callback);
 485 # ifndef WIN32
 486     CRYPTO_set_id_callback(openssl_thread_id);
 487 # endif
 488 #endif
 489
 490     log.info("%s library initialization complete", PACKAGE_STRING);
 491     ++m_initCount;
 492     return true;
 493 }
 494
 495 void XMLToolingInternalConfig::term()
 496 {
 497 #ifdef _DEBUG
 498     xmltooling::NDC ndc("term");
 499 #endif
 500
 501     Lock initLock(m_lock);
 502     if (m_initCount == 0) {
 503         Category::getInstance(XMLTOOLING_LOGCAT".Config").crit("term without corresponding init");
 504         return;
 505     }
 506     else if (--m_initCount > 0) {
 507         return;
 508     }
 509
 510 #ifndef XMLTOOLING_NO_XMLSEC
 511     CRYPTO_set_locking_callback(nullptr);
 512     g_openssl_locks.clear();
 513 #endif
 514
 515     SchemaValidators.destroyValidators();
 516     XMLObjectBuilder::destroyBuilders();
 517     XMLToolingException::deregisterFactories();
 518     AttributeExtensibleXMLObject::deregisterIDAttributes();
 519
 520     termSOAPTransports();
 521     SOAPTransportManager.deregisterFactories();
 522
 523 #ifndef XMLTOOLING_LITE
 524     StorageServiceManager.deregisterFactories();
 525 #endif
 526
 527 #ifndef XMLTOOLING_NO_XMLSEC
 528     TrustEngineManager.deregisterFactories();
 529     CredentialResolverManager.deregisterFactories();
 530     KeyInfoResolverManager.deregisterFactories();
 531     m_algorithmMap.clear();
 532
 533     delete m_keyInfoResolver;
 534     m_keyInfoResolver = nullptr;
 535
 536     delete m_replayCache;
 537     m_replayCache = nullptr;
 538 #endif
 539
 540     delete m_pathResolver;
 541     m_pathResolver = nullptr;
 542
 543     delete m_templateEngine;
 544     m_templateEngine = nullptr;
 545
 546     delete m_urlEncoder;
 547     m_urlEncoder = nullptr;
 548
 549     for (vector<void*>::reverse_iterator i=m_libhandles.rbegin(); i!=m_libhandles.rend(); i++) {
 550 #if defined(WIN32)
 551         FARPROC fn=GetProcAddress(static_cast<HMODULE>(*i),"xmltooling_extension_term");
 552         if (fn)
 553             fn();
 554         FreeLibrary(static_cast<HMODULE>(*i));
 555 #elif defined(HAVE_DLFCN_H)
 556         void (*fn)()=(void (*)())dlsym(*i,"xmltooling_extension_term");
 557         if (fn)
 558             fn();
 559         dlclose(*i);
 560 #else
 561 # error "Don't know about dynamic loading on this platform!"
 562 #endif
 563     }
 564     m_libhandles.clear();
 565
 566     delete m_parserPool;
 567     m_parserPool=nullptr;
 568     delete m_validatingPool;
 569     m_validatingPool=nullptr;
 570
 571     for_each(m_namedLocks.begin(), m_namedLocks.end(), cleanup_pair<string,Mutex>());
 572     m_namedLocks.clear();
 573
 574 #ifndef XMLTOOLING_NO_XMLSEC
 575     delete m_xsecProvider;
 576     m_xsecProvider=nullptr;
 577     XSECPlatformUtils::Terminate();
 578 #endif
 579
 580     XMLPlatformUtils::Terminate();
 581
 582 #ifndef XMLTOOLING_NO_XMLSEC
 583     curl_global_cleanup();
 584 #endif
 585    Category::getInstance(XMLTOOLING_LOGCAT".Config").info("%s library shutdown complete", PACKAGE_STRING);
 586 }
 587
 588 Lockable* XMLToolingInternalConfig::lock()
 589 {
 590     m_lock->lock();
 591     return this;
 592 }
 593
 594 void XMLToolingInternalConfig::unlock()
 595 {
 596     m_lock->unlock();
 597 }
 598
 599 Mutex& XMLToolingInternalConfig::getNamedMutex(const char* name)
 600 {
 601     Locker glock(this);
 602     map<string,Mutex*>::const_iterator m = m_namedLocks.find(name);
 603     if (m != m_namedLocks.end())
 604         return *(m->second);
 605     Mutex* newlock = Mutex::create();
 606     m_namedLocks[name] = newlock;
 607     return *newlock;
 608 }
 609
 610 bool XMLToolingInternalConfig::load_library(const char* path, void* context)
 611 {
 612 #ifdef _DEBUG
 613     xmltooling::NDC ndc("LoadLibrary");
 614 #endif
 615     Category& log=Category::getInstance(XMLTOOLING_LOGCAT".Config");
 616     log.info("loading extension: %s", path);
 617
 618     Locker locker(this);
 619
 620     string resolved(path);
 621     m_pathResolver->resolve(resolved, PathResolver::XMLTOOLING_LIB_FILE);
 622
 623 #if defined(WIN32)
 624     HMODULE handle=nullptr;
 625     for (string::iterator i = resolved.begin(); i != resolved.end(); ++i)
 626         if (*i == '/')
 627             *i = '\\';
 628
 629     UINT em=SetErrorMode(SEM_FAILCRITICALERRORS);
 630     try {
 631         handle=LoadLibraryEx(resolved.c_str(),nullptr,LOAD_WITH_ALTERED_SEARCH_PATH);
 632         if (!handle)
 633              handle=LoadLibraryEx(resolved.c_str(),nullptr,0);
 634         if (!handle)
 635             throw runtime_error(string("unable to load extension library: ") + resolved);
 636         FARPROC fn=GetProcAddress(handle,"xmltooling_extension_init");
 637         if (!fn)
 638             throw runtime_error(string("unable to locate xmltooling_extension_init entry point: ") + resolved);
 639         if (reinterpret_cast<int(*)(void*)>(fn)(context)!=0)
 640             throw runtime_error(string("detected error in xmltooling_extension_init: ") + resolved);
 641         SetErrorMode(em);
 642     }
 643     catch(std::exception&) {
 644         if (handle)
 645             FreeLibrary(handle);
 646         SetErrorMode(em);
 647         throw;
 648     }
 649
 650 #elif defined(HAVE_DLFCN_H)
 651     void* handle=dlopen(resolved.c_str(),RTLD_LAZY);
 652     if (!handle)
 653         throw runtime_error(string("unable to load extension library '") + resolved + "': " + dlerror());
 654     int (*fn)(void*)=(int (*)(void*))(dlsym(handle,"xmltooling_extension_init"));
 655     if (!fn) {
 656         dlclose(handle);
 657         throw runtime_error(
 658             string("unable to locate xmltooling_extension_init entry point in '") + resolved + "': " +
 659                 (dlerror() ? dlerror() : "unknown error")
 660             );
 661     }
 662     try {
 663         if (fn(context)!=0)
 664             throw runtime_error(string("detected error in xmltooling_extension_init in ") + resolved);
 665     }
 666     catch(std::exception&) {
 667         if (handle)
 668             dlclose(handle);
 669         throw;
 670     }
 671 #else
 672 # error "Don't know about dynamic loading on this platform!"
 673 #endif
 674     m_libhandles.push_back(handle);
 675     log.info("loaded extension: %s", resolved.c_str());
 676     return true;
 677 }
 678
 679 #ifndef XMLTOOLING_NO_XMLSEC
 680
 681 void xmltooling::log_openssl()
 682 {
 683     const char* file;
 684     const char* data;
 685     int flags,line;
 686
 687     unsigned long code=ERR_get_error_line_data(&file,&line,&data,&flags);
 688     while (code) {
 689         Category& log=Category::getInstance("OpenSSL");
 690         log.errorStream() << "error code: " << code << " in " << file << ", line " << line << logging::eol;
 691         if (data && (flags & ERR_TXT_STRING))
 692             log.errorStream() << "error data: " << data << logging::eol;
 693         code=ERR_get_error_line_data(&file,&line,&data,&flags);
 694     }
 695 }
 696
 697 XSECCryptoX509CRL* XMLToolingInternalConfig::X509CRL() const
 698 {
 699     return new OpenSSLCryptoX509CRL();
 700 }
 701
 702 pair<const char*,unsigned int> XMLToolingInternalConfig::mapXMLAlgorithmToKeyAlgorithm(const XMLCh* xmlAlgorithm) const
 703 {
 704     for (algmap_t::const_iterator i = m_algorithmMap.begin(); i != m_algorithmMap.end(); ++i) {
 705         algmap_t::value_type::second_type::const_iterator j = i->second.find(xmlAlgorithm);
 706         if (j != i->second.end())
 707             return pair<const char*,unsigned int>(j->second.first.c_str(), j->second.second);
 708     }
 709     return pair<const char*,unsigned int>(nullptr, 0);
 710 }
 711
 712 void XMLToolingInternalConfig::registerXMLAlgorithm(
 713     const XMLCh* xmlAlgorithm, const char* keyAlgorithm, unsigned int size, XMLSecurityAlgorithmType type
 714     )
 715 {
 716     m_algorithmMap[type][xmlAlgorithm] = pair<string,unsigned int>((keyAlgorithm ? keyAlgorithm : ""), size);
 717 }
 718
 719 bool XMLToolingInternalConfig::isXMLAlgorithmSupported(const XMLCh* xmlAlgorithm, XMLSecurityAlgorithmType type)
 720 {
 721     try {
 722         // First check for basic support from the xmlsec layer.
 723         if (XSECPlatformUtils::g_algorithmMapper->mapURIToHandler(xmlAlgorithm)) {
 724             // Make sure the algorithm is registered.
 725             algmap_t::const_iterator i = m_algorithmMap.find(type);
 726             if (i != m_algorithmMap.end()) {
 727                 algmap_t::value_type::second_type::const_iterator j = i->second.find(xmlAlgorithm);
 728                 if (j != i->second.end())
 729                     return true;
 730             }
 731         }
 732     }
 733     catch (XSECException&) {
 734     }
 735     return false;
 736 }
 737
 738 void XMLToolingInternalConfig::registerXMLAlgorithms()
 739 {
 740     // The deal with all the macros is to try and figure out with no false positives whether
 741     // the OpenSSL version *and* the XML-Security version support the algorithms.
 742
 743     // With ECDSA, XML-Security exports a public macro for OpenSSL's support, and any
 744     // versions of XML-Security that didn't provide the macro don't handle ECDSA anyway.
 745
 746     // With AES, all supported XML-Security versions export a macro for OpenSSL's support.
 747
 748     // With SHA2, only the very latest XML-Security exports a macro, but all the versions
 749     // will handle SHA2 *if* OpenSSL does. So we use our own macro to check OpenSSL's
 750     // support, and then add checks to see if specific versions are compiled out.
 751
 752     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIMD5, nullptr, 0, ALGTYPE_DIGEST);
 753     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURISHA1, nullptr, 0, ALGTYPE_DIGEST);
 754 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA256)
 755     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURISHA224, nullptr, 0, ALGTYPE_DIGEST);
 756     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURISHA256, nullptr, 0, ALGTYPE_DIGEST);
 757 #endif
 758 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA512)
 759     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURISHA384, nullptr, 0, ALGTYPE_DIGEST);
 760     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURISHA512, nullptr, 0, ALGTYPE_DIGEST);
 761 #endif
 762
 763     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIDSA_SHA1, "DSA", 0, ALGTYPE_SIGN);
 764     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_MD5, "RSA", 0, ALGTYPE_SIGN);
 765     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_SHA1, "RSA", 0, ALGTYPE_SIGN);
 766 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA256)
 767     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_SHA224, "RSA", 0, ALGTYPE_SIGN);
 768     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_SHA256, "RSA", 0, ALGTYPE_SIGN);
 769 #endif
 770 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA512)
 771     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_SHA384, "RSA", 0, ALGTYPE_SIGN);
 772     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_SHA512, "RSA", 0, ALGTYPE_SIGN);
 773 #endif
 774
 775 #ifdef XSEC_OPENSSL_HAVE_EC
 776     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIECDSA_SHA1, "EC", 0, ALGTYPE_SIGN);
 777 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA256)
 778     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIECDSA_SHA256, "EC", 0, ALGTYPE_SIGN);
 779 # endif
 780 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA512)
 781     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIECDSA_SHA384, "EC", 0, ALGTYPE_SIGN);
 782     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIECDSA_SHA512, "EC", 0, ALGTYPE_SIGN);
 783 # endif
 784 #endif
 785
 786     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIHMAC_SHA1, "HMAC", 0, ALGTYPE_SIGN);
 787 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA256)
 788     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIHMAC_SHA224, "HMAC", 0, ALGTYPE_SIGN);
 789     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIHMAC_SHA256, "HMAC", 0, ALGTYPE_SIGN);
 790 #endif
 791 #if defined(XMLTOOLING_OPENSSL_HAVE_SHA2) && !defined(OPENSSL_NO_SHA512)
 792     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIHMAC_SHA384, "HMAC", 0, ALGTYPE_SIGN);
 793     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIHMAC_SHA512, "HMAC", 0, ALGTYPE_SIGN);
 794 #endif
 795
 796     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_1_5, "RSA", 0, ALGTYPE_KEYENCRYPT);
 797     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIRSA_OAEP_MGFP1, "RSA", 0, ALGTYPE_KEYENCRYPT);
 798
 799     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURI3DES_CBC, "DESede", 192, ALGTYPE_ENCRYPT);
 800     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIKW_3DES, "DESede", 192, ALGTYPE_KEYENCRYPT);
 801
 802 #ifdef XSEC_OPENSSL_HAVE_AES
 803     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIAES128_CBC, "AES", 128, ALGTYPE_ENCRYPT);
 804     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIKW_AES128, "AES", 128, ALGTYPE_KEYENCRYPT);
 805
 806     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIAES192_CBC, "AES", 192, ALGTYPE_ENCRYPT);
 807     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIKW_AES192, "AES", 192, ALGTYPE_KEYENCRYPT);
 808
 809     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIAES256_CBC, "AES", 256, ALGTYPE_ENCRYPT);
 810     registerXMLAlgorithm(DSIGConstants::s_unicodeStrURIKW_AES256, "AES", 256, ALGTYPE_KEYENCRYPT);
 811 #endif
 812 }
 813
 814 #endif
 815
 816 #ifdef WIN32
 817
 818 extern "C" __declspec(dllexport) BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID)
 819 {
 820     if (fdwReason == DLL_THREAD_DETACH || fdwReason == DLL_PROCESS_DETACH)
 821         ThreadKey::onDetach();
 822     return TRUE;
 823 }
 824
 825 #endif