// **********************************************************************
//
// Copyright (c) 2001
// MutableRealms, Inc.
// Huntsville, AL, USA
//
// All Rights Reserved
//
// **********************************************************************
#ifdef WIN32
#pragma warning(disable:4786)
#endif

#include <Ice/SslFactory.h>
#include <Ice/SslSystem.h>
#include <Ice/SslConnector.h>
#include <Ice/SslTransceiver.h>
#include <Ice/Instance.h>
#include <Ice/TraceLevels.h>
#include <Ice/Logger.h>
#include <Ice/Network.h>
#include <Ice/Properties.h>
#include <Ice/Exception.h>
#include <Ice/SecurityException.h>
#include <sstream>

using namespace std;
using namespace Ice;
using namespace IceInternal;

using std::ostringstream;
using std::string;
using IceSecurity::Ssl::Connection;
using IceSecurity::Ssl::Factory;
using IceSecurity::Ssl::System;

TransceiverPtr
IceInternal::SslConnector::connect(int timeout)
{
    if (_traceLevels->network >= 2)
    {
	ostringstream s;
	s << "trying to establish ssl connection to " << toString();
	_logger->trace(_traceLevels->networkCat, s.str());
    }

    int fd = createSocket(false);
    doConnect(fd, _addr, timeout);

    if (_traceLevels->network >= 1)
    {
	ostringstream s;
	s << "ssl connection established\n" << fdToString(fd);
	_logger->trace(_traceLevels->networkCat, s.str());
    }

    PropertiesPtr properties = _instance->properties();

    // This is the Ice SSL Configuration File on which we will base
    // all connections in this communicator.
    string configFile = properties->getProperty("Ice.Ssl.Config");

    // Get an instance of the SslOpenSSL singleton.
    System* sslSystem = Factory::getSystem(configFile);

    if (!sslSystem->isTraceSet())
    {
        sslSystem->setTrace(_traceLevels);
    }

    if (!sslSystem->isLoggerSet())
    {
        sslSystem->setLogger(_logger);
    }

    if (!sslSystem->isPropertiesSet())
    {
        sslSystem->setProperties(properties);
    }

    // Initialize the server (if needed)
    if (!sslSystem->isConfigLoaded())
    {
        sslSystem->loadConfig();
    }

    Connection* sslConnection = 0;

    try
    {
        sslConnection = sslSystem->createClientConnection(fd);
    }
    catch (...)
    {
        Factory::releaseSystem(sslSystem);
        sslSystem = 0;

        // Shutdown the connection.
        throw;
    }

    TransceiverPtr transPtr = new SslTransceiver(_instance, fd, sslConnection);

    Factory::releaseSystem(sslSystem);
    sslSystem = 0;

    return transPtr;
}

string
IceInternal::SslConnector::toString() const
{
    return addrToString(_addr);
}

IceInternal::SslConnector::SslConnector(const InstancePtr& instance, const string& host, int port) :
    _instance(instance),
    _traceLevels(instance->traceLevels()),
    _logger(instance->logger())
{
    getAddress(host.c_str(), port, _addr);
}

IceInternal::SslConnector::~SslConnector()
{
}