Better detect transfer failures, make default transfer IPs box bigger

This commit is contained in:
Jamie Cameron
2011-04-27 17:17:25 -07:00
parent 79894dd2f5
commit 641bf8b280
2 changed files with 3 additions and 3 deletions

View File

@@ -511,7 +511,7 @@ if ($v) {
return &ui_table_row($_[0],
&ui_radio("$_[1]_def", $v ? 0 : 1, [ [ 1, $text{'default'} ],
[ 0, $text{'listed'} ] ])."<br>".
&ui_textarea($_[1], join("\n", @av), 3, 15));
&ui_textarea($_[1], join("\n", @av), 3, 50));
}
# save_addr_match(name, &parent, indent)
@@ -3294,7 +3294,7 @@ foreach my $ip (@$masters) {
else {
my $out = &backquote_logged("$dig IN AXFR ".quotemeta($dom).
" \@".quotemeta($ip)." 2>&1");
if ($?) {
if ($? || $out =~ /Transfer\s+failed/) {
$rv{$ip} = $out;
}
elsif (!$out) {

View File

@@ -42,7 +42,7 @@ print "<p>\n";
# Show records
if (-r $temp) {
@recs = &read_zone_file($temp, $zone->{'name'}.".");
@recs = &read_zone_file($temp, $zone->{'name'}.".", undef, undef, 0, 1);
print &text('xfer_count', scalar(@recs)),"<p>\n";
}
&unlink_file($temp);