17 すづき
>>15
そこらへんに2Chの酉ツールが転がってるでしょ?
あれ使えばいいじゃん。
おんなじDES暗号プログラムなんだから。
Saltを『Z2』に設定して、出力された結果の2桁目から4桁が爺酉だよ。
たとえば、2Ch酉で検索して、Salt設定し直して出力されたものが
◆ABCDEFGHIJ
なら、爺酉は
◆BCDE
になるって事です。
『不思議な国のトリッパー』ってツールが使い易いかな?
ソースも公開されてるからプログラムの勉強にもなりますよ。
そこらへんに2Chの酉ツールが転がってるでしょ?
あれ使えばいいじゃん。
おんなじDES暗号プログラムなんだから。
Saltを『Z2』に設定して、出力された結果の2桁目から4桁が爺酉だよ。
たとえば、2Ch酉で検索して、Salt設定し直して出力されたものが
◆ABCDEFGHIJ
なら、爺酉は
◆BCDE
になるって事です。
『不思議な国のトリッパー』ってツールが使い易いかな?
ソースも公開されてるからプログラムの勉強にもなりますよ。
(S)
18 すづき
参考になるかどうかだけど、酉の生成プログラムを置いときます。
<source lang="perl">
$tripkey = "#istrip";
# password(#)
$tripkey = substr($tripkey,1);
$salt = substr($tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\]^_`/ABCDEFGabcdef/;
$trip = crypt($tripkey,$salt);
$trip = substr($trip,-10);
$trip = '◆'.$trip; print "$trip";
</source>
「禁止tag排除」
<source lang="perl">
$tripkey = "#istrip";
# password(#)
$tripkey = substr($tripkey,1);
$salt = substr($tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\]^_`/ABCDEFGabcdef/;
$trip = crypt($tripkey,$salt);
$trip = substr($trip,-10);
$trip = '◆'.$trip; print "$trip";
</source>
「禁止tag排除」
(S)