ＦＡＱスレッド(ＣＧＩ全般)

■ ＣＧＩの動作がおかしいです ■

★HTTPヘッダー無視の影響かもしれません

ＨＴＴＰヘッダーとは、ドキュメント本体に先がけサーバーから送信される情報です。ドキュメントのタイプ(文書か画像か)／最終更新日／クッキー等の情報が含まれます。通常のファイルの場合はサーバーが自動的にヘッダーを附加しますが、ＣＧＩの場合は自力で出力する必要があります。ドキュメント本体とは二つの改行(\n\n)で区切られます。

詳しい情報は→The WAY等

　TOK2では、ＣＧＩによるＨＴＴＰヘッダーの出力は『全て』無視されます。
（◆◆◆popupサーバー／有料サーバーを除く◆◆◆）

そしてContent-Typeに無関係に、ある一つの決まったヘッダー

Connection: close Date: Sun, 11 Feb 2001 10:48:31 GMT (←現在の時刻) Server: Apache/1.3.12 (Unix) mod_layout/2.8.2 PHP/3.0.14-i18n-ja ModLayout: 2.8.2 Last-Modified: Sat, 10 Feb 2001 00:24:16 GMT (← .cgiファイルの最終更新時刻) Cache-Control: no-cache Content-Type: text/html

が出力されます。
　そして、出力の内容(Content-Type)には無関係に、"<BODY>""</BODY>"と言う文字列の付近に広告のバナーの為の文字列が附加されます。

よって、様々な問題が生じてきます。

代表的な症状としては、

　【 Locationの不具合: Location ヘッダー無視の影響】　

画面が変わるべきところで
- 「＜ペ－ジが表示されません＞」
- 「TCP/IP Error」
- 「The document has moved here」
等の画面が表示される。または、エラーが生じましたと言われる。

　【キャッシュの不具合: Last-Modified ヘッダー無視の影響】　

何回リロードしても、前の画面のままだ。新しい画面に更新されない。
ＣＧＩをアップして一回目の動作はいいけど、２回目からはおかしい。
ＣＧＩのカウンターがちゃんとカウントしてくれない(ように見える)。

　【 Cookieの不具合: Set-Cookie ヘッダー無視の影響】　

ＣＧＩでクッキーを使っているはず、なのにクッキーが効かない
サンプルや他のサーバーでは、ハンドルネームなどが保存されるのにTOK2では保存されてない。
ブラウザでクッキーをonにしているのに、クッキーを使えるようにしてくださいと叱られる。

　【 ContentType指定の不具合: Content-Type ヘッダー無視の影響】　

文字セットを指定しているのに、文字化けする。
ＣＧＩで画像を出力しているのに、ブラウザでは文字化けテキストになってしまう。
ＣＧＩでＨＤＭＬ等、非ＨＴＭＬテキストを出力しているのに、それが認識されない。
ページに埋めこむと画像なのに、単独で見ようとすると文字化けテキストが表示される。
ＣＧＩで出力すると、ある特定の画像ファイルだけ壊れて表示される／または表示されない。
（ブラウザによっては text/html ヘッダーで画像を受け取っても認識してくれるらしい）

などがあります。

このページではこれらの問題について、改造方法も含めて解説します。

クッキーが使えません／Cookieヘッダーの代替方法は？
ページが表示されません／Locationヘッダーの代替方法は？
キャッシュが変？／Last-Modifiedヘッダーの代替方法は？
テキスト以外を出力するＣＧＩは？
もっと簡単にＣＧＩの問題を解決する方法はありませんか？

◆◆改造にはperlの知識が必要です。perlの知識のない方は改造は行わないでください。◆◆

■ クッキーが使えません／Cookieヘッダーの代替方法は？

★METAタグを使います

　METAタグとは、ＨＴＭＬ文書のヘッダー部分(<HEAD></HEAD>の間)に記述してＨＴＴＰヘッダーを補完するタグです。

クッキー用のMETAタグの書式は以下のとおりです。

これをＣＧＩの吐き出すＨＴＭＬ文書の<HEAD>タグの直後に出力するように追加すればよいわけです。

改造方法は次のようなものです。
◆◆改造は各々の責任に於いて行ってください◆◆
※クッキーは無くても動作に支障ありません。自分の技量では下記の改造が難しいと感じた場合は、改造を行わないことをお薦めします。

