Histórico da Página

import.css=/download/attachments/3279126062824/newLayouttecnologia.css

...

...

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).

Sintaxe

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

Parâmetros

...

Nome	Tipo	Descrição	Obrigatório	Referência
cPFXFile

...

caractere

Indica o caminho

...

do arquivo .PFX, a partir da raiz do diretório (RootPath) do TOTVS Application Server.	X
cPEMFile

...

caractere

Indica 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
cError

...

caractere	Indica a saída da mensagem de erro, em caso de falha.	X	X
cPassword

...

caractere

Indica a senha para exportar os dados do certificado.

 

Retorno

...

...

...

...

Observações

• 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)".

...

• Esta função tem o comportamento igual a ferramenta PKCS12,

...

• da 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 da OpenSSL - http://www.openssl.org/docs/apps/pkcs12.html.

Exemplos

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

Abrangência

A partir de Microsiga Protheus 8.11

...