// ------------------------------------------------------------------------------------------------

var mShort = ['янв', 'фев', 'мар', 'апр', 'мая', 'июн', 'июл', 'авг', 'сен', 'окт', 'ноя', 'дек'];
var mLong = ['Январь', 'Февраль', 'Март', 'Апрель', 'Май', 'Июнь', 'Июль', 'Август', 'Сентябрь', 'Октябрь', 'Ноябрь', 'Декабрь'];
var wShort = ['Пн', 'Вт', 'Ср', 'Чт', 'Пт', 'Сб', 'Вс'];

var currentId = -1;

// ------------------------------------------------------------------------------------------------

/*
    id-шники:

    calDiv - div, в котором отображается календарь

    calObj4462 - object
    calInput4462 - input
    calButton4462 - button
*/

// clite.calendar()
function clite(string,href)
{
    this.date = string2date(string);
    if(typeof(href)=='undefined') {
	href = {};
    }
    this.param = href;
    if (!this.date)
    {
        this.date = new Date();
        this.empty = true;
        // если empty = true, то поле с датой пустое и ничего не сабмитится
    }

    this.fields = new Object;
    this.rnd = Math.floor(Math.random() * 1000000);
    window['calObj' + this.rnd] = this;

    // methods
    this.toString = date2string;
    this.addField = addField;
    this.format = format;
    this.write = write;
    this.update = update;
    this.html = html;
    this.update_date = update_date;
    this.setPrevCal = set_prev_cal;
    this.setNextCal = set_next_cal;


    var div = document.getElementById('calDiv');
    if (!div)
    {
        var div = document.createElement('div');
        div.id = 'calDiv';
        div.className = 'calendar-div';
        var body = document.body
        body.insertBefore(div, body.firstChild);

        addEvent(div, 'click', calClick);
    }

    this.div = div;
}

// ------------------------------------------------------------------------------------------------

// clite.write()
function write()
{
    var fields = this.fields;
    document.write('<input class="calendar-input"  size="15" id="calInput' + this.rnd + '" value="' + this.toString() + '" readonly="yes">&nbsp;');
    document.write('<input class="calendar-button" id="calButton' + this.rnd + '" type="button" value=" " onclick="showCalendar(this, ' + this.rnd + ')">');
    for (field in fields)
    {
        document.write('<input name="' + field + '" id="' + field + '" type="hidden" value="' + this.format(fields[field]) + '">');
    }
    this.update();

    var button = document.getElementById('calButton' + this.rnd);
    addEvent(button, 'click', calClick);
}

function update_date(string)
{
    this.date = string2date(string);
    if (!this.date)
    {
        this.date = new Date();
        this.empty = true;
        // если empty = true, то поле с датой пустое и ничего не сабмитится
    }
    this.update();
}

// clite.update()
function update()
{
    this.div.innerHTML = this.html();
    var fields = this.fields;
    var myvar;
    for (field in fields)
    {
        myvar = this.format(fields[field]);
        document.getElementById(field).value = myvar;
    }
    document.getElementById('calInput' + this.rnd).value = this.toString();
}

// clite.toString()
function date2string()
{
    if (this.empty) {
        return '';
    }

    var date = this.date;
    return  zeroFill(date.getDate()) + ' ' + mLong[date.getMonth()] + ' ' + date.getFullYear();
}

// clite.addField()
function addField(name, format)
{
    this.fields[name] = format;
}

//clite.format()
function format(f)
{
    if (this.empty) {
        return '';
    }

    var fY = this.date.getFullYear()
    f = f.replace(/%Y/g, fY);
    f = f.replace(/%M/g, zeroFill(this.date.getMonth() + 1));
    f = f.replace(/%D/g, zeroFill(this.date.getDate()));
    f = f.replace(/%y/g, zeroFill(fY % 100))
    return f;
}

// ------------------------------------------------------------------------------------------------

function repos(o)
{
    var style = document.getElementById('calDiv').style;
    var pos = getPosition(o);

    style.left = pos.x;
    style.top = pos.y;
}

function show()
{
    var cal = document.getElementById('calDiv');
    if (cal)
    {
        //		hide_selects('show');
        cal.style.visibility = 'visible';
    }
}

function hide()
{
    var cal = document.getElementById('calDiv');
    if (cal)
    {
        cal.style.visibility = 'hidden';
        //		hide_selects('hide');
        closeCalendarTimeOut = 0;
    }
}

function visible()
{
    var cal = document.getElementById('calDiv');
    if (cal) {
        return (cal.style.visibility == 'visible');
    }
    return false;
}

function string2date(string)
{
    var re = /(\d+)-(\d+)-(\d+)/;
    var date = re.exec(string);
    if (date) {
        return new Date(date[1], date[2] - 1, date[3]);
    }
}

