peko作戦について語るスレです。
サーバロケーションPIEに関する話題もこちらで。
<現在の主要なテーマ>
・read.cgiのmod_cgidso化によるパフォーマンスアップ
・bbs.cgiのSpeedyCGI化によるパフォーマンスアップ
・FreeBSD 5.3Rへのサーバ更新作業&さらなるチューニング
<関連板・スレッド>
また挑戦。@2ch掲示板
http://dso.2ch.net/myanmar/
また挑戦2。@2ch掲示板
http://dso.2ch.net/yangon/
bbs.cgi再開発プロジェクト4
http://qb5.2ch.net/test/read.cgi/operate/1101984763/
read.cgi再開発スレ
http://qb5.2ch.net/test/read.cgi/operate/1087199303/
<関連サイト>
レンタルサーバー maido3.com 2ちゃんねるの転送量: http://server.maido3.com/pie/
MRTGによる統計情報: http://mumumu.mu/mrtg/
2ちゃんねる/PINKちゃんねる 稼動中のサーバ一覧: http://mumumu.mu/serverlist.html
<前スレ>
【Project peko】2ch特化型サーバ・ロケーション構築作戦 Part15
http://qb5.2ch.net/test/read.cgi/operate/1093068260/
探検
【Project peko】2ch特化型サーバ・ロケーション構築作戦 Part16
レス数が950を超えています。1000を超えると書き込みができなくなります。
1root▲ ★
04/12/04 00:28:18ID:???05/01/22 20:10:30ID:AHIHTfw70
> 189 名前:ひろゆき@どうやら管理人 ★ [] 投稿日:05/01/22(土) 18:58:53 ID:d/yZXs4H ?##
> http://live14.2ch.net/argue/をqa.2ch.netに移転したかったりするのですが、
> 最近は、誰に頼めばいいんでしょうか?
質問・雑談スレ96@運用情報板
http://qb5.2ch.net/test/read.cgi/operate/1106316059/189
> http://live14.2ch.net/argue/をqa.2ch.netに移転したかったりするのですが、
> 最近は、誰に頼めばいいんでしょうか?
質問・雑談スレ96@運用情報板
http://qb5.2ch.net/test/read.cgi/operate/1106316059/189
859FOX ★
05/01/22 20:13:05ID:???0 いれてみましたー @qb6
テスト するするー
テスト するするー
05/01/22 20:31:26ID:/Qp1hs8m0
◯qa
×qb6
激しく誤爆されそう。
×qb6
激しく誤爆されそう。
861FOX ★
05/01/22 20:38:34ID:???0 ex7 にも入れてみましたー
862FOX ★
05/01/22 20:49:26ID:???0 現状 @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] には フラグ
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
my $AHOST = sprintf(qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME} # 鯖名(FQDN)
);
# このときに・・・
if ($NG_word_status[2] == 1) # フラグが 1 のときは「いっぱつフラグ」なのでその時の処理。
{
&DispError2($GB,"ERROR!","さくらが咲いてますよ。");
}
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
if($SPAM eq "127.0.0.2")
{
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($GB->{NOWTIME});
$mon ++;
endhtml($GB);#&DispError2($GB,"ERROR!","ERROR:ロックは人生だ。");
}
if($SPAM eq "127.0.0.0")
{
$FOX->{BBX} = 0;
}
return 0;
#広告かな?
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] には フラグ
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
my $AHOST = sprintf(qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME} # 鯖名(FQDN)
);
# このときに・・・
if ($NG_word_status[2] == 1) # フラグが 1 のときは「いっぱつフラグ」なのでその時の処理。
{
&DispError2($GB,"ERROR!","さくらが咲いてますよ。");
}
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
if($SPAM eq "127.0.0.2")
{
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($GB->{NOWTIME});
$mon ++;
endhtml($GB);#&DispError2($GB,"ERROR!","ERROR:ロックは人生だ。");
}
if($SPAM eq "127.0.0.0")
{
$FOX->{BBX} = 0;
}
return 0;
863未承諾やや酩酊※ ◆TWARamEjuA
05/01/22 21:12:00ID:oSftVaKP0 >>862
えぇーっと、BBXとBBRは別物なので、別々に呼び出して欲しいですーm(_ _)m
でもって、
&foxDNSquery2(DNSクエリ);
っていうのが、新しいDNS問い合わせ屋さんなのでしょうか?
でしたら・・・
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
&foxDNSquery2(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
);
と、差し替えて頂ければm(_ _)m
えぇーっと、BBXとBBRは別物なので、別々に呼び出して欲しいですーm(_ _)m
でもって、
&foxDNSquery2(DNSクエリ);
っていうのが、新しいDNS問い合わせ屋さんなのでしょうか?
でしたら・・・
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
&foxDNSquery2(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
);
と、差し替えて頂ければm(_ _)m
864FOX ★
05/01/22 21:13:24ID:???0 ぁぁ
なるほど、、、
改修してきます
なるほど、、、
改修してきます
865未承諾やや酩酊※ ◆TWARamEjuA
05/01/22 21:14:28ID:oSftVaKP0 あ、
846 をそっくりそのまま書き換えた方が良さそうですよね。
ではちょとゴソゴソ。。。
846 をそっくりそのまま書き換えた方が良さそうですよね。
ではちょとゴソゴソ。。。
866FOX ★
05/01/22 21:17:38ID:???0 答えいらない系は foxDNSquery なんでそっちにします
867FOX ★
05/01/22 21:19:59ID:???0 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] には フラグ
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
&foxDNSquery(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
);
# このときに・・・
if ($NG_word_status[2] == 1) # フラグが 1 のときは「いっぱつフラグ」なのでその時の処理。
{
&DispError2($GB,"ERROR!","さくらが咲いてますよ。");
}
my $HHH = $ENV{REMOTE_ADDR};
$HHH =~ s/(\d+)\.(\d+)\.(\d+)\.(\d+)/$4.$3.$2.$1/;
my $AHOST = "$HHH.bbx.2ch.net.";
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
if($SPAM eq "127.0.0.2")
{
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($GB->{NOWTIME});
$mon ++;
endhtml($GB);#&DispError2($GB,"ERROR!","ERROR:ロックは人生だ。");
}
if($SPAM eq "127.0.0.0")
{
$FOX->{BBX} = 0;
}
return 0;
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] には フラグ
# BBR へ送信(NGワード追跡装置?) @2005/01/22 by 未承諾広告※
# MD5-該当ワードに付けられたmd5値.さくらフラグ.投稿者のIPアドレス.サブスクライバ.スレッド番号.板名.鯖名.bbr.2ch.net.
# 返り値はいらないけれどもTimeOut処理が要りそうだからNet::DNSを使った方がよいかな?
&foxDNSquery(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
);
# このときに・・・
if ($NG_word_status[2] == 1) # フラグが 1 のときは「いっぱつフラグ」なのでその時の処理。
{
&DispError2($GB,"ERROR!","さくらが咲いてますよ。");
}
my $HHH = $ENV{REMOTE_ADDR};
$HHH =~ s/(\d+)\.(\d+)\.(\d+)\.(\d+)/$4.$3.$2.$1/;
my $AHOST = "$HHH.bbx.2ch.net.";
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
if($SPAM eq "127.0.0.2")
{
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($GB->{NOWTIME});
$mon ++;
endhtml($GB);#&DispError2($GB,"ERROR!","ERROR:ロックは人生だ。");
}
if($SPAM eq "127.0.0.0")
{
$FOX->{BBX} = 0;
}
return 0;
868未承諾やや酩酊※ ◆TWARamEjuA
05/01/22 21:21:10ID:oSftVaKP0 こんな感じになるかとー
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;}
#●はスルー
#if($GB->{MARU}){return 0;}
#広告かな?
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] には フラグ
※つづく(改行大杉(滂沱))
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;}
#●はスルー
#if($GB->{MARU}){return 0;}
#広告かな?
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] には フラグ
※つづく(改行大杉(滂沱))
869FOX ★
05/01/22 21:22:54ID:???0 全サーバ 入れなおした
870未承諾やや酩酊※ ◆TWARamEjuA
05/01/22 21:23:55ID:oSftVaKP0871root▲ ★
05/01/22 23:43:25ID:???0 戻りました。これから作業入ります。
872未承諾酩酊※ ◆TWARamEjuA
05/01/23 00:05:06ID:ZJ7tlzHz0 >>871
おつですーm(_ _)m
BBRが動き出しましたら、
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
を一旦、
if(!$FOX->{BBX}){return 0;}
my $SPAM = '127.0.0.0';
にして、
qb6だけに配布をおながいしますーm(_ _)m
(実験中の規制入りは心許ないかと思いまして(苦笑))
そこである程度だめ出しが出来たら、
変更部分を元に戻して全鯖へ配布がよいかと♪
おつですーm(_ _)m
BBRが動き出しましたら、
if(!$FOX->{BBX}){return 0;}
my $SPAM = &foxDNSquery2($AHOST);
を一旦、
if(!$FOX->{BBX}){return 0;}
my $SPAM = '127.0.0.0';
にして、
qb6だけに配布をおながいしますーm(_ _)m
(実験中の規制入りは心許ないかと思いまして(苦笑))
そこである程度だめ出しが出来たら、
変更部分を元に戻して全鯖へ配布がよいかと♪
873root▲ ★
05/01/23 00:05:59ID:???0 bbr.2ch.net な DNS サーバは、 206.223.147.41 で立ち上げる予定です。
「答え要らない系」なので、このIPアドレスを指定した上で query 出すようにしてください。
2ch側のDNSサーバの設定変更が必要ですが、
DNS設定変更の前にbbs.cgiを変更できます。
(直接queryを投げているので)
query出す準備ができたら、ここでお知らせします。
「答え要らない系」なので、このIPアドレスを指定した上で query 出すようにしてください。
2ch側のDNSサーバの設定変更が必要ですが、
DNS設定変更の前にbbs.cgiを変更できます。
(直接queryを投げているので)
query出す準備ができたら、ここでお知らせします。
874FOX ★
05/01/23 00:19:08ID:???0 if(!$FOX->{BBX}){return 0;}
#my $SPAM = &foxDNSquery2($AHOST);
my $SPAM = '127.0.0.0';
にしました @qb6
#my $SPAM = &foxDNSquery2($AHOST);
my $SPAM = '127.0.0.0';
にしました @qb6
876FOX ★
05/01/23 00:25:30ID:???0 配布してないけど?
見てきます、
見てきます、
05/01/23 00:29:32ID:xqI4WVr80
BBRのところは配布したんじゃないの
BBXを聞かなくしたのはqb6のみ
BBXを聞かなくしたのはqb6のみ
880root▲ ★
05/01/23 00:35:18ID:???0 banana238側の設定中、、、。
これって、rock54のオーナーで動かないとだめなのかな。
ファイル作ってるみたいなんで。
これって、rock54のオーナーで動かないとだめなのかな。
ファイル作ってるみたいなんで。
881root▲ ★
05/01/23 00:39:01ID:???0 パーミッション的には、そうでなくても大丈夫なのかな。
ちょっと確認してみるです。
ちょっと確認してみるです。
883root▲ ★
05/01/23 00:46:01ID:???0 ということで、>>867 の bbr のところの &foxDNSquery の第2引数は、
"206.223.147.41"を指定してくださいです。
bbxのところは従来どおりでいいはず。(変更してないので)
"206.223.147.41"を指定してくださいです。
bbxのところは従来どおりでいいはず。(変更してないので)
885root▲ ★
05/01/23 00:46:48ID:???0 再確認ですが、bbr.2ch.net にはどういうフォーマットでquery飛ぶんだっけか。
886FOX ★
05/01/23 00:49:34ID:???0 &foxDNSquery(
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
"206.223.147.41"
);
どうやって書いたらいいのかな?
これじゃ まずそうだし、
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
"206.223.147.41"
);
どうやって書いたらいいのかな?
これじゃ まずそうだし、
887root▲ ★
05/01/23 00:49:38ID:???0 で、こいつ(BBR)にも同じ「止まっています」チェックを入れる必要があるのかなと。
889root▲ ★
05/01/23 00:53:59ID:???0 >>886
ううむ、sprintfが中に入ってるですか。
$FOX->{BBR} と ${CHOST} を作って、
${CHOST} に sprintf の中身でやってることをいれて、
BBSやBBYと同じようにするのが、よいと思います。
ううむ、sprintfが中に入ってるですか。
$FOX->{BBR} と ${CHOST} を作って、
${CHOST} に sprintf の中身でやってることをいれて、
BBSやBBYと同じようにするのが、よいと思います。
890root▲ ★
05/01/23 00:55:02ID:???0 ようは、「広告投稿」をトリガにした、BBYみたいなのがもう一つ増えるだけなんで、
プログラム側もそのように組むのが、よろしいかと。
プログラム側もそのように組むのが、よろしいかと。
891未承諾酩酊※ ◆TWARamEjuA
05/01/23 00:57:37ID:ZJ7tlzHz0 &foxDNSquery(
sprintf(qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
),
"206.223.147.41"
);
ですー♪
第2引数があるのですね(汗)
sprintf(qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
),
"206.223.147.41"
);
ですー♪
第2引数があるのですね(汗)
894root▲ ★
05/01/23 01:00:55ID:???0 >>891
えっと、他のと合わせたほうがよいので、
${CHOST} ってのを my して、そこにその第一引数を代入して、
呼ぶようにするサンプルをつくってあげてくださいです。
こんなかんじで。
my $CHOST = (ここにsprintfなんちゃら);
if($FOX->{BBR}) {$FOX->{BBR} = &foxDNSquery($CHOST,"206.223.147.41") ;
えっと、他のと合わせたほうがよいので、
${CHOST} ってのを my して、そこにその第一引数を代入して、
呼ぶようにするサンプルをつくってあげてくださいです。
こんなかんじで。
my $CHOST = (ここにsprintfなんちゃら);
if($FOX->{BBR}) {$FOX->{BBR} = &foxDNSquery($CHOST,"206.223.147.41") ;
895root▲ ★
05/01/23 01:02:59ID:???0 お、 } を閉じてないすね。上のやつ。
896未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:07:36ID:ZJ7tlzHz0 はいー♪
my $CHOST =
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
;
if($FOX->{BBR}) { $FOX->{BBR} = &foxDNSquery($CHOST, "206.223.147.41") }
my $CHOST =
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$GB->{IDNOTANE} !~ /\./ ? $GB->{IDNOTANE} : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
;
if($FOX->{BBR}) { $FOX->{BBR} = &foxDNSquery($CHOST, "206.223.147.41") }
897FOX ★
05/01/23 01:10:36ID:???0 みみまで 対応した @qb6
898root▲ ★
05/01/23 01:11:46ID:???0 >>896
どもです。これでよいはず。
こんなかんじのがDNSにとぶですか。
MD5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net
どもです。これでよいはず。
こんなかんじのがDNSにとぶですか。
MD5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net
900FOX ★
05/01/23 01:13:43ID:???0 はげしく ワラタ
901root▲ ★
05/01/23 01:15:28ID:???0 dnsq コマンドで ex7 から手で DNS query してみた。
DNS(器)側は問題ないみたい。
%dnsq a MD5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net 206.223.147.411 md5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net:
170 bytes, 1+0+1+0 records, response, authoritative, nxdomain
query: 1 md5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net
authority: bbr.2ch.net 2560 SOA a.ns.bbr.2ch.net 2ch.2ch.net 1106406759 16384 2048 1048576 0
DNS(器)側は問題ないみたい。
%dnsq a MD5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net 206.223.147.411 md5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net:
170 bytes, 1+0+1+0 records, response, authoritative, nxdomain
query: 1 md5-2029c3d6fe6b6924113b938852f77bf5.1.1.2.3.4.05001234567890-mb.1102087698.operate.qb5.2ch.net.bbr.2ch.net
authority: bbr.2ch.net 2560 SOA a.ns.bbr.2ch.net 2ch.2ch.net 1106406759 16384 2048 1048576 0
902未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:15:39ID:ZJ7tlzHz0906root▲ ★
05/01/23 01:22:52ID:???0907未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:23:12ID:ZJ7tlzHz0 bbrfilter.pl を書き換えたので、~/bbr/ から cp をおながいしますm(_ _)m
910未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:27:05ID:ZJ7tlzHz0912未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:40:21ID:ZJ7tlzHz0 う、bbrfilter.pl が機能していないいよかん、、、
ちょと調査してみるですm(_ _)m
ちょと調査してみるですm(_ _)m
914FOX ★
05/01/23 01:43:48ID:???0 どっかにいれますか?
915root▲ ★
05/01/23 01:46:27ID:???0 DNSの器のほうはOK(ブロックしないはず)なので、>>912 の調整ができれば、
入れてOKなんではないかしら。
広告投入しようとすると、BBXに加えてBBRも追加で呼ぶようになる、ってことすよね。ようは。
入れてOKなんではないかしら。
広告投入しようとすると、BBXに加えてBBRも追加で呼ぶようになる、ってことすよね。ようは。
917root▲ ★
05/01/23 01:51:31ID:???0 bbr への query きはじめました。
918root▲ ★
05/01/23 01:55:18ID:???0 MD5が同じのやつは、同じ広告を投入しようとしてはじかれた、ってことなのかな。
919未承諾酩酊※ ◆TWARamEjuA
05/01/23 01:56:19ID:ZJ7tlzHz0 あ、溜まってきたいよかん♪
でも何でだろう、、、(汗)
とりあえず、BBR_gatherさんを動かします。
でも何でだろう、、、(汗)
とりあえず、BBR_gatherさんを動かします。
921未承諾酩酊※ ◆TWARamEjuA
05/01/23 02:01:28ID:ZJ7tlzHz0 うぅむ、もちょと様子を見てみるです。。。
922root▲ ★
05/01/23 02:07:50ID:???0 そういえば、妙なバッファリングが起こったので、
bbxgatherの時は私が微妙にいじった記憶があるです。
今見ると、bbxgatherにはこんなコメントが。
# selectはwhileの前でやらないとうまく出力されない模様なので、
# 以下の行を前に持ってきた。
# 0.
# multilog へパイプをパイプパイプパイプ
# 本稼働の時にコメントアウトしてみりる。
# pipe to multilog
my $oldfh = select MULTILOG;
$| = 1;
select $oldfh;
bbxgatherの時は私が微妙にいじった記憶があるです。
今見ると、bbxgatherにはこんなコメントが。
# selectはwhileの前でやらないとうまく出力されない模様なので、
# 以下の行を前に持ってきた。
# 0.
# multilog へパイプをパイプパイプパイプ
# 本稼働の時にコメントアウトしてみりる。
# pipe to multilog
my $oldfh = select MULTILOG;
$| = 1;
select $oldfh;
923root▲ ★
05/01/23 02:11:58ID:???0924root▲ ★
05/01/23 02:15:16ID:???0 今の時間でこのぐらいの問い合わせ数なら、システムの負荷的には問題ないですね。
誤差の範囲かと。
誤差の範囲かと。
925root▲ ★
05/01/23 02:19:19ID:???0 で、bbr.2ch.netの2ch.netのDNSサーバへの登録は、このスレで別途依頼します。
Net::DNSを使って直接queryする方法を導入したので親ドメインへのDNS登録は
必ずしも必要ではなくなりましたが、
運用上の覚え書きとして、登録をしておきたいなと。
Net::DNSを使って直接queryする方法を導入したので親ドメインへのDNS登録は
必ずしも必要ではなくなりましたが、
運用上の覚え書きとして、登録をしておきたいなと。
926root▲ ★
05/01/23 02:21:06ID:???0 えっと、DNSに _ のままで query が飛んできてるみたいです。
0700(ふせふせ)_me っていうのを今見ました。
0700(ふせふせ)_me っていうのを今見ました。
927root▲ ★
05/01/23 02:25:15ID:???0 BBMのほうは _ => - に変換してから DNS 呼んでいるので、
こっちも、そのようにしたほうがよいのではないかと。
こっちも、そのようにしたほうがよいのではないかと。
928未承諾酩酊※ ◆TWARamEjuA
05/01/23 02:29:16ID:ZJ7tlzHz0 う、、、(汗)
my $SubNo = $GB->{IDNOTANE}; # _ → - 変換しなきゃかもなので。
$SUBNO =~ tr/_/-/;
my $CHOST =
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$SubNo !~ /\./ ? $SubNo : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
;
if($FOX->{BBR}) { $FOX->{BBR} = &foxDNSquery($CHOST, "206.223.147.41") }
これで桶かな?
my $SubNo = $GB->{IDNOTANE}; # _ → - 変換しなきゃかもなので。
$SUBNO =~ tr/_/-/;
my $CHOST =
sprintf qq|MD5-%s.%d.%s.%s.%d.%s.%s.bbr.2ch.net.|,
$NG_word_status[1], # MD5値
$NG_word_status[2] ? 1 : 0, # さくらフラグ。空っぽだとイヤンなので
$ENV{REMOTE_ADDR}, # IPアドレス(ひっくり返さなくてもいぃことにしよう♪)
$SubNo !~ /\./ ? $SubNo : '0', # サブスクライバじゃないみたいときには '0' にしておく。
$GB->{FORM}->{'key'}, # スレッド番号
$GB->{FORM}->{'bbs'}, # 板名(ディレクトリ名)
$ENV{SERVER_NAME}, # 鯖名(FQDN)
;
if($FOX->{BBR}) { $FOX->{BBR} = &foxDNSquery($CHOST, "206.223.147.41") }
これで桶かな?
929未承諾酩酊※ ◆TWARamEjuA
05/01/23 02:35:59ID:ZJ7tlzHz0930root▲ ★
05/01/23 02:37:41ID:???0 BBMのところは、こうやってるみたい。
$idnotane =~ s/\_/\-/g;
$idnotane =~ s/\_/\-/g;
933FOX ★
05/01/23 02:48:39ID:???0 んでは 直してきます
934FOX ★
05/01/23 02:53:17ID:???0 全サーバ配布しましたー
935未承諾酩酊※ ◆TWARamEjuA
05/01/23 03:00:09ID:ZJ7tlzHz0 ありがとうございましたですーm(_ _)m深謝
ちょと風邪の悪寒がしてきたので床に就くですですm(_ _)m
ちょと風邪の悪寒がしてきたので床に就くですですm(_ _)m
936FOX ★
05/01/23 03:02:48ID:???0 Rock54 on にしてもいいですか?
939FOX ★
05/01/23 03:03:29ID:???0 んじゃ いきますー
05/01/23 03:03:55ID:GqN3Eaff0
>>935
乙です
乙です
941FOX ★
05/01/23 03:04:40ID:???0 配布かんりょぅ
942root▲ ★
05/01/23 03:22:30ID:???0 2ch.net側のDNSの設定依頼です。
月曜にでも、よろしくお願いします。
(新規追加)
&bbr.2ch.net:206.223.147.41:a
月曜にでも、よろしくお願いします。
(新規追加)
&bbr.2ch.net:206.223.147.41:a
943root▲ ★
05/01/23 13:04:17ID:???0 朝の4時過ぎあたりから、BBRへのリクエストが来ていない模様。
DNS側は問題なさげ。bbs.cgiかしら。
DNS側は問題なさげ。bbs.cgiかしら。
944▲ 某ソレ511
05/01/23 13:20:35ID:adZ1/eFG0 BBR が止まっています ってほとんどの板のTOPにでてますねぇ。
945root▲ ★
05/01/23 13:25:14ID:???0 ざっと該当部分を読んでみたけど、よくわからないなぁ。
手でquery投げるとちゃんと答えは戻ってくるので、
DNS側は動いているみたい。
(ex7で実行)
%dig -t a +norec +short a.b.c.d.bbr.2ch.net @206.223.147.41
127.0.0.2
(DNS側)
@4000000041f3270b0247bf74 cedf966e:e6aa:703f + 0001 a.b.c.d.bbr.2ch.net
手でquery投げるとちゃんと答えは戻ってくるので、
DNS側は動いているみたい。
(ex7で実行)
%dig -t a +norec +short a.b.c.d.bbr.2ch.net @206.223.147.41
127.0.0.2
(DNS側)
@4000000041f3270b0247bf74 cedf966e:e6aa:703f + 0001 a.b.c.d.bbr.2ch.net
946root▲ ★
05/01/23 13:30:25ID:???0 あ、なんかわかったかも。
947root▲ ★
05/01/23 13:36:13ID:???0948root▲ ★
05/01/23 13:43:27ID:???0 1箇所、bbs.cgiに虫さんがいるみたい。
949root▲ ★
05/01/23 13:47:24ID:???0 qb6で試験。なおったもより。
initFOXに$FOX->{BBR} = 1の初期化を追加しましたと、FOXさんにお伝えくださいです。
initFOXに$FOX->{BBR} = 1の初期化を追加しましたと、FOXさんにお伝えくださいです。
950root▲ ★
05/01/23 13:49:27ID:???0 配布しました。
query来はじめました。
徐々に復活するかと。
query来はじめました。
徐々に復活するかと。
952FOX ★
05/01/23 22:58:11ID:???0 へんだなぁ・・・・
まっ いいか、
気のせい 気のせい
まっ いいか、
気のせい 気のせい
953root▲ ★
05/01/23 23:06:54ID:???0 cobra2245の器側の設定が概ね終了しました。
明日以降、oyster243から機能を移していきます。
で、その後にoyster243にもRAIDカードを入れていただいて、
BBQ/dnscacheを2台体制にしようとの目論見。
明日以降、oyster243から機能を移していきます。
で、その後にoyster243にもRAIDカードを入れていただいて、
BBQ/dnscacheを2台体制にしようとの目論見。
955root▲ ★
05/01/26 23:04:28ID:???0 これから出勤なので、まずは備忘メモ。
【 MACKEREL HAS BEEN DOWN 】リブート部隊連絡所 -- Count 01
http://qb5.2ch.net/test/read.cgi/operate/1089118995/134-135
134 名前:root▲ ★[sage] 投稿日:05/01/26 23:01:50 ID:???0
>>133
5.2.1R時代(ずっと安定していた)と比べて変えているのは、
メモリディスクを他のサーバよりもかなり大きくとって、
そこにBBQとdnscache関連のDNSデータとログを入れるようにしたことですね。
それ以外は変えていないので、そこに原因があるのはほぼ間違いなさげです。
cobra2245への切り替え作業を急ぎます。
135 名前:root▲ ★[sage] 投稿日:05/01/26 23:03:18 ID:???0
banaa272は、dnscacheの向きを変えていないのかも。とここにメモ。
【 MACKEREL HAS BEEN DOWN 】リブート部隊連絡所 -- Count 01
http://qb5.2ch.net/test/read.cgi/operate/1089118995/134-135
134 名前:root▲ ★[sage] 投稿日:05/01/26 23:01:50 ID:???0
>>133
5.2.1R時代(ずっと安定していた)と比べて変えているのは、
メモリディスクを他のサーバよりもかなり大きくとって、
そこにBBQとdnscache関連のDNSデータとログを入れるようにしたことですね。
それ以外は変えていないので、そこに原因があるのはほぼ間違いなさげです。
cobra2245への切り替え作業を急ぎます。
135 名前:root▲ ★[sage] 投稿日:05/01/26 23:03:18 ID:???0
banaa272は、dnscacheの向きを変えていないのかも。とここにメモ。
956root▲ ★
05/01/27 15:09:00ID:???0 BBQ落ちていた間書き込みが恒常的に難しくなったのは、
banana398 = live15
banana272 = aa5/off3
の2つかしら。
今見てみましたが、上記2つは現在もoyster243を向いているのを確認しました。
これらのサーバの/etc/resolv.confを変更しないと、
oyster243にRAID 1カードを入れる手術ができないので、
他にあったかどうかを教えていただけるとたすかります。
banana398 = live15
banana272 = aa5/off3
の2つかしら。
今見てみましたが、上記2つは現在もoyster243を向いているのを確認しました。
これらのサーバの/etc/resolv.confを変更しないと、
oyster243にRAID 1カードを入れる手術ができないので、
他にあったかどうかを教えていただけるとたすかります。
957root▲ ★
05/01/29 23:11:13ID:???0 てなわけで帰宅。
・oyster243 → cobra2245への機能移動作業
・c-xx 系全部にまじないを入れる作業
は、明日以降ということで。
・oyster243 → cobra2245への機能移動作業
・c-xx 系全部にまじないを入れる作業
は、明日以降ということで。
05/01/30 13:14:58ID:EsikgvrY0
レス数が950を超えています。1000を超えると書き込みができなくなります。
ニュース
- 【社会】三菱UFJ銀行 半沢頭取が会見へ 元行員が10数億円相当窃取で [あずささん★]
- 【滋賀】離島で船長してみる? 観光客倍増も担い手不足、想定年収370万円で絶賛募集 [煮卵★]
- “パーカー論争” 妹尾ユウカ氏、「社会のゴミ」とブチギレた堀江貴文氏に法的措置を検討「訴えれば勝てる」 [ネギうどん★]
- 【野球】田中将大巨人入り決定!幼なじみの坂本勇人とチームメイトに ★3 [Ailuropoda melanoleuca★]
- トランプ次期大統領、安倍昭恵氏と私邸で面会 安倍元首相をしのぶ [少考さん★]
- 国民民主の支持率、野党首位に 立憲民主を上回る 朝日新聞世論調査 ★2 [どどん★]
- NFL 2024/25 week15 part 2
- 【NJPW】新日本プロレスワールド part.2169
- 巨専】ようこそライマル&田中将
- ハム専 上沢式FA ★2
- とらせん
- わしせん 石井さんありがとう
- 🏡新春ゲーム祭り🏡
- 三菱UFJ頭取「うちの女性行員が10数億盗んでごめん」 [963243619]
- 【画像】若いイケメンに食事を奢って一日中連れ回すおじさん、楽しそう [732289945]
- 【朗報】可愛い犬種、満場一致で決まるwwwwwwwwwwww
- 【朗報】日本近海からイカが消えた理由、ついに解明される 「水揚量 30分の1」 [747976479]
- 【佐賀】パチンコ屋の客、刺される [419054184]