<?php
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
* Name : Persian Calendar Function & Class
* Author : S.Mohammad Salehi
* Email : Salehi221@Gmail.com
* Publish Date : 20 May 2008
* This program is distributed in the hope that it will be useful
* License : GPL - FreeWare For Human Binges
* modify it under the terms of the GNU General Public License
* This Persian calendar able you to navigate in next and previous month and year .
* Very usful to blogger and cms archive and events .
* thanks Roozbeh Pournader and Mohammad Toossi for JDF Class
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/
/*
* This function optimize , fix Bugs and renamed to pdate by S.Mohammad Salehi ( Salehi221@Gmail.Com )
*
* // //\\ // //\\ // //////
* // // \\ // // \\ // //
* // // \\ // // \\ // //
* \\ // /////\\\\\ // /////\\\\\ // //
* \\// // \\ /////// // \\ /////// //////
*
* /////// //\\ ////// ////////
* // // // \\ // //
* // // // \\ // ///////
* // // /////\\\\\ // //
* //////// // \\ // /////////
*
*/
class PersianCalendar
{
var $transnumber=0;
///chosse your timezone
var $TZhours=0;
var $TZminute=0;
var $need="";
var $Buffer = "";
var $result1="";
var $result="";
var $day_in_jalali_month=array(0,31,31,31,31,31,31,30,30,30,30,30,29);
var $jalali_weekdays_short=array('ش','ي','د','س','چ','پ','ج');
var $jalali_weekname=array(
'شنبه',
'يكشنبه',
'دوشنبه',
'سهشنبه',
'چهارشنبه',
'پنجشنبه',
'جمعه');
var $jalali_monthname=array(
'',
'فروردين',
'ارديبهشت',
'خرداد',
'تير',
'مرداد',
'شهريور',
'مهر',
'آبان',
'آذر',
'دي',
'بهمن',
'اسفند');
function pdate($type,$maket="now")
{
//global $jalali_weekname,$jalali_monthname;
//set 1 if you want translate number to farsi or if you don't like set 0
if($maket=="now"){
$maket=time();
}
$maket+=$TZhours*3600+$TZminute*60;
$date=date("Y-m-d",$maket);
list( $year, $month, $day ) = explode ('-',$date);
list( $pyear, $pmonth, $pday ) = $this->gregorian_to_jalali($year, $month, $day);
$need= $maket;
$i=0;
$subtype="";
$subtypetemp="";
while($i<strlen($type))
{
$subtype=$type{$i};
if($subtypetemp=="\\")
{
$result.=$subtype;
$i++;
continue;
}
switch ($subtype)
{
case "A":
$result1=date("a",$need);
if($result1=="pm") $result.= "بعدازظهر";
else $result.="قبل‏ازظهر";
break;
case "a":
$result1=date("a",$need);
if($result1=="pm") $result.= "ب.ظ";
else $result.="ق.ظ";
break;
case "d":
if($pday<10)$result1="0".$pday;
else $result1=$pday;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "D":
$result1=date("w",$need)+1;
if($result1==7)$result1=0;
$result.=substr($this->jalali_weekname[(int)$result1],0,2);
break;
case "F":
$result.=$this->jalali_monthname[(int)$pmonth];
break;
case "g":
$result1=date("g",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "G":
$result1=date("G",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "h":
$result1=date("h",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "H":
$result1=date("H",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "i":
$result1=date("i",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "j":
$result1=$pday;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "l":
$result1=date("l",$need);
if($result1=="Saturday") $result1="شنبه";
else if($result1=="Sunday") $result1="يكشنبه";
else if($result1=="Monday") $result1="دوشنبه";
else if($result1=="Tuesday") $result1="سه شنبه";
else if($result1=="Wednesday") $result1="چهارشنبه";
else if($result1=="Thursday") $result1="پنجشنبه";
else if($result1=="Friday") $result1="جمعه";
$result.=$result1;
break;
case "m":
if($pmonth<10) $result1="0".$pmonth;
else $result1=$pmonth;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "M":
$result .= $this->jalali_monthname[(int)$pmonth];
break;
case "n":
$result1=$pmonth;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "N":
$result1=date("N",$need);
if($result1<=5)$result1+2;
else $result1-6;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "s":
$result1=date("s",$need);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "S":
$result.="ام";
break;
case "t":
$result.= $this->number_of_day($pmonth,$pyear);
break;
case "w":
$result1=date("w",$need)+1;
if($result1==7)$result1=0;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "W":
$result1= $this->pweek_of_year($pyear,$pmonth,$pday);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "y":
$result1=substr($pyear,2,4);
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "Y":
case "o":
$result1=$pyear;
if($this->transnumber==1) $result.= $this->Convertnumber2farsi($result1);
else $result.=$result1;
break;
case "U" :
$result.=time();
break;
case "u" :
$result.=date("u",$need);
break;
case "z" :
$result.= $this->days_of_year($pmonth,$pday,$pyear);
break;
case "Z" :
$result.=date("Z",$need);
break;
case "e" :
$result.=date("e",$need);
break;
case "i" :
$result.=date("e",$need);
break;
case "O" :
$result.=date("O",$need);
break;
case "O" :
$result.=date("O",$need);
break;
case "P" :
$result.=date("P",$need);
break;
case "T" :
$result.=date("P",$need);
break;
case "L" :
if( $this->is_kabise($pyear))$result.="1";
else $result.="0";
break;
default:
$result.=$subtype;
}
$subtypetemp=substr($type,$i,1);
$i++;
}
return $result;
}
//Find days in this year untile now
function days_of_year($pmonth,$pday,$pyear)
{
//global $day_in_jalali_month;
$result=0;
for($i=1;$i<$pmonth;$i++){
$result+=$this->day_in_jalali_month[(int)$i];
}
return $result+$pday;
}
// Return week of year in jalali
function pweek_of_year($year,$month,$day){
list($y, $m, $d) = $this->jalali_to_gregorian($year, 1, 1);
$timestamp = mktime(0,0,0, $m, $d, $y);
$fwk = date('w', $timestamp);
if ($fwk != 6) {
list($y, $m, $d) = $this->jalali_to_gregorian($year, 1, 7 - $fwk);
$timestamp = mktime(0,0,0, $m, $d, $y);
$fwk = date('w', $timestamp);
}
list($yy, $mm, $dd) = $this->jalali_to_gregorian($year, $month, $day + 1);
$timestamp2 = mktime(0,0,0, $mm, $dd, $yy);
$fwk2 = date('w', $timestamp2);
if ($fwk2 != 6) {
list($yy, $mm, $dd) = $this->jalali_to_gregorian($year, $month, $day + (7 - $fwk2));
$timestamp2 = mktime(0,0,0, $mm, $dd, $yy);
$fwk2 = date('w', $timestamp2);
}
$diff = $timestamp2 - $timestamp;
return floor($diff / (3600 * 24) / 7);
}
function pmktime($hour="",$minute="",$second="",$pmonth="",$pday="",$pyear="")
{
if(!$hour && !$minute && !$second && !$pmonth && !$pmonth && !$pday && !$pyear)
return mktime();
list( $year, $month, $day ) = $this->jalali_to_gregorian($pyear, $pmonth, $pday);
$i=mktime((int)$hour,(int)$minute,(int)$second,(int)$month,(int)$day,(int)$year);
return $i;
}
///Find num of Day Begining Of Month ( 0 for Sat & 6 for Sun)
function mstart($month,$day,$year)
{
list( $pyear, $pmonth, $pday ) = $this->gregorian_to_jalali($year, $month, $day);
list( $year, $month, $day ) = $this->jalali_to_gregorian($pyear, $pmonth, "1");
$timestamp=mktime(0,0,0,$month,$day,$year);
return date("w",$timestamp);
}
//return number of Day in month
function number_of_day($pmonth,$pyear){
$number_day=$this->day_in_jalali_month[(int)$pmonth];
if($pmonth<12)return $number_day;
if($this->is_kabise($pmonth))return $number_day+1;
return $number_day;
}
////here convert to number in persian
function Convertnumber2farsi($str)
{
$out = '';
$str = (string)$str;
for ($i = 0; $i < strlen($str); $i++) {
if (ctype_digit($str[$i])) {
$out .= pack("C*", 0xDB, 0xB0 + $str[$i]);
} else {
$out .= $str[$i];
}
}
return $out;
}///end conver to number in persian
function is_kabise($year)
{
$mod=$year%33;
if($mod==1 or $mod==5 or $mod==9 or $mod==13 or $mod==17 or $mod==22 or $mod==26 or $mod==30)return true;
return false;
}
function pcheckdate($month,$day,$year)
{
if($month<=12 and $month>0)
{
if($this->day_in_jalali_month[$month]>=$day && $day>0)
return 1;
if($this->is_kabise($year) and $month==12 and $day==30)
return 1;
}
return 0;
}
function pgetdate($timestamp="")
{
if($timestamp=="")
$timestamp=mktime();
$p=explode("|",$this->pdate("s|i|H|d|w|m|Y|t|l|F"));
return array(
0=>$timestamp,
"seconds"=>$p[0],
"minutes"=>$p[1],
"hours"=>$p[2],
"mday"=>$p[3],
"wday"=>$p[4],
"mon"=>$p[5],
"year"=>$p[6],
"yday"=>$p[7],
"weekday"=>$p[8],
"month"=>$p[9],
);
}
// "jalali.php" is convertor to and from Gregorian and Jalali calendars.
// Copyright (C) 2000 Roozbeh Pournader and Mohammad Toossi
//
// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// A copy of the GNU General Public License is available from:
//
// <a href="http://www.gnu.org/copyleft/gpl.html" target="_blank">http://www.gnu.org/copyleft/gpl.html</a>
//
function div($a,$b) {
return (int) ($a / $b);
}
function gregorian_to_jalali ($g_y, $g_m, $g_d)
{
$g_days_in_month = array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
$j_days_in_month = array(31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, 29);
$gy = $g_y-1600;
$gm = $g_m-1;
$gd = $g_d-1;
$g_day_no = 365*$gy+ $this->div($gy+3,4)- $this->div($gy+99,100)+ $this->div($gy+399,400);
for ($i=0; $i < $gm; ++$i)
$g_day_no += $g_days_in_month[$i];
if ($gm>1 && (($gy%4==0 && $gy%100!=0) || ($gy%400==0)))
/* leap and after Feb */
$g_day_no++;
$g_day_no += $gd;
$j_day_no = $g_day_no-79;
$j_np = $this->div($j_day_no, 12053); /* 12053 = 365*33 + 32/4 */
$j_day_no = $j_day_no % 12053;
$jy = 979+33*$j_np+4* $this->div($j_day_no,1461); /* 1461 = 365*4 + 4/4 */
$j_day_no %= 1461;
if ($j_day_no >= 366) {
$jy += $this->div($j_day_no-1, 365);
$j_day_no = ($j_day_no-1)%365;
}
for ($i = 0; $i < 11 && $j_day_no >= $j_days_in_month[$i]; ++$i)
$j_day_no -= $j_days_in_month[$i];
$jm = $i+1;
$jd = $j_day_no+1;
return array($jy, $jm, $jd);
}
function jalali_to_gregorian($j_y, $j_m, $j_d)
{
$g_days_in_month = array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
$j_days_in_month = array(31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, 29);
$jy = $j_y-979;
$jm = $j_m-1;
$jd = $j_d-1;
$j_day_no = 365*$jy + $this->div($jy, 33)*8 + $this->div($jy%33+3, 4);
for ($i=0; $i < $jm; ++$i)
$j_day_no += $j_days_in_month[$i];
$j_day_no += $jd;
$g_day_no = $j_day_no+79;
$gy = 1600 + 400* $this->div($g_day_no, 146097); /* 146097 = 365*400 + 400/4 - 400/100 + 400/400 */
$g_day_no = $g_day_no % 146097;
$leap = true;
if ($g_day_no >= 36525) /* 36525 = 365*100 + 100/4 */
{
$g_day_no--;
$gy += 100* $this->div($g_day_no, 36524); /* 36524 = 365*100 + 100/4 - 100/100 */
$g_day_no = $g_day_no % 36524;
if ($g_day_no >= 365)
$g_day_no++;
else
$leap = false;
}
$gy += 4* $this->div($g_day_no, 1461); /* 1461 = 365*4 + 4/4 */
$g_day_no %= 1461;
if ($g_day_no >= 366) {
$leap = false;
$g_day_no--;
$gy += $this->div($g_day_no, 365);
$g_day_no = $g_day_no % 365;
}
for ($i = 0; $g_day_no >= $g_days_in_month[$i] + ($i == 1 && $leap); $i++)
$g_day_no -= $g_days_in_month[$i] + ($i == 1 && $leap);
$gm = $i+1;
$gd = $g_day_no+1;
return array($gy, $gm, $gd);
}
function SetStyle()
{
$Style =
"
<style>
table {
border-width: 0;
border: 1px solid #003300;
font-size : 13px;
direction: rtl
}
td.day {
text-align: center;
}
td.tatil {
color: #FF0000;
text-align: center;
}
td.month {
border:1px solid #FFFFFF; background-color: #105C85;
color: #FFFFFF;
font-size : 13px;
text-align: center;
}
td.today {
color: #00000FF;
border:1px solid #c6a646; background-color: #FFCCFF;
text-align: center;
}
</style>
";
echo $Style;
}
// This Function Show Persian Calendar
function ShowPersianCal() {
$todaydate = $this->pgetdate();
$jmonth = !isset($_GET['m']) ? $todaydate["mon"] : intval(htmlspecialchars($_GET['m']));
$jyear = !isset($_GET['y']) ? $todaydate["year"] : intval(htmlspecialchars($_GET['y']));
if (!in_array($jyear, range(1348, 1416))) {
$jyear = $todaydate["year"];
}
if (!in_array($jmonth, range(1, 12))) {
$jmonth = $todaydate["mon"];
}
$pre_month = $jmonth-1; $next_month = $jmonth+1;
$pre_Year = $jyear-1; $next_Year = $jyear+1;
$first_of_month = $this->pmktime(0, 0, 0, $jmonth, 1, $jyear);
$maxdays = $this->pdate("t", $first_of_month); //29-31
$weekday = $this->pdate('w', $first_of_month); //0-6
$weeknum = $this->pdate('W', $first_of_month); //1-54
$PHP_SELF = $_SERVER['PHP_SELF'];
$cal_day = 1;
$buffer = '<table width="300" align="center">
<tr>
<td class="month" colspan="8" width="80%" height="24">
<a href="'.$PHP_SELF.'?y='.$pre_Year.'&m='.$jmonth.'" title="سال قبل"><<</a>
<a href="'.$PHP_SELF.'?y='.($pre_month == 0 ? $jyear-1 : $jyear).'&m='.($pre_month == 0 ? "12" : $pre_month).'" title="ماه قبل">«</a>
'.$this->jalali_monthname[(int)$jmonth].' '.$this->Convertnumber2farsi($jyear).'
<a href="'.$PHP_SELF.'?y='.($next_month == 13 ? $jyear+1 : $jyear).'&m='.($next_month == 13 ? "1" : $next_month).'" title="ماه بعد">»</a>
<a href="'.$PHP_SELF.'?y='.$next_Year.'&m='.$jmonth.'" title="سال بعد">>></a>
</tr>
<tr>
<td class="month" width="13%">هفته</td>';
for ($i = 0; $i <= 6; $i++) {
if ($i==6) $buffer .= '<td class="tatil" width="11%">'.$this->jalali_weekdays_short[(int)$i].'</td>';
else
$buffer .= '<td class="day" width="11%">'.$this->jalali_weekdays_short[(int)$i].'</td>';
}
$buffer .= '</tr>
<tr>
<td class="month">'.$this->Convertnumber2farsi($weeknum).'</td>';
$buffer .= ($weekday > 0 && $weekday <= 6) ? '<td colspan="'.$weekday.'"> </td>' : '';
while($maxdays >= $cal_day) {
if ($weekday == 7) {
$weeknum ++;
$buffer .= '</tr>'."\n".'<tr><td class="month" width="20%">'.$this->Convertnumber2farsi($weeknum).'</td>';
$weekday = 0;
}
if ($todaydate["mday"] == $cal_day && ($jmonth == $todaydate["mon"]) && ($jyear == $todaydate["year"])) $buffer .= '<td class=today>'.$this->Convertnumber2farsi($cal_day).'</td>';
elseif ($weekday == 6) $buffer .= '<td class=tatil>'.$this->Convertnumber2farsi($cal_day).'</td>';
else $buffer .= '<td class=day>'.$this->Convertnumber2farsi($cal_day).'</td>';
$cal_day++;
$weekday++;
}
if ($weekday != 7){$buffer .= '<td colspan="'.(6-$weekday).'"> </td>';}
echo $buffer . '</tr>
<tr>
<td class="month" colspan="8" width="80%" height="22">امروز : '.$this->pdate("l d M Y", time()).'</td></tr>
</table>';
}
}
?>
|
Download
