1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
<?php
/*
+--------------------------------------------------------------------------+
| This file is part of the Kolab Web Admin Panel |
| |
| Copyright (C) 2011-2014, Kolab Systems AG |
| |
| This program is free software: you can redistribute it and/or modify |
| it under the terms of the GNU Affero 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 Affero General Public License for more details. |
| |
| You should have received a copy of the GNU Affero General Public License |
| along with this program. If not, see <http://www.gnu.org/licenses/> |
+--------------------------------------------------------------------------+
| Author: Aleksander Machniak <machniak@kolabsys.com> |
+--------------------------------------------------------------------------+
*/
set_time_limit(0);
require_once __DIR__ . '/../lib/functions.php';
require_once 'Auth/LDAP.php';
$LDAP = new LDAP();
$CONF = Conf::get_instance();
$username = $CONF->get('ldap', 'bind_dn');
$password = $CONF->get('ldap', 'bind_pw');
$domain = $CONF->get('kolab', 'primary_domain');
$LDAP->authenticate($username, $password, $domain);
// get list of domains to delete
$domains = list_deleted_domains();
if (empty($domains)) {
die("Nothing to delete. Done.");
}
// delete domains
foreach ($domains as $dn => $domain) {
delete_domain($dn, $domain);
}
function list_deleted_domains()
{
global $LDAP, $CONF;
$result = $LDAP->list_domains(
array(
'associateddomain',
'inetdomainbasedn',
'inetdomainstatus',
),
array(
'params' => array(
'inetdomainstatus' => array(
'value' => 'deleted',
'type' => 'exact',
),
),
),
array(
'page_size' => 999,
'page' => 1,
'sort_by' => 'associateddomain',
)
);
return $result['list'];
}
function delete_domain($domain_dn, $domain)
{
global $LDAP, $CONF;
// get domain name
$domain_name = $domain['associateddomain'];
if (is_array($domain_name)) {
$domain_name = array_shift($domain_name);
}
// sanity check
if ($domain['inetdomainstatus'] != 'deleted') {
echo "Domain $domain_name is not marked for deletion. Skipped.";
return;
}
echo "Deleting domain $domain_name... ";
if (!empty($domain['inetdomainbasedn'])) {
$inetdomainbasedn = $domain['inetdomainbasedn'];
}
else {
$inetdomainbasedn = "dc=" . implode(',dc=', explode('.', $domain_name));
}
// only deletes associateddomain=domain.tld,cn=kolab,cn=config
if (!$LDAP->delete_entry($domain_dn)) {
echo "Error: Failed to delete $domain_dn.\n";
return;
}
$entries = array();
$entries[] = $inetdomainbasedn;
$cn = str_replace('.', '_', $domain_name);
$entries[] = "cn={$cn},cn=ldbm database,cn=plugins,cn=config";
$cn = str_replace(array(',', '='), array('\2C', '\3D'), $inetdomainbasedn);
$entries[] = "cn={$cn},cn=mapping tree,cn=config";
foreach ($entries as $dn) {
if (!$LDAP->delete_entry_recursive($dn)) {
echo "Error: Failed to delete $dn.\n";
return;
}
}
echo "Done.\n";
}
|
