anope/src/modules/hs_request.c

/* hs_request.c - Add request and activate functionality to HostServ,
 *				along with adding +req as optional param to HostServ list.
 *
 * (C) 2003-2009 Anope Team
 * Contact us at team@anope.org
 *
 * Based on the original module by Rob <rob@anope.org>
 * Included in the Anope module pack since Anope 1.7.11
 * Anope Coder: GeniusDex <geniusdex@anope.org>
 *
 * Please read COPYING and README for further details.
 *
 * Send bug reports to the Anope Coder instead of the module
 * author, because any changes since the inclusion into anope
 * are not supported by the original author.
 */

#include "module.h"

#define AUTHOR "Rob"
#define VERSION "$Id$"

/* Configuration variables */
int HSRequestMemoUser = 0;
int HSRequestMemoOper = 0;
int HSRequestMemoSetters = 0;
char *HSRequestDBName = NULL;

#define HSREQ_DEFAULT_DBNAME "hs_request.db"

/* Language defines */
#define LNG_NUM_STRINGS 21

#define LNG_REQUEST_SYNTAX		0
#define LNG_REQUESTED			1
#define LNG_REQUEST_WAIT		2
#define LNG_REQUEST_MEMO		3
#define LNG_ACTIVATE_SYNTAX		4
#define LNG_ACTIVATED			5
#define LNG_ACTIVATE_MEMO		6
#define LNG_REJECT_SYNTAX		7
#define LNG_REJECTED			8
#define LNG_REJECT_MEMO			9
#define LNG_REJECT_MEMO_REASON	10
#define LNG_NO_REQUEST			11
#define LNG_HELP				12
#define LNG_HELP_SETTER			13
#define LNG_HELP_REQUEST		14
#define LNG_HELP_ACTIVATE		15
#define LNG_HELP_ACTIVATE_MEMO	16
#define LNG_HELP_REJECT			17
#define LNG_HELP_REJECT_MEMO	18
#define LNG_WAITING_SYNTAX		19
#define LNG_HELP_WAITING		20

void hs_help(User *u);

void my_add_host_request(char *nick, char *vIdent, char *vhost, char *creator, int32 tmp_time);
int my_isvalidchar(const char c);
void my_memo_lang(User *u, char *name, int z, int number, ...);
void req_send_memos(User *u, char *vHost);

void hsreq_save_db();
void hsreq_load_db();
int hsreqevt_db_saving(int argc, char **argv);
int hsreqevt_db_backup(int argc, char **argv);

void my_load_config();
void my_add_languages();

HostCore *hs_request_head;

static Module *me;

class CommandHSRequest : public Command
{
 public:
	CommandHSRequest() : Command("REQUEST", 1, 1)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		char *nick;
		const char *rawhostmask = params[0].c_str();
		char hostmask[HOSTMAX];
		NickAlias *na;
		int32 tmp_time;
		char *s;
		char *vIdent = NULL;
		time_t now = time(NULL);

		nick = u->nick;

		vIdent = myStrGetOnlyToken(rawhostmask, '@', 0); /* Get the first substring, @ as delimiter */
		if (vIdent)
		{
			rawhostmask = myStrGetTokenRemainder(rawhostmask, '@', 1); /* get the remaining string */
			if (!rawhostmask)
			{
				me->NoticeLang(s_HostServ, u, LNG_REQUEST_SYNTAX);
				delete [] vIdent;
				return MOD_CONT;
			}
			if (strlen(vIdent) > USERMAX - 1)
			{
				notice_lang(s_HostServ, u, HOST_SET_IDENTTOOLONG, USERMAX);
				delete [] vIdent;
				delete [] rawhostmask;
				return MOD_CONT;
			}
			else
			{
				for (s = vIdent; *s; ++s)
				{
					if (!my_isvalidchar(*s))
					{
						notice_lang(s_HostServ, u, HOST_SET_IDENT_ERROR);
						delete [] vIdent;
						delete [] rawhostmask;
						return MOD_CONT;
					}
				}
			}
			if (!ircd->vident)
			{
				notice_lang(s_HostServ, u, HOST_NO_VIDENT);
				delete [] vIdent;
				delete [] rawhostmask;
				return MOD_CONT;
			}
		}
		if (strlen(rawhostmask) < HOSTMAX - 1)
			snprintf(hostmask, HOSTMAX, "%s", rawhostmask);
		else
		{
			notice_lang(s_HostServ, u, HOST_SET_TOOLONG, HOSTMAX);
			if (vIdent)
			{
				delete [] vIdent;
				delete [] rawhostmask;
			}
			return MOD_CONT;
		}

