From 040cd397fa9204c1b123635c3f2bfcd94037c441 Mon Sep 17 00:00:00 2001
From: Alexander Kuiper <ualex73@users.sourceforge.net>
Date: Fri, 16 Aug 2013 16:04:28 +0000
Subject: [PATCH] [GB.XML.RPC] BUG: miniServer would give an out-of-bound if
 content-length is wrong

git-svn-id: svn://localhost/gambas/trunk@5802 867c0c6c-44f3-4631-809d-bfa615b0a4ec
---
 gb.xml/src/rpc/gb.xml.rpc/.src/miniServer.class | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/gb.xml/src/rpc/gb.xml.rpc/.src/miniServer.class b/gb.xml/src/rpc/gb.xml.rpc/.src/miniServer.class
index 7ab062bdc..d125e5c00 100644
--- a/gb.xml/src/rpc/gb.xml.rpc/.src/miniServer.class
+++ b/gb.xml/src/rpc/gb.xml.rpc/.src/miniServer.class
@@ -345,13 +345,7 @@ Public Sub Socket_Read()
       Wait 0.005
     Next
 
-    ' Content-Length and data size doesn't match
-    If cLen <> hLen[Bucle] Then
-      hError(hS, "413 Request Entity Too Large")
-      RemoveSocket(hS)
-    End If
-
-    If cLen = hLen[Bucle] Then 
+    If cLen = hLen[Bucle] Then
       ProcessQuery(hS, hBuffer[Bucle])
       Return
     Else