<?
/**
这是公历和农历类的定义，由于php的日期计算限制，所以只能计算1970-1938之间的时间
农历类的计算方法使用了林洵贤先生的算法，在此表示感谢！在joy asp可以找到林先生的大作(javascript)
*/
/**
* 日期类
* 本对象套用javascript的日期对象的方法
* 设置$mode属性，可兼容javascript日期对象
*/
class date {
var $time = 0;
var $mode = 0; // 本属性为与javascript兼容而设，$mode=1为javascript方式
var $datemode = "y-m-d h:i:s"; // 日期格式 "y-m-d h:i:s"，可自行设定
function date($t=0) {
if($t == 0)
$this->time = time();
}
/**
* 返回从gmt时间1970年1月1日0时开始的毫秒数
*/
function gettime() {
$temp = gettimeofday();
return $temp[sec]*1000+round($temp[usec]/1000);
}
/**
* 返回年份
*/
function getyear() {
$temp = getdate($this->time);
return $temp[year];
}
/**
* 返回月份
*/
function getmonth() {
$temp = getdate($this->time);
return $temp[mon]-$this->mode;
}
/**
* 返回日期
*/
function getdate() {
$temp = getdate($this->time);
return $temp[mday];
}
/**
* 返回星期
*/
function getday() {
$temp = getdate($this->time);
return $temp[wday]-$this->mode;
}
/**
* 返回小时
*/
function gethours() {
$temp = getdate($this->time);
return $temp[hours];
}
/**
* 返回分
*/
function getminutes() {
$temp = getdate($this->time);
return $temp[minutes];
}
/**
* 返回秒
*/
function getseconds() {
$temp = getdate($this->time);
return $temp[seconds];
}
/**
* 设定年份
* php 4.0.6 year 1970 -- 2038
*/
function setyear($val) {
$temp = getdate($this->time);
$temp[year] = $val;
$this->set_time($temp);
}
/**
* 设定月份
*/
function setmonth($val) {
$temp = getdate($this->time);
$temp[mon] = $val+$this->mode;
$this->set_time($temp);
}
/**
* 设定日期
*/
function setdate($val) {
$temp = getdate($this->time);
$temp[mday] = $val;
$this->set_time($temp);
}
/**
* 设定星期
*/
function setday($val) {
$temp = getdate($this->time);
$temp[wday] = $val+$this->mode;
$this->set_time($temp);
}
/**
* 设定小时
*/
function sethours($val) {
$temp = getdate($this->time);
$temp[hours] = $val;
$this->set_time($temp);
}
/**
* 设定分
*/
function setminutes($val) {
$temp = getdate($this->time);
$temp[minutes] = $val;
$this->set_time($temp);
}
/**
* 设定秒
*/
function setseconds($val) {
$temp = getdate($this->time);
$temp[seconds] = $val;
$this->set_time($temp);
}
/**
* 返回系统格式的字符串
*/
function tolocalestring() {
return date($this->datemode,$this->time);
}
/**
* 使用gtm时间创建一个日期值
*/
function utc($year,$mon,$mday,$hours=0,$minutes=0,$seconds=0) {
$this->time = mktime($hours,$minutes,$seconds,$mon,$mday,$year);
return $this->time;
}
/**
* 等价于dateadd(interval,number,date)
* 返回已添加指定时间间隔的日期。
* inetrval为表示要添加的时间间隔字符串表达式，例如分或天
* number为表示要添加的时间间隔的个数的数值表达式
* date表示日期
*
* interval(时间间隔字符串表达式)可以是以下任意值:
* yyyy year年
* q quarter季度
* m month月
* y day of year一年的数
* d day天
* w weekday一周的天数
* ww week of year周
* h hour小时
* n minute分
* s second秒
* w、y和d的作用是完全一样的，即在目前的日期上加一天，q加3个月，ww加7天。
*/
function add($interval, $number, $date) {
$date = date::get_time($date);
$date_time_array = getdate($date);
$hours = $date_time_array["hours"];
$minutes = $date_time_array["minutes"];
$seconds = $date_time_array["seconds"];
$month = $date_time_array["mon"];
$day = $date_time_array["mday"];
$year = $date_time_array["year"];
switch ($interval) {
case "yyyy": $year +=$number; break;
case "q": $month +=($number*3); break;
case "m": $month +=$number; break;
case "y":
case "d":
case "w": $day+=$number; break;
case "ww": $day+=($number*7); break;
case "h": $hours+=$number; break;
case "n": $minutes+=$number; break;
case "s": $seconds+=$number; break;
}
$temptime = mktime($hours ,$minutes, $seconds,$month ,$day, $year);
return $temptime;
}
/**
* 等价于datediff(interval,date1,date2)
* 返回两个日期之间的时间间隔
* intervals(时间间隔字符串表达式)可以是以下任意值:
* w 周
* d 天
* h 小时
* n 分钟
* s 秒
*/
function diff($interval, $date1,$date2) {
// 得到两日期之间间隔的秒数
$timedifference = date::get_time($date2) - date::get_time($date1);
switch ($interval) {
case "w": $retval = bcdiv($timedifference ,604800); break;
case "d": $retval = bcdiv( $timedifference,86400); break;
case "h": $retval = bcdiv ($timedifference,3600); break;
case "n": $retval = bcdiv( $timedifference,60); break;
case "s": $retval = $timedifference; break;
}
return $retval;
}
/**
* 输出，根据需要直接修改本函数或在派生类中重写本函数
*/
function display() {
$nstr = array('日','一','二','三','四','五','六');
echo sprintf("%4d年%2d月%2d日 星期%s<br>",$this->getyear(),$this->getmonth(),$this->getdate(),$nstr[$this->getday()%7]);
}
/**
* 工作函数
*/
function set_time(&$ar) {
$this->time = mktime($ar[hours],$ar[minutes],$ar[seconds],$ar[mon],$ar[mday],$ar[year]);
}
/**
* 转换为unix时间戳
*/
function get_time($d) {
if(is_numeric($d))
return $d;
else {
if(! is_string($d)) return 0;
if(ereg(":",$d)) {
$buf = split(" +",$d);
$year = split("[-/]",$buf[0]);
$hour = split(":",$buf[1]);
if(eregi("pm",$buf[2]))
$hour[0] += 12;
return mktime($hour[0],$hour[1],$hour[2],$year[1],$year[2],$year[0]);
}else {
$year = split("[-/]",$d);
return mktime(0,0,0,$year[1],$year[2],$year[0]);
}
}
}
} // 日期类定义结束
?>
<?
/**
* 农历类
*/
class lunar {
var $year;
var $month;
var $day;
var $isleap;
var $yearcyl;
var $daycyl;
var $moncyl;
var $time;
var $lunarinfo = array(
0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,
0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,
0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,
0x06ca0,0x0b550,0x15355,0x04da0,0x0a5d0,0x14573,0x052d0,0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,
0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b5a0,0x195a6,
0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,
0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,
0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0,
0x14b63);
/**
* 传回农历 y年的总天数
*/
function lyeardays($y) {
$sum = 348;
for($i=0x8000; $i>0x8; $i>>=1)
$sum += ($this->lunarinfo[$y-1900] & $i)? 1: 0;
return $sum+$this->leapdays($y);
}
/**
* 传回农历 y年闰月的天数
*/
function leapdays($y) {
if($this->leapmonth($y))
return ($this->lunarinfo[$y-1900] & 0x10000)? 30: 29;
else return 0;
}
/**
* 传回农历 y年闰哪个月 1-12 , 没闰传回 0
*/
function leapmonth($y) {
return $this->lunarinfo[$y-1900] & 0xf;
}
/**
* 传回农历 y年m月的总天数
*/
function monthdays($y,$m) {
return ($this->lunarinfo[$y-1900] & (0x10000>>$m))? 30: 29;
}
/**
* 创建农历日期对象
*/
function lunar($objdate,$month=1,$day=1) {
$leap=0;
$temp=0;
if(is_object($objdate))
$this->time = mktime(0,0,0,$objdate->getmonth(),$objdate->getdate(),$objdate->getyear());
else {
$year = $objdate;
$this->time = mktime(0,0,0,$month,$day,$year);
if($year < 1970) {
return;
$temp = 0;
for($i=1970; $i>$year; $i--) {
$temp = $this->lyeardays($i);
$offset -= $temp;
}
}
}
$offset = round($this->time/86400+25537);
$this->daycyl = $offset + 40;
$this->moncyl = 14;
for($i=1900; $i<$year && $offset>0; $i++) {
$temp = $this->lyeardays($i);
$offset -= $temp;
$this->moncyl += 12;
}
if($offset<0) {
$offset += $temp;
$i--;
$this->moncyl -= 12;
}
$this->year = $i;
$this->yearcyl = $i-1864;
$leap = $this->leapmonth($i); //闰哪个月
$this->isleap = false;
for($i=1; $i<13 && $offset>0; $i++) {
//闰月
if($leap>0 && $i==($leap+1) && $this->isleap==false) {
$i--;
$this->isleap = true;
$temp = $this->leapdays($this->year);
}else {
$temp = $this->monthdays($this->year, $i);
}
//解除闰月
if($this->isleap==true && $i==($leap+1))
$this->isleap = false;
$offset -= $temp;
if($this->isleap == false)
$this->moncyl ++;
}
if($offset==0 && $leap>0 && $i==$leap+1)
if($this->isleap)
$this->isleap = false;
else {
$this->isleap = true;
$i--;
$this->moncyl--;
}
if($offset<0) {
$offset += $temp;
$i--;
$this->moncyl--;
}
$this->month = $i;
$this->day = $offset + 1;
}
function cyclical($num) {
$gan = array("甲","乙","丙","丁","戊","己","庚","辛","壬","癸");
$zhi = array("子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥");
return $gan[$num%10].$zhi[$num%12];
}
/**
* 输出，根据需要直接修改本函数或在派生类中重写本函数
*/
function display() {
$nstr = array(' ','正','二','三','四','五','六','七','八','九','十','十一','腊');
echo sprintf("农历 %s%s月%s<br>",($this->isleap?"闰":""),$nstr[$this->month],$this->cday($this->day));
echo sprintf("%s年 %s月 %s日",$this->cyclical($this->yearcyl),$this->cyclical($this->moncyl),$this->cyclical($this->daycyl));
}
/**
* 中文日期
*/
function cday($d) {
$nstr1 = array('日','一','二','三','四','五','六','七','八','九','十');
$nstr2 = array('初','十','廿','卅',' ');
switch($d) {
case 10:
$s = '初十';
break;
case 20:
$s = '二十';
break;
case 30:
$s = '三十';
break;
default :
$s = $nstr2[floor($d/10)];
$s .= $nstr1[$d%10];
}
return $s;
}
} // 农历类定义结束
?>
<?
// 测试例
$d = new date;
echo "<br>现在是：";
$d->display();
$d->setyear(2037);
echo "<br>现在是：";
echo $d->getyear()."年";
echo $d->getmonth()."月";
echo $d->getdate()."日";
echo " 星期".$d->getday()." ";
echo $d->gethours()."时";
echo $d->getminutes()."分";
echo $d->getseconds()."秒<br>";
$d->utc(1998,10,2,22,0,8);
echo $d->tolocalestring()."<br>";
$d = new date;
$ld = new lunar($d);
$d->display();
$ld->display();
$d->utc(1998,10,2,22,0,8);
$ld = new lunar($d);
$d->display();
$ld->display();
$ld = new lunar(2002,2,12);
$ld->display();
echo __line__."<br>";
$d1 = "2002-01-11";
$d2 = date("y-m-d",$d->add("d",35,$d1));
echo $d1."的". date::diff("d",$d1,$d2)."天后是$d2<br>";
echo $d1."的10天前是".date("y-m-d",date::add("d",-10,$d1))."<br>";
$d3 = date("y/m/d h:i:s");
echo "现在是".$d3."距离2002/2/12 12:59:59还有".date::diff("s",$d3,"2002/2/12 12:59:59")."秒<br>";
?>
