/*
 *	jQuery Autoselector
 *		+ Requires options.data in the following format [['name', 'detail', 'ID', ...], ...]
 *              ++ name = Name of option
 *              ++ detail = additional detail, hidden if empty string
 *              ++ ID = unique identifier for this row
 *              + Specify options.onNewEntry( text_input, callback ) to hook into item additions (enter in input field)
 *              ++ text_input = what the user put in the input field before hitting enter
 *              ++ callback = call this with the new row ['name', 'detail', 'ID', ...]
 */
jQuery.autoselect = function(input, options) {
	// Create a link to self
	var me = this;

	// Create jQuery object for input element
	var $input = $(input).attr("autoselect", "off");

	// Apply inputClass if necessary
	if (options.inputClass) $input.addClass(options.inputClass);

	// Create results

	// Create jQuery object for results
	var $results = $("#"+options.resultsID);
	var results = $results[0];
	$results.hide().addClass(options.resultsClass);
	if( options.width > 0 ) $results.css("width", options.width);

	input.autoselector = me;

	var timeout = null;
	var prev = "";
	var active = -1;
	var cache = {};
	var keyb = false;
	var hasFocus = false;
	var lastKeyPressCode = null;
	var selected = false;
	var chosenIdx = {};

	// flush cache
	function flushCache(){
		cache = {};
		cache.data = {};
		cache.length = 0;
	};

	// flush cache
	flushCache();

	// if there is a data array supplied
	if( options.data != null ){
		var sFirstChar = "", stMatchSets = {}, row = [];

		// no url was specified, we need to adjust the cache length to make sure it fits the local data store
		if( typeof options.url != "string" ) options.cacheLength = 1;

		if (options.cachePreload) {
			options.cachePreload(addToCache, options);
		}
		else {
			if (options.randomSelectionOnEmptyString) {
				stMatchSets['RANDOM'] = options.randomSelectionOnEmptyString;
			}
			// loop through the array and create a lookup structure
			for( var i=0; i < options.data.length; i++ ){
				// if row is a string, make an array otherwise just reference the array
				row = ((typeof options.data[i] == "string") ? [options.data[i]] : options.data[i]);

				// if the length is zero, don't add to list
				if( row[0].length > 0 ){
					// get the first character
					sFirstChar = row[0].substring(0, 1).toLowerCase();
					// if no lookup array for this character exists, look it up now
					if( !stMatchSets[sFirstChar] ) stMatchSets[sFirstChar] = [];
					// if the match is a string
					stMatchSets[sFirstChar].push(row);
				}
			}
			// add the data items to the cache
			for( var k in stMatchSets ){
				// increase the cache size
				options.cacheLength++;
				// add to the cache
				addToCache(k, stMatchSets[k]);
			}
		}
	}

        $input.unbind('keydown').unbind('focus').unbind('blur');
	$input
	.keydown(function(e) {
		// track last key pressed
		lastKeyPressCode = e.keyCode;
		switch(e.keyCode) {
		  case 38: // up
		    e.preventDefault();
		    moveSelect(-1);
		    break;
		  case 40: // down
		    e.preventDefault();
		    moveSelect(1);
		    break;
		  //case 9:  // tab
		  case 13: // enter
		    if( selectCurrent() ){
		      // make sure to blur off the current field
		      //$input.get(0).blur();

		    }else{
		      options.onNewEntry($input[0].value, function( newData ){ addNewEntries([newData]); } );
		    }
		    e.preventDefault();
		    break;
		  default:
		    active = -1;
		    if (timeout) clearTimeout(timeout);
		    timeout = setTimeout(function(){onChange();}, options.delay);
		    break;
		}
	})
	.focus(function(){
		// track whether the field has focus, we shouldn't process any results if the field no longer has focus
		hasFocus = true;
		if (options.focusClear == 1 && selected) {
			$input.val("");
			selected = false;
			showAll();
		}
		v = $input.val();
		requestData(v);
	})
	.blur(function() {
		// track whether the field has focus
		//showAll();
		hasFocus = false;
	});


	hideResultsNow();

	/**
	 * Add new entries (in options.data format) to the dictionary. If autoselect is enabled,
	 * the new entries are checked immediately.
	 * @param entries Array of entries to add
	 * @param autoselect Boolean indicator of whether to automatically select/check the new entries
	 */
	function addNewEntries( entries, autoselect ){
	  if( typeof( autoselect ) == 'undefined' ){
	    autoselect = true;
	  }
	  $results.show();
	  var added_rows = addDataToCache(entries);
	  if( autoselect ){
	    for( row_idx in added_rows ){
	      chosenIdx[added_rows[row_idx][2]] = true;
	    }

	  }
	  showAll();
	};

	function showAll() {
	  options.onNewResult([]);
	  $input[0].value = '';
	  receiveData( '', options.data );
	};

	function onChange() {
		// ignore if the following keys are pressed: [del] [shift] [capslock]
		//if( lastKeyPressCode == 46 || (lastKeyPressCode > 8 && lastKeyPressCode < 32) ) return $results.hide();
		var v = $input.val();
		if (v == prev) return true;
		prev = v;
		if (v.length >= options.minChars) {
			$input.addClass(options.loadingClass);
			requestData(v);
		} else {
			$input.removeClass(options.loadingClass);
			$results.hide();
			showAll();
		}
		options.onChange();
		return true;
	};

 	function moveSelect(step) {
		var lis = $("li", results);
		if (!lis || lis.size() == 0 ) return;

		active += step;

		if (active < 0) {
			active = 0;
		} else if (active >= lis.size() ) {
			active = lis.size() - 1;
		}
		else if (active >= options['maxItemsToShow'] && options['maxItemsToShow'] > 0) {
			active = options['maxItemsToShow'] - 1;
		}

		lis.removeClass("ac_over");

		lis.each(function(index) {
			$(this).html($(this).html().replace(/ac_over_selected/, 'ac_selected'));
		});

		$(lis[active]).addClass("ac_over");
		$(lis[active]).html($(lis[active]).html().replace(/ac_selected/, 'ac_over_selected'));

		// Weird behaviour in IE
		// if (lis[active] && lis[active].scrollIntoView) {
		// 	lis[active].scrollIntoView(false);
		// }

	};

	/**
	 * Add data to the cache after initialization. Also filters what would be duplicate entries.
	 * @param data Array of rows to be added
	 * @param autoselect Boolean determines whether new additions are automatically selected
	 */
	function addDataToCache( data ){
	  var sFirstChar = "", stMatchSets = {}, row = [], added_rows = [];
	  // loop through the array and create a lookup structure
	  for( var i=0; i < data.length; i++ ){
	    // if row is a string, make an array otherwise just reference the array
	    row = ((typeof data[i] == "string") ? [data[i]] : data[i]);

	    // if the length is zero, don't add to list
	    if( row[0].length > 0 ){
	      // get the first character
	      sFirstChar = row[0].substring(0, 1).toLowerCase();
	      // if no lookup array for this character exists, look it up now
	      if( !stMatchSets[sFirstChar] ) stMatchSets[sFirstChar] = [];
	      // if the match is a string
	      stMatchSets[sFirstChar].push(row);
	    }
	  }

	  // add the data items to the cache
	  for( var k in stMatchSets ){
	    // increase the cache size
	    if( !stMatchSets[k]) options.cacheLength++;
	    // add to the cache
	    var added_rows_set = addToCache(k, stMatchSets[k]);
	    for( var j in added_rows_set ){
	      options.data.unshift(added_rows_set[j]);
	      added_rows.push( added_rows_set[j] );
	    }

	  }
	  return added_rows;
	};

	function selectCurrent() {
		var li = $("li.ac_over", results)[0];
		if (li) {
			selectItem(li);
			return true;
		} else {
			return false;
		}
	};

	function selectItem(li) {
		if (!li) {
			li = document.createElement("li");
			li.extra = [];
			li.selectValue = "";
		}
		var v = $.trim(li.selectValue ? li.selectValue : li.innerHTML);
		input.lastSelected = v;
		prev = v;
		selected = true;
		if( chosenIdx[li.id] != true ){
		  chosenIdx[li.id] = true;
		  $(li).addClass('selected');
		  $('input', li).attr('checked', 'checked');
		}else{
		  chosenIdx[li.id] = false;
		  $(li).removeClass('selected');
		  $('input', li).removeAttr('checked');
		}
		notifyOfSelection(li);
	};

	// selects a portion of the input string
	function createSelection(start, end){
		// get a reference to the input element
		var field = $input.get(0);
		if( field.createTextRange ){
			var selRange = field.createTextRange();
			selRange.collapse(true);
			selRange.moveStart("character", start);
			selRange.moveEnd("character", end);
			selRange.select();
		} else if( field.setSelectionRange ){
			field.setSelectionRange(start, end);
		} else {
			if( field.selectionStart ){
				field.selectionStart = start;
				field.selectionEnd = end;
			}
		}
		field.focus();
	};

	// fills in the input box w/the first match (assumed to be the best match)
	function autoFill(sValue){
		// if the last user key pressed was backspace, don't autofill
		if( lastKeyPressCode != 8 ){
			// fill in the value (keep the case the user has typed)
			$input.val($input.val() + sValue.substring(prev.length));
			// select the portion of the value not typed by the user (so the next character will erase)
			createSelection(prev.length, sValue.length);
		}
	};

	function showResults() {
	  $results.show();
	};

	function hideResults() {
		if (timeout) clearTimeout(timeout);
		timeout = setTimeout(hideResultsNow, 200);
	};

	function hideResultsNow() {
		if (timeout) clearTimeout(timeout);
		$input.removeClass(options.loadingClass);
		if ($results.is(":visible")) {
			$results.hide();
		}
		if (options.mustMatch) {
			var v = $input.val();
			if (v != input.lastSelected) {
				selectItem(null);
			}
		}

		if( options.onHideResultsNow ){
		  options.onHideResultsNow();
		}
	};

	function receiveData(q, data) {
		options.current_query = q;
		if (data && options.data.length > 0) {
			$input.removeClass(options.loadingClass);
			results.innerHTML = "";

			// if there are no matches, do not display the drop down
			//if( data.length == 0 ) return hideResultsNow();

			results.appendChild(dataToDom(data));

			for (var i = 0; i < results.childNodes.length; ++i)
				results.childNodes[i].style.display = 'block';
			// autofill in the complete box w/the first match as long as the user hasn't entered in more data
			if( options.autoFill && ($input.val().toLowerCase() == q.toLowerCase()) ) autoFill(data[0][0]);
			showResults();
		} else {
			hideResultsNow();
		}
	};

	function parseData(data) {
		if (!data)
			return null;

		if (options.parseData)
			return options.parseData(data);

		var parsed = [];
		var rows = data.split(options.lineSeparator);
		for (var i=0; i < rows.length; i++) {
			var row = $.trim(rows[i]);
			if (row) {
				parsed[parsed.length] = row.split(options.cellSeparator);
			}
		}
		return parsed;
	};

	function dataToDom(data) {
		var ul = document.createElement("ul");
		var num = data.length;
		var overflow = 0;

		for (var i=0; i < num; i++) {
			var row = data[i];
			if (!row) continue;

			if ( (options.maxItemsToShow > 0) && (i == options.maxItemsToShow) )
				overflow = (num - i);
			if (options.rowToDom)
				var li = options.rowToDom(row);
			else {
				var li = document.createElement("li");
				li.id = row[2];
				if (options.formatItem) {
					$(li).append(options.formatItem(row, i, num));
					li.selectValue = row[0];
				} else {
					$(li).text(row[0]);
					if( row[1] && row[1].length > 0 ){
					  $(li).text(row[0]);
					  var comment = document.createElement('span');
					  $(comment).addClass('ac_comment').text(row[1]);
					  li.appendChild( comment );
//					  li.appendChild(+ "<span class='ac_comment'>("+row[1]+")</span>";
					}
					li.selectValue = row[0];
				}


				if( chosenIdx[li.id] ){
				  var input = $("<input type='checkbox' checked='true' />")[0];
				  $(li).addClass("selected");
				}else{
				  var input = $("<input type='checkbox' />")[0];
				}

				//var input = document.createElement('input');
				//input.type = "checkbox";
				//input.checked = true;

				$(input).bind('click',
					      function(e){
						e.stopPropagation();
						selectItem(this.parentNode);
					      });


				$(li).prepend($(input));
				var extra = null;
				if (row.length > 1) {
					extra = [];
					for (var j=1; j < row.length; j++) {
						extra[extra.length] = row[j];
					}
				}
				li.extra = extra;
			}
			if (overflow > 0)
				li.style.display = 'none';
			ul.appendChild(li);
			$(li).hover(
				function() { $("li", ul).removeClass("ac_over"); $(this).addClass("ac_over"); active = $("li", ul).indexOf($(this).get(0)); },
				function() { $(this).removeClass("ac_over"); }
			).click(function(e) { e.preventDefault(); e.stopPropagation(); selectItem(this); });
		}

		if (overflow > 0) {
			var ov = document.createElement('li');
			$(ov).html(overflow + ' more...');
			ul.appendChild(ov);
		}
		if( $input.val().length > 0 ){
		  var ov = document.createElement('li');
		  $(ov).addClass('results_tip hint');
		  if( num > 0 ){
		    $(ov).html(options.preFoundTip+translate('found_for', num, $input.val()));
		  }else{
		    $(ov).html(options.preFoundTip+options.preFoundTipEmpty+translate('found_for', 'no', $input.val()));
		  }
		  ul.appendChild(ov);
		}
		return ul;
	};

	function requestData(q) {
		if (!options.matchCase) q = q.toLowerCase();
		var data = options.cacheLength ? loadFromCache(q) : null;
		// recieve the cached data
		if (data && data.length > 0) {
			receiveData(q, data);
			options.onNewResult(data);
		// if an AJAX url has been supplied, try loading the data now
		} else if( (typeof options.url == "string") && (options.url.length > 0) ){
			$.get(makeUrl(q), function(data) {
				data = parseData(data);
				addToCache(q, data);
				receiveData(q, data);
				options.onNewResult(data);
			});
		// if there's been no data found, remove the loading class
		} else {
			$input.removeClass(options.loadingClass);
			if( q.length > 0 ){
			  if( options.onEmptyResult ){
			    options.onEmptyResult();
			  }
			  if( options.data.length > 0){
			    receiveData(q,[]);
			  }else{
			    hideResultsNow();
			  }
			}else{
			  options.onNewResult([]);
			}
		}
	};

	function makeUrl(q) {
		var url = options.url + "?query=" + encodeURI(q);
		for (var i in options.extraParams) {
			url += "&" + i + "=" + encodeURI(options.extraParams[i]);
		}
		return url;
	};

	function loadFromCache(q) {
		if (!q) {
			if (options.randomSelectionOnEmptyString) {
				return cache.data['RANDOM'];
			} else {
				return null;
			}
		}
		if (cache.data[q]) return cache.data[q];
		if (options.matchSubset == 1) {
			for (var i = q.length - 1; i >= options.minChars; i--) {
				var qs = q.substr(0, i);
				var c = cache.data[qs];
				if (c) {
				  var toRet = [];
				  qr = new RegExp(q , "i");
				  for( var j = 0; j < c.length; j++){
				    if( qr.test(c[j].join("")) ){
				      toRet[toRet.length] = c[j];
				    }
				  }
				  return toRet;
				}
			}
		}
		return null;
	};

    function notifyOfSelection( changes ){
	  if (options.onItemSelect) setTimeout(function() { options.onItemSelect(changes, me.getSelected().length); }, 1);
    };


	function matchSubset(s, sub) {
		if (s == null) return false;
		if (!options.matchCase) s = s.toLowerCase();
		var i = s.indexOf(sub);
		if (i == -1) return false;
		return i == 0 || options.matchContains;
	};

	this.flushCache = function() {
	  flushCache();
	};

	this.setExtraParams = function(p) {
	  options.extraParams = p;
	};

	this.showAll = function(){
	  showAll();
	};

	this.selectNone = function(){
	  chosenIdx = {};
	  showAll();
	  notifyOfSelection();
	};

	this.getSelected = function(){
	  selected = [];
	  for( var puid in chosenIdx ){
	    if( chosenIdx[puid] == true ){
	      selected.push( puid );
	    }
	  }
	  return selected;
	};

	this.addNewEntries = function( entries, autoselect ){
	  if( typeof( autoselect ) == 'undefined' ){ autoselect = true; }
	  addNewEntries( entries, autoselect );
	};

	this.selectAll = function(){
	  for( var i = 0; i < options.data.length; i++){
	    chosenIdx[ options.data[i][2] ] = true;
	  }
	  showAll();
	  notifyOfSelection();
	};

	this.entryCount = function(){
	  return options.data.length;
	};

	this.findValue = function(){
		var q = $input.val();

		if (!options.matchCase) q = q.toLowerCase();
		var data = options.cacheLength ? loadFromCache(q) : null;
		if (data) {
			findValueCallback(q, data);
		} else if( (typeof options.url == "string") && (options.url.length > 0) ){
			$.get(makeUrl(q), function(data) {
				data = parseData(data);
				addToCache(q, data);
				findValueCallback(q, data);
			});
		} else {
			// no matches
			findValueCallback(q, null);
		}
	};

	/** public access to clear results at will */
	this.hideResultsNow = hideResultsNow;

	function findValueCallback(q, data){
		if (data) $input.removeClass(options.loadingClass);

		var num = (data) ? data.length : 0;
		var li = null;

		for (var i=0; i < num; i++) {
			var row = data[i];

			if( row[0].toLowerCase() == q.toLowerCase() ){
				li = document.createElement("li");
				if (options.formatItem) {
					li.innerHTML = options.formatItem(row, i, num);
					li.selectValue = row[0];
				} else {
					li.innerHTML = row[0];
					li.selectValue = row[0];
				}
				var extra = null;
				if( row.length > 1 ){
					extra = [];
					for (var j=1; j < row.length; j++) {
						extra[extra.length] = row[j];
					}
				}
				li.extra = extra;
			}
		}

		if( options.onFindValue ) setTimeout(function() { options.onFindValue(li); }, 1);
	}

	/**
	 * Add the specified data to the cache division for the specified query. Returns rows that were actually added.
	 */
	function addToCache(q, data) {
	  if (!data || !q || !options.cacheLength) return [];
	  var toRet = [];
	  $('.ac_control').show();
	  if (!cache.length || cache.length > options.cacheLength) {
	    cache.length++;
	  } else if (!cache.data[q]) {
	    cache.length++;
	  }

	  if( cache.data[q] ){
	    for( var i = 0; i < data.length; i++ ){
	      //Don't allow dupes for now, take out of this is slow
	      var dupe = false;
	      for( var j = 0; j < cache.data[q].length; j++ ){
		if( cache.data[q][j][0] == data[i][0] && cache.data[q][j][1] == data[i][1]){
		  dupe = true;
		}
	      }
	      if( !dupe ){
		cache.data[q].push( data[i] );
		toRet.push( data[i] );
	      }
	    }
	  }else{
	    cache.data[q] = data;
	    toRet = data;
	  }
	  return toRet;
	};

	function findPos(obj) {
		var curleft = obj.offsetLeft || 0;
		var curtop = obj.offsetTop || 0;
		while ((obj = obj.offsetParent)) {
			curleft += obj.offsetLeft;
			curtop += obj.offsetTop;
		}
		return {x:curleft,y:curtop};
	};

	showAll();

};

