//	Written by Tan Ling wee
//	on 19 June 2005
//	email :	info@sparrowscripts.com
//      url : www.sparrowscripts.com

/////////////////////////////////Here is the fix from Sihui Wu 
// More Fixes by Mahesh, 5/2007
// - Handles a wider variety of short time formats
// - When multiple time elements are used, ensures that if the picker button 
//   is pressed, the previously pressed button is unpressed.
// - Widget shows time closest to time in textbox element
// - Widget is modal and throws a curtain over other screen elements
// - If am/pm is not specified, all hours within 9-11 inclusive are considered to be AM, and the rest PM.
//   This is consistent with usage of time in speech, for business hours.
// - Fixed so that pressing ESC closes the timepicker
// - Fixed script so that it works with Yahoo! maps AJAX API v.3.4. Variable dom inteferes with the Yahoo! script, so
// - has been renamed to docGeid.


// modify image path to suit your application.
//var imagePath="images/";
var tp_mode=1; // 1 if 24H, 0 if am/pm
var tb_color_select="#3A8BE5";
var tb_color_move="#89B9EF";
var tb_color_border="#89B9EF";
var ie=null;   //document.all;
var docGeid=document.getElementById;
var ns4=document.layers;
var bShow=false;
var imgCtl=null;
var textCtl=null;
var debugging=false; // for use in logging.

// t is a string
function setTimePicker(t) 
{
//alert (t);
    ret = validateTimePicker2(t);
//alert (ret);
    textCtl.value  = ret;
    closeTimePicker();
}

/* nearestTime: find the nearest time within 15 mins.
   assumption: time is formatted as xx:xx am/pm or xx:xx:xx am/pm, and is a valid time.
*/
function nearestTime(n) 
{
  if (debugging) logger("nearestTime");
  // t is not a screen object, so call vDP2. vDP itself expects to be given a reference to a textbox.
  v_time  = validateTimePicker2(n);

  if (v_time=="")
  {
    // time invalide
    ret = "";
  }
  else
  if (tp_mode == 0)
  {    
    // time is now validated; should be in xx:xx am/pm format.
    var arr = v_time.split(":");
    var a2=arr[1].split(" ");
    var mn=parseInt(a2[0],10);
    var ampm=a2[1];
    
    // get nearest minute boundary, within 15 mins.
    var nMin= Math.floor((mn+7)/15)*15;

    ret = arr[0]+":"+padZero(nMin)+" "+ampm;
  }
  else
  {
//alert (v_time);
    var arr = v_time.split(":");
    
    // get nearest minute boundary, within 15 mins.
    var nMin= Math.floor(parseInt(arr[1],10)/15)*15;

    ret = arr[0]+":"+padZero(nMin);
  }
//alert (ret);
  return ret;
}