まず、プログラム先頭部分(多くの変数をセットしている箇所があるはずです。無ければ２行目以降の適当な場所)で、変数の初期化をします。
$dmy_tok2_cookie = ''; # クッキー用の変数の初期化
　perlでは、変数の初期化は省略可能な為、この文自体が無くてもおそらく正常に動作します。どこにいれてよいかわからない時は入れなくてもいいでしょう。(意味が分からない場合は入れない方がかえって問題が無いかもしれません)
　「#」はコメントを示す記号で、#以降行末まではコメントです。
それから、cookieをセットしている場所を探します。
恐らくサブルーチン化されていると思います。（set_cookie とか cookie_set など。もちろん、サブルーチン化されていない場合もあり得ます）エディター上で"Set-Cookie"で検索をかけるとよいでしょう。

そのクッキーセット用サブルーチンのおそらく最後の方の行に
print "Set-Cookie: *******************\n";
といった行があると思いますので、この行の次に、
$dmy_tok2_cookie .= "<META HTTP-EQUIV='Set-Cookie' CONTENT='*******************'>\n";
の一行を追加挿入します。（*******************はそのまま。表示上折り返されて２行にみえる場合もありますが、必ず一行で）
「.=」は、左辺の文字列に右辺の文字列を追加する命令です。$dmy_tok2_cookie の初期値は空の文字列ですので、変数 $dmy_tok2_cookie には、クッキー用のMETAタグの内容が格納されます。
　文字列が、長くなる場合は、文字列の追加演算子「.」を使って複数行に分けて書くことも可能です(改造例を参照)
次に、入力（書き込み）処理後「一番最初」に表示されるページを出力している部分を探します。エディター上で「Content-Type」や「head」で検索をかけるとよいでしょう。
そして、<head>を出力している文のすぐ後に以下のような記述を追加します。(<head></head>に囲まれた中であれば、大丈夫です。)
※エラー画面や、初期パスワード入力画面等、クッキーが発効されないタイミングで表示されるページの部分は改造しても無駄です。
print $dmy_tok2_cookie; # クッキーの発効
ＣＧＩを実行し、実際に表示されるページのソースをみて、クッキーのタグが存在することを確認しましょう。
以上です。

□□□□□□　改造例　□□□□□□

変数初期化の部分の一例

#! /usr/bin/perl
#
require './jcode.pl';
$| = 1;
$dmy_tok2_cookie = ''; # クッキー用の変数の初期化

&init;

変数への代入部分の一例

sub setcookie{	#くっきーをブラウザにプレゼントします。
    local($dmy,$mdc,$monc,$yrc,$wdayc,$mc,$yc);
    (～中略～)
    $data = 'yuiend' if($FORM{'cook'} ne 'ok');
    print "Set-Cookie: yuidata=$data; expires=$yc, $mdc-$mc-$yrc 00:00:00 GMT\n";
    $dmy_tok2_cookie .= "<META HTTP-EQUIV='Set-Cookie' "
        ."CONTENT='yuidata=$data; expires=$yc, $mdc-$mc-$yrc 00:00:00 GMT'>\n"; 
}#このクッキーはだいたい3ヶ月間有効です。

クッキーの出力部分の一例／print文の場合

print "Content-type: text/html; charset=Shift_JIS\n\n";
print "<html><head>";
print $dmy_tok2_cookie; # 追加：クッキーの発効
print "<title>";

クッキーの出力部分の一例／ヒア・ドキュメント形式(行がそのまま出力される形式)の場合

print "Content-type: text/html;charset=Shift_JIS\n\n";
print <<"_HTML_";
<HTML><HEAD><TITLE>$title</TITLE>$metacode
$dmy_tok2_cookie <!-- 追加：クッキーの発効 -->
<SCRIPT LANGUAGE="JavaScript">
(～中略～)
</SCRIPT></HEAD>
$body
_HTML_

クッキーの出力部分の一例／<HEAD>タグの書き出し部分がわからない時は、ドキュメント部の先頭にでも、(規約外・無保証)
print "Content-type: text/html; charset=Shift_JIS\n\n"; print $dmy_tok2_cookie; # 追加：クッキーの発効

