use strict;
use warnings;
use Test::More;

BEGIN {
    plan skip_all => 'skip shutdown server test,$ENV{MONGOX_TEST_SHUTDOWN} not exits' unless exists $ENV{MONGOX_TEST_SHUTDOWN};
}

my $host = 'localhost';
# check test
if (exists $ENV{MONGOD}) {
    $host = $ENV{MONGOD};
}

plan tests => 1;
use MongoX;
use MongoX::Helper qw(admin_shutdown_server);

SKIP: {
    eval {
        boot host => $host,db => 'test';
    };
    skip $@,1 if $@;
    admin_shutdown_server;
    eval {
        add_connection host => $host, db => 'test2',id => 'check';
        use_connection 'check';
    };
    like($@, '/^couldn\'t connect to server/','admin_shutdown_server');
    diag('WARNING:MongoDB has been shutdown,you must restart it now.');
};