michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-09-14 09:30:39 +01:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity

Allow a zone or zone name object to be used for checking

Browse Source
This commit is contained in:
Jamie Cameron
2008-08-11 05:15:30 +00:00
parent 4ce5fdcebd
commit bd6d8d9048
1 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
bind8/bind8-lib.pl
View File

@@ -2399,14 +2399,26 @@ sub supports_check_zone
return $config{'checkzone'} && &has_command($config{'checkzone'});
}
# check_zone_records(&zone-name)
# check_zone_records(&zone-name|&zone)
# Returns a list of errors from checking some zone file, if any
sub check_zone_records
{
local ($zone) = @_;
local ($zonename, $zonefile);
if ($zone->{'values'}) {
# Zone object
$zonename = $zone->{'values'}->[0];
local $f = &find("file", $zone->{'members'});
$zonefile = $f->{'values'}->[0];
}
else {
# Zone name object
$zonename = $zone->{'name'};
$zonefile = $zone->{'file'};
}
local $out = &backquote_command(
$config{'checkzone'}." ".quotemeta($zone->{'name'})." ".
quotemeta(&make_chroot($zone->{'file'}))." 2>&1 </dev/null");
$config{'checkzone'}." ".quotemeta($zonename)." ".
quotemeta(&make_chroot($zonefile))." 2>&1 </dev/null");
return $? ? split(/\r?\n/, $out) : ( );
}