5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

【荒らしお断り】 BBQを組み込んでる人【システム】

1 :nobodyさん:2006/01/19(木) 05:07:16 ID:bDHDmwK4
簡単に串を排除できるBBQ。使ってる?

BBQ
http://bbq.uso800.net/


組み込み例

#################################################################################################
#
#################################################################################################
sub checkProxyList
{
my $RADDR = $ENV{'REMOTE_ADDR'};

$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.niku.2ch.net";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
if ($addr eq '127.0.0.2')
{
DispError("ERROR!","公開PROXYからの投稿は受け付けていません!!(1)");
}
return 0;
}
#################################################################################################
#
#################################################################################################


331 :nobodyさん:2008/09/10(水) 10:48:43 ID:???
ありがとう ありがとう神様

332 :nobodyさん:2008/10/28(火) 15:48:15 ID:???
ライブドア、スパム書き込みの送信元IP情報を無料で公開
http://bb.watch.impress.co.jp/cda/news/23637.html

333 :nobodyさん:2008/10/28(火) 19:50:49 ID:???
>>332
面白そうだね。
とりあえずうちの掲示板のspamよけルーチンに、BBQより優先度高くして追加。
しばらく様子見だな。

334 :nobodyさん:2008/10/29(水) 01:19:05 ID:???
<?php
//$CHECK_IP = "192.0.2.1"; // スパム判定されるIP
$CHECK_IP = "207.46.197.32"; // されないIP(microsoft.com)

if(preg_match("/(\d+).(\d+).(\d+).(\d+)/",$CHECK_IP,$ip)){
  $b = $ip[4] . ".". $ip[3] . ".". $ip[2] . ".". $ip[1];
  $c[] = gethostbyname($b . ".dnsbl.spam-champuru.livedoor.com");
  if($c[0] == "127.0.0.2"){
    echo $CHECK_IP . " ==> すぱむ";
  }else{
    echo $CHECK_IP . " ==> もっけー";
  }
}
?>

mixiで見っけた

335 :32:2008/10/30(木) 22:50:55 ID:??? ?PLT(54321)
--------
Perl:
if (gethostbyname(join(".", reverse(split(/\./, $ENV{"REMOTE_ADDR"}))) . ".niku.2ch.net") eq "\x7f\0\0\2") { syswrite(stdout, "Status: 403\xd\xa\xd\xa"); exit; }
--------
PHP:
<?php if ((gethostbyname(implode(".", array_reverse(explode(".", $_SERVER["REMOTE_ADDR"]))) . ".niku.2ch.net")) == "127.0.0.2") { header("HTTP/1.0 403 Forbidden"); exit; } ?>
--------
Ruby:
require "socket"; if (Socket.gethostbyname(ENV["REMOTE_ADDR"].split(".").reverse.join(".").concat(".niku.2ch.net"))[3].eql?("\x7f\0\0\2") rescue nil) then print "Status: 403\xd\xa\xd\xa" end
--------

.niku.2ch.net を .dnsbl.spam-champuru.livedoor.com にすれば沖縄料理対応

336 :nobodyさん:2008/10/30(木) 22:54:04 ID:??? ?PLT(54321)
Ruby の方 exit してないな

337 :nobodyさん:2008/11/23(日) 23:05:07 ID:RDwfZmq0
活性化あげ

338 :nobodyさん:2008/11/24(月) 15:08:39 ID:OzHleQqg
じゃあ俺がこの板のを参考にちょっと付け加えたやつね。
俺あんまりperl分からないからこのくらいしか出来ないw
って事で活性化に繋がれば。。。

sub checkProxyList {
my $server = shift;

my $RADDR = $ENV{'REMOTE_ADDR'};

$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.$server";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));

$cplerr1 = "ERROR!";
$cplerr2 = "公開PROXYからの投稿は受け付けていません!!(1)";
$cplrand = int(rand(2));
if ($cplrand eq "0") { $randerr = $cplerr1; }
elsif ($cplrand eq "1") { $randerr = $cplerr2; }

if ($addr =~ /^127\.0\.0\./) { &error("$randerr"); }
}

