<?php
include ($GLOBALS['dossier_squelettes'].'/inc-fonctions.php');
?>
#HTTP_HEADER{Content-Type: text/calendar; charset:#CHARSET}#CACHE{0}
BEGIN:VCALENDAR
CALSCALE:GREGORIAN
PRODID: SPIP http://www.spip.net
VERSION:2.0
X-WR-CALNAME;VALUE=TEXT:[(#ENV{calname}|filtrer_ical)]
X-WR-RELCALID:[(#URL_SITE_SPIP|filtrer_ical)]<BOUCLE_articles(ARTICLES){titre_mot=#ENV{calname}}{age <= 30}{par date}{inverse}>
<?php
/*
http://www.phpbuilder.com/columns/chow20021007.php3?print_mode=1
http://www.shuchow.com/vCalAddendum.html
le filtre SPIP date_ical est inutilisable, lui preferer affdate
*/
$vcal_stamp = '[(#DATE_MODIF|affdate{'Ymd'})]T[(#DATE_MODIF|affdate{'His'})]'; 
$vcal_start = '[(#DATE|affdate{'Ymd'})]';
$vcal_end = '[(#DATE_REDAC|affdate{'Ymd'})]';
$t_start= mktime( [(#DATE|affdate{'G,i,s,n,j,Y'})] );
$His = 'T[(#DATE|affdate{'His'})]';
if ( $His == 'T000000' ) { //day event
	if ( $vcal_end <= $vcal_start ) { 
		$vcal_end = date('Ymd', ($t_start + 3600*24) );
		}
	$vcal_start = ';VALUE=DATE:'.$vcal_start; 
	$vcal_end = ';VALUE=DATE:'.$vcal_end; 
	} 
	else { $vcal_start = ':'.$vcal_start.$His; 
		$His = 'T[(#DATE_REDAC|affdate{'His'})]';
		if ($His == 'T') { $His = 'T000000'; } 
		$vcal_end = ':'.$vcal_end.$His;
		if ( $vcal_end <= $vcal_start ) { 
			$vcal_end = date('Ymd', ($t_start + 3600) );
			}
		}
$group='';
<BOUCLE_restricted(MOTS){id_article=#ID_ARTICLE}{id_groupe=#EVAL{_ACCESS_ID}}>
$group= '[(#_restricted:TITRE|texte_script)]';
</BOUCLE_restricted>
if (!restricted($group, $GLOBALS['auteur_session']['statut'])) { 
$class='CLASS:PRIVATE';
}
?>
BEGIN:VEVENT
SUMMARY:[(#SOUSTITRE|filtrer_ical)]
UID:article#ID_ARTICLE @ [(#URL_SITE_SPIP|filtrer_ical)]
DTSTAMP:<?php echo $vcal_stamp."\n"; ?>
DTSTART<?php echo $vcal_start."\n"; ?>
DTEND<?php echo $vcal_end."\n"; ?>
CATEGORIES:<BOUCLE_tags(MOTS){id_groupe=#EVAL{_TAGS_ID}}{id_article}>[(#_tags:TITRE|filtrer_ical),]</BOUCLE_tags>
URL:[(#URL_ARTICLE|url_absolue)]
STATUS:CONFIRMED
END:VEVENT</BOUCLE_articles>
END:VCALENDAR