トップページphp
851コメント342KB

【激速】mod_perl SpeedyCGI FastCGI【激速】

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん2006/06/05(月) 20:01:09ID:+YcYjDiD
mod_perl
http://perl.apache.org/

SpeedyCGI
http://perldoc.jp/docs/modules/CGI-SpeedyCGI-2.21/SpeedyCGI.pod

前スレ
mod_perlを使おう!
http://pc8.2ch.net/test/read.cgi/php/1005122528/

ー二三ヘ( ゚∀゚)ノ
0798nobodyさん2008/11/08(土) 16:59:57ID:???
>>797の続き
logs/error.log
[Thu Nov dd hh:mm:ss yyyy] [warn] FastCGI: (dynamic) server "C:/cgi-bin/test.fcgi" started (pid 388)
[Thu Nov dd hh:mm:ss yyyy] [warn] FastCGI: (dynamic) server "C:/cgi-bin/test.fcgi" (pid 388) terminated
 with exit with status '0'
[Thu Nov dd hh:mm:ss yyyy] [warn] FastCGI: (dynamic) server "C:/cgi-bin/test.fcgi" restarted (pid 2516)
[Thu Nov dd hh:mm:ss yyyy] [error] [client 127.0.0.1] (OS 109)パイプは終了しました。 : FastCGI: comm with
server "C:/cgi-bin/test.fcgi" aborted:GetOverlappedResult() failed
[Thu Nov dd hh:mm:ss yyyy] [error] [client 127.0.0.1] FastCGI: incompleteheaders (0 bytes) received from
server "C:/cgi-bin/test.fcgi" [Thu Nov dd hh:mm:ss yyyy] [warn] FastCGI: (dynamic) server
"C:/cgi-bin/test.fcgi" (pid 2516) terminated with exit with status '0'
0799nobodyさん2008/12/05(金) 21:45:48ID:???
>>797
fastcgi の使い方がおかしい。
cpan でいろいろ探してみてみるといいよ。
0800nobodyさん2008/12/21(日) 15:01:42ID:rToLegsW
今かりているレンタル鯖でmod_perl使えると知って、せっせと勉強始してたのはいいんだけど
htaccessしか使えないレンタルユーザーが使えるのってやっぱCGIの高速化だけですよね?
mod_perlのプログラミング、なんかしっくりくるから続けたいけど・・・
どうにかしたら使えるんじゃないかってまだ判断しかねてます。
実際どうなんでしょ?
0801nobodyさん2008/12/21(日) 15:21:26ID:???
mod_perl は、その下にぶら下げておく perl の子が常駐することによって、
いろんな恩恵を受けれる。

ちなみにどこの鯖よ?
0802nobodyさん2008/12/21(日) 16:16:34ID:5iT7SRyD
>>801
鯖はJust-Sizeってとこ。mod_perlとmod_pythonがロードされてて
問い合わせたらサポ外だけど使っていいと言われた(宣伝はしてない)

実際htaccessの記述でCGIならmod_perlでの動作を確認できてるんだけど
mod_perlスクリプトはユーザのディレクトリが@INCに入ってないから
当然自作モジュールは読み込めないです。
それであきらめかけてるんだけど・・変にテスト繰り返してメモリ食いなど迷惑かけたくないので
こちらに書き込みました。
0803nobodyさん2008/12/21(日) 16:36:39ID:???
基本的に mod_perl って、httpd.conf 編集できて apache の再起動を
自由にできる人が使うものだと思うんだ。

で、Apache::Reload とかパフォーマンス落とすものを使わない限り、
再起動するまでは、ファイルをいくら新しくしても apache 側には反映されない。

500MB か 1GB しか積んでない共有鯖で mod_perl ってのは、ないと思う。
08048022008/12/21(日) 19:19:34ID:???
>>803
>httpd.conf 編集できて apache の再起動を自由にできる人が使うものだと
ううっ、真理だと思います・・・

>500MB か 1GB しか積んでない共有鯖で mod_perl ってのは、ない
これは一般に、CGIをmod_perlで動かす場合にも当てはまるでしょうか。

