1 files changed, 106 insertions, 0 deletions
diff --git a/modules/memoserv/ms_rsend.cpp b/modules/memoserv/ms_rsend.cpp
new file mode 100644
index 000000000..b94910d28
--- /dev/null
+++ b/modules/memoserv/ms_rsend.cpp
@@ -0,0 +1,106 @@
+/* MemoServ 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"
+
+namespace
+{
+	ServiceReference<MemoServService> memoserv("MemoServService", "MemoServ");
+}
+
+class CommandMSRSend final
+	: public Command
+{
+public:
+	CommandMSRSend(Module *creator) : Command(creator, "memoserv/rsend", 2, 2)
+	{
+		this->SetDesc(_("Sends a memo and requests a read receipt"));
+		this->SetSyntax(_("{\037nick\037 | \037channel\037} \037memo-text\037"));
+	}
+
+	void Execute(CommandSource &source, const std::vector<Anope::string> &params) override
+	{
+		if (!memoserv)
+			return;
+
+		if (Anope::ReadOnly && !source.IsOper())
+		{
+			source.Reply(READ_ONLY_MODE);
+			return;
+		}
+
+		const Anope::string &nick = params[0];
+		const Anope::string &text = params[1];
+		const NickAlias *na = NULL;
+
+		/* prevent user from rsend to themselves */
+		if ((na = NickAlias::Find(nick)) && na->nc == source.GetAccount())
+		{
+			source.Reply(_("You can not request a receipt when sending a memo to yourself."));
+			return;
+		}
+
+		if (Config->GetModule(this->owner)->Get<bool>("operonly") && !source.IsServicesOper())
+			source.Reply(ACCESS_DENIED);
+		else
+		{
+			MemoServService::MemoResult result = memoserv->Send(source.GetNick(), nick, text);
+			if (result == MemoServService::MEMO_INVALID_TARGET)
+				source.Reply(_("\002%s\002 is not a registered unforbidden nick or channel."), nick.c_str());
+			else if (result == MemoServService::MEMO_TOO_FAST)
+				source.Reply(_("Please wait %lu seconds before using the %s command again."), Config->GetModule("memoserv")->Get<unsigned long>("senddelay"), source.command.c_str());
+			else if (result == MemoServService::MEMO_TARGET_FULL)
+				source.Reply(_("Sorry, %s currently has too many memos and cannot receive more."), nick.c_str());
+			else
+			{
+				source.Reply(_("Memo sent to \002%s\002."), nick.c_str());
+
+				bool ischan;
+				MemoInfo *mi = MemoInfo::GetMemoInfo(nick, ischan);
+				if (mi == NULL)
+					throw CoreException("NULL mi in ms_rsend");
+				Memo *m = (mi->memos->size() ? mi->GetMemo(mi->memos->size() - 1) : NULL);
+				if (m != NULL)
+					m->receipt = true;
+			}
+		}
+	}
+
+	bool OnHelp(CommandSource &source, const Anope::string &subcommand) override
+	{
+		this->SendSyntax(source);
+		source.Reply(" ");
+		source.Reply(_("Sends the named \037nick\037 or \037channel\037 a memo containing\n"
+				"\037memo-text\037. When sending to a nickname, the recipient will\n"
+				"receive a notice that they have a new memo. The target\n"
+				"nickname/channel must be registered.\n"
+				"Once the memo is read by its recipient, an automatic notification\n"
+				"memo will be sent to the sender informing them that the memo\n"
+				"has been read."));
+		return true;
+	}
+};
+
+class MSRSend final
+	: public Module
+{
+	CommandMSRSend commandmsrsend;
+
+public:
+	MSRSend(const Anope::string &modname, const Anope::string &creator) : Module(modname, creator, VENDOR),
+		commandmsrsend(this)
+	{
+		if (!memoserv)
+			throw ModuleException("No MemoServ!");
+	}
+};
+
+MODULE_INIT(MSRSend)