// The Construct
//
// Copyright (C) The Construct Developers, Authors & Contributors
// Copyright (C) 2016-2020 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. The
// full license for this software is available in the LICENSE file.

namespace ircd::m::admin
{
	static resource::response handle_get_pushers(client &, const resource::request &, const user::id &);
	static resource::response handle_get_devices(client &, const resource::request &, const user::id &);
	static resource::response handle_get_account_data(client &, const resource::request &, const user::id &);
	static resource::response handle_get_joined_rooms(client &, const resource::request &, const user::id &);
	static resource::response handle_get_admin(client &, const resource::request &, const user::id &);
	static resource::response handle_get(client &, const resource::request &);

	extern resource::method get_method;
	extern resource users_resource;
};

ircd::mapi::header
IRCD_MODULE
{
	"Admin (undocumented) :Users"
};

decltype(ircd::m::admin::users_resource)
ircd::m::admin::users_resource
{
	"/_synapse/admin/v1/users/",
	{
		"(undocumented) Admin Users",
		resource::DIRECTORY
	}
};

decltype(ircd::m::admin::get_method)
ircd::m::admin::get_method
{
	users_resource, "GET", handle_get,
	{
		get_method.REQUIRES_OPER
	}
};

ircd::m::resource::response
ircd::m::admin::handle_get(client &client,
                           const resource::request &request)
{
	if(request.parv.size() < 1)
		throw m::NEED_MORE_PARAMS
		{
			"user_id path parameter required"
		};

	user::id::buf user_id
	{
		url::decode(user_id, request.parv[0])
	};

	if(request.parv.size() < 2)
		throw m::NEED_MORE_PARAMS
		{
			"Command path parameter required"
		};

	const auto &cmd
	{
		request.parv[1]
	};

	if(cmd == "admin")
		return handle_get_admin(client, request, user_id);

	if(cmd == "joined_rooms")
		return handle_get_joined_rooms(client, request, user_id);

	if(cmd == "account_data")
		return handle_get_account_data(client, request, user_id);

	if(cmd == "devices")
		return handle_get_devices(client, request, user_id);

	if(cmd == "pushers")
		return handle_get_pushers(client, request, user_id);

	throw m::NOT_FOUND
	{
		"/admin/users command not found"
	};
}

/// Return if a user is an admin
ircd::m::resource::response
ircd::m::admin::handle_get_admin(client &client,
                                 const resource::request &request,
                                 const user::id &user_id)
{
	const bool admin
	{
		m::is_oper(user_id)
	};

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

ircd::m::resource::response
ircd::m::admin::handle_get_joined_rooms(client &client,
                                        const resource::request &request,
                                        const user::id &user_id)
{
	const m::user::rooms rooms
	{
		user_id
	};

	m::resource::response::chunked::json response
	{
		client, http::OK
	};

	json::stack::member
	{
		response, "total", json::value
		{
			long(rooms.count("join"))
		}
	};

	json::stack::array joined_rooms
	{
		response, "joined_rooms"
	};

	rooms.for_each("join", [&joined_rooms]
	(const m::room &room, const string_view &)
	{
		joined_rooms.append(room.room_id);
	});

	return response;
}

ircd::m::resource::response
ircd::m::admin::handle_get_account_data(client &client,
                                        const resource::request &request,
                                        const user::id &user_id)
{
	m::resource::response::chunked::json response
	{
		client, http::OK
	};

	json::stack::object object
	{
		response, "account_data"
	};

	// global
	{
		json::stack::object global
		{
			object, "global"
		};

		const m::user::account_data account_data
		{
			user_id
		};

		account_data.for_each([&global]
		(const string_view &key, const json::object &val)
		{
			json::stack::member
			{
				global, key, val
			};

			return true;
		});
	}

	// rooms
	{
		json::stack::object rooms_object
		{
			object, "rooms"
		};

		const m::user::rooms user_rooms
		{
			user_id
		};

		user_rooms.for_each([&rooms_object, &user_id]
		(const m::room &room, const string_view &membership)
		{
			const m::user::room_account_data room_account_data
			{
				user_id, room
			};

			json::stack::object room_object
			{
				rooms_object, room.room_id
			};

			room_account_data.for_each([&room_object]
			(const string_view &key, const json::object &val)
			{
				json::stack::member
				{
					room_object, key, val
				};

				return true;
			});

			return true;
		});
	}

	return response;
}

ircd::m::resource::response
ircd::m::admin::handle_get_devices(client &client,
                                   const resource::request &request,
                                   const user::id &user_id)
{
	m::resource::response::chunked::json response
	{
		client, http::OK
	};

	json::stack::array array
	{
		response, "devices"
	};

	const m::user::devices devices
	{
		user_id
	};

	devices.for_each([&devices, &array]
	(const auto &, const string_view &device_id)
	{
		json::stack::object object
		{
			array
		};

		json::stack::member
		{
			object, "device_id", device_id
		};

		devices.for_each(device_id, [&devices, &object, &device_id]
		(const auto &, const string_view &prop)
		{
			devices.get(std::nothrow, device_id, prop, [&object, &prop]
			(const auto &, const string_view &value)
			{
				json::stack::member
				{
					object, prop, value
				};
			});

			return true;
		});

		return true;
	});

	return response;
}

ircd::m::resource::response
ircd::m::admin::handle_get_pushers(client &client,
                                   const resource::request &request,
                                   const user::id &user_id)
{
	const m::user::pushers pushers
	{
		user_id
	};

	m::resource::response::chunked::json response
	{
		client, http::OK
	};

	json::stack::member
	{
		response, "total", json::value
		{
			long(pushers.count())
		}
	};

	json::stack::array array
	{
		response, "pushers"
	};

	pushers.for_each([&array]
	(const auto &, const auto &key, const json::object &pusher)
	{
		array.append(pusher);
		return true;
	});

	return response;
}