/*
* @Copyright (c) 2011 Aurélio Saraiva, Diego Plentz
* @Page http://github.com/plentz/jquery-maskmoney
* try at http://plentz.org/maskmoney

* Permission is hereby granted, free of charge, to any person
* obtaining a copy of this software and associated documentation
* files (the "Software"), to deal in the Software without
* restriction, including without limitation the rights to use,
* copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following
* conditions:
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
* OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
* HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
* WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
* OTHER DEALINGS IN THE SOFTWARE.
*/

/*
* @Version: 1.3
* @Release: 2011-04-20
*/
(function($) {
  $.fn.maskMoney = function(settings) {
    settings = $.extend({
      symbol: 'US$',
      showSymbol: false,
      symbolStay: false,
      thousands: ',',
      decimal: '.',
      precision: 2,
      defaultZero: true,
      allowZero: false,
      allowNegative: false
    }, settings);

    return this.each(function() {
      var input = $(this);

      function keypressEvent(e) {
        e = e||window.event;
        var k = e.charCode||e.keyCode||e.which;
        if (k == undefined) return false; //needed to handle an IE "special" event
        if (input.attr('readonly') && (k!=13&&k!=9)) return false; // don't allow editing of readonly fields but allow tab/enter

        if (k<48||k>57) { // any key except the numbers 0-9
          if (k==45) { // -(minus) key
            input.val(changeSign(input));
            return false;
          }
          if (k==43) { // +(plus) key
            input.val(input.val().replace('-',''));
            return false;
          } else if (k==13||k==9) { // enter key or tab key
            return true;
          } else if (k==37||k==39) { // left arrow key or right arrow key
            return true;
          } else { // any other key with keycode less than 48 and greater than 57
            preventDefault(e);
            return true;
          }
        } else if (input.val().length==input.attr('maxlength')) {
          return false;
        } else {
          preventDefault(e);

          var key = String.fromCharCode(k);
          var x = input.get(0);
          var selection = input.getInputSelection(x);
          var startPos = selection.start;
          var endPos = selection.end;
          x.value = x.value.substring(0, startPos) + key + x.value.substring(endPos, x.value.length);
          maskAndPosition(x, startPos + 1);
          return false;
        }
      }

      function keydownEvent(e) {
        e = e||window.event;
        var k = e.charCode||e.keyCode||e.which;
        if (k == undefined) return false; //needed to handle an IE "special" event
        if (input.attr('readonly') && (k!=13&&k!=9)) return false; // don't allow editing of readonly fields but allow tab/enter

        var x = input.get(0);
        var selection = input.getInputSelection(x);
        var startPos = selection.start;
        var endPos = selection.end;

        if (k==8) { // backspace key
          preventDefault(e);

          if(startPos == endPos){
            // Remove single character
            x.value = x.value.substring(0, startPos - 1) + x.value.substring(endPos, x.value.length);
            startPos = startPos - 1;
          } else {
            // Remove multiple characters
            x.value = x.value.substring(0, startPos) + x.value.substring(endPos, x.value.length);
          }
          maskAndPosition(x, startPos);
          return false;
        } else if (k==9) { // tab key
          return true;
        } else if (k==46||k==63272) { // delete key (with special case for safari)
          preventDefault(e);
          if(x.selectionStart == x.selectionEnd){
            // Remove single character
            x.value = x.value.substring(0, startPos) + x.value.substring(endPos + 1, x.value.length);
          } else {
            //Remove multiple characters
            x.value = x.value.substring(0, startPos) + x.value.substring(endPos, x.value.length);
          }
          maskAndPosition(x, startPos);
          return false;
        } else { // any other key
          return true;
        }
      }

      function focusEvent(e) {
        var mask = getDefaultMask();
        if (input.val()==mask) {
          input.val('');
        } else if (input.val()==''&&settings.defaultZero) {
          input.val(setSymbol(mask));
        } else {
          input.val(setSymbol(input.val()));
        }
        if (this.createTextRange) {
          var textRange = this.createTextRange();
          textRange.collapse(false); // set the cursor at the end of the input
          textRange.select();
        }
      }

      function blurEvent(e) {
        if ($.browser.msie) {
          keypressEvent(e);
        }

        if (input.val()==''||input.val()==setSymbol(getDefaultMask())||input.val()==settings.symbol) {
          if(!settings.allowZero) input.val('');
          else if (!settings.symbolStay) input.val(getDefaultMask());
          else input.val(setSymbol(getDefaultMask()));
        } else {
          if (!settings.symbolStay) input.val(input.val().replace(settings.symbol,''));
          else if (settings.symbolStay&&input.val()==settings.symbol) input.val(setSymbol(getDefaultMask()));
        }
      }

      function preventDefault(e) {
        if (e.preventDefault) { //standard browsers
          e.preventDefault();
        } else { // internet explorer
          e.returnValue = false
        }
      }

      function maskAndPosition(x, startPos) {
        var originalLen = input.val().length;
        input.val(maskValue(x.value));
        var newLen = input.val().length;
        startPos = startPos - (originalLen - newLen);
        input.setCursorPosition(startPos);
      }

      function maskValue(v) {
        v = v.replace(settings.symbol,'');

        var strCheck = '0123456789';
        var len = v.length;
        var a = '', t = '', neg='';

        if(len!=0 && v.charAt(0)=='-'){
          v = v.replace('-','');
          if(settings.allowNegative){
            neg = '-';
          }
        }

        if (len==0) {
          if (!settings.defaultZero) return t;
          t = '0.00';
        }

        for (var i = 0; i<len; i++) {
          if ((v.charAt(i)!='0') && (v.charAt(i)!=settings.decimal)) break;
        }

        for (; i<len; i++) {
          if (strCheck.indexOf(v.charAt(i))!=-1) a+= v.charAt(i);
        }

        var n = parseFloat(a);
        n = isNaN(n) ? 0 : n/Math.pow(10,settings.precision);
        t = n.toFixed(settings.precision);

        i = settings.precision == 0 ? 0 : 1;
        var p, d = (t=t.split('.'))[i].substr(0,settings.precision);
        for (p = (t=t[0]).length; (p-=3)>=1;) {
          t = t.substr(0,p)+settings.thousands+t.substr(p);
        }

        return (settings.precision>0)
          ? setSymbol(neg+t+settings.decimal+d+Array((settings.precision+1)-d.length).join(0))
          : setSymbol(neg+t);
      }

      function mask() {
        var value = input.val();
        input.val(maskValue(value));
      }

      function getDefaultMask() {
        var n = parseFloat('0')/Math.pow(10,settings.precision);
        return (n.toFixed(settings.precision)).replace(new RegExp('\\.','g'),settings.decimal);
      }

      function setSymbol(v) {
        if (settings.showSymbol) {
          if (v.substr(0, settings.symbol.length) != settings.symbol) return settings.symbol+v;
        }
        return v;
      }

      function changeSign(i){
        if (settings.allowNegative) {
          var vic = i.val();
          if (i.val()!='' && i.val().charAt(0)=='-'){
            return i.val().replace('-','');
          } else{
            return '-'+i.val();
          }
        } else {
          return i.val();
        }
      }

      input.bind('keypress.maskMoney',keypressEvent);
      input.bind('keydown.maskMoney',keydownEvent);
      input.bind('blur.maskMoney',blurEvent);
      input.bind('focus.maskMoney',focusEvent);
      input.bind('mask', mask);

      input.one('unmaskMoney',function() {
        input.unbind('.maskMoney');

        if ($.browser.msie) {
          this.onpaste= null;
        } else if ($.browser.mozilla) {
          this.removeEventListener('input',blurEvent,false);
        }
      });
    });
  }

  $.fn.unmaskMoney=function() {
    return this.trigger('unmaskMoney');
  };

  $.fn.mask=function() {
    return this.trigger('mask');
  };

  $.fn.setCursorPosition = function(pos) {
    this.each(function(index, elem) {
      if (elem.setSelectionRange) {
        elem.focus();
        elem.setSelectionRange(pos, pos);
      } else if (elem.createTextRange) {
        var range = elem.createTextRange();
        range.collapse(true);
        range.moveEnd('character', pos);
        range.moveStart('character', pos);
        range.select();
      }
    });
    return this;
  };

  $.fn.getInputSelection = function(el) {
    var start = 0, end = 0, normalizedValue, range, textInputRange, len, endRange;

    if (typeof el.selectionStart == "number" && typeof el.selectionEnd == "number") {
      start = el.selectionStart;
      end = el.selectionEnd;
    } else {
      range = document.selection.createRange();

      if (range && range.parentElement() == el) {
        len = el.value.length;
        normalizedValue = el.value.replace(/\r\n/g, "\n");

        // Create a working TextRange that lives only in the input
        textInputRange = el.createTextRange();
        textInputRange.moveToBookmark(range.getBookmark());

        // Check if the start and end of the selection are at the very end
        // of the input, since moveStart/moveEnd doesn't return what we want
        // in those cases
        endRange = el.createTextRange();
        endRange.collapse(false);

        if (textInputRange.compareEndPoints("StartToEnd", endRange) > -1) {
          start = end = len;
        } else {
          start = -textInputRange.moveStart("character", -len);
          start += normalizedValue.slice(0, start).split("\n").length - 1;

          if (textInputRange.compareEndPoints("EndToEnd", endRange) > -1) {
            end = len;
          } else {
            end = -textInputRange.moveEnd("character", -len);
            end += normalizedValue.slice(0, end).split("\n").length - 1;
          }
        }
      }
    }

    return {
      start: start,
      end: end
    };
  }
})(jQuery);