<?php
/***************************************************************
*  Copyright notice$this->recursion$this->recursion$this->recursion
*
*  (c) 2007 Philip Almeida <philip.almeida@gmail.com>
*  All rights reserved
*
*  This script is part of the TYPO3 project. The TYPO3 project 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.
*
*  The GNU General Public License can be found at
*  http://www.gnu.org/copyleft/gpl.html.
*
*  This script 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.
*
*  This copyright notice MUST APPEAR in all copies of the script!
***************************************************************/

require_once(PATH_tslib.'class.tslib_pibase.php');

/**
 * Plugin 'News Calendar' for the 'newscalendar' extension.
 *
 * @author	Philip Almeida <philip.almeida@gmail.com>
 * @package	TYPO3
 * @subpackage	tx_newscalendar
 */
class tx_newscalendar_pi1 extends tslib_pibase {


	var $prefixId		= 'tx_ttnews';		// Same as class name
	var $scriptRelPath	= 'pi1/class.tx_newscalendar_pi1.php';	// Path to this script relative to the extension dir.
	var $extKey			= 'newscalendar';	// The extension key.
	var $pi_checkCHash	= true;
	var $resultList;
	var $resultListCount;
	var $globalRes;
	// RICC begin: add uploads folder of tt_news as gVar; can probably better retrieved later on from some TS settings?
	var $uploadFolder = 'uploads/pics/';
	var $jsContextMenu;
	// RICC end


