// Redo Operation
// (c) 2017 Enternal

// Threads Created by Enternal to Ask for Help to Develop Script:
//http://resource.dopus.com/viewtopic.php?f=12&t=28677
//http://resource.dopus.com/viewtopic.php?f=12&t=28694
//http://resource.dopus.com/viewtopic.php?f=12&t=28699
//http://resource.dopus.com/viewtopic.php?f=12&t=28704
//http://resource.dopus.com/viewtopic.php?f=12&t=28706

// Misc Notes
//https://resource.dopus.com/viewtopic.php?t=24251
//http://resource.dopus.com/viewtopic.php?t=24063

function OnInit(initData)
{
	initData.name = "Redo Operation";
	initData.version = "0.1.0";
	initData.copyright = "(c) 2017 Enternal";
	initData.url = "http://resource.dopus.com/viewtopic.php?f=35&t=28756";
	initData.desc = "Track copy/move operations and allow redo for other selected items";
	initData.default_enable = true;
	//initData.min_version = "12.0";

	//http://resource.dopus.com/viewtopic.php?t=22979  Helper: ConfigHelper (easier config item handling) by tbone
	function ConfigHelper(data){ //v1.2
		var t=this; t.d=data; t.c=data.config; t.cd=DOpus.Create.Map();
		t.add=function(name, val, des){ t.l={n:name,ln:name.
			toLowerCase()}; return t.val(val).des(des);}
		t.des=function(des){ if (!des) return t; if (t.cd.empty)
			t.d.config_desc=t.cd; t.cd(t.l.n)=des; return t;}
		t.val=function(val){ var l=t.l; if (l.v!==l.x&&typeof l.v=="object")
			l.v.push_back(val);else l.v=t.c[l.n]=val;return t;}
		t.trn=function(){return t.des(t("script.config."+t.l.ln));}
	}
	var cfg = new ConfigHelper(initData);
	cfg.add("MoveHistoryLength", "15", "Set the history length for recent MOVE operations.");
	cfg.add("CopyHistoryLength", "15", "Set the history length for recent COPY operations.");
	cfg.add("Debug", false, "Set debug to on.");

	var cmd = initData.AddCommand();
	cmd.name = "RedoOperation"
	cmd.method = "OnRedoOperation";
	cmd.desc = initData.desc;
	cmd.label = "Redo Operation"
	cmd.template = "CLEAR/N,LISTMOVE/N,LISTCOPY/N"
}


// Called when a copy or move operation take place
function OnGetCopyQueueName(GetCopyQueueNameData)
{
	var ReOps_dest = GetCopyQueueNameData.dest;
	var ReOps_move = GetCopyQueueNameData.move;

	if (ReOps_move == true) {
		ReOpsInitialize()
		var ReOps_data_move = DOpus.Vars.Get("ReOpsMove");
		var index = searchVector(ReOps_data_move, ReOps_dest);
		if (index != null) {for (var i=index.length-1; i>-1; i=i-1) {ReOps_data_move.erase(index(i));}}
		ReOps_data_move.insert(0, ReOps_dest);
		DOpus.Vars("ReOpsMove") = ReOps_data_move;
		var MoveHistoryLength = Script.config["MoveHistoryLength"];
		while (ReOps_data_move.length>MoveHistoryLength) {
			ReOps_data_move.erase(ReOps_data_move.length-1);
			DOpus.Vars("ReOpsMove") = ReOps_data_move;
		}
	}
	else {
		ReOpsInitialize()
		var ReOps_data_copy = DOpus.Vars.Get("ReOpsCopy");
		var index = searchVector(ReOps_data_copy, ReOps_dest);
		if (index != null) {for (var i=0; i<index.length; i++) {ReOps_data_copy.erase(i);}}
		ReOps_data_copy.insert(0, ReOps_dest);
		DOpus.Vars("ReOpsCopy") = ReOps_data_copy;
			var CopyHistoryLength = Script.config["CopyHistoryLength"];
		while (ReOps_data_copy.length>CopyHistoryLength) {
			ReOps_data_copy.erase(ReOps_data_copy.length-1);
			DOpus.Vars("ReOpsCopy") = ReOps_data_copy;
		}
	}

	if (Script.config["Debug"] == true) {
		//DOpus.ClearOutput
		ReOpsInitialize()
		var ReOps_data_move = DOpus.Vars.Get("ReOpsMove");
		var ReOps_data_copy = DOpus.Vars.Get("ReOpsCopy");
		Log("Redo Operation (Debug)")
		Log("  Redo Operation ReOpsMove Exist: " +DOpus.Vars.Exists("ReOpsMove"))
		Log("  Redo Operation ReOpsCopy Exist: " +DOpus.Vars.Exists("ReOpsCopy"))
		Log("  Redo Operation MOVE History: " +Script.config["MoveHistoryLength"]);
		Log("  Redo Operation COPY History: " +Script.config["CopyHistoryLength"]);
		Log("  Redo Operation MOVE Events");
		if (ReOps_data_move && ReOps_data_move.length) {
			Log("      Vector Length: " +ReOps_data_move.length);
			for (var i=0; i<ReOps_data_move.length; i++) {
				Log("      Event("+i+"): " +ReOps_data_move(i));}
		}
		else {Log("      None")}
		if (ReOps_data_copy && ReOps_data_copy.length) {
			Log("  Redo Operation COPY Events");
			Log("      Vector Length: " +ReOps_data_copy.length);
			for (var i=0; i<ReOps_data_copy.length; i++) {
				Log("      Event("+i+"): " +ReOps_data_copy(i));}
		}
		else {Log("      None")}
		Log("");
	}
}


