java - delphi 解密转换Java代码

Question

如何将Delphi编写的具体代码转换为JAVA？

Delphi 代码是解密代码。

function Decrypt(const S: String; Key1, Key2, Key3: WORD): String;
var
  i: Byte;
  FirstResult: String;
begin
  FirstResult:=HexToValue(S);
  SetLength(Result, Length(FirstResult));
  for i:=1 to Length(FirstResult) do begin
    Result[i]:=Char(Byte(FirstResult[i]) xor (Key1 shr 8));
    Key1     :=(Byte(FirstResult[i])+Key1)*Key2+Key3;
  end;
end;

function HexToValue(const S: String) : String;
var i: Integer;
begin
  SetLength(Result, Length(S) div 2);
  for i:=0 to (Length(S) div 2)-1 do begin
    Result[i+1] := Char(StrToInt('$'+Copy(S,(i*2)+1, 2)));
  end;
end;

加密问题已由“David Heffernan”和“stackoverflow.com”解决

问题1:delphi encrypt convert Java Code

非常感谢! 所以我尝试将 Delphi 中的 Decrypt 代码转换为 JAVA 直到现在!真的嗯…… 但我无法解决它!我的天啊! 我很羞耻...... 但我希望你能帮助我。再次... 我需要解密代码..

Java 加密代码

class SO15885898 {

    private static String ValueToHex(int myInt)
    {
    StringBuilder sb = new StringBuilder();
    sb.append(Integer.toHexString(myInt & 0xff));
    if (sb.length() < 2) {
        sb.insert(0, '0'); // pad with leading zero if needed
    }
    return sb.toString();
    }

    public static void main(String[] args)
    {
    int key1=11;        
    int key2=22;        
    int key3=33;

    String value = "ABCDE";
    for(int i=0; i<value.length(); i++){
        byte bValue = value.substring(i).getBytes()[0];
        int rValue = bValue^(key1>>8);
        key1 = ((rValue+key1)*key2+key3) & 0xffff;
        System.out.print(ValueToHex(rValue));
    }
    }
}

请Java解密代码!! 。 .

这是我尝试过的:

public static void main(String[] args)
{
 int key1=111;        
 int key2=222;        
 int key3=333;

 i tried about this...

 String resultH = "";
 String resultEncrypt = "";
 String resultDecrypt = "";
 String value = "ABCDEF";

 for(int i=0; i<value.length(); i++){
     byte bValue = value.substring(i).getBytes()[0];
     int rValue = bValue^(key1>>8);
     key1 = ((rValue+key1)*key2+key3) & 0xffff;
     resultEncrypt += ValueToHex(rValue);
  resultH += HexToValue(ValueToHex(rValue).getBytes()) ;
 }

 key1=111;
 for(int i=0; i<resultH.length(); i++){
     byte bValue = resultH.substring(i).getBytes()[0];
     int rValue = bValue^(key1>>8);
     key1 = ((rValue+key1)*key2+key3) & 0xffff;
     resultDecrypt += rValue;
 }

 //41db791e06a9
 System.out.println("resultEncrypt : " + resultEncrypt);
 //91242156862519211605712161341202650962331971751025.......................
 System.out.println("resultDecrypt : " + resultDecrypt);
}

public static byte[] HexToValue(byte[] szSrc) {
    int nLen = szSrc.length;
    byte[] szDest = new byte[nLen / 2];
    char szChar[] = new char[2];
    for (int I = 0; I < nLen / 2; I++) {
        szChar[0] = (char) szSrc[I * 2];
        szChar[1] = (char) szSrc[I * 2 + 1];
        byte btDest = (byte) HexToDecimal(szChar);
        int nDest = btDest < 0 ? (Byte.MAX_VALUE + 1) * 2 + btDest : btDest;
        szDest[I] = (byte) nDest;
    }
    String sRet = new String(szDest);
    return szDest;
}

public static int HexToDecimal(char[] szSrc) {
    int nRet = 0;
    int nLen = szSrc.length;
    for (int i = 0; i < nLen; i++) {
        byte cChar = (byte) szSrc[i];
        nRet = nRet * 16;
        nRet += HexToDecimal(cChar);
    }
    return nRet;
}
public static int HexToDecimal(byte cChar) {
    if (cChar == 'A' || cChar == 'a')
        return 10;
    if (cChar == 'B' || cChar == 'b')
        return 11;
    if (cChar == 'C' || cChar == 'c')
        return 12;
    if (cChar == 'D' || cChar == 'd')
        return 13;
    if (cChar == 'E' || cChar == 'e')
        return 14;
    if (cChar == 'F' || cChar == 'f')
        return 15;
    return (cChar - 48);
}

Answer 1

这是您的 Delphi 代码的翻译:

class SO15933038 
{

    private static int[] hexStringToIntArray(String s) 
    {
        int len = s.length();
        int[] data = new int[len / 2];
        for (int i=0; i<len; i+=2) {
            data[i / 2] =  ((Character.digit(s.charAt(i), 16) << 4)
                           + Character.digit(s.charAt(i+1), 16));
        }
        return data;
    }

    private static String intArrayToHexString(int[] a)
    {
        StringBuilder sb = new StringBuilder(a.length);
        for (int i=0; i<a.length; i++)
        {
            sb.append((char) a[i]);
        }
        return sb.toString();
    }

    public static String Decrypt(String encrypted, int key1, int key2, int key3)
    {
        int[] input = hexStringToIntArray(encrypted);
        int[] output = new int[input.length];
        for (int i=0; i<output.length; i++)
        {
            output[i] = input[i]^(key1>>8) & 0xff;
            key1 = ((input[i]+key1)*key2+key3) & 0xffff;
        }
        return intArrayToHexString(output);
    }

    public static void main(String[] args) 
    {
        System.out.println(Decrypt("41db791e06a9", 111, 222, 333));
    }
}

这可能是有史以来写的最蹩脚的 Java 代码。结合您之前问题的答案，我现在已经编写了两个 Java 程序。