bbs.cgi再開発プロジェクト7

**root▲ ★** · NG

bbs.cgiの開発作業をすすめていくためのスレッドです。

FOXさんの努力によりSpeedyCGIへの対応が行われ、
パフォーマンスの向上が図られたbbs.cgi。

・雪だるま作戦への対応
・さらなるカスタマイズ
・パフォーマンスの向上
・微妙な虫取り
・長いメインルーチンをより短くコンパクトに

あたりがターゲットか。

前スレ:
bbs.cgi再開発プロジェクト6
http://qb5.2ch.net/test/read.cgi/operate/1113117347/

**root▲ ★** · NG

過去スレ:
bbs.cgi 再開発ﾌﾟﾛｼﾞｪｸﾄ
http://qb3.2ch.net/operate/kako/1053/10530/1053067870.html
bbs.cgi再開発プロジェクト２
http://qb3.2ch.net/operate/kako/1069/10691/1069144193.html
bbs.cgi再開発プロジェクト３
http://qb5.2ch.net/operate/kako/1076/10766/1076666901.html
bbs.cgi再開発プロジェクト４
http://qb5.2ch.net/operate/kako/1101/11019/1101984763.html
bbs.cgi再開発プロジェクト5
http://qb5.2ch.net/operate/kako/1103/11034/1103495887.html
bbs.cgi再開発プロジェクト6
http://qb5.2ch.net/test/read.cgi/operate/1113117347/

関連スレ:
【雪だるま】bbsd⇔各cgi間のI/F仕様について考え・詰めていくスレッド
http://qb5.2ch.net/test/read.cgi/operate/1130482779/

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 17:06:52

/i

っていまだに生きてるんでしょうかね？
もしそうでなければ「Apacheレベルでcへリダイレクトに変更」でもかまわないとおもうのですが・・・

# たしかiってcの前身でいいんですよね？

**root▲ ★** · NG

前スレの終盤で出た事項:
・/i はのろいらしい
・で、ほとんど取ったつもりだが、まだちょっとだけ残っているらしい

988 名前：root▲ ★[sage] 投稿日：2005/11/02(水) 16:46:50 ID:???0 ?###
友人の話では、Perl では /i の処理がめちゃんこ遅いという話があるらしい。

つまり、
if($ENV{'SERVER_NAME'} =~ /2ch\.net/i)

みたいなのも、ちりも積もれば山となる可能性ありと。

989 名前： ◆SSu.zv/rvs [sage] 投稿日：2005/11/02(水) 16:48:01 ID:4sehsTr40
ほとんど /i は取ったつもりだけど・・・

990 名前：▲ ◆SANUKI/VII [sage] 投稿日：2005/11/02(水) 16:48:34 ID:j49UPKofP
iってまだあったっけ？

991 名前：root▲ ★[sage] 投稿日：2005/11/02(水) 16:50:00 ID:???0 ?###
>>989
多くはないみたいですが、いくつか散見されるようです。
(>>988 は実際のソースからのコピペ)

992 名前：root▲ ★[sage] 投稿日：2005/11/02(水) 16:54:08 ID:???0 ?###
気づいたところは、私のほうでも取っておくです。
今ざっと見直してみましたが、たぶん、もうそんなにないと思いますです。

**root▲ ★** · NG

>>3
えっと、そうじゃなくて、文字列比較の時の /i です。
つまり、大文字小文字を区別しない場合の話。

どうも、Perlってこんなかんじのことをしているらしいのです(裏とっていないのでうそかもです)。

/ABC/i の処理
↓
abc
abC
aBc
Abc
AbC
ABc
AbC
aBC
ABC
と、それぞれ比較

**root▲ ★** · NG

あ、AbCがひとつ多いね。

▲ ◆SANUKI/VII · NG

おじさんが急いで1000取りしてるように見えた

◆SSu.zv/rvs · 2005/11/02(水) 17:33:35

正規表現をインタプリタで動かしたら
1,000万はあながち嘘じゃないっすよ

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 17:38:30

Perlをインタプリタと言い切るのは誤解の元

