Novo componente ACBrEAD, dê sua opnião

[Daniel Simoes]

Olá pessoal,

Estou concluindo uma ampla reforma na Unit ACBrEAD, que foi promovida a Componente...

Com ela agora teremos os seguintes métodos:

    Procedure GerarChaves( var AChavePublica : AnsiString;

       var AChavePrivada : AnsiString ) ;


    function AssinarArquivoComEAD( const NomeArquivo: String) : AnsiString ;


    function VerificarEADArquivo( const NomeArquivo: String): Boolean ; overload ;

    function VerificarEAD( const AString : AnsiString): Boolean ; overload ;

    function VerificarEAD( const AStringList : TStringList): Boolean ; overload ;

    function VerificarEAD( const MS : TMemoryStream; EAD: AnsiString):

       Boolean ; overload ;


    Function GerarXMLeECFc( const NomeSwHouse, Diretorio : String ) : Boolean ;

    Procedure CalcularModuloeExpoente( var Modulo, Expoente : AnsiString );

    Function CalcularChavePublica : AnsiString ;


    function CalcularMD5Arquivo( const NomeArquivo: String): AnsiString ; overload ;

    function CalcularMD5( const AString : AnsiString): AnsiString ; overload ;

    function CalcularMD5( const AStringList : TStringList): AnsiString ; overload ;

    function CalcularMD5( const MS : TMemoryStream): AnsiString ; overload ;


    function CalcularEADArquivo( const NomeArquivo: String): AnsiString ; overload ;

    function CalcularEAD( const AString : AnsiString): AnsiString ; overload ;

    function CalcularEAD( const AStringList : TStringList): AnsiString ; overload ;

    function CalcularEAD( const MS : TMemoryStream): AnsiString ; overload ;

[/code]


Para fazer essas funções usei uma Unit de "Marco Ferrante", chamada: [b]libeay32.pas[/b]... Com ela fica "possível" trabalhar com o OpenSSL de forma direta, ou seja, abrindo a [b]libeay32.dll[/b]... 

Link: http://www.disi.unige.it/person/Ferrant ... hiopenssl/


Portanto o ACBrEAD apenas dependerá dessa DLL para conseguir fazer todas as funções acima, e não mais executará chamadas "run" ao programa OpenSSL.exe...   Outra vantagem é que agora o ACBrEAD não precisa mais gravar as chaves em disco, elas são manipuladas epenas na memória, e por um breve período de tempo (muito mais seguro)


Em anexo está um exemplo do EADTeste.exe, em que estou trabalhando, e que permite comprovar o funcionamento...

EADTeste.zip


Note porém, que o EADTeste.exe depende da [b]libeay32.dll[/b] instalada no Path do Sistema Operacional ou na mesma pasta da aplicação... para iniciar a sua execução

(você pode encontrar essa DLL em [b]ACBr\DLLs\OpenSSL[/b])


Isso ocorre, porque a Unit do Marco Ferrante faz ligações com a Libeay32.dll de forma estática... Ou seja, todo programa que fizer "Uses" dessa Unit ficará com a dependência dessa DLL para ser executado


Isso não chega a ser um problema para programas como o EADTeste... mas vários componentes do ACBr usam a Unit ACBrEAD, e por consequência, tb ficarão com essa dependência... São eles: ACBrRFD e ACBrPAF... O ACBrRFD é usado pelo ACBrECF...


Ou seja, qualquer aplicação que ficar uso de ACBrECF, ACBrRFD, ACBrPAF ou ACBrEAD ficará dependendo dessa [b]libeay32.dll[/b] para ser executada...