		if (!isValidHost(hostmask, 3))
		{
			notice_lang(s_HostServ, u, HOST_SET_ERROR);
			if (vIdent)
			{
				delete [] vIdent;
				delete [] rawhostmask;
			}
			return MOD_CONT;
		}

		tmp_time = time(NULL);
		if ((na = findnick(nick)))
		{
			if (HSRequestMemoOper || HSRequestMemoSetters)
			{
				if (MSSendDelay > 0 && u && u->lastmemosend + MSSendDelay > now)
				{
					me->NoticeLang(s_HostServ, u, LNG_REQUEST_WAIT, MSSendDelay);
					u->lastmemosend = now;
					if (vIdent)
					{
						delete [] vIdent;
						delete [] rawhostmask;
					}
					return MOD_CONT;
				}
			}
			my_add_host_request(nick, vIdent, hostmask, u->nick, tmp_time);

			me->NoticeLang(s_HostServ, u, LNG_REQUESTED);
			req_send_memos(u, hostmask);
			alog("New vHost Requested by %s", nick);
		}
		else
			notice_lang(s_HostServ, u, HOST_NOREG, nick);

		if (vIdent)
		{
			delete [] vIdent;
			delete [] rawhostmask;
		}

		return MOD_CONT;
	}

	bool OnHelp(User *u, const std::string &subcommand)
	{
		me->NoticeLang(s_HostServ, u, LNG_REQUEST_SYNTAX);
		ircdproto->SendMessage(findbot(s_HostServ), u->nick, " ");
		me->NoticeLang(s_HostServ, u, LNG_HELP_REQUEST);

		return true;
	}

	void OnSyntaxError(User *u)
	{
		me->NoticeLang(s_HostServ, u, LNG_REQUEST_SYNTAX);
	}
};

class CommandHSActivate : public Command
{
 public:
	CommandHSActivate() : Command("ACTIVATE", 1, 1)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		const char *nick = params[0].c_str();
		NickAlias *na;
		HostCore *tmp, *hc;
		bool found = false;

		if ((na = findnick(nick)))
		{
			tmp = findHostCore(hs_request_head, nick, &found);
			if (found)
			{
				if (!tmp)
					hc = hs_request_head;
				else
					hc = tmp->next;

				addHostCore(hc->nick, hc->vIdent, hc->vHost, u->nick, time(NULL));

				if (HSRequestMemoUser)
					my_memo_lang(u, hc->nick, 2, LNG_ACTIVATE_MEMO);

				hs_request_head = deleteHostCore(hs_request_head, tmp);
				me->NoticeLang(s_HostServ, u, LNG_ACTIVATED, nick);
				alog("Host Request for %s activated by %s", nick, u->nick);
			}
			else
				me->NoticeLang(s_HostServ, u, LNG_NO_REQUEST, nick);
		}
		else
			notice_lang(s_HostServ, u, NICK_X_NOT_REGISTERED, nick);

		return MOD_CONT;
	}

	bool OnHelp(User *u, const std::string &subcommand)
	{
		if (!is_host_setter(u))
			return false;

		me->NoticeLang(s_HostServ, u, LNG_ACTIVATE_SYNTAX);
		ircdproto->SendMessage(findbot(s_HostServ), u->nick, " ");
		me->NoticeLang(s_HostServ, u, LNG_HELP_ACTIVATE);
		if (HSRequestMemoUser)
			me->NoticeLang(s_HostServ, u, LNG_HELP_ACTIVATE_MEMO);

		return true;
	}

	void OnSyntaxError(User *u)
	{
		me->NoticeLang(s_HostServ, u, LNG_ACTIVATE_SYNTAX);
	}
};

class CommandHSReject : public Command
{
 public:
	CommandHSReject() : Command("REJECT", 1, 2)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		const char *nick = params[0].c_str();
		const char *reason = params.size() > 1 ? params[1].c_str() : NULL;
		HostCore *tmp, *hc;
		bool found = false;

		tmp = findHostCore(hs_request_head, nick, &found);
		if (found)
		{
			if (!tmp)
				hc = hs_request_head;
			else
				hc = tmp->next;

			if (HSRequestMemoUser)
			{
				if (reason)
					my_memo_lang(u, hc->nick, 2, LNG_REJECT_MEMO_REASON, reason);
				else
					my_memo_lang(u, hc->nick, 2, LNG_REJECT_MEMO);
			}

			hs_request_head = deleteHostCore(hs_request_head, tmp);
			me->NoticeLang(s_HostServ, u, LNG_REJECTED, nick);
			alog("Host Request for %s rejected by %s (%s)", nick, u->nick, reason ? reason : "");
		}
		else
			me->NoticeLang(s_HostServ, u, LNG_NO_REQUEST, nick);

