/**
 * Copyright - See the COPYRIGHT that is included with this distribution.
 * pvAccessCPP is distributed subject to a Software License Agreement found
 * in file LICENSE that is included with this distribution.
 */

#include <pv/reftrack.h>

#define epicsExportSharedSymbols
#include <pv/serverChannelImpl.h>

using namespace epics::pvData;

namespace epics {
namespace pvAccess {

size_t ServerChannelImpl::num_instances;

ServerChannelImpl::ServerChannelImpl(Channel::shared_pointer const & channel,
                                     const ChannelRequester::shared_pointer &requester,
                                     pvAccessID cid, pvAccessID sid,
                                     ChannelSecuritySession::shared_pointer const & css):
    _channel(channel),
    _requester(requester),
    _cid(cid),
    _sid(sid),
    _destroyed(false),
    _channelSecuritySession(css)
{
    REFTRACE_INCREMENT(num_instances);
    if (!channel.get())
    {
        THROW_BASE_EXCEPTION("non-null channel required");
    }
}

Channel::shared_pointer ServerChannelImpl::getChannel()
{
    return _channel;
}

pvAccessID ServerChannelImpl::getCID() const
{
    return _cid;
}

pvAccessID ServerChannelImpl::getSID() const
{
    return _sid;
}

ChannelSecuritySession::shared_pointer ServerChannelImpl::getChannelSecuritySession() const
{
    return _channelSecuritySession;
}

void ServerChannelImpl::registerRequest(const pvAccessID id, Destroyable::shared_pointer const & request)
{
    Lock guard(_mutex);
    if(_destroyed) throw std::logic_error("Can't registerRequest() for destory'd server channel");
    _requests[id] = request;
}

void ServerChannelImpl::unregisterRequest(const pvAccessID id)
{
    Lock guard(_mutex);
    _requests_t::iterator iter = _requests.find(id);
    if(iter != _requests.end())
    {
        _requests.erase(iter);
    }
}

Destroyable::shared_pointer ServerChannelImpl::getRequest(const pvAccessID id)
{
    Lock guard(_mutex);
    _requests_t::iterator iter = _requests.find(id);
    if(iter != _requests.end())
    {
        return iter->second;
    }
    return Destroyable::shared_pointer();
}

void ServerChannelImpl::destroy()
{
    Lock guard(_mutex);

    if (_destroyed) return;
    _destroyed = true;

    // destroy all requests
    // take ownership of _requests locally to prevent
    // removal via unregisterRequest() during iteration
    _requests_t reqs;
    _requests.swap(reqs);
    for(_requests_t::const_iterator it=reqs.begin(), end=reqs.end(); it!=end; ++it)
    {
        const _requests_t::mapped_type& req = it->second;
        // will call unregisterRequest() which is now a no-op
        req->destroy();
        // May still be in the send queue
    }

    // close channel security session
    // TODO try catch
    _channelSecuritySession->close();

    // ... and the channel
    // TODO try catch
    _channel->destroy();
}

ServerChannelImpl::~ServerChannelImpl()
{
    destroy();
    REFTRACE_DECREMENT(num_instances);
}

void ServerChannelImpl::printInfo()
{
    printInfo(stdout);
}

void ServerChannelImpl::printInfo(FILE *fd)
{
    fprintf(fd,"CLASS        : %s\n", typeid(*this).name());
    fprintf(fd,"CHANNEL      : %s\n", typeid(*_channel).name());
}

}
}