source: companies/serpro/ajx_listas.php @ 903

<?php
  if (!$_SERVER['REQUEST_METHOD'] == 'POST'){
    echo "ERRO: acesso indevido ao script";
    exit;
  }

  //Para repassar os nomes das listas Notes a criar no expresso, segue neste bloco:
  if (isset($_POST['listasproc'])){
        $listasnotes = explode("|",trim($_POST['listasproc']));
        /*
         * OS NOMES DAS LISTAS NOTES ESTÃO ARMAZENADAS NO VETOR ACIMA DECLARADO ('$listasnotes')
         * DEVE SEGUIR-SE O PROCESSAMENTO DA CARGA DAS LISTAS DO NOTES PARA O EXPRESSO, VIA CHAMADA
         * A SCRIPT DE PROMPT OU OUTRA FORMA.
         */
        echo (count($listasnotes) - 1) . " listas Notes a replicar no Expresso";
        exit;
  }  
  
  
  $integrantes = null;
  if (trim($_POST['lista']) == 'expresso'){
        //Busca as listas do RHDS/Mailman  
        $host = "10.200.113.64";
        $conta = "cn=admin,ou=expressolivre,ou=corp,dc=serpro,dc=gov,dc=br";
        $basedn = "ou=listas,ou=expressolivre,ou=corp,dc=serpro,dc=gov,dc=br";
        $senha = "senha";
  
        if (isset($_POST['listaid'])){
                $integrantes = 'mailforwardingaddress';
        $criterio_busca = "uid=".trim($_POST['listaid']);
        $objeto_busca = array("mailForwardingAddress");
        //echo '<font color="yellow">[CRITERIO] - Buscando em '. $host .' por ' .$criterio_busca .'.</font><br>';
        }
        else{
                $criterio_busca = "uid=lista*";
                $objeto_busca = array("uid");
        }       
  }
  
  elseif(trim($_POST['lista']) == 'notes'){
        //Busca as listas do Notes  
        $host = "10.30.2.25";
        $conta = "cn=admin,dc=correiolivre,dc=serpro,dc=gov,dc=br";
        $basedn = "ou=gruposNotes,dc=correiolivre,dc=serpro,dc=gov,dc=br";
        $senha = "correio";
  
        if (isset($_POST['listaid'])){
                $integrantes = 'alias';
        $criterio_busca = "cn=".trim($_POST['listaid']);
        $objeto_busca = array("alias");
        //echo '<font color="yellow">[CRITERIO] - Buscando em '. $host .' por ' .$criterio_busca .'.</font><br>';
        }
        else{
                $criterio_busca = "cn=*";
                $objeto_busca = array("cn");
        }
  }
  
  //echo '<font color="yellow">[CRITERIO] - '. $criterio_busca .'</font><br>';
  //exit;
  
  if ($conexao = ldap_connect($host)){
        ldap_set_option($conexao, LDAP_OPT_TIMELIMIT, 10);

    $ldapbind = ldap_bind($conexao);
    if ($ldapbind){
      //echo '<font color="grey">[OK] - Bind no host LDAP ' . $host . '.</font><br>';
      $busca = ldap_search($conexao, $basedn, $criterio_busca, $objeto_busca);
      //echo "Registros:" . ldap_count_entries($conexao, $busca);
      $registros = ldap_count_entries($conexao, $busca);
      if ($registros > 0){
        //echo '<font color="grey">[OK] - '. $registros . ' listas encontradas no RHDS.</font><br>';
        $dados = ldap_get_entries($conexao, $busca);
        
        $vet = array();
        //Para carregar os nomes das listas
        if(!$integrantes){              
                for ($i = 0; $i < $registros; $i++){
                        $lista_id = $dados[$i][$objeto_busca[0]][0];
                        array_push($vet, $lista_id);
                }
        }
        //Para carregar os integrantes de uma lista
        else{
                //echo '<font color="white">[INTEGRANTES] - '. count($dados[0][$integrantes]) . ' enderecos de email pertencem a lista "'.$criterio_busca.'". Adiciona somente não nulos.</font><br>';
                for ($i = 0; $i < count($dados[0][$integrantes]); $i++){
                        $email_integrante = $dados[0][$integrantes][$i];
                        if ($email_integrante != null)
                                array_push($vet, $email_integrante);
                }               
        }
        //echo '<font color="blue">'. count($vet) . ' listas adicionadas para serialização.</font><br>';
        echo json_encode($vet);
      }
      else
        echo 'ERRO:Não foram encontradas listas no servidor LDAP '. $host." para \"$criterio_busca\"\n";
    }
    else
      echo 'ERRO:Falha no comando bind LDAP para o host ' . $host . "!\n";
    ldap_unbind($conexao);
  }
  else
    echo 'ERRO:Falha ao estabelecer conexao LDAP com o host ' . $host ."!\n";    
?>