// -------------------- Options
var gbUseLogging=true;

// -------------------- Variables
var fs = new ActiveXObject("Scripting.FileSystemObject");
var st = DOpus.Create.StringTools();

// Define columns here, includes title and reg-exp.
var config = {
	columns: [{
	name:"ToAddress",
	displayName:"To Address",
	re: /^To:\s(.*)$/,
	type: "string",
	defwidth: 18
	}, {
	name:"FromAddress",
	displayName:"From Address",
	re: /^From:\s(.*)$/,
	type: "string",
	defwidth: 18
	}, {
	name:"Subject",
	displayName:"Subject",
	re: /^Subject:\s(.*)$/,
	type: "string",
	defwidth: 20
	}, { 
	name:"Newsgroups",
	displayName:"Newsgroups",
	re: /^Newsgroups:\s(.*)$/,
	type: "string",
	defwidth: 18
	}, {	 
	name:"MessageID",
	displayName:"Message-ID",
	re: /^Message-ID:\s(.*)$/,
	type: "string",
	defwidth: 18	
	}, {
	name:"Date",
	displayName:"Date",
	re: /^Date:\s(.*)$/,
	type: "datetime",
	defwidth: 10
	}]
}

// -------------------- Main
function Log(s){
	if (gbUseLogging) DOpus.Output(s);
}

// Called by Directory Opus to initialize the script.
function OnInit(initData){
	var uid = "60149ff2-5d64-4d4d-b63b-837d05500e24";
	var url = "http://resource.dopus.com/viewtopic.php?f=35&p=134554";
	initData.url = url;
	initData.name = "Columns For EML Mail";
	initData.desc = "Adds columns for displaying EML file properties, I.E. To address, from address, subject.";
	initData.copyright = "wowbagger, andersonnnunes";
	initData.version = "1.4";
	initData.default_enable = true;
	initData.config.exclusionFilter = DOpus.NewVector();
	initData.config.displayForAll = false;
	initData.config.facilitateSubjectGrouping = true;
	initData.min_version = "11.13.3";

	for(i=0;i<config.columns.length;i++) {
	AddFolderDateCol(initData,config.columns[i].name,config.columns[i].displayName,config.columns[i].type,config.columns[i].defwidth);
	}
}

function AddFolderDateCol(initData,name,label,type,defwidth){
	var col;
	col=initData.AddColumn();
	col.name = name;
	col.label = label;
	col.type = type;
	col.method = "OnEmlEmail";
	col.autogroup = true;
	col.autorefresh = true;
	col.justify = "left";
	col.multicol = true;
	if(defwidth != null && defwidth != 0)
	{
	col.defwidth=defwidth;
	}
}

function OnEmlEmail(scriptColData){
	var itemPath = scriptColData.item.path + "\\" + scriptColData.item.name;
	if (itemPath.length > 255) return;
	if (!InArray(scriptColData.col,config.columns)) return;
	if (!scriptColData.item.is_dir && (scriptColData.item.ext.toLowerCase() == ".eml" || scriptColData.item.ext.toLowerCase() == ".msg" || scriptColData.item.ext.toLowerCase() == ".txt"))
	{
		var item = ScanEmailFile(itemPath);
		if (item){
			for ( i = 0; i < config.columns.length; i++) {
				if (config.columns[i].type == "datetime")
				{
					scriptColData.columns(config.columns[i].name).value = new Date(Date.parse(item[config.columns[i].name])).getVarDate();
				}
				else
				{
					iValue = item[config.columns[i].name];
					if (Script.config.facilitateSubjectGrouping && config.columns[i].name == "Subject")
					{
						iValue = iValue.replace(/(RES|ENC|Re): /g, "")
					}
					scriptColData.columns(config.columns[i].name).value = iValue;
				}
			}
		}
	}
}

function ScanEmailFile(path,filterFunc)
{
	var result = {};

	for(i=0;i<config.columns.length;i++)
	{
	var fn = fs.OpenTextFile(path, 1, 2);
	while (!fn.AtEndOfStream)
	{
		var textLine = fn.ReadLine();
		var match = config.columns[i].re.exec(textLine);
		if (match != null)
		{
			fn.Close();
			if (match[1].substring(0,2) == "=?")
			{
				match[1] = st.Decode(match[1], "auto");
			}
			result[config.columns[i].name] = match[1];
			break;
		}
	result[config.columns[i].name] = "";
	}
	fn.Close();
	}

	if (result)
		return result;
	else
		return null;
}

function InArray(col,arr){
	for (var i=0;i<arr.length;i++){
	if (col==arr[i].name) return true;
	}
}