/*
--------------------------------------------------------
suggest.js - Input Suggest
入力補完ライブラリ

- onozaty (http://www.enjoyxstudy.com)

Released under the Creative Commons License(Attribution 2.1 Japan):
クリエイティブ・コモンズの帰属 2.1 Japanライセンスの下でライセンスされています。
 http://creativecommons.org/licenses/by/2.1/jp/

depends on prototype.js(http://prototype.conio.net/)
本ライブラリの使用にあたっては、prototype.jsが必要です。

For details, see the web site:
使用方法については、下記を参照してください。
 http://www.enjoyxstudy.com/javascript/suggest

--------------------------------------------------------
ver 0.1 2006/01/15
  ・公開
ver 0.2 2006/02/05
  ・機能改善
ver 1.0 2006/02/18
  ・オプションの見直し
ver 1.1 2006/03/02
  ・タグ補完(複数キーワード)機能を追加
--------------------------------------------------------
*/

if (!IncSearch) {
  var IncSearch = {};
}

/*-- IncSearch.Suggest --------------------------------*/
IncSearch.Suggest = Class.create();
IncSearch.Suggest.prototype = {
  initialize: function(input, suggestArea, candidateList) {
    this.input = $(input);
    this.suggestArea = $(suggestArea);
    this.candidateList = candidateList;

    this.suggestList = null;
    this.suggestIndexList = null;
    this.activePosition = null;
    this.timer = null;

    this.inputValueBackup = null;
    this.oldText = this.getInputText();

    if (arguments[3]) this.setOptions(arguments[3]);

    // reg event
    Event.observe(this.input, 'focus', this.checkLoop.bindAsEventListener(this), false);
    Event.observe(this.input, 'blur', this.blur.bindAsEventListener(this), false);

    if (window.opera) {
      Event._observeAndCache(this.input, 'keypress', this.keyevent.bindAsEventListener(this), false);
    } else {
      Event.observe(this.input, 'keypress', this.keyevent.bindAsEventListener(this), false);
    }

    // init
    this.clearSuggestArea();
  },

  // options
  interval: 500,
  dispMax: 20,
  listTagName: 'div',
  prefix: false,
  ignoreCase: true,
  highlight: false,

  setOptions: function(options) {
    if (options.interval != undefined)
      this.interval = options.interval;

    if (options.dispMax != undefined)
      this.dispMax = options.dispMax;

    if (options.listTagName != undefined)
      this.listTagName = options.listTagName;

    if (options.prefix != undefined)
      this.prefix = options.prefix;

    if (options.ignoreCase != undefined)
      this.ignoreCase = options.ignoreCase;

    if (options.highlight != undefined)
      this.highlight = options.highlight;
  },

  activeDisplay: function(elm) {
    elm.className = 'select';
  },

  unactiveDisplay: function(elm) {
    elm.className = '';
  },

  moverDisplay: function(elm) {
    elm.className = 'over';
  },

  isMatch: function(value, pattern) {

    var matchPos;

    if (this.ignoreCase) {
      pos = value.toLowerCase().indexOf(pattern.toLowerCase());
    } else {
      pos = value.indexOf(pattern);
    }

    if ((this.prefix && (pos != 0)) ||
        (!this.prefix && (pos == -1))) return null;

    if (this.highlight) {
      return (value.substr(0, pos) + '<strong>' 
             + value.substr(pos, pattern.length) 
               + '</strong>' + value.substr(pos + pattern.length));
    } else {
      return value;
    }
  },

  checkLoop: function() {
    var text = this.getInputText();
    if (text != this.oldText) {
      this.oldText = text;
      this.search();
    }
    if (this.timer) clearTimeout(this.timer);
    this.timer = setTimeout(this.checkLoop.bind(this), this.interval);
  },

  // key event
  keyevent: function(event) {
    if (event.keyCode == Event.KEY_UP ||
        event.keyCode == Event.KEY_DOWN) {
      // key move
      this.moveActiveList(event.keyCode);
    } else if (event.keyCode == Event.KEY_RETURN) {
      // fix
      if (this.suggestList) {
        Event.stop(event);
        this.clearSuggestArea();
      }
    } else if (event.keyCode == Event.KEY_ESC) {
      // cancel
      if (this.suggestList) {
        Event.stop(event);
        this.clearSuggestArea();
        this.input.value = this.inputValueBackup;
        this.oldText = this.getInputText();
      }
    }
  },

  search: function() {

    // init
    this.clearSuggestArea();

    var text = this.getInputText();
    if (text == '') return;

    var resultList = new Array();
    var temp = null; 

    this.suggestIndexList = new Array();

    for (var i = 0; i < this.candidateList.length; i++) {

      if ((temp = this.isMatch(this.candidateList[i], text)) != null) {
        resultList.push(temp);
        this.suggestIndexList.push(i);

        if (this.dispMax != 0 && resultList.length >= this.dispMax) break;
      }
    }

    if (resultList != 0){
      this.createSuggestArea(resultList);
    }
  },

  clearSuggestArea: function() {
    this.suggestArea.innerHTML = '';
    this.suggestArea.style.display = 'none';
    this.suggestList = null;
    this.suggestIndexList = null;
    this.activePosition = null;
  },

  createSuggestArea: function(resultList) {

    this.suggestList = new Array();
    this.inputValueBackup = this.input.value;

    for (var i = 0; i < resultList.length; i++) {
      var elm = document.createElement(this.listTagName);
      elm.innerHTML = resultList[i];
      this.suggestArea.appendChild(elm);

      Event.observe(elm, 'click',
        new Function('event', 'this.listClick(event, ' + i + ');').bindAsEventListener(this), false);
      Event.observe(elm, 'mouseover',
        new Function('event', 'this.listOver(event, ' + i + ');').bindAsEventListener(this), false);
      Event.observe(elm, 'mouseout',
        new Function('event', 'this.listOut(event, ' + i + ');').bindAsEventListener(this), false);

      this.suggestList.push(elm);
    }

    this.suggestArea.style.display = 'block';
  },

  moveActiveList: function(keyCode) {

    if (!this.suggestList ||
        this.suggestList.length == 0){
      return;
    }

    this.unactive();

    if (keyCode == Event.KEY_UP) {
      // up
      if (this.activePosition == null) {
        this.activePosition = this.suggestList.length -1;
      }else{
        this.activePosition--;
        if (this.activePosition < 0) {
          this.activePosition = null;
          this.input.value = this.inputValueBackup;
          return;
        }
      }
    }else{
      // down
      if (this.activePosition == null) {
        this.activePosition = 0;
      }else{
        this.activePosition++;
      }

      if (this.activePosition >= this.suggestList.length) {
        this.activePosition = null;
        this.input.value = this.inputValueBackup;
        return;
      }
    }

    this.active(this.activePosition);
  },

  active: function(index) {

    this.activeDisplay(this.suggestList[index]);

    this.setInputText(this.candidateList[this.suggestIndexList[index]]);

    this.oldText = this.getInputText();
    this.input.focus();
  },

  unactive: function() {

    if (this.suggestList != null 
        && this.suggestList.length > 0
        && this.activePosition != null) {
      this.unactiveDisplay(this.suggestList[this.activePosition]);
    }
  },

  blur: function(event) {

    this.unactive();
    this.oldText = this.getInputText();

    if (this.timer) clearTimeout(this.timer);
    this.timer = null;

    setTimeout((function(){ this.clearSuggestArea(); }).bind(this), 500);
  },

  listClick: function(event, index) {

    this.unactive();
    this.activePosition = index;
    this.active(index);
  },

  listOver: function(event, index) {
    var elm = Event.element(event);
    this.moverDisplay(elm);
  },

  listOut: function(event, index) {

    var elm = Event.element(event);

    if (!this.suggestList) return;

    if (index == this.activePosition) {
      this.activeDisplay(elm);
    }else{
      this.unactiveDisplay(elm);
    }
  },

  getInputText: function() {
    return this.input.value;
  },

  setInputText: function(text) {
    this.input.value = text;
  }
};

