gbdev-calendar_date_select 1.11.20080824

data/lib/calendar_date_select.rb

@@ -0,0 +1,222 @@
+class CalendarDateSelect
+  FORMATS = {
+    :natural => {
+      :date => "%B %d, %Y",
+      :time => " %I:%M %p"
+    },
+    :hyphen_ampm => {
+      :date => "%Y-%m-%d",
+      :time => " %I:%M %p",
+      :javascript_include => "format_hyphen_ampm"
+    },
+    :iso_date => {
+      :date => "%Y-%m-%d", 
+      :time => " %H:%M",
+      :javascript_include => "format_iso_date"
+    }, 
+    :finnish => {
+      :date => "%d.%m.%Y",
+      :time => " %H:%M",
+      :javascript_include => "format_finnish"
+    },
+    :american => {
+      :date => "%m/%d/%Y",
+      :time => " %I:%M %p",
+      :javascript_include => "format_american"
+    },
+    :euro_24hr => {
+      :date => "%d %B %Y",
+      :time => " %H:%M", 
+      :javascript_include => "format_euro_24hr"
+    },
+    :euro_24hr_ymd => {
+      :date => "%Y.%m.%d",
+      :time => " %H:%M", 
+      :javascript_include => "format_euro_24hr_ymd"
+    },
+    :italian => {
+      :date => "%d/%m/%Y",
+      :time => " %H:%M",
+      :javascript_include => "format_italian"
+    },
+    :db => {
+      :date => "%Y-%m-%d",
+      :time => "%H:%M",
+      :javascript_include => "format_db"
+    }
+  }
+  
+  cattr_accessor :image
+  @@image = "calendar_date_select/calendar.gif"
+  
+  cattr_reader :format
+  @@format = FORMATS[:natural]
+  
+  class << self
+    def format=(format)
+      raise "CalendarDateSelect: Unrecognized format specification: #{format}" unless FORMATS.has_key?(format)
+      @@format = FORMATS[format]
+    end
+    
+    def javascript_format_include
+      @@format[:javascript_include] && "calendar_date_select/#{@@format[:javascript_include]}"
+    end
+    
+    def date_format_string(time=false)
+      @@format[:date] + ( time ? @@format[:time] : "" )
+    end
+    
+    def format_date(date)
+      if Date===date
+        date.strftime(date_format_string(false))
+      else
+        date.strftime(date_format_string(true))
+      end
+    end
+    
+    def has_time?(value)
+      /[0-9]:[0-9]{2}/.match(value.to_s)
+    end
+  end
+  
+  module FormHelper
+    def calendar_date_select_tag( name, value = nil, options = {})
+      calendar_options = calendar_date_select_process_options(options)
+      value = format_time(value, calendar_options)
+      
+      calendar_options.delete(:format)
+      
+      options[:id] ||= name
+      tag = calendar_options[:hidden] || calendar_options[:embedded] ? 
+        hidden_field_tag(name, value, options) :
+        text_field_tag(name, value, options)
+      
+      calendar_date_select_output(tag, calendar_options)
+    end
+    
+    def format_time(value, options = {})
+      if value.respond_to?("strftime")
+        if options[:format]
+          value = value.strftime(options[:format])
+        else
+          if options.has_key? :time
+            value = value.strftime(CalendarDateSelect.date_format_string(options[:time]))
+          else
+            value = CalendarDateSelect.format_date(value)
+          end
+        end
+      end
+      value
+   end
+    
+    # extracts any options passed into calendar date select, appropriating them to either the Javascript call or the html tag.
+    def calendar_date_select_process_options(options)
+      calendar_options = {}
+      callbacks = [:before_show, :before_close, :after_show, :after_close, :after_navigate]
+      for key in [:time, :valid_date_check, :embedded, :buttons, :format, :year_range, :month_year, :popup, :hidden, :minute_interval] + callbacks
+        calendar_options[key] = options.delete(key) if options.has_key?(key)
+      end
+      
+      # if passing in mixed, pad it with single quotes
+      calendar_options[:time] = "'mixed'" if calendar_options[:time].to_s=="mixed"
+      calendar_options[:month_year] = "'#{calendar_options[:month_year]}'" if calendar_options[:month_year]
+      
+      # if we are forcing the popup, automatically set the readonly property on the input control.
+      if calendar_options[:popup].to_s == "force"
+        calendar_options[:popup] = "'force'"
+        options[:readonly] = true 
+      end
+      
+      if (vdc=calendar_options.delete(:valid_date_check))
+        if vdc.include?(";") || vdc.include?("function")
+          throw ":valid_date_check function is missing a 'return' statement.  Try something like: :valid_date_check => 'if (date > new(Date)) return true; else return false;'" unless vdc.include?("return");
+        end
+        
+        vdc = "return(#{vdc})" unless vdc.include?("return")
+        vdc = "function(date) { #{vdc} }" unless vdc.include?("function")
+        calendar_options[:valid_date_check] = vdc
+      end
+      
+      calendar_options[:popup_by] ||= "this" if calendar_options[:hidden]
+      
+      # surround any callbacks with a function, if not already done so
+      for key in callbacks
+        calendar_options[key] = "function(param) { #{calendar_options[key]} }" unless calendar_options[key].include?("function") if calendar_options[key]
+      end
+      
+      calendar_options[:year_range] = format_year_range(calendar_options[:year_range] || 10)
+      calendar_options
+    end
+    
+    def calendar_date_select(object, method, options={})
+      obj = options[:object] || instance_variable_get("@#{object}")
+      
+      if !options.include?(:time) && obj.class.respond_to?("columns_hash")
+        column_type = (obj.class.columns_hash[method.to_s].type rescue nil)
+        options[:time] = true if column_type == :datetime
+      end
+      
+      use_time = options[:time]
+      
+      if options[:time].to_s=="mixed"
+        use_time = false if Date===(obj.respond_to?(method) && obj.send(method))
+      end
+      
+      calendar_options = calendar_date_select_process_options(options)
+      
+      options[:value] ||= 
+        if(obj.respond_to?(method) && obj.send(method).respond_to?(:strftime))
+          obj.send(method).strftime(CalendarDateSelect.date_format_string(use_time))
+        elsif obj.respond_to?("#{method}_before_type_cast") 
+          obj.send("#{method}_before_type_cast")
+        elsif obj.respond_to?(method)
+          obj.send(method).to_s
+        else
+          nil
+        end
+
+      tag = ActionView::Helpers::InstanceTag.new(object, method, self, nil, options.delete(:object))
+      calendar_date_select_output(
+        tag.to_input_field_tag( (calendar_options[:hidden] || calendar_options[:embedded]) ? "hidden" : "text", options), 
+        calendar_options
+      )
+    end  
+    
+    def calendar_date_select_output(input, calendar_options = {})
+      out = input
+      if calendar_options[:embedded]
+        uniq_id = "cds_placeholder_#{(rand*100000).to_i}"
+        # we need to be able to locate the target input element, so lets stick an invisible span tag here we can easily locate
+        out << content_tag(:span, nil, :style => "display: none; position: absolute;", :id => uniq_id)
+        
+        out << javascript_tag("new CalendarDateSelect( $('#{uniq_id}').previous(), #{options_for_javascript(calendar_options)} ); ")
+      else
+        out << " "
+        
+        out << image_tag(CalendarDateSelect.image, 
+            :onclick => "new CalendarDateSelect( $(this).previous(), #{options_for_javascript(calendar_options)} );",
+            :style => 'border:0px; cursor:pointer;')
+      end
+      
+      out
+    end
+    
+  private
+    def format_year_range(year) # nodoc
+      return year unless year.respond_to?(:first)
+      return "[#{year.first}, #{year.last}]" unless year.first.respond_to?(:strftime)
+      return "[#{year.first.year}, #{year.last.year}]"
+    end
+  end
+end
+
+
+module ActionView
+  module Helpers
+    class FormBuilder
+      def calendar_date_select(method, options = {})
+        @template.calendar_date_select(@object_name, method, options.merge(:object => @object))
+      end
+    end
+  end
+end

