| Code Kitchen Allgemeines Coder-Forum rund um das Programmieren eigenständiger, ausführbarer Programme. |
Diskussion: Verschlüsselung im Forum Code Kitchen, in der Kategorie Software Home; Anzeige Hallo, ich habe ein Verschlüsslungsprogramm geschrieben, mal sehr wer mein Code als erstes Knack wenn ihr hier das überhaupt ...
![]() |
| | #1 (permalink) |
| Registriert seit: 29.03.05 ![]() Likes: 0 | Anzeige Hallo, ich habe ein Verschlüsslungsprogramm geschrieben, mal sehr wer mein Code als erstes Knack wenn ihr hier das überhaupt könnt: Der zu knackende Code: 10801081522293643505764717885929910611312012713414 11481551621691761831901972042112182252322392462532 60267274280183930517777057808505284700538855056900 90538624052777705387780547623051854705477000517777 05780850518855053893205884700538085057762305380080 56893205788550569163053777705287780538932054885505 27623057800805374690547700052777705774690537546057 77770588778054916305874690578008051877805 Und ihr das Programm: function verschüssel (Wort: string) : string; var i,f,x,v,ran:integer; test, test1, test2, ran_str, test3 : string; begin test := ''; ran_str := ''; ran := 0; For i := 1 to length(wort) do begin ran := random(8)+1; test2 := Inttostr(Ord(Wort[i])*154) ; v := Ord(Wort[i]) * 154 * length(test2); test2 := InttoStr(v) + InttoStr(length(test2)); test := Test+ InttoStr(ran); If length(test) <10 then ran_str := ran_str + '0' + inttostr(length(test)) else ran_str := ran_str + InttoStr(length(test)); test := test + test2; end; If length(test)> 9 then ran_str := ran_str + inttostr(length(test)) else ran_str := ran_str + '0' + InttoStr(length(test)); test3 := InttoStr(Length(ran_str)); If strtoint(test3) < 9 then test3 := '0' + test3; result := test3 + ran_str + test; end;
__________________ Kalorienverbrauch |
| | |
| | #2 (permalink) |
| Registriert seit: 22.05.05 ![]() Likes: 0 | 1. gehört sowas in Encryption oder unter hackits oder sowas 2. In [ CODE ]-Tags isses übersichtlicher 3. Vll. ne Angabe, welche Sprache das ist? 4. Ich versteh zwar die Sprache net wirklich, aber sieht nicht so aus, als wäre das ganze umkehrbar, da du ja Zufallszahlen zur Verschlüsselung verwendest |
| | |
| HaBOT | - Anzeige - |
| |
| | #3 (permalink) |
| Themenstarter Registriert seit: 29.03.05 ![]() Likes: 0 | das ist delphie, also ich denke dann kennst du dich nicht gut aus im programmieren oder verschlüsselung,sorry vlt habe ich die falschen Thread gewählt
__________________ Kalorienverbrauch |
| | |
| | #4 (permalink) |
| Registriert seit: 22.05.05 ![]() Likes: 0 | Das ich Delphi das letzte mal gecodet hab is schon ewig her, und an nen := Operator kann ich mich da leider nimmer errinnern... Aber wie gesagt, kannst du denn selber deine Verschlüsselung umkehren? Da das ganze ja mithilfe von Zufallszahlen verschlüsselt wird, dürfte sich das recht schwirig gestallten. OK, hab mir das jetzt nochmal genau und in Ruhe angeschaut, das sieht seehr nach ner einseitigen Verschlüssenlung aus, die nicht mehr umkehrbar ist, wegen der lenght und der Zufallszahl |
| | |
| | #5 (permalink) |
| Themenstarter Registriert seit: 29.03.05 ![]() Likes: 0 | ich kann dir sagen zu 100% ist die umkehrbar. musst dir mal den anfang des verschlüsslungsstrign angucken
__________________ Kalorienverbrauch |
| | |
| | #6 (permalink) |
| Member of Honour ![]() Registriert seit: 28.05.03 ![]() Likes: 1 | hat mich einiges an denkarbeit gekostet, aber habs raus bekommen: meinsupercodeistnichtswertschadeaberwahr ![]() lösungsprogramm (java) siehe anhang.
__________________ http://livehabo.hackerboard.de | http://livebb.sourceforge.net |
| | |
| | #7 (permalink) |
| Themenstarter Registriert seit: 29.03.05 ![]() Likes: 0 | sauber.... herzlichen glückwunsch ich denke aber das ohne meine quellcode da keieer so schnell drauf kommt aber eine universal entschlüsslung ist das auch nicht, das passt jetzt bei diesem einen Fall aber es geht nicht bei jedem
__________________ Kalorienverbrauch |
| | |
| | #8 (permalink) | |
| Senior Member Registriert seit: 07.01.03 ![]() Likes: 19 | Zitat:
ab das ist auch nicht die frage - security by obscurity ist eh ungern gesehn.. ich werd mir das auch mal irgendwann zu gemüte führn.. wenn ich mich mal aufraffen könnte.. | |
| | |
| | #9 (permalink) | |
| Member of Honour ![]() Registriert seit: 28.05.03 ![]() Likes: 1 | Zitat:
__________________ http://livehabo.hackerboard.de | http://livebb.sourceforge.net | |
| | |
| | #10 (permalink) |
| Themenstarter Registriert seit: 29.03.05 ![]() Likes: 0 | kann ich jetzt mal sagen wie das geht: Also man nehme den String -> Man zieht dich die Asciiwerte der einzelnen Zeichen. Multipliziert die mit 152 anschließend mit der eigenen länge, daran hängt man die eiegene länge. Dann wird eine Zufallszahl zwischen den string der einzelnen zeichen gespeichert. Die Position der Zufallszahlen werden nacheinander vorne in den Verschlüsslungs string angehängt und davor nach die gesamt anzahl, der zahllen , die die position angeben
__________________ Kalorienverbrauch |
| | |
| | #11 (permalink) |
| Registriert seit: 24.12.05 ![]() Likes: 0 | wo wir schonmal dabei sind, guckt euch mal mein Verschlüsselungsprogramm an http://www.hackerzz.de/vb/HackerzzdeCrypter.zip |
| | |
| | #12 (permalink) |
| Registriert seit: 22.05.05 ![]() Likes: 0 | @ivegotmail Wie hast du aus der Länge die Zeichen wiederhergestellt? bzw. Wie kann man überhaupt wenn das mit der länge multipliziert wurde wieder zurückkommen? Geb zu so super kenn ich mich net damit aus, aber für mich klingts einleuchtend, dass wenn man sowas mit der eigenen länge verschlüsselt, es dann nimmer umkehrbar ist ?( |
| | |
| | #13 (permalink) |
| Member of Honour ![]() Registriert seit: 28.05.03 ![]() Likes: 1 | ich erklär mal wie ich bei meiner entschlüsselungsfunktion vorgegangen bin: der code besteht aus 3 teilen (result := test3 + ran_str + test;). wenn man sich die verschlüsselungsfunktion anschaut (und versteht), weiß man das ran_str immer mit "01" anfangen muss. jetzt sucht man im code nach dem ersten auftreten von "01" und hat den anfang von ran_str (4. buchstabe). alles davor ist also test3 (=108) und das ist wiederum die länge von ran_str (test3 := InttoStr(Length(ran_str));). wenn man diese länge hat und den anfang von ran_str, so weiß man auch wo test anfängt (3+108) und auch endet (ende des codes). somit hat man den code erstmal in die 3 teile zerlegt. ran_str gibt im prinzip immer an, welche teile von test zu einem buchstaben gehören. 0108152229... entspricht 01 08 15 22 29 ... eigentlich müsste man hier immer die abstände ermitteln und weiß dann wieviel zeichen von test jeweils zu einem buchstaben gehören. da der abstand aber in unserem fall immer 7 ist, hab ich das nicht exakt ausprogrammiert, sondern gehe einfach immer von 7 zeichen aus. als nehm ich mir nach einander 7 zeichen aus test (dem 3. teil vom code). der erste buchstabe ist die zufallszahl und kann vernachlässigt werden. die 7. zahl ist die länge von test2 (in unserem fall immer 5). die zeichen 2-6 (also diese 5 stellige zahl) dividiert man nun jeweils durch 154 und test2länge (5) und erhält das entsprechende zeichen (bzw den ascii wert).
__________________ http://livehabo.hackerboard.de | http://livebb.sourceforge.net |
| | |
![]() |
| - Anzeige - | |
| |
| Themen-Optionen | |
| Ansicht | |
| |
Ähnliche Themen | ||||
| Thema | Autor | Forum | Antworten | Letzter Beitrag |
| Verschlüsselung | kayoli | Cryptography & Encryption | 13 | 13.01.08 14:10 |
| PLZ help PGP Verschlüsselung | Bruder-Tuck | Cryptography & Encryption | 11 | 17.07.06 13:07 |
| SSL Verschlüsselung | chefcock | Cryptography & Encryption | 1 | 09.06.04 14:57 |
| W-Lan-Verschlüsselung | hapewe | Virenschutz · Tools & Aggressive Software | 15 | 01.04.04 18:27 |
| 128 bit Verschlüsselung | SPaRXLi | Cryptography & Encryption | 12 | 25.11.01 12:05 |