	/**
	 * The main method of the PlugIn
	 *
	 * @param	string		$content: The PlugIn content
	 * @param	array		$conf: The PlugIn configuration
	 * @return	The content that is displayed on the website
	 */
	function main($main,$conf)	{
		global $LANG;
		$this->conf = $conf;
		$this->pi_initPIflexForm();	// Init FlexForm configuration for plugin
		$this->pi_setPiVarDefaults();
		$this->pi_loadLL();
		$this->pi_USER_INT_obj=0;	// Configuring so caching is not expected. This value means that no cHash params are ever set. We do this, because it's a USER_INT object!

		/*
		* Retrieve day vars
		*/  
		$this->time			= time();
		$this->thisDay		= date('j',time());
		$this->thisYear		= date('Y',time());
		$this->thisMonth	= date('n',time());

		/*
		* Define parser function "hmtlentities" or "htmlspecialchars"
		*/
		$this->parserFunction	= ($this->conf['special.']['parserFunction']?$this->conf['special.']['parserFunction']:'htmlspecialchars');

		/*
		* Retrieve conf variables for css definitions
		*/
		// RICC begin -> Do it the more easy way without ifs via std t3 api funcs.
		// You have just to cut the PATH_site for getting the real relative urls.
		// Now you can overwrite it easily within your own TS setup
		// (I experienced problems with that on my systems) and it
		// is better for strange installations (realurl; subfolder installation of t3)
		// 2008-05-30: Added possibility to configure js-library for compressed versions etc.
		$this->cssCalendar		= str_replace(PATH_site,'',t3lib_div::getFileAbsFileName($this->conf['file.']['cssCalendar']));
		$this->cssContextMenu	= str_replace(PATH_site,'',t3lib_div::getFileAbsFileName($this->conf['file.']['cssContextMenu']));
		$this->jsContextMenu	= str_replace(PATH_site,'',t3lib_div::getFileAbsFileName($this->conf['file.']['jsContextMenu']));
		$this->jsJQuery			= str_replace(PATH_site,'',t3lib_div::getFileAbsFileName($this->conf['file.']['jsJQuery']));
		$this->jsDateChanger	= str_replace(PATH_site,'',t3lib_div::getFileAbsFileName($this->conf['file.']['jsDateChanger']));

		// Here are the old ones
		//$this->cssCalendar		= ($this->conf['file.']['cssCalendar']		=='EXT:newscalendar/res/calendar.css'		?t3lib_extMgm::extRelPath('newscalendar').'res/cssCalendar.css':$this->conf['file.']['cssCalendar']);
		//$this->cssContextMenu	= ($this->conf['file.']['cssContextMenu']	=='EXT:newscalendar/res/cssContextMenu.css'	?t3lib_extMgm::extRelPath('newscalendar').'res/cssContextMenu.css':$this->conf['file.']['cssContextMenu']);
		// RICC end

		// Aditional file include.
		$GLOBALS['TSFE']->additionalHeaderData['tx_newscalendar_inc'] = '<link href="'.$this->cssCalendar.'" rel="stylesheet" type="text/css" />'."\n".
																		'<link href="'.$this->cssContextMenu.'" rel="stylesheet" type="text/css" />'."\n";

		/* 
		* Set template file for list view
		*/
		// RICC begin -> Do it the most easiest way via t3 api funcs.
		// Now you can overwrite it easily within your own TS setup -> see above
		$this->listViewTemplate = $this->cObj->fileResource($this->conf['file.']['listView.']['listViewTemplate']);
		// RICC end

		/*
		* Retrieve Flexform variables
		*/
		// List or Calendar
		$this->displayType = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'displayType', 'sDEF');
		if($this->conf['render.']['displayType'])
			$this->displayType = $this->conf['render.']['displayType'];
		// Show link to list
		$this->monthLinkDisplay = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'monthLinkDisplay', 'sDEF');
		if($this->conf['render.']['monthLinkDisplay'])
			$this->monthLinkDisplay = $this->conf['render.']['monthLinkDisplay'];
		// Uid of list page
		$this->listPage = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'listPage', 'sDEF');
		if($this->conf['render.']['listPage'])
			$this->listPage = $this->conf['render.']['listPage'];
		// News item single view
		$this->singleView = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'destinationPage', 'sDEF');
		if($this->conf['render.']['singleView'])
			$this->singleView = $this->conf['render.']['singleView'];
		// Single news item backpage
		$this->backPage = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'backPage', 'sDEF');
		if($this->conf['render.']['backPage'])
			$this->backPage = $this->conf['render.']['backPage'];
		// Starting point for news records
		$this->startingPoint = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'pidList', 'sDEF');
		if($this->conf['render.']['startingPoint'])
			$this->startingPoint = $this->conf['render.']['startingPoint'];
		// Recursion for starting point
		$this->recursion = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'recursion', 'sDEF');
		if($this->conf['render.']['recursion'])
			$this->recursion = $this->conf['render.']['recursion'];
		// Day length
		$this->dayNameLength = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'dayNameLength', 'sDEF');
		if($this->conf['render.']['dayNameLength'])
			$this->dayNameLength = $this->conf['render.']['dayNameLength'];
		// Context menu link type
		$this->contextMenuLink = $this->pi_getFFvalue($this->cObj->data['pi_flexform'], 'contextMenuLink', 'sDEF');
		if($this->conf['render.']['contextMenuLink'])
			$this->contextMenuLink = $this->conf['render.']['contextMenuLink'];

		/*
		* Get the PID from which to make the menu.
		*/

		if ($this->startingPoint) {
			// If a page is set as reference in the 'Startingpoint' field, use that
			$this->menuPid = $this->startingPoint;
		}else{
			// Otherwise use the page's id-number from TSFE
			$this->menuPid = $GLOBALS['TSFE']->id;
		}

		// Define Calendar rendering dates
		$this->calendarYear = intval($this->piVars['calendarYear']) ? intval($this->piVars['calendarYear']):$this->thisYear;
		$this->calendarMonth = intval($this->piVars['calendarMonth']) ? intval($this->piVars['calendarMonth']):$this->thisMonth;

		/*
		* Lang configuration
		*/
		// CHANGED BY RICC
		//setlocale(LC_ALL, $GLOBALS['TSFE']->tmpl->setup['config.']['locale_all']);
		setlocale(LC_ALL, $GLOBALS['TSFE']->tmpl->setup['config.']['locale_all'].".".$GLOBALS['TSFE']->tmpl->setup['config.']['renderCharset']);
		// END CHANGED BY RICC


	   // Build select array.
		if($this->displayType != 2)
			$this->buildCalendarArray(1);
		return $this->calendarEngine();
		
	}

	// +---------------------------------------------------------
	// | Calendar array 
	// +---------------------------------------------------------
	function buildCalendarArray($mode){
		// Define the list of pages to search for recently changed content (999 depth level).
		$this->search_list = $this->pi_getPidList($this->menuPid,$this->recursion);

		// Display only records that are active.
		$this->splitQuery = 'AND tx_newscalendar_state = 1';
		// If showAllRecors is active, display all records.
		if($this->conf['show.']['allRecords'])
			$this->splitQuery = '';


		// Prevent interval item rendering on normal list view.
		$firstDate	= strtotime($this->calendarYear.'-'.$this->calendarMonth.'-01');
		$lastDay	= date('t',$firstDate);
		$lastDate	= strtotime($this->calendarYear.'-'.$this->calendarMonth.'-'.$lastDay);
		$queryInterval ='OR (tx_newscalendar_calendardate_end >= '.$firstDate.' '.')';
		if($this->displayType == 2)
			$queryInterval = '';

		// Language query setup
		if ($this->sys_language_mode == 'strict' && $GLOBALS['TSFE']->sys_language_content) {
			// Just news in the same language
			$langClause = 'sys_language_uid = ' . $GLOBALS['TSFE']->sys_language_content;
		} else {
			// sys_language_mode != 'strict': If a certain language is requested, select only news-records in the default language. The translated articles (if they exist) will be overlayed later in the list or single function.
			$langClause = 'sys_language_uid IN (0,-1)';
		}

		$this->where =	$langClause . ' ' .
						'AND ((	FROM_UNIXTIME((CASE tx_newscalendar_calendardate WHEN "0" THEN datetime ELSE tx_newscalendar_calendardate END),"%Y") = '.intval($this->calendarYear).' '.
								'AND FROM_UNIXTIME((CASE tx_newscalendar_calendardate WHEN "0" THEN datetime ELSE tx_newscalendar_calendardate END),"%c") = '.intval($this->calendarMonth).') '.
						$queryInterval.' '.
								') '.
						$this->splitQuery .' '.
						$this->cObj->enableFields('tt_news');

		// RICC begin -> changed resultset to retrieve more data from the tt_news record
		$res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
						'uid,
						pid,
						sys_language_uid,
						title,
						datetime,
						tx_newscalendar_calendardate_end,
						tx_newscalendar_calendardate,
						short,
						image,
						bodytext,
						page,
						type,
						ext_url',
						'tt_news',
						$this->where . ' AND pid in (' . $this->search_list . ')',
						'',
						'tx_newscalendar_calendardate, datetime ASC',
						''
		);

		$this->globalRes = $res;

		if($mode == 1){
			// Fill array with result set.
			// CHANGED BY RICC FROM '1' to '0'
			$arrayCounter = 0;

			while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)){

				// Default values
				// CHANGED BY RICC: THE DEFAULT VALUES NOT NEEDED AS THEY PRODUCE EMPTY CALENDAR ENTRIES SOMETIMES!
				//$resultList [$arrayCounter]['type'] = $row['type'];
				//$resultList [$arrayCounter]['page'] = $row['page'];
				//$resultList [$arrayCounter]['ext_url'] = $row['ext_url'];

				// get the translated record if the content language is not the default language
				if ($GLOBALS['TSFE']->sys_language_content) {
					// $OLmode = ($this->sys_language_mode == 'strict'?'hideNonTranslated':'');
					$OLmode = $GLOBALS['TSFE']->tmpl->setup['config.']['sys_language_overlay'];
					$row = $GLOBALS['TSFE']->sys_page->getRecordOverlay('tt_news', $row, $GLOBALS['TSFE']->sys_language_content, $OLmode);
				}

				// Choose startdate, preference for tx_newscalendardate over datetime.
				$finalStartDate = ( $row['tx_newscalendar_calendardate'] ? $row['tx_newscalendar_calendardate'] : $row['datetime'] );

				if ( $this->calendarYear == date( 'Y', $finalStartDate ) && $this->calendarMonth == date( 'n', $finalStartDate ) ) {
					$resultList [$arrayCounter]['uid']		= $row['uid'];
					$resultList [$arrayCounter]['title']	= $row['title'];
					$resultList [$arrayCounter]['monthday']	= date('j', $finalStartDate );
					$resultList [$arrayCounter]['enddate']	= $row['tx_newscalendar_calendardate_end'];
					$resultList [$arrayCounter]['datetime']	= $finalStartDate;
					$arrayCounter ++;
				}
				if ( $row['tx_newscalendar_calendardate_end'] > 0 ) {
					$startDate	= date( 'Y-m-d', $finalStartDate );
					$endDate	= date( 'Y-m-d', $row['tx_newscalendar_calendardate_end']);
					$daysBetween = $this->GetDays( $startDate, $endDate, $row['uid'] );
					while($date = each( $daysBetween )) {
						if ( $startDate != $date[1] ) {
							$timeDate = strtotime( $date[1] . date(' H:i', $finalStartDate ) );
							if ( $this->calendarYear == date( 'Y', $timeDate ) && $this->calendarMonth == date( 'n', $timeDate ) ) {
								$resultList [$arrayCounter]['uid']		= $row['uid'];
								$resultList [$arrayCounter]['title']	= $row['title'];
								$resultList [$arrayCounter]['monthday']	= date('j',$timeDate);
								$resultList [$arrayCounter]['enddate']	= 0;
								$resultList [$arrayCounter]['datetime']	= $timeDate;
								$arrayCounter ++;
							}
						}
					}
				}
			}
	
			# sort alphabetically by name 
			if(is_array($resultList)) {
				usort($resultList, array($this,'compare_datetime'));
			}
			$this->resultListCount = count($resultList);
			$this->resultList = $resultList;

		}
		return;
	}
	/**
	 * The calendarQuery method of the PlugIn
	 *
	 * @param	int		$year: The year for the calendar
	 * @param	int		$month: The month for the calendar
	 * @return	The content for the calendar that is displayed on the website
	 */ 
	function calendarEngine(){
		global $TSFE;

		$this->previousNews = intval($this->piVars['tt_news']);

		// Thanks to Максим Левицкий ( Maxim Levicky )
		// TODO: Move to header section
		if ( $this->conf['calendar.']['dateChanger'] )
		{
			$contextScript .= '<script type="text/javascript" src="'.$this->jsJQuery.'"></script>' . "\n";
			$contextScript .= '<script type="text/javascript" src="'.$this->jsDateChanger.'"></script>' . "\n";
		}

		// RICC begin -> changed for TypoScript configurable context js
		$contextScript .= '<script type="text/javascript" src="'.$this->jsContextMenu.'"></script><script type="text/javascript">' . "\n";
		$contextScript .= "RightContext.menuTriggerEvent = '".$this->contextMenuLink."';" . "\n";
		// RICC end

		if(is_array($this->resultList)){
			reset($this->resultList);
			while (list($key, $val) = each($this->resultList)) {
				$contextScript.= $this->buildContextMenu($val['monthday']);
			}
		}
		if(is_array($this->resultList)){
			reset($this->resultList);
			while (list($key, $val) = each($this->resultList)) {
				$dateTime = $val['monthday'];
				$contextScript .= 'RightContext.addMenu("idMenu'.$dateTime.'", menu'.$dateTime.');';
	
				if ($this->thisDay==$dateTime && $this->thisYear==$this->calendarYear && $this->thisMonth==$this->calendarMonth){
					$daysLinkArray[$dateTime] = array('idMenu'.$dateTime,'linked_today');
				}else{
					$daysLinkArray[$dateTime] = array('idMenu'.$dateTime,'linked_day');
				}
			}
		}
		$contextScript .= "RightContext.initialize();</script>";

		/*
		* Set tt_news to the previous id so it sticks on navigation.
		*/
		$this->piVars['tt_news'] = $this->previousNews;

		/*
		* Reset pointer.
		*/
		$this->previousNews = intval($this->piVars['pointer']);
		$this->piVars['pointer']=null;

		/*
		* Set date values for previous link.
		*/		
		$this->piVars['calendarYear'] =($this->calendarMonth==1?$this->calendarYear-1:$this->calendarYear);
		$this->piVars['calendarMonth'] = ($this->calendarMonth==1?12:$this->calendarMonth-1);

		/* 
		* Build previous link  
		*/
		$this->linkPrev = $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0);

		/*
		* Set date values for next link.
		*/		
		$this->piVars['calendarYear'] =($this->calendarMonth==12?$this->calendarYear+1:$this->calendarYear);
		$this->piVars['calendarMonth'] = ($this->calendarMonth==12?1:$this->calendarMonth+1);
		
		/* 
		* Build next link  
		*/
		$this->linkNext = $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0);

		/*
		* Reset date values. 
		*/		
		$this->piVars['calendarYear'] = $this->calendarYear;
		$this->piVars['calendarMonth'] = $this->calendarMonth;

		/*
		* If $this->listPage is set then we will build calendar with link to month view.
		*/

		if ($this->listPage){

			$this->piVars['startingPoint'] = $this->startingPoint;
			$this->piVars['recursion'] = $this->recursion;

			$this->linkList = $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0, $this->listPage);
		}

		/*
		* Reset pointer.
		*/
		$this->piVars['pointer']=$this->previousNews;

		$this->np = array('&laquo;' => $this->linkPrev,'&raquo;' => $this->linkNext);


		$calendar = $this->generate_calendar($this->calendarYear, $this->calendarMonth, $daysLinkArray, $this->dayNameLength,($this->listPage?$this->linkList:NULL),$this->conf['calendar.']['startWeekDay'],$this->np);
		#return $this->pi_wrapInBaseClass($content);

		switch($this->displayType){
		case 1:
			return $this->pi_wrapInBaseClass($calendar.$contextScript);
		case 3:
			return $this->pi_wrapInBaseClass($this->listView());
		default:
			return $this->pi_wrapInBaseClass($this->listViewNormal());
		}
	}
	/**
	 * The buildContextMenu method of the PlugIn
	 *
	 * @param	int		$day: The day for news
	 * @param	varchar		$newslist: The list (comma separated value) of news to build the context menu
	 * @return	The javascript to build menus
	 */
	function buildContextMenu($day)	{
		$displayDate		= mktime(0, 0, 0, $this->calendarMonth, $day, $this->calendarYear);
		$checkDate			= date('Y-m-d',$displayDate);

		$displayDate		= $this->convertSpecialCharacters(strftime($this->conf['calendar.']['strftime.']['contextHeader'], $displayDate));

		$contextMenuScript	= 'menu'.$day.' = { attributes: "x,y" ,items: [ {type:RightContext.TYPE_TEXT,	text: "'.$displayDate.'"},';

		// Day array.
		$this->dayArray = '';
		$evalArray = $this->resultList;
		reset($evalArray);
		$i = 1;
		while (list($key, $val) = each($evalArray)) {
			$recordDate = date('Y-m-d',$val['datetime']);
			if($recordDate == $checkDate){
				$this->dayArray[$i] = $val;
				$i++;
			}
		}

		// We just process if array contains results.
		// This is because count function return 1 when counting a empty array
		if ( is_array( $this->dayArray ) ) {
			$dayArrayCount = count($this->dayArray);
			$rowCount	= $dayArrayCount;
			$rowLine	= 1;
			$i			= 1;
			while($i <= $rowCount) {
				$newsTime					= $this->xmlEntities(strftime($this->conf['calendar.']['strftime.']['contextItem'], $this->dayArray[$i]['datetime']).' - '. $this->dayArray[$i]['title']);
				$this->piVars['tt_news']	= $this->dayArray[$i]['uid'];
				$this->piVars['backPid']	= $this->backPage;
	
				// Set default news type context menu link
				$url = $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0,$this->singleView);
				$url = t3lib_div::getIndpEnv('TYPO3_REQUEST_DIR').$url;
	
				// Set special news type context menu link (local page)
				if ( $this->dayArray[$i]['type'] == 1 ) {
					$this->pi_linkTP('dummy',$urlParameters=array(),$cache=0,$this->dayArray[$i]['page']);
					$url = $this->cObj->lastTypoLinkUrl;
				}
	
				// Set special news type context menu link (external url)
				if ( $this->dayArray[$i]['type'] == 2 ) {
					$url = $this->dayArray[$i]['ext_url'];
				}
	
				// Validate link if "ext:realurl" is installed.
				// Original ideia and implementation  - Vera Spiegel.
				// if(t3lib_extMgm::isLoaded('realurl'))
				//	$url = 'http://'.t3lib_div::getIndpEnv('HTTP_HOST').'/'.$url;
	
				$contextMenuScript .= '{type:RightContext.TYPE_MENU,text:"'.str_replace('"','\"',$newsTime).'",	url:"'.$url.'" }';
				if ($rowCount<>$rowLine) {
					$contextMenuScript .= ','."\n";
				}
	
				$i++;
				$rowLine++;
			}
		}

		$contextMenuScript .= ']};';
		return $contextMenuScript;
	}


	# PHP Calendar (version 2.3), written by Keith Devens
	# http://keithdevens.com/software/php_calendar
	#  see example at http://keithdevens.com/weblog
	# License: http://keithdevens.com/software/license
	
	function generate_calendar($year, $month, $days = array(), $day_name_length = 3, $month_href = NULL, $first_day = 0, $pn = array()){
		/*
		* Add language add-ons for calendar
		*/
		global $LANG;
		if ( $this->conf['calendar.']['timeZone'] )
			date_default_timezone_set($this->conf['calendar.']['timeZone']);
		$first_of_month = mktime(0,0,0,$month,1,$year);
		#remember that mktime will automatically correct if invalid dates are entered
		# for instance, mktime(0,0,0,12,32,1997) will be the date for Jan 1, 1998
		# this provides a built in "rounding" feature to generate_calendar()

		$day_names = array(); #generate all the day names according to the current locale
		for($n=0,$t=(3+$first_day)*86400; $n<7; $n++,$t+=86400) #January 4, 1970 was a Sunday
			$day_names[$n] = $this->convertSpecialCharacters(ucfirst(strftime('%A',$t))); #%A means full textual day name
		list($month, $year, $month_name, $weekday) = explode(',',strftime('%m,%Y,%B,%w',$first_of_month));
		$weekday = ($weekday + 7 - $first_day) % 7; #adjust for $first_day
		$title = $this->convertSpecialCharacters(ucfirst($month_name)).'&nbsp;'.$year;

		#note that some locales don't capitalize month and day names
		$this->listHeader = $this->convertSpecialCharacters(ucfirst(strftime($this->conf['listView.']['strftime.']['main'],$first_of_month)));


		#Begin calendar. Uses a real <caption>. See http://diveintomark.org/archives/2002/07/03
		@list($p, $pl) = each($pn); @list($n, $nl) = each($pn); #previous and next links, if applicable
		// Added &no_cache=1 to the link, now the site can be cachable and only if a user click on nextmonth/previousmonth
		// the site will not be cached and the month navigator will work fine
		// "Markus Waskowski" growing-media.de

		// Possible to deactivate &no_cache=1 (http://bugs.typo3.org/view.php?id=8810)
		$cacheAdd = '';
		if ( $this->conf['calendar.']['addNoCache2Navigation'] )
		{
			$cacheAdd = '&no_cache=1';
		}

		if($p) $p = ($pl ? '<a href="'.$this->convertSpecialCharacters($pl) . $cacheAdd . '" title="'.$this->pi_getLL("calPrev").'">'.$p.'</a>' : $p);
		if($n) $n = ($nl ? '<a href="'.$this->convertSpecialCharacters($nl) . $cacheAdd . '" title="'.$this->pi_getLL("calNext").'">'.$n.'</a>' : $n);
		// Thanks to Patrick Gaumond and his team for the fix on month display.
		$calendar = '<table class="calendar-table" cellpadding="0" cellspacing="0">'."\n".
				'<tr>'."\n".'
					<td class="columPrevious">'.$p.'</td>
					<td colspan="5" class="columYear">'."\n".'
						'.($month_href ? '<a href="'.$this->convertSpecialCharacters($month_href).'" title="'.$this->pi_getLL("calYear").' - '.$title.'">'.$this->listHeader.'</a>' : $this->listHeader).'
					</td>
					<td class="columNext">'.$n.'</td>
				</tr><tr>';
		if($day_name_length){ #if the day names should be shown ($day_name_length > 0)
			#if day_name_length is >3, the full name of the day will be printed
			foreach($day_names as $d)
				// ACTIVE SOLUTION Software AG
				// Use the correct byte length for the given character count (see t3lib_cs and tslib_fe) using csConvObj.
				$calendar .= '<th abbr="'.$this->convertSpecialCharacters($d).'">'.$this->convertSpecialCharacters($day_name_length <= 4 ? $GLOBALS['TSFE']->csConvObj->substr($GLOBALS['TSFE']->renderCharset,$d,0,$day_name_length) : $d).'</th>';
			$calendar .= "</tr>\n<tr>";
		}
	
		if($weekday > 0) {
		  $calendar .= '<td colspan="'.$weekday.'">&nbsp;</td>'; #initial 'empty' days
		}
		for($day=1,$days_in_month=date('t',$first_of_month); $day<=$days_in_month; $day++,$weekday++){
			if($weekday == 7){
				$weekday   = 0; #start a new week
				$calendar .= "</tr>\n<tr>";
			}

			// Changed render of link for compliance with context menu 
			// RICC begin -> exclude past events from calendar uf set in TS
			$today = date("Ymd");
			$myDay = strlen($day)==1?'0'.$day:$day;
			$renderDay = $year . $month . $myDay;
			if ($this->conf['calendar.']['hideIfInPast'] && $today > $renderDay) {
			  $makeLink = 0;
			} else { $makeLink = 1; }
			//RICC end
			if(isset($days[$day]) and is_array($days[$day]) && $makeLink == 1) {
				@list($link, $classes, $content) = $days[$day];
				if(is_null($content))  $content  = (strlen($day)==1?'0'.$day:$day);
				$calendar .= '<td>'.
					($link ? '<div id="'.$link.'" class="'.$this->convertSpecialCharacters($classes).'" title="'.$this->pi_getLL("readmore").' '.$content.'">'.$content.'</div>' : $content).'</td>';
			}
			else {
				$newDay = (strlen($day)==1?'0'.$day:$day);

				if ($this->thisDay==$newDay && $this->thisYear==$year && $this->thisMonth==$month){
					$calendar .= '<td><div class="linked_today_nolink" >'.$newDay.'</div></td>';
				}else{
					$calendar .= "<td>$newDay</td>";
				}
			}
		}
		if($weekday != 7) $calendar .= '<td colspan="'.(7-$weekday).'">&nbsp;</td>'; #remaining "empty" days
	
		if ($this->monthLinkDisplay ==1){
			$calendar .='
				</tr>
				<tr>
					<td colspan="7"  class="bottomMonthLink">';
			$calendar .= '
						<a href="'.$this->convertSpecialCharacters($month_href).'" title="'.$this->pi_getLL("calYear").' - '.$title.'">'.$this->pi_getLL("calYear").'</a>
					</td>
				</tr>';
		} else {
			$calendar .='</tr>';
		}

		return $calendar."</table>\n";
	}


	/**
	     * Shows a list of database entries
	     *
	     * @param    string        $content: content of the PlugIn
	     * @param    array        $conf: PlugIn Configuration
	     * @return    HTML list of table entries
	     */
	function listView(){
		/*
		if(!$this->piVars['startingPoint']){
		    return;
		};
		*/
		$this->conf['pidList']		= intval($this->piVars['startingPoint']);
		$this->conf['recursive']	= intval($this->piVars['recursion']);
		$this->pi_loadLL();	// Loading the LOCAL_LANG values

		if (!isset($this->piVars['pointer'])) {
			$this->piVars['pointer']=0;
		}
		if (!isset($this->piVars['mode'])) {
			$this->piVars['mode']=1;
		}

		// Put the whole list together:
		$fullTable				= '';	// Clear var;
		$templateMarker			= '###NEWSCALENDAR_LISTVIEW###';
		$template				= $this->cObj->getSubpart($this->listViewTemplate, $templateMarker);
		$marker['###HEADER###']	= $this->listHeader;

		$totalResults = $this->resultListCount;
		if($totalResults > 0){
			$marker['###BODY###']=
			// Adds the whole list table
			$this->makelist();
		}else{
			$marker['###BODY###']=$this->pi_getLL("noResults");
		}
		
		$fullTable.=$this->cObj->substituteMarkerArray($template,$marker);

		// Returns the content from the plugin.
		return $fullTable;
	}

	/**
	 * Creates a list from a database query
	 *
	 * @param    ressource    $res: A database result ressource
	 * @return    A HTML list if result items
	 */
	function makelist(){
		$templateMarker	= '###NEWSCALENDAR_LISTVIEW_ITEM_HEADER###';
		$template	= $this->cObj->getSubpart($this->listViewTemplate, $templateMarker);

		$out = '<div'.$this->pi_classParam('listrow').'>';
		reset($this->resultList);
		$checkDate = 0;
		while (list($key, $val) = each($this->resultList)) {
			$recordDate = date('Y-m-d',$val['datetime']);
			$theListItem = $this->makeListItem($val);
			if($recordDate != $checkDate && $theListItem && $theListItem != '') {
				$dayHeader = $this->convertSpecialCharacters(strftime($this->conf['listView.']['strftime.']['header'],$val['datetime']));
				$marker['###HEADER###'] = '<div class="'.$this->extKey.'_dayHeader">'.$dayHeader.'</div>';
				$out .= $this->cObj->substituteMarkerArray($template,$marker);
			}
			$out		.= $theListItem;
			$checkDate	= date('Y-m-d',$val['datetime']);
		}
		$out .= '</div>';
		return $out;
	}
	
	/**
	 * Implodes a single row from a database to a single line
	 *
	 * @return    Imploded column values
	 */
	function makeListItem($val) {
		$this->piVars['tt_news']	= $val['uid'];
		$this->piVars['backPid']	= $this->backPage;
		$templateMarker			= '###NEWSCALENDAR_LISTITEM###';
		$template			= $this->cObj->getSubpart($this->listViewTemplate, $templateMarker);
		$marker['###URL###']		= $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0,$this->singleView);
		$marker['###DATETIME###']	= $this->convertSpecialCharacters(strftime($this->conf['listView.']['strftime.']['item'],$val['datetime']));
		$marker['###TITLE###']		= $val['title'];
		// RICC begin
		// add markers to the listView
		$marker['###IMAGE###']		= $this->makeListImageCode($val['image']);
		if($val['short'] != '') {
		  $marker['###NEWS_SUBHEADER###'] = $this->cObj->stdWrap($val['short'], $this->conf['listView.']['subheader_stdWrap.']);
		} else if ($val['short']=='' && $val['bodytext'] != '') {
		  $marker['###NEWS_SUBHEADER###'] = $this->cObj->stdWrap($val['bodytext'], $this->conf['listView.']['subheader_stdWrap.']);
		}
		// remove past events from listView if new TS property hideIfInPast is true
		if($this->conf['listView.']['hideIfInPast'] && $val['datetime'] < time()) {
		  $out = '';
		} else {
		  $out = $this->cObj->substituteMarkerArray($template,$marker);
		}
		// RICC end
		return $out;
	}

	// Taken from: http://pt2.php.net/manual/en/function.get-html-translation-table.php
	function xmlEntities($s){
	    //build first an assoc. array with the entities we want to match
	    $table1 = get_html_translation_table(HTML_ENTITIES, ENT_QUOTES);
	    
	    //now build another assoc. array with the entities we want to replace (numeric entities)
	    foreach ($table1 as $k=>$v){
	      $table1[$k] = "/$v/";
	      $c = $this->convertSpecialCharacters($k,ENT_QUOTES,"UTF-8");
	      $table2[$c] = "&#".ord($k).";";
	    }
	    
	    //now perform a replacement using preg_replace
	    //each matched value in array 1 will be replaced with the corresponding value in array 2
	    $s = preg_replace($table1,$table2,$s);
	    return $s;
	}

	// Original: http://blog.edrackham.com/php/get-days-between-two-dates-using-php/
	function GetDays($sStartDate, $sEndDate, $id){
	  if ($sStartDate > $sEndDate){
	    echo "NEWSCALENDAR ERROR: Startdate > EndDate<br />";
	    echo "DETECTED ON NEWS RECORD UID - ".$id."<br />";
	    echo "\"You died\" Elmar Hinz";
	    die();
	  }
	  // Firstly, format the provided dates.
	  // This function works best with YYYY-MM-DD
	  // but other date formats will work thanks
	  // to strtotime().
	  $sStartDate = date("Y-m-d", strtotime($sStartDate));
	  $sEndDate = date("Y-m-d", strtotime($sEndDate));
	
	  // Start the variable off with the start date
	  $aDays[] = $sStartDate;
	
	  // Set a â€˜tempâ€™ variable, sCurrentDate, with
	  // the start date - before beginning the loop
	  $sCurrentDate = $sStartDate;

	  // While the current date is less than the end date
	  while($sCurrentDate < $sEndDate){
	    // Add a day to the current date
	    $sCurrentDate = date("Y-m-d", strtotime("+1 day", strtotime($sCurrentDate)));

	    // Add this new day to the aDays array
	    $aDays[] = $sCurrentDate;
	  }
	
	  // Once the loop has finished, return the
	  // array of days.
	  return $aDays;
	}

	// Original: http://www.the-art-of-web.com/php/sortarray/
	function compare_datetime($a, $b) {
		return strnatcmp($a['datetime'], $b['datetime']);
	}
	
	/* ******************************************************
	 * Render list normal view                              *
	 *******************************************************/
	/**
     	* Shows a list of database entries
     	*
     	* @param    string        $content: content of the PlugIn
     	* @param    array        $conf: PlugIn Configuration
     	* @return    HTML list of table entries
     	*/
    	function listViewNormal()    {

		/*
		if(!$this->piVars['startingPoint']){
			return;
		};
		*/

		$this->conf['pidList']	= intval($this->piVars['startingPoint']);
		$this->conf['recursive']= intval($this->piVars['recursion']);
		$this->pi_loadLL();        // Loading the LOCAL_LANG values

		if (!isset($this->piVars['pointer'])) {
		  $this->piVars['pointer']=0;
		}
		if (!isset($this->piVars['mode'])){
		  $this->piVars['mode']=1;
		}

			// Initializing the query parameters:
		       // Number of results to show in a listing.

		$this->internal['results_at_a_time'] = $this->conf['pageBrowser.']['limit'];
		$this->internal['maxPages'] = $this->conf['pageBrowser.']['maxPages'];
		$this->internal['descFlag']= $this->conf['pageBrowser.']['order'];
		$this->internal['orderByList']='datetime';
		$this->internal['orderBy'] = 'datetime';
		$this->internal['pagefloat'] = $this->conf['pageBrowser.']['pagefloat'];
		$this->internal['showFirstLast']=$this->conf['pageBrowser.']['showFirstLast'];
		$this->internal['showRange']=$this->conf['pageBrowser.']['showRange'];
		$this->internal['dontLinkActivePage'] = $this->conf['pageBrowser.']['dontLinkActivePage'];
	
		// Get number of records:
		$this->buildCalendarArray(2);
		$counR = $GLOBALS['TYPO3_DB']->sql_num_rows($this->globalRes);
		$this->internal['res_count'] = $counR;
		$totalResults = $this->internal['res_count'];


		list($this->internal['res_count']) = $counR;

		// Make listing query, pass query to SQL database:
		$res = $this->globalRes;
		$this->internal['currentTable'] = 'tt_news';

			// Put the whole list together:
		$fullTable='';    // Clear var;
		$marker=array();
		$wrapped=array();	
		$templateMarker = '###NEWSCALENDAR_LISTVIEW###';
		$template = $this->cObj->getSubpart($this->listViewTemplate, $templateMarker);
		$marker['###HEADER###']= $this->listHeader;
		// Add a page browser
		$this->browserLanguage();
		if ($totalResults>0){
			$marker['###BODY###']=
			// Adds the whole list table
			$this->makelistNormal($res).
			// Add template engine for rendering list view
			($totalResults>$this->conf['pageBrowser.']['limit']?$this->pi_list_browseresults($this->conf['pageBrowser.']['showResultCount'], $this->conf['pageBrowser.']['tableParams'],$this->wrapArr):null);
		}else{
			$marker['###BODY###']=$this->pi_getLL("noResults");
		}
		
		$fullTable.=$this->cObj->substituteMarkerArray($template,$marker);
			// Returns the content from the plugin.
		return $fullTable;
    }

	/**
     	* Adds language translation to the result search browser
     	*
     	* @param    string        $content: content of the PlugIn
     	* @param    array         $conf: PlugIn Configuration
     	* @return   void
     	*/
	function browserLanguage(){
		$wrapArrFields = explode(',', 'disabledLinkWrap,inactiveLinkWrap,activeLinkWrap,browseLinksWrap,showResultsWrap,showResultsNumbersWrap,browseBoxWrap');
		$this->wrapArr = array();
		foreach($wrapArrFields as $key) {
			if ($this->conf['pageBrowser.'][$key]) {
				$this->wrapArr[$key] = $this->conf['pageBrowser.'][$key];
			}
		}
		if ($this->wrapArr['showResultsNumbersWrap'] && strpos($this->LOCAL_LANG[$this->LLkey]['pi_list_browseresults_displays'],'%s')) {
			// if the advanced pagebrowser is enabled and the "pi_list_browseresults_displays" label contains %s it will be replaced with the content of the label "pi_list_browseresults_displays_advanced"
			$this->LOCAL_LANG[$this->LLkey]['pi_list_browseresults_displays'] = $this->LOCAL_LANG[$this->LLkey]['pi_list_browseresults_displays_advanced'];
		}	
	}

    /**
     * Creates a list from a database query
     *
     * @param    ressource    $res: A database result ressource
     * @return    A HTML list if result items
     */
    function makelistNormal($res)    {
        $items=array();
            // Make list table rows
        while($this->internal['currentRow'] = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)){
            $items[]=$this->makeListItemNormal();
        }
    
        $out = '<div'.$this->pi_classParam('listrow').'>
            '.implode(chr(10),$items).'
            </div>';
        return $out;
    }

    /**
     * Implodes a single row from a database to a single line
     *
     * @return    Imploded column values
     */
    function makeListItemNormal()    {
	$this->piVars['tt_news'] = $this->getFieldContent('uid');
	$this->piVars['backPid'] = $this->backPage;
	$marker=array();
	$wrapped=array();	
	$templateMarker = '###NEWSCALENDAR_LISTITEM###';
	$template = $this->cObj->getSubpart($this->listViewTemplate, $templateMarker);
	$marker['###URL###'] = $this->pi_linkTP_keepPIvars_url($overrulePIvars=array(),$cache=0,$clearAnyway=0,$this->singleView);

	// Set special news type context menu link (local page)
	if ( $this->getFieldContent('type') == 1 ) {
		$this->pi_linkTP('dummy',$urlParameters=array(),$cache=0, $this->getFieldContent('page'));
		$marker['###URL###'] = $this->cObj->lastTypoLinkUrl;
	}

	// Set special news type context menu link (external url)
	if ( $this->getFieldContent('type') == 2 ) {
		$marker['###URL###'] = $this->getFieldContent('ext_url');
	}


	$marker['###DATETIME###']=  $this->convertSpecialCharacters(strftime($this->conf['listView.']['strftime.']['header'],$this->getFieldContent('datetime')));
	$marker['###TITLE###']= $this->getFieldContent('title');
	// RICC begin
	// adding markers
	$marker['###IMAGE###']		= $this->makeListImageCode($this->getFieldContent('image'));
	
	if($this->getFieldContent('short') != '') {
    $marker['###NEWS_SUBHEADER###'] = $this->cObj->stdWrap($this->getFieldContent('short'), $this->conf['listView.']['subheader_stdWrap.']);
  } else if ($this->getFieldContent('short')=='' && $this->getFieldContent('bodytext') != '') {
	  $marker['###NEWS_SUBHEADER###'] = $this->cObj->stdWrap($this->getFieldContent('bodytext'), $this->conf['listView.']['subheader_stdWrap.']);
	}
	// remove past events from listView if new TS property hideIfInPast is true
		if($this->conf['listView.']['hideIfInPast'] && $this->getFieldContent('datetime') < time()) {
		  $out = '';
		} else {
		  $out = $this->cObj->substituteMarkerArray($template,$marker);
		}
		// RICC end

      return $out;
    }

    /**
     * Returns the content of a given field
     *
     * @param    string        $fN: name of table field
     * @return    Value of the field
     */
    function getFieldContent($fN)    {
        switch($fN) {
            default:
                return $this->internal['currentRow'][$fN];
            break;
        }
    }
    /**
     * Returns the label for a fieldname from local language array
     *
     * @param    [type]        $fN: ...
     * @return    [type]        ...
     */
    function getFieldHeader($fN)    {
        switch($fN) {
            
            default:
                return $this->pi_getLL('listFieldHeader_'.$fN,'['.$fN.']');
            break;
        }
    }
    
    /**
     * Returns a sorting link for a column header
     *
     * @param    string        $fN: Fieldname
     * @return    The fieldlabel wrapped in link that contains sorting vars
     */
    function getFieldHeader_sortLink($fN)    {
        return $this->pi_linkTP_keepPIvars($this->getFieldHeader($fN),array('sort'=>$fN.':'.($this->internal['descFlag']?0:1)));
    }