/*
  mode: am or pm
  tm: time selected, must be properly formatted: xx:xx am/pm, e.g. 12:30 pm
  if tm is provided, then mode is ignored.
*/
function refreshTimePicker(mode, tm) 
{
    // was a selected time provided?
    if (tm===undefined) { // is ===undefined an error, or is this correct javascript syntax?
        if (mode==0)
          { 
            suffix="am"; 
          }
        else
          { 
            suffix="pm"; 
          }
    } 
    else 
    {
      tm = nearestTime(tm); // get time to nearest 15 min. interval.
//alert (tm);
      if (tp_mode == 0)
      {
        suffix=tm.split(" ")[1];
        if (suffix=="am") 
          mode = 0; 
        else 
          mode = 1;
      }
      else
      {
        suffix=tm.split(":")[0];
        if (suffix < 12)
          mode = 0; 
        else 
          mode = 1;
      }
    }

    if (mode==0) 
    {
        document.getElementById("iconAM").src= imagePath + "am1.gif";
        document.getElementById("iconPM").src= imagePath + "pm2.gif";
    } 
    else 
    {
        document.getElementById("iconAM").src= imagePath + "am2.gif";
        document.getElementById("iconPM").src= imagePath + "pm1.gif";
    }

    sHTML = "<table cellpadding=2 cellspacing=0 bgcolor=#FFFFFF border=0>";
    for (i=0;i<12;i++) 
    {
      sHTML+="<tr>";
      if (i==0) 
      {
        hr=0;
      }
      else 
      {
        hr=i;
      }
      if (tp_mode==1)
      {
        if (mode==1)
        {
          hr += 12;
        }
        suffix2 = "";
      }
      else
      {
        suffix2 = suffix;
        if (hr==0)
        {
          hr  = 12;
        }
      }  

      for (j=0;j<4;j++) 
      {
        var bgcolor = "";
        var thisTime=hr+":"+padZero(j*15)
        if (tp_mode == 0)
        {
          thisTime = thisTime + " " + suffix;
          v_width = 57;
        }
        else
        {
          v_width = 50;
        }
        if (thisTime==tm) 
        {
          bgcolor="bgcolor='"+tb_color_select+"'";
        }
        sHTML+="<td " + bgcolor + "width="+v_width+" align=right onmouseover='this.style.backgroundColor=\""+tb_color_move+"\"' onmouseout='this.style.backgroundColor=\"\"'>";  
        sHTML+="<a href='javascript:setTimePicker(\""+ hr + ":" + padZero(j*15);
        if (tp_mode==0)
        {
         sHTML+= " " + suffix; 
        }
        sHTML+= "\")' STYLE='text-decoration: none;color: #000000;font-family: Times, Serif;font-size: 14px;'>" + hr + ":"+padZero(j*15)+ suffix2 + "</a></td>";
      }

      sHTML+="</tr>";
    }
    sHTML += "</table>";
    document.getElementById("timePickerContent").innerHTML = sHTML;
}

// get absolute position of a control. use with overlays, dropdowns, etc.
function getAbsPos(ctl) 
{
    var leftpos=0
    var toppos=0
    var aTag = ctl
    do {
      aTag = aTag.offsetParent;
      leftpos  += aTag.offsetLeft;
      toppos += aTag.offsetTop;
    } while(aTag.tagName!="BODY");
    
    var o= new Object();
    o.left=leftpos
    o.top = toppos;
    return o;
  }    

  
// show time picker. ctl is the timepicker button (image) pressed. ctl2 is the text element to be populated with the time.
function selectTime(ctl,ctl2) 
{
    if (debugging) logger("selectTime:"+ctl2.id);

    textCtl=ctl2;
    
    /* Modification below by MV, 5/2007. If you have multiple time pickers on a page, 
    and click one picker, and then click another one without closing the first, this modification
    ensures that the Button for the first picker reverts to unpressed. In the original script,
    if timePicker buttons were pressed one after the other, they would all show up as pressed. */
    
    if ((imgCtl != null) && (imgCtl != ctl)) {// not the same
        imgCtl.src=imagePath + "timepicker.gif"; // prev button in released state
    }
    imgCtl = ctl;
    imgCtl.src=imagePath + "timepicker2.gif"; // curr button pressed state

    // let the timepicker show a time as close to the current choice as possible, if the time
    // in the textbox is valid.
    if (ctl2.value!="") {
        var res=validateTimePicker2(ctl2.value);
//alert (res);        
        if (res != "")
            refreshTimePicker(0, res);
        else
            refreshTimePicker(0);
    }
    
    aPos = getAbsPos(ctl);
    
    crossobj.left =  ctl.offsetLeft  + aPos.left;
    crossobj.top = ctl.offsetTop +  aPos.top + ctl.offsetHeight +  2 
    crossobj.visibility=(docGeid||ie)? "visible" : "show"
    hideElement( 'SELECT', document.getElementById("timepicker") );
    hideElement( 'APPLET', document.getElementById("timepicker") );
    
    // make the time picker modal.
//    curtain.show();
    
    bShow = true;
  }

