mirror of
https://github.com/EGroupware/egroupware.git
synced 2024-12-30 10:39:18 +01:00
171 lines
4.8 KiB
PHP
171 lines
4.8 KiB
PHP
|
<?php
|
||
|
/**
|
||
|
* $Header: /repository/pear/Log/Log/mcal.php,v 1.18 2005/02/26 14:48:58 chagenbu Exp $
|
||
|
* $Horde: horde/lib/Log/mcal.php,v 1.2 2000/06/28 21:36:13 jon Exp $
|
||
|
*
|
||
|
* @version $Revision: 1.18 $
|
||
|
* @package Log
|
||
|
*/
|
||
|
|
||
|
/**
|
||
|
* The Log_mcal class is a concrete implementation of the Log::
|
||
|
* abstract class which sends messages to a local or remote calendar
|
||
|
* store accessed through MCAL.
|
||
|
*
|
||
|
* @author Chuck Hagenbuch <chuck@horde.org>
|
||
|
* @since Horde 1.3
|
||
|
* @since Log 1.0
|
||
|
* @package Log
|
||
|
*/
|
||
|
class Log_mcal extends Log
|
||
|
{
|
||
|
/**
|
||
|
* holding the calendar specification to connect to.
|
||
|
* @var string
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_calendar = '{localhost/mstore}';
|
||
|
|
||
|
/**
|
||
|
* holding the username to use.
|
||
|
* @var string
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_username = '';
|
||
|
|
||
|
/**
|
||
|
* holding the password to use.
|
||
|
* @var string
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_password = '';
|
||
|
|
||
|
/**
|
||
|
* holding the options to pass to the calendar stream.
|
||
|
* @var integer
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_options = 0;
|
||
|
|
||
|
/**
|
||
|
* ResourceID of the MCAL stream.
|
||
|
* @var string
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_stream = '';
|
||
|
|
||
|
/**
|
||
|
* Integer holding the log facility to use.
|
||
|
* @var string
|
||
|
* @access private
|
||
|
*/
|
||
|
var $_name = LOG_SYSLOG;
|
||
|
|
||
|
|
||
|
/**
|
||
|
* Constructs a new Log_mcal object.
|
||
|
*
|
||
|
* @param string $name The category to use for our events.
|
||
|
* @param string $ident The identity string.
|
||
|
* @param array $conf The configuration array.
|
||
|
* @param int $level Log messages up to and including this level.
|
||
|
* @access public
|
||
|
*/
|
||
|
function Log_mcal($name, $ident = '', $conf = array(),
|
||
|
$level = PEAR_LOG_DEBUG)
|
||
|
{
|
||
|
$this->_id = md5(microtime());
|
||
|
$this->_name = $name;
|
||
|
$this->_ident = $ident;
|
||
|
$this->_mask = Log::UPTO($level);
|
||
|
$this->_calendar = $conf['calendar'];
|
||
|
$this->_username = $conf['username'];
|
||
|
$this->_password = $conf['password'];
|
||
|
$this->_options = $conf['options'];
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Opens a calendar stream, if it has not already been
|
||
|
* opened. This is implicitly called by log(), if necessary.
|
||
|
* @access public
|
||
|
*/
|
||
|
function open()
|
||
|
{
|
||
|
if (!$this->_opened) {
|
||
|
$this->_stream = mcal_open($this->_calendar, $this->_username,
|
||
|
$this->_password, $this->_options);
|
||
|
$this->_opened = true;
|
||
|
}
|
||
|
|
||
|
return $this->_opened;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Closes the calendar stream, if it is open.
|
||
|
* @access public
|
||
|
*/
|
||
|
function close()
|
||
|
{
|
||
|
if ($this->_opened) {
|
||
|
mcal_close($this->_stream);
|
||
|
$this->_opened = false;
|
||
|
}
|
||
|
|
||
|
return ($this->_opened === false);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Logs $message and associated information to the currently open
|
||
|
* calendar stream. Calls open() if necessary. Also passes the
|
||
|
* message along to any Log_observer instances that are observing
|
||
|
* this Log.
|
||
|
*
|
||
|
* @param mixed $message String or object containing the message to log.
|
||
|
* @param string $priority The priority of the message. Valid
|
||
|
* values are: PEAR_LOG_EMERG, PEAR_LOG_ALERT,
|
||
|
* PEAR_LOG_CRIT, PEAR_LOG_ERR, PEAR_LOG_WARNING,
|
||
|
* PEAR_LOG_NOTICE, PEAR_LOG_INFO, and PEAR_LOG_DEBUG.
|
||
|
* @return boolean True on success or false on failure.
|
||
|
* @access public
|
||
|
*/
|
||
|
function log($message, $priority = null)
|
||
|
{
|
||
|
/* If a priority hasn't been specified, use the default value. */
|
||
|
if ($priority === null) {
|
||
|
$priority = $this->_priority;
|
||
|
}
|
||
|
|
||
|
/* Abort early if the priority is above the maximum logging level. */
|
||
|
if (!$this->_isMasked($priority)) {
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
/* If the connection isn't open and can't be opened, return failure. */
|
||
|
if (!$this->_opened && !$this->open()) {
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
/* Extract the string representation of the message. */
|
||
|
$message = $this->_extractMessage($message);
|
||
|
|
||
|
$date_str = date('Y:n:j:G:i:s');
|
||
|
$dates = explode(':', $date_str);
|
||
|
|
||
|
mcal_event_init($this->_stream);
|
||
|
mcal_event_set_title($this->_stream, $this->_ident);
|
||
|
mcal_event_set_category($this->_stream, $this->_name);
|
||
|
mcal_event_set_description($this->_stream, $message);
|
||
|
mcal_event_add_attribute($this->_stream, 'priority', $priority);
|
||
|
mcal_event_set_start($this->_stream, $dates[0], $dates[1], $dates[2],
|
||
|
$dates[3], $dates[4], $dates[5]);
|
||
|
mcal_event_set_end($this->_stream, $dates[0], $dates[1], $dates[2],
|
||
|
$dates[3], $dates[4], $dates[5]);
|
||
|
mcal_append_event($this->_stream);
|
||
|
|
||
|
$this->_announce(array('priority' => $priority, 'message' => $message));
|
||
|
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
}
|