rollback localhost => 127.0.0.1 change for servers

Author: lgv5

t/mojo/ioloop_tls.t

@@ -36,7 +36,7 @@ utf8::upgrade $upgraded;
 my ($server, $client);
 my $promise = Mojo::Promise->new->ioloop($loop);
 my $id      = $loop->server(
-  {address => 'localhost', tls => 1} => sub {
+  {address => '127.0.0.1', tls => 1} => sub {
     my ($loop, $stream) = @_;
     $stream->write($upgraded => sub { shift->write('321') });
     $stream->on(close => sub { $promise->resolve });
@@ -64,7 +64,7 @@ my ($remove, $running, $timeout, $server_err, $server_close, $client_close);
 Mojo::IOLoop->remove(Mojo::IOLoop->recurring(0 => sub { $remove++ }));
 $promise = Mojo::Promise->new;
 $id      = Mojo::IOLoop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_ca   => 't/mojo/certs/ca.crt',
   tls_cert => 't/mojo/certs/server.crt',
@@ -148,7 +148,7 @@ ok $client_err,  'has error';
 $loop = Mojo::IOLoop->new;
 ($server_err, $client_err) = ();
 $id = $loop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_ca   => 'no cert',
   tls_cert => 't/mojo/certs/server.crt',
@@ -176,7 +176,7 @@ ok $client_err,  'has error';
 ($client, $client_close) = ();
 $promise = Mojo::Promise->new;
 $id      = Mojo::IOLoop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_ca   => 't/mojo/certs/ca.crt',
   tls_cert => 't/mojo/certs/server.crt',
@@ -231,7 +231,7 @@ ok !$server_err, 'no error';
 $loop = Mojo::IOLoop->new;
 ($server_err, $client_err) = ();
 $id = $loop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_cert => 't/mojo/certs/bad.crt',
   tls_key  => 't/mojo/certs/bad.key',
@@ -256,7 +256,7 @@ ok $client_err,  'has error';
 $loop = Mojo::IOLoop->new;
 ($server_err, $client_err) = ();
 $id = $loop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_cert => 't/mojo/certs/bad.crt',
   tls_key  => 't/mojo/certs/bad.key',
@@ -281,7 +281,7 @@ ok $client_err,  'has error';
 $loop = Mojo::IOLoop->new;
 ($server_err, $client_err) = ();
 $id = $loop->server(
-  address  => 'localhost',
+  address  => '127.0.0.1',
   tls      => 1,
   tls_cert => 't/mojo/certs/bad.crt',
   tls_key  => 't/mojo/certs/bad.key',
@@ -307,7 +307,7 @@ $loop = Mojo::IOLoop->new;
 my ($cipher, $version);
 ($server, $client, $client_err) = ();
 $id = $loop->server(
-  address     => 'localhost',
+  address     => '127.0.0.1',
   tls         => 1,
   tls_ca      => 't/mojo/certs/ca.crt',
   tls_cert    => 't/mojo/certs/server.crt',
@@ -347,7 +347,7 @@ is $cipher, $expect, "$expect has been negotiatied";
 # Ignore missing client certificate
 ($server, $client, $client_err) = ();
 $id = Mojo::IOLoop->server(
-  address     => 'localhost',
+  address     => '127.0.0.1',
   tls         => 1,
   tls_ca      => 't/mojo/certs/ca.crt',
   tls_cert    => 't/mojo/certs/server.crt',
@@ -372,7 +372,7 @@ subtest 'ALPN' => sub {
   plan skip_all => 'ALPN support required!' unless IO::Socket::SSL->can_alpn;
   my ($server_proto, $client_proto);
   $id = Mojo::IOLoop->server(
-    address     => 'localhost',
+    address     => '127.0.0.1',
     tls         => 1,
     tls_options => {SSL_alpn_protocols => ['foo', 'bar', 'baz']},
     sub {

t/mojo/user_agent_tls.t

@@ -21,7 +21,7 @@ get '/' => {text => 'works!'};
 subtest 'Web server with valid certificates' => sub {
   my $daemon = Mojo::Server::Daemon->new(app => app, ioloop => Mojo::IOLoop->singleton, silent => 1);
   my $listen
-    = 'https://localhost'
+    = 'https://127.0.0.1'
     . '?cert=t/mojo/certs/server.crt'
     . '&key=t/mojo/certs/server.key'
     . '&ca=t/mojo/certs/ca.crt&verify=0x03';
@@ -76,7 +76,7 @@ subtest 'Web server with valid certificates' => sub {
 subtest 'Web server with valid certificates and no verification' => sub {
   my $daemon = Mojo::Server::Daemon->new(app => app, ioloop => Mojo::IOLoop->singleton, silent => 1);
   my $listen
-    = 'https://localhost'
+    = 'https://127.0.0.1'
     . '?cert=t/mojo/certs/server.crt'
     . '&key=t/mojo/certs/server.key'
     . '&ca=t/mojo/certs/ca.crt'
@@ -100,7 +100,7 @@ subtest 'Web server with valid certificates and no verification' => sub {
 
 subtest 'Client side TLS options' => sub {
   my $daemon = Mojo::Server::Daemon->new(app => app, ioloop => Mojo::IOLoop->singleton, silent => 1);
-  my $listen = 'https://localhost/?version=TLSv1_1';
+  my $listen = 'https://127.0.0.1/?version=TLSv1_1';
   my $port   = $daemon->listen([$listen])->start->ports->[0];
 
   subtest '(Not) setting verification mode' => sub {

t/mojo/websocket_proxy_tls.t

@@ -47,7 +47,7 @@ websocket '/test' => sub {
 # Web server with valid certificates
 my $daemon = Mojo::Server::Daemon->new(app => app, silent => 1);
 my $listen
-  = 'https://localhost' . '?cert=t/mojo/certs/server.crt' . '&key=t/mojo/certs/server.key' . '&ca=t/mojo/certs/ca.crt';
+  = 'https://127.0.0.1' . '?cert=t/mojo/certs/server.crt' . '&key=t/mojo/certs/server.key' . '&ca=t/mojo/certs/ca.crt';
 my $port = $daemon->listen([$listen])->start->ports->[0];
 
 # Connect proxy server for testing