| Current File : //root/panel/modules/dns_admin/code/controller.ext.php |
<?php
/**
* @copyright 2014-2015 Sentora Project (http://www.sentora.org/)
* Sentora is a GPL fork of the ZPanel Project whose original header follows:
*
* ZPanel - A Cross-Platform Open-Source Web Hosting Control panel.
*
* @package ZPanel
* @version $Id$
* @author Bobby Allen - ballen@bobbyallen.me
* @copyright (c) 2008-2014 ZPanel Group - http://www.zpanelcp.com/
* @license http://opensource.org/licenses/gpl-3.0.html GNU Public License v3
*
* This program (ZPanel) is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
*/
class module_controller extends ctrl_module
{
static $ok;
static $service;
static $purged;
static $deleted;
static $deletedtype;
static $type;
static $reset;
static $addmissing;
static $logerror;
static $logwarning;
static $getlog;
static $showlog;
static $notwritable;
static $forceupdate;
static $tryagain;
static $bindstart;
static $bindstop;
static $bindreload;
static function getDNSConfig()
{
$display = self::DisplayDNSConfig();
return $display;
}
static function DisplayDNSConfig()
{
global $zdbh;
global $controller;
$line = "<style>.active {color: #333;}</style>";
$line .= "<h2>" . ui_language::translate("Configure your DNS Settings") . "</h2>";
$line .= "<div style=\"display: block; margin-right:20px;\">";
$line .= "<div class=\"ui-tabs ui-widget ui-widget-content ui-corner-all\" id=\"dnsTabs\">";
$line .= "<ul class=\"domains nav nav-tabs\">";
$line .= "<li class=\"active\"><a href=\"#general\" data-toggle=\"tab\">" . ui_language::translate("General") . "</a></li>";
$line .= "<li><a href=\"#tools\" data-toggle=\"tab\">" . ui_language::translate("Tools") . "</a></li>";
$line .= "<li><a href=\"#services\" data-toggle=\"tab\">" . ui_language::translate("Services") . "</a></li>";
$line .= "<li><a href=\"#logs\" data-toggle=\"tab\">" . ui_language::translate("Logs") . "</a></li>";
$line .= "</ul>";
//Tabs Panel Wrap
$line .= '<div class="tab-content">';
//general
$line .= "<div class=\"tab-pane active\" id=\"general\">";
$line .= "<form action=\"./?module=dns_admin&action=UpdateDNSConfig\" method=\"post\">";
$line .= "<table class=\"table table-striped\">";
$count = 0;
$sql = "SELECT COUNT(*) FROM x_settings WHERE so_module_vc=:moduleName AND so_usereditable_en = 'true'";
$numrows = $zdbh->prepare($sql);
$GetModuleName = ui_module::GetModuleName();
$numrows->bindParam(':moduleName', $GetModuleName);
if ($numrows->execute()) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_settings WHERE so_module_vc=:moduleName AND so_usereditable_en = 'true' ORDER BY so_cleanname_vc");
$GetModuleName = ui_module::GetModuleName();
$sql->bindParam(':moduleName', $GetModuleName);
$sql->execute();
while ($row = $sql->fetch()) {
$count++;
if (ctrl_options::CheckForPredefinedOptions($row['so_defvalues_tx'])) {
$fieldhtml = ctrl_options::OuputSettingMenuField($row['so_name_vc'], $row['so_defvalues_tx'], $row['so_value_tx']);
} else {
$fieldhtml = ctrl_options::OutputSettingTextArea($row['so_name_vc'], $row['so_value_tx']);
}
$line .= "<tr valign=\"top\"><th nowrap=\"nowrap\">" . ui_language::translate($row['so_cleanname_vc']) . "</th><td>" . $fieldhtml . "</td><td>" . ui_language::translate($row['so_desc_tx']) . "</td></tr>";
}
$line .= "<tr><th colspan=\"3\"><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inSaveSystem\">" . ui_language::translate("Save Changes") . "</button> <button class=\"button-loader btn btn-default\" type=\"button\" onclick=\"window.location.href='./?module=dns_admin';return false;\">" . ui_language::translate("Cancel") . "</button></tr>";
}
}
$line .= "</table>";
$line .= "</form>";
$line .= "</div>";
//tools
$line .= "<div class=\"tab-pane\" id=\"tools\">";
$line .= "<form action=\"./?module=dns_admin&action=UpdateTools\" method=\"post\">";
$line .= "<table class=\"table table-striped\">";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Reset all Records to Default") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inResetAll\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Reset Records to Default on Single Domain") . " ";
$line .= "<select name=\"inResetDomainID\">";
$line .= "<option value=\"\">--- " . ui_language::translate("Select Domain") . " ---</option>";
$sql = "SELECT COUNT(*) FROM x_vhosts WHERE vh_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_vhosts WHERE vh_deleted_ts IS NULL");
$sql->execute();
while ($row = $sql->fetch()) {
$line .= " <option value=\"" . $row['vh_id_pk'] . "\">" . $row['vh_name_vc'] . "</option>";
}
}
}
$line .= "</select>";
$line .= "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inResetDomain\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<th>" . ui_language::translate("Add Default Records to Missing Domains") . "";
$line .= "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inAddMissing\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Delete Record Type from ALL Records") . " ";
$line .= "<select name=\"inType\" id=\"inType\">";
$line .= "<option value=\"A\">A</option>";
$line .= "<option value=\"AAAA\">AAAA</option>";
$line .= "<option value=\"CNAME\">CNAME</option>";
$line .= "<option value=\"MX\">MX</option>";
$line .= "<option value=\"TXT\">TXT</option>";
$line .= "<option value=\"SRV\">SRV</option>";
$line .= "<option value=\"SPF\">SPF</option>";
$line .= "<option value=\"NS\">NS</option>";
$line .= "</select>";
$line .= "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inDeleteType\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Purge Deleted Zone Records From Database") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inPurge\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Delete ALL Zone Records") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inDeleteAll\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<th>" . ui_language::translate("Force Records Update on Next Daemon Run") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inForceUpdate\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "</table>";
$line .= "</form>";
$line .= "</div>";
//Services
$line .= "<div class=\"tab-pane\" id=\"services\">";
$line .= "<form action=\"./?module=dns_admin&action=UpdateService\" method=\"post\">";
$line .= "<table class=\"none\" border=\"0\" cellpading=\"0\" cellspacing=\"0\" width=\"85%\"><tr valign=\"top\"><td width=\"100%\">";
$line .= "<table class=\"table table-striped\">";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Start Service") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inStartService\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Stop Service") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inStopService\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Reload BIND") . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inReloadService\" value=\"1\">" . ui_language::translate("GO") . "</button></td>";
$line .= "</tr>";
$line .= "<th>" . ui_language::translate("Service Port Status") . "</th>";
if (fs_director::CheckForEmptyValue(sys_monitoring::PortStatus(53))) {
$line .= "<td><font color=\"red\">" . ui_language::translate("STOPPED") . "</font></td>";
} else {
$line .= "<td><font color=\"green\">" . ui_language::translate("RUNNING") . "</font></td>";
}
$line .= "</tr>";
$line .= "</table>";
$line .= "</td><td>";
if (fs_director::CheckForEmptyValue(sys_monitoring::PortStatus(53))) {
$line .= "<img src=\"/modules/" . $controller->GetControllerRequest('URL', 'module') . "/assets/down.png\" border=\"0\"/>";
} else {
$line .= "<img src=\"/modules/" . $controller->GetControllerRequest('URL', 'module') . "/assets/up.png\" border=\"0\"/>";
}
$line .="</td></tr></table>";
$line .= "</form>";
$line .= "</div>";
//logs
self::ViewErrors();
$line .= "<div class=\"tab-pane\" id=\"logs\">";
$line .= "<form action=\"./?module=dns_admin&action=Updatelogs\" method=\"post\">";
$line .= "<table class=\"table table-striped\">";
$line .= "<tr>";
$line .= "<th style=\"width:350px;\">" . self::CheckLogReadable(ctrl_options::GetSystemOption('bind_log')) . " " . self::CheckLogWritable(ctrl_options::GetSystemOption('bind_log')) . "</th>";
$line .= "<td><button class=\"button-loader btn btn-primary\" type=\"submit\" id=\"button\" name=\"inSetPerms\" value=\"1\">" . ui_language::translate("Set Permissions") . "</button></td>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Clear errors") . "</th>";
$line .= "<td><button class=\"delete btn btn-danger\" type=\"submit\" id=\"button\" name=\"inClearErrors\" value=\"1\">" . ui_language::translate("Clear") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Clear warnings") . "";
$line .= "</th>";
$line .= "<td><button class=\"delete btn btn-danger\" type=\"submit\" id=\"button\" name=\"inClearWarnings\" value=\"1\">" . ui_language::translate("Clear") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("Clear logs") . "";
$line .= "</th>";
$line .= "<td><button class=\"delete btn btn-danger\" type=\"submit\" id=\"button\" name=\"inClearLogs\" value=\"1\">" . ui_language::translate("Clear") . "</button></td>";
$line .= "</tr>";
$line .= "</table>";
$line .= "</form>";
$line .= "<form name=\"launchbindlog\" action=\"modules/dns_admin/code/getbindlog.php\" target=\"bindlogwindow\" method=\"post\" onsubmit=\"window.open('', 'bindlogwindow', 'scrollbars=yes,menubar=no,height=525,width=825,resizable=no,toolbar=no,location=no,status=no')\">";
$line .= "<table class=\"table table-striped\">";
$line .= "<tr>";
if (count(self::$logerror) > 0) {
$logerrorcolor = "red";
} else {
$logerrorcolor = NULL;
}
$line .= "<th style=\"width:350px;\">" . ui_language::translate("View Errors") . " (<font color=\"" . $logerrorcolor . "\">" . count(self::$logerror) . "</font>)</th>";
$line .= "<td><button class=\"btn btn-primary\" type=\"submit\" id=\"logerror_a\" name=\"inViewErrors\" value=\"1\">" . ui_language::translate("View") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
if (count(self::$logwarning) > 0) {
$logwarningcolor = "red";
} else {
$logwarningcolor = NULL;
}
$line .= "<th>" . ui_language::translate("View warnings") . " (<font color=\"" . $logwarningcolor . "\">" . count(self::$logwarning) . "</font>)</th>";
$line .= "<td><button class=\"btn btn-primary\" type=\"submit\" id=\"logwarning_a\" name=\"inViewWarnings\" value=\"1\">" . ui_language::translate("View") . "</button></td>";
$line .= "</tr>";
$line .= "<tr>";
$line .= "<th>" . ui_language::translate("View logs") . " (" . count(self::$getlog) . ")</th>";
$line .= "<td><input type=\"hidden\" name=\"inBindLog\" value=\"" . ctrl_options::GetSystemOption('bind_log') . "\" /><button class=\"btn btn-primary\" type=\"submit\" id=\"button\" name=\"inViewLogs\" value=\"1\">" . ui_language::translate("View") . "</button></td>";
$line .= "</tr>";
$line .= "</table>";
$line .= "</form>";
$line .= "</div>";
$line .= "</div>";
$line .= "</div>";
$line .= "</div>";
//CHARTS
$line .= "<table class=\"none\" cellpadding=\"0\" cellspacing=\"0\" border=\"0\"><tr><td>";
$line .= self::DisplayDNSUsagepChart();
$line .= "</td><td>";
$line .= self::DisplayRecordsUsagepChart();
$line .= "</td></tr></table>";
return $line;
}
static function gethelpicon()
{
global $zdbh;
global $controller;
$temp=$controller->GetControllerRequest('URL','module') ;
$val = '/assets/one.txt';
$val1 = '/modules/';
$name=file_get_contents("modules/$temp/assets/helpicon.txt");
return $name;
}
static function doUpdateDNSConfig()
{
global $zdbh;
global $controller;
$sql = "SELECT COUNT(*) FROM x_settings WHERE so_module_vc=:moduleName AND so_usereditable_en = 'true'";
$numrows = $zdbh->prepare($sql);
$GetModuleName = ui_module::GetModuleName();
$numrows->bindParam(':moduleName', $GetModuleName);
if ($numrows->execute()) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_settings WHERE so_module_vc=:moduleName AND so_usereditable_en = 'true'");
$GetModuleName = ui_module::GetModuleName();
$sql->bindParam(':moduleName', $GetModuleName);
$sql->execute();
while ($row = $sql->fetch()) {
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', $row['so_name_vc']))) {
$name = $controller->GetControllerRequest('FORM', $row['so_name_vc']);
$name2 = $row['so_name_vc'];
$updatesql = $zdbh->prepare("UPDATE x_settings SET so_value_tx = :name WHERE so_name_vc = :name2");
$updatesql->bindParam(':name', $name);
$updatesql->bindParam(':name2', $name2);
$updatesql->execute();
self::TriggerDNSUpdate("0");
}
}
}
}
}
static function doUpdateService()
{
global $zdbh;
global $controller;
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inStartService'))) {
self::StartBind();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inStopService'))) {
self::StopBind();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inReloadService'))) {
self::ReloadBind();
}
}
static function doUpdateTools()
{
global $zdbh;
global $controller;
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inResetAll'))) {
self::ResetAll();
self::TriggerDNSUpdate("0");
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inResetDomain')) && !fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inResetDomainID'))) {
self::ResetDomain($controller->GetControllerRequest('FORM', 'inResetDomainID'));
self::TriggerDNSUpdate("0");
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inAddMissing'))) {
self::AddMissing();
self::TriggerDNSUpdate("0");
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inDeleteType'))) {
self::DeleteType();
self::TriggerDNSUpdate("0");
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inPurge'))) {
self::Purge();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inDeleteAll'))) {
self::DeleteAll();
self::TriggerDNSUpdate("0");
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inForceUpdate'))) {
self::$forceupdate = true;
self::TriggerDNSUpdate("0");
}
}
static function doUpdateLogs()
{
global $zdbh;
global $controller;
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inSetPerms'))) {
self::SetPerms();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inClearErrors'))) {
self::ClearErrors();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inClearWarnings'))) {
self::ClearWarnings();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inClearLogs'))) {
self::ClearLog();
}
if (!fs_director::CheckForEmptyValue($controller->GetControllerRequest('FORM', 'inViewLogs'))) {
//self::ViewLogs();
self::$showlog = TRUE;
}
}
static function StartBind()
{
if (sys_versions::ShowOSPlatformVersion() == "Windows") {
/** @todo this needs changing to use the system command */
exec('net start ' . ctrl_options::GetSystemOption('bind_service') . '', $out);
} else {
//$out = ctrl_system::systemCommand(ctrl_options::GetSystemOption('zsudo'), array('service', ctrl_options::GetSystemOption('bind_service'), 'start'));
self::SocketBind("start");
sleep(2);
self::$bindstart = true;
}
}
static function StopBind()
{
if (sys_versions::ShowOSPlatformVersion() == "Windows") {
/** @todo this needs changing to use the system command */
exec('net stop ' . ctrl_options::GetSystemOption('bind_service') . '', $out);
}
else
{
//$out = ctrl_system::systemCommand(ctrl_options::GetSystemOption('zsudo'), array('service', ctrl_options::GetSystemOption('bind_service'), 'stop'));
self::SocketBind("stop");
sleep(2);
self::$bindstop = true;
}
}
static function ReloadBind()
{
if (sys_versions::ShowOSPlatformVersion() == "Windows") {
/** @todo this needs changing to use the system command */
$reload_bind = ctrl_options::GetSystemOption('bind_dir') . 'rndc.exe reload';
pclose(popen($reload_bind, 'r'));
} else {
//$out = ctrl_system::systemCommand(ctrl_options::GetSystemOption('zsudo'), array('service', ctrl_options::GetSystemOption('bind_service'), 'reload'));
self::SocketBind("reload");
sleep(2);
self::$bindreload = true;
}
}
static function SocketBind($cmd)
{
try
{
$service_port = 4444;
$address = gethostbyname('localhost');
$socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
if ($socket === false)
{
//echo "socket_create() failed: reason: " . socket_strerror(socket_last_error()) . "\n";
self::$tryagain=true;
return false;
}
//echo "Attempting to connect to '$address' on port '$service_port'...";
$result = socket_connect($socket, $address, $service_port);
if ($result === false)
{
//echo "socket_connect() failed.\nReason: ($result) " . socket_strerror(socket_last_error($socket)) . "\n";
self::$tryagain=true;
return false;
}
socket_set_option($socket, SOL_SOCKET, SO_RCVTIMEO, array("sec" => 5, "usec" =>0));
$in = "command BindService $cmd";
$out = '';
socket_write($socket, $in, strlen($in));
$output = "" ;
$out = socket_read($socket, 2048);
$output .= $out ;
if ($out == "file_not_exists")
{
socket_close($socket);
self::$dirnotexists = TRUE;
return FALSE;
}
}
catch(Exception $e)
{
self::$tryagain=true;
return false;
}
}
static function ResetAll()
{
global $zdbh;
global $controller;
$vhosts = array();
$numrecords = 0;
//Get a list of current domains with records
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_deleted_ts IS NULL GROUP BY dn_vhost_fk");
$sql->execute();
while ($row = $sql->fetch()) {
$vhosts[] = $row['dn_vhost_fk'];
$numrecords++;
}
}
}
self::$reset = $numrecords;
//Delete current records
self::DeleteAll();
//Create Default Records
foreach ($vhosts as $vhost) {
self::CreateDefaultRecords($vhost);
}
}
static function ResetDomain($dn_vhost_fk)
{
global $zdbh;
//Delete current records
self::DeleteDomainRecords($dn_vhost_fk);
//Create Default Records
self::CreateDefaultRecords($dn_vhost_fk);
self::$ok = true;
}
static function AddMissing()
{
global $zdbh;
global $controller;
$vhosts = array();
$numrecords = 0;
$sql = "SELECT COUNT(*) FROM x_vhosts WHERE vh_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_vhosts WHERE vh_deleted_ts IS NULL");
$sql->execute();
while ($row = $sql->fetch()) {
$vhosts[] = $row['vh_id_pk'];
}
}
}
if (!fs_director::CheckForEmptyValue($vhosts)) {
foreach ($vhosts as $vhost) {
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_vhost_fk = :vhost AND dn_deleted_ts IS NULL";
$numrows = $zdbh->prepare($sql);
$numrows->bindParam(':vhost', $vhost);
if ($numrows->execute()) {
if ($numrows->fetchColumn() == 0) {
self::CreateDefaultRecords($vhost);
$numrecords++;
}
}
}
self::$addmissing = $numrecords;
}
}
static function DeleteType()
{
global $zdbh;
global $controller;
$numrecords = 0;
$type = $controller->GetControllerRequest('FORM', 'inType');
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_type_vc = :type AND dn_deleted_ts IS NULL";
$numrows = $zdbh->prepare($sql);
$numrows->bindParam(':type', $type);
if ($numrows->execute()) {
if ($numrows->fetchColumn() <> 0) {
$type = $controller->GetControllerRequest('FORM', 'inType');
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_type_vc = :type AND dn_deleted_ts IS NULL");
$sql->bindParam(':type', $type);
$sql->execute();
while ($row = $sql->fetch()) {
$time = time();
$type = $controller->GetControllerRequest('FORM', 'inType');
$delete_record = $zdbh->prepare("UPDATE x_dns SET dn_deleted_ts=:time WHERE dn_id_pk = :dn_id_pk AND dn_type_vc = :type");
$delete_record->bindParam(':time', $time);
$delete_record->bindParam(':dn_id_pk', $row['dn_id_pk']);
$delete_record->bindParam(':type', $type);
$delete_record->execute();
$numrecords++;
}
self::$deletedtype = $numrecords;
self::$type = $controller->GetControllerRequest('FORM', 'inType');
}
}
}
static function Purge()
{
global $zdbh;
global $controller;
$numrecords = 0;
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_deleted_ts IS NOT NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_deleted_ts IS NOT NULL");
$sql->execute();
while ($row = $sql->fetch()) {
$delete_record = $zdbh->prepare("DELETE FROM x_dns WHERE dn_id_pk = :dn_id_pk");
$delete_record->bindParam(':dn_id_pk', $row['dn_id_pk']);
$delete_record->execute();
$numrecords++;
}
self::$purged = $numrecords;
}
}
}
static function DeleteAll()
{
global $zdbh;
global $controller;
$numrecords = 0;
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_deleted_ts IS NULL");
$sql->execute();
while ($row = $sql->fetch()) {
$time = time();
$delete_record = $zdbh->prepare("UPDATE x_dns SET dn_deleted_ts=:time WHERE dn_id_pk = :dn_id_pk");
$delete_record->bindParam(':time', $time);
$delete_record->bindParam(':dn_id_pk', $row['dn_id_pk']);
$delete_record->execute();
$numrecords++;
}
self::$deleted = $numrecords;
}
}
}
static function DeleteDomainRecords($domainid)
{
global $zdbh;
global $controller;
$numrecords = 0;
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_vhost_fk=:domainid AND dn_deleted_ts IS NULL";
$numrows = $zdbh->prepare($sql);
$numrows->bindParam(':domainid', $domainid);
if ($numrows->execute()) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_vhost_fk=:domainid AND dn_deleted_ts IS NULL");
$sql->bindParam(':domainid', $domainid);
$sql->execute();
while ($row = $sql->fetch()) {
$time = time();
$delete_record = $zdbh->prepare("UPDATE x_dns SET dn_deleted_ts=:time WHERE dn_id_pk = :dn_id_pk");
$delete_record->bindParam(':time', $time);
$delete_record->bindParam(':dn_id_pk', $row['dn_id_pk']);
$delete_record->execute();
$numrecords++;
}
self::$deleted = $numrecords;
}
}
}
static function SetPerms()
{
$bindlog = ctrl_options::GetSystemOption('bind_log');
if (sys_versions::ShowOSPlatformVersion() <> "Windows") {
//exec(ctrl_options::GetOption('zsudo') . " chgrp " . ctrl_options::GetOption('zsudo') . " " . $bindlog);
exec(ctrl_options::GetSystemOption('zsudo') . " chmod 0777 " . $bindlog);
}
}
static function ClearErrors()
{
$bindlog = ctrl_options::GetSystemOption('bind_log');
if (is_writable($bindlog)) {
$log = $bindlog;
if (file_exists($bindlog)) {
$handle = @fopen($log, "r");
$getlog = array();
if ($handle) {
while (!feof($handle)) {
$buffer = fgets($handle, 4096);
if (strstr($buffer, 'error:') || strstr($buffer, 'error ')) {
$line = "";
} else {
$line = $buffer;
}
$getlog[] = $line;
}fclose($handle);
}
$fp = fopen($log, 'w');
foreach ($getlog as $key => $value) {
fwrite($fp, $value);
}
fclose($fp);
}
} else {
self::$notwritable = true;
}
}
static function ClearWarnings()
{
$bindlog = ctrl_options::GetSystemOption('bind_log');
if (is_writable($bindlog)) {
$log = $bindlog;
if (file_exists($bindlog)) {
$handle = @fopen($log, "r");
$getlog = array();
if ($handle) {
while (!feof($handle)) {
$buffer = fgets($handle, 4096);
if (strstr($buffer, 'warning:') || strstr($buffer, 'warning ')) {
$line = "";
} else {
$line = $buffer;
}
$getlog[] = $line;
}fclose($handle);
}
$fp = fopen($log, 'w');
foreach ($getlog as $key => $value) {
fwrite($fp, $value);
}
fclose($fp);
}
} else {
self::$notwritable = true;
}
}
static function ClearLog()
{
$bindlog = ctrl_options::GetSystemOption('bind_log');
if (is_writable($bindlog)) {
$log = $bindlog;
if (file_exists($bindlog)) {
$fp = fopen($log, 'w');
fwrite($fp, '');
fclose($fp);
}
} else {
self::$notwritable = true;
}
}
static function DisplayDNSUsagepChart()
{
global $zdbh;
global $controller;
$numtotalrecords = 0;
$numactiverecords = 0;
$sql = "SELECT COUNT(*) FROM x_dns";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns");
$sql->execute();
while ($row = $sql->fetch()) {
$numtotalrecords++;
}
}
}
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_deleted_ts IS NULL");
$sql->execute();
while ($row = $sql->fetch()) {
$numactiverecords++;
}
}
}
$total = $numtotalrecords;
$active = $numactiverecords;
$deleted = $total - $active;
$line = "<h2>DNS Database Usage</h2>";
$line .= "<img src=\"etc/lib/pChart2/sentora/z3DPie.php?score=" . $active . "::" . $deleted . "&labels=Active Domain Records: " . $active . "::Deleted Domain Records: " . $deleted . "&legendfont=verdana&legendfontsize=8&imagesize=240::190&chartsize=120::90&radius=100&legendsize=10::160\"/>";
return $line;
}
static function DisplayRecordsUsagepChart()
{
global $zdbh;
global $controller;
$numtotalrecords = 0;
$numArecords = 0;
$numAAAArecords = 0;
$numMXrecords = 0;
$numCNAMErecords = 0;
$numTXTrecords = 0;
$numSRVrecords = 0;
$numSPFrecords = 0;
$numNSrecords = 0;
$sql = "SELECT COUNT(*) FROM x_dns";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns");
$sql->execute();
while ($row = $sql->fetch()) {
$numtotalrecords++;
}
}
}
$sql = "SELECT COUNT(*) FROM x_dns WHERE dn_deleted_ts IS NULL";
if ($numrows = $zdbh->query($sql)) {
if ($numrows->fetchColumn() <> 0) {
$sql = $zdbh->prepare("SELECT * FROM x_dns WHERE dn_deleted_ts IS NULL");
$sql->execute();
while ($row = $sql->fetch()) {
if ($row['dn_type_vc'] == "A") {
$numArecords++;
}
if ($row['dn_type_vc'] == "AAAA") {
$numAAAArecords++;
}
if ($row['dn_type_vc'] == "MX") {
$numMXrecords++;
}
if ($row['dn_type_vc'] == "CNAME") {
$numCNAMErecords++;
}
if ($row['dn_type_vc'] == "TXT") {
$numTXTrecords++;
}
if ($row['dn_type_vc'] == "SRV") {
$numSRVrecords++;
}
if ($row['dn_type_vc'] == "SPF") {
$numSPFrecords++;
}
if ($row['dn_type_vc'] == "NS") {
$numNSrecords++;
}
}
}
}
$total = $numtotalrecords;
$Arecords = $numArecords;
$AAAArecords = $numAAAArecords;
$MXrecords = $numMXrecords;
$CNAMErecords = $numCNAMErecords;
$TXTrecords = $numTXTrecords;
$SRVrecords = $numSRVrecords;
$SPFrecords = $numSPFrecords;
$NSrecords = $numNSrecords;
$line = "<h2>Record Types Usage</h2>";
$line .= "<img src=\"etc/lib/pChart2/sentora/z3DPie.php?score=" . $Arecords . "::" . $NSrecords . "::" . $MXrecords . "::" . $SPFrecords . "::" . $TXTrecords . "::" . $SRVrecords . "::" . $CNAMErecords . "::" . $AAAArecords . "&labels=A: " . $Arecords . "::NS: " . $NSrecords . "::MX: " . $MXrecords . "::SPF: " . $SPFrecords . "::TXT: " . $TXTrecords . "::SRV: " . $SRVrecords . "::CNAME: " . $CNAMErecords . "::AAAA: " . $AAAArecords . "&legendfont=verdana&legendfontsize=8&imagesize=340::190&chartsize=120::90&radius=100&legendsize=240::80\"/>";
return $line;
}
static function CreateDefaultRecords($vh_acc_fk)
{
global $zdbh;
global $controller;
$domainID = $vh_acc_fk;
$domainName = $zdbh->query("SELECT * FROM x_vhosts WHERE vh_id_pk=" . $domainID . " AND vh_deleted_ts IS NULL")->Fetch();
$userID = $domainName['vh_acc_fk'];
if (!fs_director::CheckForEmptyValue(ctrl_options::GetSystemOption('server_ip'))) {
$target = ctrl_options::GetSystemOption('server_ip');
} else {
$target = $_SERVER["SERVER_ADDR"];
}
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'A',
'@',
3600,
:target,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$sql->bindParam(':target', $target);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'CNAME',
'www',
3600,
'@',
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'CNAME',
'ftp',
3600,
'@',
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'A',
'mail',
86400,
:target,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$sql->bindParam(':target', $target);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'MX',
'@',
86400,
:vh_name_vc,
10,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$Domain = 'mail.' . $domainName['vh_name_vc'];
$sql->bindParam(':vh_name_vc', $Domain);
$sql->bindParam(':domainID', $domainID);
$sql->bindParam(':target', $target);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'A',
'ns1',
172800,
:target,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$sql->bindParam(':target', $target);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'A',
'ns2',
172800,
:target,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->bindParam(':domainID', $domainID);
$sql->bindParam(':target', $target);
$time = time();
$sql->bindParam(':time', $time);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'NS',
'@',
172800,
:vh_name_vc2,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$Domain = 'ns1.' . $domainName['vh_name_vc'];
$sql->bindParam(':vh_name_vc', $Domain);
$sql->bindParam(':domainID', $domainID);
$time = time();
$sql->bindParam(':time', $time);
$sql->bindParam(':vh_name_vc2', $domainName['vh_name_vc']);
$sql->execute();
$sql = $zdbh->prepare("INSERT INTO x_dns (dn_acc_fk,
dn_name_vc,
dn_vhost_fk,
dn_type_vc,
dn_host_vc,
dn_ttl_in,
dn_target_vc,
dn_priority_in,
dn_weight_in,
dn_port_in,
dn_created_ts) VALUES (
:userID,
:vh_name_vc,
:domainID,
'NS',
'@',
172800,
:ns2,
NULL,
NULL,
NULL,
:time)");
$sql->bindParam(':userID', $userID);
$Domain = 'ns2.' . $domainName['vh_name_vc'];
$sql->bindParam(':ns2', $Domain);
$sql->bindParam(':domainID', $domainID);
$time = time();
$sql->bindParam(':time', $time);
$sql->bindParam(':vh_name_vc', $domainName['vh_name_vc']);
$sql->execute();
return;
}
static function ViewErrors()
{
$bindlog = ctrl_options::GetSystemOption('bind_log');
$logerror = array();
$logwarning = array();
$getlog = array();
if (file_exists($bindlog)) {
$handle = @fopen($bindlog, "r");
$getlog = array();
if ($handle) {
while (!feof($handle)) {
$buffer = fgets($handle, 4096);
$getlog[] = $buffer;
if (strstr($buffer, 'error:') || strstr($buffer, 'error ')) {
$logerror[] = $buffer;
}
if (strstr($buffer, 'warning:') || strstr($buffer, 'warning ')) {
$logwarning[] = $buffer;
}
}fclose($handle);
if (!fs_director::CheckForEmptyValue($logerror)) {
self::$logerror = $logerror;
}
if (!fs_director::CheckForEmptyValue($logwarning)) {
self::$logwarning = $logwarning;
}
if (!fs_director::CheckForEmptyValue($getlog)) {
self::$getlog = $getlog;
}
}
}
}
static function getResult()
{
if (!fs_director::CheckForEmptyValue(self::$bindstart)) {
return ui_sysmessage::shout(ui_language::translate("Service started successfully!"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$bindstop)) {
return ui_sysmessage::shout(ui_language::translate("Service stopped successfully!"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$bindreload)) {
return ui_sysmessage::shout(ui_language::translate("Service reloaded successfully!"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$tryagain)) {
return ui_sysmessage::shout(ui_language::translate("<strong>Error:</strong> Please try again Later. Server service not available."), "Error");
}
if (!fs_director::CheckForEmptyValue(self::$ok)) {
return ui_sysmessage::shout(ui_language::translate("Changes to your settings have been saved successfully!"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$notwritable)) {
return ui_sysmessage::shout(ui_language::translate("No permission to write to log file."), "zannounceerror");
}
if (!fs_director::CheckForEmptyValue(self::$forceupdate)) {
return ui_sysmessage::shout(ui_language::translate("All zone records will be updated on next daemon run."), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$reset)) {
return ui_sysmessage::shout(number_format(self::$reset) . " " . ui_language::translate("Domains records where reset to default"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$addmissing)) {
return ui_sysmessage::shout(number_format(self::$addmissing) . " " . ui_language::translate("Domains records were created"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$deletedtype)) {
return ui_sysmessage::shout(number_format(self::$deletedtype) . " '" . self::$type . "' " . ui_language::translate("Records where marked as deleted from the database"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$deleted)) {
return ui_sysmessage::shout(number_format(self::$deleted) . " " . ui_language::translate("Records where marked as deleted from the database"), "zannounceok");
}
if (!fs_director::CheckForEmptyValue(self::$purged)) {
return ui_sysmessage::shout(number_format(self::$purged) . " " . ui_language::translate("Records where purged from the database"), "zannounceok");
}
return;
}
static function TriggerDNSUpdate($id)
{
global $zdbh;
global $controller;
$GetRecords = ctrl_options::GetSystemOption('dns_hasupdates');
$records = explode(",", $GetRecords);
foreach ($records as $record) {
$RecordArray[] = $record;
}
if (!in_array($id, $RecordArray)) {
$newlist = $GetRecords . "," . $id;
$newlist = str_replace(",,", ",", $newlist);
$sql = "UPDATE x_settings SET so_value_tx=:newlist WHERE so_name_vc='dns_hasupdates'";
$sql = $zdbh->prepare($sql);
$sql->bindParam(':newlist', $newlist);
$sql->execute();
return true;
}
}
static function CheckLogReadable($filename)
{
if (is_readable($filename)) {
$retval = "<font color=\"green\">" . ui_language::translate("Connected to log file") . "</font>";
} else {
$retval = "<font color=\"red\">" . ui_language::translate("Log file is not Readable") . "</font>";
}
return $retval;
}
static function CheckLogWritable($filename)
{
if (is_readable($filename)) {
if (is_writable($filename)) {
$retval = "<font color=\"green\">" . ui_language::translate("(writable)") . "</font>";
} else {
$retval = "<font color=\"red\">" . ui_language::translate("(readonly)") . "</font>";
}
} else {
$retval = NULL;
}
return $retval;
}
}