**root▲ ★** · NG

>>8
複雑なのをくべると、まじめにありそうですね。< 1000万

/i の件については、知り合いのPerlプログラマの話だと、

/ABC/i
/[Aa][Bb][Cc]/

で、下のほうが明らかにパフォーマンスがいい(というか、上が悪杉らしい)そうなので、
Perlの /i の実装がへぼいということの模様です。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 18:03:00

>>10
あーその話ですか、スマソ。では本件の場合は2ch.netの大文字小文字区別なわけなので

if($ENV{'SERVER_NAME'} =~ /2ch\.net/i)

を

if($ENV{'SERVER_NAME'} =~ /2[Cc][Hh]\.[Nn][Ee][Tt]/)

とすればいいんでしょかね。

**root▲ ★** · NG

>>11
そういうことなわけですが、
現状、単純に /i を取ってしまってもいいような気がします。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 18:08:47

ttp://qb5.2CH.NET/ではアクセスできないんだっけ？
ドメインはCase無関係だよね

◆SSu.zv/rvs · 2005/11/02(水) 18:09:02

わたしは

◆SSu.zv/rvs · 2005/11/02(水) 18:09:22

iをとってコーディングしています

**root▲ ★** · NG

>>14-15
…ですね。ほとんどの部分はそうなっているです。

>>13
規格上はそうですが、そのへんはいろいろ微妙なようですね。
小文字に直してから送出してくるブラウザやシステムも、少なからずある模様。

◆SSu.zv/rvs · 2005/11/02(水) 18:13:03

実際にはそれで(iなし) 何の問題も起こっていません

◆SSu.zv/rvs · 2005/11/02(水) 18:15:39

ちなみに

2CH.net 等でアクセスしたら(bbs.cgiにそう入ってきたら) Samba24=600 にしてます

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 18:40:49

iがどのくらい遅いかは、考えるより測ったほうがいいんじゃない？
use Benchmark;で。

**root▲ ★** · NG

>>19
そんなのあるですか。

とりあえずできるだけ(数箇所ですが)、追放してみた。 @ qb6
様子を見て配布予定。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 18:48:02

>>18
$ENV{SERVER_NAME}はブラウザから渡される値を直ではなくapacheが生成するのでは？

まあ/iが高価なこととは関係ないんだけど

◆SSu.zv/rvs · 2005/11/02(水) 18:52:20

いやー

言いたいことは「iは使わない」という方針でやっているから
議論の意味がないということだったり

**root▲ ★** · NG

>>22
999(仮名)をみるところも、/i 追放してよかですか?

◆SSu.zv/rvs · 2005/11/02(水) 18:54:37

できるならってことかと、

**root▲ ★** · NG

>>24
なるほど。
じゃ、追放したいですね。1レスごとに絶対になめるところだから。

追放しますので、規制リストを書く時には気をつけてくださいーって、
ちょろさんに伝えておいてくださいです。

◆SSu.zv/rvs · 2005/11/02(水) 18:58:26

ちょろさんがやっているのは一面かと、
多面はアクセスする側だったり、、、

◆SSu.zv/rvs · 2005/11/02(水) 18:58:56

他面だった

**root▲ ★** · NG

sec2chdを見ている限り、大文字小文字がきちんと入るなら、
現状ならアクセスする側も実害はないかなと、思っていたり。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/02(水) 19:07:10

use Benchmarkも良いけど、プロファイルもね。

**root▲ ★** · NG

>>29
ですね。
プロファイリングのおかげで、
改良前のIsKoukokuがめちゃくちゃ高コストだったことがわかったです。

今は※の人の改良のおかげで、live系以外は有効にできました。

**root▲ ★** · NG

BBS.CGI - 2005/11/03

index.html にできるリンク関連を修正。

・www2.ime.st => www.ime.st
・https:// でも ftp:// でも http:// になってしまっていたのを修正(虫取り)
・同時に /ig も追放。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/03(木) 05:17:16

root氏めちゃくちゃおっつぃんぐ

**root▲ ★** · NG

