【協力願】Boo2008(旧Boo80)で串を食べませんか？ その４

[1 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 16:30:54 ID:BXjSpw0f0]

Boo2008(旧名Boo80)というスクリプトで串を規制するプロジェクトです。

●過去スレ
【協力願】Boo80で串を食べませんか？
　http://qb3.2ch.net/test/read.cgi/operate/1064576191/
【協力願】Boo80で串を食べませんか？　その２
　http://qb5.2ch.net/test/read.cgi/operate/1081858336/
【協力願】Boo80で串を食べませんか？　その３
　http://qb5.2ch.net/test/read.cgi/operate/1104339319/

●Boo2008スクリプト
オリジナルバージョン
　http://boo.2ch.net/

●おまけ（旧アドレス／新式は現時点では未発表。完成次第告知します）
鯖別串迎撃ランキング
　http://qb6.2ch.net/_boo80/pokan.cgi
迎撃速報hack72 最近のお宝(2004-10-21)
　http://hack72.2ch.net/otakara.cgi

●関連リンク
　http://info.2ch.net/wiki/index.php?Boo80 (２ちゃんねるWiki/boo80)
■　新企画 Hack72 (BBQ に貯まっている串の速報)　part1
　http://qb5.2ch.net/operate/kako/1093/10939/1093978218.html DAT墜ち
【BBQ＆BBM28本目】公開串登録所【ピンポイント規制】
　http://qb5.2ch.net/test/read.cgi/sec2chd/1198539688/
□規制解除要望□ 焼かれたひと専用 [BBQ]★10
　http://life9.2ch.net/test/read.cgi/goki/1195035607/

[2 未承諾広告※ ◆TWARamEjuA 2008/01/03(木) 16:31:30 ID:BXjSpw0f0]

Boo2008の仕様
●概要
　・標準で30個のポートをチェックします。
　　ただし、単純にproxy接続するだけなので、WebCGIやSocks、Torには現時点では未対応です。
　・逆引きできないIPアドレスは、焼き確定。
　　ただし、ポートもチェックします。
　・すべてのポートに対してproxy接続しますので、複数ポートを持っている串にも対応しています。

●Boo2008(boo2008.cgi)に投入するデータ（クエリ）
・赤の時（書き込みログから逆探知）
　type=red
　boo2008_uri=掲示板のURI
　boo2008_time=書き込み時間
　boo2008_id=ＩＤ
　　+はそのままで桶。???のときは空白で。
　（現状、空欄でも採取可能の模様。将来的に仕様変更するかもなので残しておきます。）
　boo2008_red=ポチっとな♪（無くても桶）

・青の時（アドレスとポートを指定）
　type=blue
　boo2008_host=IPアドレスもしくはホスト名
　boo2008_port=ポート番号
　　なしでも桶。
　　無しの場合は30個チェック。追加する場合は,で区切る。30個+追加分になります。
　　ちなみに先頭に!を付けてポート番号を並べると、そのポート番号だけをチェックします。ex.!80,81,88 -> 3つだけチェック
　boo2008_blue=ポチっとな♪（無くても桶）
・黄の時
・桃の時
・緑の時
　現在未定。

[3 未承諾広告※ ◆TWARamEjuA 2008/01/03(木) 16:32:55 ID:BXjSpw0f0]

