&1'); } if(count(explode(chr(0x0A),$w)) < 7 ) { // Convertendo PKCS7 para PEM (Entrada deve ser PEM iniciando com -----BEGIN PKCS7----- ). $w = shell_exec('openssl pkcs7 -inform PEM -outform PEM -print_certs -in ' . $arquivo . ' 2>&1'); } if(count(explode(chr(0x0A),$w)) < 7 ) { // Convertendo p7b para PEM ( Entrada deve ser DER). $w = shell_exec('openssl pkcs7 -inform DER -outform PEM -print_certs -in ' . $arquivo . ' 2>&1'); } if(count(explode(chr(0x0A),$w)) < 7 ) { $msgs_alertas .= lang('Arquivo') . ' '. $_FILES['file']['name'] . lang('nao pode ser processado. Formato invalido') . '.
'; } } if(!$msgs_alertas) { $conteudo = ''; $saida = explode(chr(0x0A),$w); foreach ($saida as $linha) { if($linha != '') { if(substr($linha,0,7) != 'subject' && substr($linha,0,6) != 'issuer') { $conteudo .= $linha . chr(0x0A); } } } $todos = ler_certificados_CAS($conteudo,true); $conteudo = ''; foreach ($todos as $cert) { // Trata sho certificados de CA? $a = new certificadoB(); $a->certificado($cert); if($a->dados['CA']) { $conteudo .= chr(0x0D) . chr(0x0A) . $cert; $msgs_alertas .= lang('Adicionado certificado para') . ' ' . $a->dados['NOME'] . ' .
'; } } if($conteudo) { $novo_nome = gera_nome_arquivo_bkp($path3); if($novo_nome != $path3) { $ret = salva_arquivo_bkp($path3,$novo_nome); if($ret == 0) { file_put_contents($path3,$conteudo,FILE_APPEND); $msgs_alertas .= lang('Arquivo atualizado e salvo') . '.'; } else { $msgs_alertas .= lang('Falhou ao salvar arquivo (CD04). Nao foi concluida a operacao solicitada') . '.
'; } } else { $msgs_alertas .= lang('Falhou ao salvar arquivo (CD03). Nao foi concluida a operacao solicitada') . '.
'; } } else { $msgs_alertas .= lang('Nao foram localizados certificados de CAs') . '.'; } } } } echo ''; echo '
'; echo '
'; echo ''; $aux99 = explode('/',$path3); $path3 = $aux99[count($aux99)-1]; echo '

'; echo '
'; echo $msgs_alertas; echo '
'; echo '
'; echo '

' . lang('Selecione um arquivo com certificados de CAs para adionar ao arquivo de Cas em uso') . ':

'; echo ''; echo '    '; echo ''; echo '
'; echo '
'; echo '

' . lang('Certificados em') . ' ' . $path3 . ' :

'; echo '
'; echo '
' . lang('Carregando ...') . ''; echo '
'; echo '
';
        echo '
';
        echo '
 ' . lang('Carregando ...') . '';
        echo '
'; echo '
'; echo ''; echo '
'; echo ''; ?>