diff --git a/library/network/http_network/src/ssl/http_stream_secure_socket.e b/library/network/http_network/src/ssl/http_stream_secure_socket.e index bb49cd19..4b78bc7a 100644 --- a/library/network/http_network/src/ssl/http_stream_secure_socket.e +++ b/library/network/http_network/src/ssl/http_stream_secure_socket.e @@ -55,12 +55,19 @@ feature -- Secure connection Helpers end set_secure_protocol_to_ssl_2_or_3 - -- Set `ssl_protocol' with `Ssl_23'. - do - set_secure_protocol ({SSL_PROTOCOL}.Ssl_23) - end + -- Set `ssl_protocol' with `Ssl_23'. + -- Protocol not supported anymore. + obsolete + "Use set_secure_protocol_to_tls_1_2 [2017-06-23]." + local + err: DEVELOPER_EXCEPTION + do + create err + err.set_description ("SSL_2 or SSL_3 are not supported anymore, upgrate to TLS set_secure_protocol_to_tls_1_2") + err.raise + end - set_secure_protocol_to_tls_1_0 + set_secure_protocol_to_tls_1_0 -- Set `ssl_protocol' with `Tls_1_0'. do set_secure_protocol ({SSL_PROTOCOL}.Tls_1_0) @@ -176,7 +183,14 @@ feature -- Output end note - copyright: "2011-2013, Javier Velilla, Jocelyn Fiat and others" + copyright: "2011-2017, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Colin Adams, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" + source: "[ + Eiffel Software + 5949 Hollister Ave., Goleta, CA 93117 USA + Telephone 805-685-1006, Fax 805-685-6869 + Website http://www.eiffel.com + Customer support http://support.eiffel.com + ]" end diff --git a/library/server/httpd/configuration/httpd_configuration_i.e b/library/server/httpd/configuration/httpd_configuration_i.e index 74503928..f02c35e6 100644 --- a/library/server/httpd/configuration/httpd_configuration_i.e +++ b/library/server/httpd/configuration/httpd_configuration_i.e @@ -167,7 +167,7 @@ feature -- Element change end set_socket_timeout (a_nb_seconds: like socket_timeout) - -- Set `socket_timeout' with `a_nb_seconds' + -- Set `socket_timeout' with `a_nb_seconds'. do socket_timeout := a_nb_seconds ensure @@ -175,7 +175,7 @@ feature -- Element change end set_socket_recv_timeout (a_nb_seconds: like socket_recv_timeout) - -- Set `socket_recv_timeout' with `a_nb_seconds' + -- Set `socket_recv_timeout' with `a_nb_seconds'. do socket_recv_timeout := a_nb_seconds ensure @@ -183,7 +183,7 @@ feature -- Element change end set_keep_alive_timeout (a_seconds: like keep_alive_timeout) - -- Set `keep_alive_timeout' with `a_seconds' + -- Set `keep_alive_timeout' with `a_seconds'. do keep_alive_timeout := a_seconds ensure @@ -191,7 +191,7 @@ feature -- Element change end set_max_keep_alive_requests (nb: like max_keep_alive_requests) - -- Set `max_keep_alive_requests' with `nb' + -- Set `max_keep_alive_requests' with `nb'. do max_keep_alive_requests := nb ensure @@ -254,7 +254,7 @@ feature -- Element change end mark_secure - -- Set is_secure in True + -- Set is_secure in True. do set_is_secure (True) ensure @@ -287,7 +287,7 @@ feature -- Element change end set_secure_protocol (a_version: NATURAL) - -- Set `secure_protocol' with `a_version' + -- Set `secure_protocol' with `a_version'. do secure_protocol := a_version ensure @@ -295,7 +295,7 @@ feature -- Element change end set_secure_protocol_from_string (a_ssl_version: READABLE_STRING_GENERAL) - -- Set `secure_protocol' with `a_ssl_version' + -- Set `secure_protocol' with `a_ssl_version'. do if a_ssl_version.is_case_insensitive_equal ("ssl_2_3") then set_secure_protocol_to_ssl_2_or_3 @@ -316,6 +316,8 @@ feature -- SSL Helpers set_secure_protocol_to_ssl_2_or_3 -- Set `secure_protocol' with `Ssl_23'. + obsolete + "Use set_secure_protocol_to_tls_1_2 [2017-06-23]." deferred end diff --git a/library/server/httpd/ssl/httpd_configuration.e b/library/server/httpd/ssl/httpd_configuration.e index 1a5d1961..2b088fc1 100644 --- a/library/server/httpd/ssl/httpd_configuration.e +++ b/library/server/httpd/ssl/httpd_configuration.e @@ -36,9 +36,16 @@ feature -- Access feature -- SSL Helpers set_secure_protocol_to_ssl_2_or_3 - -- Set `secure_protocol' with `Ssl_23'. + -- Set `ssl_protocol' with `Ssl_23'. + -- Protocol not supported anymore. + obsolete + "Use set_secure_protocol_to_tls_1_2 [2017-06-23]." + local + err: DEVELOPER_EXCEPTION do - set_secure_protocol ({SSL_PROTOCOL}.Ssl_23) + create err + err.set_description ("SSL_2 or SSL_3 are not supported anymore, upgrate to TLS set_secure_protocol_to_tls_1_2") + err.raise end set_secure_protocol_to_tls_1_0 @@ -67,7 +74,7 @@ feature -- SSL Helpers note - copyright: "2011-2014, Jocelyn Fiat, Javier Velilla, Eiffel Software and others" + copyright: "2011-2017, Jocelyn Fiat, Javier Velilla, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software