さらに調整。

・https:// と ftp:// は ime.st / pinktower.com を経由しない
(bbs.cgiが当初の思想として予期した動作)
・http:// の外部リンクは ime.st / pinktower.com 経由(従来通り)
・gopher: whois: news: telnet: の特殊処理を廃止
・https:// と ftp:// の処理は、一部サーバ(live系など)ではリンクにしない
・http:// は従来通りどのサーバでもリンクにする

**root▲ ★** · NG

重そうな正規表現パターンマッチングを少しは整理できたと思うです。
html/ の下のやつ全部、この処理通っているので、
意外とばかにならないんじゃないかなと。

**root▲ ★** · NG

>>33 は、板トップ(index.html)生成部分の処理です。
(read.cgi ではないので要注意)

**動け動けウゴウゴ２ちゃんねる** · 2005/11/03(木) 11:24:31

>>33
> ・gopher: whois: news: telnet: の特殊処理を廃止

そんなごにょごにょしてたんですか・・・

**root▲ ★** · NG

>>36
大昔から、変わってなかったんでしょうね。

この4つは「私が２ちゃんねるに来た2001年～現在まで、
一度もリンクとして使われているのを見たことがなかった」ので、
もはや不要であろうと判断したです。

**root▲ ★** · NG

&jcode::tr(\$GB->{FORM}->{'FROM'}, '＃', '#');
とか、
&jcode::tr(\$GB->{FORM}->{'mail'}, '＃', '#');

とかって、もうちょっと効率よくできないのかしら。

◆TWARamEjuA · NG

>>38
そんなあなたに・・・
use encoding;
http://search.cpan.org/~dankogai/Encode-2.12/encoding.pm

**root▲ ★** · NG

>>39
それ、5.6.1でも使える?

**root▲ ★** · NG

BBS.CGI - 2005/11/04

動きそのものは変わりませんが、雪だるまをめざして
bbs_main のかなりの部分をサブルーチン化しました。

$GB 操作しているのでカプセル化はぜんぜんですが、
自分で読んでいて、bbs_main が長すぎて頭がうにーになってきたので、
整理の意味を込めて、いじっています。

ひととおりのテストはしてありますので、大丈夫だとは思いますが、
もし何かへんなことがあったら、知らせてくださいです。

**動け動けウゴウゴ２ちゃんねる** · 2005/11/04(金) 22:11:35

｜∀・）＜いくらー

◆TWARamEjuA · NG

>>40
http://search.cpan.org/src/DANKOGAI/Encode-2.00/encoding.pm
うー（苦笑）
=head1 ABSTRACT

Let's start with a bit of history: Perl 5.6.0 introduced Unicode
support. You could apply C<substr()> and regexes even to complex CJK
characters -- so long as the script was written in UTF-8. But back
then, text editors that supported UTF-8 were still rare and many users
instead chose to write scripts in legacy encodings, giving up a whole
new feature of Perl 5.6.

Rewind to the future: starting from perl 5.8.0 with the B<encoding>
pragma, you can write your script in any encoding you like (so long
as the C<Encode> module supports it) and still enjoy Unicode support.
This pragma achieves that by doing the following:

**動け動けウゴウゴ２ちゃんねる** · 2005/11/04(金) 22:49:22

もしかしてjcode.pl使ってるの？
だとしたら、MakefileしたJcode.pmの方が速いんじゃ？

**root▲ ★** · NG

>>44
Jcodeは他のところで使っているはずなので、全サーバに入っているはずですね。

どうすればいいのかしら。

◆TWARamEjuA · NG

>>44
おそらくほとんどのbanana鯖には入っていないと思うので、
かなりむりぽかと（哀）＠なのでPerl5.6.*のまま

>>45
なので、banana鯖に入ってJcode.pm 0.88あたりをゲトして組み込まなきゃだと思うのですです（泪）
最新のJcode.pm は2.1*でしてEncode.pmのラッパになっていたりします。@5.8.*

なので、PIEの中の人にbananaにperlを5.8.*（最新は5.8.7）におながいしないと。。。