/* CHANGED BY RICC begin
	function convertSpecialCharacters($string){
		switch ($this->parserFunction) {
			case 'htmlspecialchars':
				return htmlspecialchars($string, ENT_QUOTES, 'utf-8');
			case 'skip':
				return $string;
			default:
				return htmlentities($string, ENT_QUOTES, 'utf-8');
		}
	}
*/
	function convertSpecialCharacters($string) {
		switch ($this->parserFunction) {
 			case 'htmlspecialchars':
 				return htmlspecialchars($string, ENT_COMPAT, $GLOBALS['TSFE']->tmpl->setup['config.']['renderCharset']);
 			case 'skip':
 				return $string;
 			default:
 				return htmlentities($string, ENT_QUOTES, $GLOBALS['TSFE']->tmpl->setup['config.']['renderCharset']);
 		}
 	}
// CHANGED BY RICC end
	
	// RICC begin
	// get the image html code via t3 api funcs.
	/**
     * Returns the html for the image(s) in the listView
     *
     * @param    string  $imgFieldContent: Content of the image field
     * @return   string  the whole img code
     */
	function makeListImageCode ($imgFieldContent) {
	  if (!$imgFieldContent) {
	    return '';
	  } else {
      $imagesArray = explode(",", $imgFieldContent);
      $image = $this->uploadFolder . $imagesArray['0'];
		  $imgCode = $this->cObj->cImage($image, $this->conf['listView.']['image.']);  
	    return $imgCode;
	  }
	}
	
	// RICC end

}

if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/newscalendar/pi1/class.tx_newscalendar_pi1.php'])	{
	include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/newscalendar/pi1/class.tx_newscalendar_pi1.php']);
}

?>