/* StatServ 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"

BotInfo *statserv = NULL;
CommandHash *cmdTable[MAX_CMD_HASH];

int statserv_create(int argc, char **argv);
int do_help(User *u);

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

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

		c = createCommand("HELP", do_help, NULL, -1, -1, -1, -1, -1);
		this->AddCommand(cmdTable, c, MOD_HEAD);

		if (servsock == -1) {
			EvtHook *hook;

			hook = createEventHook(EVENT_SERVER_CONNECT, statserv_create);
			this->AddEventHook(hook);
		}
		else
			statserv_create(0, NULL);
	}
	~SSMain()
	{
		CommandHash *current;
		Command *c;
		for (int i = 0; i < MAX_CMD_HASH; i++) {
			for (current = cmdTable[i]; current; current = current->next) {
				for (c = current->c; c; c = c->next)
					this->DelCommand(cmdTable, c->name);
			}
		}
		if (statserv) {
			ircdproto->SendQuit(statserv, "Quit due to module unload.");
			delete statserv;
		}
	}
};

int statserv_create(int argc, char **argv)
{
	statserv = findbot("StatServ");
	if (!statserv) {
		statserv = new BotInfo("StatServ", ServiceUser, ServiceHost, "Stats Service");
		ircdproto->SendClientIntroduction("StatServ", ServiceUser, ServiceHost, "Stats Service", ircd->pseudoclient_mode, statserv->uid.c_str());
	}
	statserv->cmdTable = cmdTable;
	return MOD_CONT;
}

int do_help(User *u)
{
	ircdproto->SendMessage(statserv, u->nick, "This is a test of the emergency StatServ system.");
	return MOD_CONT;
}

MODULE_INIT("ss_main", SSMain)