# BBQ
&checkProxyList("niku.2ch.net");
# DSBL
&checkProxyList("list.dsbl.org");
# BBX
&checkProxyList("bbx.2ch.net");
# DNSBL
&checkProxyList("http.dnsbl.sorbs.net");
# スパムちゃんぷるーDNSBL
&checkProxyList("dnsbl.spam-champuru.livedoor.com");

339 :nobodyさん:2008/11/30(日) 13:31:45 ID:???
>>338


340 :nobodyさん:2008/12/01(月) 00:05:02 ID:???
>>338

$cplrand = int(rand(2));
if ($cplrand eq "1") {
$randerr = "ERROR!";
} else {
$randerr = "公開PROXYからの投稿は受け付けていません!!(1)";
}
でよくね?

変わんないかwww

341 :nobodyさん:2008/12/03(水) 15:16:44 ID:ciiTQ7Kr
sub checkProxyList {
my $server = shift;

my $addr = join('.', unpack('C*', gethostbyname(join('.', reverse(split(/\./, $ENV{'REMOTE_ADDR'}))) . '.$server')));

$cplrand = int(rand(2));
if ($cplrand eq "1") {
$randerr = "ERROR!";
} else {
$randerr = "公開PROXYからの投稿は受け付けていません!!(1)";
}

if ($addr =~ /^127\.0\.0\./) { &error("$randerr"); }
}

もうこれでいいじゃん。

342 :nobodyさん:2008/12/09(火) 07:15:49 ID:YYHa2Wlw
bbm.2ch.net
これって使える?
必要ない?

343 :nobodyさん:2008/12/09(火) 07:19:44 ID:YYHa2Wlw
ttp://info.2ch.net/wiki/index.php?BBM2.0
ttp://mickey.mirv.net/mochi/

こっちだった

344 :nobodyさん:2008/12/09(火) 12:59:15 ID:???
phpの場合は>>7のコードを貼り付けて呼び出すだけでおkなんですか?
ipをBBQのサイトに受け渡してチェックしてもらう作業はこのコードに含まれてるんですか?


345 :nobodyさん:2008/12/09(火) 14:56:06 ID:YYHa2Wlw
>>344
おれは>>335を使わせてもらった。

<?php if ((gethostbyname(implode(".", array_reverse(explode(".", $_SERVER["REMOTE_ADDR"]))) . ".niku.2ch.net")) == "127.0.0.2") { header("HTTP/1.0 403 Forbidden"); exit; } ?>

BBQの部分を

.niku.2ch.net
.list.dsbl.org
.http.dnsbl.sorbs.net
.bbx.2ch.net


の四パターンつけたら、
ネットカフェからアクセスできなくていい感じw

さらに、
HTTP/1.1 404 Not Found
にしたら、締め出した事さえ気がつかれずにいい感じw



346 :nobodyさん:2008/12/09(火) 14:58:44 ID:???
あ、答えになってなかったね。ごめんちょ<m(__)m>

347 :nobodyさん:2008/12/28(日) 10:40:14 ID:EbYNxxG3
なるほどね
まとめてチェック版はこんな感じだね

<?php
//チェックお願いしますリスト。増やしたり減らしたり適当に
$DNSBL_list = array('.niku.2ch.net' ,'.list.dsbl.org' ,'.http.dnsbl.sorbs.net' ,'.bbx.2ch.net');
foreach($DNSBL_list as $DNSBL_listV){
if ((gethostbyname(implode(".", array_reverse(explode(".", $_SERVER["REMOTE_ADDR"]))) . "{$DNSBL_listV}")) == "127.0.0.2") {
//スパム判定に引っかかった時の処理 ※適当に変更
echo "{$_SERVER["REMOTE_ADDR"]}"." → {$DNSBL_listV} でひっかかりました><<br />";
// header("HTTP/1.0 403 Forbidden"); exit;//とか
}else{//スパム判定に引っかからなかった時の処理 ※適当に変更
echo "{$DNSBL_listV} 合格よ<br />";
}
}
?>

