Shuffle modules around a bit.

1 files changed, 160 insertions, 0 deletions

diff --git a/modules/hostserv/hs_list.cpp b/modules/hostserv/hs_list.cpp
new file mode 100644
index 000000000..8cda26c38
--- /dev/null
+++ b/modules/hostserv/hs_list.cpp
@@ -0,0 +1,160 @@
+/* HostServ core functions
+ *
+ * (C) 2003-2024 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.
+ */
+
+#include "module.h"
+
+class CommandHSList final
+	: public Command
+{
+public:
+	CommandHSList(Module *creator) : Command(creator, "hostserv/list", 0, 1)
+	{
+		this->SetDesc(_("Displays one or more vhost entries"));
+		this->SetSyntax(_("[\037key\037|\037#X-Y\037]"));
+	}
+
+	void Execute(CommandSource &source, const std::vector<Anope::string> &params) override
+	{
+		const Anope::string &key = !params.empty() ? params[0] : "";
+		int from = 0, to = 0, counter = 1;
+
+		/**
+		 * Do a check for a range here, then in the next loop
+		 * we'll only display what has been requested..
+		 **/
+		if (!key.empty() && key[0] == '#')
+		{
+			size_t tmp = key.find('-');
+			if (tmp == Anope::string::npos || tmp == key.length() || tmp == 1)
+			{
+				source.Reply(LIST_INCORRECT_RANGE);
+				return;
+			}
+			for (unsigned i = 1, end = key.length(); i < end; ++i)
+			{
+				if (!isdigit(key[i]) && i != tmp)
+				{
+					source.Reply(LIST_INCORRECT_RANGE);
+					return;
+				}
+				try
+				{
+					from = convertTo<int>(key.substr(1, tmp - 1));
+					to = convertTo<int>(key.substr(tmp + 1));
+				}
+				catch (const ConvertException &) { }
+			}
+		}
+
+		unsigned display_counter = 0, listmax = Config->GetModule(this->owner)->Get<unsigned>("listmax", "50");
+		ListFormatter list(source.GetAccount());
+		list.AddColumn(_("Number")).AddColumn(_("Nick")).AddColumn(_("Vhost")).AddColumn(_("Creator")).AddColumn(_("Created"));
+
+		for (const auto &[_, na] : *NickAliasList)
+		{
+			if (!na->HasVhost())
+				continue;
+
+			if (!key.empty() && key[0] != '#')
+			{
+				if ((Anope::Match(na->nick, key) || Anope::Match(na->GetVhostHost(), key)) && display_counter < listmax)
+				{
+					++display_counter;
+
+					ListFormatter::ListEntry entry;
+					entry["Number"] = stringify(display_counter);
+					entry["Nick"] = na->nick;
+					if (!na->GetVhostIdent().empty())
+						entry["Vhost"] = na->GetVhostIdent() + "@" + na->GetVhostHost();
+					else
+						entry["Vhost"] = na->GetVhostHost();
+					entry["Creator"] = na->GetVhostCreator();
+					entry["Created"] = Anope::strftime(na->GetVhostCreated(), NULL, true);
+					list.AddEntry(entry);
+				}
+			}
+			else
+			{
+				/**
+				 * List the host if its in the display range, and not more
+				 * than NSListMax records have been displayed...
+				 **/
+				if (((counter >= from && counter <= to) || (!from && !to)) && display_counter < listmax)
+				{
+					++display_counter;
+					ListFormatter::ListEntry entry;
+					entry["Number"] = stringify(display_counter);
+					entry["Nick"] = na->nick;
+					if (!na->GetVhostIdent().empty())
+						entry["Vhost"] = na->GetVhostIdent() + "@" + na->GetVhostHost();
+					else
+						entry["Vhost"] = na->GetVhostHost();
+					entry["Creator"] = na->GetVhostCreator();
+					entry["Created"] = Anope::strftime(na->GetVhostCreated(), NULL, true);
+					list.AddEntry(entry);
+				}
+			}
+			++counter;
+		}
+
+		if (!display_counter)
+		{
+			source.Reply(_("No records to display."));
+			return;
+		}
+
+		if (!key.empty())
+			source.Reply(_("Displayed records matching key \002%s\002 (count: \002%d\002)."), key.c_str(), display_counter);
+		else
+		{
+			if (from)
+				source.Reply(_("Displayed records from \002%d\002 to \002%d\002."), from, to);
+			else
+				source.Reply(_("Displayed all records (count: \002%d\002)."), display_counter);
+		}
+
+		std::vector<Anope::string> replies;
+		list.Process(replies);
+
+		for (const auto &reply : replies)
+			source.Reply(reply);
+	}
+
+	bool OnHelp(CommandSource &source, const Anope::string &subcommand) override
+	{
+		this->SendSyntax(source);
+		source.Reply(" ");
+		source.Reply(_("This command lists registered vhosts to the operator.\n"
+				"If a \037key\037 is specified, only entries whose nick or vhost match\n"
+				"the pattern given in \037key\037 are displayed e.g. Rob* for all\n"
+				"entries beginning with \"Rob\"\n"
+				"If a \037#X-Y\037 style is used, only entries between the range of \002X\002\n"
+				"and \002Y\002 will be displayed, e.g. \002#1-3\002 will display the first 3\n"
+				"nick/vhost entries."));
+		return true;
+	}
+};
+
+class HSList final
+	: public Module
+{
+	CommandHSList commandhslist;
+
+public:
+	HSList(const Anope::string &modname, const Anope::string &creator) : Module(modname, creator, VENDOR),
+		commandhslist(this)
+	{
+		if (!IRCD || !IRCD->CanSetVHost)
+			throw ModuleException("Your IRCd does not support vhosts");
+	}
+};
+
+MODULE_INIT(HSList)