omonuinen

Rosでノード間通信するのに必要なので、Pharo上にXMLRPCを実現するpharo-xmlrpcというパッケージを利用している。

http://code.google.com/p/pharo-xmlrpc/

ベータ公開中のようであるが、テストはオールグリーンということで導入すると痛い目にあう。実際のところ、1.3RCはおろか1.2.1であってもテストの実行に失敗する。

問題は２点あり、ひとつはstructノードの生成に関すること、もう一つはネットワークポートに関することである。

以前このブログで、デコード時の問題を解決するパッチを公開した。このパッチでは、decodeStruct:というstructのデコード時にノードを深くたどりすぎるバグに対処するものだった。

http://d.hatena.ne.jp/nqthm/20110822/p1

実はこのパッチを当てると今まで動いていたテストが失敗するようになる。というのも実はエンコード時に以下のような結果を生成するようになっていたからである。

<struct><struct>....</struct></struct>

要するにstructノードを二重に生成してしまっているのだ。このためにパッチ前のデコード処理とうまく整合するようになっている。

structノードの生成は、encode:内でwrapVal:type:とencodeStruct:内の二カ所で連続して行っている。

本来こういった問題を回避するためのテストコードが必要で、実際そのためのテストコードもXMLRPCEncoderTest>>testEncoderにあるのだが、そもそもencodeStruct:でstructを生成することを前提にチェックしており問題は露見しない。不思議なのは、同じテストの別の箇所は全てencode:を用いてチェックしているのに、この部分だけはencodeStruct:を用いている。

以上のバグについては、XMLRPCDecoder>>decodeStruct:,

XMLRPCEncoder>>encodeStruct:, XMLRPCEncoderTest>>testEncoderを修正すれば良い。

もう一つのバグは、XMLRPCHttpModuleに関するものである。具体的な現象としては、テストを一度実行するとそれ以降、ネットワークポートが既にアサイン済みである旨のメッセージが出て、テストに失敗するというもの。どうもテスト終了時にネットワークポートの解放ができていないようである。

これはXMLRPCHttpModule class>>pauseでservice unassignPortを実行することで回避した。本来、ここに置くべきなのか不明なのだが、とりあえずの対処として行った。

近日公開予定と思われるPharo-1.3では、pharo-xmlrpcのインストール中にエラーが発生する。この理由は、XMLRPCHttpModule class>>initializeがStartUpListへの登録に、1.3では存在しない（らしい）AutoStartクラスへの参照を含んでいるからである。initializeの実行に失敗しただけなので、手動で実行すれば良いだろう。

なお、パッチは以下に置いてある。

http://itolab.com/software/pharo/xmlrpc-bugfix-struct.1.cs

Windowsでの日本語表示については、以下の手順でOK。

1. FT2Plugin.dllをCog.exeのあるフォルダにコピー
2. Pharoを起動
3. World-System-SettingsでSettings browserを開く
4. Appearance-Standard fontsでDefaultのフォント変更ボタンを押す
5. Font fot defaultFontで、右下のUpdateボタンを押す。
6. 適当なフォントを選んで Apply, OKボタンを押す。
7. Settings browserでReset all to defaultボタンを押す。
8. Settings browserを閉じる。
9. イメージを保存しておく。

入力については一部文字の入力ができない。原因は1.2.1の時と同様。ただし、TextEditor>>dispathOn:は複数のメソッドに分割されたため、以前のパッチを当てるのは不適当である。

TextEditor>>dispatchCommandOn:return:メソッドで以下の部分を変更すれば良い。

- asciiValue := aKeyboardEvent keyValue.
+ asciiValue := aKeyboardEvent keyCharacter.

なお、全ての入力に対して適切に動作するかどうかは未確認であるので変更には注意されたい。

※追記(2011/10/5)：上記のTextEditorに対するパッチは問題が生じることが判明した。正しくは、 id:nqthm:20111004:p1 を参照してほしい。

Pharoの1.3もRelease Candidateになったので、そろそろ出そうな感じである。

日本語の表示と入力を試してみたところ、SnowLeopardについてはFT2Plugin.bundleをコピーすれば問題なさそう。

Windowsについてはまだ試していないが、前回パッチをあてたTextEditor>>dispathOn:の中身が大幅に変わっているようなので、イヤな予感がする。

とりあえず1.3では、このブログに書いてある1.2.1のパッチ当て方では駄目なようなので注意！

来るべき日に備えてPharoにXMLRPCを導入する。

（http://code.google.com/p/pharo-xmlrpc/ より）

まずは、Configurationを取得する。

(Smalltalk at: #Gofer) new
squeaksource: 'MetacelloRepository';
package: 'ConfigurationOfXMLRPC';
load.

Configurationを使っていろんなタイプ（クライアントのみとかサーバー付きとか）が選べる。以下のうち１つを選んでワークスペースに入力し、評価すれば後は勝手にインストールされる。

クライアントのみの場合

ConfigurationOfXMLRPC project latestVersion load: 'Client'.

テスト付きのクライアントの場合

ConfigurationOfXMLRPC project latestVersion load: 'Client with Tests'.

クライアント＋サーバの場合

ConfigurationOfXMLRPC project latestVersion load: 'Server'.

テスト付きのクライアント＋サーバの場合

ConfigurationOfXMLRPC project latestVersion load: 'Server with Tests'.

とりあえず全部？の場合

ConfigurationOfXMLRPC project latestVersion load: 'All'.

当面の目的においてはクライアントのみでOKなので、テスト付きクライアントを取得した。

ところが、wikiにあるサンプル( http://code.google.com/p/pharo-xmlrpc/wiki/Samples )を実行しようとするとエラーになる。XMLRPCDecoderがおかしいらしい。

XMLRPCDecoder>>decodeStruct:を以下のようにすると、うまくいった。

decodeStruct: xml
"Decode the Struct."
| rv |
rv := Dictionary new.
xml elements
do: [:eachNode | rv
at: (eachNode elementAt: 'name') contentString
put: (self
decode: (eachNode elementAt: 'value'))].
^ rv

要はノードの分解を余計にやってしまったことがエラーの原因らしい。これでサンプルもちゃんと動くようになると思ったけど、認証の関係でエラーが返ってきた。でもやりとりは成功しているらしいので良しとする。