/*
 * Copyright (C) 2017 Charybdis Development Team
 * Copyright (C) 2017 Jason Volk <jason@zemos.net>
 *
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice is present in all copies.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

using namespace ircd;

struct room
:resource
{
	static constexpr const auto base_url
	{
		"_matrix/client/r0/rooms/"
	};

	using resource::resource;
}
rooms_resource
{
	room::base_url, resource::opts
	{
		resource::DIRECTORY,
		"Rooms (7.0)"
	}
};

mapi::header IRCD_MODULE
{
	"registers the resource 'client/rooms'"
};

resource::response
get_state(client &client,
          const resource::request &request,
          const string_view &params,
          const m::room::state &state,
          const m::event::where &query)
{
	const auto count
	{
		state.count(query)
	};

	size_t j(0);
	json::value ret[count];
	state.for_each(query, [&count, &j, &ret]
	(const auto &event)
	{
		if(j < count)
			ret[j++] = event;
	});

	return resource::response
	{
		client, json::value
		{
			ret, j
		}
	};
}

resource::response
get_state(client &client,
          const resource::request &request,
          const string_view &params,
          const m::room::state &state,
          const string_view &type,
          const string_view &state_key)
{
	const m::event::where::equal query
	{
		{ "type", type },
		{ "state_key", state_key },
	};

	return get_state(client, request, params, state, query);
}

resource::response
get_state(client &client,
          const resource::request &request,
          const string_view &params,
          const m::room::state &state,
          const string_view &type)
{
	const m::event::where::equal query
	{
		{ "type", type }
	};

	return get_state(client, request, params, state, query);
}

resource::response
get_state(client &client,
          const resource::request &request,
          const string_view &params,
          const m::room::id &room_id)
{
	string_view token[4];
	tokens(params, "/", token);

	const string_view &type
	{
		token[2]
	};

	const string_view &state_key
	{
		token[3]
	};

	const m::room::state state
	{
		room_id
	};

	if(type && state_key)
		return get_state(client, request, params, state, type, state_key);

	if(type)
		return get_state(client, request, params, state, type);

	const m::event::where::noop query;
	return get_state(client, request, params, state, query);
}

resource::response
get_context(client &client,
            const resource::request &request,
            const string_view &params,
            const m::room::id &room_id)
{
	const m::event::id &event_id
	{
		token(params, "/", 2)
	};

	const auto it
	{
		m::event::find(event_id)
	};

	if(!it)
		throw http::error(http::NOT_FOUND, "event not found");

	const auto event
	{
		json::string(*it)
	};

	return resource::response
	{
		client, json::members
		{
			{ "event", event }
		}
	};
}

resource::response
get_rooms(client &client, const resource::request &request)
{
	const auto params
	{
		lstrip(request.head.path, room::base_url)
	};

	string_view token[2];
	if(tokens(params, "/", token) != 2)
		throw http::error(http::code::NOT_FOUND, "/rooms command required");

	const m::room::id &room_id
	{
		token[0]
	};

	const string_view &cmd
	{
		token[1]
	};

	if(cmd == "context")
		return get_context(client, request, params, room_id);

	if(cmd == "state")
		return get_state(client, request, params, room_id);

	throw http::error(http::code::NOT_FOUND, "/rooms command not found");
}

resource::method method_get
{
	rooms_resource, "GET", get_rooms
};