/*
 * DatePicker
 * @author Rick Hopkins
 * @modified by Micah Nolte and Martin Vašina
 * @version 0.3.2
 * @classDescription A date picker object. Created with the help of MooTools v1.11
 * MIT-style License.

-- start it up by doing this in your domready:

$$('input.DatePicker').each( function(el){
  new DatePicker(el);
});

 */

var var_dump = function(variable) {
  var dumped_text = "";

  if(!this.level) this.level = 0;

  if (this.level > 4) {
    return "...";
  }

  var _f = function(valor, item) {
    var _return = '';

    if (item)
      _return = "'" + item + "' <font color='#888a85'>=&gt;</font> ";

    _return += " <small>" + typeof(valor) + "</small> ";

    if (typeof(valor) == 'string')
      _return += "<font color='#cc0000'>'" + valor + "'</font> <i>(length=" + valor.length +  ")</i>\n";
    if (typeof(valor) == 'number')
      _return += "<font color='#4e9a06'>'" + valor + "'</font>\n";
    if (typeof(valor) == 'boolean')
      _return += "<font color='#75507b'>" + valor + "</font>\n";

    return _return;
  }

  //The padding given at the beginning of the line.
  var level_padding = "";
  for(var j=0;j<this.level+1;j++) level_padding += "  ";

  if(typeof(variable) == 'object') { //Array/Hashes/Objects
    for(var item in variable) {
      var value = variable[item];

      if(typeof(value) == 'object') { //If it is an array,
        dumped_text += level_padding + "'<strong>" + item + "'</strong>\n";
        this.level++;
        dumped_text += var_dump(value);
        this.level--;
      } else {
        if (typeof(value) != 'function')
          dumped_text += level_padding + _f(value, item);
      }
    }
  } else { //Stings/Chars/Numbers etc.
    dumped_text += level_padding + _f(variable) + "\n";
  }

  if (this.level == 0) {
    var _dumpdiv = $('__dumpdiv__');
    if (!_dumpdiv) {
      _dumpdiv = new Element('div', {'id':'__dumpdiv__'});
      _dumpdiv.injectInside($('body'));
    }

    _pre = new Element('pre').setHTML(dumped_text);
    _pre.injectInside(_dumpdiv);
  }

  return dumped_text;
}.bind(var_dump);

var $D = function () {
  for (i = 0; i < arguments.length; i++) {
    variable = arguments[i];
    var_dump(variable);
  }
}

function __(string) {
  return string;
}


