Test and fix very small --chunk-time. Report immediately when a slave is stopped. Add short form -q for --quiet. Report very slow checksums once for each table. Use Cxn::name() instead of Cxn::dsn()->{n}; remove n from DSNParser; make cxn's name @@hostname by default, else stringified DSN parts.

This commit is contained in:
Daniel Nichter
2011-10-19 11:27:19 -06:00
parent 005436716f
commit c4db7c0633
14 changed files with 275 additions and 64 deletions

View File

@@ -97,6 +97,12 @@ ok(
"New Cxn, dbh not connected yet"
);
is(
$cxn->name(),
'h=127.1,P=12345',
'name() uses DSN if not connected'
);
$cxn->connect();
ok(
$cxn->dbh()->ping(),
@@ -193,11 +199,17 @@ is_deeply(
S => undef,
D => undef,
t => undef,
n => 'h=127.1,P=12345',
},
"cxn->dsn()"
);
my ($hostname) = $master_dbh->selectrow_array('select @@hostname');
is(
$cxn->name(),
$hostname,
'name() uses @@hostname'
);
exit;
# ############################################################################
# Default cxn, should be equivalent to 'h=localhost'.
# ############################################################################
@@ -214,7 +226,6 @@ is_deeply(
S => undef,
D => undef,
t => undef,
n => 'h=localhost',
},
"Defaults to h=localhost"
);
@@ -234,7 +245,6 @@ is_deeply(
S => undef,
D => undef,
t => undef,
n => 'h=localhost,P=12345',
},
"Default cxn inherits default connection options"
);