Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle | ||||
---|---|---|---|---|
|
...
Função: PFXCert2PEM
Extrai
...
o
...
certificado
...
de
...
cliente 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
Bloco de código | ||
---|---|---|
| ||
PFXCert2PEM( < cPFXFile >, < cPEMFile >, < @cError >, [ cPassword ] )--> lRet
|
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 de certificado de cliente. | X |
|
cError |
...
caractere | Indica a saída da mensagem de erro, em caso de falha. | X | X |
cPassword |
...
caractere | Indica a senha para extrair os dados do arquivo PFX. |
|
|
Retorno
Nome |
---|
...
Tipo |
---|
...
Descrição |
---|
lRet |
...
lógico | Retorna |
...
.T. |
...
quando o PEM é gerado com sucesso; caso contrário, |
...
.F. |
...
. |
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 (PFXCert2PEM)".
...
Importante
- Esta função tem o comportamento igual a ferramenta PKCS12,
...
- da OpenSSL, com a opção de extrair o certificado de cliente (-clcerts).
...
- 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
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
user function getCert() Local cPFX := "\certs\tests.pfx" Local cCert := "\certs\cert.pem" Local cError := "" Local lRet lRet := PFXCert2PEM( cPFX , cCert, @cError, "123" ) If( lRet == .F. ) conout( "Error: " + cError ) Else cContent := MemoRead( cCert ) varinfo( "CA Cert", cContent ) Endif returnreturn |
Abrangência
Protheus 10, TOTVS Application Server 10
...