/* OperServ core functions
 *
 * (C) 2003-2009 Anope Team
 * Contact us at team@anope.org
 *
 * Please read COPYING and README for further details.
 *
 * Based on the original code of Epona by Lara.
 * Based on the original code of Services by Andy Church.
 *
 * $Id$
 *
 */
/*************************************************************************/

#include "module.h"

void myOperServHelp(User *u);
int opers_list_callback(SList *slist, int number, void *item, va_list args);
int opers_list(int number, NickCore *nc, User *u, char *level);

class CommandOSStaff : public Command
{
 public:
	CommandOSStaff() : Command("STAFF", 0, 0)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		int idx = 0;
		User *au = NULL;
		NickCore *nc;
		NickAlias *na;
		int found;
		int i;

		notice_lang(s_OperServ, u, OPER_STAFF_LIST_HEADER);
		slist_enum(&servopers, NULL, &opers_list_callback, u, "OPER");
		slist_enum(&servadmins, NULL, &opers_list_callback, u, "ADMN");

		for (idx = 0; idx < RootNumber; ++idx)
		{
			found = 0;
			if ((au = finduser(ServicesRoots[idx]))) /* see if user is online */
			{
				found = 1;
				notice_lang(s_OperServ, u, OPER_STAFF_FORMAT, '*', "ROOT", ServicesRoots[idx]);
			}
			else if ((nc = findcore(ServicesRoots[idx])))
			{
				for (i = 0; i < nc->aliases.count; ++i) /* check all aliases */
				{
					na = static_cast<NickAlias *>(nc->aliases.list[i]);
					if ((au = finduser(na->nick))) /* see if user is online */
					{
						found = 1;
						notice_lang(s_OperServ, u, OPER_STAFF_AFORMAT, '*', "ROOT", ServicesRoots[idx], na->nick);
					}
				}
			}

			if (!found)
				notice_lang(s_OperServ, u, OPER_STAFF_FORMAT, ' ', "ROOT", ServicesRoots[idx]);

		}
		notice_lang(s_OperServ, u, END_OF_ANY_LIST, "Staff");
		return MOD_CONT;
	}

	bool OnHelp(User *u, const std::string &subcommand)
	{
		notice_help(s_OperServ, u, OPER_HELP_STAFF);
		return true;
	}
};

class OSStaff : public Module
{
 public:
	OSStaff(const std::string &modname, const std::string &creator) : Module(modname, creator)
	{
		this->SetAuthor("Anope");
		this->SetVersion("$Id$");
		this->SetType(CORE);

		this->AddCommand(OPERSERV, new CommandOSStaff(), MOD_UNIQUE);

		this->SetOperHelp(myOperServHelp);
	}
};


/**
 * Add the help response to anopes /os help output.
 * @param u The user who is requesting help
 **/
void myOperServHelp(User *u)
{
	notice_lang(s_OperServ, u, OPER_HELP_CMD_STAFF);
}

/**
 * Function for the enumerator to call
 **/
int opers_list_callback(SList *slist, int number, void *item, va_list args)
{
	User *u = va_arg(args, User *);
	char *level = va_arg(args, char *);

	return opers_list(number, static_cast<NickCore *>(item), u, level);
}


/**
 * Display an Opers list Entry
 **/
int opers_list(int number, NickCore *nc, User *u, char *level)
{
	User *au = NULL;
	NickAlias *na;
	int found;
	int i;

	if (!nc)
		return 0;

	found = 0;
	if ((au = finduser(nc->display))) /* see if user is online */
	{
		found = 1;
		notice_lang(s_OperServ, u, OPER_STAFF_FORMAT, '*', level, nc->display);
	}
	else
	{
		for (i = 0; i < nc->aliases.count; ++i) /* check all aliases */
		{
			na = static_cast<NickAlias *>(nc->aliases.list[i]);
			if ((au = finduser(na->nick))) /* see if user is online */
			{
				found = 1;
				notice_lang(s_OperServ, u, OPER_STAFF_AFORMAT, '*', level, nc->display, na->nick);
			}
		}
	}

	if (!found)
		notice_lang(s_OperServ, u, OPER_STAFF_FORMAT, ' ', level, nc->display);

	return 1;
}

MODULE_INIT("os_staff", OSStaff)