From ca6af8e2cfeb2373224dc5949f1a3e02cd42b81b Mon Sep 17 00:00:00 2001
From: daurnimator <quae@daurnimator.com>
Date: Wed, 18 Dec 2013 17:55:03 -0500
Subject: net/server_select: addclient: Check arguments

---
 net/server_select.lua | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/net/server_select.lua b/net/server_select.lua
index bd4e59df..c707e48f 100644
--- a/net/server_select.lua
+++ b/net/server_select.lua
@@ -931,6 +931,21 @@ local wrapclient = function( socket, ip, serverport, listeners, pattern, sslctx
 end
 
 local addclient = function( address, port, listeners, pattern, sslctx )
+	local err
+	if type( listeners ) ~= "table" then
+		err = "invalid listener table"
+	elseif type ( addr ) ~= "string" then
+		err = "invalid address"
+	elseif type( port ) ~= "number" or not ( port >= 0 and port <= 65535 ) then
+		err = "invalid port"
+	elseif sslctx and not has_luasec then
+		err = "luasec not found"
+	end
+	if err then
+		out_error( "server.lua, addclient: ", err )
+		return nil, err
+	end
+
 	local client, err = luasocket.tcp( )
 	if err then
 		return nil, err
-- 
cgit v1.2.3