実はCGIをmod_perlで試したテストでは、サーバー側の設定かと思うのですが
.htaccessでModPerl::Registryを指定していてもファイルの変更/モジュールの変更とも即反映されてます。
スクリプト中で@INCに追加したパスも毎回反映されるので、モジュールも再読み込みされるようです。(つまりCGIと勝手が同じ)
環境変数にはMOD_PERLがあり、1行目にperlのパスを指定しなくても動くのでmod_perlで動いてるのは確かだと思うんですが、
ひょっとして毎回新たにプロセスが開始されてるような、自分のスキルでは図りかねる状況なんです。
非サポートとはいえ鯖の動作にもかかわることだから、少しまとめてから問い合わせしてみようとは思ってるんですが、
経験則としてご意見うかがえたらうれしいですm(_ _)m
08058022008/12/21(日) 20:46:58ID:???
すいません、今、思いついてCGIのプロセスIDを調べてみたら
やっぱりブラウザのリロードごと、毎回IDが新しくなっていました。
>>804の件、鯖の方に問い合わせてみます。

話がずれてしまったけど、非CGIのmod_perlスクリプトの方は
レン鯖ではあきらめるふんぎりがつきました。ありがとうございました〜!
0806nobodyさん2009/01/28(水) 14:35:27ID:???
すみません、教えてください。

RHEL4上で、Apache2+ModPerl2 の環境があります。

1つの仮想ホスト上に複数(現状4つ)のシステムを同居させてます。
つまり、DocumentRootには、4つのログインページがあり、ログインに成功するとそれぞれ
サブディレクトリに移動します。

それぞれのシステムのセッション管理をCGI::Sessionにやらせています。
セッションIDは、それぞれのシステムでCookie名を変えて発行しています。

セッション情報を取得するために、

my $cgi = new CGI;
CGI::Session->name('SYS1SESSID');
my $session = new CGI::Session("driver:hoge",$cgi,{Handle=>$dbh});

といった感じで使いまわしていたんですが、「ModPerl環境だと、CGI::Session::NAMEがモジュールローカル
なので、new CGI::Session()で他のIDを使おうとしてしまうかもしれない」 という理解は正しいでしょうか?
結構頻繁にアクセスされているシステムです。

ログイン対象システムのセッションIDを正確に取るには、

my $cgi = new CGI;
my $sid = $cgi->cookie('SYS1SESSID');
my $session = new CGI::Session("driver:hoge" ,$sid, {Handle=>$dbh});
の様に、使うべきセッションIDを指定しなければならない という理解で合っているでしょうか?