jQuery.fn.autoselect = function(url, options, data) {
	// Make sure options exists
	options = options || {};
	// Set url as option
	options.url = url;
	// set some bulk local data
	options.data = ((typeof data == "object") && (data.constructor == Array)) ? data : null;

	// Set default values for required options
	options.resultsID = options.resultsID || "ac_results";
	options.inputClass = options.inputClass || "ac_input";
	options.resultsClass = options.resultsClass || "ac_results";
	options.lineSeparator = options.lineSeparator || "\n";
	options.cellSeparator = options.cellSeparator || "|";
	options.minChars = options.minChars || 1;
	options.delay = options.delay || 400;
	options.cacheMatchCallback = options.cacheMatchCallback || null;
	options.matchCase = options.matchCase || 0;
	options.matchSubset = options.matchSubset || 1;
	options.matchContains = options.matchContains || 0;
	options.cacheLength = options.cacheLength || 1;
	options.mustMatch = options.mustMatch || 0;
	options.extraParams = options.extraParams || {};
	options.loadingClass = options.loadingClass || "ac_loading";
	options.selectFirst = options.selectFirst || false;
	options.selectOnly = options.selectOnly || false;
	options.maxItemsToShow = options.maxItemsToShow || -1;
	options.autoFill = options.autoFill || false;
	options.width = parseInt(options.width, 10) || 0;
	options.clearOnSelect = options.clearOnSelect || false;
	options.focusClear = options.focusClear || 0;
	options.preFoundTip = options.preFoundTip || "";
	options.preFoundTipEmpty = options.preFoundTipEmpty || "";
	options.onChange = options.onChange || function(){};
	options.onEmptyResult = options.onEmptyResult || function(){};
	options.onHideResultsNow = options.onHideResultsNow || null;
	options.onNewResult = options.onNewResult || function(data){};
	options.onNewEntry = options.onNewEntry || function(newEntry, callback){callback([newEntry,'','']);};
	this.each(function() {
		var input = this;
		new jQuery.autoselect(input, options);
	});

	// Don't break the chain
	return this;
}

jQuery.fn.autoselectArray = function(data, options) {
	return this.autoselect(null, options, data);
}

jQuery.fn.indexOf = function(e){
	for( var i=0; i<this.length; i++ ){
		if( this[i] == e ) return i;
	}
	return -1;
};