/* --- Swazz Javascript Calendar ---
/* --- v 1.0 3rd November 2006
By Oliver Bryant
http://calendar.swazz.org

Update:
Gene Bechtold
http://www.bechtold.biz
25/03/2010
 */

function getObj(objID)
{
    if (document.getElementById) {
        return document.getElementById(objID);
    }
    else if (document.all) {
        return document.all[objID];
    }
    else if (document.layers) {
        return document.layers[objID];
    }
}

function checkClick(e) {
    e?evt=e:evt=event;
    CSE=evt.target?evt.target:evt.srcElement;
    if (CSE.tagName!='SPAN')
        if (getObj('fc'))
            if (!isChild(CSE,getObj('fc')))
                getObj('fc').style.display='none';
}

function isChild(s,d) {
    while(s) {
        if (s==d)
            return true;
        s=s.parentNode;
    }
    return false;
}

function Left(obj)
{
    var curleft = 0;
    if (obj.offsetParent)
    {
        while (obj.offsetParent)
        {
            curleft += obj.offsetLeft
            obj = obj.offsetParent;
        }
    }
    else if (obj.x)
        curleft += obj.x;
    return curleft;
}

function Top(obj)
{
    var curtop = 0;
    if (obj.offsetParent)
    {
        while (obj.offsetParent)
        {
            curtop += obj.offsetTop
            obj = obj.offsetParent;
        }
    }
    else if (obj.y)
        curtop += obj.y;
    return curtop;
}

// Calendar script
var now = new Date;
var sccd=now.getDate();
var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccm=now.getMonth();
var ccy=now.getFullYear();

// For current selected date
var selectedd, selectedm, selectedy;

document.write('<table id="fc" style="position:absolute;display:none;-moz-user-select:none;-khtml-user-select:none;user-select:none;" cellpadding="2">');
document.write('<tr class="fc-navigate-tr" onselectstart="return false">\n\
    <td class="fc-navigate-tr-td-left" onclick="upmonth(-12)">&lt;&lt;</td>\n\
    <td class="fc-navigate-tr-td-left" onclick="upmonth(-1)">&lt;</td>\n\
    <td class="fc-navigate-tr-td-center" colspan="3" id="mns"></td>\n\
    <td class="fc-navigate-tr-td-right" onclick="upmonth(1)">&gt;</td>\n\
    <td class="fc-navigate-tr-td-right" onclick="upmonth(12)">&gt;&gt;</td>\n\
</tr>');
document.write('<tr class="fc-dayweek-tr">\n\
    <td>П</td><td>В</td>\n\
    <td>С</td><td>Ч</td>\n\
    <td>П</td><td class="fc-dayweek-tr-td-weekend">С</td>\n\
    <td class="fc-dayweek-tr-td-weekend">В</td>\n\
</tr>');
for(var kk=1;kk<=6;kk++) {
    document.write('<tr class="fc-dayarea-tr">');
    for(var tt=1;tt<=7;tt++) {
        num=7 * (kk-1) - (-tt);
        document.write('<td id="v' + num + '">&nbsp;</td>');
    }
    document.write('</tr>');
}
document.write('<tr class="fc-today-tr">\n\
    <td class="fc-today-tr-td" colspan="7" align="center" onclick="today()">Сегодня: '+addnull(sccd,sccm+1,sccy)+'</td>\n\
</tr>');
document.write('</table>');

document.all?document.attachEvent('onclick',checkClick):document.addEventListener('click',checkClick,false);




var updobj;
function lcs(ielem, callback) {
    ielem = byId(ielem);
    updobj=ielem;
    getObj('fc').style.left=Left(ielem)+'px';
    getObj('fc').style.top=Top(ielem)+ielem.offsetHeight+'px';
    getObj('fc').style.display='';

    // First check date is valid
    curdt=ielem.value;
    curdtarr=curdt.split('-');
    isdt=true;
    for(var k=0;k<curdtarr.length;k++) {
        if (isNaN(curdtarr[k]))
            isdt=false;
    }
    if (isdt&(curdtarr.length==3)) {
        ccm=curdtarr[1]-1;
        ccy=curdtarr[2];

        selectedd=parseInt ( curdtarr[0], 10 );
        selectedm=parseInt ( curdtarr[1]-1, 10 );
        selectedy=parseInt ( curdtarr[2], 10 );

        prepcalendar(curdtarr[0],curdtarr[1]-1,curdtarr[2]);
    }
    if (callback !== undefined)
        window['lcsCallback'] = callback;
}

