Criptografia

1 resposta
R
Sou  novato em Java, e preciso fazer um algoritimo de criptografia. Na verdade tenho um script  feito para o Visual Basic, e preciso transformá-lo para JAVA. Em V.B o Script é o seguinte:





Function gFunEncrypt (Palavra As String) As String





Dim diTamanho As Integer


Dim diCaracter As Integer


Dim X As Integer





Dim dsPalavra As String


Dim dsPassWord As String





dsPassWord = "04F89A"


diTamanho = Len(dsPassWord)


dsPalavra = Palavra





For X = 1 To Len(Palavra)


diCaracter = Asc(Mid$(dsPassWord, (X Mod diTamanho) - diTamanho * ((X Mod diTamanho) = 0), 1))


Mid$(dsPalavra, X, 1) = Chr$(Asc(Mid$(dsPalavra, X, 1)) Xor diCaracter)





Next





gFunEncrypt = dsPalavra





End Function





Como faço para transformar isso em JAVA? Existem comandos como o MID, LEN, XORetc no Java, não estou conseguindo





Tks





Roldan

1 Resposta

A

Opa, tudo bem?

Cara, vc pode utilizar este método que eu fiz aqui para a empresa e que está sendo utilizado em um sistema de login…

Você pode alterá-lo se quiser, mas como ele foi implementado, ele segue o padrão de criptografia do Linux…



public static String encripty( String nameUser, String password )

{

String sign = nameUser + password;

try

{

java.security.MessageDigest md = java.security.MessageDigest.getInstance("MD5");

md.update(sign.getBytes());

byte[] hash = md.digest();

StringBuffer hexString = new StringBuffer();

for (int i = 0; i < hash.length; i++)

{

if ((0xff & hash[i]) < 0x10)

hexString.append("0" + Integer.toHexString((0xFF & hash[i])));

else

hexString.append(Integer.toHexString(0xFF & hash[i]));

}

sign = hexString.toString();

} catch (Exception nsae)

{

nsae.getMessage();

}

return sign;

}



Um Abraço

Dalton

[ Editado por aspirante No dia [telefone removido] ]
Criado 25 de junho de 2002
Ultima resposta 25 de jun. de 2002
Respostas 1
Participantes 2