[ruby-dev:5128] Re: [req] cgi-lib NPH support

青山です。

Mon, Feb 15, 1999 at 05:30:37PM +0900 において
Shugo Maeda さん曰く:

> 僕も実はmod_perlを使ったことがないので、CGI.pmを見て真似しました(^_^;

あ、そうでしたか。実はどうせだからと最新の 2.46 を見ていたのですが、ちょ
っと気になって hamm パッケージ等で使われている 2.36 を見てみたところ、
次のようになっていました。

>if (defined($ENV{'GATEWAY_INTERFACE'}) && ($MOD_PERL = $ENV{'GATEWAY_INTERFACE'} =~ /^CGI-Perl/)) {
>    $NPH++;
>    $| = 1;
>    $SEQNO = 1;
>}

そこで、再度 2.46 を確認してみると、このようなコードがありました。

>    if ($MOD_PERL and not $nph) {
>        my $r = Apache->request;
>        $r->send_cgi_header($header);
>        return '';
>    }

この send_cgi_header を追っていくと、mod_perl のヘッダ出力機能を利用し
ているようです。

mod_perl を入れて試してみるとデフォルトではステータスは出さないような
のですが、インストール時のオプションが多く、これもちょっと確実ではない
ので、とりあえずは NPH と分離してこんな感じではいかがでしょうか。下に
パッチを付けます。(CGI.nph の説明があまりにも短いですが)

ところで、mod_ruby から次のようなのを実行すると Uninitialized constant
CGI::MOD_RUBY (NameError) となりますが、何か心当たりはありますか？

require "cgi-lib.rb"
p CGI::MOD_RUBY

p CGI::NPH は mod_ruby 経由でも大丈夫なのですが。

> じつはmod_perlを試してないのはインストールが面倒そうだったからだったり
> します(^_^;

結構大きいですよね。しかも最初のオプションも多く、確かにかなり面倒そう
な感じでした。しかし、なんとか簡単に試せないかと探してみると、展開した
トップにある INSTALL.simple に書いてある方法はなかなか良かったです。

この方法ではソースディレクトリの下にインストールされ、make start_httpd
で mod_perl 版 apache が起動します。make kill_httpd で終了。t/net/perl/
が perl スクリプトを置く所のようで、アクセスは /perl/ のようです。

> 0.0.3では、
> 
> ruby configure.rb --apachehdr /usr/include/apache-1.3 \
>   --apachelib /usr/lib/apache/1.3
> 
> でMakefileを自動生成するようにしようと思っています。

あ、そいえばその部分の書き換えがありましたね。結構長いオプションは指定
が面倒なので、どこかファイルの中の書き換えでいくとそのほうが便利かもし
れませんが。


--- cgi-lib.rb.org	Tue Feb 16 03:25:02 1999
+++ cgi-lib.rb	Tue Feb 16 04:52:05 1999
@@ -23,7 +23,6 @@
 #
 # print CGI.header("Content-Type: text/html", cookie1, cookie2)
 #
-# print CGI.header("HTTP/1.0 200 OK", "Content-Type: text/html")
 # print CGI.header # == print CGI.header("Content-Type: text/html")
 #
 # make HTML tag string
@@ -42,8 +41,9 @@
 # print HTTP header and strings to STDOUT
 # CGI.print{ "string" } # add HTTP header "Content-Type: text/html"
 # CGI.print("Content-Type: text/plain"){ "string" }
-# CGI.print("HTTP/1.0 200 OK", "Content-Type: text/html"){ "string" }
-
+#
+# NPH (no-parse-header)
+# CGI.nph(true)
 
 # if running on Windows(IIS or PWS) then change cwd.
 if ENV['SERVER_SOFTWARE'] =~ /^Microsoft-/ then
@@ -58,6 +58,17 @@
   LF  = "\012"
   EOL = CR + LF
 
+  if ENV['GATEWAY_INTERFACE'] =~ /^CGI-Ruby/
+    MOD_RUBY = true 
+    STDOUT.sync = true
+  end
+  IIS = true if ENV['SERVER_SOFTWARE'] =~ /IIS/
+  NPH = { 'mode' => false }
+
+  def CGI.nph(switch)
+    NPH['mode'] = switch
+  end
+
   attr("inputs")
   attr("cookie")
 
@@ -134,6 +145,7 @@
 
   def CGI.header(*options)
     options.push("Content-Type: text/html") if options.empty?
+    options.unshift("HTTP/1.0 200 OK") if NPH['mode'] or IIS or MOD_RUBY
     if options.find{|item| /^Expires: |^Set-Cookie: /i === item}
       options.push("Date: " + Time.now.gmtime.strftime("%a, %d %b %Y %X %Z"))
     end


-- 
青山 和光 Wakou Aoyama <[e-mail]>