13/04/28 16:33:05.11 SEMu1WLY0
Boo2008(旧名Boo80)というスクリプトで串を規制するプロジェクトです。
●過去スレ
【協力願】Boo80で串を食べませんか？
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo80で串を食べませんか？ その２
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo80で串を食べませんか？ その３
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その４
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その５
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その6
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その7
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その8
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その9
ｽﾚﾘﾝｸ(operate板)
【協力願】Boo2008(旧Boo80)で串を食べませんか？ その10
ｽﾚﾘﾝｸ(operate板)
●Boo2008スクリプト
オリジナルバージョン
URLﾘﾝｸ(boo.2ch.net)
現在のバージョン
my $VERSION = '1.17';
my $DATE = '2011/01/16';
2:動け動けウゴウゴ２ちゃんねる
13/04/28 16:34:42.14 SEMu1WLY0
●おまけ（旧アドレス／新式は現時点では未発表。完成次第告知します）
月別串迎撃ランキング
URLﾘﾝｸ(boo.2ch.net)
鯖別串迎撃ランキング ※動いていません
URLﾘﾝｸ(qb6.2ch.net)
迎撃速報hack72 最近のお宝(2009/01/05)
URLﾘﾝｸ(hack72.2ch.net)
●関連リンク
URLﾘﾝｸ(info.2ch.net) (２ちゃんねるWiki/boo80)
URLﾘﾝｸ(info.2ch.net) (２ちゃんねるWiki/boo2008)
■ 新企画 Hack72 (BBQ に貯まっている串の速報) part1
URLﾘﾝｸ(qb5.2ch.net) DAT墜ち
【BBQ＆BBM63本目】公開串登録所【ピンポイント規制】
ｽﾚﾘﾝｸ(sec2chd板)
□規制解除要望□ 焼かれたひと専用 [BBQ]★28
ｽﾚﾘﾝｸ(goki板)
3:動け動けウゴウゴ２ちゃんねる
13/04/28 16:35:31.10 SEMu1WLY0
Boo2008の仕様@2009/06/24 現在
●概要
・BBQチェックを行います。登録済みの場合はここで終了。
・SpamCop(URLﾘﾝｸ(www.spamcop.net))チェックをしています。黒の場合、焼き確定。
・標準で30個のポートをチェックします。
ただし、単純にproxy接続するだけなので、WebCGIやSocks、Torには現時点では未対応です。
ポート番号を追加指定することが出来ます。
・逆引きできないIPアドレスは、焼き確定。
ただし、ポートもチェックします。結果をHack72へ送ります。
・正引きできないホスト名に対してIPアドレスが存在する場合は、焼き確定。
ただし、Hack72には送られません。
4:動け動けウゴウゴ２ちゃんねる
13/04/28 16:35:50.53 SEMu1WLY0
●返り値（エラーメッセージ）
"Good bye 1111 クエリが空っぽです(´･ω･`)",
"Good bye 1112 そんな人いないです(´･ω･`)",
"Good bye 1113 あっぷあっぷしています(´･ω･`) -> $err",
"Good bye 1114 あっぷあっぷしています(´･ω･`) -> $err",
"Good bye 1122 URIがおかしゅいです(´･ω･`) -> $err",
"Good bye 1112 時刻がおかしゅいです(´･ω･`) -> $err",
"Good bye 1113 ID が ??? の時は何も入れないでください(´･ω･`) -> $err",
"Good bye 1114 ID に変なのが入っているです(´･ω･`) -> $err",
"Good bye 1333 URIがおかしゅいです。そんな板スレッドはないです(´･ω･`) -> $err",
"Good bye 1444 ログがなかった。 (´･ω･`)",
"Good bye 2222 探せなかった。存在しない。 (´･ω･`)"
"Good bye 2288 例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`) -> $err",
"Good bye 2289 例のサーバから探せなかった。多分そのサーバは墜ちているかも(´･ω･`) -> $err",
"Good bye 3333 携帯さんなのでチェックしないです(´･ω･`)",
"Good bye 3334 P2さんなのでチェックしないです(´･ω･`)",
"Good bye 4001 IPアドレス or ホスト名がない(´･ω･`) -> $err",
"Good bye 4002 IPアドレス or ホスト名が変(´･ω･`) -> $err",
"Good bye 4010 portがない(´･ω･`) -> $err",
"Good bye 4011 portが変(´･ω･`) -> $err",
"Good bye 4023 多分、IPアドレスが変(´･ω･`) -> $err",
"Good bye 4024 多分、ホスト名が変(´･ω･`) -> $err",
"Good bye 9000 がいしゅつ!!Done ! -> [BBQ Status]",
"Good bye 9001 がいしゅつ!!Yeah ! -> [BBQ Status]",
"Good bye 9010 すでにBBQされています(´･ω･`) -> [BBQ Status]",
"Good bye 0000 Thank you. <em class="delicious">Wow taste good!</em>",
"Good bye 0001 Thank you. <em class="noproxy">Maybe, not be proxy...</em>",
－詳細－
"Good bye 9000 がいしゅつ!!Done !"
→ 既に調査済み。串ではないと判定。
"Good bye 9001 がいしゅつ!!Yeah !"
→ 既に調査済み。串と判定。
5:動け動けウゴウゴ２ちゃんねる
13/04/28 16:36:12.03 SEMu1WLY0
●ポイント制
判定にて黒と判断された場合にポイントが付与されます。
串動作したとき→+765pts.
SpamCop登録されていたとき→+5pts.
正引き、逆引きできなかったとき→+1pts.
ちなみに月ごとランキングですが、鯖自体がPST+8PDTで動いていますのでJSTより16-17時間ほど遅れています。
その結果、月をまたぐ時間帯では先月分に追加されます。
●トリップ対応
新式の12桁トリップにも対応。
トリップキー入力時のみ、トリップ毎にBooポイントを付与。
将来的には何かしらのポイントへの還元がなされるかも？(beとかモリタポとか)
●串チェック時のコード
URLﾘﾝｸ(cpansearch.perl.org)
に載っているです。
それぞれの意味は個々で調べてみよう♪
6:動け動けウゴウゴ２ちゃんねる
13/04/28 16:36:28.41 SEMu1WLY0
●その他
# 起動数制限装置
my $Processes = scalar grep /$0/, qx|/bin/ps Uch2boo|;
my @LA5 = split /,/, (qx|/usr/bin/uptime| =~ /load averages: (.+)$/)[0];
if ($Processes > ((localtime)[2] > 16 ? 30 : 50) or $LA5[0] > 5) {
Error('02',sprintf "Boo2008 running processes = %d : load averages = %s, %s, %s", $Processes, @LA5)
}
7:動け動けウゴウゴ２ちゃんねる
13/04/28 16:37:39.19 SEMu1WLY0
落ちてたので再起動
8:未承諾広告※ ◆Boo2014ByhBJ
13/04/28 21:45:00.79 IHu1dSc+0 BE:5336677-PLT(23509)
天麩羅が古いのでやり直し♪現ばーぢょんは、1.24 だす。
9:未承諾広告※ ◆Boo2014ByhBJ
13/04/30 19:46:28.38 Ob7mppLy0 BE:1742944-PLT(23509)
>>1
my @History = (
[qw(1.25 2013/04/13 逆引きすんのやーめた。)],
[qw(1.24 2013/03/25 現在の登録数を表示。)],
[qw(1.23 2013/03/19 socksやめた。)],
[qw(1.22 2013/01/27 4.3.2.1.tor.dan.me.uk いれた)],
[qw(1.21 2011/06/18 IPアドレス判定をややゆるく？（rfc5735利用）)],
[qw(1.20 2011/04/11 BBQなリモートホストはお断り)],
[qw(1.19 2011/02/12 稼働中ログみたいのをつけた)],
[qw(1.18 2011/01/25 IPv4をゼロサプレスするりた)],
[qw(1.17 2011/01/16 news4vipに対応したかも。)],
10:未承諾広告※ ◆Boo2014ByhBJ
13/04/30 19:50:42.79 Ob7mppLy0 BE:5227968-PLT(23509)
>>4
["Good bye 1111", "クエリが空っぽです(´･ω･`)"],
["Good bye 1112", "そんな人いないです(´･ω･`)"],
["Good bye 1113", "あっぷあっぷしています(´･ω･`) -> $err"],
["Good bye 1114", "あっぷあっぷしています(´･ω･`) -> $err"],
["Good bye 1115", "[―{}¥@{}¥@{}-]な人はお断りだ！ $err"],
["Good bye 1122", "URIがおかしゅいです(´･ω･`) -> $err"],
["Good bye 1112", "時刻がおかしゅいです(´･ω･`) -> $err"],
["Good bye 1113", "ID が ??? の時は何も入れないでください(´･ω･`) -> $err"],
["Good bye 1114", "ID に変なのが入っているです(´･ω･`) -> $err"],
["Good bye 1333", "URIがおかしゅいです。そんな板スレッドはないです(´･ω･`) -> $err"],
["Good bye 2284", "ipv6鯖なのでチェックしないです(´･ω･`)"],
["Good bye 2222", "探せなかった。存在しない。 (´･ω･`)<!-- $err -->"],
["Good bye 1444", "ログがなかった。 (´･ω･`)<!-- $err -->"],
["Good bye 2280", "例のサーバから探せなかった。多分そのサーバはおかしゅいかも(´･ω･`) -> $err"],
["Good bye 2281", "例のサーバから探せなかった。多分そのサーバはBoo未実装(´･ω･`) -> $err"],
["Good bye 2282", "例のサーバから探せなかった。多分そのサーバはいやぁーんかも(´･ω･`) -> $err"],
["Good bye 2283", "例のサーバから探せなかった。多分そのサーバは墜ちているかも(´･ω･`) -> $err"],
["Good bye 3333", "携帯さんなのでチェックしないです(´･ω･`)"],
["Good bye 3334", "P2さんなのでチェックしないです(´･ω･`)"],
["Good bye 4001", "IPアドレス or ホスト名がない(´･ω･`) -> $err"],
["Good bye 4002", "IPアドレス or ホスト名が変(´･ω･`) -> $err"],
["Good bye 4010", "portがない(´･ω･`) -> $err"],
["Good bye 4011", "portが変(´･ω･`) -> $err"],
["Good bye 4023", "多分、IPアドレスが変(´･ω･`) -> $err"],
["Good bye 4024", "多分、ホスト名が変(´･ω･`) -> $err"],
["Good bye 9000", "がいしゅつ!!Done ! -> $err "],
["Good bye 9001", "がいしゅつ!!Yeah ! -> $err"],
["Good bye 9010", "すでにBBQされています(´･ω･`) -> $err"],
["Good bye 0000", qq|Thank you. <em class="delicious">Wow taste good!</em>|],
["Good bye 0001", qq|Thank you. <em class="noproxy">Maybe, not be proxy...</em>|],
["Good bye 9999", "テスト出力<!-- $err -->"],
["Good bye 9999", "Boo2008は現在心肺停止中です♪ｷﾗﾝｯ★<br>心臓マッサージしようにも胸が邪魔です！<br>AEDって何の略でしたっけ？<br>人工呼吸って・・・（照照照）<!-- $err -->¥n"],
11:未承諾広告※ ◆Boo2014ByhBJ
13/04/30 19:57:56.59 Ob7mppLy0 BE:654023-PLT(23509)
>>5
●ポイント制
判定にて黒と判断された場合にポイントが付与されます。
串動作したとき→+765pts.
Tor登録されていたとき→+13pts.
SpamCop登録されていたとき→+5pts.
正引き、逆引きできなかったとき→+1pts.
>>6
# 起動数制限装置
my $Processes = scalar grep /$0/, qx|/bin/ps Uch2boo|;
@LA5 = split /, /, (qx|/usr/bin/uptime| =~ /load averages: (.+)$/)[0];
if ($Processes > $Max_Proc) {
Error('02',sprintf "Boo2008 running processes = >> %d << : load averages = %s, %s, %s", $Processes, @LA5)
}
elsif ($LA5[0] > $Max_LA) {
Error('03',sprintf "Boo2008 running processes = %d : load averages = >> %s <<, %s, %s", $Processes, @LA5)
}
●閾値は鯖増強を機会に大幅に緩和しております♪
12:動け動けウゴウゴ２ちゃんねる
13/05/02 00:54:14.74 8BOLEZja0
さっきかけたらこんな表示が出ました。
Software error:
Can't call method "get" on an undefined value at /home/ch2boo/public_html/boo2008.cgi line 319.
For help, please send mail to the webmaster (2ch@2ch.net), giving this error message and the time and date of the error.
13:未承諾広告※ ◆Boo2014ByhBJ
13/05/02 15:02:33.37 mSEgD7e+0 BE:3811875-PLT(23509)
>>12
my $status;
my %boo2008_Trip;
my $Trip_DB = tie %boo2008_Trip,
"DB_File",
$boo2008_TripDB,
O_RDWR|O_CREAT,
0666,
$DB_Type;
$Trip_DB->get($Trip, $status); ←ここが319行目
なので、トリップDBが開けられなかったのかな。
もし続くようでしたら中身観てみます。
あ、オーナーのパーミッションがおかしいのかな。（５月分が生成できない）
14:動け動けウゴウゴ２ちゃんねる
13/05/03 04:32:07.16 kWGO9j/T0
こんなこともあるから
即時対応出来るBooでは対応しておいた方がいいような気がするです
事後対応ではコストが高い
ｽﾚﾘﾝｸ(sec2chd板:176-177番)