/*
 * Copyright (c) 2013 Remko Tronçon
 * Licensed under the GNU General Public License.
 * See the COPYING file for more information.
 */

#include <Sluift/ElementConvertors/UserLocationConvertor.h>

#include <lua.hpp>
#include <boost/smart_ptr/make_shared.hpp>
#include <boost/numeric/conversion/cast.hpp>

#include <Swiften/Base/DateTime.h>

#pragma clang diagnostic ignored "-Wunused-private-field"

using namespace Swift;

UserLocationConvertor::UserLocationConvertor(LuaElementConvertors* convertors) : 
		GenericLuaElementConvertor<UserLocation>("user_location"),
		convertors(convertors) {
}

UserLocationConvertor::~UserLocationConvertor() {
}

boost::shared_ptr<UserLocation> UserLocationConvertor::doConvertFromLua(lua_State* L) {
	boost::shared_ptr<UserLocation> result = boost::make_shared<UserLocation>();
	lua_getfield(L, -1, "area");
	if (lua_isstring(L, -1)) {
		result->setArea(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "altitude");
	if (lua_isnumber(L, -1)) {
		result->setAltitude(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "locality");
	if (lua_isstring(L, -1)) {
		result->setLocality(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "latitude");
	if (lua_isnumber(L, -1)) {
		result->setLatitude(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "accuracy");
	if (lua_isnumber(L, -1)) {
		result->setAccuracy(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "description");
	if (lua_isstring(L, -1)) {
		result->setDescription(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "country_code");
	if (lua_isstring(L, -1)) {
		result->setCountryCode(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "timestamp");
	if (lua_isstring(L, -1)) {
		result->setTimestamp(stringToDateTime(std::string(lua_tostring(L, -1))));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "floor");
	if (lua_isstring(L, -1)) {
		result->setFloor(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "building");
	if (lua_isstring(L, -1)) {
		result->setBuilding(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "room");
	if (lua_isstring(L, -1)) {
		result->setRoom(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "country");
	if (lua_isstring(L, -1)) {
		result->setCountry(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "region");
	if (lua_isstring(L, -1)) {
		result->setRegion(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "uri");
	if (lua_isstring(L, -1)) {
		result->setURI(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "longitude");
	if (lua_isnumber(L, -1)) {
		result->setLongitude(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "error");
	if (lua_isnumber(L, -1)) {
		result->setError(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "postal_code");
	if (lua_isstring(L, -1)) {
		result->setPostalCode(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "bearing");
	if (lua_isnumber(L, -1)) {
		result->setBearing(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "text");
	if (lua_isstring(L, -1)) {
		result->setText(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "datum");
	if (lua_isstring(L, -1)) {
		result->setDatum(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "street");
	if (lua_isstring(L, -1)) {
		result->setStreet(std::string(lua_tostring(L, -1)));
	}
	lua_pop(L, 1);
	lua_getfield(L, -1, "speed");
	if (lua_isnumber(L, -1)) {
		result->setSpeed(boost::numeric_cast<float>(lua_tonumber(L, -1)));
	}
	lua_pop(L, 1);
	return result;
}

void UserLocationConvertor::doConvertToLua(lua_State* L, boost::shared_ptr<UserLocation> payload) {
	lua_createtable(L, 0, 0);
	if (payload->getArea()) {
		lua_pushstring(L, (*payload->getArea()).c_str());
		lua_setfield(L, -2, "area");
	}
	if (payload->getAltitude()) {
		lua_pushnumber(L, (*payload->getAltitude()));
		lua_setfield(L, -2, "altitude");
	}
	if (payload->getLocality()) {
		lua_pushstring(L, (*payload->getLocality()).c_str());
		lua_setfield(L, -2, "locality");
	}
	if (payload->getLatitude()) {
		lua_pushnumber(L, (*payload->getLatitude()));
		lua_setfield(L, -2, "latitude");
	}
	if (payload->getAccuracy()) {
		lua_pushnumber(L, (*payload->getAccuracy()));
		lua_setfield(L, -2, "accuracy");
	}
	if (payload->getDescription()) {
		lua_pushstring(L, (*payload->getDescription()).c_str());
		lua_setfield(L, -2, "description");
	}
	if (payload->getCountryCode()) {
		lua_pushstring(L, (*payload->getCountryCode()).c_str());
		lua_setfield(L, -2, "country_code");
	}
	if (payload->getTimestamp()) {
	lua_pushstring(L, dateTimeToString((*payload->getTimestamp())).c_str());
		lua_setfield(L, -2, "timestamp");
	}
	if (payload->getFloor()) {
		lua_pushstring(L, (*payload->getFloor()).c_str());
		lua_setfield(L, -2, "floor");
	}
	if (payload->getBuilding()) {
		lua_pushstring(L, (*payload->getBuilding()).c_str());
		lua_setfield(L, -2, "building");
	}
	if (payload->getRoom()) {
		lua_pushstring(L, (*payload->getRoom()).c_str());
		lua_setfield(L, -2, "room");
	}
	if (payload->getCountry()) {
		lua_pushstring(L, (*payload->getCountry()).c_str());
		lua_setfield(L, -2, "country");
	}
	if (payload->getRegion()) {
		lua_pushstring(L, (*payload->getRegion()).c_str());
		lua_setfield(L, -2, "region");
	}
	if (payload->getURI()) {
		lua_pushstring(L, (*payload->getURI()).c_str());
		lua_setfield(L, -2, "uri");
	}
	if (payload->getLongitude()) {
		lua_pushnumber(L, (*payload->getLongitude()));
		lua_setfield(L, -2, "longitude");
	}
	if (payload->getError()) {
		lua_pushnumber(L, (*payload->getError()));
		lua_setfield(L, -2, "error");
	}
	if (payload->getPostalCode()) {
		lua_pushstring(L, (*payload->getPostalCode()).c_str());
		lua_setfield(L, -2, "postal_code");
	}
	if (payload->getBearing()) {
		lua_pushnumber(L, (*payload->getBearing()));
		lua_setfield(L, -2, "bearing");
	}
	if (payload->getText()) {
		lua_pushstring(L, (*payload->getText()).c_str());
		lua_setfield(L, -2, "text");
	}
	if (payload->getDatum()) {
		lua_pushstring(L, (*payload->getDatum()).c_str());
		lua_setfield(L, -2, "datum");
	}
	if (payload->getStreet()) {
		lua_pushstring(L, (*payload->getStreet()).c_str());
		lua_setfield(L, -2, "street");
	}
	if (payload->getSpeed()) {
		lua_pushnumber(L, (*payload->getSpeed()));
		lua_setfield(L, -2, "speed");
	}
}

boost::optional<LuaElementConvertor::Documentation> UserLocationConvertor::getDocumentation() const {
	return Documentation(
		"UserLocation",
		"This table has the following fields:\n\n"
		"- `area`: string (Optional)\n"
		"- `altitude`: @{float} (Optional)\n"
		"- `locality`: string (Optional)\n"
		"- `latitude`: @{float} (Optional)\n"
		"- `accuracy`: @{float} (Optional)\n"
		"- `description`: string (Optional)\n"
		"- `country_code`: string (Optional)\n"
		"- `timestamp`: datetime (string) (Optional)\n"
		"- `floor`: string (Optional)\n"
		"- `building`: string (Optional)\n"
		"- `room`: string (Optional)\n"
		"- `country`: string (Optional)\n"
		"- `region`: string (Optional)\n"
		"- `uri`: string (Optional)\n"
		"- `longitude`: @{float} (Optional)\n"
		"- `error`: @{float} (Optional)\n"
		"- `postal_code`: string (Optional)\n"
		"- `bearing`: @{float} (Optional)\n"
		"- `text`: string (Optional)\n"
		"- `datum`: string (Optional)\n"
		"- `street`: string (Optional)\n"
		"- `speed`: @{float} (Optional)\n"
	);
}