function zeroFill(value)
{
    return (value < 10 ? '0' : '') + value;
}

function hide_selects(mode)
{
    var selects = document.getElementsByTagName('select');
    for (var i = 0; i < selects.length; i++)
    {
        selects[i].style.visibility = (mode == 'show') ? 'hidden' : 'visible';
    }
}

// ------------------------------------------------------------------------------------------------

function showCalendar(o, id)
{
    repos(o);

    var cal = window['calObj' + id];
    cal.update();
    cal.oldDate = cal.date;

    if (id == currentId && visible())
    {
        currentId = -1;
        hide();
    }
    else {
        currentId = id;
        show();
    }
}

function calSetDate(id, i)
{
    var cal = window['calObj' + id];
    cal.date.setDate(i);
    hide();
    cal.empty = false;
    cal.update();
}

function calSetMonth(id, i)
{
    var cal = window['calObj' + id];
    cal.date.setMonth(i + cal.date.getMonth());
    cal.update();
}

function calSetYear(id, i)
{
    var cal = window['calObj' + id];
    cal.date.setYear(i + cal.date.getFullYear());
    cal.update();
}

function calSetToday(id)
{
    var cal = window['calObj' + id];
    cal.date = new Date();
    hide();
    cal.empty = false;
    cal.update();
}

function calClear(id)
{
    var cal = window['calObj' + id];
    cal.date = new Date();
    hide();
    cal.empty = true;
    cal.update();
}

function calDayOver(o)
{
    o.oldClassName = o.className;
    o.className = o.className + ' over';
}

function calDayOut(o)
{
    o.className = o.oldClassName;
}

// ------------------------------------------------------------------------------------------------

function getPosition(o)
{
    var x = o.offsetLeft;
    var y = o.offsetTop + o.offsetHeight;
    // + 1
    while (o.offsetParent != null)
    {
        o = o.offsetParent;
        x += o.offsetLeft;
        y += o.offsetTop;
    }
    var pos = new Object();
    pos.x = x;
    pos.y = y;
    return pos;
}

// ------------------------------------------------------------------------------------------------

function set_prev_cal(tcal){
    this.prevCal = tcal;
}
// ------------------------------------------------------------------------------------------------
function set_next_cal(tcal){
    this.nextCal = tcal;
}

// ------------------------------------------------------------------------------------------------

function calMonthOver(id){
    for(var i = 1; i < 32; i++)
    {
        var did = 'cal_' + id + '_date_' + i + '_div';
        var d = document.getElementById(did);
        if(d){
            d.oldClassName = d.className;
            d.className = d.className + ' over';
        }  else {
            break;
        }
    }
}
function calMonthOut(id){
    for(var i = 1; i < 32; i++)
    {
        var did = 'cal_' + id + '_date_' + i + '_div';
        var d = document.getElementById(did);
        if(d){
            d.className = d.oldClassName;
        }  else {
            break;
        }
    }
}

// ------------------------------------------------------------------------------------------------

function calSelectMonth(id, mnth){
    var cal = window['calObj' + id];

    if(cal.nextCal){
        calSetDate(id, 1);
        cal.nextCal.date = new Date(cal.date);
        cal.nextCal.date.setMonth(cal.nextCal.date.getMonth() + 1);
        cal.nextCal.date.setDate(0);
        cal.nextCal.update();
    } else if(cal.prevCal){
        calSetDate(id, 1);
        cal.prevCal.date = new Date(cal.date);
        cal.prevCal.update();
        cal.date.setMonth(cal.date.getMonth() + 1);
        cal.date.setDate(0);
        cal.update();
    }
}

// ------------------------------------------------------------------------------------------------
function calSetWeek(id, i){
    var cal = window['calObj' + id];
    if(cal.nextCal){
        calSetDate(id, i);
        cal.nextCal.date = new Date(cal.date);
        cal.nextCal.date.setDate(cal.date.getDate() + 6);
        cal.nextCal.update();
    } else if(cal.prevCal){
        calSetDate(id, i + 6);
        cal.prevCal.date = new Date(cal.date);
        cal.prevCal.date.setDate(cal.date.getDate() - 6);
        cal.prevCal.update();
    }
}

// ------------------------------------------------------------------------------------------------

