szyfrowanie czysty perl

[Hola]

Gdzies widzialem prosty program, ktory szyfrowal DES-em. czy ktos moze
widzial skrypt do szyfrowania wiadomosci? dowolny algorytm

[hubert depesz lubaczewski]

Post by Hola
Gdzies widzialem prosty program, ktory szyfrowal DES-em. czy ktos moze
widzial skrypt do szyfrowania wiadomosci? dowolny algorytm

cpan:
Module Crypt::Blowfish_PP (MATTBM/Crypt-Blowfish_PP-1.12.tar.gz)
Module Crypt::CAST5_PP (BOBMATH/Crypt-CAST5_PP-1.04.tar.gz)
Module Crypt::Camellia_PP (OYAMA/Crypt-Camellia_PP-0.02.tar.gz)
Module Crypt::DES_PP (GUIDO/Crypt-DES_PP-1.00.tar.gz)
Module Crypt::GOST_PP (SIFUKURT/Crypt-GOST_PP-1.10.tar.gz)
Module Crypt::Rijndael_PP (DELTA/Crypt-Rijndael_PP-0.04.tar.gz)
Module Crypt::Twofish_PP (GUIDO/Crypt-Twofish_PP-0.17.tar.gz)

depesz

[Hola]

Post by hubert depesz lubaczewski

Post by Hola
Gdzies widzialem prosty program, ktory szyfrowal DES-em. czy ktos moze
widzial skrypt do szyfrowania wiadomosci? dowolny algorytm

Module

ale chodzilo mi o czysty perl ;)
wlasnie o to chodzi by user nic nie musial instalowac. nie musi byc
wygodne. moze szyfrowac ustalona ilosc blokow itp.

[hubert depesz lubaczewski]

Post by Hola
ale chodzilo mi o czysty perl ;)
wlasnie o to chodzi by user nic nie musial instalowac. nie musi byc
wygodne. moze szyfrowac ustalona ilosc blokow itp.

a nie możesz po prostu wziąść kodu z któregoś z modułów i zbundlować go
ze swoim programem?

poza tym - sorry, ale "program w perlu ale bez dodatkowych bibliotek" to
tak jakbyś pisał w c mając jedynie libca. da się. ale po co się męczyć
skoro inni już to napisali?

depesz

[Hola]

Post by hubert depesz lubaczewski

Post by Hola
ale chodzilo mi o czysty perl ;)
wlasnie o to chodzi by user nic nie musial instalowac. nie musi byc
wygodne. moze szyfrowac ustalona ilosc blokow itp.

a nie możesz po prostu wziąść kodu z któregoś z modułów i zbundlować go
ze swoim programem?

pytalem czy wiesz. Bo widzialem.

Post by hubert depesz lubaczewski
poza tym - sorry, ale "program w perlu ale bez dodatkowych bibliotek" to
tak jakbyś pisał w c mając jedynie libca. da się. ale po co się męczyć
skoro inni już to napisali?

Wlasnie inni napisali juz i wlasnie tego szukam. Nawet ktos kiedys robil
gpg w perlu z czystych cyferek bez tego wszystkiego. I o to pytam.
Prawdopodobienstwo istnienia perla w systemie jest wieksze niz mcrypt-a ;)

[Szymon Sokół]

Post by Hola

Post by hubert depesz lubaczewski

Post by Hola
Gdzies widzialem prosty program, ktory szyfrowal DES-em. czy ktos moze
widzial skrypt do szyfrowania wiadomosci? dowolny algorytm

Module

ale chodzilo mi o czysty perl ;)

No właśnie to *jest* czysty Perl, stąd PP (Pure Perl) w nazwach. Normalnie
takie rzeczy się robi (dla wydajności) za pomocą odwołań do skompilowanych
bibliotek (napisanych np. w C).

[ŁukaszMądrzycki]

Post by Hola

Post by hubert depesz lubaczewski

Post by Hola
Gdzies widzialem prosty program, ktory szyfrowal DES-em. czy ktos moze
widzial skrypt do szyfrowania wiadomosci? dowolny algorytm

Module

ale chodzilo mi o czysty perl ;)
wlasnie o to chodzi by user nic nie musial instalowac. nie musi byc
wygodne. moze szyfrowac ustalona ilosc blokow itp.

no to może to:

#!/usr/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
$/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)

zapisz sobie jako np rsa.pl
chmod 700 rsa.pl

i potem:
echo "ala ma kota" | ./rsa.pl -k=10001 -n=1967cb529 | uuencode /dev/stdout

powstanie takie coś:

begin 644 /dev/stdout
-`;FEX2$"KC(>I.X96@``
`
end

możesz to dać do pliku, możesz przedyktować przez telefon ;)
ktoś to wklepuje sobie w plik, a potem juz tylko:
uudecode plik | ./rsa.pl -d -k=ac363601 -n=1967cb529

I masz znowu "ala ma kota"

prawdziwa kryptografia i czysty perl - wedle życzenia
miłej zabawy ;)

uksza

p.s.
źródło:
http://cypherspace.org/adam/rsa/

[Hola]

Post by ŁukaszMądrzycki
#!/usr/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
$/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)

piekne ;)

Post by ŁukaszMądrzycki
prawdziwa kryptografia i czysty perl - wedle życzenia
miłej zabawy ;)

cos wlasnie podobnego szukalem ;)
ale nie myslalem, ze to jest az takie male. i ma jeszcze klucze
asymetryczne. Wyglada swietnie ;)