/**
 * 返回日期
 * @param d the delimiter
 * @param p the pattern of your date
 */
String.prototype.toDate = function(x, p) {
	if(x == null) x = "-";
	if(p == null) p = "ymd";
	var a = this.split(x);
	var y = parseInt(a[p.indexOf("y")]);
	if(y.toString().length <= 2) y += 2000;
	if(isNaN(y)) y = new Date().getFullYear();
	var m = parseFloat(a[p.indexOf("m")]) - 1;
	var d = parseFloat(a[p.indexOf("d")]);
	if(isNaN(d)) d = 1;
	return new Date(y, m, d);
}

/**
 * 格式化日期
 * @param   d the delimiter
 * @param   p the pattern of your date
 * @author  meizz
 */
Date.prototype.format = function(style) {
  var o = {
    "M+" : this.getMonth() + 1, //month
    "d+" : this.getDate(),      //day
    "h+" : this.getHours(),     //hour
    "m+" : this.getMinutes(),   //minute
    "s+" : this.getSeconds(),   //second
    "w+" : "天一二三四五六".charAt(this.getDay()),   //week
    "q+" : Math.floor((this.getMonth() + 3) / 3),  //quarter
    "S"  : this.getMilliseconds() //millisecond
  }
	if(/(y+)/.test(style)) {
		style = style.replace(RegExp.$1,
		(this.getFullYear() + "").substr(4 - RegExp.$1.length));
	}
	for(var k in o){
		if(new RegExp("("+ k +")").test(style)){
		  style = style.replace(RegExp.$1,
		    RegExp.$1.length == 1 ? o[k] :
		    ("00" + o[k]).substr(("" + o[k]).length));
		}
	}
	return style;
};


/**
 * 日历类
 * @param   beginYear 1990
 * @param   endYear   2010
 * @param   lang      0(中文)|1(英语) 可自由扩充
 * @param   calendarForm
 * @param   calendarForm_sec 
 * @param   calendarArray 
 * @param   dateFormatStyle  "yyyy-MM-dd";
 * @version 2006-04-01
 * @author  KimSoft (jinqinghua [at] gmail.com)
 * @update
 */
function Calendar(beginYear, endYear, lang, calendarForm, calendarForm_sec, calendarArray, calendarPanel, opFlag, ajaxUrl, func,dateFormatStyle) {
	this.beginYear = 1990;
	this.endYear = 2010;
	this.lang = 0;            //0(中文) | 1(英文)
	this.dateFormatStyle = "yyyy-MM-dd";
	
	if (beginYear != null && endYear != null){
		this.beginYear = beginYear;
		this.endYear = endYear;
	}
	if (lang != null){
		this.lang = lang
	}
	
	if (dateFormatStyle != null){
		this.dateFormatStyle = dateFormatStyle
	}
	
	this.dateControl = null;
	this.panel = this.getElementById(calendarPanel);
	this.form  = null;
	
	this.date = new Date();
	this.year = this.date.getFullYear();
	this.month = this.date.getMonth();
	
	this.calendarForm = calendarForm;
	this.calendarArray = calendarArray;
	this.calendarForm_sec = calendarForm_sec;
	this.opFlag = opFlag;
	this.ajaxUrl = ajaxUrl;
	this.hr = func;

	this.colors = {
	"cur_word"      : "#1EAFCE",  //当日日期文字颜色
	"cur_bg"        : "white",  //当日日期单元格背影色
	"sun_word"      : "#999",  //星期天文字颜色
	"sat_word"      : "#999",  //星期六文字颜色
	"td_word_light" : "#999",  //单元格文字颜色
	"td_word_dark"  : "black",  //单元格文字暗色
	"td_bg_out"     : "white",  //单元格背影色
	"td_bg_over"    : "#F2F8F9",  //单元格背影色
	"tr_word"       : "#1EAFCE",  //日历头文字颜色
	"tr_bg"         : "#E3F7FB",  //日历头背影色
	"input_border"  : "#eee",  //input控件的边框颜色
	"input_bg"      : "white",   //input控件的背影色
	"td_a"		  : "#0066CC"		//	
	}
	this.draw();
}

