From 33b4189234464617ffa2d751a4d97743c906fbfd Mon Sep 17 00:00:00 2001 From: Colin Gagnaire Date: Thu, 19 Sep 2019 09:49:55 +0200 Subject: [PATCH] remove default hostname and port for mongodb --- database/mongodb/custom/driver.pm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/database/mongodb/custom/driver.pm b/database/mongodb/custom/driver.pm index 866b6c7e9..40c3f304e 100644 --- a/database/mongodb/custom/driver.pm +++ b/database/mongodb/custom/driver.pm @@ -85,13 +85,18 @@ sub set_defaults { sub check_options { my ($self, %options) = @_; - $self->{hostname} = (defined($self->{option_results}->{hostname})) ? $self->{option_results}->{hostname} : 'localhost'; - $self->{port} = (defined($self->{option_results}->{port})) ? $self->{option_results}->{port} : 27017; + $self->{hostname} = (defined($self->{option_results}->{hostname})) ? $self->{option_results}->{hostname} : ''; + $self->{port} = (defined($self->{option_results}->{port})) ? $self->{option_results}->{port} : ''; $self->{protocol} = (defined($self->{option_results}->{protocol})) ? $self->{option_results}->{protocol} : 'mongodb'; $self->{timeout} = (defined($self->{option_results}->{timeout})) ? $self->{option_results}->{timeout} : 10; $self->{username} = (defined($self->{option_results}->{username})) ? $self->{option_results}->{username} : ''; $self->{password} = (defined($self->{option_results}->{password})) ? $self->{option_results}->{password} : ''; + if (!defined($self->{hostname}) || $self->{hostname} eq '') { + $self->{output}->add_option_msg(short_msg => "Need to specify --hostname option."); + $self->{output}->option_exit(); + } + foreach (@{$self->{option_results}->{ssl_opt}}) { $_ =~ /(\w+)\s*=>\s*(\w+)/; $self->{ssl_opts}->{$1} = $2; @@ -208,7 +213,7 @@ MongoDB server hostname. =item B<--port> -Port used (Default: 27017) +Port used by MongoDB. =item B<--protocol>