nDiki : Win32

Win32 API のこと。

WiKicker Windows Perl ActivePerl Linux インストール HTML URI ビルド 環境変数 PPM Storable Java Apache ライセンス WinSCP メモ PPM パッケージ flock ロック GNU Unicode::String GNU Make PuTTY HTML::Parser DiKicker SOAP::Lite PAR RCS The Artistic License

■ [ mknmz-wwwoffle ] ギリシャから「win32 で動かないよ」

ちょうど、新婚旅行に行ってきたギリシャドメインの人から、mknmz-wwwoffle が win32 でうまく動かないよというメールを頂く。 Namazu はギリシャでも使わてれいるんですねぇ。

mknmz-wwwoffle の win32 対応は TODO のまま。 path の処理等をサボっているのでそのままでは動かないはず(試してみてもいないので不明)。 せっかくの機会なので win32 対応するかな。

Win32 に Namazu と WWWOFFLE (と要求ライブラリとかPerlとか)をセットアップするのがちょっと面倒かな。

• Linux で使えるデスクトップ検索ツール Beagle でローカルファイ... (2006-08-08)
• XAMPP で WiKicker を動かしてみた。PPM インストール OK。 (2007-02-09)
• 定型書式で内容を記述していくのに便利な形式は? (2005-11-21)
• 過去の今ごろ (2004-07-04)
• Debian GNU/Linux に Hyper Estraier 1.2... (2006-05-31)

■ 21:00 Xalan-Java + Bean Scripting Framework で Perl を使うぞ

XSLT プロセッサの Xalan-Java2 は、Extension で Bean Scripting Framework (BSF) を使って XSLT 中に直接 (ActiveState の) PerlScript を埋め込めるらしい。 さっそくチャレンジ。

@ ActivePerl をインストール

Debian パッケージが Intel Linux 用にあるので、これをインストール(ActivePerl-5.6.1.630-i686-linux.deb)。 /usr/local/ActivePerl-5.6 以下にはいる。 問題なし。

@ サンプル XSL ファイルを書く

Xalan-Java2 のページを参考に PerlScript を埋め込む。

動かない。 BSF のソースを見てみる。 れれ、ビルドファイルを見ると、ActiveScript はべったり Win32 用だ。 がびん。 やっぱり素直に Java で Extension 書くか。

• ActivePerl で Ming (2005-02-23)
• [ Perl ] PDL::PP で C extension を書く (2004-02-19)
• RPC::XML のかわりに XMLRPC::Lite (2004-08-31)
• Wineを入れてみる (2005-03-31)
• PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)

■ ActivePerl 5.6.1 Build 638 にバンドルされているモジュールとライセンス

ExtUtils::Installed でリストアップしてチェック。

'*' は Copyright.html で オリジナルがオープンソースのものとして列挙されているもの。 'o' は列挙されていないが、オリジナルが Perl と同じライセンスか The Artistic License のもの。 'a' は ActiveState の Copyright があるもの (ActiveState Community License)。 それ以外は明記がないもの。

PAR でパッケージ化するには、Perl と同じライセンスの(あるいは再配布の問題のないもの)もののみストールしてある状態にしておき、PAR 化した中身に

