Página 1 de 1

Criptografia de Senhas!?!?!?!?!?!?!?

Enviado: 26 Dez 2006 20:18
por jc
Olá pessoal.

Preciso saber se existe algum recurso do Fivewin/xHarbour que possa criptografar uma string sem caracteres especiais?

Grato.

Enviado: 27 Dez 2006 21:42
por MARCELOG
Veja a função CRYPT() do xHarbour.

CRYPT(cString,cChave)

Ela criptografa e descritografa.

Espero ter ajudado.

MarceloG

Ps: não se esqueça de eliminar espaços nos procedimentos.

Enviado: 27 Dez 2006 23:10
por jc
Caro Marcelo.

A função do xHarbour funciona sim, mas preciso de uma que me retorne uma string sem caracteres especiais.... pois estou gravando esse retorno no MySQL e ele não reconhece alguns caracteres especiais do DOS.

Grato pela resposta.

Enviado: 28 Dez 2006 17:28
por Stanis Luksys
Olá,

Você pode tentar converter o final com HBOemToAnsi() para caracteres do Windows.

Algo assim:

HBOemToAnsi( Crypt( cString, cChave ) )

Quem sabe assim vai...

Falou!

Enviado: 28 Dez 2006 19:05
por vailton
Olá JC!
jc escreveu:A função do xHarbour funciona sim, mas preciso de uma que me retorne uma string sem caracteres especiais.... pois estou gravando esse retorno no MySQL e ele não reconhece alguns caracteres especiais do DOS.
Se estiver usando a SQL LIB (e eu acho que sim), use a função SQL_ANY2SEEK() passando para ela como argumento o valor que você deseja ajustar.

Esta função mascara os caracteres especiais do argumento passado de modo que ela possa ser incluida em um comando SQL sem problemas. Inclusive ela já lhe retorna a string processada envolta em aspas simples!

É só concatenar no comando e mandar executar, exemplo:

Código: Selecionar todos

cNome := [In't see "Nothing"...]
cSQL := 'INSERT INTO comments VALUES (' + SQL_ANY2SEEK(cSQL) + ')'
É mais ou menos isto.
:^)

Enviado: 03 Jan 2007 20:05
por jc
Obrigado Vailton. A função SQL_ANY2SEEK() é impressionante mesmo... mas terminei por utilizar a enconde() do proprio SGBD.

Inclusive ela existe tanto no MySQL quanto no PostgreSQL.

Mas ja estou utilizado a da SQLLIB em outras situações, que foi uma mão na roda.


Valeu Vailton!

Enviado: 14 Jul 2007 19:13
por Stanis Luksys
Ressucitando o tópico...

Eu estive um tempão com o algorítmo para implementar o MD5 no xHarbour, mas sem tempo... Esses dias lí em algum lugar que já existe, acredito que desde as últimas versões.

Portanto, se o negócio for senha ou outros dados que não se deseja descriptografar, é a melhor saída: hb_md5("texto")!

Falou!

Enviado: 16 Jul 2007 12:56
por gvc
Vc já testou a função ENCRYPT do FiveWin?