UNITÉ DE CRYPTAGE/DÉCRYPTAGE PAR XOR.

Inekman Messages postés 291 Date d'inscription dimanche 2 février 2003 Statut Membre Dernière intervention 30 juin 2006 - 11 août 2004 à 08:28
jnspunk Messages postés 16 Date d'inscription mercredi 9 avril 2003 Statut Membre Dernière intervention 10 février 2007 - 10 févr. 2007 à 18:15
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/25304-unite-de-cryptage-decryptage-par-xor

jnspunk Messages postés 16 Date d'inscription mercredi 9 avril 2003 Statut Membre Dernière intervention 10 février 2007
10 févr. 2007 à 18:15
For J:= 1 to LongCle do begin
VCle := @Cle[J];

je t'invite à regarder de nouveau ce passage :)
En fait cela crypte entierement le texte par le premier caractère de la clé, puis le deuxième, puis le troisième... jusqu' au dernier.
elguevel Messages postés 718 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 22 novembre 2016 3
3 oct. 2005 à 11:31
J'ai pas telecharger ta source mais a en voir ton code,ya une grosse faille.

Tu fait un boucle qui parcoure ta chaine jusque la ok, par contre après tu fait une boucle qui parcour ta clé, tu fait un Xor du caractère de ton buffer lu, par le caractère de la clé lu, et après tu incremente la position de ta clé sans incrementé celui de ton buffer.

En un mot quelque soit la clé que tu mette, seul le dernier caractère va crypter ta chaine.

Si ton champs source est : "ceci est un test de cryptage" et que ta clé est "MACLE" alors seul le E va compter, si tu met comme clé "XXE" çà fera pareil normalement !

Cordialement.

Damien
kanader6 Messages postés 4 Date d'inscription jeudi 9 octobre 2003 Statut Membre Dernière intervention 1 janvier 2005
11 nov. 2004 à 13:31
super code, simple et efficace :)
Inekman Messages postés 291 Date d'inscription dimanche 2 février 2003 Statut Membre Dernière intervention 30 juin 2006
20 août 2004 à 14:29
j'ai vu que t'as rajouté une tite fonction pour les fichiers, je trouve ta réaction immédiate excellente.

Je ne peux pas la tester encore malheureusement car j'ai pu mon pc jusqu'à fin août (36 15 Ma vie).

Mais sache que je te filerai un commentaire dès mon retour à la maison.

Inekman.
jnspunk Messages postés 16 Date d'inscription mercredi 9 avril 2003 Statut Membre Dernière intervention 10 février 2007
17 août 2004 à 00:21
j' attend vos commentaires :p
jnspunk Messages postés 16 Date d'inscription mercredi 9 avril 2003 Statut Membre Dernière intervention 10 février 2007
11 août 2004 à 16:32
oui pourquoi pas ^^, je verrais ca ce soir :p
Inekman Messages postés 291 Date d'inscription dimanche 2 février 2003 Statut Membre Dernière intervention 30 juin 2006
11 août 2004 à 08:28
ouah trop cool mec, ça fait plaisir ça. Je voudrai savoir si ça te tente de faire un truc similaire pour des fichiers car ça m'intéresse et aussi pour les stream tant qu'à faire :-)

Si ça te botte, ça sera super cool. 8/10 en attendant d'éventuelles MAJ.

Inekman.
Rejoignez-nous