348 :nobodyさん:2008/12/30(火) 17:04:21 ID:???
list.dsbl.orgは要らなくね?あぼーんしちまったようだし

349 :nobodyさん:2008/12/31(水) 11:06:40 ID:???
>>348
そうなんだ?トンくす!調べもせず >>347 に載せてたわw
要らなくね?っていうか、引けないホスト載せるなんて最悪だから絶対要らないよね><

350 :nobodyさん:2008/12/31(水) 12:34:29 ID:UdoD6YhC
>>347
凄いな・・・。
誰かperl版作って下さい><

351 : ◆TWARamEjuA :2008/12/31(水) 13:56:28 ID:???
# チェックお願いしますリスト。増やしたり減らしたり適当に
my @DNSBL_list = qw|niku.2ch.net http.dnsbl.sorbs.net bbx.2ch.net all.rbl.jp zen.spamhaus.org b.barracudacentral.org|;

foreach my $DNSBL_host (@DNSBL_list){
my $result = gethostbyname join ".", reverse (split '.', $ENV{HTTP_REMOTE_ADDR}) , $DNSBL_host;
if ($result =~ /^127./){
# スパム判定に引っかかった時の処理 ※適当に変更
}
else {
# スパム判定に引っかからなかった時の処理 ※適当に変更
}
# 例
printf qq|%s =>%s listedn|, $ENV{HTTP_REMOTE_ADDR}, $result =~ /^127./ ? '' : ' no';
}

動作確認はしていません♪

352 :nobodyさん:2008/12/31(水) 22:57:42 ID:UdoD6YhC
printf qq|%s =>%s listedn|, $ENV{HTTP_REMOTE_ADDR}, $result =~ /^127./ ? '' : ' no';
が上手く動いてないんだが・・・

353 :nobodyさん:2008/12/31(水) 23:29:36 ID:???
679 名前:動け動けウゴウゴ2ちゃんねる[sage] 投稿日:2008/12/30(火) 13:19:46 ID:NVII90bc0
http://qb5.2ch.net/test/read.cgi/sec2chd/1230563347/

47 名前:名無しの報告 投稿日:2008/12/30(火) 09:41:28 ID:wxypddc2P
あれ?DSBLは今BBQ判定スルーしてませんでしたっけ??

48 名前:焼プリン ★ 投稿日:2008/12/30(火) 09:43:16 ID:???0
>>47
おぉー。してるの?してるのかもしれない…。

50 名前:名無しの報告 投稿日:2008/12/30(火) 10:01:59 ID:wxypddc2P
>>48
確か某掲示板でそのような投稿を見た気がしますです
ソースの確認は今ちょっと出先かつ携帯なので
ほぼ不可能なのですが;;

51 名前:焼プリン ★ 投稿日:2008/12/30(火) 11:39:55 ID:???0
>>50
DSBLそのものがなくなってるっぽい(;・-・)

52 名前:名無しの報告 投稿日:2008/12/30(火) 11:44:04 ID:fpj1OQhA0
http://dsbl.org/
ふむ。


680 名前:動け動けウゴウゴ2ちゃんねる[sage] 投稿日:2008/12/30(火) 14:30:49 ID:4i/n1z860
DSBLあぼん記念カキコ。ところで下のはどうよ。

Spamhausの対抗馬となるフリーのスパム対策サービスがBarracudaから登場
http://sourceforge.jp/magazine/08/12/22/0121248

354 :nobodyさん:2009/01/01(木) 02:20:51 ID:???
>>351
\が化けてね?

355 :nobodyさん:2009/01/01(木) 13:09:08 ID:???
>>351
ってかちゃんと動作しきれてない気が・・・

356 :nobodyさん:2009/01/01(木) 13:31:33 ID:z0xGpUSQ
>>351
# チェックお願いしますリスト。増やしたり減らしたり適当に
my @DNSBL_list = qw|http.dnsbl.sorbs.net niku.2ch.net bbx.2ch.net all.rbl.jp zen.spamhaus.org b.barracudacentral.org|;
my $RADDR = $ENV{'REMOTE_ADDR'};

