[過去ﾛｸﾞ] 【Project peko】2ch特化型サーバ・ロケーション構築作戦 Part16 (1001ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
843: 動け動けウゴウゴ２ちゃんねる 05/01/22 16:26 ID:DA1vmGhy0(1) AAS
>1. 新たにRock54キック用のサブドメインBBR（仮名）を設ける。
Kick(X9)〜という名前を勝手に考えてみたりするﾃｽﾂ。
"キ"にあたる数字が……_|￣|○
844: ◆tuboBGQODY 05/01/22 17:50 ID:hxQEis6D0(1) AAS
Kick81？
それだとBoo81とかぶるんだよなあ。
845: FOX ★ 05/01/22 17:56 ID:???0 AAS
ここに貼っちゃおう
1) 本体からの呼び出し -> Rock54サブルーチン
&BBXcheck($GB);#Rock54 (広告爆撃を迎撃)
846: FOX ★ 05/01/22 18:00 ID:???0 AAS
2) Rock54 サブルーチン
sub BBXcheck
{
my ($GB) = @_;
#以下の板はするー
if($GB->{FORM}->{'bbs'} eq "sec2chd"){return 0;}
if($GB->{FORM}->{'bbs'} eq "ad"){return 0;}
#★はスルー
if($GB->{FORM}->{'FROM'} =~ /★$/){return 0;}
#●はスルー
省35
847(1): FOX ★ 05/01/22 18:03 ID:???0 AAS
IsKoukoku 回りまで必要な場合は教えてくださいー
848: 未承諾広告※ ◆TWARamEjuA 05/01/22 18:19 ID:oSftVaKP0(2/11) AAS
>>847
846 に追記するだけで逝けそうですーm(_ _)m深謝
あと、鯖名と、スレッド番号を得たいのですけれども、ハシュキーは何になるのでしょうか？
$GB->{FORM}->{'bbs'} は、板名（ディレクトリ名）ですねー♪
スレッド番号は $GB->{FORM}->{'thread'} かなー？
鯖名は $GB->{FORM}->{'host'} かなー？
849: FOX ★ 05/01/22 18:19 ID:???0 AAS
one moment
850(1): FOX ★ 05/01/22 18:25 ID:???0 AAS
スレッド番号は $GB->{FORM}->{'key'} にしてくださいー
鯖名は $ENV{'SERVER_NAME'} をそのまま使っています
851: 未承諾広告※ ◆TWARamEjuA 05/01/22 18:31 ID:oSftVaKP0(3/11) AAS
>>850
ありがとうございますですー
ではさっそくｺﾞﾆｮｺﾞﾆｮ ＠お酒はおあずけ
852(1): 未承諾広告※ ◆TWARamEjuA 05/01/22 19:02 ID:oSftVaKP0(4/11) AAS
>>842
> rock54.2ch.net <=> bbx.2ch.net に相当する、
> ??????.2ch.net <=> bbr.2ch.net の ?????? のよさげな名前を決めていただければ、
> それで作ろうかなと。
えー、rock54とbbxとbbrは三角関係なので、アカウントはそのまま（Rock54だけ）でも大丈夫ですー
853(2): root▲ ★ 05/01/22 19:04 ID:???0 AAS
>>852
なるほど。rock54の権限でbbrも操作できるようにすればいいのかな。
では、bbrの器をつくります。
これから外出なので、しばらくあとで。
854: 未承諾広告※ ◆TWARamEjuA 05/01/22 19:05 ID:oSftVaKP0(5/11) AAS
# このようにそれぞれに値が代入されます。
# $NG_word_status[0] には規制文字列 [Shift_JIS]
# $NG_word_status[1] には MD5 値
# $NG_word_status[2] には フラグ
# BBR へ送信（NGワード追跡装置？） @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな？
gethostbyname(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
省12
855: 未承諾広告※ ◆TWARamEjuA 05/01/22 19:15 ID:oSftVaKP0(6/11) AAS
こんな感じでおながいしますー（さくらﾀﾝも採取したいのでので）
>>853
bbr さんは、Rock54さんに目がけてやってきたクエリを、ファイルを経由して渡すだけなのですー
856: 未承諾広告※ ◆TWARamEjuA 05/01/22 19:20 ID:oSftVaKP0(7/11) AAS
> >>853
> bbr さんは、Rock54さんに目がけてやってきたクエリを、ファイルを経由して渡すだけなのですー
bbr さんは、Rock54さんへ、やってきたクエリを、ファイルを経由して渡すだけなのですー
訂正しますm(_ _)m
857: FOX ★ 05/01/22 20:00 ID:???0 AAS
まずは 入れてみます @qb6
858: 動け動けウゴウゴ２ちゃんねる 05/01/22 20:10 ID:AHIHTfw70(1) AAS
> 189 名前：ひろゆき＠どうやら管理人 ★ [] 投稿日：05/01/22(土) 18:58:53 ID:d/yZXs4H ?##
> 2ch板:argueをqa.2ch.netに移転したかったりするのですが、
> 最近は、誰に頼めばいいんでしょうか？
質問・雑談スレ96＠運用情報板
2chｽﾚ:operate
859: FOX ★ 05/01/22 20:13 ID:???0 AAS
いれてみましたー @qb6
テスト するするー
860: 動け動けウゴウゴ２ちゃんねる 05/01/22 20:31 ID:/Qp1hs8m0(1) AAS
◯qa
×qb6
激しく誤爆されそう。
861: FOX ★ 05/01/22 20:38 ID:???0 AAS
ex7 にも入れてみましたー
862(1): FOX ★ 05/01/22 20:49 ID:???0 AAS
現状 @qb6,ex7
#広告かな?
my $NG_word = &IsKoukoku($GB);
if($NG_word eq ''){return 0;}
# それぞれの値を取り出したいときは、以下のようにデリファレンスすれば・・・
my @NG_word_status = @{$NG_word};
# このようにそれぞれに値が代入されます。
# $NG_word_status[0] には規制文字列 [Shift_JIS]
# $NG_word_status[1] には MD5 値
# $NG_word_status[2] には フラグ
省30
上下前次1-新書関写板覧索設栞歴
あと 139 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.010s