source: companies/serpro/scripts-listas/removeTodasListasRHDS.php @ 903

#!/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);

?>