●返り値（エラーメッセージ）
　"Good bye 1111 クエリが空っぽです(´･ω･`)",
　"Good bye 1112 そんな人いないです(´･ω･`)",
　"Good bye 1122 URIがおかしゅいです(´･ω･`) -> $err",
　"Good bye 1112 時刻がおかしゅいです(´･ω･`) -> $err",
　"Good bye 1113 ID が ??? の時は何も入れないでください(´･ω･`) -> $err",
　"Good bye 1114 ID に変なのが入っているです(´･ω･`) -> $err",
　"Good bye 1333 URIがおかしゅいです。そんな板スレッドはないです(´･ω･`) -> $err",
　"$err (´･ω･`)", # Good bye 2222　探せなかった。存在しない。 (´･ω･`)
　"Good bye 2288 例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`) -> $err",
　"Good bye 4001 IPアドレス or リモホがない(´･ω･`) -> $err",
　"Good bye 4002 IPアドレス or リモホが変(´･ω･`) -> $err",
　"Good bye 4010 portがない(´･ω･`) -> $err",
　"Good bye 4011 portが変(´･ω･`) -> $err",
　"Good bye 4003 多分、IPアドレスが変(´･ω･`) -> $err",
　"Good bye 9000 がいしゅつ!!Done !",
　"Good bye 9001 がいしゅつ!!Yeah !",
　"Good bye 9010 すでにBBQされています(´･ω･`) -> $err",
　"Wow taste good!",
　"Good bye 0000 テスト出力 -> $err",

　−詳細−
　　"$err (´･ω･`)", # Good bye 2222　探せなかった。存在しない。 (´･ω･`)
　　→ ログ掘り装置からの出力が来るのでもしかしたら変なのが出るかもしれません、、、
　　"Good bye 9000 がいしゅつ!!Done !"
　　→ 既に調査済み。串ではないと判定。
　　"Good bye 9001 がいしゅつ!!Yeah !"
　　→ 既に調査済み。串と判定。

[4 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 16:35:22 ID:7VLkAN8Y0]

乙です

