# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1227046566 0
# Node ID 906311ff2170daa0fb738f3ad92bb0a16d2a0336
# Parent  bffd80e8c7a3145140471dc263746bb5733f301b
Fix to prevent send retry when connection is already closed

diff -r bffd80e8c7a3 -r 906311ff2170 net/server.lua
--- a/net/server.lua	Tue Nov 18 19:58:29 2008 +0000
+++ b/net/server.lua	Tue Nov 18 22:16:06 2008 +0000
@@ -190,7 +190,7 @@
 
 	local writequeue = { }    -- buffer for messages to send
 
-	local eol   -- end of buffer
+	local eol, fatal_send_error   -- end of buffer
 
 	local sstat, rstat = 0, 0
 
@@ -225,7 +225,7 @@
 		--return shutdown( socket, pattern )
 	end
 	handler.close = function( closed )
-		if eol then handler._dispatchdata(); end
+		if eol and not fatal_send_error then handler._dispatchdata(); end
 		close( socket )
 		writelen = ( eol and removesocket( writelist, socket, writelen ) ) or writelen
 		readlen = removesocket( readlist, socket, readlen )
@@ -296,6 +296,7 @@
 			eol = 1
 			return true
 		else    -- connection was closed during sending or fatal error
+			fatal_send_error = true;
 			out_put( "server.lua: client ", ip, ":", clientport, " error: ", err )
 			handler.close( )
 			disconnect( handler, err )
@@ -371,7 +372,7 @@
 
 	local writequeue = { }    -- buffer for messages to send
 
-	local eol   -- end of buffer
+	local eol, fatal_send_error   -- end of buffer
 
 	local sstat, rstat = 0, 0
 
@@ -406,7 +407,7 @@
 		--return shutdown( socket, pattern )
 	end
 	handler.close = function( closed )
-		if eol then handler._dispatchdata(); end
+		if eol and not fatal_send_error then handler._dispatchdata(); end
 		close( socket )
 		writelen = ( eol and removesocket( writelist, socket, writelen ) ) or writelen
 		readlen = removesocket( readlist, socket, readlen )
@@ -484,6 +485,7 @@
 			eol = 1
 			return true
 		else    -- connection was closed during sending or fatal error
+			fatal_send_error = true; -- :(
 			out_put( "server.lua: client ", ip, ":", clientport, " error: ", err )
 			handler.close( )
 			disconnect( handler, err )
@@ -582,7 +584,7 @@
 
 	local writequeue = { }    -- list for messages to send
 
-	local eol
+	local eol, fatal_send_error
 
 	local rstat, sstat = 0, 0
 
@@ -617,7 +619,7 @@
 		return shutdown( socket, pattern )
 	end
 	handler.close = function( closed )
-		if eol then handler._dispatchdata(); end
+		if eol and not fatal_send_error then handler._dispatchdata(); end
 		_ = not closed and shutdown( socket )
 		_ = not closed and close( socket )
 		writelen = ( eol and removesocket( writelist, socket, writelen ) ) or writelen
@@ -690,6 +692,7 @@
 			eol = 1
 			return true
 		else    -- connection was closed during sending or fatal error
+			fatal_send_error = true; -- :'-(
 			out_put( "server.lua: client ", ip, ":", clientport, " error: ", err )
 			handler.close( )
 			disconnect( handler, err )