// hides <select> and <applet> objects (for IE only)
function hideElement( elmID, overDiv )
{
  if( ie ){
    for( i = 0; i < document.all.tags( elmID ).length; i++ ){
      obj = document.all.tags( elmID )[i];
      if( !obj || !obj.offsetParent ){
          continue;
      }
        // Find the element's offsetTop and offsetLeft relative to the BODY tag.
        objLeft   = obj.offsetLeft;
        objTop    = obj.offsetTop;
        objParent = obj.offsetParent;
        while( objParent.tagName.toUpperCase() != "BODY" )
        {
        objLeft  += objParent.offsetLeft;
        objTop   += objParent.offsetTop;
        objParent = objParent.offsetParent;
        }
        objHeight = obj.offsetHeight;
        objWidth = obj.offsetWidth;
        if(( overDiv.offsetLeft + overDiv.offsetWidth ) <= objLeft );
        else if(( overDiv.offsetTop + overDiv.offsetHeight ) <= objTop );
        else if( overDiv.offsetTop >= ( objTop + objHeight + obj.height ));
        else if( overDiv.offsetLeft >= ( objLeft + objWidth ));
        else
        {
        obj.style.visibility = "hidden";
        }
    }
  }
}
     
  //unhides <select> and <applet> objects (for IE only)
  function showElement( elmID ){
    if( ie ){
      for( i = 0; i < document.all.tags( elmID ).length; i++ ){
        obj = document.all.tags( elmID )[i];
        if( !obj || !obj.offsetParent ){
            continue;
        }
        obj.style.visibility = "";
      }
    }
  }

function closeTimePicker() 
{
  bShow=false;
  crossobj.visibility="hidden"
  showElement( 'SELECT' );
  showElement( 'APPLET' );
  if (imgCtl != null)
  {
    imgCtl.src=imagePath + "timepicker.gif"
  }
  curtain.hide();
}

  document.onkeypress = function(e) {
    var keynum;
    if (window.event) // IE
      keynum=window.event.keyCode;
    else // Netscape/Firefox/Opera
      keynum = e.keyCode; 
      
    if (keynum == 27) 
      if (bShow)
        closeTimePicker();
  }

function isDigit(c) 
{
  return ((c=='0')||(c=='1')||(c=='2')||(c=='3')||(c=='4')||(c=='5')||(c=='6')||(c=='7')||(c=='8')||(c=='9'))
}

function isNumeric(n) 
{
  num = parseInt(n,10);
  return !isNaN(num);
}

function padZero(n) 
{
  if (n<10)
  { 
    return ('0'+n);
  }
  else
  {
    return n;
  }
}

// if the hour is between 9 to 11, assume it is AM. if it is between 12-8, assume it is PM
function amOrPm(hr) 
{
  if (tp_mode==1)
  {
    if ((parseInt(hr,10)>=0) && (parseInt(hr)<=11))
         return "am"
    else
        return "pm"
  }
  else
  if ((parseInt(hr,10)>=9) && (parseInt(hr)<=11))
       return "am"
  else
      return "pm"
}

// validate whether the contents of a textbox represent a valid time.
function validateTimePicker(ctl) 
{
    if (debugging) logger("validateDatePicker");
    var res=validateTimePicker2(ctl.value);
    if (res=="")
        ctl.style.color="#FF0000";
    else
        ctl.style.color="#000000";
    return res;
}

  // validate the time