/*-- IncSearch.SuggestTag --------------------------------*/
IncSearch.SuggestTag = Class.create();
Object.extend(Object.extend(IncSearch.SuggestTag.prototype, IncSearch.Suggest.prototype), {

  // delimiter
  delim: ' ',

  // key event
  keyevent: function(event) {
    if (event.keyCode == Event.KEY_UP ||
        event.keyCode == Event.KEY_DOWN) {
      // key move
      this.moveActiveList(event.keyCode);
    } else if (event.keyCode == Event.KEY_RETURN) {
      // fix
      if (this.suggestList) {
        Event.stop(event);
        this.clearSuggestArea();

        this.input.value += this.delim;
        this.moveEnd();
      }
    } else if (event.keyCode == Event.KEY_TAB) {
      // fix
      if (this.suggestList) {
        if (!this.activePosition) {
          this.activePosition = 0;
          this.active(this.activePosition);
        }

        this.clearSuggestArea();
        this.input.value += this.delim;
        setTimeout(this.moveEnd.bind(this),5); // Opera

        Event.stop(event);
      }
    } else if (event.keyCode == Event.KEY_ESC) {
      // cancel
      if (this.suggestList) {
        Event.stop(event);
        this.clearSuggestArea();
        this.input.value = this.inputValueBackup;
        this.oldText = this.getInputText();
      }
    }
  },

  listClick: function(event, index) {

    this.unactive();
    this.activePosition = index;
    this.active(index);

    this.input.value += this.delim;
    this.moveEnd();
  },

  getInputText: function() {

    var pos = this.getLastTokenPos();

    if (pos == -1) {
      return this.input.value;
    } else {
      return this.input.value.substr(pos + 1);
    }
  },

  setInputText: function(text) {

    var pos = this.getLastTokenPos();

    if (pos == -1) {
      this.input.value = text;
    } else {
      this.input.value = this.input.value.substr(0 , pos + 1) + text;
    }
  },

  getLastTokenPos: function() {
    return this.input.value.lastIndexOf(this.delim);
  },

  moveEnd: function() {

    if (this.input.createTextRange) {
      this.input.focus(); // Opera
      var range = this.input.createTextRange();
      range.move('character', this.input.value.length);
      range.select();
    } else if (this.input.setSelectionRange) {
      this.input.setSelectionRange(this.input.value.length, this.input.value.length);
    }
  }
});