		return MOD_CONT;
	}

	bool OnHelp(User *u, const std::string &subcommand)
	{
		if (!is_host_setter(u))
			return false;

		me->NoticeLang(s_HostServ, u, LNG_REJECT_SYNTAX);
		ircdproto->SendMessage(findbot(s_HostServ), u->nick, " ");
		me->NoticeLang(s_HostServ, u, LNG_HELP_REJECT);
		if (HSRequestMemoUser)
			me->NoticeLang(s_HostServ, u, LNG_HELP_REJECT_MEMO);

		return true;
	}

	void OnSyntaxError(User *u)
	{
		me->NoticeLang(s_HostServ, u, LNG_REJECT_SYNTAX);
	}
};

class HSListBase : public Command
{
 protected:
	CommandReturn DoList(User *u, std::vector<std::string> &params)
	{
		struct tm *tm;
		char buf[BUFSIZE];
		int counter = 1;
		int from = 0, to = 0;
		int display_counter = 0;
		HostCore *current;

		current = hs_request_head;
		while (current)
		{
			if (((counter >= from && counter <= to) || (!from && !to)) && display_counter < NSListMax)
			{
				++display_counter;
				tm = localtime(&current->time);
				strftime(buf, sizeof(buf), getstring(u, STRFTIME_DATE_TIME_FORMAT), tm);
				if (current->vIdent)
					notice_lang(s_HostServ, u, HOST_IDENT_ENTRY, counter, current->nick, current->vIdent, current->vHost, current->creator, buf);
				else
					notice_lang(s_HostServ, u, HOST_ENTRY, counter, current->nick, current->vHost, current->creator, buf);
			}
			++counter;
			current = current->next;
		}
		notice_lang(s_HostServ, u, HOST_LIST_FOOTER, display_counter);

		return MOD_CONT;
	}
 public:
	HSListBase(const std::string &cmd, int min, int max) : Command(cmd, min, max)
	{
	}

	void OnSyntaxError(User *u)
	{
		// no-op
	}
};

class CommandHSList : public HSListBase
{
 public:
	CommandHSList() : HSListBase("LIST", 0, 1)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		const char *key = params.size() ? params[0].c_str() : NULL;

		if (!key)
			return MOD_CONT;

		if (stricmp(key, "+req"))
			return MOD_CONT;

		return this->DoList(u, params);
	}
};

class CommandHSWaiting : public HSListBase
{
 public:
	CommandHSWaiting() : HSListBase("WAITING", 0, 0)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		return this->DoList(u, params);
	}

	bool OnHelp(User *u, const std::string &subcommand)
	{
		if (!is_host_setter(u))
			return false;

		me->NoticeLang(s_HostServ, u, LNG_WAITING_SYNTAX);
		ircdproto->SendMessage(findbot(s_HostServ), u->nick, " ");
		me->NoticeLang(s_HostServ, u, LNG_HELP_WAITING);

		return true;
	}
};

class CommandNSDrop : public Command
{
 public:
	CommandNSDrop() : Command("DROP", 0, 0)
	{
	}

	CommandReturn Execute(User *u, std::vector<std::string> &params)
	{
		HostCore *tmp;
		bool found = false;
		NickAlias *na;

		na = findnick(u->nick);
		tmp = findHostCore(hs_request_head, u->nick, &found);

		if (found && na)
			hs_request_head = deleteHostCore(hs_request_head, tmp);

		return MOD_CONT;
	}
};

