97 lines
		
	
	
		
			2.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
			
		
		
	
	
			97 lines
		
	
	
		
			2.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
| <?php
 | |
| /**
 | |
|  * Recursively deletes the specified DN and all of its children
 | |
|  *
 | |
|  * @package phpLDAPadmin
 | |
|  * @subpackage Page
 | |
|  */
 | |
| 
 | |
| /**
 | |
|  */
 | |
| 
 | |
| require './common.php';
 | |
| 
 | |
| $request = array();
 | |
| $request['dn'] = get_request('dn','REQUEST',true);
 | |
| 
 | |
| if (! is_array($request['dn']))
 | |
| 	$request['dn'] = array($request['dn']);
 | |
| 
 | |
| $request['parent'] = array();
 | |
| foreach ($request['dn'] as $dn)
 | |
| 	if (! $app['server']->dnExists($dn))
 | |
| 		system_message(array(
 | |
| 			'title'=>_('Entry does not exist'),
 | |
| 			'body'=>sprintf('%s (%s)',_('Unable to delete entry, it does not exist'),$dn),
 | |
| 			'type'=>'error'));
 | |
| 	else
 | |
| 		array_push($request['parent'],$dn);
 | |
| 
 | |
| printf('<h3 class="title">%s</h3>',_('Delete LDAP entries'));
 | |
| printf('<h3 class="subtitle">%s</h3>',_('Recursive delete progress'));
 | |
| 
 | |
| # Prevent script from bailing early on a long delete
 | |
| @set_time_limit(0);
 | |
| 
 | |
| foreach ($request['parent'] as $dn) {
 | |
| 	echo '<br /><br />';
 | |
| 	echo '<small>';
 | |
| 	$result = pla_rdelete($app['server'],$dn);
 | |
| 	echo '</small><br />';
 | |
| 
 | |
| 	if ($result) {
 | |
| 		printf(_('Entry %s and sub-tree deleted successfully.'),'<b>'.$dn.'</b>');
 | |
| 
 | |
| 	} else {
 | |
| 		system_message(array(
 | |
| 			'title'=>_('Could not delete the entry.').sprintf(' (%s)',pretty_print_dn(htmlspecialchars($request['dn']))),
 | |
| 			'body'=>ldap_error_msg($app['server']->getErrorMessage(null),$app['server']->getErrorNum(null)),
 | |
| 			'type'=>'error'));
 | |
| 	}
 | |
| }
 | |
| 
 | |
| function pla_rdelete($server,$dn) {
 | |
| 	if (($dn == null) || ($dn == '')) {
 | |
| 		system_message(array(
 | |
| 			'title'=>_('Entry does not exist'),
 | |
| 			'body'=>sprintf('%s (%s)',_('Unable to delete entry, it does not exist'),$dn),
 | |
| 			'type'=>'error'));
 | |
| 		return false;
 | |
| 	}
 | |
| 	# We delete all children, not only the visible children in the tree
 | |
| 	$children = $server->getContainerContents($dn,null,0,'(objectClass=*)',LDAP_DEREF_NEVER);
 | |
| 
 | |
| 	if (! is_array($children) || count($children) == 0) {
 | |
| 		printf('<span style="white-space: nowrap;">%s %s...',_('Deleting'),$dn);
 | |
| 
 | |
| 		if ($server->delete($dn)) {
 | |
| 			printf(' <span style="color:green">%s</span></span><br />',_('Success'));
 | |
| 			return true;
 | |
| 
 | |
| 		} else {
 | |
| 			system_message(array(
 | |
| 				'title'=>_('Could not delete the entry.').sprintf(' (%s)',pretty_print_dn($dn)),
 | |
| 				'body'=>ldap_error_msg($server->getErrorMessage(null),$server->getErrorNum(null)),
 | |
| 				'type'=>'error'));
 | |
| 		}
 | |
| 
 | |
| 	} else {
 | |
| 		foreach ($children as $child_dn)
 | |
| 			pla_rdelete($server,$child_dn);
 | |
| 
 | |
| 		printf('<span style="white-space: nowrap;">%s %s...',_('Deleting'),$dn);
 | |
| 
 | |
| 		if ($server->delete($dn)) {
 | |
| 			printf(' <span style="color:green">%s</span></span><br />',_('Success'));
 | |
| 			return true;
 | |
| 
 | |
| 		} else {
 | |
| 			system_message(array(
 | |
| 				'title'=>_('Could not delete the entry.').sprintf(' (%s)',pretty_print_dn($dn)),
 | |
| 				'body'=>ldap_error_msg($server->getErrorMessage(null),$server->getErrorNum(null)),
 | |
| 				'type'=>'error'));
 | |
| 		}
 | |
| 	}
 | |
| }
 | |
| ?>
 |