// ==PREPROCESSOR==
// @name "Favorite Albums2.1"
// @author "Junya Renno"
// ==/PREPROCESSOR==

// Flags, used by Menu
var MF_SEPARATOR = 0x00000800;
var MF_ENABLED = 0x00000000;
var MF_GRAYED = 0x00000001;
var MF_DISABLED = 0x00000002;
var MF_STRING = 0x00000000;
var MF_POPUP = 0x00000010;
var MF_RIGHTJUSTIFY = 0x00004000;

var WshShell = new ActiveXObject("WScript.Shell");
var fso = new ActiveXObject("Scripting.FileSystemObject");
var strText;
var artist_arr = new Array;
var temp_arr = new Array;
var album_arr = new Array;
var tmppath = fso.GetFolder(fb.ProfilePath);
var filename = tmppath+"/favorites.txt";
var imgpath = tmppath+"/skin/mono_lite_p_mu_gray/fav.png";
var i=0;

if( fso.FileExists(filename)){
		read_file();
	}

function on_mouse_lbtn_down(x, y) {
	var base_menu= new Array;
    var _context = fb.CreateContextMenuManager();
    var _basemenu = window.CreatePopupMenu();
    var _child = window.CreatePopupMenu();
    var _child2 = window.CreatePopupMenu();
    var ret;
	var count = 2;
	var album_path = new Array;
	
    // Please start index at 1, NOT 0
    if (artist_arr.length == 0){artist_arr.push("");}
	i=1;
    _basemenu.AppendMenuItem(MF_STRING, 1,"Add Favorite Album");
    _basemenu.AppendMenuItem(MF_SEPARATOR, 0,0);   
	while (i<artist_arr.length)
	{
		base_menu[i] = window.CreatePopupMenu();
	    base_menu[i].AppendTo(_basemenu,MF_STRING, artist_arr[i]);
		var j,k=0;
		for (j=k;j<album_arr.length;j++){
			  if (album_arr[j][0] == i+1){
			  base_menu[i].AppendMenuItem(MF_STRING, count,album_arr[j][1]);
				album_path[count] = album_arr[j][2];
				count++;
				k = j;
			}
		}
	i++;
	}
	
    ret = _basemenu.TrackPopupMenu(x, y);
	var pl_idx = plman.ActivePlaylist;
	var handles = plman.GetPlaylistItems(pl_idx);
	var tf_artist,tf_album,tf_path,tf_fname;
	var re = /^\?$/;
	var playing_locate = plman.GetPlayingItemLocation().PlaylistItemIndex;
    // Here is why start index should be 0
    
    if (ret == 0) {return;}
    
    if (ret == 1) {
    	tf_artist = fb.TitleFormat("%album artist%").EvalWithMetadb(handles.item(playing_locate)).replace(re, "");
    	if (tf_artist == ""){ tf_artist = fb.TitleFormat("%artist%").EvalWithMetadb(handles.item(playing_locate)).replace(re, "");}
    	tf_album = fb.TitleFormat("%album%").EvalWithMetadb(handles.item(playing_locate)).replace(re, "");
    	tf_path = fb.TitleFormat("%path%").EvalWithMetadb(handles.item(playing_locate));
    	add_album(tf_artist,tf_album,tf_path);
    } else {
        if (fso.FileExists(fb.FoobarPath+"foobar2000.exe")){
            if (fso.FolderExists(album_path[ret])){
//if (true){
            runpath = "\""+fb.FoobarPath+"\\foobar2000.exe\""+"\""+album_path[ret]+"\\\"";
            fb.trace("run :: "+runpath);
	            var plc = plman.PlaylistCount;
	            var ah_idx = 0;
	            for(var i=0; i<plc; i++){
	                if (plman.GetPlaylistName(i) == "Favorite Albums"){
	                   ah_idx = i;
	                   break;
	                }
	            }
	            if (ah_idx == 0){
	                plman.CreatePlaylist(plc,"Favorite Albums")
	                ah_idx = plc;
	            }
	            plman.ActivePlaylist = ah_idx;
	            WshShell.Run(runpath);
        	} else {
            	fb.trace("[Favorite Albums]Error:Album not exists."+"\""+fb.FoobarPath+"\\foobar2000.exe "+album_path[ret]+"\"");
           		return
	        }
	    } else {
	        fb.trace("[Favorite Albums]Error:foobar2000 not exists. - "+"\""+tmppath+"\\foobar2000.exe\"");
	        return
	    }
	 }
    _basemenu.Dispose();
}

function on_paint(gr){
	var icon = gdi.Image(imgpath);
	var ww = window.Width;
	var wh = window.Height;
	gr.DrawImage(icon,0,0,ww,wh,0,0,ww,wh);
}

function read_file(){
	var temp_arr = new Array;
	stream = new ActiveXObject("ADODB.Stream");
	stream.type = 2;
	stream.charset = "utf-8";
	i = 0;

	stream.open();
	stream.loadFromFile(filename);
	while (!stream.EOS) {
		strText = stream.readText(-2);
        strText = strText.replace(/\t/g,"");
		temp_arr = strText.split(",");
        temp_arr[0] = temp_arr[0].replace(/^[\s|　]*/,"");
		switch (temp_arr[0]){
			case "d":
				i++;
				artist_arr.push(temp_arr[1]);
				break;
			case "a":
				album_arr.push([i,temp_arr[1],temp_arr[2].replace(/"/g,"")]);
				break;
			case "":
				i++;
				artist_arr.push("");
				break;
			default:
				break;
		}
  	}
	stream.close();
}

function write_file(){
	stream = new ActiveXObject("ADODB.Stream");
	stream.type = 2;
	stream.charset = "utf-8";
	stream.open();
	i = 1;
	stream.writeText("d,"+"\r\n");
	while (i<artist_arr.length)
	{
		stream.writeText("d,"+artist_arr[i]+"\r\n");
		var j,k=0;
		for (j=k;j<album_arr.length;j++){
			if (album_arr[j][0] == i+1){
				stream.writeText("\ta,"+album_arr[j][1]+","+album_arr[j][2]+"\r\n");
				k = j;
			}
		}	
	i++;
	}
	stream.saveToFile(filename, 2);
	stream.close();
}

function add_album(tf_artist,tf_album,tf_path){
	var artist_flag=true;
	var same_album_flag=false;
	var album_folder= fso.GetParentFolderName(tf_path)
	i=0;
	while (i<=artist_arr.length){
		if (artist_arr[i] == tf_artist){
			for (j=0;j<album_arr.length;j++){
				if (album_arr[j][1] == tf_album){
					same_album_flag = true;
				}
			}
			if (!same_album_flag){
				album_arr.push([i+1,tf_album,album_folder]);
			}
		artist_flag = false;
		}
	i++;	
	}
	if (artist_flag){
		artist_arr.push(tf_artist);
		album_arr.push([i,tf_album,album_folder]);
	}
	fb.trace("[Favorite Albums]Added "+tf_artist+" - "+tf_album);
	write_file();
}