//26.03.17 20:15
//N. Vischer
//Copies all .ojj files to a newly created "shadow" directory tree
//The root of the new tree will either be set beside the source root,
//or can be defined by variable destRoot.
//Old (.ojj) files with same name will be overwritten.
//Old directories with same name will be kept.

var srcFileList = "";
var srcDirList = "";
var destRoot = "";

macro "Copy .ojj's to Shadow Directory"{
    verbose = false;
	print("\\Clear");
	showMessage("Click OK, then choose a source directory");
	srcDir = getDirectory("Choose a Directory ");
	srcRoot = srcDir;
	count = 1;
	nDirs = 0;
	nFiles = 0;
	listFiles(srcDir); 
	function listFiles(srcDir) {
		list = getFileList(srcDir);
		for (i=0; i<list.length; i++) {
			if (endsWith(list[i], "/")){
				srcDirList += srcDir + list[i] + "\n";
				listFiles(""+srcDir+list[i]);
				nDirs++;
			}
			else{
				count++;
				thisPath = srcDir + list[i];
				if(endsWith(thisPath, ".ojj")){
					srcFileList += thisPath + "\n" ;
					nFiles++;	
				}
			}
		}
	}
	print("\n=== srcRoot:\n", srcRoot);
	parent = File.getParent(srcRoot);
	name = File.getName(srcRoot);
	if (destRoot == "")
		destRoot = parent +  "/" + name + "_ojj_Shadow/";

	print("\n=== destRoot:\n",destRoot);


	print("\n=== src files");
	print(srcFileList);

	if(verbose){
		print("\n=== src directories");
		print(srcDirList);
	}

	print("\n=== dest files");
	srcFileList = split(srcFileList,"\t\n");
	len = srcFileList.length;
	destFileList = newArray(len);
	for(jj = 0; jj < len; jj++){
		destFileList[jj] = "" + replace(srcFileList[jj],srcRoot, destRoot);
		print(destFileList[jj]);
	}

	if(verbose) print("\n=== dest directories");
	srcDirList = split(srcDirList,"\t\n");
	dDirs = srcDirList.length;
	destDirList = newArray(dDirs);

	newDirs = 0;
	for(jj = 0; jj < dDirs; jj++){
		thisDir = replace(srcDirList[jj],srcRoot, destRoot);
		for(kk = 0; kk <destFileList.length; kk++){
			hit = startsWith(destFileList[kk], thisDir);
			if(hit){
				destDirList[jj] = thisDir;
				newDirs++;
				if(verbose) print(destDirList[jj]);
				break;
			}
		}
	}

	if(verbose) print("\n=== Create directories:");
	File.makeDirectory(destRoot);
	for(jj = 0; jj < newDirs; jj++){
		dir = destDirList[jj];
		File.makeDirectory(dir);
	}

	if(verbose) print("\n=== Copy files:");
	for(jj = 0; jj < srcFileList.length; jj++){
		src = srcFileList[jj];
		dest = destFileList[jj];
		if(verbose) print("---From: ", src, "\n---To: ", dest);
		File.copy(src, dest);
	}
	
	print("\nDirectories tested: ", nDirs);
	print("Directories created: ", newDirs);
	print("Files copied: ", nFiles);

	selectWindow("Log");
	showMessage("Finished:  "+count + " .ojj files were copied into " + newDirs + " new directories");

}