var resultsDiv;
var running = false;
var address;
var delay = 500;
var requestField;
var searchField;
var awaitingFreeBusyRequests = new Array();
var additionalDays = 2;

var dayStartHour = 8;
var dayEndHour = 18;

var attendeesNames;
var attendeesUIDs;
var attendeesEmails;

function onContactKeydown(event) {
  if (event.ctrlKey || event.metaKey) {
    this.focussed = true;
    return;
  }
  if (event.keyCode == 9) { // Tab
    preventDefault(event);
    if (this.confirmedValue)
      this.value = this.confirmedValue;
    var row = this.parentNode.parentNode.nextSibling;
    while (row && row.tagName != 'TR')
      row = row.nextSibling;
    this.blur();
    var input = $(row.cells[0]).childNodesWithTag("input")[0];
    if (input.readOnly)
      newAttendee(null);
    else {
      input.focussed = true;
      input.activate();
    }
  }
  else if (!running) {
    if (event.keyCode == 0
	|| event.keyCode == 8 // Backspace
        || event.keyCode == 32  // Space
        || event.keyCode > 47) {
      running = true;
      requestField = this;
      requestField.setAttribute("modified", "1");
      if (searchField) {
	searchField.confirmedValue = null;
	searchField.uid = null;
      }
      setTimeout("triggerRequest()", delay);
    }
    else if (this.confirmedValue) {
      if (event.keyCode == 13) { // Enter
	$(this).setCaretTo(this.value.length);
      }
    }
  }
}

function triggerRequest() {
  if (requestField) {
    if (document.contactLookupAjaxRequest) {
      document.contactLookupAjaxRequest.aborted = yes;
      document.contactLookupAjaxRequest.abort();
    }
    var urlstr = ( UserFolderURL + "Contacts/contactSearch?search="
		   + escape(requestField.value) );
    document.contactLookupAjaxRequest = triggerAjaxRequest(urlstr,
							   updateResults,
							   requestField);
  }
}

function updateResults(http) {
  if (http.readyState == 4) {
    var menu = $('attendeesMenu');
    var list = menu.down("ul");

    searchField = http.callbackData; // requestField
    searchField.hasfreebusy = false;
    searchField.setAttribute("uid", null);

    if (http.status == 200) {
      var start = searchField.value.length;
      var data = http.responseText.evalJSON(true);
      if (data.length > 1) {
	$(list.childNodesWithTag("li")).each(function(item) {
	    item.remove();
	  });
	
	// Populate popup menu
	for (var i = 0; i < data.length; i++) {
	  var contact = data[i];
	  var completeEmail = contact["name"] + " <" + contact["email"] + ">";
	  var node = document.createElement("li");
	  list.appendChild(node);
	  node.uid = contact["uid"];
	  node.appendChild(document.createTextNode(completeEmail));
	  $(node).observe("mousedown", onAttendeeResultClick);
	}

	// Show popup menu
	var offset;
	if (isSafari())
	  offset = Position.positionedOffset(searchField);
	else
	  offset = Position.cumulativeOffset(searchField);
	var top = offset[1] + node.offsetHeight + 3;
	var height = 'auto';
	if (data.length > 5) {
	  height = 5 * node.getHeight() + 'px';
	}
	menu.setStyle({ top: top + "px",
	      left: offset[0] + "px",
	      height: height,
	      visibility: "visible"  });
	menu.scrollTop = 0;

	document.currentPopupMenu = menu;
	$(document.body).observe("click", onBodyClickMenuHandler);
      }
      else {
	if (document.currentPopupMenu)
	  hideMenu(document.currentPopupMenu);

	if (data.length == 1) {
	  var contact = data[0];
	  if (contact["uid"].length > 0)
	    searchField.setAttribute("uid", contact["uid"]);
	  var completeEmail = contact["name"] + " <" + contact["email"] + ">";
	  if (contact["name"].substring(0, searchField.value.length).toUpperCase()
	      == searchField.value.toUpperCase())
	    searchField.value = completeEmail;
	  else {
	    searchField.value += ' >> ' + completeEmail;
	  }
	  searchField.confirmedValue = completeEmail;
	  if (searchField.focussed) {
	    var end = searchField.value.length;
	    $(searchField).selectText(start, end);
	  }
	  else
	    searchField.value = contact["name"];
	}
      }
    }
    else
      if (document.currentPopupMenu)
	hideMenu(document.currentPopupMenu);
    running = false;
    document.contactLookupAjaxRequest = null;
  }
}

