From d021ef61c76d5414f1111b829f6ee84c6b030432 Mon Sep 17 00:00:00 2001
From: Sergio Cambra <sergio@programatica.es>
Date: Wed, 30 Jul 2014 08:50:43 -0400
Subject: [PATCH] check dns use of domain before delete domain from client
---
interface/web/client/domain_del.php | 12 ++++++++++++
1 files changed, 12 insertions(+), 0 deletions(-)
diff --git a/interface/web/client/domain_del.php b/interface/web/client/domain_del.php
index 2ec8e86..9a02ac9 100644
--- a/interface/web/client/domain_del.php
+++ b/interface/web/client/domain_del.php
@@ -62,6 +62,18 @@
*/
$domain = $this->dataRecord['domain'];
+ $sql = "SELECT id FROM dns_soa WHERE origin = '" . $app->db->quote($domain.".") . "'";
+ $res = $app->db->queryOneRecord($sql);
+ if (is_array($res)){
+ $app->error($wb['error_domain_in dnsuse']);
+ }
+
+ $sql = "SELECT id FROM dns_slave WHERE origin = '" . $app->db->quote($domain.".") . "'";
+ $res = $app->db->queryOneRecord($sql);
+ if (is_array($res)){
+ $app->error($wb['error_domain_in dnsslaveuse']);
+ }
+
$sql = "SELECT domain_id FROM mail_domain WHERE domain = '" . $app->db->quote($domain) . "'";
$res = $app->db->queryOneRecord($sql);
if (is_array($res)){
--
Gitblit v1.9.1