// Implement the OnRedoOperation command to clear Redo Operation's history
function OnRedoOperation(scriptCmd)
{
	ReOps_clear = 0; // Default value = 0, command not passed
	if (scriptCmd.func.args.got_arg.clear)
		ReOps_clear = scriptCmd.func.args.got_arg.clear;
	ReOps_listmove = 0;
	if (scriptCmd.func.args.got_arg.listmove)
		ReOps_listmove = scriptCmd.func.args.got_arg.listmove;
	ReOps_listcopy = 0;
	if (scriptCmd.func.args.got_arg.listcopy)
		ReOps_listcopy = scriptCmd.func.args.got_arg.listcopy;


	if (ReOps_listmove == 1) {
		ReOpsInitialize() // Ensure all required global varaibles containing history of recent operations exists. If not, initialize them.
		var ReOps_data_move = DOpus.Vars.Get("ReOpsMOVE"); // Load the global history into a local variable to work on
		if (ReOps_data_move.empty == true) {Log("Redo Operation: MOVE History Empty");return;} // If history empty, quit.

		// Create a Dialog object.
		dlg = DOpus.Dlg;
		// Initialise the object to display a popup menu the user can select from
		dlg.window = DOpus.Listers(0);
		dlg.choices = ReOps_data_move; // The list of recent operations stored are the choices to be shown in the menu
		dlg.menu = DOpus.Create.Vector(0);
		// Show the menu
		ret = dlg.Show;
		if (ret == 0) {return;} // Nothing was selected so quit the script
		if (Script.config["Debug"] == true) {
			DOpus.Output("Redo Operation (Debug): MOVE Dialog.Show: " +ret);
			DOpus.Output("Redo Operation (Debug): MOVE Dialog.Selected: " +ReOps_data_move(ret-1));
		}

		//http://resource.dopus.com/viewtopic.php?f=12&t=28704
		if (scriptCmd.func.sourcetab.selected.count == 0) {Log("Redo Operation: No Items Are Selected. Aborting..."); return;} // Quick check to make sure there are something selected
		var cmd = DOpus.Create.Command(); // Create new command to apply to the selected files and folders
		cmd.SetFiles(scriptCmd.func.sourcetab.selected); // Set the selected files and folders as the main items to be acted upon
		cmd.RunCommand('COPY MOVE TO ' + '"' + ReOps_data_move(ret-1) + '"'); // (ret-1) because vectors start from 0 while the dlg.Show starts at 1
	}
	if (ReOps_listcopy == 1) {
		ReOpsInitialize()
		var ReOps_data_copy = DOpus.Vars.Get("ReOpsCopy");
		if (ReOps_data_copy.empty == true) {Log("Redo Operation: Copy History Empty");return;}

		dlg = DOpus.Dlg;
		dlg.window = DOpus.Listers(0);
		dlg.choices = ReOps_data_copy;
		dlg.menu = DOpus.Create.Vector(0);
		ret = dlg.Show;
		if (ret == 0) {return;}
		if (Script.config["Debug"] == true) {
			DOpus.Output("Redo Operation (Debug): COPY Dialog.Show: " +ret);
			DOpus.Output("Redo Operation (Debug): COPY Dialog.Selected: " +ReOps_data_copy(ret-1));
		}

		if (scriptCmd.func.sourcetab.selected.count == 0) {Log("Redo Operation: No Items Are Selected. Aborting..."); return;}
		var cmd = DOpus.Create.Command();
		cmd.SetFiles(scriptCmd.func.sourcetab.selected);
		cmd.RunCommand('COPY TO ' + '"' + ReOps_data_copy(ret-1) + '"');
	}


	if (ReOps_clear == 1) {
		DOpus.Vars.Delete("ReOpsMove"); // Delete global variable that contains the history of recent operations
		DOpus.Vars.Delete("ReOpsCopy");
		Log("Redo Operation: History Cleared");
	}
	if (Script.config["Debug"] == true) {
		Log("Redo Operation (Debug)");
		Log("  ReOpsMove Exist: " +DOpus.Vars.Exists("ReOpsMove"));
		Log("  ReOpsCopy Exist: " +DOpus.Vars.Exists("ReOpsCopy"));
		Log("");
	}
}


// Function to check whether the required global variables for this script to work exist or not. If not, make them and initialize them.
function ReOpsInitialize()
{
	if (DOpus.Vars.Exists("ReOpsMove") == false) {
		DOpus.Vars("ReOpsMove") = DOpus.Create.Vector(); // Initialize global variable as a vector
		DOpus.Vars("ReOpsMove").persist = true; // Set global variable property "persist" to true to last across reboots
		var ReOps_data_move = DOpus.Vars.Get("ReOpsMove");
	}
	if (DOpus.Vars.Exists("ReOpsCopy") == false) {
		DOpus.Vars("ReOpsCopy") = DOpus.Create.Vector();
		DOpus.Vars("ReOpsCopy").persist = true;
		var ReOps_data_copy = DOpus.Vars.Get("ReOpsCopy");
	}
}


// External Helpful Functions
function Log(scriptCmd){DOpus.Output(scriptCmd);} // Saves time from writing the whole "DOpus.Output("Text") to simply "Log("Text")
function searchVector(vector, searchterm) { // Search vector for matched terms and return indexes
	var index = DOpus.Create.Vector(); // Initialize the index vector
	for (var n=0; n<vector.length; n++) { // Go through each element and compare value with search term
		if (String(vector(n)) === String(searchterm)) {index.push_back = n;} // If match search term, store the index into the index vector
																	// Had to use String function. Otherwise it won't work... will need to figure out why...
	}
	return index; // Return the index vector
}