function validateTimePicker2(t) 
{
    var hr=0;
    var mn=0;
    var mode="am";
    var ret="";
    var b_ret=true;
    
    if (debugging) logger("validateDatePicker2");
    // t=ctl.value.toLowerCase();
    t=t.toLowerCase();
    t=t.replace(" ","");
    t=t.replace(".",":");
    t=t.replace("-","");

    if ((isNumeric(t)) && (t.length==4) && (t.indexOf(":") == -1))
    {
      t=t.charAt(0)+t.charAt(1)+":"+t.charAt(2)+t.charAt(3);
    }

    //var t=new String(t);
    tl=t.length;
//alert(t);
    if (tl==1 ) {
      if (isDigit(t)) {
        if (t=="0")
        { 
            //ctl.value="12:00 am";
            hr = 12;
            mn  = 0;
            mode = "am";
        }
        else
            // ctl.value=t+":00" +amOrPm(t);
            hr = t;
            mn  = 0;
            mode = amOrPm(t);
      }
    }
    else if (tl==2) {
      if (isNumeric(t)) {
        if (parseInt(t,10)<13){
          if (t.charAt(1)!=":") {
            //ctl.value= t + ':00' + amOrPm(t);
            hr = t;
            mn  = 0;
            mode = amOrPm(t);
          }
          else {
            if (t.charAt(0)=="0")
            {
                //ctl.value="12:00 am";
                hr = 12;
                mn  = 0;
                mode = "am";
            }                
            else
            {
                // ctl.value= t + '00' + amOrPm(t);
                hr = t;
                mn  = 0;
                mode = amOrPm(t);
            }                
          }
        }
        else if (parseInt(t,10)==24) {
          //ctl.value= "12:00 am";
          hr = 12;
          mn  = 0;
          mode = "am";
        }
        else if (parseInt(t,10)<24) {
          if (t.charAt(1)!=":") {
            //ctl.value= (t-12) + ':00 pm';
            hr = t-12;
            mn  = 0;
            mode = "pm";
          } 
          else {
            //ctl.value= (t-12) + '00 pm';
            hr = t-12;
            mn  = 0;
            mode = "pm";
          }
        }
        else if (parseInt(t,10)<=60) {
          //ctl.value= '0:'+padZero(t)+' am';
          hr = 0;
          mn  = padZero(t);
          mode = "am";
        }
        else {
          // ctl.value= '1:'+padZero(t%60)+' am';
          hr = 1;
          mn  = padZero(t%60);
          mode = "am";
        }
      }
      else
           {
        if ((t.charAt(0)==":")&&(isDigit(t.charAt(1)))) {
          //ctl.value = "0:" + padZero(parseInt(t.charAt(1),10)) + " am";
          hr = 0;
          mn  = padZero(parseInt(t.charAt(1),10));
          mode = "am";
        }
      }
    }
    else if (tl>=3)
    {
        // 3-digit time modification by MV, 5/2007
        if ((tl==3) && (!isNumeric(t)))
        {
          //return false;
          b_ret = false;
        }
        else
        if ((tl==3) && (isNumeric(t))) {
            // time is in format, say 330, for 330 am or pm
            var tHour=t.charAt(0);
            var tMin=t.charAt(1)+t.charAt(2);
            hr=parseInt(tHour,10);
            mn=parseInt(tMin,10);
            if (isNaN(mn)) mn=0; // e.g. if "7qq" is entered, this becomes 7:00pm
            if ((mn<0) || (mn>59))
            {
                //return false;
                b_ret = false;
            }
            else
            if (hr==0) {
                hr=12;
                mode="am";
            } else
                mode=amOrPm(tHour);            
            //ctl.value=hr+":"+padZero(mn)+" "+mode;
            //return true;
        }
        else
        {
          // now tl>3
          var arr = t.split(":");
          if (t.indexOf(":") > 0)
          {
            hr=parseInt(arr[0],10);
            mn=parseInt(arr[1],10);
    
            if (t.indexOf("pm")>0)
              mode="pm";
            else if (t.indexOf("am")>0)
              mode="am";
            else
              mode=amOrPm(hr);
    
            if (isNaN(hr)) 
            {
              //return false;
              b_ret = false;
            } 
            else 
            {
              if (hr>24) 
              {
                //return false;
                b_ret = false;
              }
              else if (hr==24) 
              {
                mode="am";
                hr=0;
              }
              else if (hr>12) 
              {
                mode="pm";
                hr-=12;
              }
            }

            if (b_ret == true)
            {          
              if (isNaN(mn)) 
              {
                mn=0;
              }
              else 
              {
                if (mn>60) 
                {
                  mn=mn%60;
                  hr+=1;
                }
              }
            }
          } 
          else 
          {
            hr=parseInt(arr[0],10);
    
            if (isNaN(hr)) 
            {
              // return false;
              b_ret = false;
              // hr=0;
            } 
            else 
            {
              if (hr>24) 
              {
                //return false;
                b_ret = false;
              }
              else if (hr==24) 
              {
                mode="am";
                hr=0;
              }
              else if (hr>12) 
              {
                mode="pm";
                hr-=12;
              }
            }
            mn = 0;
          }
      }
      
      if (hr==24) 
      {
        hr=0;
        mode="am";
      }
      //ctl.value=hr+":"+padZero(mn)+" "+mode;
    }
    
    if (b_ret == false)
    {
      ret = "";
    }
    else
    if (tp_mode==1)
    {
      //switch to 24h format
      if (mode=="pm")
      {
        if (hr!=12)
        {
          hr+=12;
        }
      }
      else
      {
        if (hr==12)
        {
          hr=0;
        }
      }
      ret=hr+":"+padZero(mn);
    }
    else
    {
      ret=hr+":"+padZero(mn)+" "+mode;
    }
//alert (ret);
    return ret;
  }