class HSRequest : public Module
{
 public:
	HSRequest(const std::string &modname, const std::string &creator) : Module(modname, creator)
	{
		EvtHook *hook;

		me = this;

		this->AddCommand(HOSTSERV, new CommandHSRequest(), MOD_HEAD);
		this->AddCommand(HOSTSERV, new CommandHSActivate(), MOD_HEAD);
		this->AddCommand(HOSTSERV, new CommandHSReject(), MOD_HEAD);
		this->AddCommand(HOSTSERV, new CommandHSWaiting(), MOD_HEAD);
		this->AddCommand(HOSTSERV, new CommandHSList(), MOD_HEAD);

		this->AddCommand(NICKSERV, new CommandNSDrop(), MOD_HEAD);

		hook = createEventHook(EVENT_DB_SAVING, hsreqevt_db_saving);
		this->AddEventHook(hook);

		hook = createEventHook(EVENT_DB_BACKUP, hsreqevt_db_backup);
		this->AddEventHook(hook);

		this->SetHostHelp(hs_help);
		this->SetAuthor(AUTHOR);
		this->SetVersion(VERSION);
		this->SetType(SUPPORTED);

		my_load_config();
		hs_request_head = NULL;

		hsreq_load_db();

		const char* langtable_en_us[] = {
			/* LNG_REQUEST_SYNTAX */
			"Syntax: \002REQUEST \037vhost\037\002",
			/* LNG_REQUESTED */
			"Your vHost has been requested",
			/* LNG_REQUEST_WAIT */
			"Please wait %d seconds before requesting a new vHost",
			/* LNG_REQUEST_MEMO */
			"[auto memo] vHost \002%s\002 has been requested.",
			/* LNG_ACTIVATE_SYNTAX */
			"Syntax: \002ACTIVATE \037nick\037\002",
			/* LNG_ACTIVATED */
			"vHost for %s has been activated",
			/* LNG_ACTIVATE_MEMO */
			"[auto memo] Your requested vHost has been approved.",
			/* LNG_REJECT_SYNTAX */
			"Syntax: \002REJECT \037nick\037\002",
			/* LNG_REJECTED */
			"vHost for %s has been rejected",
			/* LNG_REJECT_MEMO */
			"[auto memo] Your requested vHost has been rejected.",
			/* LNG_REJECT_MEMO_REASON */
			"[auto memo] Your requested vHost has been rejected. Reason: %s",
			/* LNG_NO_REQUEST */
			"No request for nick %s found.",
			/* LNG_HELP */
			"    REQUEST     Request a vHost for your nick",
			/* LNG_HELP_SETTER */
			"    ACTIVATE    Approve the requested vHost of a user\n"
			"    REJECT      Reject the requested vHost of a user\n"
			"    WAITING     Convenience command for LIST +req",
			/* LNG_HELP_REQUEST */
			"Request the given vHost to be actived for your nick by the\n"
			"network administrators. Please be patient while your request\n"
			"is being considered.",
			/* LNG_HELP_ACTIVATE */
			"Activate the requested vHost for the given nick.",
			/* LNG_HELP_ACTIVATE_MEMO */
			"A memo informing the user will also be sent.",
			/* LNG_HELP_REJECT */
			"Reject the requested vHost for the given nick.",
			/* LNG_HELP_REJECT_MEMO */
			"A memo informing the user will also be sent.",
			/* LNG_WAITING_SYNTAX */
			"Syntax: \002WAITING\002",
			/* LNG_HELP_WAITING */
			"This command is provided for convenience. It is essentially\n"
			"the same as performing a LIST +req ."
		};

		const char* langtable_nl[] = {
			/* LNG_REQUEST_SYNTAX */
			"Gebruik: \002REQUEST \037vhost\037\002",
			/* LNG_REQUESTED */
			"Je vHost is aangevraagd",
			/* LNG_REQUEST_WAIT */
			"Wacht %d seconden voor je een nieuwe vHost aanvraagt",
			/* LNG_REQUEST_MEMO */
			"[auto memo] vHost \002%s\002 is aangevraagd.",
			/* LNG_ACTIVATE_SYNTAX */
			"Gebruik: \002ACTIVATE \037nick\037\002",
			/* LNG_ACTIVATED */
			"vHost voor %s is geactiveerd",
			/* LNG_ACTIVATE_MEMO */
			"[auto memo] Je aangevraagde vHost is geaccepteerd.",
			/* LNG_REJECT_SYNTAX */
			"Gebruik: \002REJECT \037nick\037\002",
			/* LNG_REJECTED */
			"vHost voor %s is afgekeurd",
			/* LNG_REJECT_MEMO */
			"[auto memo] Je aangevraagde vHost is afgekeurd.",
			/* LNG_REJECT_MEMO_REASON */
			"[auto memo] Je aangevraagde vHost is afgekeurd. Reden: %s",
			/* LNG_NO_REQUEST */
			"Geen aanvraag voor nick %s gevonden.",
			/* LNG_HELP */
			"    REQUEST     Vraag een vHost aan voor je nick",
			/* LNG_HELP_SETTER */
			"    ACTIVATE    Activeer de aangevraagde vHost voor een gebruiker\n"
			"    REJECT      Keur de aangevraagde vHost voor een gebruiker af\n"
			"    WAITING     Snelkoppeling naar LIST +req",
			/* LNG_HELP_REQUEST */
			"Verzoek de gegeven vHost te activeren voor jouw nick bij de\n"
			"netwerk beheerders. Het kan even duren voordat je aanvraag\n"
			"afgehandeld wordt.",
			/* LNG_HELP_ACTIVATE */
			"Activeer de aangevraagde vHost voor de gegeven nick.",
			/* LNG_HELP_ACTIVATE_MEMO */
			"Een memo die de gebruiker op de hoogste stelt zal ook worden verstuurd.",
			/* LNG_HELP_REJECT */
			"Keur de aangevraagde vHost voor de gegeven nick af.",
			/* LNG_HELP_REJECT_MEMO */
			"Een memo die de gebruiker op de hoogste stelt zal ook worden verstuurd.",
			/* LNG_WAITING_SYNTAX */
			"Gebruik: \002WAITING\002",
			/* LNG_HELP_WAITING */
			"Dit commando is beschikbaar als handigheid. Het is simpelweg\n"
			"hetzelfde als LIST +req ."
		};

		const char* langtable_pt[] = {
			/* LNG_REQUEST_SYNTAX */
			"Sintaxe: \002REQUEST \037vhost\037\002",
			/* LNG_REQUESTED */
			"Seu pedido de vHost foi encaminhado",
			/* LNG_REQUEST_WAIT */
			"Por favor, espere %d segundos antes de fazer um novo pedido de vHost",
			/* LNG_REQUEST_MEMO */
			"[Auto Memo] O vHost \002%s\002 foi solicitado.",
			/* LNG_ACTIVATE_SYNTAX */
			"Sintaxe: \002ACTIVATE \037nick\037\002",
			/* LNG_ACTIVATED */
			"O vHost para %s foi ativado",
			/* LNG_ACTIVATE_MEMO */
			"[Auto Memo] Seu pedido de vHost foi aprovado.",
			/* LNG_REJECT_SYNTAX */
			"Sintaxe: \002REJECT \037nick\037\002",
			/* LNG_REJECTED */
			"O vHost de %s foi recusado",
			/* LNG_REJECT_MEMO */
			"[Auto Memo] Seu pedido de vHost foi recusado.",
			/* LNG_REJECT_MEMO_REASON */
			"[Auto Memo] Seu pedido de vHost foi recusado. Motivo: %s",
			/* LNG_NO_REQUEST */
			"Nenhum pedido encontrado para o nick %s.",
			/* LNG_HELP */
			"    REQUEST     Request a vHost for your nick",
			/* LNG_HELP_SETTER */
			"    ACTIVATE    Aprova o pedido de vHost de um usuário\n"
			"    REJECT      Recusa o pedido de vHost de um usuário\n"
			"    WAITING     Comando para LISTAR +req",
			/* LNG_HELP_REQUEST */
			"Solicita a ativação do vHost fornecido em seu nick pelos\n"
			"administradores da rede. Por favor, tenha paciência\n"
			"enquanto seu pedido é analisado.",
			/* LNG_HELP_ACTIVATE */
			"Ativa o vHost solicitado para o nick fornecido.",
			/* LNG_HELP_ACTIVATE_MEMO */
			"Um memo informando o usuário também será enviado.",
			/* LNG_HELP_REJECT */
			"Recusa o pedido de vHost para o nick fornecido.",
			/* LNG_HELP_REJECT_MEMO */
			"Um memo informando o usuário também será enviado.",
			/* LNG_WAITING_SYNTAX */
			"Sintaxe: \002WAITING\002",
			/* LNG_HELP_WAITING */
			"Este comando é usado por conveniência. É essencialmente\n"
			"o mesmo que fazer um LIST +req"
		};

		const char* langtable_ru[] = {
			/* LNG_REQUEST_SYNTAX */
			"Ñèíòàêñèñ: \002REQUEST \037vHost\037\002",
			/* LNG_REQUESTED */
			"Âàø çàïðîñ íà vHost îòïðàâëåí.",
			/* LNG_REQUEST_WAIT */
			"Ïîæàëóéñòà, ïîäîæäèòå %d ñåêóíä, ïðåæäå ÷åì çàïðàøèâàòü íîâûé vHost",
			/* LNG_REQUEST_MEMO */
			"[àâòî-ñîîáùåíèå] Áûë çàïðîøåí vHost \002%s\002",
			/* LNG_ACTIVATE_SYNTAX */
			"Ñèíòàêñèñ: \002ACTIVATE \037íèê\037\002",
			/* LNG_ACTIVATED */
			"vHost äëÿ %s óñïåøíî àêòèâèðîâàí",
			/* LNG_ACTIVATE_MEMO */
			"[àâòî-ñîîáùåíèå] Çàïðàøèâàåìûé âàìè vHost óòâåðæäåí è àêòèâèðîâàí.",
			/* LNG_REJECT_SYNTAX */
			"Ñèíòàêñèñ: \002REJECT \037íèê\037\002",
			/* LNG_REJECTED */
			"vHost äëÿ %s îòêëîíåí.",
			/* LNG_REJECT_MEMO */
			"[àâòî-ñîîáùåíèå] Çàïðàøèâàåìûé âàìè vHost îòêëîíåí.",
			/* LNG_REJECT_MEMO_REASON */
			"[àâòî-ñîîáùåíèå] Çàïðàøèâàåìûé âàìè vHost îòêëîíåí. Ïðè÷èíà: %s",
			/* LNG_NO_REQUEST */
			"Çàïðîñ íà vHost äëÿ íèêà %s íå íàéäåí.",
			/* LNG_HELP */
			"    REQUEST     Çàïðîñ íà vHost äëÿ âàøåãî òåêóùåãî íèêà",
			/* LNG_HELP_SETTER */
			"    ACTIVATE    Óòâåðäèòü çàïðàøèâàåìûé ïîëüçîâàòåëåì  vHost\n"
			"    REJECT      Îòêëîíèòü çàïðàøèâàåìûé ïîëüçîâàòåëåì  vHost\n"
			"    WAITING     Ñïèñîê çàïðîñîâ îæèäàþùèõ îáðàáîòêè (àíàëîã LIST +req)",
			/* LNG_HELP_REQUEST */
			"Îòïðàâëÿåò çàïðîñ íà àêòèâàöèþ vHost, êîòîðûé áóäåò ðàññìîòðåí îäíèì èç\n"
			"àäìèíèñòðàòîðîâ ñåòè. Ïðîñüáà ïðîÿâèòü òåðïåíèå, ïîêà çàïðîñ\n"
			"ðàññìàòðèâàåòñÿ àäìèíèñòðàöèåé.",
			/* LNG_HELP_ACTIVATE */
			"Óòâåðäèòü çàïðàøèâàåìûé vHost äëÿ óêàçàííîãî íèêà.",
			/* LNG_HELP_ACTIVATE_MEMO */
			"Ïîëüçîâàòåëþ áóäåò ïîñëàíî àâòî-óâåäîìëåíèå îá àêòèâàöèè åãî çàïðîñà.",
			/* LNG_HELP_REJECT */
			"Îòêëîíèòü çàïðàøèâàåìûé vHost äëÿ óêàçàííîãî íèêà.",
			/* LNG_HELP_REJECT_MEMO */
			"Ïîëüçîâàòåëþ áóäåò ïîñëàíî àâòî-óâåäîìëåíèå îá îòêëîíåíèè åãî çàïðîñà.",
			/* LNG_WAITING_SYNTAX */
			"Ñèíòàêñèñ: \002WAITING\002",
			/* LNG_HELP_WAITING */
			"Äàííàÿ êîìàíäà ñîçäàíà äëÿ óäîáñòâà èñïîëüçîâàíèÿ è âûâîäèò ñïèñîê çàïðîñîâ,\n"
			"îæèäàþùèõ îáðàáîòêè. Àíàëîãè÷íàÿ êîìàíäà: LIST +req ."
		};

		const char* langtable_it[] = {
			/* LNG_REQUEST_SYNTAX */
			"Sintassi: \002REQUEST \037vhost\037\002",
			/* LNG_REQUESTED */
			"Il tuo vHost è stato richiesto",
			/* LNG_REQUEST_WAIT */
			"Prego attendere %d secondi prima di richiedere un nuovo vHost",
			/* LNG_REQUEST_MEMO */
			"[auto memo] è stato richiesto il vHost \002%s\002.",
			/* LNG_ACTIVATE_SYNTAX */
			"Sintassi: \002ACTIVATE \037nick\037\002",
			/* LNG_ACTIVATED */
			"Il vHost per %s è stato attivato",
			/* LNG_ACTIVATE_MEMO */
			"[auto memo] Il vHost da te richiesto è stato approvato.",
			/* LNG_REJECT_SYNTAX */
			"Sintassi: \002REJECT \037nick\037\002",
			/* LNG_REJECTED */
			"Il vHost per %s è stato rifiutato",
			/* LNG_REJECT_MEMO */
			"[auto memo] Il vHost da te richiesto è stato rifiutato.",
			/* LNG_REJECT_MEMO_REASON */
			"[auto memo] Il vHost da te richiesto è stato rifiutato. Motivo: %s",
			/* LNG_NO_REQUEST */
			"Nessuna richiesta trovata per il nick %s.",
			/* LNG_HELP */
			"    REQUEST     Richiede un vHost per il tuo nick",
			/* LNG_HELP_SETTER */
			"    ACTIVATE    Approva il vHost richiesto di un utente\n"
			"    REJECT      Rifiuta il vHost richiesto di un utente\n"
			"    WAITING     Comando per LIST +req",
			/* LNG_HELP_REQUEST */
			"Richiede l'attivazione del vHost specificato per il tuo nick da parte\n"
			"degli amministratori di rete. Sei pregato di pazientare finchè la tua\n"
			"richiesta viene elaborata.",
			/* LNG_HELP_ACTIVATE */
			"Attiva il vHost richiesto per il nick specificato.",
			/* LNG_HELP_ACTIVATE_MEMO */
			"Viene inviato un memo per informare l'utente.",
			/* LNG_HELP_REJECT */
			"Rifiuta il vHost richiesto per il nick specificato.",
			/* LNG_HELP_REJECT_MEMO */
			"Viene inviato un memo per informare l'utente.",
			/* LNG_WAITING_SYNTAX */
			"Sintassi: \002WAITING\002",
			/* LNG_HELP_WAITING */
			"Questo comando è per comodità. Praticamente è la stessa cosa che\n"
			"eseguire un LIST +req ."
		};

		this->InsertLanguage(LANG_EN_US, LNG_NUM_STRINGS, langtable_en_us);
		this->InsertLanguage(LANG_NL, LNG_NUM_STRINGS, langtable_nl);
		this->InsertLanguage(LANG_PT, LNG_NUM_STRINGS, langtable_pt);
		this->InsertLanguage(LANG_RU, LNG_NUM_STRINGS, langtable_ru);
		this->InsertLanguage(LANG_IT, LNG_NUM_STRINGS, langtable_it);
	}

