| commit | author | age | ||
| 142907 | 1 | <?php |
| T | 2 | /* |
| 3 | Copyright (c) 2010 Till Brehm, projektfarm Gmbh and Oliver Vogel www.muv.com | |
| 4 | All rights reserved. | |
| 5 | ||
| 6 | Redistribution and use in source and binary forms, with or without modification, | |
| 7 | are permitted provided that the following conditions are met: | |
| 8 | ||
| 9 | * Redistributions of source code must retain the above copyright notice, | |
| 10 | this list of conditions and the following disclaimer. | |
| 11 | * Redistributions in binary form must reproduce the above copyright notice, | |
| 12 | this list of conditions and the following disclaimer in the documentation | |
| 13 | and/or other materials provided with the distribution. | |
| 14 | * Neither the name of ISPConfig nor the names of its contributors | |
| 15 | may be used to endorse or promote products derived from this software without | |
| 16 | specific prior written permission. | |
| 17 | ||
| 18 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND | |
| 19 | ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED | |
| 20 | WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | |
| 21 | IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, | |
| 22 | INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, | |
| 23 | BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | |
| 24 | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY | |
| 25 | OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING | |
| 26 | NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, | |
| 27 | EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |
| 28 | */ | |
| 29 | ||
| 30 | /****************************************** | |
| 31 | * Begin Form configuration | |
| 32 | ******************************************/ | |
| 33 | ||
| 34 | $list_def_file = "list/domain.list.php"; | |
| 35 | $tform_def_file = "form/domain.tform.php"; | |
| 36 | ||
| 37 | /****************************************** | |
| 38 | * End Form configuration | |
| 39 | ******************************************/ | |
| 40 | ||
| b1a6a5 | 41 | require_once '../../lib/config.inc.php'; |
| MC | 42 | require_once '../../lib/app.inc.php'; |
| 142907 | 43 | |
| T | 44 | //* Check permissions for module |
| 45 | $app->auth->check_module_permissions('client'); | |
| 46 | ||
| 47 | // Loading classes | |
| 48 | $app->uses('tpl,tform,tform_actions'); | |
| 49 | $app->load('tform_actions'); | |
| 50 | ||
| 51 | class page_action extends tform_actions { | |
| 52 | ||
| 53 | function onBeforeDelete() { | |
| 54 | global $app; $conf; | |
| b1a6a5 | 55 | |
| 142907 | 56 | //* load language file |
| T | 57 | $lng_file = 'lib/lang/'.$_SESSION['s']['language'].'.lng'; |
| b1a6a5 | 58 | include $lng_file; |
| MC | 59 | |
| 142907 | 60 | /* |
| T | 61 | * We can only delete domains if they are NOT in use |
| 62 | */ | |
| 63 | $domain = $this->dataRecord['domain']; | |
| 64 | ||
| cc7a82 | 65 | $sql = "SELECT id FROM dns_soa WHERE origin = ?"; |
| MC | 66 | $res = $app->db->queryOneRecord($sql, $domain."."); |
| d021ef | 67 | if (is_array($res)){ |
| SC | 68 | $app->error($wb['error_domain_in dnsuse']); |
| 69 | } | |
| 70 | ||
| cc7a82 | 71 | $sql = "SELECT id FROM dns_slave WHERE origin = ?"; |
| MC | 72 | $res = $app->db->queryOneRecord($sql, $domain."."); |
| d021ef | 73 | if (is_array($res)){ |
| SC | 74 | $app->error($wb['error_domain_in dnsslaveuse']); |
| 75 | } | |
| 76 | ||
| cc7a82 | 77 | $sql = "SELECT domain_id FROM mail_domain WHERE domain = ?"; |
| MC | 78 | $res = $app->db->queryOneRecord($sql, $domain); |
| 142907 | 79 | if (is_array($res)){ |
| T | 80 | $app->error($wb['error_domain_in mailuse']); |
| 81 | } | |
| b1a6a5 | 82 | |
| cc7a82 | 83 | $sql = "SELECT domain_id FROM web_domain WHERE (domain = ? AND type IN ('alias', 'vhost', 'vhostalias')) OR (domain LIKE ? AND type IN ('subdomain', 'vhostsubdomain'))"; |
| MC | 84 | $res = $app->db->queryOneRecord($sql, $domain, '%.' . $domain); |
| 142907 | 85 | if (is_array($res)){ |
| T | 86 | $app->error($wb['error_domain_in webuse']); |
| 87 | } | |
| 88 | } | |
| b1a6a5 | 89 | |
| 142907 | 90 | } |
| T | 91 | |
| 92 | $page = new page_action; | |
| 93 | $page->onDelete(); | |
| 94 | ||
| b1a6a5 | 95 | ?> |