CGI::Session は、現状、4.20 です。
0807nobodyさん2009/01/30(金) 17:46:30ID:FjWtrZEq
代理age
0808nobodyさん2009/01/31(土) 16:58:46ID:8MtMaIxA
ちょっと通りますが、
Windows XPで、Apahc2+mod_perl2で、下のエラーが出るときの対処方法って知ってますか?
failed to resolve handler `MyHandler': Can't load 'C:/Perl/site/lib/auto/APR/Pool/Pool.dll' 〜
0809nobodyさん2009/01/31(土) 18:12:00ID:???
dllがないんじゃねーの?
0810nobodyさん2009/01/31(土) 18:57:57ID:8MtMaIxA
いや、普通にあるんだけどね。
0811nobodyさん2009/01/31(土) 19:07:11ID:???
>>810
あるならエラー出ない気もするんだが。。。
今出してる情報だけだとあとはそのエラー出てるファイルまでの
ディレクトリ(パス)が違うか、権限(実行権か読み取り権)が無いかだと思う。
0812nobodyさん2009/01/31(土) 19:12:38ID:???
Windowsだし単純にあぱっちとぱーるのインストールドライブが違うんじゃね?
ドライブが同じでもあぱっちのほうのぱす検索部分修正してないとか
初期設定をきちんとできてない素人質問な気はする
0813nobodyさん2009/01/31(土) 19:32:31ID:8MtMaIxA
>>811
ぐぐってもそんな感じで解決してたな。
でもパスとかちゃんと合ってるんだよな。
0814nobodyさん2009/01/31(土) 19:35:53ID:???
>>813
ドライブ跨ってない?
>>812も言ってるがWinのドライブは越せないよ
0815nobodyさん2009/01/31(土) 19:39:02ID:8MtMaIxA
ドライブはCドライブ一個しかないからそこは大丈夫だな。
0816nobodyさん2009/01/31(土) 19:47:00ID:???
>>815
※mod_perl2からはPerlSetEnv PERL5LIB じゃなくて PerlSwitches -Iに変わった

これは試した?
てか何を試したか書かないと一からこっちが聞いて回答して
やった、大丈夫とかの返事になりムダが多い
情報の小出しはどこに行っても嫌われるぞ、エスパースレかどっかいけよ
0817nobodyさん2009/01/31(土) 19:50:58ID:???
もう一度Apache2.2+mod_perl2か、バージョン確認かな。
0818nobodyさん2009/01/31(土) 19:58:11ID:8MtMaIxA
Win32 Binary including OpenSSL 0.9.8i (MSI Installer): apache_2.2.11-win32-x86-openssl-0.9.8i.msi
OpenSSL入りだと何か違うのかな?なしで一回入れなおしてみようかな。
0819nobodyさん2009/01/31(土) 19:58:55ID:???
無敵の再インストールという道もある
0820nobodyさん2009/01/31(土) 20:00:18ID:8MtMaIxA
ここって、普通ひっかからないとこだよね
0821nobodyさん2009/01/31(土) 21:48:22ID:???
普通の定義が広すぎて返答が難しい。
人それぞれだからね、「普通」なんて。
0822nobodyさん2009/02/01(日) 04:37:11ID:???
perl-status は使えないのかい?
EnvironmentでPathチェックは出来ると思うが
08238082009/02/01(日) 15:15:23ID:XdqdLFq+
>>808です。
問題解決しました。
perl 5.8.8をつかってたんだけど、perl 5.8.9にしたら直りました。
mod_perlの.pmファイルにperl -cでチェックかけてたら、なんか「perl58.dll になんとかていうエントリポイントなんてないよ」
っていうエラーがでたんで、調べたら perl 5.8.9から新しく追加されたエントリポイントなんだって。
0824nobodyさん2009/02/01(日) 15:25:42ID:???
>>823
解決おめ。
0825_2009/04/01(水) 14:59:15ID:???
http://modperlite.org/
どうよ
0826nobodyさん2009/07/16(木) 22:14:00ID:Gas3E2EY
mod_perlのオライリー本「Apache拡張ガイド」の上325P、
requiresメソッドは「カレントディレクトリとその親ディレクトリに存在するすべてのrequireディレクティブ…」を取り出すって書いてあるけど、間違いじゃないか?
継承はするけど追加じゃなくて上書きするから、すべてじゃないよね。
0827nobodyさん2009/07/25(土) 21:10:58ID:0I94bAC0
FastCGIについて質問です
環境:debian+lighttpd+fcgi(C)

FCGI_printfで
Cntent-Length: xxxxとかConnection: closeとか
付けてるつもりなんですけど、
実際にクライアントと通信させると送られてきません。
(勝手にチャンク転送になったりします)

あとFCGIでプロキシみたいなものを作ろうとしていて
while(1){
r_ret = recv(socket, buf, sizeof(buf), 0);
FCGI_fwrite(buf, r_ret, 1, FCGI_stdout);
}
みたいなコードを書いてますがFCGI_fwriteで書き込んだ
データ全てが送られないのですが、
(recv終了時点ではnバイトのデータを持ってても、
 クライアントにnバイト送られなかったり)

コードで指定してるとおりに動作させたいんですが
lighttpd.conf等の設定が悪いんでしょうか?
0828nobodyさん2009/07/25(土) 21:19:56ID:???
lighttpdかーそっちはわからんけど

例えばApacheの場合は、Content-LengthとかConnectionとか
そういうのを取り扱うのはHTTPサーバーの役割だって考えだから、
CGIがそういうヘッダを付けてもApacheの都合で勝手にkeepaliveになったりチャンク転送になったりする

Apacheだろうとlightyだろうと、そういう思想が正しいと思う。
CGIはコンテントの中身だけ出してればいい。
そんなHTTPの範囲まで口を出すな、と。
0829nobodyさん2009/07/25(土) 23:13:36ID:???
自分も前にApache+perlでCGI作った時とか
そのときも勝手にチャンクになったりしてたのは確認してました。
CGI系共通の動作なんですかね。
(Content-Length教えたのに削除するってのは微妙ですけど)

2番目の方はBODY部が変わるって致命的な動作なんで
なんかいい解決方法があればいいのですが
0830nobodyさん2009/07/25(土) 23:17:20ID:???
HTTP1.1的にはチャンク転送はきちんとした転送方法で、
それは「BODYが変わった」とは言わないと思う。

チャンク転送がいやならHTTP1.0でリクエストすればいいのでは?
0831nobodyさん2009/07/26(日) 00:40:26ID:???
すいません、2番目っていうのは
>あとFCGIでプロキシみたいなものを作ろうとしていて
>while(1){
>r_ret = recv(socket, buf, sizeof(buf), 0);
>FCGI_fwrite(buf, r_ret, 1, FCGI_stdout);
>}
ってほうの話です
チャンクとか抜きにしても明らかに不完全なデータしか
送られないって動作になるんです

追加情報ですが
1回あたりのFCGI_fwriteで書き込むサイズは256kBくらいです
0832nobodyさん2009/07/26(日) 08:57:56ID:???
自己解決しました

FastCGI応答処理にて
Content-LengthなどCGIで削除される情報を消してContent-Typeだけにしたら
BODYの情報が書き換わるということはなくなりました
0833nobodyさん2009/10/12(月) 09:35:39ID:Ndxd3B+x
apache1.3.41 + mod_speedycgiで動かしてるんですが、
通常のCGI(perlです)でSTDERRに向かって出力するとapacheがエラーログの方に
それを出力してくれるんですが、mod_speedycgi環境下で動かすと全く出てきません。
CGIの方を「#/usr/bin/speedy」とするとちゃんと出る(ある意味当たり前)ので、
mod_speedycgiのstderrの扱いがおかしいのかと思ってソースみたけどわけわかめ。
どなたか解決方法ご存じでしたら教えてください。だいぶググったけど見つからない・・
0834nobodyさん2009/10/17(土) 04:35:47ID:???
plackつかえよおまえら
0835nobodyさん2009/10/22(木) 16:22:16ID:???
833です。
とりあえずmod_speedycgi2.cあたりから見よう見まねでパッチ書いたら
うまくSTDERR -> エラーログに出るようになりました。
(長期間動かしたときどうなるかなどは未検証ですけど)
0836nobodyさん2009/12/13(日) 20:12:02ID:???

一番新しいSpeedyCGI(mod_speedycgi/Apache2.2.3)のやつインストールして
SpeedyCGIで普通のやつ(hello worldとか)は動くのだけど
http://perldoc.jp/docs/modules/CGI-SpeedyCGI-2.21/SpeedyCGI.pod
のサンプルコードが500errorで動かないのだけどヤバイかな…?
誰かご教示ください
0837nobodyさん2009/12/13(日) 23:00:07ID:???
コマンドラインで動すとか、error_logを見るとかすれば原因わかるだろうに。
sub内のdo something hereのとこは適宜にシャットダウン時やクリーンアップ時に行う
処理を書いておくところだよ。詳しくはメソッドの解説を参照。

#!/usr/bin/speedy -- -r1 -t1
$sp->add_shutdown_handler(sub { `touch shutdown` });
$sp->register_cleanup(sub { print "b" });

とかにすれば一応動きがわかるんじゃないかな
./speedy.pl
ls
の繰り返しで。
0838nobodyさん2009/12/13(日) 23:00:48ID:???
これじゃだめか
#!/usr/bin/speedy -- -r3 -t100
かね
0839nobodyさん2009/12/13(日) 23:30:38ID:???
>>837
[root@localhost hogehoge]# ./speedy.pl
Can't call method "add_shutdown_handler" on an undefined value at ./speedy.pl line 2.
そもそもadd_shutdown_handlerが無い的な感じなのかしら。
>>838
同じように試してみたけども、だめでした。
0840nobodyさん2009/12/13(日) 23:48:54ID:???
>>839はuseし忘れてただけでした。
すみません。

[root@localhost hogehoge]# ./speedy.pl
syntax error at ./speedy.pl line 8, near "do something here "
syntax error at ./speedy.pl line 10, near "do something here "
Execution of ./speedy.pl aborted due to compilation errors.
speedy_backend[24310]: perl_parse error
speedy[24308]: Cannot spawn backend process

http://perldoc.jp/docs/modules/CGI-SpeedyCGI-2.21/SpeedyCGI.pod
 # shutdownハンドラの登録
 $sp->add_shutdown_handler(sub { do something here });
 # クリーンアップ・ハンドラの登録
 $sp->register_cleanup(sub { do something here });
ここが原因みたいです。
0841nobodyさん2009/12/13(日) 23:57:28ID:???
ごめんなさい、載せ忘れ。
ほんと連レスすみません。

>>837の実行結果
[root@localhost hogehoge]# ./sp.pl
b
0842nobodyさん2009/12/14(月) 11:36:32ID:???
print "b" のとこは "cleanup" にでもしといたほうがよかったか
スクリプトが終わる際に登録した処理が行われるだけだけど。

Speedyのバックエンドが終わる際には、cleanupも終わって標準入出力閉じた後に
shutdownが行われる。そこはprintしても表示ができないのでわざと`touch shutdown` して
ファイルを生成している。いつそのファイルが作られるかを見てほしい。
たぶんタイムアウト(t)が迫った場合や再利用回数(r)が迫った場合に作成されると思う。
-r6 くらいにするとたぶん5回目の実行の際に作られるかな。

多分これを使えばSpeedyで動いてた間に蓄積したデータとか吐かせたりとか
有用な使い方できるんだろうけど、絶対動くような信用性があるかはわからんので
スクリプト内のグローバル変数で同じようなことを実現したほうが確実かも。

-r -t 自体結構信用ならないので、2chではshutdown_next_timeも活用してた気がする。
0843nobodyさん2009/12/15(火) 21:02:36ID:???
>>842
返信遅れてすみません。

rootで-r6 -t10でlsしながら実行したところタイムアウトが迫ったときに所有権がrootのshutdownファイルが
スクリプトと同じディレクトリに生成されるみたいです。
0844nobodyさん2010/03/25(木) 04:47:09ID:???
mod_perlとSpeedyCGIとFastCGIの違いを教えて下さい。
0845nobodyさん2010/03/25(木) 08:47:59ID:???
どれもググれない人には使えないので一緒
0846nobodyさん2011/12/16(金) 19:35:41.49ID:???
mod_perlで、Java Servlet2.4以前のHttpServletRequest#getRequestURL()
と同じような結果を取得する方法を探しているのですが、何かよいモジュールは
ありませんか?
0847nobodyさん2012/02/28(火) 19:51:56.53ID:???
Windows2000
Apache 2.2.22
mod_perl/2.0.4
activeperl 5.12.4

mod_perl でエラー発生したとき、CGI::Carp qw(fatalsToBrowser) が有効にならないのですが、
ブラウザでエラーとかを把握する方法ってあるのでしょうか?
0848nobodyさん2012/04/14(土) 19:26:27.93ID:d0KbMnsL
どうして2chだけFastCGIが不人気なんですか?
0849nobodyさん2012/04/17(火) 19:01:39.19ID:???
簡単にWindows環境で動くやつが
ないよね?
0850電脳プリオン 忍法帖【Lv=40,xxxPT】(1+0:8) 【15.1m】 2014/01/21(火) 00:52:32.25ID:????PLT(12081)
このスレは激遅
0851nobodyさん2014/01/21(火) 18:35:02.53ID:yT6VQ/mu
CGI以外のインタフェースいちいち覚えるの面倒だから誰も使わないんだよ
中の人がmod_cgidso作ったことからもわかるでしょ?
■ このスレッドは過去ログ倉庫に格納されています