Skip to content

Commit

Permalink
Merge pull request #48 from raphink/dev/ssl_strict
Browse files Browse the repository at this point in the history
Add --(no-)?-ssl_strict option to bypass hostname verification
  • Loading branch information
James Casey committed Feb 24, 2015
2 parents 90c8aac + bbd25bd commit 0c35749
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
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
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
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
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
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
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
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 0c35749

Please sign in to comment.