// EmlEmail (Options)
var gbUseLogging=false;
var fs = new ActiveXObject("Scripting.FileSystemObject");
var st = DOpus.Create.StringTools();
  
//Define columns here, includes title and regexp.
var config = {
  columns: [{
    name:"ToAddres",
    displayName:"To Address",
    re: /^To:\s(.*)$/
  }, {
    name:"FromAddress",
    displayName:"From Address",
    re: /^From:\s(.*)$/
  }, {
    name:"Subject",
    displayName:"Subject",
    re: /^Subject:\s(.*)$/
  }, {
    name:"Date",
    displayName:"Date",
    re: /^Date:\s(.*)$/
  }]
}

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

// Called by Directory Opus to initialize the script
function OnInit(initData){
  initData.name = "EmlEmailColumns";
  initData.desc = "Adds columns for displaying EML file properties, I.E. To address, from address, subject.";
  initData.copyright = "wowbagger";
  initData.version="1";
  initData.default_enable=true;
  initData.config.exclusionFilter=DOpus.NewVector();
  initData.config.displayForAll=false;

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

function AddFolderDateCol(initData,name,label){
  var col;
  col=initData.AddColumn();
  col.name = name;
  col.label = label;
  col.method = "OnEmlEmail";
  col.autogroup = true;
  col.autorefresh=true;
  col.justify = "left";
  col.multicol=true;
}

function OnEmlEmail(scriptColData){
  if (!InArray(scriptColData.col,config.columns)) return;
  if (!scriptColData.item.is_dir) {
    var item=ScanEmlFile(scriptColData.item.realpath);
      
    if (item){
      for(i=0;i<config.columns.length;i++) {
        scriptColData.columns(config.columns[i].name).value = item[config.columns[i].name];
      }
    }
  }
}

function ScanEmlFile(path,filterFunc,recurse){
  var ToEmail;
  var FromEmail;
  var fn = fs.OpenTextFile(path, 1, 2);
  var results = {};
    
  while (!fn.AtEndOfStream) {
    var textLine = fn.ReadLine();
    for(i=0;i<config.columns.length;i++) {
      var match = config.columns[i].re.exec(textLine);
      if (match != null)
      {
	    if (match[1].substring(0,2) == "=?")
			match[1] = st.Decode(match[1]);
        results[config.columns[i].name] = match[1];
      }
    }
  }

  if (results){
    return results;
  } else return null;
}

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