ぜろちゃんねるスパム対策考案

3 ：名無しさん＠ぜろちゃんねる：2010/05/07(金) 21:28:10 ID:jm9TqDgE0

スパムちゃんぷるー

# BBQ+スパムちゃんぷるーチェック(※ただし携帯ドメインは除く)
if ( $host !~ /\.(?:docomo|ezweb|vodafone|jp-[a-z]|softbank|prin)\.ne\.jp$/ ){
my $addr = join('.', reverse( split(/\./, $ENV{'REMOTE_ADDR'} )));
my @dnsbls = ('niku.2ch.net','dnsbl.spam-champuru.livedoor.com');
foreach my $dnsbl (@dnsbls) {
return ( 997 ) if ( join('.', unpack('C*', gethostbyname("$addr.$dnsbl"))) eq '127.0.0.2' );
}
}

4 ：名無しさん＠ぜろちゃんねる：2010/05/07(金) 21:29:35 ID:jm9TqDgE0

海外ホスト規制を利用したままp2を書き込めるようにする

vara.pl「JPホスト以外規制」のところ、

if ($oSET->Equal('BBS_JP_CHECK','checked')){
my $f = 0;
my @hosts = qw(.jp .JP p2.2ch.net .bbtec.net .nifty.com);
foreach (@hosts){
if(substr($host, -1 * length($_)) eq $_){
$f = 1; last;
}
}
if(!$f){return 207;}
}

5 ：名無しさん＠ぜろちゃんねる：2010/05/07(金) 21:31:19 ID:jm9TqDgE0

2バイト文字を含まない投稿を拒否する

vara.plのsub NormalizationContents関数の中に以下を追加

# ASCIIのみ
if ($text =~ /^[\x00-\x7F]*$/){ return 160; }


info/errmsg.cgiに以下を追加
160<>広告規制<>半角英数字のみの書き込みは出来ません。