foreach my $DNSBL_host (@DNSBL_list){

$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.$DNSBL_host";
my $result = join('.', unpack('C*', gethostbyname($query_addr)));

if ($result =~ /^127\.0\.0\./){
# スパム判定に引っかかった時の処理 ※適当に変更
# 例
printf qq|%s =>%s listed<br>\n|, $DNSBL_host, $result =~ /^127\.0\.0\./ ? '' : ' yes';
} else {
# スパム判定に引っかからなかった時の処理 ※適当に変更
# 例
printf qq|%s =>%s listed<br>\n|, $DNSBL_host, $result =~ /^127\.0\.0\./ ? '' : ' no';
}
}

これで動いたけどスパム判定に引っかかったときの処理が表示されない・・・

357 :nobodyさん:2009/01/01(木) 17:19:44 ID:???
>>351をベースに>>356の修正ポイントを反映+α。

my $IP = $ENV{HTTP_REMOTE_ADDR};
my @DNSBL_list = qw|niku.2ch.net http.dnsbl.sorbs.net bbx.2ch.net all.rbl.jp zen.spamhaus.org b.barracudacentral.org|;

for my $DNSBL_host (@DNSBL_list){
my $host = join ".", reverse (split /\Q.\E/, $IP) , $DNSBL_host;
my $result = join ".", unpack 'C*', gethostbyname $host;
if ($result =~ /^127\./){
# スパム判定に引っかかった時の処理 ※適当に変更
printf qq|%s =>yes listed %s\n|, $IP, $DNSBL_host;
}
else {
# スパム判定に引っかからなかった時の処理 ※適当に変更
printf qq|%s =>no listed %s\n|, $IP, $DNSBL_host;
}
}

% env HTTP_REMOTE_ADDR=125.208.217.212 perl hoge.pl
125.208.217.212 =>no listed niku.2ch.net
125.208.217.212 =>no listed http.dnsbl.sorbs.net
125.208.217.212 =>no listed bbx.2ch.net
125.208.217.212 =>no listed all.rbl.jp
125.208.217.212 =>yes listed zen.spamhaus.org
125.208.217.212 =>yes listed b.barracudacentral.org


358 :nobodyさん:2009/01/01(木) 17:25:47 ID:z0xGpUSQ
>>356だけどコレで動いたww
my @DNSBL_list = ('http.dnsbl.sorbs.net','niku.2ch.net','bbx.2ch.net','all.rbl.jp','zen.spamhaus.org','b.barracudacentral.org');
my $RADDR = $ENV{'REMOTE_ADDR'};

foreach my $DNSBL_host (@DNSBL_list){

$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.$DNSBL_host";
my $result = join('.', unpack('C*', gethostbyname($query_addr)));

if ($result =~ /^127\.0\.0\./){
# スパム判定に引っかかった時の処理 ※適当に変更
# 例
printf "%s =>%s listed<br>\n", $DNSBL_host, $result =~ /^127\.0\.0\.$/ ? '' : ' yes';
} else {
# スパム判定に引っかからなかった時の処理 ※適当に変更
# 例
printf "%s =>%s listed<br>\n", $DNSBL_host, $result =~ /^127\.0\.0\.$/ ? '' : ' no';
}
}

359 :nobodyさん:2009/01/04(日) 15:44:18 ID:???
変なこと聞くけど、なんで問い合わせるときIPアドレスひっくり返すの?

360 :nobodyさん:2009/01/05(月) 10:01:03 ID:???
業界っぽく見えるから

361 :nobodyさん:2009/01/09(金) 18:24:53 ID:Xsqwk5mc
活気が出るのを願ってあげ

362 :nobodyさん:2009/01/11(日) 20:47:12 ID:???
>>359
エンディアンの違いじゃね?

363 :nobodyさん:2009/01/26(月) 13:46:52 ID:g1I0uFd6
DSBLを使いたいのですがこれはユーザー登録しないと使えないのでしょうか?

364 :nobodyさん:2009/01/26(月) 15:18:05 ID:???
>>363
http://dsbl.org/ なら死亡したっぽい