var DatePicker = new Class({

  /* set and create the date picker text box */
  initialize: function(dp){

    // Options defaults
    this.dayChars = 1; // number of characters in day names abbreviation
    this.dayNames = [__('Sunday'), 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday'];
    this.daysInMonth = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
    this.format = 'mm/dd/yyyy';
    this.monthNames = ['January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December'];
    this.startDay = 7; // 1 = week starts on Monday, 7 = week starts on Sunday
    this.yearOrder = 'asc';
    this.yearRange = 10;

    this.yearStart   = (new Date().getFullYear());
    this.dayStart   = (new Date().getDate());
    this.monthStart   = (new Date().getMonth());
    this.rangerStart = new Date();
    this.rangerEnd   = new Date();

    // Finds the entered date, or uses the current date
    if(dp.value != '') {
      dp.then = new Date(dp.value);
      dp.today = new Date();
    } else {
      dp.then = dp.today = new Date();
    }
    // Set beginning time and today, remember the original
    dp.oldYear = dp.year = dp.then.getFullYear();
    dp.oldMonth = dp.month = dp.then.getMonth();
    dp.oldDay = dp.then.getDate();
    dp.nowYear = dp.today.getFullYear();
    dp.nowMonth = dp.today.getMonth();
    dp.nowDay = dp.today.getDate();

    // Pull the rest of the options from the alt attr
    if(dp.alt) {
      options = Json.evaluate(dp.alt);
    } else {
      options = [];
    }

    var strtoday = options.dateStart.toString().split("-");
    this.rangerStart = new Date( strtoday[2], strtoday[1], strtoday[0] );
    var _year = strtoday[2];
    this.rangerEnd = new Date(
      ( _year.toInt() + options.yearRange.toInt() ),
      strtoday[1],
      strtoday[0]
    );

    dp.options = {
      monthNames: (options.monthNames && options.monthNames.length == 12 ? options.monthNames : this.monthNames) || this.monthNames,
      daysInMonth: (options.daysInMonth && options.daysInMonth.length == 12 ? options.daysInMonth : this.daysInMonth) || this.daysInMonth,
      dayNames: (options.dayNames && options.dayNames.length == 7 ? options.dayNames : this.dayNames) || this.dayNames,
      startDay : options.startDay || this.startDay,
      dayChars : options.dayChars || this.dayChars,
      format: options.format || this.format,
      yearStart: options.yearStart || this.yearStart,
      yearRange: options.yearRange || this.yearRange,
      yearOrder: options.yearOrder || this.yearOrder,
      rangerStart: options.rangerStart || this.rangerStart,
      rangerEnd: options.rangerEnd || this.rangerEnd
    };
    //dp.setProperties({'id':dp.getProperty('name'), 'readonly':true});
    dp.container = false;
    dp.calendar = false;
    dp.interval = null;
    dp.active = false;
    dp.onclick = dp.onfocus = this.create.pass(dp, this);
  },

  /* create the calendar */
  create: function(dp){
    if (dp.calendar) return false;

    //$D({'teste': 1, 'teste2': 'number of characters in day names abbreviation', 'objeto': [1,2] }, 'sdsdsd', 1);

    // Hide select boxes while calendar is up
    if(window.ie6){
      $$('select').addClass('dp_hide');
    }

    /* create the outer container */
    dp.container = new Element('div', {'class':'dp_container'}).injectBefore(dp);

    /* create timers */
    dp.container.onmouseover = dp.onmouseover = function(){
      $clear(dp.interval);
    };
    dp.container.onmouseout = dp.onmouseout = function(){
      dp.interval = setInterval(function(){
        if (!dp.active) this.remove(dp);
      }.bind(this), 500);
    }.bind(this);

    /* create the calendar */
    dp.calendar = new Element('div', {'class':'dp_cal'}).injectInside(dp.container);

    /* create the date object */
    var date = new Date();

    /* create the date object */
    if ((dp.month || dp.month == 0) && dp.year) {
      date.setFullYear(dp.year, dp.month, 1);
    } else {
      dp.month = date.getMonth();
      dp.year = date.getFullYear();
      date.setDate(1);
    }
    dp.year % 4 == 0 ? dp.options.daysInMonth[1] = 29 : dp.options.daysInMonth[1] = 28;

    /* set the day to first of the month */
    var firstDay = (1-(7+date.getDay()-dp.options.startDay)%7);

    /* start creating calendar */
    calTable = new Element('table');
    calTableThead = new Element('thead');
    calTableTbody = new Element('tbody');
    calArrowRow = (new Element('tr')).injectInside(calTableThead);

    if (dp.displaySelects) {
      /* create the month select box */
      monthSel = new Element('select', {'id':dp.id + '_monthSelect'});
      for (var m = 0; m < dp.options.monthNames.length; m++){
        monthSel.options[m] = new Option(dp.options.monthNames[m], m);
        if (dp.month == m) monthSel.options[m].selected = true;
      }

      /* create the year select box */
      yearSel = new Element('select', {'id':dp.id + '_yearSelect'});
      i = 0;
      dp.options.yearStart ? dp.options.yearStart : dp.options.yearStart = date.getFullYear();
      if (dp.options.yearOrder == 'desc'){
        for (var y = dp.options.yearStart; y > (dp.options.yearStart - dp.options.yearRange - 1); y--){
          yearSel.options[i] = new Option(y, y);
          if (dp.year == y) yearSel.options[i].selected = true;
          i++;
        }
      } else {
        for (var y = dp.options.yearStart; y < (dp.options.yearStart + dp.options.yearRange + 1); y++){
          yearSel.options[i] = new Option(y, y);
          if (dp.year == y) yearSel.options[i].selected = true;
          i++;
        }
      }

      // Create title calendar
      calTitleCell = new Element('th', {'colspan':'7'});
      monthSel.injectInside(calTitleCell);
      yearSel.injectInside(calTitleCell);
      calTitleCell.injectInside(calArrowRow);

    } else {
      calTitleCell = (new Element('th', {'colspan':'5'})).setText(dp.options.monthNames[dp.month] + ', ' + dp.year);

      // create arrows for navegation
      arrowFirst    = (new Element('th', {'class': 'dp_arrows'})).setHTML('&laquo;');
      arrowEnd      = (new Element('th', {'class': 'dp_arrows'})).setHTML('&raquo;');

      arrowFirst.injectInside(calArrowRow);
      calTitleCell.injectInside(calArrowRow);
      arrowEnd.injectInside(calArrowRow);
    }

    /* create day names */
    calDayNameRow = new Element('tr');
    for (var i = 0; i < dp.options.dayNames.length; i++) {
      calDayNameCell = new Element('th');
      calDayNameCell.appendText(dp.options.dayNames[(dp.options.startDay+i)%7].substr(0, dp.options.dayChars));
      calDayNameCell.injectInside(calDayNameRow);
    }
    calDayNameRow.injectInside(calTableTbody);

    /* create the day cells */
    while (firstDay <= dp.options.daysInMonth[dp.month]){
      calDayRow = new Element('tr');
      for (i = 0; i < 7; i++){
        if ((firstDay <= dp.options.daysInMonth[dp.month]) && (firstDay > 0)){
          calDayCell = new Element('td', {'class':dp.id + '_calDay', 'axis':dp.year + '|' + (parseInt(dp.month) + 1) + '|' + firstDay}).appendText(firstDay).injectInside(calDayRow);
        } else {
          calDayCell = new Element('td', {'class':'dp_empty'}).appendText(' ').injectInside(calDayRow);
        }
        // Show the previous day
        if ( (firstDay == dp.oldDay) && (dp.month == dp.oldMonth ) && (dp.year == dp.oldYear) ) {
          calDayCell.addClass('dp_selected');
        }
        // Show today
        if ( (firstDay == dp.nowDay) && (dp.month == dp.nowMonth ) && (dp.year == dp.nowYear) ) {
          calDayCell.addClass('dp_today');
        }

        // Cria um objeto com da selecionada
        dateCompare = new Date();
        dateCompare.setFullYear(dp.year, dp.month, firstDay);

        // Valid ranger date
        if (dp.options.rangerStart) {
          if (!this.is_ranger(dateCompare , dp.options.rangerStart)) {
            calDayCell.addClass('dp_noselect');
          }
        }

        if (dp.options.rangerEnd) {
          if (!this.is_ranger(dateCompare , false, dp.options.rangerEnd)) {
            calDayCell.addClass('dp_noselect');
          }
        }
        firstDay++;
      }
      calDayRow.injectInside(calTableTbody);
    }

    /* table into the calendar div */
    calTableThead.injectInside(calTable);
    calTableTbody.injectInside(calTable);
    calTable.injectInside(dp.calendar);

    /* set the onmouseover events for all calendar days */
    $$('td.' + dp.id + '_calDay').each(function(el){
      if (!el.hasClass('dp_noselect')) {
        el.onmouseover = function(){
          el.addClass('dp_roll');
        }.bind(this);
      }
    }.bind(this));

    /* set the onmouseout events for all calendar days */
    $$('td.' + dp.id + '_calDay').each(function(el){
      if (!el.hasClass('dp_noselect')) {
        el.onmouseout = function(){
          el.removeClass('dp_roll');
        }.bind(this);
      }
    }.bind(this));

    /* set the onclick events for all calendar days */
    $$('td.' + dp.id + '_calDay').each(function(el){
      if (!el.hasClass('dp_noselect')) {
        el.onclick = function(){
          ds = el.axis.split('|');
          dp.value = this.formatValue(dp, ds[0], ds[1], ds[2]);
          dp.onchange();
          this.remove(dp);
        }.bind(this);
      }
    }.bind(this));

    /* set the onchange event for the month & year select boxes */
    if (dp.displaySelects) {
      monthSel.onfocus = function(){ dp.active = true; };
      monthSel.onchange = function(){
        dp.month = monthSel.value;
        dp.year = yearSel.value;
        dp.displaySelects = false;
        this.remove(dp);
        this.create(dp);
      }.bind(this);

      yearSel.onfocus = function(){ dp.active = true; };
      yearSel.onchange = function(){
        dp.month = monthSel.value;
        dp.year = yearSel.value;
        dp.displaySelects = false;
        this.remove(dp);
        this.create(dp);
      }.bind(this);

    } else {
      calTitleCell.onclick = function(){
        dp.displaySelects = true;
        this.remove(dp);
        this.create(dp);
      }.bind(this);

      // Valid ranger date
      arrowFirst.onclick = function(){
        if (dp.month == 0) {
          dp.month = 11;
          dp.year--;
        } else {
          dp.month--;
        }
        this.remove(dp);
        this.create(dp);
      }.bind(this);

      arrowEnd.onclick = function(){
        if (dp.month == 11) {
          dp.month = 0;
          dp.year++;
        } else {
          dp.month++;
        }
        this.remove(dp);
        this.create(dp);
      }.bind(this);
    }
  },

  /* Format the returning date value according to the selected formation */
  formatValue: function(dp, year, month, day){
    /* setup the date string variable */
    var dateStr = '';

    /* check the length of day */
    if (day < 10) day = '0' + day;
    if (month < 10) month = '0' + month;

    /* check the format & replace parts // thanks O'Rey */
    dateStr = dp.options.format.replace( /dd/i, day ).replace( /mm/i, month ).replace( /yyyy/i, year );
    dp.month = dp.oldMonth = '' + (month - 1) + '';
    dp.year = dp.oldYear = year;
    dp.oldDay = day;

    /* return the date string value */
    return dateStr;
  },

  /* Remove the calendar from the page */
  remove: function(dp){
    $clear(dp.interval);
    dp.active = false;
    if (window.opera) dp.container.empty();
    else if (dp.container) dp.container.remove();
    dp.calendar = false;
    dp.container = false;
    $$('select.dp_hide').removeClass('dp_hide');
  },

  /* Calc ranger */
  is_ranger: function(date, start, end) {
    date.setHours(12);
    date = date.getTime();

    if(start) {
      start.setHours(0,0,0,1);
      start = start.getTime();
      if (date < start)
        return false;
    }

    if (end) {
      end.setHours(23,59,59,99)
      end = end.getTime();
      if (date > end )
        return false;
    }

    return true;
  }
});