■ ページが表示されません／Locationヘッダーの代替方法は？

★METAタグを使います

ページ再描画用のMETAタグの書式は以下のとおりです。

これをLocationヘッダーの代わりに使用すればよいわけです。

改造方法は次のようなものです。
◆◆改造は各々の責任に於いて行ってください◆◆

locationヘッダー出力部分を変更します。
locationヘッダーを書き出している部分を見つけ出し、("Location"で検索するとよいでしょう)、その部分
print "Location: *****************\n\n";
を下記の様に変更します。
print "Content-type: text/html\n\n";
print "<html><head>";
print "<META HTTP-EQUIV='Refresh' CONTENT='0; URL=*****************'>\n";
print "</head></html>\n";

引用符が囲っているのは「0; URL=*****************」全体なので十分注意してください。
もし、クッキーの出力がある場合は、
　この場合は、書き込み処理後「一番最初」に表示されるのはこのリロード用ダミーページになるわけですから、クッキーの出力もここで行う必要があります。
その場合は以下のようになるでしょう。（クッキーの項参照）
print "Content-type: text/html\n\n";
print "<html><head>";
print "<META HTTP-EQUIV='Refresh' CONTENT='0; URL=*****************'>\n";
print $dmy_tok2_cookie; # クッキーの発効
print "</head></html>\n";
以上です。

□□□□□□　改造例　□□□□□□

Location変更の部分の一例(クッキー無し)

  &writelog;
  #print "Location: $endpage\n\n";行頭に「#」を付けて行全体をコメントアウト
  print "Content-type: text/html\n\n";
  print "<html><head>";
  print "<META HTTP-EQUIV='Refresh' CONTENT='0; URL=$endpage'>\n";
  print "</head></html>\n";
  &ended;

■ キャッシュが変？／Last-Modifiedヘッダーの代替方法は？

★対症療法があります

Last-Modifiedヘッダーはドキュメントの最終更新日時を送信して、キャッシュの制御などに利用されます。

トクトクでは、このLastModifiedヘッダーにスクリプトの生成日時が送信されます。
そのため、キャッシュが半永久的に効いてしまい、画面の更新が出来ないという不具合が生じてしまいます。

厳密には、最終更新日時を与えるLast-Modifiedヘッダーの代替は不可能です。
しかし、Last-Modifiedヘッダー無視によるこのキャッシュの不具合を対症的に解決することは可能です。

改造方法は次のようなものです。
◆◆改造は各々の責任に於いて行ってください◆◆

ＣＧＩスクリプトの必ず実行される部分に次のの一行を追加します。
utime time(), time(), __FILE__; # スクリプト生成日時の更新
　utimeは、ファイルの時刻を設定するコマンドです。引数は順に最終アクセス時刻, 最終更新時刻, 設定するファイル名となります。__FILE__は、perlの特殊な変数で、現在のスクリプトファイル名を与えます。つまり、「このファイルの最終更新時刻を今の時間に設定しなさい」と言う命令です。
　挿入の位置は実行されるところならばどこでもいいですが、通常は２行目でよいでしょう。（掲示板などの場合は書き込みが行われた時だけ実行されるようにすればより良いかもしれません。）
以上です

これにより、ＣＧＩをアクセスしたブラウザには、必ず前回のアクセスより新しい最終更新日時が送られ、キャッシュを無効化することができます。

□□□□□□　改造例　□□□□□□

改造の一例

  #!/usr/bin/perl
  utime time(), time(), __FILE__; # スクリプト生成日時の更新
  require "jcode.pl";

■ テキスト以外を出力するＣＧＩは？

★作成不可能です

Content-Typeヘッダーが無視され、すべて、text/htmlで送信されるため、ＨＴＭＬ以外を出力するＣＧＩは正常に動作しません。つまりトクトクではＨＴＭＬ以外を出力するＣＧＩは使えません。

但し、画像ファイルに関してはContent-Type: text/html で送られてもブラウザが認識してくれる場合もあるようです。
トクトクから配布されているカウンターはこの曖昧さを利用して動作します。

■ もっと簡単にＣＧＩの問題を解決する方法はありませんか？

★便利なperlモジュールがあります

Tok2cgi.pmの説明を見てください

戻る