Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 4 Próxima »

Função: PFXCA2PEM

Extrai o certificado de autorização (Certificate Authorith) de um arquivo, com extensão .PFX (formato padrão do IIS - Internet Information Services), e gera como saída um arquivo no formato .PEM (Privacy Enhanced Mail).

PFXCA2PEM ( < cPFXFile >, < cPEMFile >, < @cError >, [ cPassword ] ) --> lRet

 

NomeTipoDescriçãoObrigatórioReferência
cPFXFileCaracterIndica o caminho, do arquivo .PFX, a partir da raiz do diretório (RootPath) do TOTVS Application Server.X 
cPEMFileCaracterIndica o caminho do arquivo .PEM, a partir da raiz do diretório (RootPath) do TOTVS Application Server, com as informações dos certificados de autorização.X 
cErrorCaracterIndica a saída da mensagem de erro, em caso de falha.XX
cPasswordCaracterIndica a senha para exportar os dados do certificado.  

 

lRet
    (lógico)
  • Retorna .T. se conseguiu extrair os certificados de autorização do arquivo .PFX; caso contrário, .F..
  • O formato PEM é frequentemente usado para codificação de chaves e certificados em ASCII.
  • Caso seja informado nos parâmetros <cPFXFile> ou <cPEMFile> caminho de arquivos no client, a aplicação será terminada com uma ocorrência de erro fatal AdvPL "Only server path are allowed (PFXCA2PEM)".


Importante


Esta função tem o comportamento igual a ferramenta PKCS12, do OpenSSL, com a opção de extrair os CAs (-cacerts).

Para mais informações sobre a ferramenta PKCS12, consulte a documentação disponível no site OpenSSL -http://www.openssl.org/docs/apps/pkcs12.html

user function getCA()
Local cPFX := "\certs\tests.pfx"
Local cCA := "\certs\ca.pem"
Local cError := ""
Local cContent := ""
Local lRet
lRet := PFXCA2PEM( cPFX, cCA, cError, "123" )
If( lRet == .F. )
conout( "Error: " + cError )
Else
cContent := MemoRead( cCA )
varinfo( "CA", cContent )
Endif
Return
Microsiga Protheus 8.11

 

  • Sem rótulos