【協力願】Boo2008(旧Boo80)で串を食べませんか? その4
■ このスレッドは過去ログ倉庫に格納されています
Boo2008の仕様
●概要
・標準で30個のポートをチェックします。
ただし、単純にproxy接続するだけなので、WebCGIやSocks、Torには現時点では未対応です。
・逆引きできないIPアドレスは、焼き確定。
ただし、ポートもチェックします。
・すべてのポートに対してproxy接続しますので、複数ポートを持っている串にも対応しています。
●Boo2008(boo2008.cgi)に投入するデータ(クエリ)
・赤の時(書き込みログから逆探知)
type=red
boo2008_uri=掲示板のURI
boo2008_time=書き込み時間
boo2008_id=ID
+はそのままで桶。???のときは空白で。
(現状、空欄でも採取可能の模様。将来的に仕様変更するかもなので残しておきます。)
boo2008_red=ポチっとな♪(無くても桶)
・青の時(アドレスとポートを指定)
type=blue
boo2008_host=IPアドレスもしくはホスト名
boo2008_port=ポート番号
なしでも桶。
無しの場合は30個チェック。追加する場合は,で区切る。30個+追加分になります。
ちなみに先頭に!を付けてポート番号を並べると、そのポート番号だけをチェックします。ex.!80,81,88 -> 3つだけチェック
boo2008_blue=ポチっとな♪(無くても桶)
・黄の時
・桃の時
・緑の時
現在未定。 ●返り値(エラーメッセージ)
"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 !"
→ 既に調査済み。串と判定。 串探して来なきゃ・・・・
朝から探してるけど、生は見つからない・・・・
WWWWWWWWWWWwwwWWWWWWWWWWWWwwwwwWw↑→ >> 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)あたりかしら?@軽い強調
はいはい、ご苦労・・・・引き続きしっかりな・・・・・(笑)
じゃあ、串探しに逝くわ〜〜〜あったら報告するわ〜〜♪
WWWWWWWWWWWWwwwWWWWWWWWWWWWWwwwWWWwWwWw↑→ >>6
それでよいんじゃないでしょうか。
そしてできればHTML中で同じタグを使わないと。 >>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/ メッセージのマークアップはこんな感じでどうでしょう。
"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とか。
どっちしろ同じところで出力したほうがよさげ。 そういえば、IDや日付け内の株主優待や証券取引場へのリンクの扱いはどうなってるんだろう。
株のガチャガチャで何が出たか晒すスレ ★5
http://bubble6.2ch.net/test/read.cgi/2chse/1171233978/1
ここの1をくべてみたけどIDだけでは見つからないって言われた。 バーボンリストからのやつもできるようにしてほしいです。 >>10
perl自体としてイベントドリブンを実装しているわけではないので、どうしてもがちがちな描き方になると思うですです(苦笑)
そもそも最新の5.10になってswitch構文が出来たとかというお話しですし、ましてやcatch〜tryなんてのもありませんですし(哀)
なのでその辺になるとfolkしたりとかとかで実現させるのが専らかなぁと♪
ちなみに該当ページを読んでみましたが、完全には切り離されていはいないですよね♪@やっぱり逐次処理
>>12
したー♪ folkに回そうが、逐次処理はどうしても残されると思われ^^ そういえば、もし必要なPerlモジュールが入ってないとか、
必要なコマンドが入ってないぞとか、そのへんがあった場合、
遠慮なくこちらにてお申し付けくださいませです。>>16 >>17
ぎくぅ♪
根本はtime sharingですねぇ♪
>>18
承知しました。 海外のadsl使いまくる荒らしもいますからねー。
ポートは今までより増やした方がいいんでしょうねー。 >>3
さっそく一部修正。
"Good bye 2288", "例のサーバから探せなかった。多分そのサーバはBoo80未実装(´・ω・`) -> $err"
"Good bye 2289", "例のサーバから探せなかった。多分そのサーバは墜ちているかも(´・ω・`) -> $err"
ですー♪
>>21
デフォルトを30個にしましたが、それでも足りないときには追加できますですー あっと、これもだた。。。
"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>| ありゃ、、、こりゃいかんよなぁ、、、
[赤]が機能していないことが多々あるかも(゚∀゚)アヒャ
って事でごにょごにょ入ります。 '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 >>25
キタ━━━━━━(゚∀゚)━━━━━━ !! スクリプトだけコピペするのは感心しませんな
ここに貼るようなもんじゃないし >>25
Boo2008 REDの外部コマンド
domo2.netが対応するまでのつなぎです
レスの1行目(レス番号〜ID)を選択して実行してください ごにょごにょおわり。
>>3 に追加。
"Good bye 3333", "携帯さんなのでチェックしないです(´・ω・`) -> $err"
"Good bye 3334", "P2さんなのでチェックしないです(´・ω・`) -> $err"
ただし、Good bye 3334 は止めています。
P2元をチェックしています。
ので、P2経由の逆引き不可ホストさんも焼けるようになるんじゃないかと。。。 >>28
・Jane用?とか明記してくれ
・re1.Patternがとてつもなくスキン依存じゃね?(投稿日:なんて俺のスキンにはない) BBS_SLIPがONではないところで
Good bye 3333を表示させるのは
いかがなもんかと >>31
ONなところでも同じ表示が出るので隠しても意味がないかなぁと思いまして。
かといって携帯串鯖めがけてチェックしてもあまり意味もないですし。。。
それとも「チェックしているつもり」にしちゃおうかしら。。 >>32
"Good bye 3333", "携帯さんなのでチェックしないです(´・ω・`) "
"Good bye 3334", "P2さんなのでチェックしないです(´・ω・`) "
この2つを出ないようにしました。
って事でこの2つは、 >>3 からは削除の方向で。 ひとまずBoo2008は落ち着いたかしら?
そりはさておき、Hack72な話題もこちらでおけ香奈香奈?
現状1つしか揚がってきていなかったり(´・ω・`)@おたから
ひとまず床へm(_ _)m GJ(AAry
お疲れさまです。
#本当はなしで書きたいけど臭くなっちゃった……。 (´・ω・`) Janeとなんか関係あるの???
やり方教えてよ・・・・・・
WWWWWWWWWWWWwwwWWWWWWWWwwwWww↑→ hack72.2ch.netってどこに引っ越したんですか? グググ〜る(笑)でOK??
WWWWWWWWWWwwwwwWWWwwwwWww←↑ 焼いてきました〜〜 URLと時間でやりました〜〜 WWWWWWWWWwWWw↑→
http://qb5.2ch.net/test/read.cgi/sec2chd/1198714122/942 は、、、
時刻:2008/01/04(金) 09:41:00
ID:
名前:雑魚『爽やかな風に揺られて』 ◆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) 株主優待
出来た・・・・(笑)
WWWWWWWWWWWWWWWWwwwwWWWWWWWWWWWWwwwWww↑→ >>16
なってますね。
これでわかりやすく、いろいろしやすくなりました。
あとは>>14なんですが、どうなってるんでしょ。 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されています(´・ω・`) > Good bye 9010
> ????すでにBBQされています(´・ω・`)
自演がばれちゃう>< Jane派生系でBoo2008に直接放り込むスプリクト
リドミー読んで判らなきゃ諦めなさい
【協力願】Boo2008(旧Boo80)で串を食べませんか? その4外部コマンド Part5
http://jane.s28.xrea.com/test/read.cgi/bbs/1180559017/876
876 名前:Jane使いの名無しさん[sage] 投稿日:2008/01/04(金) 08:13:14 ID:VzGHQIro0
ttp://www.geocities.jp/nanasi_san_exe/
レス番クリックで使えるの作ってみた >>42
かなり動作的に変なところがあったので直したのと、若干メッセージを変えました。
"Good bye 4001", "IPアドレス or ホスト名がない(´・ω・`) -> $err"],
"Good bye 4002", "IPアドレス or ホスト名が変(´・ω・`) -> $err"],
[青]では「リモホ」(リモートホスト:接続元のホスト名)ではないので「ホスト名」に変えました。
追加
"Good bye 4023", "多分、IPアドレスが変(´・ω・`) -> $err"
ローカルなIPアドレスと思しきものを入れたときに出ます。
"Good bye 4024", "多分、ホスト名が変(´・ω・`) -> $err"
正引きできなかったホストに対して出ます。 ■ このスレッドは過去ログ倉庫に格納されています