/*
 * Token Queue.
 *
 * Copyright 2012-2012 by Robert Fernie.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License Version 2.1 as published by the Free Software Foundation.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
 * USA.
 *
 * Please report all bugs and problems to "retroshare@lunamutt.com".
 *
 */

#include "util/TokenQueue.h"
#include <iostream>

#include <QTimer>


/******
 * #define ID_DEBUG 1
 *****/

/** Constructor */
TokenQueue::TokenQueue(RsTokenService *service, TokenResponse *resp)
:QWidget(NULL), mService(service), mResponder(resp)
{
	return;
}

bool TokenQueue::requestGroupInfo(uint32_t &token, uint32_t anstype, const RsTokReqOptions &opts, std::list<RsGxsGroupId>& ids, uint32_t usertype)
{
	uint32_t basictype = TOKENREQ_GROUPINFO;
	mService->requestGroupInfo(token, anstype, opts, ids);
	queueRequest(token, basictype, anstype, usertype);

	return true;
}


bool TokenQueue::requestGroupInfo(uint32_t &token, uint32_t anstype, const RsTokReqOptions &opts, uint32_t usertype)
{
    uint32_t basictype = TOKENREQ_GROUPINFO;
    mService->requestGroupInfo(token, anstype, opts);
    queueRequest(token, basictype, anstype, usertype);

    return true;
}

bool TokenQueue::requestMsgInfo(uint32_t &token, uint32_t anstype, const RsTokReqOptions &opts, const GxsMsgReq& ids, uint32_t usertype)
{
	uint32_t basictype = TOKENREQ_MSGINFO;
	mService->requestMsgInfo(token, anstype, opts, ids);
	queueRequest(token, basictype, anstype, usertype);

	return true;
}


bool TokenQueue::requestMsgRelatedInfo(uint32_t &token, uint32_t anstype, const RsTokReqOptions &opts, const RsGxsGrpMsgIdPair &msgId, uint32_t usertype)
{
    uint32_t basictype = TOKENREQ_MSGINFO;
    mService->requestMsgRelatedInfo(token, anstype, opts, msgId);
    queueRequest(token, basictype, anstype, usertype);

    return true;
}


bool TokenQueue::requestMsgInfo(uint32_t &token, uint32_t anstype, const RsTokReqOptions &opts,
                                  const std::list<RsGxsGroupId> &grpIds, uint32_t usertype)
{
    uint32_t basictype = TOKENREQ_MSGINFO;
    mService->requestMsgInfo(token, anstype, opts, grpIds);
    queueRequest(token, basictype, anstype, usertype);

    return true;
}


void TokenQueue::queueRequest(uint32_t token, uint32_t basictype, uint32_t anstype, uint32_t usertype)
{
        std::cerr << "TokenQueue::queueRequest() Token: " << token << " Type: " << basictype;
	std::cerr << " AnsType: " << anstype << " UserType: " << usertype;
	std::cerr << std::endl;

        TokenRequest req;
	req.mToken = token;
	req.mType = basictype;
	req.mAnsType = anstype;
	req.mUserType = usertype;

	gettimeofday(&req.mRequestTs, NULL);
	req.mPollTs = req.mRequestTs;

        mRequests.push_back(req);

	if (mRequests.size() == 1)
	{
		/* start the timer */
		doPoll(0.1);
	}
}

void TokenQueue::doPoll(float dt)
{
	/* single shot poll */
	//mTrigger->singlesshot(dt * 1000);
	QTimer::singleShot((int) (dt * 1000.0), this, SLOT(pollRequests()));
}


void TokenQueue::pollRequests()
{
	double pollPeriod = 1.0; // max poll period.


	if (mRequests.empty())
	{
		return;
	}

        TokenRequest req;
        req = mRequests.front();
        mRequests.pop_front();

        if (checkForRequest(req.mToken))
        {
            /* clean it up and handle */
            loadRequest(req);
        }
	else
	{

#define MAX_REQUEST_AGE 30

		/* drop old requests too */
		if (time(NULL) - req.mRequestTs.tv_sec < MAX_REQUEST_AGE)
		{
        		mRequests.push_back(req);
		}
		else
		{
        		std::cerr << "TokenQueue::loadRequest(): ";
			std::cerr << "Dropping old Token: " << req.mToken << " Type: " << req.mType;
			std::cerr << std::endl;
		}

	}

	if (mRequests.size() > 0)
	{
		doPoll(pollPeriod);
	}
}


bool TokenQueue::checkForRequest(uint32_t token)
{
	/* check token */
    uint32_t status =  mService->requestStatus(token);
    return ( (RsTokenService::GXS_REQUEST_V2_STATUS_FAILED == status) ||
            (RsTokenService::GXS_REQUEST_V2_STATUS_COMPLETE == status) );
}


void TokenQueue::loadRequest(const TokenRequest &req)
{
        std::cerr << "TokenQueue::loadRequest(): ";
	std::cerr << "Token: " << req.mToken << " Type: " << req.mType;
	std::cerr << " AnsType: " << req.mAnsType << " UserType: " << req.mUserType;
	std::cerr << std::endl;

	mResponder->loadRequest(this, req);

	return;
}


bool TokenQueue::cancelRequest(const uint32_t token)
{
	/* cancel at lower level first */
	mService->cancelRequest(token);

        std::list<TokenRequest>::iterator it;

	for(it = mRequests.begin(); it != mRequests.end(); it++)
	{
		if (it->mToken == token)
		{
			mRequests.erase(it);

                        std::cerr << "TokenQueue::cancelRequest() Cleared Request: " << token;
			std::cerr << std::endl;

			return true;
		}
	}

        std::cerr << "TokenQueue::cancelRequest() Failed to Find Request: " << token;
	std::cerr << std::endl;

	return false;
}