○とも子ってなんだよ?
実況スレを止める為に生まれたスクリプトです。
機能は一分間に一定数以上の書き込みがあるとスレッドにとも子が
降臨し、スレを止めてしまう機能です。
現在FOX★中心にとも子を調整中。
○とも子のまとめ@2ちゃんねるWiki:
導入されてるサーバーなんかも書いてあります。
http://info.2ch.net/wiki/pukiwiki.php?%a4%c8%a4%e2%bb%d2
○とも子実況報告スレ:
http://qb3.2ch.net/test/read.cgi/operate/1079186096/
○前スレ:
【実験】只今シベリアで「とも子」「リモホ表示」実験中。。。
http://qb3.2ch.net/test/read.cgi/operate/1082818622/
とも子=自動スレスト総合スレ2=
■ このスレッドは過去ログ倉庫に格納されています
1 [―{}@{}@{}-] あひるちゃん ◆717imnfvi2
04/05/15 02:45ID:xfpJTptR269▲ 某ソレ511
04/06/01 21:36ID:xBPraVKT $FORM{'key'}ってスレッドのキーはずだよねぇ。
たとえば>>265のスレでは1086087758のはず。
でも出てきてるkey= の数字が違うなぁ。
なにかbbs.cgiの前のほうで$FORM{'key'}を書き換えている動作でもあるのかな、
たとえば>>265のスレでは1086087758のはず。
でも出てきてるkey= の数字が違うなぁ。
なにかbbs.cgiの前のほうで$FORM{'key'}を書き換えている動作でもあるのかな、
04/06/01 21:38ID:57sx4AWP
1086091660は、
2004/06/01 21:07:40
になります。これは何の時間だろう?
2004/06/01 21:07:40
になります。これは何の時間だろう?
04/06/01 21:41ID:TGXUXocR
まさかファイルのクリエイトタイム(って言うんだっけ?)をキー代わりに使っているとか?
04/06/01 21:42ID:57sx4AWP
もしかして亀井絵里ってハロプロで一番可愛い?140
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086091660/
このスレのkeyと誤爆してる余寒。
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086091660/
このスレのkeyと誤爆してる余寒。
04/06/01 21:43ID:+ed5plmy
274▲ 某ソレ511
04/06/01 21:43ID:xBPraVKT もしかして亀井絵里ってハロプロで一番可愛い?140
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086091660/l50
そのキーを持つスレは別に存在してるみたいだなぁ。
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086091660/l50
そのキーを持つスレは別に存在してるみたいだなぁ。
http://newsplus.jp/~bikkuriman/key.cgi
1086087758 → 2004/06/01 20:02:38
1086091660 → 2004/06/01 21:07:40
う〜ん…
高負荷→とも子パニック→間違っちゃった テヘ♪ が一番わかりやすいかな…
って、負荷そんなに高くないですね。
http://ch2.ath.cx/load/ex6.html
1086087758 → 2004/06/01 20:02:38
1086091660 → 2004/06/01 21:07:40
う〜ん…
高負荷→とも子パニック→間違っちゃった テヘ♪ が一番わかりやすいかな…
って、負荷そんなに高くないですね。
http://ch2.ath.cx/load/ex6.html
04/06/01 22:13ID:57sx4AWP
>275
subject.txtを読み込んで、更新するときに、$FORM{'key'}をkeyを読み込むための
テンポラリな変数に使っちゃってたりしてね。
もう$FORM{'key'}は使わないからいいやー、ってな具合で。
で、そのとき読み込んだ最後のkeyが残ってて、とも子の判断ルーチンで使われている、と。
だとしたら誤爆というか、そもそもまともに動く可能性のほうが低いですな。
実際はどうなんでしょ。
subject.txtを読み込んで、更新するときに、$FORM{'key'}をkeyを読み込むための
テンポラリな変数に使っちゃってたりしてね。
もう$FORM{'key'}は使わないからいいやー、ってな具合で。
で、そのとき読み込んだ最後のkeyが残ってて、とも子の判断ルーチンで使われている、と。
だとしたら誤爆というか、そもそもまともに動く可能性のほうが低いですな。
実際はどうなんでしょ。
04/06/01 22:30ID:AAUEeVv/
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086090307/1 04/06/01 20:45
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086090307/255
255 名前:とも子 [sage] 投稿日: 04/06/01 21:37
STOP !! (175 res/min) 実況等は実況板でお願いします。
NOWTIME=1086093468 key=1086093381 lognum=254
http://ex6.2ch.net/test/read.cgi/morningcoffee/1086090307/255
255 名前:とも子 [sage] 投稿日: 04/06/01 21:37
STOP !! (175 res/min) 実況等は実況板でお願いします。
NOWTIME=1086093468 key=1086093381 lognum=254
04/06/01 22:44ID:88mVv10e
とりあえず"$FOMF{'key'}"でgrepしろ。
話はそれからだ。
話はそれからだ。
04/06/01 22:46ID:88mVv10e
s/FOMF/FORM/
04/06/01 22:48ID:DOwaajXw
s/grep/fgrep/
282動け動けウゴウゴ2ちゃんねる
04/06/01 22:49ID:tcbec3J5 なんでこんなスキルのないやつらが運用してんのさ
ちゃんとテスト鯖作ってテストしろよ
ちゃんとテスト鯖作ってテストしろよ
04/06/01 22:51ID:DOwaajXw
>>282
テスト鯖提供&テスト・デバッグ担当乙
テスト鯖提供&テスト・デバッグ担当乙
284FOX ★
04/06/01 22:51ID:??? ニヤニヤ
2ちゃんねるを救えるのは貴方だけだ > 282
がんばって チュッ
2ちゃんねるを救えるのは貴方だけだ > 282
がんばって チュッ
04/06/01 22:52ID:hpr1fDiX
川上とも子
04/06/01 22:52ID:wJ6IaV6z
288南アルプス ◆28UfbftxkA
04/06/01 22:57ID:EazSn7pi >>282
救世主キター
救世主キター
04/06/01 22:59ID:88mVv10e
grepすれば、%FORMが左辺値として使われてる所なんてすぐ見付かりそうなもんだけどなあ。
それともすごいスパゲッティなんですか?
それともすごいスパゲッティなんですか?
290FOX ★
04/06/01 23:00ID:??? >>289
なかったよ
なかったよ
04/06/01 23:01ID:+ed5plmy
>>290
工エエェェ(´д`)ェェエエ工
工エエェェ(´д`)ェェエエ工
04/06/01 23:02ID:88mVv10e
04/06/01 23:02ID:CYSIepuD
↓FOX ★の投げキッスを味わった>>282が一言
294▲ 某ソレ511
04/06/01 23:03ID:xBPraVKT つまり、%FORMだとなくて、$FORM{'key'}だとあるってことかな。
もっかい$FORM{'key'}でgrepしてみたら、
もっかい$FORM{'key'}でgrepしてみたら、
295FOX ★
04/06/01 23:04ID:??? なかったのよ
04/06/01 23:04ID:DOwaajXw
04/06/01 23:07ID:88mVv10e
fgrepとgrepって何が違うんだっけ。
04/06/01 23:07ID:+ed5plmy
FORM{key}は?
299動け動けウゴウゴ2ちゃんねる
04/06/01 23:07ID:ivOEt362 おじさんのことだから
$FROM でgrepしてる悪寒・・・。
#よくミスタイプするし・・・。
$FROM でgrepしてる悪寒・・・。
#よくミスタイプするし・・・。
300動け動けウゴウゴ2ちゃんねる
04/06/01 23:08ID:3Ut1gRa2 >>299
えぇっ〜〜〜
えぇっ〜〜〜
301FOX ★
04/06/01 23:09ID:??? 無いっていっているだろー
それとは別に他に変なところはあったけど
それとは別に他に変なところはあったけど
04/06/01 23:10ID:GXAt/NME
fgrep:正規表現の使えないgrep
04/06/01 23:11ID:+ed5plmy
304FOX ★
04/06/01 23:12ID:??? だからぁ
こんな勘が悪いなぁ。。。
他にbug 見つけたのよ
こんな勘が悪いなぁ。。。
他にbug 見つけたのよ
>>301
どこ?
どこ?
306FOX ★
04/06/01 23:13ID:??? × こんな
○ みんな
○ みんな
307FOX ★
04/06/01 23:13ID:???04/06/01 23:14ID:ukdQxH99
解決したんだーえがったねー
04/06/01 23:14ID:+ed5plmy
じゃ、しばらく経過観察?
04/06/01 23:15ID:GQDb06vA
ないしょだったらここで議論する意味ナイジャンヨ・・・。
λ....カエロ....
λ....カエロ....
312FOX ★
04/06/01 23:16ID:???04/06/01 23:17ID:+ed5plmy
316FOX ★
04/06/01 23:18ID:??? じぇんぶ貼るかい?
速度の速いスレッドを止めるんでなくて、実況を止めたいだけなら、
キタ━━━━(゚∀゚)━━━━
が5つくらい続いたら、とも子出現って方が確立高そうですね
キタ━━━━(゚∀゚)━━━━
が5つくらい続いたら、とも子出現って方が確立高そうですね
04/06/01 23:20ID:4MFMHCEv
>>316
みたいですー
みたいですー
319FOX ★
04/06/01 23:21ID:??? sub MakeWorkFile{
my $key = @_[0];
my $workfile = $TEMPPATH . $key . ".html";
my $dattemp = $DATPATH . $key . ".dat";
my (@messx,@content,@logdat);
my ($lognum,$mailto,$time,$brmax,$topnum,$firstlog,$name,$mail,$subject,$message);
open(RDAT,"<$dattemp");
@logdat=<RDAT>;#ログを配列に読み込む
close(RDAT);
#ログのカキコ数を取得
$lognum = @logdat;
if($lognum > 1020)#最後の手段
{
if(-w $dattemp){
my $datdat = $DATPATH . $key;
my $tmpdat = $DATPATH . $key . ".tmp";
my $success;
open(COPY, "cp $dattemp $datdat |");
close(COPY);
$success = 0;
until($success){ $success = rename($datdat, $dattemp); }
chmod(0555, $dattemp);
unlink($tmpdat);
}
DispError("ERROR!", "ERROR:このスレッドには書き込めません。最後の手段!!");
}
if($lognum > 1010)#念のため暴走ストッパー
{
umask(0);
chmod(0555, $dattemp);
DispError("ERROR!", "ERROR:このスレッドには書き込めません。緊急緊急緊急!!");
}
if($lognum > 999)
{
if(open(OUT,">>$dattemp"))
{
print OUT "1001<><>Over 1000 Thread<>このスレッドは1000を超えました。 <br> もう書けないので、新しいスレッドを立ててくださいです。。。 <>\n";
close(OUT);
$lognum++;
}
umask(0);
chmod(0555, $dattemp);
}
### とも子
elsif($lognum > 100 && &UseTomoko)
{
my $spp = $NOWTIME - $key;
my $speed = int($lognum*60/$spp);
if($speed > 12)
{
if(open(OUT,">>$dattemp"))
{
print OUT "とも子<>sage<> $DATE <> STOP !! ($speed res/min) 実況等は実況板でお願いします。<br>NOWTIME=$NOWTIME key=$key} lognum=$lognum<>\n";
close(OUT);
$lognum++;
}
umask(0);
chmod(0555, $dattemp);
}
else
{
#パーミッション調整
umask(0);
chmod(0666, $dattemp);
}
}
else
{
#パーミッション調整
umask(0);
chmod(0666, $dattemp);
}
#1つ目の要素を読み込む
$firstlog = $logdat[0];
#改行カット
chomp($firstlog);
my $key = @_[0];
my $workfile = $TEMPPATH . $key . ".html";
my $dattemp = $DATPATH . $key . ".dat";
my (@messx,@content,@logdat);
my ($lognum,$mailto,$time,$brmax,$topnum,$firstlog,$name,$mail,$subject,$message);
open(RDAT,"<$dattemp");
@logdat=<RDAT>;#ログを配列に読み込む
close(RDAT);
#ログのカキコ数を取得
$lognum = @logdat;
if($lognum > 1020)#最後の手段
{
if(-w $dattemp){
my $datdat = $DATPATH . $key;
my $tmpdat = $DATPATH . $key . ".tmp";
my $success;
open(COPY, "cp $dattemp $datdat |");
close(COPY);
$success = 0;
until($success){ $success = rename($datdat, $dattemp); }
chmod(0555, $dattemp);
unlink($tmpdat);
}
DispError("ERROR!", "ERROR:このスレッドには書き込めません。最後の手段!!");
}
if($lognum > 1010)#念のため暴走ストッパー
{
umask(0);
chmod(0555, $dattemp);
DispError("ERROR!", "ERROR:このスレッドには書き込めません。緊急緊急緊急!!");
}
if($lognum > 999)
{
if(open(OUT,">>$dattemp"))
{
print OUT "1001<><>Over 1000 Thread<>このスレッドは1000を超えました。 <br> もう書けないので、新しいスレッドを立ててくださいです。。。 <>\n";
close(OUT);
$lognum++;
}
umask(0);
chmod(0555, $dattemp);
}
### とも子
elsif($lognum > 100 && &UseTomoko)
{
my $spp = $NOWTIME - $key;
my $speed = int($lognum*60/$spp);
if($speed > 12)
{
if(open(OUT,">>$dattemp"))
{
print OUT "とも子<>sage<> $DATE <> STOP !! ($speed res/min) 実況等は実況板でお願いします。<br>NOWTIME=$NOWTIME key=$key} lognum=$lognum<>\n";
close(OUT);
$lognum++;
}
umask(0);
chmod(0555, $dattemp);
}
else
{
#パーミッション調整
umask(0);
chmod(0666, $dattemp);
}
}
else
{
#パーミッション調整
umask(0);
chmod(0666, $dattemp);
}
#1つ目の要素を読み込む
$firstlog = $logdat[0];
#改行カット
chomp($firstlog);
04/06/01 23:24ID:4MFMHCEv
あんがとー
ふむふむ
ふむふむ
322FOX ★
04/06/01 23:26ID:??? 見なかったということで、
まわせ まわせ
まわせ まわせ
04/06/01 23:27ID:+ed5plmy
ふーむ、キーは$keyにあった訳か。
><br>NOWTIME=$NOWTIME key=$key} lognum=$lognum<>¥n";
ここの } はいらない気がするけどまーいいか。
><br>NOWTIME=$NOWTIME key=$key} lognum=$lognum<>¥n";
ここの } はいらない気がするけどまーいいか。
04/06/01 23:27ID:iavEtg1Y
まわすのってなんか懐かしいですねぇ。
みんなIEで見てたあの頃。
みんなIEで見てたあの頃。
04/06/01 23:29ID:zUVHekY5
ああああヽ(`Д´)ノボッキアゲしたい
04/06/01 23:30ID:88mVv10e
そうなのね。
でさあ、$key=@_[0]で、本当にいいの?
直観的には$_[0]な気がするわけだが。
でさあ、$key=@_[0]で、本当にいいの?
直観的には$_[0]な気がするわけだが。
327FOX ★
04/06/01 23:31ID:???328▲ 某ソレ511
04/06/01 23:32ID:xBPraVKT さすがbbs.cgiだな。
なんで動いているのか分からないところがすばらしい。
なんで動いているのか分からないところがすばらしい。
04/06/01 23:32ID:88mVv10e
だめだ。最近perl書いてないから、man見ないと思いだせないや。
04/06/01 23:33ID:4MFMHCEv
動けば おーるおっけー
331rafale ★
04/06/01 23:35ID:??? ワラタ
これぞ2ちゃんって感じだねぇ。
これぞ2ちゃんって感じだねぇ。
334▲ 某ソレ511
04/06/01 23:39ID:xBPraVKT マジレスすると、qb6がbbs.cgiのテスト鯖だけどね
ただし500にならないかどうかのテストくらいしかできないだろうが
ただし500にならないかどうかのテストくらいしかできないだろうが
04/06/01 23:45ID:1x2ZS8K5
全ての板はtestディレクトリにある訳だが…
04/06/02 00:10ID:9sdEkp7l
なんでdatが正常生成できてるんだか分からにゃーのは
私のスキルが低杉だからですか?
私のスキルが低杉だからですか?
04/06/02 01:56ID:XqxZF8k1
338名無し募集中。。。
04/06/02 16:12ID:WKxmUe7rprint OUT "頑固トメ子<>sage<> $DATE <> ( ^▽^)<トメ子止めます!($speed res/min) ひとすじ、ふたすじ、実況は実況板でしなさい。<br>NOWTIME=$NOWTIME key=$key lognum=$lognum<>\n";
↑
バグ修正記念でこれに変更きぼんぬ
04/06/02 19:40ID:RhnYsNhC
とも子・・どこ行ったんだよ?俺が悪かったって、頼むから帰ってきてくれよ…
340動け動けウゴウゴ2ちゃんねる
04/06/02 19:41ID:RhnYsNhC つか、どこがバクか教えて下さい。尾長居します。
>my $spp = $NOWTIME - $key;
ここですか?
>my $spp = $NOWTIME - $key;
ここですか?
04/06/02 19:53ID:7NA17rJ6
>>339
余計な事を言うんじゃねーーw
余計な事を言うんじゃねーーw
04/06/02 19:58ID:7T1rUYxM
このスレもさびしくなるのう
343動け動けウゴウゴ2ちゃんねる
04/06/02 21:04ID:YgWhE1gt04/06/02 21:20ID:SzGdbmdP
>>343のスレのせいでAAサロンを開いた途端PCフリーズとの報告も 鯖負荷は深刻
298 名前:動け動けウゴウゴ2ちゃんねる[sage] 投稿日:04/06/01 23:37 ID:Uglmy+iK
結構色々な問題抱えているんだ。サロンのあのスレ、ありゃ酷いよ。
うちのパソ古い(6年前の機種だ)から最悪。サロンは最近もっぱら外部
アクセスで行っている。サロン開いた途端、うちのパソフリーズするし。
(デフラグ、ディスクスキャンでもだめぽだった)
スレ速度は大体レス間1〜2分といったところ
298 名前:動け動けウゴウゴ2ちゃんねる[sage] 投稿日:04/06/01 23:37 ID:Uglmy+iK
結構色々な問題抱えているんだ。サロンのあのスレ、ありゃ酷いよ。
うちのパソ古い(6年前の機種だ)から最悪。サロンは最近もっぱら外部
アクセスで行っている。サロン開いた途端、うちのパソフリーズするし。
(デフラグ、ディスクスキャンでもだめぽだった)
スレ速度は大体レス間1〜2分といったところ
04/06/02 21:27ID:RhnYsNhC
346動け動けウゴウゴ2ちゃんねる
04/06/02 21:50ID:CIQQ1BbK 名前を「素子」に変更せんかい。
04/06/02 22:40ID:QrscdxID
Josephsonもとこ?
04/06/02 23:04ID:1wmUpuWV
次は、BBS.2ch.netを活用した、インテリジェントとも子ですかね。
04/06/03 10:06ID:70aIAUNp
脱走したシマウマのトモコ(メス、9歳)が2日午前、“嫁入り先”の熊本市動植物園で亡くなった。
ttp://www.sanspo.com/shakai/top/sha200406/sha2004060303.html
ttp://www.sanspo.com/shakai/top/sha200406/sha2004060303.html
350動け動けウゴウゴ2ちゃんねる
04/06/06 01:13ID:Cpi3xI0Y >>349
ご愁傷様です。
ご愁傷様です。
351YahooBB219011162062.bbtec.net
04/06/06 01:14ID:Cpi3xI0Y 見たことねーや。とも子。
352動け動けウゴウゴ2ちゃんねる
04/06/06 21:34ID:aKleNkgc 芸スポにとも子さんを希望します!
大歓迎です!!!!
大歓迎です!!!!
04/06/06 21:37ID:eCG1HF2G
04/06/07 16:41ID:7hUCEFEh
FOX ★氏、ニュー速で実験したんなら、本番目的でニュー速+に入れてみたらどうよ
04/06/07 22:17ID:jPSQxQ54
記者制の板は記者が負荷の制御をするんじゃね?
356動け動けウゴウゴ2ちゃんねる
04/06/12 05:36ID:NHB5QRZ9 俺らをコケにしやがって
とも子たん萌え〜
とも子たん萌え〜
357動け動けウゴウゴ2ちゃんねる
04/06/12 05:40ID:NHB5QRZ9 とも子
ttp://haizin-damepo.hp.infoseek.co.jp/cgi-bin/upload/src/up0402.jpg
ttp://haizin-damepo.hp.infoseek.co.jp/cgi-bin/upload/src/up0402.jpg
04/06/12 21:40ID:eC88VNiR
>>357
ともこタン(*´д`*)ハァハァ
ともこタン(*´д`*)ハァハァ
359動け動けウゴウゴ2ちゃんねる
04/06/15 14:51ID:7Vo5+H8A kusoといい、とも子といい…
FOXは運営から降ろしちまえよ。真面目な話。
FOXは運営から降ろしちまえよ。真面目な話。
04/06/15 15:00ID:kq0959q1
>>360
そうだよ、FOXは夜勤さんだよ・・・
そうだよ、FOXは夜勤さんだよ・・・
363停止しました。。。
NGNG真・スレッドストッパー。。。( ̄ー ̄)ニヤリッ
■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 【サッカー】UEFA-CL準々決勝第2戦 レアル・マドリード×アーセナル、インテル×バイエルン [久太郎★]
- 10万円給付なら「外国人に3600億円」維新・柳ケ瀬氏が対象見直しを要求 [パンナ・コッタ★]
- トランプ大統領「軍事支援費用も議題」投稿、日本政府に動揺「知らなかった」 日本に負担増求める可能性 [Hitzeschleier★]
- 【芸能】粗品、石橋貴明の下半身露出に「国によっては極刑ちゃう? 飲食店の息子として考えられへん。キモすぎるもん、マジで」 [jinjin★]
- NHKプラス、10月からTV向けアプリでも常時同時配信開始。チューナーレスも“テレビ化”へ [香味焙煎★]
- 石橋貴明 セクハラ報道で謝罪「不快な思いをさせてしまったことを申し訳なく思っております」「かなり羽目を外してしまったかも」★3 [Ailuropoda melanoleuca★]
- 【悲報】石破、トランプの交渉参加に「話が違う!」 [481941988]
- 書き込んだやつ全員殺すスレ🏡
- 【悲報】でもお前ら「大阪万博」と近所の「下水処理場」どっち行きたいかって言われたら万博取るでしょ🤔 [616817505]
- 石破政権「国民全員に5万円給付すると言ったな?あれは嘘だw。最初から払うつもりなど無かったw」→暴動へ [252835186]
- トランプ「赤澤、良く来たな私が直接関税交渉してやろう」ゼレンスキーコースか? [668970678]
- 暫定税率(半世紀続いてます)。これが異常と思わない日本人がいるらしいけどあれなに?自民党も笑いが止まらないよな [472617201]