aboutsummaryrefslogtreecommitdiffstats
path: root/lib/inets/src/http_server/httpd_conf.erl
diff options
context:
space:
mode:
authorIngela Anderton Andin <[email protected]>2013-02-22 14:41:55 +0100
committerIngela Anderton Andin <[email protected]>2013-02-22 14:41:55 +0100
commit5c7fe21f434f15a1005cb0529a64ca8461c83172 (patch)
tree6e79aa7bbe1a72eff14e57ef260d371365de9191 /lib/inets/src/http_server/httpd_conf.erl
parent5b1d51fedf10ebc6cccaa4f43396f98c644f3ba9 (diff)
parentda3797589463002f28fc42ef27872650fe1de938 (diff)
downloadotp-5c7fe21f434f15a1005cb0529a64ca8461c83172.tar.gz
otp-5c7fe21f434f15a1005cb0529a64ca8461c83172.tar.bz2
otp-5c7fe21f434f15a1005cb0529a64ca8461c83172.zip
Merge branch 'ia/inets/httpc-pipelin-vs-persisten-and-httpd-ssl-conf'
* ia/inets/httpc-pipelin-vs-persisten-and-httpd-ssl-conf: inets httpd: Handle ipfamily option correctly when listning to port 0 inets: Improve ssl handling inets httpd: The option modules now defaults to its documented default value. inets httpc: Corrected separation of pipelining and persisten connections
Diffstat (limited to 'lib/inets/src/http_server/httpd_conf.erl')
-rw-r--r--lib/inets/src/http_server/httpd_conf.erl16
1 files changed, 12 insertions, 4 deletions
diff --git a/lib/inets/src/http_server/httpd_conf.erl b/lib/inets/src/http_server/httpd_conf.erl
index a97bbd9b25..d45f3c0048 100644
--- a/lib/inets/src/http_server/httpd_conf.erl
+++ b/lib/inets/src/http_server/httpd_conf.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 1997-2012. All Rights Reserved.
+%% Copyright Ericsson AB 1997-2013. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -582,11 +582,17 @@ validate_config_params([{server_tokens, {private, Value}} | Rest])
validate_config_params([{server_tokens, Value} | _]) ->
throw({server_tokens, Value});
+validate_config_params([{socket_type, ip_comm} | Rest]) ->
+ validate_config_params(Rest);
+
validate_config_params([{socket_type, Value} | Rest])
- when (Value =:= ip_comm) orelse
- (Value =:= ssl) orelse
- (Value =:= essl) ->
+ when Value == ssl; Value == essl ->
validate_config_params(Rest);
+
+validate_config_params([{socket_type, {Value, _}} | Rest])
+ when Value == essl orelse Value == ssl ->
+ validate_config_params(Rest);
+
validate_config_params([{socket_type, Value} | _]) ->
throw({socket_type, Value});
@@ -916,6 +922,8 @@ lookup_socket_type(ConfigDB) ->
case httpd_util:lookup(ConfigDB, socket_type, ip_comm) of
ip_comm ->
ip_comm;
+ {Tag, Conf} ->
+ {Tag, Conf};
SSL when (SSL =:= ssl) orelse (SSL =:= essl) ->
SSLTag =
if