ぜろちゃんねるスクリプトを改造するスレ

819 ：名無しさん＠ぜろちゃんねる：2006/11/26(日) 10:56:56 ID:???0

>>817
IDというのはHOST+その日の数字（2006/11/26）を組み合わせて
作るものですので２chなどでも共通のIDになります。
ですから違うIDにはできませんよ。

820 ：7M. ◆dq7M./4Uw. ：2006/11/26(日) 16:51:46 ID:???0

ん？
HOST+日にち+板アカウントで生成してるんじゃなかったっけ。
まぁスレッドごとにID生成したいなら生成の時にスレッドキーも放り込んでやればいいんじゃないかな。

821 ：名無しさん＠ぜろちゃんねる：2006/11/26(日) 17:12:38 ID:???0

こんな感じか？
スレッドキーからsaltを作成して、一回余計にcryptかける。
やってることは単純だが、実装するとなるとめんどい。

galadriel.pl
sub MakeID 内

my ($server,$column) = @_;
↓
my ($server,$column,$key) = @_;

$ret = substr(crypt(crypt($str,$times[5]),$times[3]+31),$column);
↓
my @slt = ('.','/','0'..'9','A'..'Z','a'..'z');
my $saltbykey = $slt[$key & 63] . $slt[($key & 4095) >> 6];
$ret = substr(crypt(crypt(crypt($str,$times[5]),$times[3]+31),$saltbykey),$column);

vara.pl
137行目あたり

$id = $oConv->MakeID($oSys->Get('SERVER'),8);
↓
$id = $oConv->MakeID($oSys->Get('SERVER'),8,$oSys->Get('KEY'));