/**
 *  @file
 *  @author     2012-2013 Stefan Radomski (stefan.radomski@cs.tu-darmstadt.de)
 *  @copyright  Simplified BSD
 *
 *  @cond
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the FreeBSD license as published by the FreeBSD
 *  project.
 *
 *  This program 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.
 *
 *  You should have received a copy of the FreeBSD license along with this
 *  program. If not, see <http://www.opensource.org/licenses/bsd-license>.
 *  @endcond
 */

#include "HTTPServletInvoker.h"
#include <glog/logging.h>

#include "uscxml/config.h"

#ifdef BUILD_AS_PLUGINS
#include <Pluma/Connector.hpp>
#endif

namespace uscxml {

#ifdef BUILD_AS_PLUGINS
PLUMA_CONNECTOR
bool pluginConnect(pluma::Host& host) {
	host.add( new HTTPServletInvokerProvider() );
	return true;
}
#endif

HTTPServletInvoker::HTTPServletInvoker() {
}

HTTPServletInvoker::~HTTPServletInvoker() {
	HTTPServer::unregisterServlet(this);

};

boost::shared_ptr<InvokerImpl> HTTPServletInvoker::create(InterpreterImpl* interpreter) {
	boost::shared_ptr<HTTPServletInvoker> invoker = boost::shared_ptr<HTTPServletInvoker>(new HTTPServletInvoker());
	invoker->_interpreter = interpreter;
	return invoker;
}

Data HTTPServletInvoker::getDataModelVariables() {
	Data data;
	assert(_url.length() > 0);
	data.compound["location"] = Data(_url, Data::VERBATIM);
	return data;
}

void HTTPServletInvoker::send(const SendRequest& req) {

	if (req.name.find("reply.", 0, req.name.length())) {
		// this is a reply
		const std::string requestId = req.name.substr(6);
		if (_requests.find(requestId) == _requests.end()) {
			LOG(ERROR) << "Replying to non existing request " << requestId;
			return;
		}

		HTTPServer::Request httpRequest = _requests[requestId];
		HTTPServer::Reply httpReply(httpRequest);
		httpReply.content = req.content;

		std::map<std::string, Data>::const_iterator nameListIter = req.namelist.begin();
		while(nameListIter != req.namelist.end()) {
			httpReply.headers[nameListIter->first] = nameListIter->second.atom;
			nameListIter++;
		}

		std::multimap<std::string, Data>::const_iterator paramIter = req.params.begin();
		while(paramIter != req.params.end()) {
			httpReply.headers[paramIter->first] = paramIter->second.atom;
			paramIter++;
		}

		HTTPServer::reply(httpReply);
		return;
	}
}

void HTTPServletInvoker::cancel(const std::string sendId) {
}

void HTTPServletInvoker::invoke(const InvokeRequest& req) {

	_invokeId = req.invokeid;
	if (req.params.find("path") == req.params.end()) {
		LOG(ERROR) << "Path parameter required with httpserver";
	}
	_path = (*req.params.find("path")).second.atom;

	if (req.params.find("callback") != req.params.end()) {
		_callback = (*req.params.find("callback")).second.atom;
	} else {
		_callback = _path;
		std::replace(_callback.begin(), _callback.end(), '/', '.');
	}

	if (!HTTPServer::registerServlet(_path, this)) {
		LOG(ERROR) << "Cannot register http servlet at " << _path << ": " << " already taken";
	}
}

/**
 * Receive a request and deliver it to the interpreter
 */
bool HTTPServletInvoker::httpRecvRequest(const HTTPServer::Request& req) {
	tthread::lock_guard<tthread::recursive_mutex> lock(_mutex);

//  evhttp_request_own(req.curlReq);

	_requests[toStr((uintptr_t)req.evhttpReq)] = req;

	Event event = req;

	event.name = _callback;
	event.data.compound["reqId"] = Data(toStr((uintptr_t)req.evhttpReq), Data::VERBATIM);

	returnEvent(event);
	return true;
}

std::string HTTPServletInvoker::getPath() {
	return _path;
}

}