function onAttendeeResultClick(event) {
  if (searchField) {
    searchField.setAttribute("uid", this.getAttribute("uid"));
    searchField.value = this.firstChild.nodeValue.trim();
    searchField.confirmedValue = searchField.value;
    searchField.blur(); // triggers checkAttendee function call
  }
}

function resetFreeBusyZone() {
  var table = $("freeBusy");
  var row = table.tHead.rows[2];
  for (var i = 1; i < row.cells.length; i++) {
    var nodes = $(row.cells[i]).childNodesWithTag("span");
    for (var j = 0; j < nodes.length; j++)
      nodes[j].removeClassName("busy");
  }
}

function redisplayFreeBusyZone() {
  var table = $("freeBusy");
  var row = table.tHead.rows[2];
  var stDay = $("startTime_date").valueAsDate();
  var etDay = $("endTime_date").valueAsDate();

  var days = stDay.daysUpTo(etDay);
  var addDays = days.length - 1;
  var stHour = parseInt($("startTime_time_hour").value);
  var stMinute = parseInt($("startTime_time_minute").value) / 15;
  var etHour = parseInt($("endTime_time_hour").value);
  var etMinute = parseInt($("endTime_time_minute").value) / 15;
  if (stHour < 8) {
    stHour = 8;
    stMinute = 0;
  }
  if (stHour > 19) {
    stHour = 19
    stMinute = 0;
  }
  if (etHour < 8) {
    etHour = 8;
    etMinute = 0;
  }
  if (etHour > 19) {
    etHour = 19;
    etMinute = 0;
  }
  if (stHour > etHour) {
    var swap = etHour;
    etHour = stHour;
    stHour = swap;
    swap = etMinute;
    etMinute = stMinute;
    stMinute = etMinute;
  } else {
    if (stMinute > etMinute) {
      var swap = etMinute;
      etMinute = stMinute;
      stMinute = swap;
    }
  }

  var deltaCells = (etHour - stHour) + (11 * addDays);
  var deltaSpans = (deltaCells * 4 ) + (etMinute - stMinute);
  var currentCellNbr = stHour - 7;
  var currentCell = row.cells[currentCellNbr];
  var currentSpanNbr = stMinute;
  var spans = $(currentCell).childNodesWithTag("span");
  resetFreeBusyZone();
  while (deltaSpans > 0) {
    var currentSpan = spans[currentSpanNbr];
    currentSpan.addClassName("busy");
    currentSpanNbr++;
    if (currentSpanNbr > 3) {
      currentSpanNbr = 0;
      currentCellNbr++;
      currentCell = row.cells[currentCellNbr];
      spans = $(currentCell).childNodesWithTag("span");
    }
    deltaSpans--;
  }
}

function newAttendee(event) {
   var table = $("freeBusy");
   var tbody = table.tBodies[0];
   var model = tbody.rows[tbody.rows.length - 1];
   var newAttendeeRow = tbody.rows[tbody.rows.length - 2];
   var newRow = model.cloneNode(true);
   tbody.insertBefore(newRow, newAttendeeRow);
  
   $(newRow).className = "";
  
   var input = $(newRow.cells[0]).childNodesWithTag("input")[0];
   input.setAttribute("autocomplete", "off");
   Event.observe(input, "keydown", onContactKeydown.bindAsEventListener(input));
   Event.observe(input, "blur", checkAttendee.bindAsEventListener(input));

   input.focussed = true;
   input.activate();
}

