sagepay暗号化はVBでのみ文書化されているため、xor暗号化をC#で記述しようとしています。
vbコードは次のとおりです。
Public Shared Function simpleXor(ByVal strIn As String, ByVal strKey As String) As String
Dim iInIndex As Integer
Dim iKeyIndex As Integer
Dim strReturn As String
If Len(strIn) = 0 Or Len(strKey) = 0 Then
simpleXor = ""
Exit Function
End If
iInIndex = 1
iKeyIndex = 1
strReturn = ""
'** Step through the plain text source XORing the character at each point with the next character in the key **
'** Loop through the key characters as necessary **
Do While iInIndex <= Len(strIn)
strReturn = strReturn & Chr(Asc(Mid(strIn, iInIndex, 1)) Xor Asc(Mid(strKey, iKeyIndex, 1)))
iInIndex = iInIndex + 1
If iKeyIndex = Len(strKey) Then iKeyIndex = 0
iKeyIndex = iKeyIndex + 1
Loop
simpleXor = strReturn
End Function
これまでのところ、これをに変換しました
public static String SimpleXOR(String strIn, String strKey)
{
Int32 iInIndex, iKeyIndex;
String strReturn;
iInIndex = 1;
iKeyIndex = 1;
strReturn = "";
while (iInIndex <= strIn.Length)
{
strReturn = strReturn & Strings.Chr(Strings.Asc(Strings.Mid(strIn, iInIndex, 1)) ^ Strings.Asc(Strings.Mid(strKey, iKeyIndex, 1)));
iInIndex = iInIndex + 1;
if (iKeyIndex == strKey.Length) iKeyIndex = 0;
iKeyIndex = iKeyIndex + 1;
}
}
問題は、この行が何をしているのか理解できなかったことです
strReturn = strReturn & Chr(Asc(Mid(strIn, iInIndex, 1)) Xor Asc(Mid(strKey, iKeyIndex, 1)))
だから私はそれをvbからc#へのコンバーターで実行し、上記を取得しました。しかし、私が知る限り、それは明らかに有効なc#コードではありません。
誰か助けてもらえますか?