#!/usr/bin/php

<?php

require('config.php');
require('functions.php');


#/**************************************************************************\
#*                                                                          *
#* Este script tem uma funcao: removeListas().                              *
#*                                                                          *
#* -> removeListas() - le o dn de listas no LDAP/RHDS, e remove todas as    *
#*    listas funcionais e corporativas existentes (nao executa qualquer     *
#*    processamento nas listas criadas manualmente).                        *
#*    usuarios nas respectivas listas.                                      *
#*                                                                          *
#*                               rommel.cysne@serpro.gov.br (em 09/11/2007) *
#\**************************************************************************/



function removeListas($server, $port, $rootdn, $pass, $baseGravacao) {


	$connect=ldap_connect($server,$port);

	ldap_set_option($connect, LDAP_OPT_PROTOCOL_VERSION, 3);
	ldap_bind($connect, $rootdn, $pass);

	$filter="(&(objectclass=mailman)(|(uid=listafunc*)(uid=listacorp*)))";
	$justthese = array("uid");
	$sr = ldap_search($connect, $baseGravacao, $filter, $justthese);
	$info = ldap_get_entries($connect, $sr);
	$cont = $info['count'];


	$i = 0;
	while($i <= ($cont - 1)) {

		$nomeLista = $info[$i]['uid'][0];
		echo "Nome da lista --> $nomeLista\n";

		$dn = "uid=$nomeLista".","."$baseGravacao";
		$delLista = @ldap_delete($connect, $dn);

		$i++;

	}

}

removeListas($server, $port, $rootdn, $pass, $baseGravacao);

?>