function checkAttendee() {
  if (document.currentPopupMenu)
    hideMenu(document.currentPopupMenu);

  if (document.currentPopupMenu && !this.confirmedValue) {
    // Hack for IE7; blur event is triggered on input field when
    // selecting a menu item
    var visible = $(document.currentPopupMenu).getStyle('visibility') != 'hidden';
    if (visible)
      return;
  }

  this.focussed = false;
  var row = this.parentNode.parentNode;
  var tbody = row.parentNode;
  if (tbody && this.value.trim().length == 0)
    tbody.removeChild(row);
  else if (!this.hasfreebusy) {
    if (this.confirmedValue)
      this.value = this.confirmedValue;
    displayFreeBusyForNode(this);
    this.hasfreebusy = true;
  }

  requestField = null;
  searchField = null;
}

function displayFreeBusyForNode(node) {
  var nodes = node.parentNode.parentNode.cells;
  if (node.getAttribute("uid")) {
    if (document.contactFreeBusyAjaxRequest)
      awaitingFreeBusyRequests.push(node);
    else {
      for (var i = 1; i < nodes.length; i++) {
	$(nodes[i]).removeClassName("noFreeBusy");
	$(nodes[i]).innerHTML = ('<span class="freeBusyZoneElement"></span>'
				 + '<span class="freeBusyZoneElement"></span>'
				 + '<span class="freeBusyZoneElement"></span>'
				 + '<span class="freeBusyZoneElement"></span>');
      }
      if (document.contactFreeBusyAjaxRequest) {
	document.contactFreeBusyAjaxRequest.aborted = true;
	document.contactFreeBusyAjaxRequest.abort();
      }
      var sd = $('startTime_date').valueAsShortDateString();
      var ed = $('endTime_date').valueAsShortDateString();
      var urlstr = ( UserFolderURL + "../" + node.getAttribute("uid") + "/freebusy.ifb/ajaxRead?"
		     + "sday=" + sd + "&eday=" + ed + "&additional=" +
		     additionalDays );
      document.contactFreeBusyAjaxRequest
	= triggerAjaxRequest(urlstr,
			     updateFreeBusyData,
			     node);
    }
  } else {
    for (var i = 1; i < nodes.length; i++) {
      $(nodes[i]).addClassName("noFreeBusy");
      $(nodes[i]).update();
    }
  }
}

function setSlot(tds, nbr, status) {
  var tdnbr = Math.floor(nbr / 4);
  var spannbr = nbr - (tdnbr * 4);
  var days = 0;
  if (tdnbr > 24) {
    days = Math.floor(tdnbr / 24);
    tdnbr -= (days * 24);
  }
  if (tdnbr > 7 && tdnbr < 19) {
    var i = (days * 11 + tdnbr - 7);
    var td = tds[i];
    var spans = $(td).childNodesWithTag("span");
    if (status == '2')
      $(spans[spannbr]).addClassName("maybe-busy");
    else
      $(spans[spannbr]).addClassName("busy");
  }
}

function updateFreeBusyData(http) {
  if (http.readyState == 4) {
    if (http.status == 200) {
      var node = http.callbackData;
      var slots = http.responseText.split(",");
      var tds = node.parentNode.parentNode.cells;
      for (var i = 0; i < slots.length; i++) {
        if (slots[i] != '0')
	  setSlot(tds, i, slots[i]);
      }
    }
    document.contactFreeBusyAjaxRequest = null;
    if (awaitingFreeBusyRequests.length > 0)
      displayFreeBusyForNode(awaitingFreeBusyRequests.shift());
  }
}

function resetAllFreeBusys() {
  var table = $("freeBusy");
  var inputs = table.getElementsByTagName("input");

  for (var i = 0; i < inputs.length - 2; i++) {
    var currentInput = inputs[i];
    currentInput.hasfreebusy = false;
    displayFreeBusyForNode(inputs[i]);
  }
}

function initializeWindowButtons() {
   var okButton = $("okButton");
   var cancelButton = $("cancelButton");

   Event.observe(okButton, "click", onEditorOkClick, false);
   Event.observe(cancelButton, "click", onEditorCancelClick, false);

   var buttons = $("freeBusyViewButtons").childNodesWithTag("a");
   for (var i = 0; i < buttons.length; i++)
     Event.observe(buttons[i], "click", listRowMouseDownHandler, false);
   buttons = $("freeBusyZoomButtons").childNodesWithTag("a");
   for (var i = 0; i < buttons.length; i++)
     Event.observe(buttons[i], "click", listRowMouseDownHandler, false);
   buttons = $("freeBusyButtons").childNodesWithTag("a");
   for (var i = 0; i < buttons.length; i++)
     Event.observe(buttons[i], "click", listRowMouseDownHandler, false);
}

