Bug fix - parsing of all HTTP requests fails after a malformed request

dimkr · Mar 12, 2018 · 497432a · 497432a
1 parent d07db00
commit 497432a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/examples/httpd.b6b b/examples/httpd.b6b
@@ -75,9 +75,9 @@
 }}
 
 {$proc on_request {
+	{$local fd [$1 fd]}
 	{$local chunk [$1 read $.]}
 	{$if [$str.len $chunk] {
-		{$local fd [$1 fd]}
 		{$local data [$dict.get $http.reqs $fd {}]}
 
 		{$if [$> [$+ [$str.len $data] [$str.len $chunk]] $http.req_max] {
@@ -98,6 +98,7 @@
 			{$dict.set $http.reqs $fd $data}
 		}}
 	} {
+		{$forget_client $fd}
 		{$throw}
 	}}
 } [$+ $http.req_max 1]}