/**
 * 日历类属性（语言包，可自由扩展）
 */
Calendar.language = {
  "year"   : [[""], [""]],
  "years"  : [["年"], ["YEAR"]],	
  "months" : [["一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月"],
        ["JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC"]
         ],
  "weeks"  : [["日","一","二","三","四","五","六"],
        ["SUN","MON","TUR","WED","THU","FRI","SAT"]
         ],
  "clear"  : [["清空"], ["CLS"]],
  "today"  : [["今天"], ["TODAY"]],
  "close"  : [["关闭"], ["CLOSE"]]
}



Calendar.prototype.draw = function() {
	calendar = this;
	var mvAry = [];
	mvAry[mvAry.length]  = '  <form name="calendarForm" style="margin: 0px;">';
	mvAry[mvAry.length]  = '    <table width="100%" border="0px" cellpadding="0" cellspacing="1">';
	mvAry[mvAry.length]  = '      <tr>';
	mvAry[mvAry.length]  = '        <th style="text-align:right" width="4%"><img src="/commimage/jobcn/v95/t_04.gif" title="往前一年" name="prevYear"  id="prevYear" title="往前一年" style="cursor: pointer;"/></th>';  
	mvAry[mvAry.length]  = '		  <th style="text-align:center" width="26%"><label name="calendarYear" id="calendarYear"  style="font-size:12px;border: 0px solid;"/> </label>';
	mvAry[mvAry.length]  = '        <th style="text-align:left" width="4px"><img src="/commimage/jobcn/v95/t_01.gif" title="往后一年" name="nextYear"  id="nextYear" title="往后一年" style="cursor: pointer;"/></th>';
	mvAry[mvAry.length]  = '        <th width="36%"></th>';
	mvAry[mvAry.length]  = '        <th style="text-align:right"  width="2%"><img src="/commimage/jobcn/v95/t_02.gif" title="往前一月" name="prevMonth"  id="prevMonth" title="往前一月" style="cursor: pointer;"/></th>';
	mvAry[mvAry.length]  = '		  <th style="text-align:center" width="26%"><label name="calendarMonth" id="calendarMonth" style="font-size:12px;border: 0px solid;"/></label>';
	mvAry[mvAry.length]  = '        <th style="text-align:left" width="2%"><img src="/commimage/jobcn/v95/t_03.gif" title="往后一月" name="nextMonth"  id="nextMonth" title="往后一月" style="cursor: pointer;"/></th>';
	mvAry[mvAry.length]  = '      </tr>';
	mvAry[mvAry.length]  = '    </table>';
	mvAry[mvAry.length]  = '    <table id="calendarTable" width="100%" border="0px" style="border:0px solid #CCCCCC" border="0" cellpadding="3" cellspacing="1">';
	mvAry[mvAry.length]  = '			<tbody id="calendarTableBody">';		  
	mvAry[mvAry.length]  = '      <tr>';
	for(var i = 0; i < 7; i++) {
		mvAry[mvAry.length]  = '      <th style="text-align:center;font-weight:normal;background-color:' + calendar.colors["tr_bg"] + ';color:' + calendar.colors["tr_word"] + ';">' + Calendar.language["weeks"][this.lang][i] + '</th>';
	}
	mvAry[mvAry.length]  = '      </tr>';
	for(var i = 0; i < 6;i++){
		mvAry[mvAry.length]  = '    <tr align="center">';
		for(var j = 0; j < 7; j++) {		
			if (j == 0){
			mvAry[mvAry.length]  = '  <td style="text-align:center;height:16px;line-height:100%;cursor:default;color:' + calendar.colors["sun_word"] + ';"></td>';
			} else if(j == 6) {
			mvAry[mvAry.length]  = '  <td style="text-align:center;height:16px;line-height:100%;cursor:default;color:' + calendar.colors["sat_word"] + ';"></td>';
			} else {
			mvAry[mvAry.length]  = '  <td style="text-align:center;height:16px;line-height:100%;cursor:default;"></td>';
			}
		}
		mvAry[mvAry.length]  = '    </tr>';
		mvAry[mvAry.length]  = '    </tbody>';	
	}
	mvAry[mvAry.length]  = '    </table>';
	mvAry[mvAry.length]  = '  </form>';
	this.panel.innerHTML = mvAry.join("");
	this.form = document.forms["calendarForm"];
	this.form.prevMonth.onclick = function () {calendar.goPrevMonth(this);}
	this.form.nextMonth.onclick = function () {calendar.goNextMonth(this);}
	this.form.prevYear.onclick = function () {calendar.goPrevYear(this);}
	this.form.nextYear.onclick = function () {calendar.goNextYear(this);}  
}




