/**
 * Calendar Eightysix - MooTools datepicker and calendar class
 * @version 1.0.1
 *
 * by dev.base86.com
 *
 * Source and documentation available at:
 * http://dev.base86.com/scripts/datepicker_calendar_eightysix.html
 *
 * Calendar Eightysix is an unobtrusive developer friendly javascript calendar and datepicker 
 * offering a better user experience for date related functionalities.
 *
 * --
 *
 * This Calendar Eightysix script is licensed under the Creative Commons Attribution-NonCommercial 3.0 License:
 * http://creativecommons.org/licenses/by-nc/3.0/
 * 
 * Calendar Eightysix requires a purchased commercial license when used commercially:
 * http://dev.base86.com/scripts/datepicker_calendar_eightysix.html#license
 */

var CalendarEightysix = new Class({
   Implements: Options,

   options: {
      'slideDuration': 500,
      'fadeDuration': 200,
      'toggleDuration': 200,
      'fadeTransition': Fx.Transitions.linear,
      'slideTransition': Fx.Transitions.Quart.easeOut,

      'prefill': false,
      'defaultDate': null,
      'linkWithInput': false,

      'theme': 'default',
      'defaultView': 'month',
      'startMonday': false,
      'alwaysShow': false,
      'injectInsideTarget': false,
      'format': '%n/%d/%Y',
      'alignX': 'right',
      'alignY': 'ceiling',
      'offsetX': 0,
      'offsetY': 0,

      'draggable': false,
      'pickable': true,
      'toggler': null,
      'pickFunction': $empty,
      'disallowUserInput': false,

      'minDate': null,
      'maxDate': null,
      'excludedWeekdays': null,
      'excludedDates': null,

      'createHiddenInput': false,
      'hiddenInputName': 'date',
      'hiddenInputFormat': '%t'
   },

   initialize: function(target, options) {
      this.setOptions(options);

      this.target = $(target);
      this.transitioning = false;

      //Extend Date with unix timestamp parser
      Date.defineParser({
         re: /^[0-9]{10}$/,
         handler: function(bits) { return new Date.parse('Jan 01 1970').set('seconds', bits[0]); }
      });

      //Selected date
      if ($defined(this.options.defaultDate)) this.selectedDate = new Date().parse(this.options.defaultDate).clearTime();
      else if (this.options.linkWithInput && $chk(this.target.get('value'))) this.selectedDate = new Date().parse(this.target.get('value')).clearTime();
      if (!$defined(this.selectedDate) || !this.selectedDate.isValid()) this.selectedDate = new Date();
      this.viewDate = this.selectedDate.clone().set('date', 1).clearTime();

      //Base
      var innerHtmlStr = '<div class="wrapper"><div class="header"><div class="arrow-left"></div><div class="arrow-right"></div><div class="label clickable"></div></div>' +
							'<div class="body"><div class="inner"><div class="container a"></div><div class="container b"></div></div></div><div class="footer"></div></div>';
      this.element = new Element('div', { 'class': 'calendar-eightysix', 'html': innerHtmlStr, 'style': 'display: ' + (this.options.alwaysShow ? 'block' : 'none') }).addClass(this.options.theme);

      if (this.options.injectInsideTarget) this.element.injectBottom(this.target);
      else {
         this.element.injectBottom($(document.body));
         this.position();
         window.addEvent('resize', this.position.bind(this));
      }

      this.currentContainer = this.element.getElement('.container.a').setStyle('z-index', 999);
      this.tempContainer = this.element.getElement('.container.b').setStyle('z-index', 998);

      //Header
      this.header = this.element.getElement('.header');
      this.label = this.header.getElement('.label');
      this.arrowLeft = this.header.getElement('.arrow-left');
      this.arrowRight = this.header.getElement('.arrow-right');

      this.label.addEvent('click', this.levelUp.bind(this));
      this.arrowLeft.addEvent('click', this.slideLeft.bind(this));
      this.arrowRight.addEvent('click', this.slideRight.bind(this));

      //Date range
      if ($defined(this.options.minDate)) {
         this.options.minDate = Date.parse(this.options.minDate).clearTime();
         if (!this.options.minDate.isValid()) this.options.minDate = null;
      }
      if ($defined(this.options.maxDate)) {
         this.options.maxDate = Date.parse(this.options.maxDate).clearTime();
         if (!this.options.maxDate.isValid()) this.options.maxDate = null;
      }

      //Excluded dates
      if ($defined(this.options.excludedDates)) {
         var excludedDates = [];
         this.options.excludedDates.each(function(date) {
            excludedDates.include(this.format(new Date().parse(date).clearTime(), '%t'));
         } .bind(this));
         this.options.excludedDates = excludedDates;
      }

      //Dragger
      if (this.options.draggable && !this.options.injectInsideTarget) {
         this.header.addClass('dragger');
         new Drag(this.element, { 'handle': this.header });
      }
      //Hidden input
      if (this.options.createHiddenInput) {
         this.hiddenInput = new Element('input', { 'type': 'hidden', 'name': this.options.hiddenInputName }).injectAfter(this.target);
      }

      //Prefill date
      if (this.options.prefill) this.pick();

      //Link with input
      if (!this.options.disallowUserInput && this.options.linkWithInput && this.target.get('tag') == 'input') {
         this.target.addEvent('keyup', function() {
            this.setDate(this.target.get('value'), false);
         } .bind(this));
      }

      //Disallow input
      if (this.options.disallowUserInput && this.target.get('tag') == 'input')
         this.target.addEvents({ 'keydown': ($lambda(false)), 'contextmenu': ($lambda(false)) });

      //Toggler
      if ($defined(this.options.toggler)) this.options.toggler = $(this.options.toggler);

      //Show / hide events
      ($defined(this.options.toggler) ? this.options.toggler : this.target).addEvents({
         'focus': this.show.bind(this), 'click': this.show.bind(this)
      });

      if (!this.options.alwaysShow) document.addEvent('mousedown', this.outsideClick.bind(this));
      MooTools.lang.addEvent('langChange', function() { this.render(); this.pick(); } .bind(this));

      //View
      this.view = this.options.defaultView;
      this.render();
   },

   render: function() {
      this.currentContainer.empty();

      switch (this.view) {
         case 'decade': this.renderDecade(); break;
         case 'year': this.renderYear(); break;
         default: this.renderMonth();
      }
   },

   renderMonth: function() {
      this.view = 'month';
      this.currentContainer.empty().addClass('month');
      if (this.options.pickable) this.currentContainer.addClass('pickable');

      var lang = MooTools.lang.get('Date'), weekdaysCount = this.viewDate.format('%w') - (this.options.startMonday ? 1 : 0);
      if (weekdaysCount == -1) weekdaysCount = 6;
      var today = new Date();

      //Label
      this.label.set('html', lang.months[this.viewDate.get('month')] + ' ' + this.viewDate.format('%Y'));

      //Day label row
      var row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      for (var i = (this.options.startMonday ? 1 : 0); i < (this.options.startMonday ? 8 : 7); i++) {
         var day = new Element('div', { 'html': lang.days[this.options.startMonday && i == 7 ? 0 : i] }).injectBottom(row);
         day.set('html', day.get('html').substr(0, 2));
      }

      //Add days for the beginning non-month days
      row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      y = this.viewDate.clone().decrement('month').getLastDayOfMonth();
      for (var i = 0; i < weekdaysCount; i++) {
         this.injectDay(row, this.viewDate.clone().decrement('month').set('date', y - (weekdaysCount - i) + 1), true);
      }

      //Add month days
      for (var i = 1; i <= this.viewDate.getLastDayOfMonth(); i++) {
         this.injectDay(row, this.viewDate.clone().set('date', i));
         if (row.getChildren().length == 7) {
            row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
         }
      }

      //Add outside days
      var y = 8 - row.getChildren().length, startDate = this.viewDate.clone().increment('month').set('date', 1);
      for (var i = 1; i < y; i++) {
         this.injectDay(row, startDate.clone().set('date', i), true);
      }

      //Always have six rows
      for (var y = this.currentContainer.getElements('.row').length; y < 7; y++) {
         row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
         for (var z = 0; z < 7; z++) {
            this.injectDay(row, startDate.clone().set('date', i), true);
            i++;
         }
      }

      this.renderAfter();
   },

   //Used by renderMonth
   injectDay: function(row, date, outside) {
      today = new Date();

      var day = new Element('div', { 'html': date.get('date') }).injectBottom(row);
      day.date = date;
      if (outside) day.addClass('outside');

      if (($defined(this.options.minDate) && this.format(this.options.minDate, '%t') > this.format(date, '%t')) ||
		   ($defined(this.options.maxDate) && this.format(this.options.maxDate, '%t') < this.format(date, '%t')) ||
		   ($defined(this.options.excludedWeekdays) && this.options.excludedWeekdays.contains(date.format('%w').toInt())) ||
		   ($defined(this.options.excludedDates) && this.options.excludedDates.contains(this.format(date, '%t'))))
         day.addClass('non-selectable');
      else if (this.options.pickable) day.addEvent('click', this.pick.bind(this));

      if (date.format('%x') == today.format('%x')) day.addClass('today');
      if (date.format('%x') == this.selectedDate.format('%x')) day.addClass('selected');
   },

   renderYear: function() {
      this.view = 'year';
      this.currentContainer.addClass('year-decade');
      var today = new Date(), lang = MooTools.lang.get('Date').months;

      //Label
      this.label.set('html', this.viewDate.format('%Y'));

      var row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      for (var i = 1; i < 13; i++) {
         var month = new Element('div', { 'html': lang[i - 1] }).injectBottom(row);
         month.set('html', month.get('html').substr(0, 3));  //Setting and getting the innerHTML takes care of html entity problems (e.g. [M&a]uml;r => [Mär]z)
         var iMonth = this.viewDate.clone().set('month', i - 1);
         month.date = iMonth;

         if (($defined(this.options.minDate) && this.format(this.options.minDate.clone().set('date', 1), '%t') > this.format(iMonth, '%t')) ||
			   ($defined(this.options.maxDate) && this.format(this.options.maxDate.clone().set('date', 1), '%t') < this.format(iMonth, '%t')))
            month.addClass('non-selectable');
         else month.addEvent('click', this.levelDown.bind(this));

         if (i - 1 == today.get('month') && this.viewDate.get('year') == today.get('year')) month.addClass('today');
         if (i - 1 == this.selectedDate.get('month') && this.viewDate.get('year') == this.selectedDate.get('year')) month.addClass('selected');
         if (!(i % 4) && i != 12) row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      }

      this.renderAfter();
   },

   renderDecade: function() {
      this.label.removeClass('clickable');
      this.view = 'decade';
      this.currentContainer.addClass('year-decade');
      var today = new Date();

      var viewYear, startYear;
      viewYear = startYear = this.viewDate.format('%Y').toInt();
      while (startYear % 12) startYear--;

      //Label
      this.label.set('html', startYear + ' &#150; ' + (startYear + 11));

      var row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      for (var i = startYear; i < startYear + 12; i++) {
         var year = new Element('div', { 'html': i }).injectBottom(row);
         var iYear = this.viewDate.clone().set('year', i);
         year.date = iYear;

         if (($defined(this.options.minDate) && this.options.minDate.get('year') > i) ||
			   ($defined(this.options.maxDate) && this.options.maxDate.get('year') < i)) year.addClass('non-selectable');
         else year.addEvent('click', this.levelDown.bind(this));

         if (i == today.get('year')) year.addClass('today');
         if (i == this.selectedDate.get('year')) year.addClass('selected');
         if (!((i + 1) % 4) && i != startYear + 11) row = new Element('div', { 'class': 'row' }).injectBottom(this.currentContainer);
      }

      this.renderAfter();
   },

   renderAfter: function() {
      //Iterate rows and add classes and remove navigation if nessesary
      var rows = this.currentContainer.getElements('.row');
      for (var i = 0; i < rows.length; i++) {
         rows[i].set('class', 'row ' + ['a', 'b', 'c', 'd', 'e', 'f', 'g'][i] + ' ' + (i % 2 ? 'even' : 'odd')).getFirst().addClass('first');
         rows[i].getLast().addClass('last');

         if (i == (this.view == 'month' ? 1 : 0) && $defined(this.options.minDate) && this.format(this.options.minDate, '%t') >= this.format(rows[i].getFirst().date, '%t'))
            this.arrowLeft.setStyle('visibility', 'hidden');
         if (i == rows.length - 1 && $defined(this.options.maxDate)) {
            if ((this.view == 'month' && this.format(this.options.maxDate, '%t') <= this.format(rows[i].getLast().date, '%t')) ||
				   (this.view == 'year' && this.format(this.options.maxDate, '%t') <= this.format(rows[i].getLast().date.clone().increment('month'), '%t')) ||
				   (this.view == 'decade' && this.format(this.options.maxDate, '%t') <= this.format(rows[i].getLast().date.clone().increment('year'), '%t')))
               this.arrowRight.setStyle('visibility', 'hidden');
         }
      };
   },

   slideLeft: function() {
      this.switchContainers();

      //Render new view
      switch (this.view) {
         case 'month': this.viewDate.decrement('month'); break;
         case 'year': this.viewDate.decrement('year'); break;
         case 'decade': this.viewDate.set('year', this.viewDate.get('year') - 12); break;
      }
      this.render();

      //Tween the new view in and old view out
      this.currentContainer.set('tween', { 'duration': this.options.slideDuration, 'transition': this.options.slideTransition }).tween('left', [-this.currentContainer.getWidth(), 0]);
      this.tempContainer.set('tween', { 'duration': this.options.slideDuration, 'transition': this.options.slideTransition }).tween('left', [0, this.tempContainer.getWidth()]);
   },

   slideRight: function() {
      this.switchContainers();

      //Render new view
      switch (this.view) {
         case 'month': this.viewDate.increment('month'); break;
         case 'year': this.viewDate.increment('year'); break;
         case 'decade': this.viewDate.set('year', this.viewDate.get('year') + 12); break;
      }
      this.render();

      //Tween the new view in and old view out
      this.currentContainer.set('tween', { 'duration': this.options.slideDuration, 'transition': this.options.slideTransition }).tween('left', [this.currentContainer.getWidth(), 0]);
      this.tempContainer.set('tween', { 'duration': this.options.slideDuration, 'transition': this.options.slideTransition }).tween('left', [0, -this.currentContainer.getWidth()]);
   },

   levelDown: function(e) {
      if (this.transitioning) return;
      this.switchContainers();
      this.viewDate = e.target.date;

      //Render new view
      switch (this.view) {
         case 'year': this.renderMonth(); break;
         case 'decade': this.renderYear(); break;
      }

      //Tween the new view in and old view out
      this.transitioning = true;
      this.currentContainer.set('tween', { 'duration': this.options.fadeDuration, 'transition': this.options.fadeTransition,
         'onComplete': function() { this.transitioning = false } .bind(this)
      }).setStyles({ 'opacity': 0, 'left': 0 }).fade('in');
      this.tempContainer.set('tween', { 'duration': this.options.fadeDuration, 'transition': this.options.fadeTransition }).fade('out');
   },

   levelUp: function() {
      if (this.view == 'decade' || this.transitioning) return;
      this.switchContainers();

      //Set viewdates and render
      switch (this.view) {
         case 'month': this.renderYear(); break;
         case 'year': this.renderDecade(); break;
      }

      //Tween the new view in and old view out
      this.transitioning = true;
      this.currentContainer.set('tween', { 'duration': this.options.fadeDuration, 'transition': this.options.fadeTransition,
         'onComplete': function() { this.transitioning = false } .bind(this)
      }).setStyles({ 'opacity': 0, 'left': 0 }).fade('in');
      this.tempContainer.set('tween', { 'duration': this.options.fadeDuration, 'transition': this.options.fadeTransition }).fade('out');
   },

   switchContainers: function() {
      this.currentContainer = this.currentContainer.hasClass('a') ? this.element.getElement('.container.b') : this.element.getElement('.container.a');
      this.tempContainer = this.tempContainer.hasClass('a') ? this.element.getElement('.container.b') : this.element.getElement('.container.a');
      this.currentContainer.empty().removeClass('month').removeClass('year-decade').setStyles({ 'opacity': 1, 'display': 'block', 'z-index': 999 });
      this.tempContainer.setStyle('z-index', 998);

      this.label.addClass('clickable');
      this.arrowLeft.setStyle('visibility', 'visible');
      this.arrowRight.setStyle('visibility', 'visible');
   },

   pick: function(e) {
      if ($defined(e)) {
         this.selectedDate = e.target.date;
         this.element.getElements('.selected').removeClass('selected');
         e.target.addClass('selected');
      }

      var value = this.format(this.selectedDate);

      if (this.options.injectInsideTarget) {
         switch (this.target.get('tag')) {
            case 'input': this.target.set('value', value); break;
            case 'img': break;
            default: this.target.set('html', value);
         }
         (this.hide.bind(this)).delay(150);
      } else{
      (this.hide.bind(this)).delay(150);
      }

      if ($defined(this.hiddenInput)) this.hiddenInput.set('value', this.format(this.selectedDate, this.options.hiddenInputFormat));
      this.options.pickFunction(this.selectedDate);
   },

   position: function() {
      var top, left;
      var coordinates = this.target.getCoordinates();

      switch (this.options.alignX) {
         case 'left':
            left = coordinates.left;
            break;
         case 'middle':
            left = coordinates.left + (coordinates.width / 2) - (this.element.getWidth() / 2);
            break;
         case 'right': default:
            left = coordinates.left + coordinates.width;
      }

      switch (this.options.alignY) {
         case 'bottom':
            top = coordinates.top + coordinates.height;
            break;
         case 'top':
            top = coordinates.top - this.element.getHeight();
            break;
         case 'ceiling': default:
            top = coordinates.top;
      }

      left += this.options.offsetX.toInt();
      top += this.options.offsetY.toInt();

      this.element.setStyles({ 'top': top, 'left': left });
   },

   show: function() {
      if (!this.visible & !this.options.alwaysShow) {
         this.visible = true;
         if (!Browser.Engine.trident) {
            this.element.setStyles({ 'opacity': 0, 'display': 'block' });
            if (!this.options.injectInsideTarget) this.position();
            this.element.set('tween', { 'duration': this.options.toggleDuration, 'transition': this.options.fadeTransition }).fade('in');
         } else {
            this.element.setStyles({ 'opacity': 1, 'display': 'block' });
            if (!this.options.injectInsideTarget) this.position();
         }
      }
   },

   hide: function() {
      if (this.visible & !this.options.alwaysShow) {
         this.visible = false;
         if (!Browser.Engine.trident) {
            this.element.set('tween', { 'duration': this.options.toggleDuration, 'transition': this.options.fadeTransition,
               'onComplete': function() { this.element.setStyle('display', 'none') } .bind(this)
            }).fade('out');
         } else this.element.setStyle('display', 'none');
      }
   },

   toggle: function() {
      if (this.visible) this.hide();
      else this.show();
   },

   format: function(date, format) {
      if (!$defined(format)) format = this.options.format;
      if (!$defined(date)) return;
      format = format.replace(/%([a-z%])/gi,
			function($1, $2) {
			   switch ($2) {
			      case 'D': return date.get('date');
			      case 'n': return date.get('mo') + 1;
			      case 't': return (date.getTime() / 1000).toInt();
			   }
			   return '%' + $2;
			}
		);
      return date.format(format);
   },

   outsideClick: function(e) {
      if (this.visible) {
         var elementCoords = this.element.getCoordinates();
         var targetCoords = this.target.getCoordinates();
         if (((e.page.x < elementCoords.left || e.page.x > (elementCoords.left + elementCoords.width)) ||
			    (e.page.y < elementCoords.top || e.page.y > (elementCoords.top + elementCoords.height))) &&
			   ((e.page.x < targetCoords.left || e.page.x > (targetCoords.left + targetCoords.width)) ||
			    (e.page.y < targetCoords.top || e.page.y > (targetCoords.top + targetCoords.height)))) this.hide();
      }
   },

   //Version 1.0.1 addition, can easily be called from outside
   setDate: function(value, pick) {
      if (!$defined(pick)) pick = true;
      if ($type(value) == 'date') {
         var date = value.clearTime();
      } else {
         var date = $chk(value) ? new Date().parse(this.target.get('value')).clearTime() : new Date().clearTime();
      }
      if (date.isValid()) {
         this.selectedDate = date.clone();
         this.viewDate = this.selectedDate.clone().set('date', 1);
         this.render();
         if (pick) this.pick();
      }
   }
});