【荒らしお断り】 BBQを組み込んでる人【システム】 (419ﾚｽ)
上下前次1-新
1(11): 2006/01/19(木)05:07 ID:bDHDmwK4(1) AAS
簡単に串を排除できるBBQ。使ってる？
BBQ
外部ﾘﾝｸ: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("ＥＲＲＯＲ！","公開ＰＲＯＸＹからの投稿は受け付けていません！！(1)");
}
return 0;
}
#################################################################################################
#
#################################################################################################
293(1): 2007/09/05(水)04:25 ID:wStA3WBx(1) AAS
これどうやって規制リスト取るんですか？
niku.2ch.netってサーバがないみたい・・・
294(1): 2007/09/05(水)06:48 ID:??? AAS
>>293
>>1
295: 2007/09/05(水)17:38 ID:zWiWFNtX(1) AAS
>>294
そのままぶち込んでも動かないと思っていましたが、
上の方で場所にもよるみたいな書き込みがなされていましたね。
読んでいなくてすみません、ありがとうございます。読み直してきます。
296: 2007/10/20(土)22:37 ID:??? AAS
toshinariスクリプトにいれるときはどうすればいいのかな？
297: 2007/10/21(日)08:34 ID:CCcG4T78(1) AAS
あげ
298(1): 2007/10/30(火)04:49 ID:NYw2ypUi(1) AAS
「とかげの尻尾切り」のスクリプトって公開されてないのでしょうか？
299: 2007/11/26(月)22:19 ID:??? AAS
HOST:p2009-ipbf911funabasi.chiba.ocn.ne.jp
300: 2008/01/22(火)10:47 ID:??? AAS
まちBBSはDSBL、BBQ、BBXだけじゃなくてポートチェックとか
ほかにも何かいろいろやってるんですか？
2chよりもプロキシ対策が強いみたいですが
また弊害とかありますか
301(1): 2008/02/11(月)22:45 ID:??? AAS
BBQって#!/usr/local/bin/perl の下に追加すれば基本的に動くんですか？
あと、掲示板の場合bbs.cgiのような所に入れた方が良いんでしょうか？
302: 2008/02/12(火)05:02 ID:??? AAS
>>298
あれは恐らくApacheのモジュールだから
公開するの難しいんじゃね？
303(1): 2008/02/12(火)16:10 ID:??? AAS
>>301
そのまま組み込んでも何も意味無い。
ってかその掲示板によって色々と変更箇所があるし・・・。
とりあえず初めから読めば有力情報があるはず。
304(2): 2008/02/12(火)20:12 ID:6UTcWqNT(1) AAS
>>303
サンクス。
>>266界隈の入れてみた。
うまく動作しているかは分からないが･･･
305: 2008/02/12(火)21:59 ID:??? AAS
>>304
自分で適当なプロクシ通して試せばいいじゃないか。
306: 2008/02/12(火)22:13 ID:??? AAS
>>304
素直に32を適当なところに入れれば楽じゃないか？
そのあとにプロキシ通してみりゃいいと思うよ。
307: 2008/02/22(金)12:20 ID:??? AAS
掲示板とか置いてないけどトップページにこれ組み込んでおいてプロクシ使ってくる奴全部弾いてる きもちええわー
串使ってくる奴って大体ろくな理由じゃない奴が殆どだからな
308: 2008/02/28(木)08:09 ID:??? AAS
あれ？ これもう死んでる？ x.x.x.x.niku.2ch.netが見つからん。
309: 2008/02/28(木)09:10 ID:??? AAS
普通に索けるが。
% host -t a 125.48.89.70.niku.2ch.net.
125.48.89.70.niku.2ch.net has address 127.0.0.2
310(1): 石に口漱ぐ ◆WjL.VV.3P6 2008/03/11(火)10:33 ID:GflTN1Cz(1/2) AAS
DSBLとDNSBLを入れようと思うのですが、
これであってますか？
また、ふつうの携帯が弾かれるとか、fusianasanしてないホストが弾かれるとか、
思わぬデメリットはありますか？
#-------------------------------------------------
# DSBLシステム (公開Proxy排除機能)
#-------------------------------------------------
sub checkProxyList2 {
my $RADDR = $ENV{'REMOTE_ADDR'};
$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.list.dsbl.org";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
if ($addr eq '127.0.0.2') { &error("公開Proxyからの投稿は許可されていません"); }
}
#-------------------------------------------------
# DNSBLシステム (公開Proxy排除機能)
#-------------------------------------------------
sub checkProxyList3 {
my $RADDR = $ENV{'REMOTE_ADDR'};
$RADDR =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my $query_addr = "$4.$3.$2.$1.http.dnsbl.sorbs.net";
my $addr = join('.', unpack('C*', gethostbyname($query_addr)));
if ($addr eq '127.0.0.2') { &error("公開Proxyからの投稿は許可されていません"); }
}
--------------書き込み処理に追加----------------
# DSBLとDNSBL
&checkProxyList2;
&checkProxyList3;
311(2): 2008/03/11(火)14:09 ID:??? AAS
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)));
if ($addr =~ /^127\.0\.0\./) { &error("公開Proxyからの投稿は許可されていません"); }
}
ってやれば
&checkProxyList("list.dsbl.org");
&checkProxyList("http.dnsbl.sorbs.net");
と関数1個で済む。あと利用するモノによっては127.0.0.2じゃないのも
返す場合があったと思うので、その点もいじっておいた。
DNSBLの類も万能じゃないので、誤爆とかはありうる。
312(1): 2008/03/11(火)14:29 ID:??? AAS
>>311
俺は>>310じゃないけど
&checkProxyList("niku.2ch.net");
ってやればBBQにもなるって事でおｋ？
っつかBBQとDSBL、DNSBLって使い分けとかした方がいいの？
よく３つの違いが分からねえ
313(1): 石に口漱ぐ ◆WjL.VV.3P6 2008/03/11(火)14:52 ID:GflTN1Cz(2/2) AAS
>>311
ありがとうございます。
早速書き換えました。
上記の関数に
# BBQ DSBL DNSBL BBX
&checkProxyList("list.dsbl.org");
&checkProxyList("http.dnsbl.sorbs.net");
&checkProxyList("bbx.2ch.net");
&checkProxyList("niku.2ch.net");
で対応してみました。
314(1): 2008/03/11(火)15:01 ID:??? AAS
>>312
上半分は当たり。>>313見りゃわかるか。
使い分け、ねぇ。
何をやらかせばそれぞれのリストに入るのかを調べればいいんじゃないかな？
BBQの場合は「逆引き未設定なだけです」がリスト内にいたりする。
315: 2008/03/11(火)15:14 ID:??? AAS
>>314
ふむ。
調べてみたけどDSBLとBBQは同じものと考えちゃっていいんだ。
BBXは業者系のリストでDNSBLがスパム系のリストでおｋ？
316: ◆TWARamEjuA 2008/03/12(水)23:02 ID:??? AAS
新鮮さを求めるのなら、list.dsbl.org.を直で叩くと良いかと♪
如何せん量が甚大なんで、BBQでは鮮度が落ちてしまいます。
そして、DSBLのそのほとんどが腐乱しているっていうのも現実だったり（哀）
317: 2008/05/25(日)17:41 ID:??? AAS
BBQすげーな、書き込める串で書き込んだら3分くらいで串判定出て弾かれた
318: ◆TWARamEjuA 2008/05/25(日)20:53 ID:??? AAS
いたちごっこも佳境に入ってきていますからー♪
319(1): 2008/08/02(土)14:04 ID:MNhtkvFB(1) AAS
素人したらば管理人なんですが、どれをどこに組み込めばいいのでしょうか？
320(1): ◆TWARamEjuA 2008/08/02(土)15:43 ID:??? AAS
(･∀･)
321(1): 2008/08/02(土)20:30 ID:??? AAS
したらばはBBQ標準装備じゃなかったっけ。
322(1): 2008/08/05(火)10:52 ID:??? AAS
デフォルト設定は知らんが投稿規制のカテゴリにある。
323(1): 2008/08/05(火)19:50 ID:??? AAS
>>319
「Proxy用PORTが開いているホストからの投稿禁止」にチェック入れちゃうと投稿者が自宅WWWサーバ動かしてたりした時に書きこめないから注意な。
ProxyまわりはBBQだけで通常は十分。
324: 2008/08/07(木)03:00 ID:??? AAS
>>320-323
ありがとうございました。助かります。
325(1): 2008/09/09(火)16:26 ID:SVwRhwYM(1) AAS
>>258のPHP版きぼんぬ
326: 2008/09/09(火)18:14 ID:??? AAS
>>325
>>7じゃダメなん？
327(1): 2008/09/09(火)19:46 ID:??? AAS
掲示板じゃなくてアクセス自体をPHPで弾きたくてさ
328: 2008/09/09(火)20:02 ID:??? AAS
>>327
そんなもん>>7見りゃすぐだろ。
それも出来ないようなら諦めろ
329(1): [age] 2008/09/09(火)21:40 ID:??? AAS
<?php
function checkProxyList()
{
$raddr = explode(".", $_SERVER['REMOTE_ADDR']);
$query_addr = "$raddr[3].$raddr[2].$raddr[1].$raddr[0].niku.2ch.net";
if (gethostbyname($query_addr) == '127.0.0.2')
return 0;
}
?>
index.htmlをindex.phpにして一番上にこれ入れてみたけど串でアクセスしても素通りしてしまうなあ
cgi版はちゃんと弾かれたんだが
330: 2008/09/10(水)07:30 ID:??? AAS
>>329
そういう使い方をしたいのなら、
<?php
$raddr = explode(".", $_SERVER['REMOTE_ADDR']);
$query_addr = "$raddr[3].$raddr[2].$raddr[1].$raddr[0].niku.2ch.net";
if (gethostbyname($query_addr) == '127.0.0.2')
{
header('HTTP/1.0 403 Forbidden');
echo "こっちくんなー";
exit;
}
?>
331: 2008/09/10(水)10:48 ID:??? AAS
ありがとう ありがとう神様
332(1): 2008/10/28(火)15:48 ID:??? AAS
ライブドア、スパム書き込みの送信元IP情報を無料で公開
外部ﾘﾝｸ[html]:bb.watch.impress.co.jp
333: 2008/10/28(火)19:50 ID:??? AAS
>>332
面白そうだね。
とりあえずうちの掲示板のspamよけルーチンに、BBQより優先度高くして追加。
しばらく様子見だな。
334: 2008/10/29(水)01:19 ID:??? AAS
<?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(1): 32 2008/10/30(木)22:50 ID:??? AAS
--------
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: 2008/10/30(木)22:54 ID:??? AAS
Ruby の方 exit してないな
337: 2008/11/23(日)23:05 ID:RDwfZmq0(1) AAS
活性化あげ
338(2): 2008/11/24(月)15:08 ID:OzHleQqg(1) AAS
じゃあ俺がこの板のを参考にちょっと付け加えたやつね。
俺あんまりperl分からないからこのくらいしか出来ないｗ
って事で活性化に繋がれば。。。
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 = "ＥＲＲＯＲ！";
$cplerr2 = "公開ＰＲＯＸＹからの投稿は受け付けていません！！(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: 2008/11/30(日)13:31 ID:??? AAS
>>338
乙
340: 2008/12/01(月)00:05 ID:??? AAS
>>338
$cplrand = int(rand(2));
if ($cplrand eq "1") {
$randerr = "ＥＲＲＯＲ！";
} else {
$randerr = "公開ＰＲＯＸＹからの投稿は受け付けていません！！(1)";
}
でよくね？
変わんないかｗｗｗ
341: 2008/12/03(水)15:16 ID:ciiTQ7Kr(1) AAS
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 = "ＥＲＲＯＲ！";
} else {
$randerr = "公開ＰＲＯＸＹからの投稿は受け付けていません！！(1)";
}
if ($addr =~ /^127\.0\.0\./) { &error("$randerr"); }
}
もうこれでいいじゃん。
342: 2008/12/09(火)07:15 ID:YYHa2Wlw(1/3) AAS
bbm.2ch.net
これって使える?
必要ない?
343: 2008/12/09(火)07:19 ID:YYHa2Wlw(2/3) AAS
外部ﾘﾝｸ[php]:info.2ch.net
外部ﾘﾝｸ:mickey.mirv.net
こっちだった
344(1): 2008/12/09(火)12:59 ID:??? AAS
phpの場合は>>7のコードを貼り付けて呼び出すだけでおｋなんですか？
ipをBBQのサイトに受け渡してチェックしてもらう作業はこのコードに含まれてるんですか？
345: 2008/12/09(火)14:56 ID:YYHa2Wlw(3/3) AAS
>>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
の四パターンつけたら、
ネットカフェからアクセスできなくていい感じｗ
さらに、
HTTP/1.1 404 Not Found
にしたら、締め出した事さえ気がつかれずにいい感じｗ
346: 2008/12/09(火)14:58 ID:??? AAS
あ、答えになってなかったね。ごめんちょ<m(__)m>
347(2): 2008/12/28(日)10:40 ID:EbYNxxG3(1) AAS
なるほどね
まとめてチェック版はこんな感じだね
<?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(1): 2008/12/30(火)17:04 ID:??? AAS
list.dsbl.orgは要らなくね？あぼーんしちまったようだし
349: 2008/12/31(水)11:06 ID:??? AAS
>>348
そうなんだ？トンくす！調べもせず >>347 に載せてたわｗ
要らなくね？っていうか、引けないホスト載せるなんて最悪だから絶対要らないよね＞＜
350: 2008/12/31(水)12:34 ID:UdoD6YhC(1/2) AAS
>>347
凄いな・・・。
誰かperl版作って下さい＞＜
351(4): ◆TWARamEjuA 2008/12/31(水)13:56 ID:??? AAS
# チェックお願いしますリスト。増やしたり減らしたり適当に
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 listed?n|, $ENV{HTTP_REMOTE_ADDR}, $result =~ /^127?./ ? '' : ' no';
}
動作確認はしていません♪
352: 2008/12/31(水)22:57 ID:UdoD6YhC(2/2) AAS
printf qq|%s =>%s listed?n|, $ENV{HTTP_REMOTE_ADDR}, $result =~ /^127?./ ? '' : ' no';
が上手く動いてないんだが・・・
353: 2008/12/31(水)23:29 ID:??? AAS
679 名前：動け動けウゴウゴ２ちゃんねる[sage] 投稿日：2008/12/30(火) 13:19:46 ID:NVII90bc0
2chｽﾚ:sec2chd
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
外部ﾘﾝｸ:dsbl.org
ふむ。
680 名前：動け動けウゴウゴ２ちゃんねる[sage] 投稿日：2008/12/30(火) 14:30:49 ID:4i/n1z860
DSBLあぼん記念カキコ。ところで下のはどうよ。
Spamhausの対抗馬となるフリーのスパム対策サービスがBarracudaから登場
外部ﾘﾝｸ:sourceforge.jp
354: 2009/01/01(木)02:20 ID:??? AAS
>>351
\が化けてね？
355: 2009/01/01(木)13:09 ID:??? AAS
>>351
ってかちゃんと動作しきれてない気が・・・
356(2): 2009/01/01(木)13:31 ID:z0xGpUSQ(1/2) AAS
>>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: 2009/01/01(木)17:19 ID:??? AAS
>>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(1): 2009/01/01(木)17:25 ID:z0xGpUSQ(2/2) AAS
>>356だけどコレで動いたｗｗ
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(1): 2009/01/04(日)15:44 ID:??? AAS
変なこと聞くけど、なんで問い合わせるときIPアドレスひっくり返すの？
360: 2009/01/05(月)10:01 ID:??? AAS
業界っぽく見えるから
361: 2009/01/09(金)18:24 ID:Xsqwk5mc(1) AAS
活気が出るのを願ってあげ
362: 2009/01/11(日)20:47 ID:??? AAS
>>359
エンディアンの違いじゃね？
363(1): 2009/01/26(月)13:46 ID:g1I0uFd6(1) AAS
DSBLを使いたいのですがこれはユーザー登録しないと使えないのでしょうか？
364: 2009/01/26(月)15:18 ID:??? AAS
>>363
外部ﾘﾝｸ:dsbl.org なら死亡したっぽい
365: ◆.CzKQna1OU 2009/03/08(日)21:32 ID:??? AAS
保守
366(1): 2009/03/28(土)16:36 ID:xAqQTRt0(1) AAS
DSBL死んだのか…どうしよ。
367: 2009/03/29(日)00:37 ID:Vi6NYFfG(1) AAS
>>366
BBQとDNSBLで事足りるでしょ
368(1): 2009/04/15(水)22:54 ID:/QsL8z0W(1) AAS
################################################################
#---------------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: 2009/04/16(木)04:50 ID:z2gtEA17(1) AAS
>>368
作動するなら問題ないでしょ。
過去レス見ればさらによし。
370: 2009/07/31(金)11:32 ID:RnBdDoGz(1) AAS
そろそろage
371: 2010/01/04(月)16:59 ID:t1azOvnf(1) AAS
age
372: 2010/03/03(水)02:34 ID:G7dFuFeQ(1) AAS
今回bbq組み込んでる人はスクリプト遅くなった？
373(1): 2010/03/03(水)03:48 ID:??? AAS
ちゃんとタイムアウト使ってれば大して重くならないんじゃないかな
374: 2010/03/04(木)04:06 ID:??? AAS
>>373
その辺kwsk
375: 2010/03/05(金)01:59 ID:??? AAS
>>51のリンク先参考にすればいいよ。
376: 2010/03/22(月)04:35 ID:??? AAS
BBQとDNSBLを合体させた最強のプログラムはないものか
ちなみにPHPで
377: 2010/03/22(月)07:14 ID:??? AAS
揚げ足取りたい訳じゃないんだが
DNSBLは仕組みの名前で、BBQはそれを使った2ちゃん用ブラックリストじゃないの？
だから合体させたも何も、BBQとそれ以外のDNSBLに同時に問い合わせるようにするだけじゃなくて？
378: 2010/04/15(木)12:37 ID:??? AAS
PHPです。
function checkProxyList($msg = '')
{
# 荒らしお断りシステム
# BBQ 外部ﾘﾝｸ[php]:info.2ch.net
//チェックお願いしますリスト。増やしたり減らしたり適当に
$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: 2010/04/25(日)00:22 ID:??? AAS
403 とか 404 返さずに広告張ったページにとばせばいいのに・・・って
エラーページでそれくらいみなやってるか
380: 2010/04/26(月)04:48 ID:??? AAS
スパム系は、投稿するサイトを自動で探し出してリストを作るから403や404にして
「そんなのネーよ！」で、拾われないようにするんだと思う。
広告張ったページであろうとなかろうと、スパムは容赦なく訪れてマシンガンのようにやってくるし、
そのぶんサーバーに不可は掛かるし、スパムは広告なんて見ないだろうし。
381: 2010/08/08(日)17:11 ID:??? AAS
おいおい
382: 2010/08/27(金)10:08 ID:??? AAS
スパム投稿と判断された奴にＧＥＮＯウイルスでも踏ませたらどうだい
383(2): [age] 2010/08/27(金)13:58 ID:??? AAS
【超絶基地外１２歳荒らしの判明しているコテハン】
plus01 ★ 管理人 ★ πナップル ★ きうい ★ mango+ ★ Fine ★
YV/TV ◆.Y./V..TV.
ｼﾞｴﾝ ◆2.14..sI1E
ネックス ◆Nex/RZxaHI
いざこざ ◆Nex/RZxaHI
いざこざ ◆Iza..hlnPI
いざ・・ ◆Iza..hlnPI
FuLL！ ◆FuLL/FW.EQ
1206 ◆1206ePaU1M
ふぁー ◆fah/7D.Rkk
ふぁー 返し ◆fah/7D.Rkk
６分のろーぷら ◆LowPrice/6
労ぷら椅子 ◆LowPrice/6
【livevenus:20】 ◆LowPrice/6
6分のろーぷら ◆MAyUzEEE/E
6分のろーぷら ◆MYU/e0Imzi1E
6分のろーぷら ◆/UeVRo.Tv.
リック◆Lick/SPaQs
連投すみません ◆Lick/SPaQs
うずまき ◆vzqJXqubSg
リック ◆vzqJXqubSg
ナマコぞうすい ◆WgQ1EvIdds
【判明しているリモホ】
p6073-ipbffx01marunouchi.tokyo.ocn.ne.jp
z232163.dynamic.ppp.asahi-net.or.jp
w62.jp-t.ne.jp
cw43.razil.jp
384: 2010/09/06(月)07:30 ID:??? AAS
>>383
お前初質板から延々と大量にコピペ貼ってるよな
385: ◆xs.m./NkkNFp 2010/09/11(土)18:43 ID:??? AAS
>>383
ipngn\d+marunouchi.tokyo.ocn.ne.jp
\.dynamic.ppp.asahi-net.or.jp
\.jp-t.ne.jp
\.razi.jp
386: [age] 2010/09/29(水)18:05 ID:??? AAS
PerlでNet::DNSモジュールが使えない場合でタイムアウトする処理って出来ないですか？
387: 2010/10/10(日)17:20 ID:o7qY/lMG(1) AAS
上尾
388: 2010/11/15(月)09:15 ID:SKdhU9Bq(1) AAS
保守
389: ◆0xsgfhHz92yj 2011/02/26(土)05:54 ID:wZo1jtnb(1) AAS
保安点検
390: 2011/03/26(土)16:36 ID:O7/mMAoA(1) AAS
あgey
391(2): 2011/06/22(水)02:12 ID:wvXhjcbF(1) AAS
串刺してるやつとネットカフェからの投稿者だけ網にかけたい場合は、BBQだと大げさすぎるのかな？
善良者も巻き込まれてるみたいで投稿数が激減してしまったんだが。
392: 2011/06/23(木)12:44 ID:??? AAS
>>391
串じゃなくても海外のプロバイダからのアクセスがはじかれる
あとは、焼かれた携帯からもはじかれるな
あと、ほんとにたまに日本の大手のプロバイダが焼かれてアクセスはじかれる場合もある
うーん、どうなんだろうか
大手プロバイダのIPアドレスで何年も昔に焼かれた奴も放置されてる場合もあるしなー
393(1): 2011/06/24(金)12:58 ID:??? AAS
BBQ見てるだけなら焼かれ携帯は通るような。
善良者さんのIP or IPレンジはホワイトリスト化して素通りにしてあげればいいと思うよ。
生IPでやんちゃするのもいるわけだし状況に合わせて運用。
394: 2011/06/24(金)14:26 ID:??? AAS
>>393
あっそうだな
携帯は通るな
勘違いしてた
395: 391 2011/06/24(金)16:41 ID:??? AAS
れす?
まあ時間が立てば善良者だけの掲示板に育つわけだから、ある程度の犠牲は仕方ないか・・・
396: 2011/07/25(月)18:06 ID:??? AAS
Wordpress
<?php
/*
Plugin Name: 荒らしお断りシステム：BBQ
Plugin URI: プラグインの配布のURL
Description: Open Proxy（公開プロキシ）サーバ等のIPアドレスの国産のブラックリスト
Version: 0.0.1
Author: ID:kplGY7FD(2chの人)
Author URI: 作者のURL
*/
add_action( 'login_form', 'checkProxyList' ); //ログインフォーム
//buddypress ログインフォーム サイドバー
add_action( 'bp_sidebar_login_form', 'checkProxyList' );
add_action( 'register_form', 'checkProxyList' );
//add_action( 'comment_form', 'checkProxyList' );
add_action( 'signup_extra_fields', 'checkProxyList' );
//buddypress
add_action('bp_after_signup_profile_fields', 'checkProxyList');
function checkProxyList($msg = '')
{ # 荒らしお断りシステム BBQ 外部ﾘﾝｸ[php]:info.2ch.net
//チェックお願いしますリスト。増やしたり減らしたり適当に
$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 />";
// @header("HTTP/1.0 403 Forbidden"); exit;//とか
} } }
?>
397: 2011/10/03(月)21:52 ID:??? AAS
あ
398: 2011/10/25(火)20:35 ID:??? AAS
透明牌
399: 2012/02/22(水)03:32 ID:??? AAS
ほしゅ
400: 2012/03/01(木)22:15 ID:9am3G02P(1) AAS
近頃、基地外によくBBQサーバ落とされるみたいだしなんらかのタイムアウト処理は入れたほうがいいな
PerlだったらNet::DNSあたりでPHPだったNet/DNSか
401: 2012/03/09(金)20:38 ID:draL2rv2(1) AAS
2chが閉鎖する閉鎖するって言ってるけどBBQサーバはどうなるんだろう
402: 2012/04/22(日)17:41 ID:VxcqIDpO(1) AAS
BBQシステムは残ってほしいよなあ。
最悪仕様やプログラムを公開してほしい。
403: 2013/02/08(金)02:44 ID:??? AAS
KDDI利用のサーバーは、注意。
遮断された模様。
bind.dion.ne.jp can't find **.**.**.**.niku.2ch.net: Non-existent host/domain
404: 2013/03/26(火)17:51 ID:??? AAS
5月31日でスパムちゃんぷるー終了だって
405: 2013/12/20(金)20:35 ID:CyxNd/Yt(1) AAS
例えばブラウザで串設定してこのスレ開くとボボンハウスに飛ばされ
また専ブラで同じ串設定して書き込むと書き込み失敗するのに
BBQ判定は127.0.0.1で返ってくるのは何故でしょう？
ちなみに使った串はsoftbank221111054231.bbtec.net
ポート80です。
406: 2013/12/21(土)14:15 ID:??? AAS
他の串で>>358やってみたけど全スルーでした
要するに完全じゃないのでこれ以外に定番の基本的な串チェックかまさないとダメという事みたいですね
スレ汚しすみませんでした
407: 2013/12/31(火)23:56 ID:??? AAS
ＯＣＮもお断りされたのか
*** nv-kc151.ocn.ad.jp can't find niku.2ch.net: Non-existent host/domain
408(1): 2014/05/12(月)10:49 ID:Bgb4yq+U(1) AAS
最近BBQめっちゃ重いけど、まだ普通に使ってる人いる？
409: 2014/05/13(火)21:03 ID:6sATXZfc(1) AAS
反応がめっちゃ遅くなったよね。
ホームページの掲示板で荒らし対策に使ってるので普通に使えるように
してもらいたい。
410: 408 2014/05/16(金)10:26 ID:EKyPgCvL(1) AAS
やっぱどこでもそうなのかな…
というか、遅いどころか正常にチェックしてないっぽく、何通してもスルーしてくれる。
もう外部アクセスできなくなったのかな。
411: 2014/05/16(金)20:37 ID:??? AAS
そうだね。スルーしちゃってるね
このまま使えなくなっちゃうのかなー
非常に重宝していたのだが
412: 2014/06/25(水)22:50 ID:??? AAS
どうもsc対策でさくらサーバはじいて外部参照できなくしてるみたいね。
長らく使わせてもらったお礼代わりに、今代替して使ってるDNSBLを記しておく。
all.rbl.jp
bl.spamcop.net
zen.spamhaus.org（リストの種類によって返り値が127.0.2-11で可変するので注意）
以上。
ではさようなら。
413: 2014/08/21(木)20:22 ID:??? AAS
niku.2ch.net正引きもできなくなってるじゃん・・・
414: 2015/02/16(月)19:38 ID:??? AAS
糞マンゴーの悪政の影響でBBQは外部参照禁止になりました
415: 2015/05/16(土)11:59 ID:??? AAS
使えるようになったと思ったらまた使えなくなった
代わりになるものないのかな
416: 2017/12/30(土)13:47 ID:YhlYw6jg(1) AAS
誰でも簡単にネットで稼げる方法など
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
QSCHX3VEAA
417: 2018/02/20(火)04:58 ID:??? AAS
☆ 日本の、改憲を行いましょう。現在、衆議員と参議院の
両院で、改憲議員が３分の２を超えております。
『憲法改正国民投票法』、でググってみてください。国会の発議は
すでに可能です。平和は勝ち取るものです。お願い致します。☆☆
418: 2018/06/20(水)22:51 ID:UnZq46Ab(1) AAS
プログラミングを誰でも習得できる方法は、「前場アキドルのプログラミングマスター方法」というブログで見られるらしいよ。ネットで調べると見られるらしいです。
82PAB
419: 2023/09/26(火)17:43 ID:??? AAS
なんや、それはちょっと違うやろ
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.030s