2013/09/19(木)Apache 2.4 では、HTMLヘッダの自動修正をする？？

2017/10/12 5:35 ソフトウェア開発日誌・技術
ここ１ヶ月、某会社のシステム構築の仕事の依頼を受け、せっせと組み上げておりました。
「頑丈な造りを」ということで、脱Windows、自動バックアップ付きの仕様です。
１台の機器にてRAID 構成にするよりは、２台の機器（うち、１台は既存機器）を使って、ＬＡＮを通して自動バックアップ構成をとったほうが安価で機能的にもほぼ同等で確実な構成に出来るのですが、この点、頑なに理解しない技術屋も結構居ます。

先日、新規サーバ１台とセットで設置しに行ったわけですが、現場でサーバ上で稼動させるデータベースに自動バックアップの構成を構築した後にデータを投入し、ＧＵＩインタフェースとなるＷｅｂブラウザのため のサーバ Apache 2.2（現行は 2.2.25） をサービス開始するわけですが、不可解な現象に数時間悩む・・・

通常、
20130919_1.png

のように、表示されるわけですが、何故か
20130919_2.png

のように、ＣＧＩが吐き出すＨＴＭＬをテキストでそのまんま出してしまう。。
要するに text/plain で表示されてしまうわけです。

何をやっても駄目で、どういうわけか IE8 ではきちんとページが表示されるが、手元の Firefox と Chrome は text/plain モードな表示です。

現場で数時間悩んだものの、とりあえず IE8 で簡単な説明をして（IE8 ではまともに表示しないので、アップデートをお願いしておいた）、現場を引き上げ、その後から仕事場でプロトコル解析です。

ほどなく原因が判りました。通常、ＣＧＩからＨＴＭＬなページを表示させるには、
Content-type: text/html; charset=utf-8

といったヘッダ行を（標準出力へ）最初に出し、更に（標準出力へ）空の行を１行出して、本体との区別を行い、そこからＨＴＭＬ本体を（標準出力へ）流し込む形を取ります。このヘッダ行に問題があって、

4637Content-type:

みたいな状態になっていました。問題の部分はここ
# ＨＴＭＬヘッダ出力
sub out_header {

  my ($mimetype,$hstr) = @_ ;

  print $hstr if ($hstr ne "") ;

  print "Content-type: $mimetype\n\n" ;

}


これを呼び出すところで、
out_header('text/html; charset=utf-8',length($outstr),undef) ;

のようになっていたわけです。
($outstr には、HTML ページ本体を文字列の形で格納している。length はその長さを返す）
構築作業中、Apache 2.4 上で制作していたためか、このような現象には一切遭遇せず、納品サーバで動作確認していなかったのが原因ですが、レベルの低いところで悩みまくっていましたorz

・この現象は、Apache 2.2.x で発生し、 Apacxhe 2.4.x では発生しないようです。
・Apache 2.4.x では、ＣＧＩが出すヘッダが狂っていても、本体部分をチェックして適切なヘッダに書き換えるようです。
・Apache 2.2.x でも、ブラウザが IE8 では発生せず、ＨＴＭＬなページが表示されます。しかし、IE9 以降では、text/plain な表示になります。
・IE8 では、不明ヘッダは text/html として処理するが、IE9 以降や Firefox,Chrome においては、text/plain の処理となるようです。
コメント（0件）

2013/07/09(火)PDFJ を Perl 5.16 で動作させることに成功

2017/10/12 5:29 ソフトウェア開発日誌・技術
以前、こんな話題を掲載しました。 → PDFJ は perl5.12 では動作しない模様

相変わらず、原因を追いかけるほど暇もカネも無いので、ほったらかしだったですが、今般開発中の案件に使えたら使いたいと思い、諸般の事情も手伝って、無理やり時間割いてみました。。orz

Google 殿に尋ねると、Perl 5.12 でも動いているよという情報も・・・
「うーむ、ウチでは Perl 5.12 にしたら動作しなくなったんだけどな！！」と思いつつ・・

FreeBSD では、ports にも PDFJ-0.90 が入っていて、Perl 5.14 で動作するようなパッチが当てられているようです。なので、これを ports にてインストール。でも、相変わらず 「PDF ファイルが壊れています」とAdobe Reader に怒られます。。

テキストエディタで「壊れている PDFファイル」を覗いてみる。すると、エラー内容などがテキストで吐き出されている。orz　こんな感じ：
error in 'BODY': error in 'Block': error in 'break': error in 'do': error in
 'eval': eval error: 'print' trapped by operation mask at (eval 2122) line 2,
 line 3873.
: '
print "page",$page->pagenum,"\n" if $Args{'XPDFJ:verbose'} >= 0;
$Args{hfpage} ||= $page->pagenum;
' at libs/XPDFJ.pm line 589, line 3873.
ここで再び Google殿に尋ねると、perl 5.10 にて同じ現象で嵌った方が、、
PDFJをperl5.10で動かす 〔紀子さん＠へぼぷろぐらまの日常〕

もう４年前のものなんですが、例の Perl 5.10用パッチ入れても動作しないという現象。
「ウチでは、Perl 5.10 では動作したなぁ」と思いつつ、どう対処したかというと

　『とりあえず該当行をコメントしてしまうという暴挙に出、まぁ解決』

　ぉ、、・・・orz
　でも、この暴挙を試そうと、該当箇所を探すが。。。
　XPDFJ.pm 上に無い。。散々探したあげく、モジュールで提供されているインクルードファイルに stddef.inc というファイルがあり、その中にありました。orz

　行番号なんかあてになりません。XPDFJ.pm にてインクルードした後の行番号が表示されている模様。。 stddef.inc の 1135行目あたりにありました。
#            <eval>;
#              print "page",$page->pagenum,"\n" if $Args{'XPDFJ:verbose'} >= 0;
#              $Args{hfpage} ||= $page->pagenum;
#            </eval>
こんな感じで「暴挙」を実施したところ・・・
動作するようになりました。たぶん、ページ番号振る部分ですかね。。

ひょっとして、これも Safeモジュール絡みかも？？
エラーに print文の部分が含まれているからです。
追いかける暇なんぞ、なかなか持てないので、とりあえず文句言われない限りはこのままになると思います。。
コメント（0件）