// **********************************************************************
//
// Copyright (c) 2003-2006 ZeroC, Inc. All rights reserved.
//
// This copy of Ice is licensed to you under the terms described in the
// ICE_LICENSE file included in this distribution.
//
// **********************************************************************

#include <IceGrid/Internal.h>
#include <IceGrid/QueryI.h>
#include <IceGrid/Database.h>
#include <IceGrid/ObjectCache.h>
#include <IceGrid/SessionI.h>

using namespace std;
using namespace Ice;
using namespace IceGrid;

template<class T>
class GetObjectProxy : public ObjectAllocationRequest
{
    typedef IceUtil::Handle<T> TPtr;

public:

    GetObjectProxy(const SessionIPtr& session, const TPtr& cb) :
	ObjectAllocationRequest(session), _cb(cb)
    {
    }

    virtual void
    response(const Ice::ObjectPrx& proxy)
    {
	assert(_cb);
	_cb->ice_response(proxy);
	_cb = 0;
    }

    virtual void
    exception(const AllocationException& ex)
    {
	assert(_cb);
	_cb->ice_response(0);
	_cb = 0;
    }

    virtual bool
    allocateOnce()
    {
	return true; // Only allow one allocation
    }

private:

    TPtr _cb;
};

template<class T> static GetObjectProxy<T>*
newGetObjectProxy(const SessionIPtr& session, const IceUtil::Handle<T>& cb)
{
    return new GetObjectProxy<T>(session, cb);
}

QueryI::QueryI(const CommunicatorPtr& communicator, const DatabasePtr& database, const SessionIPtr& session) :
    _communicator(communicator),
    _database(database),
    _session(session)
{
}

QueryI::~QueryI()
{
}

void
QueryI::findObjectById_async(const AMD_Query_findObjectByIdPtr& cb, const Ice::Identity& id, const Ice::Current&) const
{
    try
    {
	if(_session)
	{
	    _database->allocateObject(id, newGetObjectProxy(_session, cb));
	}
	else
	{
	    cb->ice_response(_database->getObjectProxy(id));
	}
    }
    catch(const NotAllocatableException&)
    {
	cb->ice_response(0);
    }
    catch(const ObjectNotRegisteredException&)
    {
	cb->ice_response(0);
    }
}

void
QueryI::findObjectByType_async(const AMD_Query_findObjectByTypePtr& cb, const string& type, const Ice::Current&) const
{
    try
    {
	if(_session)
	{
	    _database->allocateObjectByType(type, newGetObjectProxy(_session, cb));
	}
	else
	{
	    cb->ice_response(_database->getObjectByType(type));
	}
    }
    catch(const NotAllocatableException&)
    {
	cb->ice_response(0);
    }
    catch(const ObjectNotRegisteredException&)
    {
	cb->ice_response(0);
    }
}

void
QueryI::findObjectByTypeOnLeastLoadedNode_async(const AMD_Query_findObjectByTypeOnLeastLoadedNodePtr& cb, 
						const string& type,
						LoadSample sample, 
						const Ice::Current&) const
{
    try
    {
	if(_session)
	{
	    _database->allocateObjectByTypeOnLeastLoadedNode(type, newGetObjectProxy(_session, cb), sample);
	}
	else
	{
	    cb->ice_response(_database->getObjectByTypeOnLeastLoadedNode(type, sample));
	}
    }
    catch(const NotAllocatableException&)
    {
	cb->ice_response(0);
    }
    catch(const ObjectNotRegisteredException&)
    {
	cb->ice_response(0);
    }
}

void
QueryI::findAllObjectsByType_async(const AMD_Query_findAllObjectsByTypePtr& cb,
				   const string& type, 
				   const Ice::Current&) const
{
    try
    {
	if(_session)
	{
	    //
	    // We don't allow allocating multiple objects.
	    //
	    cb->ice_response(Ice::ObjectProxySeq());
	}
	else
	{
	    cb->ice_response(_database->getObjectsByType(type));
	}
    }
    catch(const ObjectNotRegisteredException&)
    {
	cb->ice_response(Ice::ObjectProxySeq());
    }
}