• ActivePerl/*
• ActiveState/*
• PPM/* (一部)
• ppm-conf/*
• Win32/AuthenticateUser.pm

が含まれていないかをチェック。

• 自前 PPM リポジトリの管理 (2006-07-03)
• PAR + ActivePerl で実行形式ファイルを作った時のライセンスは? (2004-07-21)
• PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
• PAR に関する ActivePerl のライセンス (2006-06-16)
• RPC::XML のかわりに XMLRPC::Lite (2004-08-31)

■ PPM::Make と META.yml

PPM::Make の make_ppm で ppd ファイルを作成すると自動的に DEPENDENCY 要素を生成してくれる。 今作っているパッケージ、 Windows の ActivePerl 下で動かす時には追加の依存モジュールが(Win32::*)あるので、Makefile.PL の中で $^O を見て PREREQ_PM に追加を行っている。

で気がつくとこれが ppd に反映されていない。

ソースを見たところ META.yml があってこれから情報が取得できている時は、Makefile を見にいかないようになっている。 META.yml が無いか、必要な情報が取れていない場合は、Makefile をスキャンして PREREQ_PM などを取得している (Makefile.PL ベースの場合)。

ここでパッケージの作成(make dist)を Linux 上で行っている関係で META.yml には Windows 環境特有の requires が入らないため、結果 ppd に DEPENDENCY が足りない事になる。

ということでこれからはとりあえず安直に、 make_ppm の直前に META.yml を削除することにしよう。

• PAR を ActivePerl 5.6.1 build 638 に (2004-07-20)
• ActivePerl で Ming (2005-02-23)
• [ Perl ] PDL::PP で C extension を書く (2004-02-19)
• PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
• WiKicker の Win32 対応 (2005-04-04)

■ HTTP::Daemonベースのプログラムのテスト

make test でテストしておけるようにしておきたい。

ということで王道。fork して daemon プログラムを exec。 WWW::Mechanizeで daemon に HTTP でアクセスし各種テスト。

終わったら kill。

Win32 (ActivePerl)では fork + exec で起動できるのだけれど kill では死なない。 ということで Win32::Process::Create で直接起動して、Win32::Process::Kill で終了させるという別解で。

HTTP + HTMLのテストは、以前ちょっと使ったことのあるHTTP::WebTestを使おうかと思ったが、なんだかんだいって WWW::Mechanize の方が好きなように書けそうなのでこちらをチョイス。

• XMLRPC::Lite + 自前の HTTP::Daemon サーバ (2004-09-14)
• ActivePerl 5.6.1 Build 638 にバンドルされている... (2004-08-19)
• iモードHTMLシミュレータ Version 7.2 (2005-05-10)
• WiKicker の Win32 対応 (2005-04-04)
• Perl CGI プログラムのテストには WWW::Mechanize::... (2006-02-18)

■ JSmooth で Win32 上でのJava プログラム起動ファイル作成

最近、Java プログラムを Win32 上で簡単に起動できるようにする方法を調査中。

JSmooth 0.9.7 を試してみる。 JSmooth 自体も Java アプリケーションなので、Linux で動くかと昨日試してみた(ソースをとってきて ant jar; ant run)のだがうまく動かなかった。 ということで今日 Windows 上で。

GUIベースなので使い方を一度覚えれば比較的簡単に使える。

• JSmooth は GNU GPL。生成した実行可能ファイルにはライセンス制約なし。
• 生成した exe は実行すると、インストールされているJVMを検索する。
• JVMが無い時に指定したURLのページへ誘導できる。
• JARファイルを exe に埋め込める(実行時に展開される)。もちろん埋め込まないでランチャを生成する事も可能。

など。手軽であるが、生成したランチャ(JARファイル埋め込み無し)で、約400KB弱となった。でかい。

NSIS で同様のランチャ(こちらも簡単なJVM検索はあり。ページへの誘導はなし)を生成すると、30KB強。 NSIS なら Linux でも生成できる事を考えると、JARファイルの exe 埋め込み機能以外は NSIS の方がよさそうだ。

• JRE をバンドルしたインストーラを NSIS で作る (2004-12-02)
• 私的10大ニュース2004 [ comp ] (2004-12-31)
• PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
• NSIS 2.22 は Linux でビルドできず (2006-12-20)
• xyzzyを読み取り専用メディアから起動する (2004-07-28)

■ Wineを入れてみる

Linux 上で Win32 用の ActivePerl を動かして、PPM パッケージの作成や PAR による実行可能ファイルの作成をできるようにしたい。

調べたところ Wine 上でも ActivePerl が動くらしい。 さっそく Debian GNU/Linux の sid 環境にインストールしてみる。

debパッケージは以下をインストール。

• wine
• wine-utils
• winesetuptk
• wine-doc
• msttcorefonts

winesetup を実行して ~/.wine 以下を作成。 winesetup が古いのか wine を実行すると

Please use the registry key HKEY_CURRENT_CONFIG\Software\Fonts\LogPixels to set the screen resolution and remove the "Resolution" entry in the config file

という警告がでるので、[fonts] の中の

 "Resolution" = "96"

をコメントアウト。

次に msi 形式になっている ActivePerl インストーラを動かすために、Windows Installer をインストールする。

失敗。設定がうまくいっていないのか、何かが足りないのか。

usr/share/wine/wineinstall で ~/.wine 以下を作っても駄目。

要調査。

• PAR::Repository でビルド済み Perl モジュールをネット... (2006-12-12)
• ActivePerl で Ming (2005-02-23)
• Debian GNU/Linux sid 環境を新 HDD へ (2006-07-29)
• 納品前日なのに /var が壊れた! HDDからのブートで Debian ... (2005-09-27)
• xyzzyを読み取り専用メディアから起動する (2004-07-28)

■ WiKicker の Win32 対応

WiKicker をベースにちょっとしたWebアプリケーションを作ろうという話になったのだが、そういえば Win32 対応していない。

ということで ActivePerl で動くように手を入れる。 まずは make test が通るようになるまで修正。

• RCSまわり
  • Windows 用 RCS が「標準でRCSファイルに ',v' suffix をつけない」という振る舞いに対応
  • TZ環境変数を事前に設定しておかなければならないことに注意
• uptime
  • Windows にコマンドがないので、処理をバイパス
  • 後程代替コードを用意

あたりを修正してだいたい対応できたようだ。 同梱している DiKicker の方は DB_File::Lock の make test が通らないので、とりあえず使用不可ということで。 WiKicker の方も flock まわりがきちんと動いているか確認する必要があるな。

• Windows 上での Apache 2.0.53 では PATH_INF... (2005-04-10)
• Windows 上の WiKicker で履歴機能が動かないのは環境変数 ... (2006-11-27)
• [ WiKicker ] 久しぶりにメンテナンス (2004-04-02)
• Win32 で WiKicker が落ちるのは binmode の設定忘れのせい (2005-04-18)
• WiKicker 0.25 リリース - Win32 対応は動作未確認 (2005-05-07)

■ PATH_INFO のかわりに REQUEST_URI と SCRIPT_NAME を使う

結局 Apache 1.3.33 でもやはり PATH_INFO が UTF-8 では無くなってしまうようだ。

ということで WiKicker 側で対処。 SERVER_SOFTWARE 環境変数を見て Win32 な Apache だった場合、PATH_INFO を使わず REQUEST_URI と SCRIPT_NAME 環境変数を使って PATH_INFO にあたる文字列を取り出すようにした。

これで期待するページにアクセスできるようになった。

ただし別件で、ページ書き込み時に失敗する問題が発覚。 ページの補助情報を保存している部分の処理がこけるらしく、一度エラーになると以降のアクセスがエラーになってしまう。 要調査。

• Windows 上での Apache 2.0.53 では PATH_INF... (2005-04-10)
• Perl v5.8.8 の CGI.pm の PATH_INFO 処理の問... (2006-07-08)
• WiKicker における PageName 最長文字数 (2006-06-10)
• Perl CGI プログラムのテストには WWW::Mechanize::... (2006-02-18)
• [ WiKicker ] 「最近のアクセスログ」処理思案 (2004-01-17)

■ WiKicker リリースに向けてテスト追加・バグ修正

WiKicker の Win32 対応のために、ファイル処理まわりや flock を使っているところを中心としたテスト・修正作業。

• ファイルのパス文字列の作成は File::Spec を使うように修正
• Windows 2000 上でこけていた flock 処理部分を修正

これでようやく Win32 で動くようになったかな。 まだ一部警告が出るけど。

しかし ThinkPad X31 (2672-PHJ、Pentium M 1.60GHz [Banias]) の上での QEMU + Windows 2000 は、やっぱり遅すぎて動作検証には使いづらい。WiKicker で1ページの処理に10秒以上かかったりするし。 結局 VNC を使って、別のPCで作業を行った。

• 私的10大ニュース2003 (2003-12-31)
• UPS 選択用にワットチェッカーで消費電力を測定しよう (2005-12-09)
• WiKicker の Win32 対応 (2005-04-04)
• CD-R ドライブが使えない (2006-07-27)
• WikiPage 編集画面で Ctrl+S を押すとプレビューするようにしてみる (2006-04-29)