data/lib/gem_init.rb

@@ -0,0 +1,3 @@
+# delegate to original init.rb from the plugin
+require File.dirname(__FILE__) + '/../init'
+

data/lib/includes_helper.rb

@@ -0,0 +1,38 @@
+class CalendarDateSelect
+  module IncludesHelper
+    def calendar_date_select_stylesheets(options = {})
+      options.assert_valid_keys(:style, :format, :locale)
+      
+      style = options[:style]
+      cds_css_file = style ? "calendar_date_select/#{style}" : "calendar_date_select/default"
+      return cds_css_file
+    end
+
+    def calendar_date_select_javascripts(options = {})
+      options.assert_valid_keys(:style, :format, :locale)
+      
+      style = options[:style]
+      locale = options[:locale]
+      cds_css_file = style ? "calendar_date_select/#{style}" : "calendar_date_select/default"
+      
+      output = []
+      output << "calendar_date_select/calendar_date_select"
+      output << "calendar_date_select/locale/#{locale}" if locale
+      output << CalendarDateSelect.javascript_format_include if CalendarDateSelect.javascript_format_include
+      return output
+    end
+
+    def calendar_date_select_includes(*args)
+      return "" if @cds_already_included
+      @cds_already_included=true
+      
+      options = (Hash === args.last) ? args.pop : {}
+      options.assert_valid_keys(:style, :format, :locale)
+      options[:style] ||= args.shift
+
+      js = javascript_include_tag(*calendar_date_select_javascripts(options))
+      css = stylesheet_link_tag(*calendar_date_select_stylesheets(options))
+      "#{js}\n#{css}\n"
+    end
+  end
+end

