xfy をリモート操作できるか？

xfy をリモート操作できるか？
以前、xfy に echo サーバー機能を追加する例を公開したことがある。
- http://youichi-kato.cocolog-nifty.com/blog/2007/02/xfy_instruction_6fa3.html
> > xfy の instruction で echo server を実装する

echo 機能では、稼働している xfy 自体には副作用を与えることができない。
java.awt.Robot を利用して、マウスイベントをサーバーで受付けるようにすれば、
xfy をremote で操作するようなことができるかもしれない。

- http://java.sun.com./javase/ja/6/docs/ja/api/java/awt/Robot.html
> > Robot (Java Platform SE 6)
> ...
> このクラスを用いると、テストの自動化、自動実行のデモ、およびマウスやキーボード制御が必要なアプリケーションのために、ネイティブなシステム入力イベントを生成することができます。Robot の主な目的は、Java プラットフォーム実装テストを自動化することです。 
> ...

- http://www.itarchitect.jp/technology_and_programming/-/34462-4.html
> > JUnitスーパーTips 第3回 - ITアーキテクト
> GUI操作を伴うテストを自動化する——クラスRobotの利用法——

ほんとうは、server 内部から、srcDOM を直接編集したりできたらとおもっているのだが、
java 実装の xvcd の function/instruction の実装例は context とかいう変数のアクセス
している。これをどのように取得してすればいいのかが判らないので、実験コードが書けないでいる orz...

VNC でブラウザ経由で操作するのが一番照っとり早い？
この場合手元マシンに xfy をインストールする必要もなくて、別の意味で便利かもしれない。

xfy の xpath 関数のコーディングの工夫案

xfy/xvcd で java ファンクションを１つ追加するための作業が面倒だ。
そこでこんな方法を思いついた。
　my:eval(functionname, arg0, arg1, ...)形式で eval() という関数を１つだけ定義することにする というものだ。
第一引数を関数名とすることにして、eval 関数の call() メソッド中で分岐させるのだ。
これなら、新しい関数を追加するときは、 call() 中での分岐を増やしていくだけで済む。
その分岐も 実際には　if ... elseif ... の羅列でなく、hash で管理すれば分岐数増加にも対応しやすくなる。

実際のコード例はこんな感じになる。ここでは
eval('setLocale', lang), eval('getLocale') として、Locale を set/get する関数を作ってみている。

/** example:eval(funcname, p0, p1...) */
public class EvalFunction implements Function {

    private static final Map<String, Function> funcSet = init();

    private static final Map<String, Function> init() {
        final Map<String, Function> map = new HashMap<String, Function>();

        map.put("list", new ListFunction());

        map.put("setLocale", new SetLocaleLanguageFunction());
        map.put("getLocale", new GetLocaleLanguageFunction());

        return map;
    }

    private Function getInstance(final Arguments args) {
        final Value v = args.getArgument(0);
        final String funcName = v.getAsString();
        Function func = funcSet.get(funcName);
        assert func != null;
        return func;
    }

    public Value call(final Arguments args, final Context context)
            throws ValueException {
        final Value val = this.getInstance(args).call(args, context);
        return val;
    }

    /* ============================================ */
    /**
     * 処理できる関数一覧を返す。
     */
    static class ListFunction implements Function {
        public Value call(final Arguments args, final Context context)
                throws ValueException {
            final StringBuilder sb = new StringBuilder();
            for (final Map.Entry<String, Function> e : funcSet.entrySet()) {
                sb.append(e + " ");
            }
            return new StringValue(sb.toString());
        }
    }

    /**
     */
    static class GetLocaleLanguageFunction implements Function {
        public Value call(final Arguments args, final Context context)
                throws ValueException {

            FunctionUtility.checkCount(context, args, 1);

            final Locale locale = Locale.getDefault();
            return new StringValue(locale.getLanguage());
        }
    }

    /**
     */
    static class SetLocaleLanguageFunction implements Function {
        public Value call(final Arguments args, final Context context)
                throws ValueException {
  .. 省略 ...
        }
    }
}

呼び出し側の xvcd はこんな感じ。
        <td>
          Current Locate:
          <xvcd:value-of select="xvcd:user-data('locale')" />
        </td>
        <td>
          <ctrl:trigger>
            <ctrl:label>set Locale:en</ctrl:label>
            <xvcd:action event="ctrl:triggered">
              <instruction:message-box>
                Change locale from
                <xvcd:value-of select="example:eval('setLocale', 'en')" />
              </instruction:message-box>
              <xvcd:set-user-data name="locale"
                value="{example:eval('getLocale')}" />
            </xvcd:action>
          </ctrl:trigger>
        </td>
    ... 省略 ...

Arguments のなかの最初の要素を取り除く方法があれば、既存の方法で書いたFunction の call メソッドをそのまま呼び出すようにもできるのだが。

この関数名自体を argument にしてしまう方法は、xfy/xvcd の instructionを書く場合にも流用できると思う。