/* 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"
int do_operoline(User * u);

void myOperServHelp(User * u);

class OSOLine : public Module
{
 public:
	OSOLine(const std::string &modname, const std::string &creator) : Module(modname, creator)
	{
		Command *c;

		this->SetAuthor("Anope");
		this->SetVersion("$Id$");
		this->SetType(CORE);

		c = createCommand("OLINE", do_operoline, is_services_root, OPER_HELP_OLINE, -1, -1, -1, -1);
		this->AddCommand(OPERSERV, c, MOD_UNIQUE);

		this->SetOperHelp(myOperServHelp);

		if (!ircd->omode)
			throw ModuleException("Your IRCd does not support OMODE.");

	}
};


/**
 * Add the help response to anopes /os help output.
 * @param u The user who is requesting help
 **/
void myOperServHelp(User * u)
{
	if (is_services_admin(u) && u->isSuperAdmin) {
		notice_lang(s_OperServ, u, OPER_HELP_CMD_OLINE);
	}
}

/**
 * The /os oline command.
 * @param u The user who issued the command
 * @param MOD_CONT to continue processing other modules, MOD_STOP to stop processing.
 **/
int do_operoline(User * u)
{
	char *nick = strtok(NULL, " ");
	char *flags = strtok(NULL, "");
	User *u2 = NULL;

	/* Only allow this if SuperAdmin is enabled */
	if (!u->isSuperAdmin) {
		notice_lang(s_OperServ, u, OPER_SUPER_ADMIN_ONLY);
		return MOD_CONT;
	}

	if (!nick || !flags) {
		syntax_error(s_OperServ, u, "OLINE", OPER_OLINE_SYNTAX);
		return MOD_CONT;
	} else {
		/* let's check whether the user is online */
		if (!(u2 = finduser(nick))) {
			notice_lang(s_OperServ, u, NICK_X_NOT_IN_USE, nick);
		} else if (u2 && flags[0] == '+') {
			ircdproto->SendSVSO(s_OperServ, nick, flags);
			ircdproto->SendMode(findbot(s_OperServ), nick, "+o");
			common_svsmode(u2, "+o", NULL);
			notice_lang(s_OperServ, u2, OPER_OLINE_IRCOP);
			notice_lang(s_OperServ, u, OPER_OLINE_SUCCESS, flags, nick);
			ircdproto->SendGlobops(s_OperServ, "\2%s\2 used OLINE for %s",
							 u->nick, nick);
		} else if (u2 && flags[0] == '-') {
			ircdproto->SendSVSO(s_OperServ, nick, flags);
			notice_lang(s_OperServ, u, OPER_OLINE_SUCCESS, flags, nick);
			ircdproto->SendGlobops(s_OperServ, "\2%s\2 used OLINE for %s",
							 u->nick, nick);
		} else
			syntax_error(s_OperServ, u, "OLINE", OPER_OLINE_SYNTAX);
	}
	return MOD_CONT;
}

MODULE_INIT("os_oline", OSOLine)