	~HSRequest()
	{
		hsreq_save_db();

		/* Clean up all open host requests */
		while (hs_request_head)
			hs_request_head = deleteHostCore(hs_request_head, NULL);

		delete [] HSRequestDBName;
	}
};

void my_memo_lang(User *u, char *name, int z, int number, ...)
{
	va_list va;
	char buffer[4096], outbuf[4096];
	char *fmt = NULL;
	int lang = LANG_EN_US;
	char *s, *t, *buf;
	User *u2;

	u2 = finduser(name);
	/* Find the users lang, and use it if we cant */
	if (u2 && u2->nc)
		lang = u2->nc->language;

	/* If the users lang isnt supported, drop back to enlgish */
	if (!me->lang[lang].argc)
		lang = LANG_EN_US;

	/* If the requested lang string exists for the language */
	if (me->lang[lang].argc > number)
	{
		fmt = me->lang[lang].argv[number];

		buf = sstrdup(fmt);
		s = buf;
		while (*s)
		{
			t = s;
			s += strcspn(s, "\n");
			if (*s)
				*s++ = '\0';
			strscpy(outbuf, t, sizeof(outbuf));

			va_start(va, number);
			vsnprintf(buffer, 4095, outbuf, va);
			va_end(va);
			memo_send(u, name, buffer, z);
		}
		delete [] buf;
	}
	else
		alog("%s: INVALID language string call, language: [%d], String [%d]", me->name.c_str(), lang, number);
}

