Michael RICOIS 5e05e208ec Reintegrate
2016-07-18 11:23:14 +02:00

336 lines
11 KiB
PHP

<?php
class Metier_Util_Date
{
private static $tabMoisEnLettres = array(
1 => 'Janvier',
2 => 'Février',
3 => 'Mars',
4 => 'Avril',
5 => 'Mai',
6 => 'Juin',
7 => 'Juillet',
8 => 'Août',
9 => 'Septembre',
10 => 'Octobre',
11 => 'Novembre',
12 => 'Décembre'
);
/**
* Retourne le numéro du mois donné au format texte (janvier, mars, etc...)
* @param string Mois en toute lettres (janvier, mars, etc...)
* @return string Mois en Chiffe (1, 3, 12) / false en cas d'erreur
*/
public static function getNumMois($moisEnLettres)
{
foreach (self::$tabMoisEnLettres as $num=>$mois) {
$tabMoisSansAccents[$num]=strtr($mois, 'ééûÉÉÛ','eeueeu');
}
return array_search(ucfirst(strtolower(strtr($moisEnLettres, 'ééûÉÉÛ','eeuEEU'))), $tabMoisSansAccents);
}
/**
* Retourne le libellé nu numéro du mois passé en paramètre
* @param int $moisEnChiffre
* @return string Libellé du mois / false si le mois passé en paramètre est invalide
*/
public function getLibelleMois($moisEnChiffre)
{
if ($moisEnChiffre>0 && $moisEnChiffre<13) {
return self::$tabMoisEnLettres[$moisEnChiffre];
}
return false;
}
/**
* Retourne le nombre de mois entre 2 dates au format Ymd
* @param string $dateDeb
* Date de début au format Ymd
* @param string $dateFin
* Date de fin (ultérieur à la date de début) au format Ymd
* @return number
*/
public static function nbMoisEntre($dateDeb, $dateFin=null)
{
if (empty($dateFin)) {
$dateFin = date('Ymd');
}
$dDeb = explode('-', self::dateT('Ymd','Y-m-d', $dateDeb));
$dFin = explode('-', self::dateT('Ymd','Y-m-d', $dateFin));
return ($dFin[0]*12+$dFin[1])-($dDeb[0]*12+$dDeb[1]);
}
/**
* Conversion de formats de dates selon les formats de dates définits en php
* @param string $formatIN
* Format de la date d'entrée
* @param string $formatOUT
* Format de la date de sortie
* @param string $date
* Date d'entrée
* @return string
* Date formatée
*/
public static function dateT($formatIN, $formatOUT, $date)
{
$M = '';
switch ($formatIN)
{
case 'd M Y':
$tmp = explode(' ', $date);
$d = str_replace('1er', '1', $tmp[0]);
$m = self::getNumMois($tmp[1]);
$Y = $tmp[2];
break;
case 'dMY':
$Y = substr($date,-4);
if (substr($date,0,3) == '1er'){
$d = 1;
$posM = 3;
}
elseif (is_numeric(substr($date,1,1))) {
$d = substr($date,0,2);
$posM = 2;
}
else {
$d = substr($date,0,1);
$posM = 1;
}
$M = trim(substr($date, $posM, strlen($date)-4-$posM));
$m = self::getNumMois($M);
break;
case 'Ymd':
$d = substr($date,6,2);
$m = substr($date,4,2);
$Y = substr($date,0,4);
break;
case 'ymd':
$d = substr($date,4,2);
$m = substr($date,2,2);
$Y = substr($date,0,2);
if ($Y<50) {
$Y = '20'.$Y;
} else {
$Y = '19'.$Y;
}
break;
case 'Y-m-d':
$d = substr($date,8,2);
$m = substr($date,5,2);
$Y = substr($date,0,4);
break;
case 'Y-m':
$d = 1;
$m = substr($date,5,2);
$Y = substr($date,0,4);
break;
case 'd/m/Y':
$tmp = explode('/', $date);
$d = $tmp[0];
$m = $tmp[1];
$Y = $tmp[2];
break;
case 'd.m.Y':
$tmp = explode('.', $date);
$d = $tmp[0];
$m = $tmp[1];
$Y = $tmp[2];
break;
case 'd/m/y':
$tmp = explode('/', $date);
$d = $tmp[0];
$m = $tmp[1];
if ($tmp[2] < date('y')) {
$Y = '20'.$tmp[2];
} else {
$Y = '19'.$tmp[2];
}
break;
case 'd-m-Y':
$tmp = explode('-', $date);
$d = $tmp[0];
$m = $tmp[1];
$Y = $tmp[2];
break;
case 'm/d/Y':
$tmp = explode('/', $date);
$d = $tmp[1];
$m = $tmp[0];
$Y = $tmp[2];
break;
case 'dmY':
$d = substr($date,0,2);
$m = substr($date,2,2);
$Y = substr($date,4,4);
break;
case 'dmy':
$d = substr($date,0,2);
$m = substr($date,2,2);
$Y = substr($date,4,2);
if ($Y<50) {
$Y = '20'.$Y;
} else {
$Y = '19'.$Y;
}
break;
default:
return $date;
}
if ($m*1>0 && $m*1<10) {
$m='0'.($m*1);
}
if ($d*1>0 && $d*1<10) {
$d='0'.($d*1);
}
switch ($formatOUT)
{
case 'd/m/Y':
return $d.'/'.$m.'/'.$Y;
break;
case 'm/Y':
return $m.'/'.$Y;
break;
case 'd M Y':
return $d.' '.self::$tabMoisEnLettres[$m*1].' '.$Y;
break;
case 'M Y':
return self::$tabMoisEnLettres[$m*1].' '.$Y;
break;
case 'Y':
return $Y;
break;
case 'm':
return $m;
break;
case 'd':
return $d;
break;
case 'Ym':
return $Y.$m;
break;
case 'Ymd':
return $Y.$m.$d;
break;
case 'Y-m-d':
return $Y.'-'.$m.'-'.$d;
break;
case 'Y/m/d':
return $Y.'/'.$m.'/'.$d;
break;
default:
return $date;
}
}
/**
* Calcul de la date après application de la période textuelle (deux ans, six mois, quinze jours, etc...)
* @todo Fonction ne fonctionnant qu'avec un chiffre en un seul mot du genre dix mais pas quatre vingt dix !!!
* @param date $dateIN au format Ymd
* @param string $period (ex : cinq mois, six ans, un jour, 3 mois)
* @return date
*/
public static function period2Days($dateIN, $period, $inThePast=false)
{
$dateV = self::dateT('Ymd', 'Ymd', $dateIN);
if ($dateV != $dateIN) {
return null;
}
$d = substr($dateIN,6,2);
$m = substr($dateIN,4,2);
$Y = substr($dateIN,0,4);
$period = strtolower(trim(strtr($period, "-.,", ' ')));
if ($period == '') {
return null;
}
$tabP = explode(' ', $period);
if ($tabP[0]*1 > 0) {
$chiffre = $tabP[0]*1*1;
}
else {
$chiffre = Metier_Util_Chiffre::ChiffresEnLettres($tabP[0]);
}
if ($inThePast) {
$chiffre = -1*$chiffre;
}
switch (end($tabP))
{
case 'mois':
$dateOUT = date('Ymd', mktime(0, 0, 0, $m+$chiffre, $d, $Y));
break;
case 'an':
case 'ans':
$dateOUT = date('Ymd', mktime(0, 0, 0, $m, $d, $Y+$chiffre));
break;
case 'jour':
case 'jours':
$dateOUT = date('Ymd', mktime(0, 0, 0, $m, $d+$chiffre, $Y));
break;
default:
$dateOUT = null;
}
return $dateOUT;
}
/**
* le jour est il ferié
* @param date $date
* Date au format SSAA-MM-JJ ou SSAAMMJJ
* @param bool $weekend
* Considérer les WeekEnd comme feriés ? 1=Oui
* @return bool
**/
public function jourFerie($date, $weekend=false)
{
$date = str_replace('-','',strtr($date, '/.:','---'));
$jour = self::dateT('Ymd', 'd', $date);
$mois = self::dateT('Ymd', 'm', $date);
$annee = self::dateT('Ymd', 'Y', $date);
$ferie = false;
// Jours feriées fixes
if($jour == 1 && $mois == 1) $ferie = true; // 1er janvier
if($jour == 1 && $mois == 5) $ferie = true; // 1er mai
if($jour == 8 && $mois == 5) $ferie = true; // 8 mai
if($jour == 14 && $mois == 7) $ferie = true; // 14 juillet
if($jour == 15 && $mois == 8) $ferie = true; // 15 aout
if($jour == 1 && $mois == 11) $ferie = true; // 1 novembre
if($jour == 11 && $mois == 11) $ferie = true; // 11 novembre
if($jour == 25 && $mois == 12) $ferie = true; // 25 décembre
// fêtes religieuses mobiles
$pak = @easter_date($annee);
$jp = date("d", $pak);
$mp = date("m", $pak);
if($jp == $jour && $mp == $mois){ $ferie = true;} // Pâques
$lpk = mktime(date("H", $pak), date("i", $pak), date("s", $pak), date("m", $pak), date("d", $pak) +1, date("Y", $pak) );
$jp = date("d", $lpk);
$mp = date("m", $lpk);
if($jp == $jour && $mp == $mois){ $ferie = true; }// Lundi de Pâques
$asc = mktime(date("H", $pak), date("i", $pak), date("s", $pak), date("m", $pak), date("d", $pak) + 39, date("Y", $pak) );
$jp = date("d", $asc);
$mp = date("m", $asc);
if($jp == $jour && $mp == $mois){ $ferie = true;}//ascension
$pe = mktime(date("H", $pak), date("i", $pak), date("s", $pak), date("m", $pak), date("d", $pak) + 49, date("Y", $pak) );
$jp = date("d", $pe);
$mp = date("m", $pe);
if($jp == $jour && $mp == $mois) {$ferie = true;}// Pentecôte
$lp = mktime(date("H", $asc), date("i", $pak), date("s", $pak), date("m", $pak), date("d", $pak) + 50, date("Y", $pak) );
$jp = date("d", $lp);
$mp = date("m", $lp);
if($jp == $jour && $mp == $mois) {$ferie = true;}// lundi Pentecôte
// Samedis et Dimanches
if ($weekend) {
$jour_sem = date('N',mktime(0,0,0, $mois, $jour, $annee));
if($jour_sem>5) $ferie = true;
}
return $ferie;
}
}