// clite.html()
function html()
{
    var r = '<table cellpadding="0" cellspacing="0" class="calendar">';

    r += '<tr class="set-year">';
    var extSet = (this.prevCal || this.nextCal);

    if(extSet){
        r += '<td class="empty">&nbsp;</td>';
    }
    r += '<td class="prev" onclick="calSetYear(' + this.rnd + ', -1)">&laquo;</td>';
    r += '<td class="current" colspan="5">' + this.date.getFullYear() + '</td>';
    r += '<td class="next" onclick="calSetYear(' + this.rnd + ', 1)">&raquo;</td>';

    r += '<tr class="set-month">';
    if(extSet){
        r += '<td class="empty">&nbsp;</td>';
    }
    r += '<td class="prev" onclick="calSetMonth(' + this.rnd + ', -1)">&laquo;</td>';

    if(extSet){
        r += '<td class="current" colspan="5"><div style="cursor: pointer;" onmouseover="calMonthOver(' + this.rnd + ');" onmouseout="calMonthOut(' + this.rnd + ');" onclick="calSelectMonth(' + this.rnd + ', ' + this.date.getMonth() + ')"><img src="/i/monthselect.gif">&nbsp;' + mLong[this.date.getMonth()] + '</div></td>';
    }else{
        r += '<td class="current" colspan="5">' + mLong[this.date.getMonth()] + '</td>';
    }

    r += '<td class="next" onclick="calSetMonth(' + this.rnd + ', 1)">&raquo;</td>';

    r += '<tr class="dates-head">';
    if(extSet){
        r += '<td class="empty">&nbsp;</td>';
    }
    for (i = 0; i < wShort.length; i++)
    {
        r += '<th class="date">' + wShort[i] + '</th>';
    }

    var m = new Date(this.date);
    m.currentMonth = m.getMonth();
    // m.currentDate = (this.empty) ? -1 : m.getDate();
    m.currentDate = m.getDate();

    var now = new Date();

    var n = 1;

    m.setDate(1);
    var w = m.getDay();
    w = (w == 0) ? 7 : w;
    var trCounter = 1;
    if (w > 1)
    {
        r += '<tr class="dates" id="calTr' + trCounter + '">';
        if(extSet){
            r += '<td onclick="calSetWeek(' + this.rnd + ', ' + ((w-2)/-1) + ')" class="date" onmouseover="calDayOver(document.getElementById(\'calTr' + trCounter + '\'))" onmouseout="calDayOut(document.getElementById(\'calTr' + trCounter + '\'))"><img src="/i/weekselect2.gif"></td>';
        }
        trCounter++;
        for (i = 1; i < w; i++)
        {
            r += '<td class="empty">&nbsp;</td>';
            n++;
        }
    }

    for (i = 1; i <= 31; i++)
    {
        m.setDate(i);
        if (m.getMonth() != m.currentMonth) {
            break;
        }

        if (n % 7 == 1) {
            r += '<tr class="dates" id="calTr' + trCounter + '">';
            if(extSet){
                r += '<td onclick="calSetWeek(' + this.rnd + ', ' + i + '); javascript:dayscalc()" class="date" onmouseover="calDayOver(document.getElementById(\'calTr' + trCounter + '\'))" onmouseout="calDayOut(document.getElementById(\'calTr' + trCounter + '\'))"><img src="/i/weekselect2.gif"></td>'; //!!!!!!!!!
            }
            trCounter++;
        }

        var className = (i == m.currentDate)? "current": "date";
        if(extSet){
            r += ('<td class="' + className + '" id="cal_' + this.rnd + '_date_' + i + '_div" onclick="calSetDate(' + this.rnd + ', ' + i + '); javascript:dayscalc()" onmouseover="calDayOver(this)" onmouseout="calDayOut(this)">' + i + '</td>');
        } else {
            r += ('<td class="' + className + '" onclick="calSetDate(' + this.rnd + ', ' + i + '); javascript:dayscalc()" onmouseover="calDayOver(this)" onmouseout="calDayOut(this)">' + i + '</td>');
        }

        n++;
    }

    if (n % 7 > 1)
    {
        for (i = 0; i <= 7 - n % 7; i++)
        {
            r += '<td class="empty">&nbsp;</td>';
        }
    }


    if (this.param) {
    r += '<tr class="set-month">';
    if(extSet){
        r += '<td class="empty">&nbsp;</td>';
    }
    r += '<td class="clear current" colspan="2">&nbsp;</td>  <td class="set-today" colspan="3" onclick="calSetToday(' + this.rnd + ')">Сегодня</a></td><td class="clear current" colspan="2">&nbsp;</td>';
    }
    r += '</tr>';
    r += '</table>';

    return r;
}

// ------------------------------------------------------------------------------------------------

function addEvent(element, event, func)
{
    if (element.addEventListener)
    {
        element.addEventListener(event, func, false);
    }
    else if (element.attachEvent)
    {
        element.attachEvent('on' + event, func);
    } else {
        //
    }
}

function calClick(e)
{
    var event = (e) ? e : window.event;
    event.cancelBubble = true;
}

addEvent(window, 'resize', hide);
addEvent(document, 'click', hide);