void req_send_memos(User *u, char *vHost)
{
	int i;
	int z = 2;

	if (checkDefCon(DEFCON_NO_NEW_MEMOS))
		return;

	if (HSRequestMemoOper == 1)
	{
		for (i = 0; i < servopers.count; ++i)
			my_memo_lang(u, (static_cast<NickCore *>(servopers.list[i]))->display, z, LNG_REQUEST_MEMO, vHost);
		for (i = 0; i < servadmins.count; ++i)
			my_memo_lang(u, (static_cast<NickCore *>(servadmins.list[i]))->display, z, LNG_REQUEST_MEMO, vHost);
		for (i = 0; i < RootNumber; ++i)
			my_memo_lang(u, ServicesRoots[i], z, LNG_REQUEST_MEMO, vHost);
	}
	if (HSRequestMemoSetters == 1)
	{
		for (i = 0; i < HostNumber; ++i)
			my_memo_lang(u, HostSetters[i], z, LNG_REQUEST_MEMO, vHost);
	}
}

void my_add_host_request(char *nick, char *vIdent, char *vhost, char *creator, int32 tmp_time)
{
	HostCore *tmp;
	bool found = false;

	if (!hs_request_head)
		hs_request_head = createHostCorelist(hs_request_head, nick, vIdent, vhost, creator, tmp_time);
	else {
		tmp = findHostCore(hs_request_head, nick, &found);
		if (!found)
			hs_request_head = insertHostCore(hs_request_head, tmp, nick, vIdent, vhost, creator, tmp_time);
		else
		{
			hs_request_head = deleteHostCore(hs_request_head, tmp); /* delete the old entry */
			my_add_host_request(nick, vIdent, vhost, creator, tmp_time); /* recursive call to add new entry */
		}
	}
}