function onEditorOkClick(event) {
   preventDefault(event);
   
   attendeesNames = new Array();
   attendeesUIDs = new Array();
   attendeesEmails = new Array();
   
   var table = $("freeBusy");
   var inputs = table.getElementsByTagName("input");
   for (var i = 0; i < inputs.length - 2; i++) {
     var name = extractEmailName(inputs[i].value);
     var email = extractEmailAddress(inputs[i].value);
     var uid = "";
     if (inputs[i].getAttribute("uid"))
       uid = inputs[i].getAttribute("uid");
     if (!(name && name.length > 0))
       if (inputs[i].uid)
	 name = inputs[i].uid;
       else
	 name = email;
     var pos = attendeesEmails.indexOf(email);
     if (pos == -1)
       pos = attendeesEmails.length;
     attendeesNames[pos] = name;
     attendeesUIDs[pos] = uid;
     attendeesEmails[pos] = email;
   }
   parent$("attendeesNames").value = attendeesNames.join(",");
   parent$("attendeesUIDs").value = attendeesUIDs.join(",");
   parent$("attendeesEmails").value = attendeesEmails.join(",");
   window.opener.refreshAttendees();

   updateParentDateFields("startTime", "startTime");
   updateParentDateFields("endTime", "endTime");

   window.close();
}

function onEditorCancelClick(event) {
   preventDefault(event);
   window.close();
}

function synchronizeWithParent(srcWidgetName, dstWidgetName) {
   var srcDate = parent$(srcWidgetName + "_date");
   var dstDate = $(dstWidgetName + "_date");
   dstDate.value = srcDate.value;

   var srcHour = parent$(srcWidgetName + "_time_hour");
   var dstHour = $(dstWidgetName + "_time_hour");
   dstHour.value = srcHour.value;

   var srcMinute = parent$(srcWidgetName + "_time_minute");
   var dstMinute = $(dstWidgetName + "_time_minute");
   dstMinute.value = srcMinute.value;
}

function updateParentDateFields(srcWidgetName, dstWidgetName) {
   var srcDate = $(srcWidgetName + "_date");
   var dstDate = parent$(dstWidgetName + "_date");
   dstDate.value = srcDate.value;

   var srcHour = $(srcWidgetName + "_time_hour");
   var dstHour = parent$(dstWidgetName + "_time_hour");
   dstHour.value = srcHour.value;

   var srcMinute = $(srcWidgetName + "_time_minute");
   var dstMinute = parent$(dstWidgetName + "_time_minute");
   dstMinute.value = srcMinute.value;
}

function initializeTimeWidgets() {
   synchronizeWithParent("startTime", "startTime");
   synchronizeWithParent("endTime", "endTime");

   Event.observe($("startTime_date"), "change", onTimeDateWidgetChange, false);
   Event.observe($("startTime_time_hour"), "change", onTimeWidgetChange, false);
   Event.observe($("startTime_time_minute"), "change", onTimeWidgetChange, false);

   Event.observe($("endTime_date"), "change", onTimeDateWidgetChange, false);
   Event.observe($("endTime_time_hour"), "change", onTimeWidgetChange, false);
   Event.observe($("endTime_time_minute"), "change", onTimeWidgetChange, false);
}

function onTimeWidgetChange() {
   redisplayFreeBusyZone();
}

function onTimeDateWidgetChange(event) {
  var table = $("freeBusy");

  var rows = table.tHead.rows;
  for (var i = 0; i < rows.length; i++) {
     for (var j = rows[i].cells.length - 1; j > 0; j--) {
	rows[i].deleteCell(j);
     }
  }

  rows = table.tBodies[0].rows;
  for (var i = 0; i < rows.length; i++) {
     for (var j = rows[i].cells.length - 1; j > 0; j--) {
	rows[i].deleteCell(j);
     }
  }

  prepareTableHeaders();
  prepareTableRows();
  redisplayFreeBusyZone();
  resetAllFreeBusys();
}

