F# スクリプトをコマンドラインから簡単に呼び出す方法

小さな作業

最近の仕事では、以下のような作業がちょくちょく発生している。

1. 文字列を MD5 や SHA1 などのアルゴリズムでハッシュ
2. 新しいGUIDの生成
3. 英数字による任意の文字数のランダムな組み合わせの生成
   etc. etc...

これら作業が発生するたびに、いままでは手近にあるプログラムでこなしていた。

1. LINQPad を起動してC#コード片をぱっぱと入力するか（たとえば Guid.NewGuid().ToString("N") とか）、あるいは作り置きしておいたテンプレを開いて実行
2. GUID 生成であれば、SQL Management Studio でクエリウィンドウが開いていれば、そこで SELECT UPPER(REPLACE(NEWID(), '-', '')) を実行
3. GUID 生成であれば、Visual Studio が開いていれば [ツール(T)]-[Create GUI] ツールを起動（Alt, T, G の打鍵で開くことができる）
4. F# インタラクティブ（fsi.exe）を開いて、F# コード片を入力

ざっとこんな感じ。

Ruby や Python、はたまた、PHP などがインストールされている環境で、かつ、ちゃんと使い方に慣れているのであれば、そういったツールや言語を使ったかもしれない。
また、コマンドラインが充実している *nix 系の OS なら上記タスクはコマンドラインからこなせたりするのだろうか。

さてさてそれはともかく、今日までは、上記のような感じで、その場その場でやりくりしてきた。
しかしどうにも不効率だとは常々感じていた。

そこでようやく重い腰を上げて、上記小さな作業を効率よくこなせるようにと、環境整備に着手した。

F# スクリプト

そこで採用したのが F# スクリプトだ。

上記作業をこなす小粒の .fsx ファイルたちを、Path の通ったしかるべきフォルダに置いておき、コマンドプロンプトを開いて呼び出すのだ。

先述の小さな作業をこなしてくれるツール類は、今時代、インターネット上に散在していることと思う。

しかしながら、それらをネット上から探してくるよりは、自分のやりたい作業と自分の感性に完璧にフィットした、小さなスクリプトをぱぱっと書いてためておく方が、よっぽどストレスがないと判断した。

それに F# の勉強にも多少はなろう。

ちなみに、Windows でコマンドラインなら PowerShell がある。
また PowerShell のコマンドレット、スクリプレットは、F# スクリプト同様、.NETer による自作は容易なはずだ。

しかしながら、自分は PowerShell は不勉強なので、今回の選択肢からは漏れた。

環境設定

そうはいっても、そもそも F# スクリプトをコマンドプロンプトから快適に起動するためには、一仕事しないとならない。

まず、そもそもの、F# 処理系自体のインストールだが、自分の場合はたまたま Visual Studio 2010 Pro を利用しており、F# もインストールしてあるので、とくになすべきことはない。

拡張子 .fsx の関連づけ

Visual Studio と F# がインストールされている場合、拡張子 .fsx にはプログラムとの関連づけがされている。
しかし既定で起動するプログラムが、Visual Studio となってしまっている。

たとえば、コマンドプロンプトにて、以下のように入力すると、

echo printf "%s" "Hello" > test.fsx

test.fsx

Visual Studio が起動し、test.fsx をエディタ画面で開いてしまうのだ。

しかし自分がやりたいのは .fsx を fsi.exe で読み込んで実行させることである。

そこで拡張子 .fsx に対する既定のプログラムを、fsi.exe による実行に設定変更することにする。

いろいろやり方があるはずだが、自分はレジストリを直接いじることにした。

レジストリエディタを起動して、HKCR\.fsx を開くと、"VisualStudio.fsx.10.0" といった記述が見つかるはずだ。
そこで続けて、HKCR\VisualStudio.fsx.10.0\shell を開く。
shell の下にはさらに、Open と openRunFsi のサブキーがある。

Open には Visual Studio で開く指令が、openRunFsi には fsi.exe で開く指令が設定されている。
いまのところ、これ以上の設定がないので、Windows OS は、.fsx を "開く" にあたり、既定でいちばん優先順位のたかい Open 指令を実行していたわけだ。

これは、サブキー shell の "(Default)" ノードの値を指定することで設定変更できる。

サブキー shell の "(Default)" ノードに、"openRunFsi" と記述する。
これで、拡張子 .fsx のファイルを "開く" ときの既定の動作が openRunFsi 指令となり、結果として、fsi.exe による実行となるわけだ。レジストリエディタによるこの設定変更がすんだあと、先のコマンドプロンプトに戻って "test.fsx" [Enter] と入力する。
すると、"Hello" と表示されるはずだ。

拡張子の入力を省略

これで目的はほぼ達成できた感じだ。

しかし、かならず拡張子 .fsx までつけなくちゃいけないのが、せっかくのコマンドプロンプト用のツールなのに、感覚を台無しにしている。

幸い、拡張子を省略しても実行されるようにするのは難しくない。

OS の環境変数 PATHEXT に、拡張子 .fsx をセミコロン区切りで追記しておけばよい。これでコマンドプロンプトにて "test" [Enter] と打鍵するだけで、"Hello" と表示されるようになった。

環境変数 PATH の設定

あとは、作成・保存しておいた .fsx ファイルたちをどこか適当なフォルダに集めておき、そのフォルダへのフルパスを、OS の環境変数 PATH にセミコロン区切りで追記しておけば万全だ。

コマンドプロンプトを開けば、いつでもどこでも、自分の作った F# スクリプトを実行できる。

起動が遅い?

ただ、せっかくのコマンドライン環境に水を差すようだが、F# スクリプトは、どうにも起動が遅い。

今回の投稿では割愛するが、ngen による事前コンパイルも当たり前のように済んでいたし、fsi.exe 起動時のオプションスイッチもいろいろいじったが（--gui- などなど）改善には至っていない。

これが今のところの悩みである。