From 6b103ae6d31bb8ac902ebd10c91f447bc702a9c6 Mon Sep 17 00:00:00 2001 From: Kris Katterjohn Date: Sun, 5 Feb 2017 13:01:07 -0600 Subject: [PATCH] Fix off-by-one range checks for TCP port numbers Port numbers should be in the range [0,65535] not [0,65536]. It looks like the check was changed from 65535 to 65536 in commit 89b9a561eac49959797dfb71656e85713c15a30d. --- src/c/tcp.d | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/c/tcp.d b/src/c/tcp.d index 109486b95..aff9d146f 100644 --- a/src/c/tcp.d +++ b/src/c/tcp.d @@ -277,7 +277,7 @@ si_open_client_stream(cl_object host, cl_object port) if (ecl_unlikely(!ECL_FIXNUMP(port) || ecl_fixnum_minusp(port) || - ecl_fixnum_greater(port,ecl_make_fixnum(65536)))) { + ecl_fixnum_greater(port,ecl_make_fixnum(65535)))) { FEwrong_type_nth_arg(@[si::open-client-stream], 2, port, ecl_read_from_cstring("(INTEGER 0 65535)")); } @@ -311,7 +311,7 @@ si_open_server_stream(cl_object port) if (ecl_unlikely(!ECL_FIXNUMP(port) || ecl_fixnum_minusp(port) || - ecl_fixnum_greater(port,ecl_make_fixnum(65536)))) { + ecl_fixnum_greater(port,ecl_make_fixnum(65535)))) { FEwrong_type_only_arg(@[si::open-client-stream], port, ecl_read_from_cstring("(INTEGER 0 65535)")); }