Skip to content

Commit

Permalink
Add --(no-)?-ssl_strict option to bypass hostname verification
Browse files Browse the repository at this point in the history
  • Loading branch information
raphink committed Feb 23, 2015
1 parent 90c8aac commit bbd25bd
Show file tree
Hide file tree
Showing 7 changed files with 56 additions and 0 deletions.
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_aliveness
Original file line number Diff line number Diff line change
Expand Up @@ -67,6 +67,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -102,6 +107,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}
my $req = HTTP::Request->new(GET => $url);
$req->authorization_basic($p->opts->username, $p->opts->password);
my $res = $ua->request($req);
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_connections
Original file line number Diff line number Diff line change
Expand Up @@ -72,6 +72,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -125,6 +130,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}

my $url = sprintf("http%s://%s:%d/api/connections", ($p->opts->ssl ? "s" : ""), $hostname, $port);
my ($retcode, $result) = request($url);
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_objects
Original file line number Diff line number Diff line change
Expand Up @@ -50,6 +50,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -82,6 +87,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}

my @calls = ("vhost", "exchange", "binding", "queue", "channel");
for my $call (@calls) {
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_overview
Original file line number Diff line number Diff line change
Expand Up @@ -67,6 +67,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -118,6 +123,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}

my $url = sprintf("http%s://%s:%d/api/overview", ($p->opts->ssl ? "s" : ""), $hostname, $port);
my ($retcode, $result) = request($url);
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_partition
Original file line number Diff line number Diff line change
Expand Up @@ -65,6 +65,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -113,6 +118,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}

my $req = HTTP::Request->new(GET => $url);
$req->authorization_basic($p->opts->username, $p->opts->password);
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_queue
Original file line number Diff line number Diff line change
Expand Up @@ -77,6 +77,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -132,6 +137,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}

my $url = sprintf("http%s://%s:%d/api/queues/%s/%s", ($p->opts->ssl ? "s" : ""), $hostname, $port, $vhost, $queue);
my ($retcode, $result) = request($url);
Expand Down
8 changes: 8 additions & 0 deletions scripts/check_rabbitmq_server
Original file line number Diff line number Diff line change
Expand Up @@ -85,6 +85,11 @@ $p->add_arg(spec => 'ssl|ssl!',
default => 0
);

$p->add_arg(spec => 'ssl_strict|ssl_strict!',
help => "Verify SSL certificate (default: true)",
default => 1
);

$p->add_arg(spec => 'proxy|proxy!',
help => "Use environment proxy (default: true)",
default => 1
Expand Down Expand Up @@ -140,6 +145,9 @@ elsif($p->opts->proxy == 1 )
}
$ua->agent($PROGNAME.' ');
$ua->timeout($p->opts->timeout);
if ($p->opts->ssl) {
$ua->ssl_opts(verify_hostname => $p->opts->ssl_strict);
}
my $req = HTTP::Request->new(GET => $url);
$req->authorization_basic($p->opts->username, $p->opts->password);
my $res = $ua->request($req);
Expand Down

0 comments on commit bbd25bd

Please sign in to comment.