var xmlHTTP=null; 
var reqResults = "";
Calendar.prototype.testtest="ldz";
Calendar.prototype.CreateXmlHttp = function(){ 
	try { 
			xmlHTTP=new ActiveXObject("Msxml2.XMLHTTP"); 
		} catch(e) { 
		try { 
			xmlHTTP=new ActiveXObject("Microsoft.XMLHTTP"); 
		} catch(e) { 
			xmlHTTP=null;
		} 
	} 
	if ( !xmlHTTP && typeof(XMLHttpRequest) != "undefined" ){
		xmlHTTP=new XMLHttpRequest();
	} 
} 

Calendar.prototype.doRequestUsingGET =function(URL){
	this.CreateXmlHttp();
	xmlHTTP.open("GET",URL,false);
	if (document.all) {
		xmlHTTP.onreadystatechange = this.handleStateChange;
	}else{
		xmlHTTP.onload=function(){
			reqResults = xmlHTTP.responseText;
		}
	}
	xmlHTTP.setRequestHeader("If-Modified-Since","0");
	xmlHTTP.setRequestHeader("Cache-Control", "no-cache, must-revalidate");
	xmlHTTP.setRequestHeader("Pragma", "no-cache");
	xmlHTTP.send(null);
	return reqResults;
}
	
	
Calendar.prototype.handleStateChange =function(){	
	if (xmlHTTP.readyState == 4)
	{
		if (xmlHTTP.status == 200)
		{
			reqResults =xmlHTTP.responseText;
		}
	}	
}	


Calendar.prototype.getDayArray = function(dt){
    var getHtml = this.doRequestUsingGET(this.ajaxUrl+"="+dt);
    var array = new Array();
    if (getHtml.length > 0){
    	array = getHtml.split(",");
    }
    this.calendarArray = array;
}

//向前一年
Calendar.prototype.goPrevYear = function(e){	
	this.year--;
	this.date = new Date(this.year, this.month, 1);
	this.getDayArray(this.date.format(calendar.dateFormatStyle));
	this.changeSelect();
	this.bindData();
	document.getElementById(this.dateControl.name).value =  this.date.format(calendar.dateFormatStyle);  
}

//向后一年
Calendar.prototype.goNextYear = function(e){
  	this.year++;
    var curDateObj = new Date();
	if (curDateObj.getFullYear() == this.year) {
		if (curDateObj.getMonth() < this.month) {
			this.month = curDateObj.getMonth();
		}
	}
	this.date = new Date(this.year, this.month, 1);
	this.getDayArray(this.date.format(calendar.dateFormatStyle));
	this.changeSelect();
	this.bindData();
	document.getElementById(this.dateControl.name).value =  this.date.format(calendar.dateFormatStyle);
}



//向前一月
Calendar.prototype.goPrevMonth = function(e){	
	if (this.year == this.beginYear && this.month == 0){return;}
	this.month--;
	if (this.month == -1) {
		this.year--;
		this.month = 11;
	}
	this.date = new Date(this.year, this.month, 1);
	this.getDayArray(this.date.format(calendar.dateFormatStyle));
	this.changeSelect();
	this.bindData();
	document.getElementById(this.dateControl.name).value =  this.date.format(calendar.dateFormatStyle);  
}