[5 雑魚『爽やかな風に揺られて』 ◆MOON///Uh6 NG NG]

串探して来なきゃ・・・・

朝から探してるけど、生は見つからない・・・・

WWWWWWWWWWWｗｗｗWWWWWWWWWWWWｗｗｗｗｗWw↑→

[6 未承諾広告※ ◆TWARamEjuA 2008/01/03(木) 17:35:29 ID:BXjSpw0f0]

>> http://qb5.2ch.net/test/read.cgi/operate/1104339319/996
ををっと、忘れていました。
tu-ka別のところで吐き出すから悪いのか、、、

# 串動作したものがあったとき♪
$Return_strings = qq|<span class="delicious">Wow taste good!</span>|;
# なにもなかった。。。
$Return_strings = qq|<span class="noproxy">maybe, not be proxy...</span>| unless $Return_strings;

してからしてその戻り値が$Greetingに入りますので、、、

# ごあいさつ。
printf qq|<p>Thank you.$Greeting</p>n|;
print $Html{'footer'};

このようになっていますです。

♯意味づけとしては<span>では拙いですね(苦笑)
　<em>(emphasis)あたりかしら？＠軽い強調

[7 [―{}@{}@{}-] 雑魚『爽やかな風に揺られて』 ◆MOON///Uh6 NG NG]

はいはい、ご苦労・・・・引き続きしっかりな・・・・・（笑）

じゃあ、串探しに逝くわ〜〜〜あったら報告するわ〜〜♪

WWWWWWWWWWWWｗｗｗWWWWWWWWWWWWWｗｗｗWWWｗWwWw↑→

[8 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 18:07:34 ID:TJHhTsHH0]

>>6
それでよいんじゃないでしょうか。
そしてできればHTML中で同じタグを使わないと。

[9 せっ☆マ ◆wwwwWwWWWw 2008/01/03(木) 21:00:05 ID:0UJJg7q60]

FOXか知らんけどお疲れ！

[10 stream ◆PNstream2s 2008/01/03(木) 21:10:59 ID:bKSrg7sl0]

>>http://qb5.2ch.net/test/read.cgi/operate/1104339319/990

forkやマルチスレッドもいいけど、一度に大量の接続をするなら、
selectとかpollみたいなのを使うのがいいです

perlはよく分からないんですが標準のsocket関数ならselect関数が、
IO::SocketならIO::Selectが使えるらしいです

http://x68000.q-e-d.net/~68user/net/

[11 せっ☆マ ◆wwwwWwWWWw 2008/01/03(木) 21:16:51 ID:0UJJg7q60]

これは良い技術すれ

[12 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 21:32:09 ID:TJHhTsHH0]

メッセージのマークアップはこんな感じでどうでしょう。

"Good bye 2288 例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`) -> $err",
　　　　　　　　　　　　　　　　↓
<dl id="result">
<dt id="statuscode">Good bye 2288</dt>
<dd id="codedescription">例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`) </dd>
</dl>


ついでに"Wow taste good!"や"maybe, not be proxy..."の場合もGood byeみたいにThank youに数字をつけるとか。
Thank you 0001とか0002とか。

どっちしろ同じところで出力したほうがよさげ。

[13 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 21:42:54 ID:VppBTv2y0]

人大杉は改善されたのか？

[14 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 22:00:47 ID:TJHhTsHH0]

そういえば、IDや日付け内の株主優待や証券取引場へのリンクの扱いはどうなってるんだろう。

株のガチャガチャで何が出たか晒すスレ　★5
http://bubble6.2ch.net/test/read.cgi/2chse/1171233978/1
ここの1をくべてみたけどIDだけでは見つからないって言われた。

[15 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 22:14:28 ID:B/urxtfk0]

バーボンリストからのやつもできるようにしてほしいです。

[16 未承諾広告※ ◆TWARamEjuA 2008/01/03(木) 22:44:59 ID:BXjSpw0f0]

>>10
perl自体としてイベントドリブンを実装しているわけではないので、どうしてもがちがちな描き方になると思うですです(苦笑)
そもそも最新の5.10になってswitch構文が出来たとかというお話しですし、ましてやcatch〜tryなんてのもありませんですし（哀）
なのでその辺になるとfolkしたりとかとかで実現させるのが専らかなぁと♪

ちなみに該当ページを読んでみましたが、完全には切り離されていはいないですよね♪＠やっぱり逐次処理

>>12
したー♪

[17 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 23:18:13 ID:LsZ5ujnkO]

folkに回そうが、逐次処理はどうしても残されると思われ＾＾

[18 root▲▲ ★ 2008/01/03(木) 23:28:24 ID:???0]

そういえば、もし必要なPerlモジュールが入ってないとか、
必要なコマンドが入ってないぞとか、そのへんがあった場合、
遠慮なくこちらにてお申し付けくださいませです。>>16

[19 未承諾広告※ ◆TWARamEjuA 2008/01/03(木) 23:44:56 ID:BXjSpw0f0]

>>17
ぎくぅ♪
根本はtime sharingですねぇ♪

>>18
承知しました。

[20 動け動けウゴウゴ２ちゃんねる 2008/01/03(木) 23:46:28 ID:7VLkAN8Y0]

串かと思ったら繋ぎ替えばかりだなー

[21 水色＠飛行石 ★ 2008/01/03(木) 23:53:04 ID:???0]

海外のadsl使いまくる荒らしもいますからねー。
ポートは今までより増やした方がいいんでしょうねー。

[22 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 00:00:14 ID:Il4niaT20]

>>3
さっそく一部修正。
"Good bye 2288", "例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`) -> $err"
"Good bye 2289", "例のサーバから探せなかった。多分そのサーバは墜ちているかも(´･ω･`) -> $err"
ですー♪

>>21
デフォルトを30個にしましたが、それでも足りないときには追加できますですー

[23 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 00:01:23 ID:Il4niaT20]

あっと、これもだた。。。
"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>|

[24 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 00:45:41 ID:Il4niaT20]

ありゃ、、、こりゃいかんよなぁ、、、
[赤]が機能していないことが多々あるかも(ﾟ∀ﾟ)ｱﾋｬ

って事でごにょごにょ入ります。

[25 直接叩いても良いよね？ 2008/01/04(金) 01:32:53 ID:/WcAUTwy0]

'Boo2008 RED=wscript "$BASEPATHboo2008.vbs" "$URL$TEXT"
Set re1 = New RegExp
Set re2 = New RegExp
Set re3 = New RegExp
re1.Pattern = "(^http://.+/test/read.cgi/.+/\d{9,10}/\d{1,3})\s.+　投稿日：(\d{4}/\d{2}/\d{2}\(.\)\s\d{2}:\d{2}:\d{2}(?:\.\d{2})?)(.*)"
re2.Pattern = "\s(?:\W+\s)?(\S+)?"
re3.Pattern = "(^ID:\?\?\?$|^ID:|^.$|^\?.+$)"
s = WScript.Arguments.UnNamed(0)
Set matches1 = re1.Execute(s)
For Each match In matches1
res_uri = match.SubMatches(0)
timestamp = match.SubMatches(1)
etc = match.SubMatches(2)
Next
Set matches2 = re2.Execute(etc)
For Each match In matches2
id1 = match.SubMatches(0)
Next
id=re3.Replace(id1, "")
url_1 = "http://boo.2ch.net/boo2008.cgi?type=red&boo2008_uri=" & res_uri & "&boo2008_time=" & timestamp & "&boo2008_id=" & id
url_2 = Replace(url_1, "月) ", "%8C%8E)%20")
url_3 = Replace(url_2, "火) ", "%89%CE)%20")
url_4 = Replace(url_3, "水) ", "%90%85)%20")
url_5 = Replace(url_4, "木) ", "%96%D8)%20")
url_6 = Replace(url_5, "金) ", "%8B%E0)%20")
url_7 = Replace(url_6, "土) ", "%93%79)%20")
url_boo = Replace(url_7, "日) ", "%93%FA)%20")
CreateObject("WScript.Shell").Run url_boo

[26 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 01:40:35 ID:2y9I8iw40]

>>25
ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!

[27 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 01:44:19 ID:MC6LmL620]

スクリプトだけコピペするのは感心しませんな
ここに貼るようなもんじゃないし

[28 直接叩いても良いよね？ 2008/01/04(金) 01:49:43 ID:/WcAUTwy0]

>>25
Boo2008 REDの外部コマンド
domo2.netが対応するまでのつなぎです
レスの1行目（レス番号〜ID）を選択して実行してください

[29 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 02:21:38 ID:Il4niaT20]

ごにょごにょおわり。

>>3 に追加。
"Good bye 3333", "携帯さんなのでチェックしないです(´･ω･`) -> $err"
"Good bye 3334", "P2さんなのでチェックしないです(´･ω･`) -> $err"

ただし、Good bye 3334 は止めています。
P2元をチェックしています。
ので、P2経由の逆引き不可ホストさんも焼けるようになるんじゃないかと。。。

[30 stream ◆PNstream2s 2008/01/04(金) 02:28:23 ID:L7ksyk2C0]

>>28
・Jane用？とか明記してくれ
・re1.Patternがとてつもなくスキン依存じゃね？(投稿日：なんて俺のスキンにはない)

[31 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 02:47:42 ID:DmZFexrW0]

BBS_SLIPがONではないところで
Good bye 3333を表示させるのは
いかがなもんかと

[32 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 02:55:20 ID:Il4niaT20]

>>31
ONなところでも同じ表示が出るので隠しても意味がないかなぁと思いまして。
かといって携帯串鯖めがけてチェックしてもあまり意味もないですし。。。

それとも「チェックしているつもり」にしちゃおうかしら。。

[33 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 03:01:36 ID:Il4niaT20]

>>32
"Good bye 3333", "携帯さんなのでチェックしないです(´･ω･`) "
"Good bye 3334", "P2さんなのでチェックしないです(´･ω･`) "
この2つを出ないようにしました。

って事でこの2つは、 >>3 からは削除の方向で。

[34 未承諾広告※ ◆TWARamEjuA 2008/01/04(金) 03:42:17 ID:Il4niaT20]

ひとまずBoo2008は落ち着いたかしら？

そりはさておき、Hack72な話題もこちらでおけ香奈香奈？
現状1つしか揚がってきていなかったり(´･ω･`)＠おたから

ひとまず床へm(_ _)m

[35 めだま焼き ★ 2008/01/04(金) 04:53:52 ID:???0]

GJ(AAry
お疲れさまです。

#本当はなしで書きたいけど臭くなっちゃった……。　　（´・ω・`）

[36 [―{}@{}@{}-] 雑魚『爽やかな風に揺られて』 ◆MOON///Uh6 NG NG]

Janeとなんか関係あるの？？？

やり方教えてよ・・・・・・

WWWWWWWWWWWWｗｗｗWWWWWWWWｗｗｗWww↑→

[37 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 06:15:09 ID:FSH4kD8n0]

俺も教えて
３つもコピペするのは面倒

[38 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 07:14:37 ID:4QPS/cWS0]

hack72.2ch.netってどこに引っ越したんですか？

[39 雑魚『爽やかな風に揺られて』 ◆MOON///Uh6 NG NG]

グググ〜る（笑）でOK？？

WWWWWWWWWWｗｗｗｗｗWWWｗｗｗｗWww←↑

[40 [―{}@{}@{}-] 雑魚『爽やかな風に揺られて』 ◆MOON///Uh6 NG NG]

焼いてきました〜〜　　URLと時間でやりました〜〜　WWWWWWWWWｗWWｗ↑→

http://qb5.2ch.net/test/read.cgi/sec2chd/1198714122/942 は、、、
時刻：2008/01/04(金) 09:41:00
ＩＤ：
名前：雑魚『爽やかな風に揺られて』 ◆PoorManD1k さんの発言です｡

FAILURE: 404
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
SUCCESS: 200
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
FAILURE: 500
Good bye 0000
Thank you. Wow taste good!

↓↓

【規制議論板】質問でも雑談でもOKのスレッド★141
http://qb5.2ch.net/test/read.cgi/sec2chd/1198714122/943

943 名前： [―{}@{}@{}-] 雑魚『爽やかな風に揺られて』 ◆PoorManD1k [Make Hungry] 投稿日：2008/01/04(金) 09:43:33 ID:cyDNyf3j0 ?2BP(6667) 株主優待
出来た・・・・（笑）

WWWWWWWWWWWWWWWWｗｗｗｗWWWWWWWWWWWWｗｗｗWww↑→

[41 動け動けウゴウゴ２ちゃんねる 2008/01/04(金) 09:46:22 ID:KO4Lo77M0]

>>16
なってますね。
これでわかりやすく、いろいろしやすくなりました。

あとは>>14なんですが、どうなってるんでしょ。

[42 返事のまとめ。 2008/01/04(金) 11:08:05 ID:KO4Lo77M0]

Good bye 0000
    Thank you. Wow taste good!

Good bye 0001
    Thank you. Maybe, not be proxy...

Good bye 1111
    クエリが空っぽです(´･ω･`)

Good bye 1112
    そんな人いないです(´･ω･`)

Good bye 1122
    URIがおかしゅいです(´･ω･`)

Good bye 1112
    時刻がおかしゅいです(´･ω･`)

Good bye 1113
    ID が ??? の時は何も入れないでください(´･ω･`)

Good bye 1114
    ID に変なのが入っているです(´･ω･`)

Good bye 1333
    URIがおかしゅいです。そんな板スレッドはないです(´･ω･`)

Good bye 2222
    探せなかった。存在しない。 (´･ω･`)

Good bye 2288
    例のサーバから探せなかった。多分そのサーバはBoo80未実装(´･ω･`)

Good bye 2289
    例のサーバから探せなかった。多分そのサーバは墜ちているかも

Good bye 4001
    IPアドレス or リモホがない(´･ω･`)

Good bye 4002
    IPアドレス or リモホが変(´･ω･`)

Good bye 4010
    portがない(´･ω･`)

Good bye 4011
    portが変(´･ω･`)

Good bye 4003
    多分、IPアドレスが変(´･ω･`)

Good bye 9000
    がいしゅつ!!Done !

Good bye 9001
    がいしゅつ!!Yeah !

Good bye 9010
    すでにBBQされています(´･ω･`)