--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/libpurple/protocols/ircv3/purpleircv3source.c	Fri Oct 06 00:35:28 2023 -0500
@@ -0,0 +1,87 @@
+/*
+ * Purple - Internet Messaging Library
+ * Copyright (C) Pidgin Developers <devel@pidgin.im>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include <purple.h>
+
+#include "purpleircv3source.h"
+
+/******************************************************************************
+ * Public API
+ *****************************************************************************/
+void
+purple_ircv3_source_parse(const char *source, char **nick, char **user,
+                          char **host)
+{
+	GRegex *regex = NULL;
+	GMatchInfo *info = NULL;
+	gboolean matched = FALSE;
+
+	g_return_if_fail(!purple_strempty(source));
+	g_return_if_fail(nick != NULL || user != NULL || host != NULL);
+
+	/* If we find any \r \n or spaces in our source, it's invalid so we just
+	 * bail immediately.
+	 */
+	matched = g_regex_match_simple("[\r\n ]", source, G_REGEX_DEFAULT,
+	                               G_REGEX_MATCH_DEFAULT);
+	if(matched) {
+		return;
+	}
+
+	regex = g_regex_new("^(?P<nick>[^ \r\n!]+)(?:!(?P<user>[^@]+)(?:@(?P<host>[^!@]+))?)?$",
+	                    G_REGEX_DEFAULT, G_REGEX_MATCH_DEFAULT, NULL);
+
+	matched = g_regex_match(regex, source, G_REGEX_MATCH_DEFAULT, &info);
+	if(!matched) {
+		if(nick != NULL) {
+			*nick = g_strdup(source);
+		}
+
+		g_clear_pointer(&info, g_match_info_unref);
+		g_clear_pointer(&regex, g_regex_unref);
+
+		return;
+	}
+
+	if(nick != NULL) {
+		*nick = g_match_info_fetch_named(info, "nick");
+	}
+
+	if(user != NULL) {
+		char *tmp = g_match_info_fetch_named(info, "user");
+
+		if(!purple_strempty(tmp)) {
+			*user = tmp;
+		} else {
+			g_free(tmp);
+		}
+	}
+
+	if(host != NULL) {
+		char *tmp = g_match_info_fetch_named(info, "host");
+
+		if(!purple_strempty(tmp)) {
+			*host = tmp;
+		} else {
+			g_free(tmp);
+		}
+	}
+
+	g_clear_pointer(&info, g_match_info_unref);
+	g_clear_pointer(&regex, g_regex_unref);
+}