[S] Verschlüsselungen Selber machen

[boterfreak]

Hallo, da ich mich jetzt mal wieder mit dem Coden auseinander gesetzt habe, will ich mir jetzt meinen eigenen Persönlichen Crypter machen. Bis jetzt habe ich Tuts Tuts Tuts Durchgelesen angeschaut aber dort standt nirgentwo wie ich eine andere Verschlüsselung einsetzte. Immer nur RC4 aber ich will ihn ja auch FUD haben. Ich werden mir andere String Namen einbauen. Aber das wird ja nicht reichen deshalb frage ich wie kann ich mir eine Eigene Verschlüsselung machen und in der Stub wieder Entschlüsseln.

RC4 Verschlüsselung (Client)

Public Function RC4(ByVal Data As String, ByVal Password As String) As String ' This is a Modified RC4 Function ^^
On Error Resume Next
Dim F(0 To 255) As Integer, X, Y As Long, Key() As Byte
Key() = StrConv(Password, vbFromUnicode)
For X = 0 To 255
    Y = (Y + F(X) + Key(X Mod Len(Password))) Mod 256
    F(X) = X
Next X
Key() = StrConv(Data, vbFromUnicode)
For X = 0 To Len(Data)
    Y = (Y + F(Y) + 1) Mod 256
    Key(X) = Key(X) Xor F(Temp + F((Y + F(Y)) Mod 254))
Next X
RC4 = StrConv(Key, vbUnicode)
End Function

Stub

Public Function RC4(ByVal Data As String, ByVal Password As String) As String ' This is a Modified RC4 Function ^^
On Error Resume Next
Dim F(0 To 255) As Integer, X, Y As Long, Key() As Byte
Key() = StrConv(Password, vbFromUnicode)
For X = 0 To 255
    Y = (Y + F(X) + Key(X Mod Len(Password))) Mod 256
    F(X) = X
Next X
Key() = StrConv(Data, vbFromUnicode)
For X = 0 To Len(Data)
    Y = (Y + F(Y) + 1) Mod 256
    Key(X) = Key(X) Xor F(Temp + F((Y + F(Y)) Mod 254))
Next X
RC4 = StrConv(Key, vbUnicode)
End Function

Wie kann ich es Hinbekommen das ich meinen So verschlüssel das er Fud wird ? ich habe mit anderen Strings schon ein paar wegbekommen jetzt will ich aber aufs Ganze. Ich bitte um Hilfe Per PN oder hier.

Ich kann euch Später wenn ich ihn dan auch Nutzen Kann Accs Als dankeschön geben.

[CYSER]

Du willst ne eigene Verschlüsselung schreiben? Setz' dich erstmal mit cryptographie auseinander.

[boterfreak]

Naja nicht grade eine Eigene aber halt so das er FUD wird. Ich habe von den Verschlüsselungen noch nicht viel ahnung aber könnte man daran nicht einfach was ändern ? das er dan Wieder Fud ist ?? ZBS Mod 256 zu Mod 356 ?

[ocz]

Naja nicht grade eine Eigene aber halt so das er FUD wird. Ich habe von den Verschlüsselungen noch nicht viel ahnung aber könnte man daran nicht einfach was ändern ? das er dan Wieder Fud ist ??

Die Detection Rate sollte von der Verschlüsselung (wenn es kein XOR ist) relativ wenig beeinflusst werden.

ZBS Mod 256 zu Mod 356 ?

modulo 256 ergibt sinn, 356 nicht.

[boterfreak]

Mhh aber wie kommt es dan Das mein Crypter Nicht Fud ist Sollte ich die Strings einen Kompletten name geben ? Und Warum ergibt 256 sinn und 356 nicht ?
Hast du vllt icq das du mir dort helfen kannst ?

[Dauerbauer]

Nochmal generell zum "Verschlüsselung selber schreiben"..
Ich habe mir vor längerer Zeit ein Buch gekauft -> Kryptographie

Wenn du wirklich eine selbst schreiben möchtest würde ich die garnicht für nen Crypter einsetzen, weil wenn du in der lage bist kannst du viel mehr machen..

[S1024]

Du must den PE-Header fixxen. Ich glaube Blackerry hat mal einen therd eröffnet indem alles dazu steht.

Gruß
24

[boterfreak]

Hat die Verschlüsselung den einen großen anteil daran ob er Fud oder UD ist ?
Wenn einer lust hätte auf ein Gemeinsames Projekt kann er sich melden.

[Delax]

hast ne pm

[boterfreak]

Mhh leider Programmierst du in VB.net