function prepareTableHeaders() {
   var startTimeDate = $("startTime_date");
   var startDate = startTimeDate.valueAsDate();

   var endTimeDate = $("endTime_date");
   var endDate = endTimeDate.valueAsDate();
   endDate.setTime(endDate.getTime() + (additionalDays * 86400000));

   var rows = $("freeBusy").tHead.rows;
   var days = startDate.daysUpTo(endDate);
   for (var i = 0; i < days.length; i++) {
      var header1 = document.createElement("th");
      header1.colSpan = (dayEndHour - dayStartHour) + 1;
      header1.appendChild(document.createTextNode(days[i].toLocaleDateString()));
      rows[0].appendChild(header1);
      for (var hour = dayStartHour; hour < (dayEndHour + 1); hour++) {
	 var header2 = document.createElement("th");
	 var text = hour + ":00";
	 if (hour < 10)
	    text = "0" + text;
	 header2.appendChild(document.createTextNode(text));
	 rows[1].appendChild(header2);

	 var header3 = document.createElement("th");
	 for (var span = 0; span < 4; span++) {
	    var spanElement = document.createElement("span");
	    $(spanElement).addClassName("freeBusyZoneElement");
	    header3.appendChild(spanElement);
	 }
	 rows[2].appendChild(header3);
      }
   }
}

function prepareTableRows() {
   var startTimeDate = $("startTime_date");
   var startDate = startTimeDate.valueAsDate();

   var endTimeDate = $("endTime_date");
   var endDate = endTimeDate.valueAsDate();
   endDate.setTime(endDate.getTime() + (additionalDays * 86400000));

   var rows = $("freeBusy").tBodies[0].rows;
   var days = startDate.daysUpTo(endDate);
   for (var i = 0; i < days.length; i++)
      for (var rowNbr = 0; rowNbr < rows.length; rowNbr++)
	 for (var hour = dayStartHour; hour < (dayEndHour + 1); hour++)
	    rows[rowNbr].appendChild(document.createElement("td"));
}

function prepareAttendees() {
   var value = parent$("attendeesNames").value;
   var table = $("freeBusy");
   if (value.length > 0) {
      attendeesNames = parent$("attendeesNames").value.split(",");
      attendeesUIDs = parent$("attendeesUIDs").value.split(",");
      attendeesEmails = parent$("attendeesEmails").value.split(",");

      var tbody = table.tBodies[0];
      var model = tbody.rows[tbody.rows.length - 1];
      var newAttendeeRow = tbody.rows[tbody.rows.length - 2];
      for (var i = 0; i < attendeesNames.length; i++) {
	 var row = model.cloneNode(true);
	 tbody.insertBefore(row, newAttendeeRow);
	 $(row).removeClassName("attendeeModel");
	 var input = $(row).down("input");
	 var value = "";
	 if (attendeesNames[i].length > 0 && attendeesNames[i] != attendeesEmails[i])
	    value += attendeesNames[i] + " ";
	 value += "<" + attendeesEmails[i] + ">";
	 input.value = value;
	 if (attendeesUIDs[i].length > 0)
	   input.setAttribute("uid", attendeesUIDs[i]);
	 input.setAttribute("name", "");
	 input.setAttribute("modified", "0");
	 input.observe("blur", checkAttendee);
	 input.observe("keydown", onContactKeydown);
	 displayFreeBusyForNode(input);
      }
   }
   else {
      attendeesNames = new Array();
      attendeesUIDs = new Array();
      attendeesEmails = new Array();
   }

   var inputs = table.getElementsByTagName("input");
   inputs[inputs.length - 2].setAttribute("autocomplete", "off");
   Event.observe(inputs[inputs.length - 2], "click", newAttendee);
}

function onFreeBusyLoadHandler() {
   initializeWindowButtons();
   initializeTimeWidgets();
   prepareTableHeaders();
   prepareTableRows();
   redisplayFreeBusyZone();
   prepareAttendees();
}

FastInit.addOnLoad(onFreeBusyLoadHandler);