[b]Agora a pergunta... [/b][b][color=#FF0000]Você acha que isso é um problema para a sua aplicação ? [/color][/b]


Gostaria da opiniões dos usuários dos componentes do ACBr, antes de continuar com o próximo passo...


Como alternativa, poderíamos:

[b]- Deixar como está, causando a dependência de libeay32.dll[/b]

  (essa DLL já é distribuida com os fontes do ACBr, bastaria copia-la no mesmo diretório da sua aplicação... acredito que muitos já a possuem por causa do NFe... e no Linux ela já é nativa.   Mas provavelmente receberíamos um grande "enxurrada" de perguntas sobre esse "erro")


[b]- Modificar o ACBrEAD para sempre usar o OpenSSL.EXE[/b]

  (isso elimina a dependência, mas fica menos eficiente e elegante... além de menos seguro, pois as chaves sempre precisariam ser gravadas no disco) 


[b]- Modificar a Unit libeay32.pas para fazer a carga dinâmica.[/b] 

  (isso seria o ideal, mas é extremamente difícil e trabalhoso...)
EADTeste.zip

[ricardopdv]

Nao vejo problema algum em distribuir a dll com o sistema. Inclusive ja distribuo essa dll com o meu PDV pois utilizo a dll da bematech para assinar. Ha algum tempo ja pensava em fazer essa alteracao. Otima iniciativa. Assim so é necessária a dll libeay.

Na dll da bematech há um problema de termos que instalar o .net framework. ja verificou se isso acontece com a libeay ?

[Juliomar Marchetti]

Boa tarde Daniel

para windows sem problema algum

ele também funcionaria para o linux? tem algum .so para ele?

só a nivel de informação!

[marciodc]

Não vejo problema algum em depender de uma dll. Ainda mais sendo uma tão importante.

Márcio D. Carvalho

[Daniel Simoes]

Apenas a DLL é necessária (não precisa de .NET)

No Linux o OpenSSL já é instalado por padrão, pois vários serviços dependem dele... Ou seja, no Linux provavelmente não será necessário distribuir a DLL

Só agora notei que a Unit do Marco Ferrante "libeay32.pas" não está compilando no Linux (com o Lazarus)... estou tentando resolver isso...

Também consegui outro avanço... O FPC (compilador do Lazarus) possui uma Unit nativa para acesso a algumas funções do OpenSSL... ela foi escrita com base no trabalho do Lucas (Synapse) e do Marco... Faltavam alguns métodos que estou usando... mas que já implementei nela.... No Windows tudo OK, vou testar no Linux... e depois preciso verificar a compatibilidade dessa Unit com o Delphi 7 e Delphi 2010 (Unicode)

A grande vantagem dessa Unit do FPC é que a carga da DLL é feita de forma dinâmica... Ou seja, não dependerá da DLL para simplesmente executar o programa, mas acusará um erro caso alguma método do ACBrEAD seja chamado e a DLL não seja encontrada.

[EMBarbosa]

Daniel,

Com certeza é uma boa idéia. Se houver como fazer a carga da DLL de forma dinâmica seria bem melhor, mas a dependência da DLL não é problema nenhum pra mim.

[Daniel Simoes]

Obrigado a todos pelo retorno...

O ACBrEAD (e seu Demo) já estão no SVN... Qualquer problema favor reportar..

[José Nilton Pace]

Olá Daniel, excelente idéia, eu já faço uso desta DLL para assinar os arquivos da Nota Fiscal Paulista, inclusive fica a idéia para também colocar o uso dela no ACBrRFD.

[Daniel Simoes]

Oi JNP, já está feito

Atualmente o ACBrRFD e ACBrPAF fazem uso do ACBrEAD para assinar os arquivos

[Augusto]

Oi, sou novo no forum, mais já estou usando o compoente ACBrPAF para validar os arquivos do MENU FISCAL. Eu gostaria de saber se com esta nova alteração eu terei que realizar modificações no meu código ou só terei que recompilar o componente ACBrPAF e minha aplicação para fazer uso da DLL e não utilizar mais o aplicativo OpenSSL.EXE

[Daniel Simoes]

Vc precisa compilar e Instalar o ACBrComum e todos os pacotes que dependem dele...

[Moacir]

Sem problemas, da pra distribuir a dll junto ao projeto.

[Allan]

Boa tarde.

Daniel, utilizo o componente ACBrECF e até então eu não utilizava a libeay32.dll em minha aplicação. Não tenho problemas em necessitar da DLL no diretório do programa, até porque eu ja tinha criado um procedimento para realizar o download da DLL de um servidor web diretamente para o PC do cliente, pois implementei o envio do XML por e-mail pra NF-e que também usa esta DLL.

Aí que está meu problema, pois agora sem a DLL o programa nem chega a rodar, apenas mostra a msg que a DLL não existe:

---------------------------

ControleComercial.exe - Erro do sistema

---------------------------

O programa não pode ser iniciado porque está faltando libeay32.dll no seu computador. Tente reinstalá-lo para resolver esse problema.

---------------------------

OK

---------------------------

Se tivesse como mudar pra solicitar a DLL somente no momento em que o componente for utilizado ja seria de grande valía, pois assim eu poderia efetuar o download da DLL antes do erro.

Faço desta forma pq são muitos clientes para ficar enviando a DLL manualmente.

Criei um caso no Mantis com este assunto, é o 897.

Obrigado

[Daniel Simoes]

Por favor leia o inicio do Tópico... a Unit utilizada na versão Delphi não tem carga dinâmica... e ajusta-la para isso seria um trabalho "hercúleo"...

Atualmente não tenho motivação ou tempo para mudar isso... Mas uma ideia seria criar uma DLL intermediária... Exemplo: ACBrEAD.dll e o componente ACBrEAD faria carga dinâmica dela... isso é bem mais simples pois são poucos métodos que o ACBrEAD realmente usa da libeay32.dll

[TiagoTecchio]

Daniel,

Existe uma versão do ACBr anterior a esta mudança no EAD? Porque fiz o update por SVN, compilei e enviei para o clientes sem saber desse esquema da libeay32... ou seja, me ferrei. Sinceramente para mim esse recurso não tem nenhuma utilidade, e este é o problema.

Obrigado.

[Daniel Simoes]

NAO.. mas vc pode recorrer ao LOG do SVN, e baixar uma revisão da sua escolha...

Ou ainda recorrer aos seus Backups internos...

O assunto foi amplamente discutido aqui... todos tiveram chance de opinar...

Porque vc não distribui a DLL junto com o novo EXE em um ZIP ??? fácil, fácil, e o problema não ocorre mais

[Vially Israel]

agora já não sei se o ACBrEAD não faz chover.

Depois que utilizei ele o tempo aqui na minha cidade fechou e tá prestes a cair um toró

[jmz]

Prezado Daniel,

Desculpe minha ignorância mas você poderia me explicar por que existe a propriedade EAD tanto no TACBrPAF quanto no TACBrECF?

[EMBarbosa]

Olá jmz,

Tanto o TACBrPAF quanto o TACBrECF geram arquivos para o PAF que precisam ser assinados com o registro EAD no final. Eles usam o componente TACBrEAD para gerar essa assinatura. Essa propriedade é onde você relaciona os componentes. Deu pra entender?

[jmz]

Olá jmz,

Tanto o TACBrPAF quanto o TACBrECF geram arquivos para o PAF que precisam ser assinados com o registro EAD no final. Eles usam o componente TACBrEAD para gerar essa assinatura. Essa propriedade é onde você relaciona os componentes. Deu pra entender?

Prezado EMBarbosa,

Isso significa que se eu tiver os componentes TACBrPAF e TACBrECF em forms diferentes eu devo repetir o componente TACBrEAD nos dois forms? E a propriedade OnPAFGetKeyRSA do TACBrPAF deve ficar vazia ao usar o TACBrEAD?

[EMBarbosa]

Se o componente ACBrEAD estiver numa unit que é acessível por ambos, você pode usar só um.

Você poderia deixá-lo num datamodule, por exemplo.

[jmz]

Se o componente ACBrEAD estiver numa unit que é acessível por ambos, você pode usar só um.

Você poderia deixá-lo num datamodule, por exemplo.

Ok, obrigado pela ajuda. Farei as adaptações aqui e volto a postar.