ErlangのEShellでは、pwd(), cd(Dir), ls() という3つの基本的なディレクトリコマンドが備わっています。単純な機能しか持っていませんが、ないよりはずっとましです。
Javaで実装された対話的JavaScript処理系Rhinoには、ディレクトリコマンドがありません。Erlangのpwd(), cd(Dir), ls()と同等の関数を書くことにしました。
pwdコマンド
Javaでカレントディレクトリ（の名前文字列）を得るには次の方法があります。
- System.getProperty("user.dir");
- (new File(".")).getCanonicalPath();
Rhinoでも、どちらの方法も使えます。
まずは一番目の方法； Rhinoでは、システムプロパティの値が大域変数（値はオブジェクト）environmentに入っているので、次のようにすればOK。
function pwd() {
var cwd = environment["user.dir"];
print(cwd);
}
二番目は次のよう。
function pwd() {
var cwd = (new java.io.File(".")).getCanonicalPath();
print(cwd);
}
RhinoからJavaのクラスを参照するときは、パッケージ名も付けたフルネームを使います。Fileオブジェクトには、getAbsolutePath()というメソッドもありますが、これだとディレクトリ名の最後に「\.」または「/.」が付いてしまうので具合がよくありません。
カレントディレクトリ文字列を他の関数で使いたいことがあるので、次のgetCwd()も定義しておきます。
function getCwd() {
return environment["user.dir"];
}
cdコマンド
システムプロパティのfile.separatorの値は、environment["file.separator"] として取れます。あとは、Javaで書く場合とほとんど同じです。（[追記]以下のコード、ほんのチョビット修正[/追記]）
function cd(dirName) {
var sep = environment["file.separator"];
if (dirName[0] != sep) {
dirName = getCwd() + sep + dirName;
}
var newDir = new java.io.File(dirName);
if (!newDir.exists()) {
print("not exist: " + newDir);
return;
}
if (!newDir.isDirectory()) {
print("not a directory: " + newDir);
return;
}
environment["user.dir"] = newDir.getCanonicalPath();
}
lsコマンド
ディレクトリを表すFileオブジェクトのlistFiles()メソッドを使います。listFiles()で得られた配列をそのまま表示するとフルパスが出てちょっとうっとうしいので、baseName関数で短くしています。
function ls() {
var curDir = (new java.io.File(getCwd()));
var list = curDir.listFiles();
for (var i = 0; i < list.length; i++) {
print(baseName(list[i].toString()));
}
}function baseName(path) {
var sep = environment["file.separator"];
var i = path.lastIndexOf(sep);
return path.substring(i + 1);
}
シェルのlsコマンドに比べると貧弱です。必要なら機能拡張してみてください。
[追記]pwdやcdを作っても、もともとの目的は達成されませんでした。その目的とは、loadやreadFileのデフォルトディレクトリを変えることです。Javaのレベルでuser.dirを変更しても、Rhinoが保持している（と思われる）デフォルトディレクトリに影響はないようです。残念。[/追記]
