ベストアンサー

アクセス人数制限ＣＧＩについて。

2010/06/10 10:59

アクセス人数制限ＣＧＩについて。お世話になります。特定ファイルに同時アクセスする人数を制限して、制限を越えたら「しばらくお待ちください」みたいなメッセージを表示するＣＧＩ、あるいは他の方法でもよいのですが、何か方法があるでしょうか。理由は150Kbps約60分のストリーミングファイルを公開したいのですが、レンタルサーバのデーター転送制限の関係で、２人までの同時アクセスはセーフで、３人になると転送制限を超えてしまいアウト。サーバ屋さんから怒られてしまいます。なんとかこのファイルを公開していので、皆さんのお知恵を拝借させてください。

okwavewan
お礼率26% (12/45)

CGI
回答数3
ありがとう数25

みんなの回答 （3）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

netaninja
ベストアンサー率66% (2/3)

2010/07/02 00:55 回答No.3

プログラム的には簡単とはいえ、 unixコマンドとかhttpの予備知識がないとキツいでしょうね・・とりあえずperlのサンプルです。ただ書いただけで、動作確認はしてません。 ------------------------ #!/usr/bin/perl my $fn='largefile.flv'; my @ps=`ps ax | grep $fn | grep -v 'grep'`; if(@ps>2){ 　　print "Content-type: text/html\n\n"; 　　print "<html><head></head><body>Overloaded.</body></html>\n"; 　　exit; } print "Content-type: video/flv\n"; print "Content-Disposition: inline; filename="$fn"\n\n"; system("cat $fn"); exit; ------------------------- ・最初の'largefile.flv'は、公開したいストリーミングファイル名に変更して下さい。　ただし、ファイル名が日本語だと、保存しようとした時に化けます。　対応するとけっこうタイヘンなんです。詳しくは　http://cydn.cybozu.co.jp/office/2008/07/post_1.html ・Content-Typeをprintしている行のvideo/flvは、flv動画の場合です。　ストリーミングファイルの種類に応じて、変更する必要があります。　Content-Typeについては、　「動画 content-type」でぐぐってください。・psコマンドについては、　http://www.garunimo.com/program/linux/linux11.xhtml このCGIを<a>タグなり、flashプレイヤーの<object>タグなりのもともとのストリーミングファイルの代わりに指定します。 #前回の回答には「同じCGI名を数える」と書いてましたが、 #cat使ったのでファイル名を数えました。

質問者

お礼 2010/07/23 23:08

サーバエラーの原因は、 ×print "Content-Disposition: inline; filename="$fn"\n\n"; ○print "Content-Disposition: inline; filename=$fn\n\n"; でした。映像は、映像本体のasfと、そのメタファイルのasxになっていたので、実行ファイルはasx。プロセス用はasfと、切り分けて設定して、動作させることができました。おかげさまで映像ファイルを公開できることができました。ありがとうございました。

質問者

補足 2010/07/19 13:14

ご返事遅れました。早速アドバイスのCGIを下記のように書き換えて試したところ、500番サーバエラーになってしまいました。レンタルサーバは「ステップサーバ」です。映像ファイルの指定を.asxではなく、元の.asfにしてみたりと試したのですが、ダメでギブアップしました。再度アドバイスよろしくお願いいたします。 *** #!/usr/local/bin/perl my $fn='video_001.asx'; my @ps=`ps ax | grep $fn | grep -v 'grep'`; if(@ps>2){ 　　print "Content-type: text/html\n\n"; 　　print "<html><head></head><body>Overloaded.</body></html>\n"; 　　exit; } print "Content-type: video/asx\n"; print "Content-Disposition: inline; filename="$fn"\n\n"; system("cat $fn"); exit; *** Internal Server Error The server encountered an internal error or misconfiguration and was unable to complete your request. Please contact the server administrator, info@stepserver.jp and inform them of the time the error occurred, and anything you might have done that may have caused the error. More information about this error may be available in the server error log.

ログインすると、全ての回答が全文表示されます。