data/public/blank_iframe.html

@@ -0,0 +1,2 @@
+<!-- Nothing here -->
+<html><head></head><body></body></html>

data/public/javascripts/calendar_date_select/calendar_date_select.js

@@ -0,0 +1,430 @@
+// CalendarDateSelect version 1.10.11 - a prototype based date picker
+// Questions, comments, bugs? - see the project page: http://code.google.com/p/calendardateselect
+if (typeof Prototype == 'undefined') alert("CalendarDateSelect Error: Prototype could not be found. Please make sure that your application's layout includes prototype.js (.g. <%= javascript_include_tag :defaults %>) *before* it includes calendar_date_select.js (.g. <%= calendar_date_select_includes %>).");
+if (Prototype.Version < "1.6") alert("Prototype 1.6.0 is required.  If using earlier version of prototype, please use calendar_date_select version 1.8.3");
+
+Element.addMethods({
+  purgeChildren: function(element) { $A(element.childNodes).each(function(e){$(e).remove();}); },
+  build: function(element, type, options, style) {
+    var newElement = Element.buildAndAppend(type, options, style);
+    element.appendChild(newElement);
+    return newElement;
+  }
+});
+
+Element.buildAndAppend = function(type, options, style)
+{
+  var e = $(document.createElement(type));
+  $H(options).each(function(pair) { eval("e." + pair.key + " = pair.value" ); });
+  if (style) 
+    $H(style).each(function(pair) { eval("e.style." + pair.key + " = pair.value" ); });
+  return e;
+};
+nil = null;
+
+Date.one_day = 24*60*60*1000;
+Date.weekdays = $w("S M T W T F S");
+Date.first_day_of_week = 0;
+Date.months = $w("January February March April May June July August September October November December" );
+Date.padded2 = function(hour) { var padded2 = parseInt(hour, 10); if (hour < 10) padded2 = "0" + padded2; return padded2; }
+Date.prototype.getPaddedMinutes = function() { return Date.padded2(this.getMinutes()); }
+Date.prototype.getAMPMHour = function() { var hour = this.getHours(); return (hour == 0) ? 12 : (hour > 12 ? hour - 12 : hour ) }
+Date.prototype.getAMPM = function() { return (this.getHours() < 12) ? "AM" : "PM"; }
+Date.prototype.stripTime = function() { return new Date(this.getFullYear(), this.getMonth(), this.getDate());};
+Date.prototype.daysDistance = function(compare_date) { return Math.round((compare_date - this) / Date.one_day); };
+Date.prototype.toFormattedString = function(include_time){
+  var hour, str;
+  str = Date.months[this.getMonth()] + " " + this.getDate() + ", " + this.getFullYear();
+  
+  if (include_time) { hour = this.getHours(); str += " " + this.getAMPMHour() + ":" + this.getPaddedMinutes() + " " + this.getAMPM() }
+  return str;
+}
+Date.parseFormattedString = function(string) { return new Date(string);}
+Math.floor_to_interval = function(n, i) { return Math.floor(n/i) * i;}
+window.f_height = function() { return( [window.innerHeight ? window.innerHeight : null, document.documentElement ? document.documentElement.clientHeight : null, document.body ? document.body.clientHeight : null].select(function(x){return x>0}).first()||0); }
+window.f_scrollTop = function() { return ([window.pageYOffset ? window.pageYOffset : null, document.documentElement ? document.documentElement.scrollTop : null, document.body ? document.body.scrollTop : null].select(function(x){return x>0}).first()||0 ); }
+
+_translations = {
+  "OK": "OK",
+  "Now": "Now",
+  "Today": "Today"
+}
+SelectBox = Class.create();
+SelectBox.prototype = {
+  initialize: function(parent_element, values, html_options, style_options) {
+    this.element = $(parent_element).build("select", html_options, style_options);
+    this.populate(values);
+  },
+  populate: function(values) {
+    this.element.purgeChildren();
+    var that = this; $A(values).each(function(pair) { if (typeof(pair)!="object") {pair = [pair, pair]}; that.element.build("option", { value: pair[1], innerHTML: pair[0]}) });
+  },
+  setValue: function(value) {
+    var e = this.element;
+    var matched = false;
+    $R(0, e.options.length - 1 ).each(function(i) { if(e.options[i].value==value.toString()) {e.selectedIndex = i; matched = true;}; } );
+    return matched;
+  },
+  getValue: function() { return $F(this.element)}
+}
+CalendarDateSelect = Class.create();
+CalendarDateSelect.prototype = {
+  initialize: function(target_element, options) {
+    this.target_element = $(target_element); // make sure it's an element, not a string
+    if (!this.target_element) { alert("Target element " + target_element + " not found!"); return false;}
+    if (this.target_element.tagName != "INPUT") this.target_element = this.target_element.down("INPUT")
+    
+    this.target_element.calendar_date_select = this;
+    this.last_click_at = 0;
+    // initialize the date control
+    this.options = $H({
+      embedded: false,
+      popup: nil,
+      time: false,
+      buttons: true,
+      year_range: 10,
+      close_on_click: nil,
+      minute_interval: 5,
+      popup_by: this.target_element,
+      month_year: "dropdowns",
+      onchange: this.target_element.onchange,
+      valid_date_check: nil
+    }).merge(options || {});
+    this.use_time = this.options.get("time");
+    this.parseDate();
+    this.callback("before_show")
+    this.initCalendarDiv();
+    if(!this.options.get("embedded")) {
+      this.positionCalendarDiv()
+      // set the click handler to check if a user has clicked away from the document
+      Event.observe(document, "mousedown", this.closeIfClickedOut_handler = this.closeIfClickedOut.bindAsEventListener(this));
+      Event.observe(document, "keypress", this.keyPress_handler = this.keyPress.bindAsEventListener(this));
+    }
+    this.callback("after_show")
+  },
+  positionCalendarDiv: function() {
+    var above = false;
+    var c_pos = this.calendar_div.cumulativeOffset(), c_left = c_pos[0], c_top = c_pos[1], c_dim = this.calendar_div.getDimensions(), c_height = c_dim.height, c_width = c_dim.width; 
+    var w_top = window.f_scrollTop(), w_height = window.f_height();
+    var e_dim = $(this.options.get("popup_by")).cumulativeOffset(), e_top = e_dim[1], e_left = e_dim[0], e_height = $(this.options.get("popup_by")).getDimensions().height, e_bottom = e_top + e_height;
+    
+    if ( (( e_bottom + c_height ) > (w_top + w_height)) && ( e_bottom - c_height > w_top )) above = true;
+    var left_px = e_left.toString() + "px", top_px = (above ? (e_top - c_height ) : ( e_top + e_height )).toString() + "px";
+    
+    this.calendar_div.style.left = left_px;  this.calendar_div.style.top = top_px;
+    
+    this.calendar_div.setStyle({visibility:""});
+    
+    // draw an iframe behind the calendar -- ugly hack to make IE 6 happy
+    if(navigator.appName=="Microsoft Internet Explorer") this.iframe = $(document.body).build("iframe", {src: "javascript:false", className: "ie6_blocker"}, { left: left_px, top: top_px, height: c_height.toString()+"px", width: c_width.toString()+"px", border: "0px"})
+  },
+  initCalendarDiv: function() {
+    if (this.options.get("embedded")) {
+      var parent = this.target_element.parentNode;
+      var style = {}
+    } else {
+      var parent = document.body
+      var style = { position:"absolute", visibility: "hidden", left:0, top:0 }
+    }
+    this.calendar_div = $(parent).build('div', {className: "calendar_date_select"}, style);
+    
+    var that = this;
+    // create the divs
+    $w("top header body buttons footer bottom").each(function(name) {
+      eval("var " + name + "_div = that." + name + "_div = that.calendar_div.build('div', { className: 'cds_"+name+"' }, { clear: 'left'} ); ");
+    });
+    
+    this.initHeaderDiv();
+    this.initButtonsDiv();
+    this.initCalendarGrid();
+    this.updateFooter("&#160;");
+    
+    this.refresh();
+    this.setUseTime(this.use_time);
+  },
+  initHeaderDiv: function() {
+    var header_div = this.header_div;
+    this.close_button = header_div.build("a", { innerHTML: "x", href:"#", onclick:function () { this.close(); return false; }.bindAsEventListener(this), className: "close" });
+    this.next_month_button = header_div.build("a", { innerHTML: "&gt;", href:"#", onclick:function () { this.navMonth(this.date.getMonth() + 1 ); return false; }.bindAsEventListener(this), className: "next" });
+    this.prev_month_button = header_div.build("a", { innerHTML: "&lt;", href:"#", onclick:function () { this.navMonth(this.date.getMonth() - 1 ); return false; }.bindAsEventListener(this), className: "prev" });
+    
+    if (this.options.get("month_year")=="dropdowns") {
+      this.month_select = new SelectBox(header_div, $R(0,11).map(function(m){return [Date.months[m], m]}), {className: "month", onchange: function () { this.navMonth(this.month_select.getValue()) }.bindAsEventListener(this)}); 
+      this.year_select = new SelectBox(header_div, [], {className: "year", onchange: function () { this.navYear(this.year_select.getValue()) }.bindAsEventListener(this)}); 
+      this.populateYearRange();
+    } else {
+      this.month_year_label = header_div.build("span")
+    }
+  },
+  initCalendarGrid: function() {
+    var body_div = this.body_div;
+    this.calendar_day_grid = [];
+    var days_table = body_div.build("table", { cellPadding: "0px", cellSpacing: "0px", width: "100%" })
+    // make the weekdays!
+    var weekdays_row = days_table.build("thead").build("tr");
+    Date.weekdays.each( function(weekday) { 
+      weekdays_row.build("th", {innerHTML: weekday});
+    });
+    
+    var days_tbody = days_table.build("tbody")
+    // Make the days!
+    var row_number = 0, weekday;
+    for(var cell_index = 0; cell_index<42; cell_index++)
+    {
+      weekday = (cell_index+Date.first_day_of_week ) % 7;
+      if ( cell_index % 7==0 ) days_row = days_tbody.build("tr", {className: 'row_'+row_number++});
+      (this.calendar_day_grid[cell_index] = days_row.build("td", {
+          calendar_date_select: this,
+          onmouseover: function () { this.calendar_date_select.dayHover(this); },
+          onmouseout: function () { this.calendar_date_select.dayHoverOut(this) },
+          onclick: function() { this.calendar_date_select.updateSelectedDate(this, true); },
+          className: (weekday==0) || (weekday==6) ? " weekend" : "" //clear the class
+        },
+        { cursor: "pointer" }
+      )).build("div");
+      this.calendar_day_grid[cell_index];
+    }
+  },
+  initButtonsDiv: function()
+  {
+    var buttons_div = this.buttons_div;
+    if (this.options.get("time"))
+    {
+      var blank_time = $A(this.options.get("time")=="mixed" ? [[" - ", ""]] : []);
+      buttons_div.build("span", {innerHTML:"@", className: "at_sign"});
+      
+      var t = new Date();
+      this.hour_select = new SelectBox(buttons_div,
+        blank_time.concat($R(0,23).map(function(x) {t.setHours(x); return $A([t.getAMPMHour()+ " " + t.getAMPM(),x])} )),
+        { 
+          calendar_date_select: this, 
+          onchange: function() { this.calendar_date_select.updateSelectedDate( { hour: this.value });},
+          className: "hour" 
+        }
+      );
+      buttons_div.build("span", {innerHTML:":", className: "seperator"});
+      var that = this;
+      this.minute_select = new SelectBox(buttons_div,
+        blank_time.concat($R(0,59).select(function(x){return (x % that.options.get('minute_interval')==0)}).map(function(x){ return $A([ Date.padded2(x), x]); } ) ),
+        { 
+          calendar_date_select: this, 
+          onchange: function() { this.calendar_date_select.updateSelectedDate( {minute: this.value }) }, 
+          className: "minute" 
+        }
+      );
+      
+    } else if (! this.options.get("buttons")) buttons_div.remove();
+    
+    if (this.options.get("buttons")) {
+      buttons_div.build("span", {innerHTML: "&#160;"});
+      if (this.options.get("time")=="mixed" || !this.options.get("time")) b = buttons_div.build("a", {
+          innerHTML: _translations["Today"],
+          href: "#",
+          onclick: function() {this.today(false); return false;}.bindAsEventListener(this)
+        });
+      
+      if (this.options.get("time")=="mixed") buttons_div.build("span", {innerHTML: " | ", className:"button_seperator"})
+      
+      if (this.options.get("time")) b = buttons_div.build("a", {
+        innerHTML: _translations["Now"],
+        href: "#",
+        onclick: function() {this.today(true); return false}.bindAsEventListener(this)
+      });
+      
+      if (!this.options.get("embedded"))
+      {
+        buttons_div.build("span", {innerHTML: "&#160;"});
+        buttons_div.build("a", { innerHTML: _translations["OK"], href: "#", onclick: function() {this.close(); return false;}.bindAsEventListener(this) });
+      }
+    }
+  },
+  refresh: function ()
+  {
+    this.refreshMonthYear();
+    this.refreshCalendarGrid();
+    
+    this.setSelectedClass();
+    this.updateFooter();
+  },
+  refreshCalendarGrid: function () {
+    this.beginning_date = new Date(this.date).stripTime();
+    this.beginning_date.setDate(1);
+    this.beginning_date.setHours(12); // Prevent daylight savings time boundaries from showing a duplicate day
+    var pre_days = this.beginning_date.getDay() // draw some days before the fact
+    if (pre_days < 3) pre_days += 7;
+    this.beginning_date.setDate(1 - pre_days + Date.first_day_of_week);
+    
+    var iterator = new Date(this.beginning_date);
+    
+    var today = new Date().stripTime();
+    var this_month = this.date.getMonth();
+    vdc = this.options.get("valid_date_check");
+    for (var cell_index = 0;cell_index<42; cell_index++)
+    {
+      day = iterator.getDate(); month = iterator.getMonth();
+      cell = this.calendar_day_grid[cell_index];
+      Element.remove(cell.childNodes[0]); div = cell.build("div", {innerHTML:day});
+      if (month!=this_month) div.className = "other";
+      cell.day = day; cell.month = month; cell.year = iterator.getFullYear();
+      if (vdc) { if (vdc(iterator.stripTime())) cell.removeClassName("disabled"); else cell.addClassName("disabled") };
+      iterator.setDate( day + 1);
+    }
+    
+    if (this.today_cell) this.today_cell.removeClassName("today");
+    
+    if ( $R( 0, 41 ).include(days_until = this.beginning_date.stripTime().daysDistance(today)) ) {
+      this.today_cell = this.calendar_day_grid[days_until];
+      this.today_cell.addClassName("today");
+    }
+  },
+  refreshMonthYear: function() {
+    var m = this.date.getMonth();
+    var y = this.date.getFullYear();
+    // set the month
+    if (this.options.get("month_year") == "dropdowns") 
+    {
+      this.month_select.setValue(m, false);
+      
+      var e = this.year_select.element; 
+      if (this.flexibleYearRange() && (!(this.year_select.setValue(y, false)) || e.selectedIndex <= 1 || e.selectedIndex >= e.options.length - 2 )) this.populateYearRange();
+      
+      this.year_select.setValue(y);
+      
+    } else {
+      this.month_year_label.update( Date.months[m] + " " + y.toString()  );
+    }
+  },
+  populateYearRange: function() {
+    this.year_select.populate(this.yearRange().toArray());
+  },
+  yearRange: function() {
+    if (!this.flexibleYearRange())
+      return $R(this.options.get("year_range")[0], this.options.get("year_range")[1]);
+      
+    var y = this.date.getFullYear();
+    return $R(y - this.options.get("year_range"), y + this.options.get("year_range"));
+  },
+  flexibleYearRange: function() { return (typeof(this.options.get("year_range")) == "number"); },
+  validYear: function(year) { if (this.flexibleYearRange()) { return true;} else { return this.yearRange().include(year);}  },
+  dayHover: function(element) {
+    var hover_date = new Date(this.selected_date);
+    hover_date.setYear(element.year); hover_date.setMonth(element.month); hover_date.setDate(element.day);
+    this.updateFooter(hover_date.toFormattedString(this.use_time));
+  },
+  dayHoverOut: function(element) { this.updateFooter(); },
+  clearSelectedClass: function() {if (this.selected_cell) this.selected_cell.removeClassName("selected");},
+  setSelectedClass: function() {
+    if (!this.selection_made) return;
+    this.clearSelectedClass()
+    if ($R(0,42).include( days_until = this.beginning_date.stripTime().daysDistance(this.selected_date.stripTime()) )) {
+      this.selected_cell = this.calendar_day_grid[days_until];
+      this.selected_cell.addClassName("selected");
+    }
+  },
+  reparse: function() { this.parseDate(); this.refresh(); },
+  dateString: function() {
+    return (this.selection_made) ? this.selected_date.toFormattedString(this.use_time) : "&#160;";
+  },
+  parseDate: function()
+  {
+    var value = $F(this.target_element).strip()
+    this.selection_made = (value != "");
+    this.date = value=="" ? NaN : Date.parseFormattedString(this.options.get("date") || value);
+    if (isNaN(this.date)) this.date = new Date();
+    if (!this.validYear(this.date.getFullYear())) this.date.setYear( (this.date.getFullYear() < this.yearRange().start) ? this.yearRange().start : this.yearRange().end);
+    this.selected_date = new Date(this.date);
+    this.use_time = /[0-9]:[0-9]{2}/.exec(value) ? true : false;
+    this.date.setDate(1);
+  },
+  updateFooter:function(text) { if (!text) text = this.dateString(); this.footer_div.purgeChildren(); this.footer_div.build("span", {innerHTML: text }); },
+  updateSelectedDate:function(partsOrElement, via_click) {
+    var parts = $H(partsOrElement);
+    if ((this.target_element.disabled || this.target_element.readOnly) && this.options.get("popup") != "force") return false;
+    if (parts.get("day")) {
+      var t_selected_date = this.selected_date, vdc = this.options.get("valid_date_check");
+      for (var x = 0; x<=3; x++) t_selected_date.setDate(parts.get("day"));
+      t_selected_date.setYear(parts.get("year"));
+      t_selected_date.setMonth(parts.get("month"));
+      
+      if (vdc && ! vdc(t_selected_date.stripTime())) { return false; }
+      this.selected_date = t_selected_date;
+      this.selection_made = true;
+    }
+    
+    if (!isNaN(parts.get("hour"))) this.selected_date.setHours(parts.get("hour"));
+    if (!isNaN(parts.get("minute"))) this.selected_date.setMinutes( Math.floor_to_interval(parts.get("minute"), this.options.get("minute_interval")) );
+    if (parts.get("hour") === "" || parts.get("minute") === "") 
+      this.setUseTime(false);
+    else if (!isNaN(parts.get("hour")) || !isNaN(parts.get("minute")))
+      this.setUseTime(true);
+    
+    this.updateFooter();
+    this.setSelectedClass();
+    
+    if (this.selection_made) this.updateValue();
+    if (this.closeOnClick()) { this.close(); }
+    if (via_click && !this.options.get("embedded")) {
+      if ((new Date() - this.last_click_at) < 333) this.close();
+      this.last_click_at = new Date();
+    }
+  },
+  closeOnClick: function() {
+    if (this.options.get("embedded")) return false;
+    if (this.options.get("close_on_click")===nil )
+      return (this.options.get("time")) ? false : true
+    else
+      return (this.options.get("close_on_click"))
+  },
+  navMonth: function(month) { (target_date = new Date(this.date)).setMonth(month); return (this.navTo(target_date)); },
+  navYear: function(year) { (target_date = new Date(this.date)).setYear(year); return (this.navTo(target_date)); },
+  navTo: function(date) {
+    if (!this.validYear(date.getFullYear())) return false;
+    this.date = date;
+    this.date.setDate(1);
+    this.refresh();
+    this.callback("after_navigate", this.date);
+    return true;
+  },
+  setUseTime: function(turn_on) {
+    this.use_time = this.options.get("time") && (this.options.get("time")=="mixed" ? turn_on : true) // force use_time to true if time==true && time!="mixed"
+    if (this.use_time && this.selected_date) { // only set hour/minute if a date is already selected
+      var minute = Math.floor_to_interval(this.selected_date.getMinutes(), this.options.get("minute_interval"));
+      var hour = this.selected_date.getHours();
+      
+      this.hour_select.setValue(hour);
+      this.minute_select.setValue(minute)
+    } else if (this.options.get("time")=="mixed") {
+      this.hour_select.setValue(""); this.minute_select.setValue("");
+    }
+  },
+  updateValue: function() {
+    var last_value = this.target_element.value;
+    this.target_element.value = this.dateString();
+    if (last_value!=this.target_element.value) this.callback("onchange");
+  },
+  today: function(now) {
+    var d = new Date(); this.date = new Date();
+    var o = $H({ day: d.getDate(), month: d.getMonth(), year: d.getFullYear(), hour: d.getHours(), minute: d.getMinutes()});
+    if ( ! now ) o = o.merge({hour: "", minute:""}); 
+    this.updateSelectedDate(o, true);
+    this.refresh();
+  },
+  close: function() {
+    if (this.closed) return false;
+    this.callback("before_close");
+    this.target_element.calendar_date_select = nil;
+    Event.stopObserving(document, "mousedown", this.closeIfClickedOut_handler);
+    Event.stopObserving(document, "keypress", this.keyPress_handler);
+    this.calendar_div.remove(); this.closed = true;
+    if (this.iframe) this.iframe.remove();
+    if (this.target_element.type!="hidden") this.target_element.focus();
+    this.callback("after_close");
+  },
+  closeIfClickedOut: function(e) {
+    if (! $(Event.element(e)).descendantOf(this.calendar_div) ) this.close();
+  },
+  keyPress: function(e) {
+    if (e.keyCode==Event.KEY_ESC) this.close();
+  },
+  callback: function(name, param) { if (this.options.get(name)) { this.options.get(name).bind(this.target_element)(param); } }
+}