From b3eb800be183a844a4e70ca7ba2d757bbb831724 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Thu, 23 Jul 2009 14:50:58 +0000
Subject: [PATCH] Log an error if HTTP request does not include Host header
 (EJAB-966)

SVN Revision: 2386
---
 src/web/ejabberd_http.erl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/web/ejabberd_http.erl b/src/web/ejabberd_http.erl
index 8eec261ce..bed6c28ac 100644
--- a/src/web/ejabberd_http.erl
+++ b/src/web/ejabberd_http.erl
@@ -235,6 +235,9 @@ process_header(State, Data) ->
 			request_headers=add_header(Name, Host, State)};
 	{ok, {http_header, _, Name, _, Value}} ->
 	    State#state{request_headers=add_header(Name, Value, State)};
+	{ok, http_eoh} when State#state.request_host == undefined ->
+	    ?WARNING_MSG("An HTTP request without 'Host' HTTP header was received.", []),
+	    throw(http_request_no_host_header);
 	{ok, http_eoh} ->
 	    ?DEBUG("(~w) http query: ~w ~s~n",
 		   [State#state.socket,