/**********************************************************************************************
  Curtain object & methods. Throw a translucent curtain on screen objects.
 **********************************************************************************************/

  var Curtain = function(id){
    document.write("<div id='"+id+"' style='z-index:8;visibility:hidden;background: #333; opacity: 0.10; position: absolute; top:0; left:0; width: 100%; height: 100%;'>&nbsp;</div>");
    this.id=id;
  };
  
  Curtain.prototype.show = function () {
    this._scrn().style.visibility="visible";
    this._autoResize();
  }

  Curtain.prototype.hide = function() {
    this._scrn().style.visibility="hidden";
  }
  
  // Modal overlay screen element
  Curtain.prototype._scrn = function() {
      return document.getElementById(this.id);
/*      var ie=document.all;
      return (document.getElementById)?
        document.getElementById(this.id) : 
        ie? document.all.screener : document.screener;
*/        
  }
 

// set gray overlay screener size to document size, including scrollbars
Curtain.prototype._autoResize = function() {
  // try to set to 0, so that the overlay does not influence the document size. this may or may not work...
  // seems to work in firefox, but the height does not readjust in IE6.
  this._scrn().style.width=0;
  this._scrn().style.height=0;
  if (ie) {
      this._scrn().style.width=document.body.scrollWidth;
      this._scrn().style.height=document.body.scrollHeight;
  } else {
      this._scrn().style.width=document.body.scrollWidth;
      this._scrn().style.height=document.documentElement.scrollHeight;
  }
}

// capture window onresize, so that curtain can be resized. 
window.onresize = function() { curtain._autoResize(); }

curtain = new Curtain();
 
/**********************************************************************************************/

if (docGeid)
{
  document.write ("<div id='timepicker' style='z-index:9;position:absolute;visibility:hidden;'><table style='border-width:3px;border-style:solid;border-color:"+tb_color_border+"' bgcolor='#ffffff' cellpadding=0><tr bgcolor='#0033AA'><td><table cellpadding=0 cellspacing=0 width='100%' background='" + imagePath + "titleback.jpg'><tr valign=bottom height=21><td style='font-family:verdana;font-size:11px;color:#ffffff;padding:3px' valign=center><B>&nbsp;Select&nbsp;Time </B></td><td><img id='iconAM' src='" + imagePath + "am1.gif' onclick='document.getElementById(\"iconAM\").src=\"" + imagePath + "am1.gif\";document.getElementById(\"iconPM\").src=\"" + imagePath + "pm2.gif\";refreshTimePicker(0)' ></td><td><img id='iconPM' src='" + imagePath + "pm2.gif' onclick='document.getElementById(\"iconAM\").src=\"" + imagePath + "am2.gif\";document.getElementById(\"iconPM\").src=\"" + imagePath + "pm1.gif\";refreshTimePicker(1)'></td><td align=right valign=center>&nbsp;<img onclick='closeTimePicker()' src='" + imagePath + "close.gif'>&nbsp;</td></tr></table></td></tr><tr><td colspan=2><span id='timePickerContent'></span></td></tr></table></div>");
  refreshTimePicker(0);
}
var crossobj=(docGeid)?document.getElementById("timepicker").style : ie? document.all.timepicker : document.timepicker;