Python的字節

Question

我有一個VB.net程序使用此功能，以爭奪一個XOR encypted文件：

Public Class Crypter 
    ... 
    'This Will convert String to bytes, then call the other function. 
    Public Function Crypt(ByVal Data As String) As String 
     Return Encoding.Default.GetString(Crypt(Encoding.Default.GetBytes(Data))) 
    End Function 

    'This calls XorCrypt giving Key converted to bytes 
    Public Function Crypt(ByVal Data() As Byte) As Byte() 
     Return XorCrypt(Data, Encoding.Default.GetBytes(Me.Key)) 
    End Function 

    'Xor Encryption. 
    Private Function XorCrypt(ByVal Data() As Byte, ByVal Key() As Byte) As Byte() 
     Dim i As Integer 
     If Key.Length <> 0 Then 
      For i = 0 To Data.Length - 1 
       Data(i) = Data(i) Xor Key(i Mod Key.Length) 
      Next 
     End If 
     Return Data 
    End Function 
End Class 

，並保存這樣：

Dim Crypter As New Cryptic(Key) 
'open destination file 
Dim objWriter As New StreamWriter(fileName) 
'write crypted content 
objWriter.Write(Crypter.Crypt(data)) 

現在我要重新使用Python文件，但我有麻煩越來越單字節，這是蟒蛇的XOR功能：

def crypto(self, data): 
    'crypto(self, data) -> str' 
    return ''.join(chr((ord(x)^ord(y)) % 256) \ 
     for (x, y) in izip(data.decode('utf-8'), cycle(self.key)) 

我不得不添加％256，因爲有時x> 256，即不是單個字節。

這個通過兩個字節的東西不會破壞解密，因爲密鑰與下列數據保持「配對」。

問題是一些解密字符在轉換中是錯誤的。 這些字符都是重音字母，如à，è，ì，但只是幾個整體重音字母。其他人都正確恢復。

我想這可能是由於256國防部，但沒有它，當然我得到一個CHR例外...

感謝您的支持

Answer 1

事實上，下面一行是錯誤的：

Return Encoding.Default.GetString(Crypt(Encoding.Default.GetBytes(Data))) 

有從地穴返回的字節沒有一般保證有效解碼爲字符串。你會更好地使用Convert.ToBase64String，然後將這個字符串傳遞給你的Python代碼（顯然，你需要能夠Base-64解碼字節。

正如其他人指出的，XORing提供的安全級別足以保護你的數據，也許是你的妹妹。

Answer 2

你的解碼後的數據似乎包含Unicode字符用值高於256.在Python 2.x的chr只能處理256以下使用unichr，而不是chr值，它應該工作：

return ''.join(unichr((ord(x)^ord(y))) \ 
    for (x, y) in izip(data.decode('utf-8'), cycle(self.key)) 

Answer 3

如果你打開在文本模式下的文件，它可能是解釋中eted爲Unicode文本。嘗試以二進制模式打開它，使所有字符變成字節。這應該可以避免你的問題chr。如果您使用Python 3.x，請記住，在二進制模式下工作時，應該使用字節文字而不是字符串文字，後者是設計中的Unicode字符串。

Answer 4

使用StreamWriter將加擾數據保存爲字符串（即使用默認編碼進行重新編碼）是否正確？直接保存字節不正確？ 還是同樣的事情？

Dim objWriter As New StreamWriter(fileName) 
objWriter.Write(Crypter.Crypt(data)) 

哪個Crypter.Crypt被StreamWriter.Write調用？

這

Public Function Crypt(ByVal Data() As Byte) As Byte() 

或那樣嗎？

Public Function Crypt(ByVal Data As String) As String 

我不方便與Vb.net ...

---

我碰到這得到什麼字符都參與了對/錯 「²」 轉換

for (x, y) in izip(data.decode('utf-8'), cycle(self.key.decode('utf-8'))): 
    if (ord(x)^ord(y)) > 255 or chr(ord(x)^ord(y)) == '\xb2': 
     print (x, y, chr((ord(x)^ord(y)) % 256), 
       unichr(ord(x)^ord(y)), ord(x), ord(y)) 

我得到這個：

ù K ² ² 249 75 
 p ² ² 194 112 
Æ t ² ² 198 116 
‚ 0 * ‪ 8218 48 

最後一個是錯的因爲雙字節使用......但如果只是一個將很可能獲得通過解密的其餘部分將導致 OUTH的階段