PAF - ASSINAR ARQUIVO

[eduardo.mrj]

Pessoal!

Agora estou com esse grande problema (pra mim) de assinar os arquivos do PAF.

Dúvidas são:

1) como gerar a chave pública e privada ?

2) como usar isso no acbrPAF ?

Exemplo de como fiz:

1) utilizei o programa puttygen.exe para gera a chave publica e privada (pelo menos acho que deu certo)

2) no componente acbrPAF fiz o seguinte, usando o demo que vem junto

procedure TForm6.ACBrPAFPAFGetKeyRSA(var PrivateKey_RSA: AnsiString);

begin

  PrivateKey_RSA:='xxxxxxxx'; // aqui informei a minha chave privada gerado pelo programa anterior

end;

Criei um botão para assinar o arquivo:

procedure TForm6.btn1Click(Sender: TObject);

begin

  ACBrPAF.AssinaArquivoComEAD('.\PAF_D.txt'); // estou tentando assinar o arquivo que já está na pasta

end;

RESULTADO...

quando abro o arquivo , no final dele só aparece a palavra: "EAD"

Alguém poderia ajudar ?

[lampada]

Não ocorre nenhum erro?

O ssl está instalado na sua máquina ou o executável e as dlls estão na mesma pasta da aplicação?

Você testou utilizando o DEMO?

[eduardo.mrj]

lampada

os arquivos ssleay32, libeay32 e openssl.exe estão na mesma pasta do DEMO que vem no acbrPAF.

A versão das dlls é 0.9.8.1, já saiu até uma versão mais nova (1.0.0b)mas não atualizei.

Não apresenta nenhum erro, apenas escreve no fim do arquivo o texto "EAD".

Obrigado!

[Daniel Simoes]

tente chamar na linha de comando do MS-DOS, na pasta onde está o OpenSSL

OpenSSL version

(isso exibirá a versão atual do OpenSSL)

Se ocorrer algum erro, copie o EXE e as DLLs da pasta:

\ACBr\trunk\DLLs\OpenSSL

[eduardo.mrj]

Executei de dentro da pasta onde está o programa demo no prompt, a versão é:

OpenSSL 0.9.8h 28 May 2008

Continuo na mesma.

vlw pela dica!

[Daniel Simoes]

Veja nos fontes o comando que é executado pelo código do ACBR... tente executa-lo diretamente na linha de comando onde está o OpenSSL