dara-j

Enumeratorオブジェクト

ActiveXObjectと同様なJScript固有オブジェクトにEnumeratorがある。これはCOMのコレクションインターフェイスをJScriptから操作するためにある（と思われる）

Enumeratorオブジェクトは、

// folderはfsoのFolderオブジェクトとする
// folder#Filesはfolderが示すディレクトリ内のファイルコレクション
var list = new Enumerator( folder.Files );
for(; ! list.atEnd(); list.moveNext()) {
	// list#item()でコレクション要素（＝fsoのFileオブジェクト）を取得
	var file = list.item();
	// あとはfileを操作する
}

Enumerableに拡張

以前のコマンドライン引数の展開ではラッパーオブジェクトを返す$E()関数を定義したが、今回は直接Enumerableにしてみる。

といっても別に面倒なことがあるわけではなく、_each()を実装後にEnumerableインターフェイスを追加するだけ。

// EnumeratorにEnumerableの機能を追加する
Enumerator.prototype._each = function(iterator) {
	this.moveFirst();
	for(; ! this.atEnd(); this.moveNext()) {
		iterator( this.item() );
	}
}
Object.extend( Enumerator.prototype, Enumerable );

new Enumerator( JScript.fso.GetFolder( "C:\\" ).Files ).each( function(file, index) {
	JScript.console.println( index + " - " + file.Name );
} );

サンプルコード

まとめとして、前回のエントリの定義＋ライブラリロードを加えたサンプルを以下に示す。dummy.jsとprototype.jsは同じディレクトリにあるものとしている。

var JScript = {
	// WshShellのインスタンス
	shell : new ActiveXObject("WScript.Shell"),
	// fsoのインスタンス
	fso : new ActiveXObject("Scripting.FileSystemObject"),
	// 起動ディレクトリ
	startupPath : WScript.ScriptFullName.substr( 0, WScript.ScriptFullName.lastIndexOf("\\") ),
	// スクリプトファイル名
	name : WScript.ScriptName,
	console : {
		// 文字列出力
		print : function(str) {
			WScript.StdOut.Write( str || "" );
		},
		// 文字列の行出力
		println : function(str) {
			WScript.Echo( str || "" );
		},
		// 文字列入力
		readln : function() {
			return WScript.StdIn.ReadLine();
		},
		// ポップアップアラート（consoleじゃないけど）
		popup : function(str, title) {
			JScript.shell.Popup( str || "", 0, title || WScript.ScriptName );
		}
	},
	// 2つのパスを結合するヘルパメソッド
	buildPath : function(path1, path2) {
		return [ path1, path2 ].join( /[\\\/]$/.test( path1 ) ? "" : "/" );
	}
}
// cscriptで起動しなおし
if( /wscript\.exe$/i.test( WScript.FullName ) ) {
	JScript.shell.Run( "cscript \"" + WScript.ScriptFullName + "\"" );
	WScript.Quit();
}

// ライブラリロード
with( {
	libs : [
		"dummy.js",
		"prototype.js"
	],
	index : 0,
	getSource : function(lib) {
		var xhr = new ActiveXObject("Microsoft.XMLHTTP");
		var stream = new ActiveXObject("ADODB.Stream");
		try {
			xhr.open( "GET", "file://" + JScript.buildPath( JScript.startupPath, lib ), false );
			xhr.send();
			
			stream.Open();
			stream.Type = 1; // open as binary mode
			stream.Write( xhr.responseBody );
			
			stream.Position = 0; // rewind
			stream.Type = 2; // change to text mode
			stream.Charset = "Shift_JIS";
			
			return stream.ReadText();
		} finally {
			if( stream ) {
				stream.Close();
			}
		}
	},
	path : ""
} ) {
	while( index < libs.length ) {
		path = libs[ index++ ];
		try {
			eval( getSource( path ) );
		} catch(e) {
			JScript.console.println( "ERROR on " + path );
			JScript.console.println( e.description );
		}
	}
}

// EnumeratorにEnumerableの機能を追加する
Enumerator.prototype._each = function(iterator) {
	this.moveFirst();
	for(; ! this.atEnd(); this.moveNext()) {
		iterator( this.item() );
	}
}
Object.extend( Enumerator.prototype, Enumerable );

// C:直下のファイル名をeachで列挙
new Enumerator( JScript.fso.GetFolder( "C:\\" ).Files ).each( function(file, index) {
	JScript.console.println( index + " - " + file.Name );
} );

JScript.console.print( "Enterキーで終了 > " );
JScript.console.readln();