365 : ◆.CzKQna1OU :2009/03/08(日) 21:32:29 ID:???
保守

366 :nobodyさん:2009/03/28(土) 16:36:12 ID:xAqQTRt0
DSBL死んだのか…どうしよ。

367 :nobodyさん:2009/03/29(日) 00:37:32 ID:Vi6NYFfG
>>366
BBQとDNSBLで事足りるでしょ

368 :nobodyさん:2009/04/15(水) 22:54:53 ID:/QsL8z0W
################################################################
#---------------BBQシステム (公開Proxy排除機能)----------------#
################################################################
sub checkProxyList {
my $RADDR = $ENV{'REMOTE_ADDR'};
$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.niku.2ch.net";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
if ($addr eq '127.0.0.2') { &error("Proxy感知!"); }
}


これでも作動するから平気だよね?

369 :nobodyさん:2009/04/16(木) 04:50:16 ID:z2gtEA17
>>368
作動するなら問題ないでしょ。
過去レス見ればさらによし。

370 :nobodyさん:2009/07/31(金) 11:32:30 ID:RnBdDoGz
そろそろage

371 :nobodyさん:2010/01/04(月) 16:59:00 ID:t1azOvnf
age

372 :nobodyさん:2010/03/03(水) 02:34:43 ID:G7dFuFeQ
今回bbq組み込んでる人はスクリプト遅くなった?

373 :nobodyさん:2010/03/03(水) 03:48:00 ID:???
ちゃんとタイムアウト使ってれば大して重くならないんじゃないかな

374 :nobodyさん:2010/03/04(木) 04:06:16 ID:???
>>373
その辺kwsk

375 :nobodyさん:2010/03/05(金) 01:59:10 ID:???
>>51のリンク先参考にすればいいよ。

376 :nobodyさん:2010/03/22(月) 04:35:52 ID:???
BBQとDNSBLを合体させた最強のプログラムはないものか
ちなみにPHPで

377 :nobodyさん:2010/03/22(月) 07:14:30 ID:???
揚げ足取りたい訳じゃないんだが
DNSBLは仕組みの名前で、BBQはそれを使った2ちゃん用ブラックリストじゃないの?
だから合体させたも何も、BBQとそれ以外のDNSBLに同時に問い合わせるようにするだけじゃなくて?

378 :nobodyさん:2010/04/15(木) 12:37:12 ID:???
PHPです。

function checkProxyList($msg = '')
{
# 荒らしお断りシステム
# BBQ http://info.2ch.net/wiki/index.php?BBQ
//チェックお願いしますリスト。増やしたり減らしたり適当に
$DNSBL_list = array('.niku.2ch.net' ,
'.dnsbl.spam-champuru.livedoor.com' ,
'.http.dnsbl.sorbs.net' ,
'.bbx.2ch.net');

foreach($DNSBL_list as $DNSBL_listV){
if ((gethostbyname(implode(".", array_reverse(explode(".", $_SERVER["REMOTE_ADDR"]))) . "{$DNSBL_listV}")) == "127.0.0.2") {
//スパム判定に引っかかった時の処理
header("HTTP/1.0 403 Forbidden"); exit;//とか
// }else{//スパム判定に引っかからなかった時の処理 ※適当に変更
// echo "{$DNSBL_listV} 合格よ<br />";
}
}
}



使いたいとこで、下記のように呼び出します
checkProxyList();

379 :nobodyさん:2010/04/25(日) 00:22:54 ID:???
403 とか 404 返さずに広告張ったページにとばせばいいのに・・・って
エラーページでそれくらいみなやってるか

380 :nobodyさん:2010/04/26(月) 04:48:11 ID:???
スパム系は、投稿するサイトを自動で探し出してリストを作るから403や404にして
「そんなのネーよ!」で、拾われないようにするんだと思う。
広告張ったページであろうとなかろうと、スパムは容赦なく訪れてマシンガンのようにやってくるし、
そのぶんサーバーに不可は掛かるし、スパムは広告なんて見ないだろうし。

84 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.02 2018/11/22 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)