function createMainFile()
{
global $gbl, $sgbl, $login, $ghtml;
list($base, $end) = reversedns::getBaseEnd($this->main->nname, $this->main->__var_rdnsrange);
$string = null;
$transferstring = null;
if ($this->main->__var_transferip) {
$transferstring = "allow-transfer { {$this->main->__var_transferip}; };";
}
foreach ($this->main->__var_reverse_list as $k => $v) {
if ($k === $base) {
continue;
}
$string .= "zone \"{$k}.in-addr.arpa\" {type master; file \"{$sgbl->__path_named_path}/{$k}.in-addr.arpa\"; {$transferstring}};\n\n";
}
$string .= "zone \"{$base}.in-addr.arpa\" {type master; file \"{$sgbl->__path_named_path}/{$base}.in-addr.arpa\"; {$transferstring}};\n\n";
lfile_put_contents("__path_named_chroot/etc/lxreverse.conf", $string);
}
static function createListAlist($parent, $class)
{
return reversedns::createListAlist($parent, $class);
}
function createMainFile()
{
global $gbl, $sgbl, $login, $ghtml;
list($base, $end) = reversedns::getBaseEnd($this->main->nname, $this->main->__var_rdnsrange);
$string = null;
if (reversedns::isIPV6($this->main->nname)) {
$isIPV6 = true;
} else {
$isIPV6 = false;
}
$transferstring = null;
if ($this->main->__var_transferip) {
$transferstring = "allow-transfer { {$this->main->__var_transferip}; };";
}
foreach ($this->main->__var_reverse_list as $revBase_ => $addr) {
$revBase = strtoupper($revBase_);
if ($revBase === strtoupper($base)) {
continue;
}
if (reversedns::isIPV6($addr[0]['nname'])) {
$string .= "zone \"" . reversedns::createDottedIPV6($revBase) . "ip6.arpa\" {type master; file \"{$sgbl->__path_named_path}/" . reversedns::createDottedIPV6($revBase) . "ip6.arpa\"; {$transferstring}};\n\n";
} else {
$string .= "zone \"{$revBase}.in-addr.arpa\" {type master; file \"{$sgbl->__path_named_path}/{$revBase}.in-addr.arpa\"; {$transferstring}};\n\n";
}
}
if ($isIPV6 === true) {
$string .= "zone \"" . $base . "ip6.arpa\" {type master; file \"{$sgbl->__path_named_path}/" . $base . "ip6.arpa\"; {$transferstring}};\n\n";
} else {
$string .= "zone \"{$base}.in-addr.arpa\" {type master; file \"{$sgbl->__path_named_path}/{$base}.in-addr.arpa\"; {$transferstring}};\n\n";
}
lfile_put_contents("__path_named_chroot/etc/lxreverse.conf", $string);
}