//向后一月
Calendar.prototype.goNextMonth = function(e){
	if (this.year == this.endYear && this.month == 11){return;}
		this.month++;
	if (this.month == 12) {
		this.year++;
		this.month = 0;
	}
	this.date = new Date(this.year, this.month, 1);
	this.getDayArray(this.date.format(calendar.dateFormatStyle));
	this.changeSelect();
	this.bindData();
	document.getElementById(this.dateControl.name).value =  this.date.format(calendar.dateFormatStyle);
}

//改变SELECT选中状态
Calendar.prototype.changeSelect = function() {
	var cy = document.getElementById("calendarYear");
	var cm = document.getElementById("calendarMonth");
	cy.innerHTML =  this.date.getFullYear()+Calendar.language["years"][this.lang][this.lang];
	cm.innerHTML = Calendar.language["months"][this.lang][this.date.getMonth()];
	var curDateObj = new Date();
	if (curDateObj.getFullYear() == this.date.getFullYear()){
		this.getElementById("nextYear").disabled = true;
		this.getElementById("nextYear").title="不可再往后翻";
		this.getElementById("nextYear").style.cursor="not-allowed";
		this.getElementById("nextYear").onclick=function(){};
	}else{
		this.getElementById("nextYear").disabled = false;
		this.getElementById("nextYear").title="往后一年";
		this.getElementById("nextYear").style.cursor="pointer";
		this.form.nextYear.onclick = function () {calendar.goNextYear(this);}  
	}

	if ((curDateObj.getFullYear() == this.date.getFullYear()) && (curDateObj.getMonth() == this.date.getMonth())){
		this.getElementById("nextMonth").disabled = true;
		this.getElementById("nextMonth").title="不可再往后翻";
		this.getElementById("nextMonth").style.cursor="not-allowed";
		this.getElementById("nextMonth").onclick=function(){};
	}else{
		this.getElementById("nextMonth").disabled = false;
		this.getElementById("nextMonth").title="往后一月";
		this.getElementById("nextMonth").style.cursor="pointer";
		this.form.nextMonth.onclick = function () {calendar.goNextMonth(this);}
	}
}

//更新年、月
Calendar.prototype.update = function (e){
	this.date = new Date(this.year, this.month, 1);
	this.changeSelect();
	this.bindData();
}

Calendar.prototype.checkExists=	function(dayValue){	
	 var calendar = this;
	 var flag = false;
if (eval(this.calendarArray))
		for (var k = 0; k < this.calendarArray.length; k++) {
			if (this.calendarArray[k] == dayValue) {
				flag = true;
				break;
			}
		}
		return flag;
	}

//Calendar.prototype.hr = this.func;

//绑定数据到月视图
Calendar.prototype.bindData = function () {
	var calendar = this;
	var dateArray = this.getMonthViewArray(this.date.getFullYear(), this.date.getMonth());
	var tds = this.getElementById("calendarTable").getElementsByTagName("td");
	for(var i = 0; i < tds.length; i++) {
		tds[i].style.color = calendar.colors["td_word_light"];				//日历星期天yan色
		tds[i].style.backgroundColor = calendar.colors["td_bg_out"];
		tds[i].onclick = function () {return;}
		tds[i].onmouseover = function () {return;}
		tds[i].onmouseout = function () {return;}
		
		if (i > dateArray.length - 1) break;	
		tds[i].innerHTML = dateArray[i];			//ldz
		if (dateArray[i] != "&nbsp;"){
			if (calendar.checkExists(dateArray[i])){
				var _tempObj = new Date(this.date.getFullYear(),this.date.getMonth(),dateArray[i]).format(calendar.dateFormatStyle);
				tds[i].innerHTML = "<a href='javascript:calendar.hr(\""+_tempObj+"\")' style='color:"+calendar.colors["td_a"]+"'><b>" + dateArray[i] + "</b></a>";
					tds[i].onmouseover = function () {
					this.style.backgroundColor = calendar.colors["td_bg_over"];
					}
					tds[i].onmouseout = function () {
					this.style.backgroundColor = calendar.colors["td_bg_out"];
					}
			}
		}
	}
}

