Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
| Pagetitle |
|---|
...
...
|
...
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 ( < cFilePFX>, < cPassword> ) --> cError
...
| Bloco de código | ||
|---|---|---|
| ||
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
...
Nome | Tipo | Descrição |
|---|---|---|
lRet | lógico | Retorna .T. se conseguiu extrair os certificados de autorização do arquivo .PFX; 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 (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
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
| .
user function getPrivKeygetCA() Local cPFX := "\certs\tests.pfx" Local cCA := "\certs\ca.pem" Localcerror cError := "" LocalcPfx cContent := "\certs\tests.pfx"cerror " Local lRet lRet :=PFXCa2PEM PFXCA2PEM(cPfx cPFX, cCA, @cError, "123" )If(Len(cError) > 0)conout( If( lRet == .F. ) conout( "Error: " + cError)ElsecCA ) Else cContent :=memoread("\certs\tests.pfx_ca.pem")varinfo("Key", cCA )EndifReturn MemoRead( cCA )
varinfo( "CA", cContent )
Endif
Return
|
Abrangência
A partir de Microsiga Protheus 8.11
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas