Sugestão de alteração de carregamento OpenSSL

[Valdecir Luciano Carvalho]

Boa tarde.

 

Devido a uma necessidade em particular de uma aplicação, foi necessário fazer uma modificação na libeay32.pas que carrega as dlls do OpenSSL para evitar as mesmas fossem carregadas em memória logo no inicio da aplicação e sim quando forem realmente necessárias.

Problema: A aplicação que usa a AcBr é quem extrai todos os arquivos necessários para execução. Mas como o carregamento das dlls openssl (libeay32.dll, ssleay32.dll, e por tabela msvcr100.dll/120.dll dependendo da versão do open ssl) é executada antes da execução dos unit initializers* o executável nunca viria a carregar pela, ainda ,inexistencia da dlls fisicamente no diretório.

* codigo "initialization" de uma unit, que é onde , no caso, se extrai os arquivos.

Solução: Utilizando de uma feature ("delayed") que foi inserida no Delphi 2010 que faz o carregamento atrasado das dependências externas.

 

Segue em anexo a unit com a modificação sugerida.

libeay32.pas

[Juliomar Marchetti]

Então no delphi 2010 pra cima iria funcionar e no restante?

esquecemos deles?

[Valdecir Luciano Carvalho]

Continua funcionando como ja estava funcionando antes.

Só que infelizmente não carregando por demanda como no caso de ser compilada em Delphi 2010 pra cima. Ou seja, não ha quebra de compatibilidade e sim melhoria.

Veja que a existe um check de versão por diretiva de compilação no código que só utiliza a feature se for num compilador com suporte, caso contrario compila como estava anteriormente sem nenhuma modificação a mais. Só trocar o .pas e reinstalar (recompilando) a acbr.

Editado 8 Setembro, 2015 por Valdecir Luciano Carvalho

[Régys Silveira]

Conferido é enviado, obrigado pela contribuição.

[Edson Fernandes]

Olá, talvez depois de ter alterado isso apareceu um problema no hora de compilar aqui (delphi 2010) segue um print da tela pra que possa ser visto onde foi que deu o erro. Muito obrigado.

[Régys Silveira]

Enviei um acerto, por favor testem.

[hleorj]

Mas um pouco delayed

http://blogs.embarcadero.com/abauer/2009/08/25/38894

http://www.drbob42.com/examine/examinC1.htm

 

 

Editado 9 Setembro, 2015 por hleorj

[Juliomar Marchetti]

Então.. tenho um projeto em XE6 e essa implementação só gerou dor de cabeça!

pois o mesmo não funciona, recebi relatos após gerar o build que ele não consegue carregar a dll em questão!

então o que me dizem os especialistas no delay?

ps: não é dll faltando, nem colocada em local errado, muito menos conflito entre versões