int my_isvalidchar(const char c)
{
	if ((c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z') || (c >= '0' && c <= '9') || c == '.' || c == '-')
		return 1;
	else
		return 0;
}

void hs_help(User * u)
{
	me->NoticeLang(s_HostServ, u, LNG_HELP);
	if (is_host_setter(u))
		me->NoticeLang(s_HostServ, u, LNG_HELP_SETTER);
}

void hsreq_load_db()
{
	FILE *fp;
	const char *filename;
	char readbuf[1024];
	char *nick, *vident, *vhost, *creator, *tmp;
	int32 tmp_time;
	char *buf;

	if (HSRequestDBName)
		filename = HSRequestDBName;
	else
		filename = HSREQ_DEFAULT_DBNAME;

	fp = fopen(filename, "r");
	if (!fp)
	{
		alog("[hs_request] Unable to open database ('%s') for reading", filename);
		return;
	}

	while (fgets(readbuf, 1024, fp))
	{
		buf = normalizeBuffer(readbuf);
		if (buf || *buf)
		{
			nick = myStrGetToken(buf, ':', 0);
			vident = myStrGetToken(buf, ':', 1);
			vhost = myStrGetToken(buf, ':', 2);
			tmp = myStrGetToken(buf, ':', 3);
			if (tmp)
			{
				tmp_time = strtol(tmp, NULL, 16);
				delete [] tmp;
			}
			else
				tmp_time = 0;
			creator = myStrGetToken(buf, ':', 4);
			if (!nick || !vident || !vhost || !creator)
			{
				alog("[hs_request] Error while reading database, skipping record");
				continue;
			}
			if (!stricmp(vident, "(null)"))
			{
				delete [] vident;
				vident = NULL;
			}
			my_add_host_request(nick, vident, vhost, creator, tmp_time);
			delete [] nick;
			delete [] vhost;
			delete [] creator;
			if (vident)
				delete [] vident;
		}
		delete [] buf;
	}

	fclose(fp);

	if (debug)
		alog("[hs_request] Succesfully loaded database");
}

void hsreq_save_db()
{
	FILE *fp;
	const char *filename;
	const char *vident;
	HostCore *current;

	if (HSRequestDBName)
		filename = HSRequestDBName;
	else
		filename = HSREQ_DEFAULT_DBNAME;

	fp = fopen(filename, "w");
	if (!fp)
	{
		alog("[hs_request] Unable to open database ('%s') for writing", filename);
		return;
	}

	current = hs_request_head;
	while (current)
	{
		vident = current->vIdent ? current->vIdent : "(null)";
		fprintf(fp, "%s:%s:%s:%X:%s\n", current->nick, vident, current->vHost, static_cast<uint32>(current->time), current->creator);
		current = current->next;
	}

	fclose(fp);

	if (debug)
		alog("[hs_request] Succesfully saved database");
}

int hsreqevt_db_saving(int argc, char **argv)
{
	if (argc >= 1 && !stricmp(argv[0], EVENT_START))
		hsreq_save_db();

	return MOD_CONT;
}

int hsreqevt_db_backup(int argc, char **argv)
{
	if (argc >= 1 && !stricmp(argv[0], EVENT_START))
	{
		if (HSRequestDBName)
			ModuleDatabaseBackup(HSRequestDBName);
		else
			ModuleDatabaseBackup(HSREQ_DEFAULT_DBNAME);
	}

	return MOD_CONT;
}

void my_load_config()
{
	ConfigReader config;
	HSRequestMemoUser = config.ReadFlag("hs_request", "memouser", "no", 0);
	HSRequestMemoOper = config.ReadFlag("hs_request", "memooper", "no", 0);
	HSRequestMemoSetters = config.ReadFlag("hs_request", "memosetters", "no", 0);
	std::string tmp = config.ReadValue("hs_request", "database", HSREQ_DEFAULT_DBNAME, 0);

	if (HSRequestDBName)
		delete [] HSRequestDBName;
	HSRequestDBName = sstrdup(tmp.c_str());

	if (debug)
		alog("debug: [hs_request] Set config vars: MemoUser=%d MemoOper=%d MemoSetters=%d DBName='%s'", HSRequestMemoUser, HSRequestMemoOper, HSRequestMemoSetters, HSRequestDBName);
}

MODULE_INIT("hs_request", HSRequest)