function evtTgt(e)
{
    var el;
    if(e.target)el=e.target;
    else if(e.srcElement)el=e.srcElement;
    if(el.nodeType==3)el=el.parentNode; // defeat Safari bug
    return el;
}
function EvtObj(e){
    if(!e)e=window.event;
    return e;
}
function cs_over(e) {
    evtTgt(EvtObj(e)).className='fc-day-td-hover';
//evtTgt(EvtObj(e)).style.background='#FFEBCC';
//getObj('v'+parseInt(d));
}
function cs_out(e) {
    evtTgt(EvtObj(e)).className='fc-day-td';
//evtTgt(EvtObj(e)).style.background='#FFFFFF';
}
function cs_click(e) {
    updobj.value=calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
    getObj('fc').style.display='none';
    if (window.lcsCallback !== undefined)
        window.lcsCallback();
}

var mn=new Array('Январь','Февраль','Март','Апрель','Май','Июнь','Июль','Август','Сентрябрь','Октябрь','Ноябрь','Декабрь');
var mnn=new Array('31','28','31','30','31','30','31','31','30','31','30','31');
var mnl=new Array('31','29','31','30','31','30','31','31','30','31','30','31');
var calvalarr=new Array(42);

function f_cps(obj) {
    obj.className ='fc-day-td';
}

function f_cpps(obj) {
    obj.className ='fc-day-td';
}

function f_hds(obj) {
//obj.style.color='#0000FF';
}

// day selected
function prepcalendar(hd,cm,cy) {
    var num = 0;
    now=new Date();
    sd=now.getDate();
    td=new Date();
    td.setDate(1);
    td.setFullYear(cy);
    td.setMonth(cm);
    cd=td.getDay();
    if (cd==0)cd=6; else cd--;
    getObj('mns').innerHTML=mn[cm]+'&nbsp;'+cy;
    marr=((cy%4)==0)?mnl:mnn;
    for(var d=1;d<=42;d++) {
        f_cps(getObj('v'+parseInt(d)));
        if ((d >= (cd -(-1)))&&(d<=cd-(-marr[cm]))) {
            dip=((d-cd < sd)&&(cm==sccm)&&(cy==sccy));
            htd=((hd!='')&&(d-cd==hd));

            getObj('v'+parseInt(d)).onmouseover=cs_over;
            getObj('v'+parseInt(d)).onmouseout=cs_out;
            getObj('v'+parseInt(d)).onclick=cs_click;

            // if today
            if (sccm == cm && sccd == (d-cd) && sccy == cy)
                getObj('v'+parseInt(d)).style.fontWeight=''; // Внимание! Плюшка!!! Должна выделять сегодняшний день. Но работает не корректно... к сожалению...

            // if selected date
            if (cm == selectedm && cy == selectedy && selectedd == (d-cd) )
            {
                getObj('v'+parseInt(d)).style.background='#FFEBCC';
                getObj('v'+parseInt(d)).onmouseout=null;
            }
            
            num = (d-cd)+'';
            num = num.length == 2 ? num : '0'+num;
            
            getObj('v'+parseInt(d)).innerHTML=num;

            calvalarr[d]=addnull(d-cd,cm-(-1),cy);
        }
        else {
            getObj('v'+d).innerHTML='&nbsp;';
            getObj('v'+parseInt(d)).onmouseover=null;
            getObj('v'+parseInt(d)).onmouseout=null;
            getObj('v'+parseInt(d)).onclick=null;
            getObj('v'+parseInt(d)).style.cursor='default';
        }
    }
}

prepcalendar('',ccm,ccy);

function upmonth(s)
{
    marr=((ccy%4)==0)?mnl:mnn;

    ccm+=s;
    if (ccm>=12)
    {
        ccm-=12;
        ccy++;
    }
    else if(ccm<0)
    {
        ccm+=12;
        ccy--;
    }
    prepcalendar('',ccm,ccy);
}

function today() {
    updobj.value=addnull(now.getDate(),now.getMonth()+1,now.getFullYear());
    getObj('fc').style.display='none';
    prepcalendar('',sccm,sccy);
    if (window.lcsCallback !== undefined)
        window.lcsCallback();
}

function addnull(d,m,y)
{
    var d0='',m0='';
    if (d<10)d0='0';
    if (m<10)m0='0';

    return ''+d0+d+'/'+m0+m+'/'+y;
}