Warn about undelivered carbons to foreign serversv1.5.0

1 files changed, 9 insertions, 0 deletions

diff --git a/xmpp/handlers.go b/xmpp/handlers.go
index 2bdbaef..db2b6ea 100644
--- a/xmpp/handlers.go
+++ b/xmpp/handlers.go
@@ -168,6 +168,15 @@ func HandleMessage(s xmpp.Sender, p stanza.Packet) {
 
 	if msg.Type == "error" {
 		log.Errorf("MESSAGE ERROR: %#v", p)
+
+		if msg.XMLName.Space == "jabber:component:accept" && msg.Error.Code == 401 {
+			suffix := "@" + msg.From
+			for bare := range sessions {
+				if strings.HasSuffix(bare, suffix) {
+					gateway.SendServiceMessage(bare, "Your server \"" + msg.From + "\" does not allow to send carbons", component)
+				}
+			}
+		}
 	}
 }