//根据年、月得到月视图数据(数组形式)
Calendar.prototype.getMonthViewArray = function (y, m) {
	var mvArray = [];
	var dayOfFirstDay = new Date(y, m, 1).getDay();
	var daysOfMonth = new Date(y, m + 1, 0).getDate();
	for (var i = 0; i < 42; i++) {
		mvArray[i] = "&nbsp;";
	}
	var startPos = (7 - dayOfFirstDay);
	var rowInt = Math.ceil((daysOfMonth - startPos) / 7);    
	var idtable = document.getElementById("calendarTable");	
	var idtablebody = document.getElementById("calendarTableBody");	
	var objArray = idtable.getElementsByTagName("tr");
	if (objArray.length > (rowInt + 2)){
		var tempInt = objArray.length - (rowInt + 2);  	
		for (var _tempi = rowInt + 2 ;_tempi<rowInt + 2+tempInt;_tempi++){
			if (objArray[_tempi - 1])
			objArray[_tempi - 1].parentNode.removeChild(objArray[_tempi - 1]);
		}
	}
	if (objArray.length < (rowInt + 2)) {
		var tempInt = (rowInt + 2) - objArray.length;	
		for (var i = 1; i <= tempInt; i++){
			var tr = document.createElement("tr");		
			for (var j = 0; j < 7; j++) {
				var td = document.createElement("td");
				td.innerHTML = "&nbsp;";
				td.style.textAlign="center";
				td.style.height="16px";
				td.style.lineHeight="100%";
				tr.appendChild(td);
			}
			idtablebody.appendChild(tr);
		}
	}  
	for (var i = 0; i < daysOfMonth; i++){
		mvArray[i + dayOfFirstDay] = i + 1;
	}
	return mvArray;
}

//扩展 document.getElementById(id) 多浏览器兼容性 from meizz tree source
Calendar.prototype.getElementById = function(id){
	if (typeof(id) != "string" || id == "") return null;
	if (document.getElementById) return document.getElementById(id);
	if (document.all) return document.all(id);
	try {return eval(id);} catch(e){ return null;}
}

//扩展 object.getElementsByTagName(tagName)
Calendar.prototype.getElementsByTagName = function(object, tagName){
	if (document.getElementsByTagName) return document.getElementsByTagName(tagName);
	if (document.all) return document.all.tags(tagName);
}

//取得HTML控件绝对位置
Calendar.prototype.getAbsPoint = function (e){
	var x = e.offsetLeft;
	var y = e.offsetTop;
	while(e = e.offsetParent){
		x += e.offsetLeft;
		y += e.offsetTop;
	}
	return {"x": x, "y": y};
}


//显示日历
Calendar.prototype.show = function (dateControl, popControl) {
	if (dateControl == null){
		throw new Error("arguments[0] is necessary")
	}
	this.dateControl = dateControl;
	if (dateControl.value.length > 0){
		this.date = new Date(dateControl.value.toDate());
		this.year = this.date.getFullYear();
		this.month = this.date.getMonth();
	}
	
	
	if (popControl == null){
		popControl = dateControl;
	}
	var xy = this.getAbsPoint(popControl);
	this.changeSelect();
	this.bindData();
}


//隐藏日历
Calendar.prototype.hide = function() {
	this.setDisplayStyle("select", "visible");
	this.panel.style.visibility = "hidden";
}

//设置控件显示或隐藏
Calendar.prototype.setDisplayStyle = function(tagName, style) {
	var tags = this.getElementsByTagName(null, tagName)
	for(var i = 0; i < tags.length; i++) {
	if (tagName.toLowerCase() == "select" &&
	   (tags[i].name == "calendarYear" ||
	  tags[i].name == "calendarMonth")){
		continue;
	}
		tags[i].style.visibility = style;
	}
}
