From 9d84caebdb80b3f2fce14843516cbc5e6445bdbc Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <xramtsov@gmail.com>
Date: Wed, 3 Feb 2010 11:25:03 +0000
Subject: [PATCH] avoid resending <stream:error> stanzas on terminate
 (EJAB-1180)

SVN Revision: 2955
---
 src/web/ejabberd_http_poll.erl | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/src/web/ejabberd_http_poll.erl b/src/web/ejabberd_http_poll.erl
index c05470f3a..bd7b8bd0e 100644
--- a/src/web/ejabberd_http_poll.erl
+++ b/src/web/ejabberd_http_poll.erl
@@ -426,11 +426,16 @@ resend_messages(Messages) ->
 %% This function is used to resend messages that have been polled but not
 %% delivered.
 resend_message(Packet) ->
-    ParsedPacket = xml_stream:parse_element(Packet),
-    From = get_jid("from", ParsedPacket),
-    To = get_jid("to", ParsedPacket),
-    ?DEBUG("Resend ~p ~p ~p~n",[From,To, ParsedPacket]),
-    ejabberd_router:route(From, To, ParsedPacket).
+    {xmlelement, Name, _, _} = ParsedPacket = xml_stream:parse_element(Packet),
+    %% Avoid sending <stream:error>
+    if Name == "iq"; Name == "message"; Name == "presence" ->
+	    From = get_jid("from", ParsedPacket),
+	    To = get_jid("to", ParsedPacket),
+	    ?DEBUG("Resend ~p ~p ~p~n",[From,To, ParsedPacket]),
+	    ejabberd_router:route(From, To, ParsedPacket);
+       true ->
+	    ok
+    end.
 
 %% Type can be "from" or "to"
 %% Parsed packet is a parsed Jabber packet.