debugging functions */
#$serendipity['smarty']->debugging = true;
#$serendipity['smarty']->debugging_ctrl = true;
/* set some GLOBAL vars and enable/disable internal plugin_eventcal debugging */
$serendipity['SERVER']['eventcal_debug'] = FALSE;
#$serendipity['SERVER']['eventcal_debug'] = TRUE;
class serendipity_event_cal extends serendipity_event {
var $title = PLUGIN_EVENTCAL_TITLE;
function cleanup() {
// Cleanup. Remove all empty configs on SAVECONF-Submit.
serendipity_plugin_api::remove_plugin_value($this->instance, array('version', ''));
return true;
}
function introspect(&$propbag) {
global $serendipity;
$propbag->add('name', PLUGIN_EVENTCAL_TITLE);
$propbag->add('description', PLUGIN_EVENTCAL_TITLE_BLAHBLAH);
$propbag->add('stackable', false);
$propbag->add('event_hooks', array(
'frontend_configure' => true,
'external_plugin' => true,
'genpage' => true,
'entry_display' => true,
'entries_header' => true,
'css' => true,
'backend_sidebar_entries' => true,
'backend_sidebar_admin_appearance' => true,
'backend_sidebar_entries_event_display_eventcal' => true,
'css_backend' => true
)
);
$propbag->add('configuration', array(
'permalink',
'pagetitle',
'articleformat',
'headline',
'showintro',
'eventwrapper',
'showcaptcha',
'showical',
'ical_icsurl',
'log_ical',
'log_email'
)
);
$propbag->add('author', 'Ian (Timbalu)');
$propbag->add('version', '1.77.1');
$propbag->add('groups', array('FRONTEND_FEATURES', 'BACKEND_FEATURES'));
$propbag->add('requirements', array(
'serendipity' => '1.4',
'smarty' => '2.6.7',
'php' => '5.1.0'
)
);
$propbag->add('legal', array(
'services' => array(
'mail' => array(
'url' => '#',
'desc' => 'Transmits IP address and ical data via e-mail'
),
),
'frontend' => array(
'Transmits IP address and ical data via e-mail'
),
'backend' => array(
),
'cookies' => array(
),
'stores_user_input' => false,
'stores_ip' => false,
'uses_ip' => true,
'transmits_user_input' => true
));
}
function introspect_config_item($name, &$propbag) {
global $serendipity;
switch ($name) {
case 'permalink':
$propbag->add('type', 'string');
$propbag->add('name', PLUGIN_EVENTCAL_PERMALINK);
$propbag->add('description',PLUGIN_EVENTCAL_PERMALINK_BLAHBLAH);
$propbag->add('default', $serendipity['rewrite'] != 'none'
? $serendipity['serendipityHTTPPath'] . 'pages/eventcal.html'
: $serendipity['serendipityHTTPPath'] . $serendipity['indexFile'] . '?/pages/eventcal.html');
break;
case 'pagetitle':
$propbag->add('type', 'string');
$propbag->add('name', PLUGIN_EVENTCAL_PAGETITLE);
$propbag->add('description', PLUGIN_EVENTCAL_PAGETITLE_BLAHBLAH);
$propbag->add('default', 'eventcal');
break;
case 'articleformat':
$propbag->add('type', 'boolean');
$propbag->add('name', PLUGIN_EVENTCAL_ARTICLEFORMAT);
$propbag->add('description', PLUGIN_EVENTCAL_ARTICLEFORMAT_BLAHBLAH);
$propbag->add('default', '1');
break;
case 'headline':
$propbag->add('type', 'string');
$propbag->add('name', PLUGIN_EVENTCAL_HEADLINE);
$propbag->add('description', PLUGIN_EVENTCAL_HEADLINE_BLAHBLAH);
$propbag->add('default', '');
break;
case 'showintro':
$propbag->add('type', ($serendipity['wysiwyg'] === true ? 'html' : 'text'));
$propbag->add('rows', 3);
$propbag->add('name', PLUGIN_EVENTCAL_SHOWINTRO);
$propbag->add('description', PLUGIN_EVENTCAL_SHOWINTRO_BLAHBLAH);
$propbag->add('default', '');
break;
case 'eventwrapper':
$propbag->add('type', 'boolean');
$propbag->add('name', PLUGIN_EVENTCAL_EVENTWRAPPER);
$propbag->add('description', PLUGIN_EVENTCAL_EVENTWRAPPER_BLAHBLAH);
$propbag->add('default', 'false');
break;
case 'showcaptcha':
$propbag->add('type', 'boolean');
$propbag->add('name', PLUGIN_EVENTCAL_SHOWCAPTCHA);
$propbag->add('description', PLUGIN_EVENTCAL_SHOWCAPTCHA_BLAHBLAH);
$propbag->add('default', 'false');
break;
case 'showical':
$propbag->add('type', 'boolean');
$propbag->add('name', PLUGIN_EVENTCAL_SHOWICAL);
$propbag->add('description', PLUGIN_EVENTCAL_SHOWICAL_BLAHBLAH);
$propbag->add('default', 'false');
break;
case 'ical_icsurl':
$listdl_types = array(
'no' => PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_NO,
'dl' => PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_DL . ' ' . PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_EXPORT,
'wc' => PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_WEBCAL . ' ' . PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_EXPORT,
'ml' => PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_MAIL . ' ' . PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_INTERN,
'ud' => PLUGIN_EVENTCAL_ICAL_ICSURL_INLIST_USER
);
$propbag->add('type', 'select');
$propbag->add('name', PLUGIN_EVENTCAL_ICAL_ICSURL);
$propbag->add('description', PLUGIN_EVENTCAL_ICAL_ICSURL_BLAH . ' ' . PLUGIN_EVENTCAL_ICAL_ICSURL_BLAHBLAH . ' (Webcal-Push usage is still experimental!)');
$propbag->add('default', 'no');
$propbag->add('select_values', $listdl_types);
break;
case 'log_ical':
$propbag->add('type', 'boolean');
$propbag->add('name', PLUGIN_EVENTCAL_ICAL_LOG);
$propbag->add('description', PLUGIN_EVENTCAL_ICAL_LOG_BLAHBLAH);
$propbag->add('default', 'false');
break;
case 'log_email':
$propbag->add('type', 'string');
$propbag->add('name', PLUGIN_EVENTCAL_ICAL_LOG_EMAIL);
$propbag->add('description', PLUGIN_EVENTCAL_ICAL_LOG_EMAIL_BLAHBLAH);
$propbag->add('default', '');
break;
default:
break;
}
return true;
}
/**
* check cross-platform newlines and change them to unix style to insert into database
*
* @param array *|* $value
* @return array *|* $value
*/
function check_newline($v) {
$v = trim($v);
$v = preg_replace("/(\\1 ",
"\\1 ",
"\\1 ",
"\\1"
);
return preg_replace($patterns,$replacements, $text);
}
function htmlPageHeader() {
echo "\n";
echo "\n\n";
}
function htmlPageFooter() {
echo "\n";
echo "\n";
}
/**
* Serendipity_event_cal.php internal debugging function
* @param var array
* @return single-string [$debug]
*/
function show_debug(&$table, $name='unknown') {
$debug = $name . '';
foreach ($table AS $k=>$v) {
if ($v) $debug .= ''.$k.' ';
foreach ($table AS $k2=>$v2) {
if ($v2) $debug .= ''.$v2.' ';
}
$debug .= '
'."\n";
return $debug;
}
/**
* Assign errors and messages to smarty
* @param type string and errtxt array
* @return smarty assigned error messages
*/
function smarty_assign_error($type, $errtext) {
global $serendipity;
switch($type) {
case 'err':
return $serendipity['smarty']->assign(
array(
'is_eventcal_error' => true,
'plugin_eventcal_error' => '' . CAL_EVENT_DB_ERROR_ONE . ' ' . mysql_error() . ' ' . $sql . ' ' . CAL_EVENT_DB_ERROR_ONE . ' ' . mysqli_error($serendipity['dbConn']) . ' ' . $sql . ' ' . htmlentities($v, ENT_QUOTES, 'UTF-8') . "
";
}
return $opt;
}
/**
* build the $sd events array for each day of month or week
*/
function draw_eventdays($a, $ap, $m, $y, &$events, $cw) {
global $serendipity;
$sd = array();
$days = $this->days(); // set days
$start = $this->start_month($y,$m); // set start counting range for monthly view $rows & items
$last = $this->last_day($y,$m); // set last day of current month
$lcw = date("W", $this->first_cw($y)); // set last cw of year
$fcw = $this->cwno($y, $m, 6); // set first cw in current month as int - uses 6 = Friday
if ($cw == $lcw && $m == 1 && $fcw == 0) $fcw = 54; // workaround the problem 52/53 > 0 for cwnm_prev with first cw at year start
if (!isset($day)) $day = 0;
if (($start==5 && $last>30) || ($start==6 && $last>29)) $rows=7; elseif ($start==0 && $last==28) $rows=5; else $rows=6;
for($j=0; $j<$rows; ++$j) {
for($i=1; $i<=7; ++$i) {
if ($j==0) {
$sd[$i]['head'] = $days[$i];
} else {
if ($j==1 && ($i-1)==$start) $day = 1;
$sd[$j]['cwnm'] = $this->cwno($y, $m, $day); // fetch the calendar week numbers as int
if (isset($cw) && $cw != NULL) {
$sd[$j]['cwnm_m'] = sprintf("%02d",$m); // set cw's current month
$sd[$j]['cwnm_y'] = $y; // set cw's current year
$sd[$j]['cwnm_prev'] = sprintf("%02d",date("W", $this->startday_cw($cw, $y))); // set prev cw to navigate in weekly view
$sd[$j]['cwnm_next'] = sprintf("%02d",date("W", $this->startday_cw($cw+2, $y))); // set next cw to navigate in weekly view
$sd[$j]['cwnm_first'] = $fcw; // get range to navigate to previous cw in weekly view this month only
$sd[$j]['cwnm_days'][$i] = ($day !== 0 && $day <= $last) ? $y.'-'.sprintf("%02d",$m).'-'.sprintf("%02d",$day) : 0; // get the range of qualified days
$sd[$j]['cwnm_lastday'] = $y.'-'.sprintf("%02d",$m).'-'.sprintf("%02d",$last); // set last day of month to stop iteration in weekly view
} // if isset cw and day range between 1 and last day end
if ($day && $day <= $last) {
if ($day==date("d") && $m==date("m") && $y==date("Y")) {
$sd[$j]['days'][$i]['col'] = 'today'; // #D5BFC0 todays color - same as show single event day - see tpl plugin_eventcal_cal.tpl
$sd[$j]['days'][$i]['today'] = 'today';
} else {
$sd[$j]['days'][$i]['col'] = 'isday'; // '#f0f0f0'; is valid day - color white - see tpl plugin_eventcal_cal.tpl
$sd[$j]['days'][$i]['today'] = 'blank';
}
$sd[$j]['days'][$i]['label'] = $day;
$sd[$j]['days'][$i]['bcol'] = $sd[$j]['days'][$i]['col']; // no days bgcolor
if (is_array($events[$day]) && !empty($events[$day])) {
foreach($events[$day] as $row) {
if ((int)$row['id']) {
if (isset($cw) && $cw != NULL) { // set CW weeks array fullview for specified month
$sd[$j]['days'][$i]['arrdata'][] = array(
'a' => $a,
'ap' => $ap,
'm' => $m,
'y' => $y,
'id' => $row['id'],
'sdato' => $row['sdato'],
'edato' => $row['edato'],
'sdesc' => $row['sdesc'],
'ldesc' => $this->text_pattern_bbc($row['ldesc']),
'url' => $row['url'],
'app_by' => $row['app_by'],
'tipo' => $row['tipo']
);
} else { // set normal month array
$sd[$j]['days'][$i]['arrdata'][] = array(
'a' => $a,
'ap' => $ap,
'm' => $m,
'y' => $y,
'id' => $row['id'],
'sdesc' => $row['sdesc'],
'tipo' => $row['tipo']
);
}
}
}
}
} else {
$sd[$j]['days'][$i]['label'] = false; // is not valid day - do not show day number
$sd[$j]['days'][$i]['col'] = 'noday'; // '#d0d0d0'; is not valid day - color gray - see tpl plugin_eventcal_cal.tpl
$sd[$j]['days'][$i]['bcol'] = $sd[$j]['days'][$i]['col'];
$sd[$j]['days'][$i]['today'] = false;
}
}
if ($day) $day++;
}
}
return $sd;
} // draw_eventdays() end
/* Various ways to creat a new, random GUID - as Microsoft format in curly brackets */
function create_ical_guid() {
$ical_uid = "{" . uniqid(mt_rand(), true) . "}";
$ical_uid = "{" . date('Ymd').'T'.date('His')."-".rand()."@".$_SERVER['HTTP_HOST']."}";
if (function_exists('com_create_guid')){
$ical_uid = com_create_guid();
}
return isset($ical_uid) ? $ical_uid : false;
}
/* make sure there is no template output in our *.ics file */
function strip_ical_data($string, $start_tag, $end_tag) {
$position = stripos($string, $start_tag);
$str = substr($string, $position);
$str_second = substr($str, strlen($start_tag));
$second_positon = stripos($str_second, $end_tag);
$str_third = substr($str_second, 0, $second_positon);
$fetch_data = trim($str_third);
return $fetch_data;
}
/**
* recursive str_replaces in ical event array, happens to special keys only
*
* @param search = array
* @param replace = string or array
* @param dara = array
* @param search in specific key only = string (optional)
*
* @return array
*/
function str_replace_recursive($search, $replace, &$data, $skey=false) {
if (is_array($data)) {
foreach($data as $key => $value) {
if (is_array($value) ) {
$this->str_replace_recursive($search, $replace, $data[$key], $skey);
} else {
if ($key == $skey || !$skey) $data[$key] = str_replace($search, $replace, $value);
}
}
} else {
$data = str_replace($search, $replace, $arrdata);
}
return isset($data) ? $data : false;
}
/* method "example" creates the file upon configuration */
function example() {
global $serendipity;
// remove an old lang file
if (is_file(dirname(__FILE__) . '/UTF-8/lang_en.inc.php')) {
@unlink(dirname(__FILE__) . '/UTF-8/lang_en.inc.php');
}
$file = $serendipity['serendipityPath'] . 'uploads/icalendar.ics';
if (!file_exists($file)) {
$fp = fopen($file, 'w');
fwrite($fp, 'stuff');
fclose($fp);
return true;
}
return false; // file already exists
}
/* write fetched tpl ical string to file */
function write_file($string_icl) {
global $serendipity;
// write to icalendar.ics file
$fullpath = $serendipity['serendipityPath'] . 'uploads/icalendar.ics';
$filename = 'icalendar.ics';
$filepath = 'uploads/';
if (file_exists($fullpath) && !empty($string_icl) )
return $this->backend_file_write($string_icl, $fullpath, $filename, $filepath, 'w');
else
return false; // file does not exist or error
}
/**
* Write the iLog file and/or send an iCal request log notice to the admin via email
*
* @access
* @param string Admins email address to send the mail to
* @param string The name of the sender - unknown
* @param string If REQUEST via email, email address to send the mail to
* @param int The ID request that has been sent
* @param string The year-month ARRAY request that has been sent
* @param string The title which type of request the user ordered
* @param string The request type which has been sent
* @param boolean If true function is used to send email, else just log to file
* @return boolean Return success of sending the mails
*/
function send_ical_log_email($to, $fromName, $fromEmail, $id, $monthdate, $title, $type, $smail=true) {
global $serendipity;
if (empty($fromName)) {
$fromName = ANONYMOUS;
}
if ($monthdate > 0) {
list($y,$m) = explode('-',$monthdate);
$getid = ( isset($id) && $id > 0 ) ? '&calendar[ev]='.$id : '';
// frontend request - uri to frontend
$entryURI = 'http://' . $_SERVER['HTTP_HOST'] . $this->fetchPluginUri() . (($serendipity['rewrite'] == 'rewrite') ? '?' : '&') . 'calendar[cm]='.$m.'&calendar[cy]='.$y . $getid;
} else {
// admin panel request - uri to ical backend
$entryURI = 'http://' . $_SERVER['HTTP_HOST'] . $serendipity['serendipityHTTPPath'] . 'serendipity_admin.php?serendipity[adminModule]=event_display&serendipity[adminAction]=eventcal&serendipity[eventcalcategory]=adevplad&serendipity[eventcaldbclean]=dbicalall';
}
// set the log vars
$info = 'iCal REQUEST via '. $type;
$sub = date('Y-m-d H:i:s');
$sub2 = 'serendipity_event_cal plugin // iCal request LOG';
$sid = ( isset($id) && $id > 0 ) ? $id : 'none';
$monthdate = $monthdate > 0 ? $monthdate : 'app-all';
$fromEmail = $fromEmail ? $fromEmail : 'none';
// write to ical.log file
$logstring = "$sub, ID=$sid, MONTH=$monthdate, $info, IP=".$_SERVER['REMOTE_ADDR'].", EMAIL=$fromEmail, PATH=$entryURI\n";
$fullpath = $serendipity['serendipityPath'] . 'templates_c/eventcal/ical.log';
$filename = 'ical.log';
$filepath = 'templates_c/eventcal/';
$directory = "eventcal";
if (!is_dir('templates_c/' . $directory)) {
@mkdir('templates_c/' . $directory, 0777);
}
if ( false === ( $wicl = $this->backend_file_write($logstring, $fullpath, $filename, $filepath, 'a') ) ) $nolog = true;
if ($nolog === true) $serendipity['eventcal']['ilogerror'] = true;
$subject = ' // ' . $sub . ' // ' . $sub2 . ' // ' . $title;
$text = "\n" . USER . ' ' . REQUEST_DATE . ': ' . $sub.', '.$serendipity['blogTitle'].', '.$title
. "\n"
. "\n" . USER . ' ' . ARCHIVE_LINK . ': ' . 'link '
. "\n" . USER . ' ' . INFO . ': ' . $info
. "\n"
. "\n" . USER . ' ' . IP_ADDRESS . ': ' . $_SERVER['REMOTE_ADDR']
. "\n" . USER . ' ' . TO_EMAIL . ': ' . $fromEmail
. "\n" . USER . ' ' . ICAL_ID . ': ' . $sid
. "\n" . USER . ' ' . YEAR_MONTH . ': ' . $monthdate
. "\n"
. "\n" . REQUEST_DATE . ': ' . $sub;
$text = ($nolog === true) ? $text . "\n" . PLUGIN_EVENTCAL_ADMIN_LOG_ERROR : $text;
$text = $text . "\n" . '----'
. "\n" . 'brought to you by S9y.org serendipity_event_cal plugin v.' . $serendipity['plugin_eventcal_version'];
if ($smail === true || $nolog === true) return serendipity_sendMail($to, $subject, $text, $fromEmail, null, $fromName);
else return false;
}
/**
* This should work in Outlook 2003/2007, on Exchange Server 2003 Mailboxes, Google Calendar, Google Mail, Hotmail. Tested with Thunderbird/Lightning.
* while s9y serendipity_sendMail() function sets different headers this is a mix of origin and special eventcal needs
*/
function sendIcalEmail($to, $ical, $headers = NULL, $fromName = NULL) {
global $serendipity;
$from_name = $this->title;
$from_address = 'eventcal_noreplay@' . $_SERVER['HTTP_HOST'];
$subject = 's9y@'.$_SERVER['HTTP_HOST'].' Event iCal Request'; //Doubles as email subject and meeting subject in calendar
$env_from = "-f ".trim($to);
//Create Mime Boundry
$mime_boundary = "----$subject----".md5(time());
$message .= "This is a multi-part message in MIME format.\n\n";
$message .= "--$mime_boundary\n";
$message .= "Content-Type: text/plain; charset=UTF-8\n";
$message .= "Content-Transfer-Encoding: 8bit\n\n";
$message .= "Dear User\n\n";
$message .= "Here is your requested iCal file / Used for Eventcal Description\n\n";
$message .= "--$mime_boundary\n\n";
$message .= "--$mime_boundary\n";
$message .= "Content-Type: text/calendar; name=\"icalendar.ics\"; method=REQUEST; charset=UTF-8\n";
$message .= "Content-Transfer-Encoding: 8bit\n\n";
$message .= $ical."\n";
$message .= "--$mime_boundary\n\n";
$message .= "\n\n--{$mime_boundary}\n" .
"Content-Type: text/calendar; method=REQUEST; name=\"icalendar.ics\"; charset=UTF-8\n" .
"Content-Disposition: inline; filename=\"icalendar.ics\"\n" .
"Content-Transfer-Encoding: base64\n\n" .
chunk_split(base64_encode($ical)) . "\n\n" .
"--{$mime_boundary}--\n";
if (is_null($fromName) || empty($fromName)) {
$fromName = $serendipity['blogTitle'];
}
if (is_null($fromMail) || empty($fromMail)) {
$fromMail = $to;
}
if (is_null($headers)) {
$headers = array();
}
// Fix special characters
$fromName = str_replace(array('"', "\r", "\n"), array("'", '', ''), $from_name);
$fromMail = str_replace(array("\r","\n"), array('', ''), $from_address);
// Prefix all mail with weblog title
$subject = '['. $serendipity['blogTitle'] . '] '. $subject;
$maildata = array(
'to' => &$to,
'subject' => &$subject,
'fromName' => &$fromName,
'fromMail' => &$fromMail,
'blogMail' => $serendipity['blogMail'],
'version' => 'Serendipity' . ($serendipity['expose_s9y'] ? '/' . $serendipity['version'] : ''),
'headers' => &$headers,
'message' => &$message,
'env_from' => &$env_from
);
// Check for mb_* function, and use it to encode headers etc. This is a s9y mail behaviour - see functions.inc.php mailfunction */
if (function_exists('mb_encode_mimeheader')) {
$maildata['subject'] = str_replace(array("\n", "\r"), array('', ''), mb_encode_mimeheader($maildata['subject'], LANG_CHARSET));
$maildata['fromName'] = str_replace(array("\n", "\r"), array('', ''), mb_encode_mimeheader($maildata['fromName'], LANG_CHARSET));
}
// Always add these headers
if (!empty($maildata['blogMail'])) {
$maildata['headers'][] = 'From: "'. $maildata['fromName'] .'" <'. $maildata['blogMail'] .'>';
}
$maildata['headers'][] = 'Reply-To: "'. $maildata['fromName'] .'" <'. $maildata['fromMail'] .'>';
if ($serendipity['expose_s9y']) {
$maildata['headers'][] = 'X-Mailer: ' . $maildata['version'];
$maildata['headers'][] = 'X-Engine: PHP/'. phpversion();
}
$maildata['headers'][] = 'Message-ID: <'. md5(microtime() . uniqid(time())) .'@'. $_SERVER['HTTP_HOST'] .'>';
$maildata['headers'][] = 'MIME-Version: 1.0';
// Precedence priority of bulk, junk, or list. These priorities will cause well-designed programs (such as the vacation reply program) to
// skip automatically replying to such messages. Also, this prevents most email servers from returning the message if it cannot be delivered.
$maildata['headers'][] = 'Precedence: bulk';
$maildata['headers'][] = 'Content-Type: multipart/alternative; boundary="'.$mime_boundary.'"; charset=' . LANG_CHARSET;
$maildata['headers'][] = 'Content-class: urn:content-classes:calendarmessage';
// this one gave X-Amavis-Alert: BAD HEADER SECTION, Duplicate header field: "Content-Type"
#$maildata['headers'][] = 'Content-type: text/calendar; method=REQUEST; charset=UTF-8';
$maildata['headers'][] = 'Content-transfer-encoding: 8BIT';
// send the email and return true / false
if (!empty($maildata['to'])) {
return mail($maildata['to'], $maildata['subject'], $maildata['message'], implode("\n", $maildata['headers']), $maildata['env_from']);
}
}
/**
* function draw_icalendar()
*
* @param the optional id of a single event
* @param the month of ical request
* @param the year of ical request
* @param is adminpanel true/false
* @return string ical data from tpl file
*/
function draw_icalendar($id, $month, $year, $adminpanel=false) {
global $serendipity;
if (isset($id) && $id != 0) {
/* build $ical_events array with one single event */
$ical_events[0] = $this->mysql_db_result_sets('SELECT-KEY', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, "id=$id"); // else return db error
} elseif ($adminpanel === false) {
/* build the events ical array, while this is different to the return array from function load_monthly_events() */
$last = $this->last_day($year,$month); // set last day of current month
$month = sprintf("%02d",$month); // make sure month is a two digit number
$last = $this->last_day($year,$month); // set last day of current month
$sel_ym = $year.$month;
$sel_ms = $month.'01';
$sel_ml = $month.$last;
/* SQL WHERE STATMENT: first - recurring elements matching Year Month,
second - recurring elements IN BETWEEN startdate and enddate,
third - single events matching Year Month,
fourth - yearly events matching Year Month, but alternating into future */
// better ToDO: ORDER BY HAVING tipo=2 3 4 5 1 6 which is quite difficult!
$s = "
( ( ( ( DATE_FORMAT(sdato,'%Y%m') = '$sel_ym' ) OR ( DATE_FORMAT(edato,'%Y%m') = '$sel_ym') ) AND tipo BETWEEN 2 AND 5 )
OR ( '$sel_ym' BETWEEN DATE_FORMAT(sdato,'%Y%m') AND DATE_FORMAT(edato,'%Y%m') AND tipo BETWEEN 2 AND 5 )
OR ( sdato BETWEEN '$year-$month-01' AND '$year-$month-$last' AND tipo=1 )
OR ( DATE_FORMAT(sdato,'%m%d') BETWEEN '$sel_ms' AND '$sel_ml' AND tipo=6 AND DATE_FORMAT(sdato,'%Y') <= '$year' )
) ORDER BY tipo ASC";
$ical_events = $this->mysql_db_result_sets('SELECT-ARRAY-KEYS', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, "approved=1 AND $s");
// else return db error
} else {
$ical_events = $this->mysql_db_result_sets('SELECT-ARRAY-KEYS', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, "approved=1");
// else return db error
}
header("Content-Type: text/calendar; charset=UTF-8");
#date_default_timezone_set('UTC'); // dont't use, while we have build-in default timezone override settings in ical tpl
if (is_array($ical_events)) {
// replace tipo with ical RFC 5545 conform BYDAY RRULE - param 4 = search in specific array key
$mty = array('1:1', '1:2', '1:3', '1:4', '1:5', '1:6', '1:7', '2:1', '2:2', '2:3', '2:4', '2:5', '2:6', '2:7', '3:1', '3:2', '3:3', '3:4', '3:5', '3:6', '3:7', '4:1', '4:2', '4:3', '4:4', '4:5', '4:6', '4:7', '-1:1', '-1:2', '-1:3', '-1:4', '-1:5', '-1:6', '-1:7', '-2:1', '-2:2', '-2:3', '-2:4', '-2:5', '-2:6', '-2:7', '-3:1', '-3:2', '-3:3', '-3:4', '-3:5', '-3:6', '-3:7', '5:1', '5:2', '5:3', '5:4', '5:5', '5:6', '5:7');
$ity = array('1SU', '1MO', '1TU', '1WE', '1TH', '1FR', '1SA', '2SU', '2MO', '2TU', '2WE', '2TH', '2FR', '2SA', '3SU', '3MO', '3TU', '3WE', '3TH', '3FR', '3SA', '4SU', '4MO', '4TU', '4WE', '4TH', '4FR', '4SA', '-1SU', '-1MO', '-1TU', '-1WE', '-1TH', '-1FR', '-1SA', '-2SU', '-2MO', '-2TU', '-2WE', '-2TH', '-2FR', '-2SA', '-3SU', '-3MO', '-3TU', '-3WE', '-3TH', '-3FR', '-3SA', 'SU', 'MO', 'TU', 'WE', 'TH', 'FR', 'SA' );
$ical_events = $this->str_replace_recursive($mty, $ity, $ical_events, 'recur');
// replace some special chars as: bbcode ---> LF '\n' to '\\n' is done in tpl with modifier replace - param 4 = search in specific array key
$bbc = array('[b]', '[/b]', '[u]', '[/u]', '[i]', '[/i]', '[s]', '[/s]');
$rep = array('', '', '', '', '', '', '', '');
$ical_events = $this->str_replace_recursive($bbc, $rep, $ical_events, 'ldesc');
}
/**
* generates Outlook compatible REQUEST for the ical METHOD field. The difference here is how the calendaring application will present the
* opened file to the user. If you use REQUEST it will give them a button to Accept or Reject the event. If you use PUBLISH they will be asked
* to save or cancel. These four ical statements seem to be required by MS Outlook:
* CALSCALE:GREGORIAN
* METHOD:REQUEST
* UID: create_ical_guid() is only used, if mysql UUID() function is not available
* DTSTAMP: YmdTHis
*/
$ical_method = ( $this->get_config('ical_icsurl') == 'ml' ||
( $this->get_config('ical_icsurl') == 'ud' && isset($_POST['calendar']['icseptarget']) && isset($_POST['calendar']['icstomail']) )
) ? 'REQUEST' : 'PUBLISH';
$ical_mailfrom = ($mailfrom) ? $mailfrom : '';
// Silence pedantic warnings about missing default TZ settings
if ( function_exists("date_default_timezone_get") ) {
$tz = @date_default_timezone_get();
date_default_timezone_set($tz);
}
// ToDo: tzid server settings to get real and better timezone value in case of returning 'System/Localtime'
if (!$tz || $tz == 'System/Localtime') {
date_default_timezone_set('Europe/Berlin');
$tz = 'Europe/Berlin';
}
$tzdaylight = strftime('%Z');
$tzoffsetfrom = date("O");
// ToDo: give timezone and tzoffsetto the correct values in any cases
$tzoffsetto = "+0200"; //$serendipity['serverOffsetHours'] ? $serendipity['serverOffsetHours'] : "+0200";
$tzname = date("T");
if (!is_object($serendipity['smarty'])) {
serendipity_smarty_init();
}
$serendipity['smarty']->assign(
array(
'ical_events' => $ical_events,
'ical_title' => $this->title . '@' . $_SERVER['HTTP_HOST'],
'ical_desc' => 'S9y serendipity_eventcal_cal plugin v.' . $serendipity['plugin_eventcal_version'],
'ical_method' => $ical_method,
'ical_mailf' => $ical_mailfrom,
'ical_host' => $_SERVER['HTTP_HOST'],
'ical_proid' => '-//S9y@'.$_SERVER['HTTP_HOST'].'//NONSGML s9y.org '.date("Y-m-d H:i:s").' icalendar.ics//'.strtoupper($serendipity['COOKIE']['userDefLang']),
'ical_offset' => $tzoffsetfrom,
'ical_offsetto' => $tzoffsetto,
'ical_tzname' => $tzname,
'ical_tzid' => $tz,
'ical_dtstamp' => date('Ymd').'T'.date('His'),
'ical_uid' => $this->create_ical_guid()
)
);
$icl = $this->parseTemplate('plugin_eventcal_ical.tpl');
$icl = $this->strip_ical_data($icl, '##STARTICAL##', '##ENDICAL##'); // make sure we get rid of every serendipity html output around ical file
return $icl;
}
/**
* Draw the calendar table and switch between different views
*/
function draw_cal( $a, $ap, $app_by, $approved, $cd, $m, $cw, $cw_prev, $cw_next, $y, $day, $eday, $emonth, $ev, $eyear,
$id, $ldesc, $nm, $pcm, &$re, $recur, $recur_day, $sdato, $sday, $sdesc, $smonth,
$syear, $tipo, $tst, $type, $url, $which) {
global $serendipity;
if ($serendipity['SERVER']['eventcal_debug']) {
$dtable = array('a' => $a, 'ap' => $ap, 'app_by' => $app_by, 'approved' => $approved,
'cd' => $cd, 'm' => $m, 'cw' => $cw, 'cw_prev' => $cw_prev,
'cw_next' => $cw_next, 'y' => $y, 'day' => $day, 'eday' => $eday,
'emonth' => $emonth, 'ev' => $ev, 'eyear' => $eyear, 'id' => $id,
'ldesc' => $ldesc, 'nm' => $nm, 'pcm' => $pcm, 're' => $re,
'recur' => $recur, 'recur_day' => $recur_day, 'sdato' => $sdato, 'sday' => $sday,
'sdesc' => $sdesc, 'smonth' => $smonth, 'syear' => $syear, 'tipo' => $tipo,
'type' => $type, 'url' => $url, 'which' => $which, 'tstamp' => $tst);
$serendipity['smarty']->assign('is_eventcal_cal_debug_fdc', $this->show_debug($dtable, PLUGIN_EVENTCAL_CAL));
}
// functions load_monthly(weekly)_events and return add form needs valid month & year values
if ($y == 0 && $m == 0) {
$y = (int)date("Y");
$m = (int)date("m");
} else {
// function start_month & last_day - mktime needs (int) - be sure they are
$m = (int) $m;
$y = (int) $y;
}
if ($pcm == 0) $pcm = $m;
$months = $this->months();
$month = $months[$m];
$events = $this->load_monthly_events($y, $m);
$pm = $m-1;
$nm = $m+1;
$py = $ny = $y;
if ($m == 1) {
$pm = 12;
$py = $y-1;
} else {
$pm = $m-1;
}
if ($m == 12) {
$nm = 1;
$ny = $y+1;
}
if (isset($cw) && $cw != NULL) {
$lcw = date("W", $this->first_cw($y));
if ($cw == $lcw && $m == 1) $y = $y-1;
// set new month and year for month end navigation in weekly view
list($y,$m) = explode('-',date("Y-m", $this->startday_cw($cw+1, $y)));
$y = (int) $y;
$m = (int) $m;
}
$serendipity['smarty']->assign(
array(
'plugin_eventcal_cal_preface' => $this->get_config('showintro'),
'plugin_eventcal_cal_admin' => sprintf(PLUGIN_EVENTCAL_HALLO_ADMIN, $serendipity['serendipityUser'], $serendipity['permissionLevels'][$serendipity['serendipityUserlevel']]),
'plugin_eventcal_cal_path' => $this->fetchPluginUri(),
'plugin_eventcal_cal_imgpath' => $serendipity['serendipityHTTPPath'] . $serendipity['eventcal']['pluginpath'],
'plugin_eventcal_cal_monthviewnav' => true,
'plugin_eventcal_cal_a' => $a,
'plugin_eventcal_cal_ap' => $ap,
'plugin_eventcal_cal_pm' => sprintf("%02d",$pm),
'plugin_eventcal_cal_py' => $py,
'plugin_eventcal_cal_nm' => sprintf("%02d",$nm),
'plugin_eventcal_cal_ny' => $ny,
'plugin_eventcal_cal_m' => sprintf("%02d",$m),
'plugin_eventcal_cal_y' => $y,
'plugin_eventcal_cal_back' => $months[$pm] . ' ' . $py . ' «',
'plugin_eventcal_cal_next' => '» ' . $months[$nm] . ' ' . $ny,
'plugin_eventcal_cal_cmonth' => $month . ' ' . $y,
'plugin_eventcal_cal_entry' => array(
'timestamp' => 1 //, force captchas!
)
)
);
// be sure this is not the weekly CW navigaton call, while this navigates through the existing monthly array only
if ($cw_prev === false && $cw_next === false && $m === $pcm) {
// void
} else {
if ($pcm !== $m) {
if ($m === 1 && $pcm === 12) {
$m = 12;
$y = $y-1;
} else
$m = $m-1;
}
}
// by now, we have created cal debug entries and have set the navigation buttons in monthview
// now we begin to build the calendar table as a monthly table array
$sd = $this->draw_eventdays($a, $ap, $m, $y, $events, $cw);
/* check for a given calendar week number */
if (isset($cw) && $cw != NULL) {
$sdw = $this->load_weekly_events($cw, $y, $sd);
}
/* if ical config setting showical is true, */
if (serendipity_db_bool($this->get_config('showical', 'false')) && is_array($events)) {
// set the ical buttons
$serendipity['smarty']->assign('is_eventcal_ical', true);
// give the chance to direct external_plugin calls in case of not ud (users decision) */
$serendipity['smarty']->assign('plugin_eventcal_icsdl', $this->get_config('ical_icsurl'));
}
/* if user does not want the weekly view (sdw) - fall back to monthly view (sd) */
if (!$sdw) {
/* and assign the event calendar table monthview to smarty */
$serendipity['smarty']->assign('plugin_eventcal_cal_sed', $sd);
} else {
/* and assign the event calendar table weekview to smarty */
$serendipity['smarty']->assign('plugin_eventcal_cal_sedweek', $sdw);
/* fetch the smarty weekly template file */
$weekdata = $this->parseTemplate('plugin_eventcal_calweek.tpl');
/* assign result to our main plugin_eventcal_cal.tpl file */
$serendipity['smarty']->assign('plugin_eventcal_cal_buildweektable', $weekdata);
}
// show single event entry as choosen from event calendar underneath the event calendar table
if ($ev) $sedata = $this->draw_event($ev,$re);
/* get and assign the single entry data page template file */
if (isset($sedata)) {
$serendipity['smarty']->assign('plugin_eventcal_cal_buildsetable', $sedata);
}
// here we beginn to build the buttons for open form and see unapproved events
$serendipity['smarty']->assign('is_eventcal_cal_buildbuttons', true);
// here we beginn to build the buttons for open form and see unapproved events
$serendipity['smarty']->assign('is_eventcal_cal_buildbuttonadd', true);
/* if a user wants to open the event input form, call create form (draw_add) function */
if ($a == 1) {
$add_data = $this->draw_add( $a, $ap, $app_by, $approved, $cd, $day, $eday, $emonth, $ev, $eyear, $id, $ldesc,
$m, $nm, $re, $sday, $sdesc, $smonth, $syear, $tipo, $tst, $type, $url, $which, $y );
}
/* assign count unapproved events to smarty */
$count = $this->mysql_db_result_sets('SELECT-NUM', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, "approved=0");
$serendipity['smarty']->assign('plugin_eventcal_cal_crs', is_array($count) ? $count[0] : '?');
// else return db error
/* get and assign the add form page template file */
if (isset($add_data)) {
$serendipity['smarty']->assign('plugin_eventcal_cal_buildaddtable', $add_data);
}
// here we beginn to build the buttons for open form and see unapproved events
$serendipity['smarty']->assign('is_eventcal_cal_buildbuttonapp', true);
/* if user wants to see the unapproved event manager, call create app manager (draw_app) function */
if ($ap == 1) {
$appdata = $this->draw_app($a, $m, $y, $re, false);
}
/* get and assign the app page template file */
if (isset($appdata)) {
$serendipity['smarty']->assign('plugin_eventcal_cal_buildapptable', $appdata);
}
/* create administration links to logout and restructure the database */
if (serendipity_userLoggedIn()) {
// void;
}
if (is_array($months)) {
echo $this->parseTemplate('plugin_eventcal_cal.tpl');
}
} /* end of draw_cal() function */
/**
* Draw a single event entry
*/
function draw_event($ev, &$re, $noadmin=TRUE) {
global $serendipity;
if ($serendipity['SERVER']['eventcal_debug']) {
$dtable = array('ev' => $ev, 're' => $re);
$serendipity['smarty']->assign('is_eventcal_entry_debug_fdw', $this->show_debug($dtable, 'draw_event()'));
}
$event = $this->mysql_db_result_sets('SELECT-KEY', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, "id=$ev"); // else return db error
$days = $this->days();
/**
* function strip array values: array, keep as name or key, show as form/preview or html page
* @return array [$array]
*/
$event = $this->multi_strip_array_values($event, TRUE, FALSE);
/* here is view function of approved events entries */
switch($event['tipo']) {
case 1:
$de_sdato = explode("-",$event['sdato']);
$de_sd_format = "$de_sdato[2].$de_sdato[1].$de_sdato[0]";
break;
case 2:
$de_sdato = explode("-",$event['sdato']);
$de_sd_format = "$de_sdato[2].$de_sdato[1].$de_sdato[0]";
$de_edato = explode("-",$event['edato']);
$de_ed_format = "$de_edato[2].$de_edato[1].$de_edato[0]";
$de_sd_format = $de_sd_format.' '.PLUGIN_EVENTCAL_TEXT_TO.' '.$de_ed_format;
break;
case 3:
$de_sdato = explode("-",$event['sdato']);
$de_sd_format = "$de_sdato[2].$de_sdato[1].$de_sdato[0]";
$de_edato = explode("-",$event['edato']);
$de_ed_format = "$de_edato[2].$de_edato[1].$de_edato[0]";
$de_sd_format = $de_sd_format.' '.PLUGIN_EVENTCAL_TEXT_TO.' '.$de_ed_format;
list($which,$day) = explode(':',$event['recur']);
$de_sd_format = $de_sd_format . '
';
if (is_array($currmonth)) {
foreach ($currmonth AS $event) {
echo ' '.$event['sdato'].' '.$event['sdesc']."
\n";
}
}
function event_hook($event, &$bag, &$eventData, $addData = null) {
global $serendipity;
$hooks = &$bag->get('event_hooks');
$serendipity['plugin_eventcal_version'] = &$bag->get('version');
if (isset ($hooks[$event])) {
switch ($event) {
case 'frontend_configure':
/* checking if db tables exists, otherwise install them */
$cur = $this->get_config('version');
$cur = (!empty($cur) ? $cur : $this->get_config('dbversion'));
if ($cur == '1.0' && !$this->get_config('dbversion')) {
$this->alter_db($cur);
$this->set_config('dbversion', '1.1');
$this->set_config('version', ''); // unset value to cleanup
$this->cleanup(); // remove_plugin_value - removes empty vars only
} elseif ($cur == '1.1') {
//void
} else {
$this->install();
$this->set_config('dbversion', '1.1');
}
break;
case 'external_plugin':
// [0]=ics_export/sql_export; [1]=id/filename; [2]=month(cm); [3]=year(cy); [4]=case: no, dl, wc, ml, ud; [5] to=email; (optional) [6] ics=all (admin string)
$evc['export'] = explode('/', $eventData);
if (is_array($evc['export']) && $evc['export'][0] == 'sql_export') {
$file = file_get_contents ($serendipity['serendipityPath'] . 'templates_c/eventcal/'.$evc['export'][1]);
echo $file;
header('Status: 302 Found');
header('Content-Type: application/octet-stream; charset=UTF-8'); // text/plain to see as file in browser
header('Content-Disposition: inline; filename='.$evc['export'][1]);
}
if (is_array($evc['export']) && $evc['export'][0] == 'ics_export') {
$adminrequest = isset($evc['export'][6]) ? true : false;
$icl = $this->draw_icalendar($evc['export'][1], $evc['export'][2], $evc['export'][3], $adminrequest);
}
if (isset($icl) && !empty($eventData) && $evc['export'][4] != 'no') {
/* set the ical url location target to s9y/uploads or reload page with sent result */
if ($evc['export'][4] == 'ml' && !$evc['export'][6]) {
$url = $_SERVER['HTTP_HOST'] . $this->fetchPluginUri() . (($serendipity['rewrite'] == 'rewrite') ? '?' : '&') . 'serendipity[mailData]=';
} elseif ($evc['export'][4] == 'ml' && $evc['export'][6] == 'all') {
$url = $_SERVER['HTTP_HOST'] . $serendipity['serendipityHTTPPath'] . 'serendipity_admin.php?serendipity[adminModule]=event_display&serendipity[adminAction]=eventcal&serendipity[eventcalcategory]=adevplad&serendipity[eventcaldbclean]=dbicalall&serendipity[mailData]=';
} else {
$url = $_SERVER['HTTP_HOST'] . $serendipity['serendipityHTTPPath'] . 'uploads/icalendar.ics';
}
/* write the ical string to ics file if not requested as download */
if ($evc['export'][4] != 'dl') $wcal = $this->write_file( $icl );
if (serendipity_db_bool($this->get_config('log_ical'))) {
$ym = $evc['export'][3] . '-' . sprintf("%02d", $evc['export'][2]);
}
$sendmail = $this->get_config('log_email') ? true : false;
switch($evc['export'][4]) {
/* download as file */
case 'dl':
echo $icl;
header('Status: 302 Found');
header('Content-Type: text/calendar; charset=UTF-8');
header("Content-Disposition: inline; filename=icalendar.ics");
// Send mail to the admin if he has set log iCal requests in config to receive these mails
if (serendipity_db_bool($this->get_config('log_ical'))) {
$this->send_ical_log_email($this->get_config('log_email'), '', $evc['export'][5], $evc['export'][1], $ym, 'as ics download', $evc['export'][4], $sendmail);
}
break;
/* send file via webcal */
case 'wc':
if (serendipity_isResponseClean($url) && $wcal === true) {
// Send mail to the admin if he has set log iCal requests in config to receive these mails
if (serendipity_db_bool($this->get_config('log_ical'))) {
$this->send_ical_log_email($this->get_config('log_email'), '', $evc['export'][5], $evc['export'][1], $ym, 'via webcal', $evc['export'][4], $sendmail);
}
header('Status: 302 Found');
header('Content-Type: text/calendar; charset=UTF-8');
header('Location: webcal://' . $url);
}
break;
/* send via email and attachment */
case 'ml':
if (!empty($evc['export'][5]) && $evc['export'][5] != 'none') $to = $evc['export'][5];
else $to = ($this->get_config('log_email')) ? $this->get_config('log_email') : $serendipity['serendipityEmail'];
if (!empty($to) && $to != 'john@example.com') {
//* @param string The validated recipient address of the mail, @param string The ical body part of the mail
$result = $this->sendIcalEmail($to, $icl); //returns true or false
// Send mail to the admin if he has set log iCal requests in config to receive these mails
if (serendipity_db_bool($this->get_config('log_ical'))) {
$this->send_ical_log_email($this->get_config('log_email'), '', $evc['export'][5], $evc['export'][1], $ym, 'as email', $evc['export'][4], $sendmail);
}
}
if (serendipity_isResponseClean($url)) {
header('Location: http://' . $url . ($result ? 1 : 2));
}
break;
default:
break;
}
exit;
}
case 'genpage':
$args = implode('/', serendipity_getUriArguments($eventData, true));
if ($serendipity['rewrite'] == 'rewrite') {
$nice_url = $serendipity['serendipityHTTPPath'] . $args;
} else {
$nice_url = $serendipity['serendipityHTTPPath'] . $serendipity['indexFile'] . '?/' . $args;
}
if (empty($serendipity['GET']['subpage'])) {
$serendipity['GET']['subpage'] = $nice_url;
}
break;
case 'entry_display':
if ($this->selected()) {
if (is_array($eventData)) {
$eventData['clean_page'] = true; // This is important to not display an entry list!
} else {
$eventData = array('clean_page' => true);
}
}
// Silence pedantic warnings about missing default TZ settings
if ( function_exists("date_default_timezone_get") ) {
$tz = @date_default_timezone_get();
date_default_timezone_set($tz);
}
if (version_compare($serendipity['version'], '1.4', '<=')) {
$this->show();
}
break;
case 'entries_header':
// this one really rolls up output
$this->show();
break;
/* put here all you css stuff you need for the frontend of eventcal pages */
case 'css':
if (stristr($eventData, '#eventcal_wrapper')) {
// class exists in CSS, so a user has customized it and we don't need default
return true;
}
$tfile = serendipity_getTemplateFile('style_eventcal.css', 'serendipityPath');
if ($tfile) echo str_replace('{TEMPLATE_PATH}', 'templates/' . $serendipity['defaultTemplate'] . '/', @file_get_contents($tfile));
if (!$tfile || $tfile == 'style_eventcal.css') {
$tfile = dirname(__FILE__) . '/style_eventcal.css';
$frontend_css = str_replace('{TEMPLATE_PATH}', $serendipity['eventcal']['pluginpath'], @file_get_contents($tfile));
}
if (!empty($frontend_css)) {
$this->backend_eventcal_css($eventData, $frontend_css); // append to stream
}
break;
case 'backend_sidebar_entries':
// forbid entry if not admin
if (serendipity_userLoggedIn() && $_SESSION['serendipityAuthedUser'] === true && $_SESSION['serendipityUserlevel'] == '255') {
if ($serendipity['version'][0] < 2) {
echo "\n".' '."\n";
}
}
break;
case 'backend_sidebar_admin_appearance':
// forbid sidebar link if user is not in admin
if (serendipity_userLoggedIn() && $_SESSION['serendipityAuthedUser'] === true && $_SESSION['serendipityUserlevel'] == '255') {
if ($serendipity['version'][0] > 1) {
echo "\n".' ' . PLUGIN_EVENTCAL_ADMIN_NAME . ' \n\n";
echo ''."\n";
if (!isset($serendipity['POST']['eventcaladmin'])) {
echo '
'."\n";
}
$attention = ($serendipity['version'][0] < 2) ? '
' : '
';
$evcat = !empty($serendipity['GET']['eventcalcategory']) ? $serendipity['GET']['eventcalcategory'] : $serendipity['POST']['eventcalcategory'];
/* check for REQUEST and DATE vars, validating data issues */
$reqbuild = $this->backend_check_requests();
switch($evcat) {
case 'adevview':
default:
$url = $serendipity['serendipityHTTPPath'].'serendipity_admin.php?serendipity[adminModule]=event_display&serendipity[adminAction]=eventcal&serendipity[eventcalcategory]=adevview&serendipity[eventcalorderby]=';
echo ($serendipity['version'][0] < 2) ?
'
' . PLUGIN_EVENTCAL_ADMIN_VIEW . ' '
. '
ASC ← ' . PLUGIN_EVENTCAL_ADMIN_VIEW_DESC . '
'
. '
DESC ← ' . PLUGIN_EVENTCAL_ADMIN_ORDERBY_DESC . '
'."\n"
:
'
' . PLUGIN_EVENTCAL_ADMIN_VIEW . ' '
. '
'
. '
'."\n";
/* view all approved events in a table */
$this->backend_eventcal_view($reqbuild);
break;
case 'adevapp':
// catch entry form error
if ($serendipity['eventcal']['setopen'] !== true) {
echo '
' . PLUGIN_EVENTCAL_ADMIN_APP . ' '."\n";
unset($serendipity['eventcal']['setopen']);
} else {
echo '
' . PLUGIN_EVENTCAL_ADMIN_APP . ' ' . PLUGIN_EVENTCAL_ADMIN_APP_DESC . ' '."\n";
}
/* view all approved events in a table */
$this->backend_eventcal_app($reqbuild);
break;
case 'adevadd':
echo '
' . PLUGIN_EVENTCAL_ADMIN_ADD . ' '."\n";
/* check if table exists, so there is nothing to do except some insert stuff */
if ( serendipity_db_query("SHOW TABLES LIKE '{$serendipity['dbPrefix']}eventcal'", true, 'num', false) === false ) {
echo '
' . $attention . PLUGIN_EVENTCAL_ADMIN_DBC_NIXDA_DESC . '!
';
} else {
/* add event form */
$this->backend_eventcal_add($reqbuild);
}
break;
case 'adevilog':
echo '
' . PLUGIN_EVENTCAL_ADMIN_LOG . ' '."\n";
$this->backend_eventcal_log();
break;
case 'adevplad':
echo '
' . PLUGIN_EVENTCAL_ADMIN_DBC . ' '."\n";
if (isset($serendipity['GET']['eventcaldbcleanfreeold']) == 1)
$serendipity['eventcalfreetable'] = true;
else
$serendipity['eventcalfreetable'] = false;
if (isset($serendipity['GET']['eventcaldbcleanfreeinc']) == 1)
$serendipity['eventcalinctable'] = true;
else
$serendipity['eventcalinctable'] = false;
if ($serendipity['dbType'] == 'mysql' || $serendipity['dbType'] == 'mysqli') {
$this->backend_eventcal_dbclean($reqbuild['month'], $reqbuild['year']);
} else echo '
' . $attention . 'Not allowed - wrong DB type!
';
echo "\n\n
' . $attention . sprintf(PLUGIN_EVENTCAL_ADMIN_NORESULT, '') . '
' . $attention . sprintf(PLUGIN_EVENTCAL_ADMIN_NORESULT, PLUGIN_EVENTCAL_ADMIN_NORESULT_APP) . '
' . PLUGIN_EVENTCAL_ADMIN_ERASE . '
' . PLUGIN_EVENTCAL_ADMIN_DBC_TITLE . ' [ ' . PLUGIN_EVENTCAL_ADMIN_DBC_TITLE_DESC . ' ] '."\n";
echo ''."\n";
if (isset($serendipity['eventcal']['ilogerror']) === true) echo '' . $attention . PLUGIN_EVENTCAL_ADMIN_LOG_ERROR . '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_DUMP_TITLE) . ' '."\n";
$url = $_SERVER['HTTP_HOST'] . $adminpath.'&serendipity[eventcaldbclean]=dbdownload&serendipity[eventcalshowdownloads]=dump';
if (serendipity_isResponseClean($url)) {
header('Location: http://' . $url);
}
} else {
echo $this->backend_eventcal_smsg() . PLUGIN_EVENTCAL_ADMIN_DBC_DUMP_MSG . $this->backend_eventcal_emsg();
}
} else {
echo '' . $attention . 'Not allowed - wrong DB type!
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_DUMP_TITLE) . ' '."\n";
if (@$serendipity['GET']['eventcalshowdownloads'] == 'dump')
echo '' . $attention . PLUGIN_EVENTCAL_ADMIN_DBC_DUMP_DONE . "
templates_c/eventcal/ backup files
\n";
echo "\n";
$this->backend_read_backup_dir('templates_c/eventcal/', $adminpath.'&serendipity[eventcaldbclean]=dbdelfile&serendipity[eventcaldbcleanfilename]=');
echo "
\n";
} else {
echo '' . $attention . PLUGIN_EVENTCAL_ADMIN_DBC_DOWNLOAD_MSG . "
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_INSERT_TITLE) . ' '."\n";
echo $this->backend_eventcal_smsg() . '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_ERASE_TITLE) . ' '."\n";
$isTable = $this->droptable() ? true : false; // ok, questionaire
// give back ok
if (isset($serendipity['eventcaldroptable']) === true && $isTable) {
echo ''."\n";
echo '
'."\n";
echo '
'."\n";
echo sprintf(PLUGIN_EVENTCAL_ADMIN_DROP_OK, $serendipity['dbPrefix'].'eventcal');
echo '
'."\n";
echo '
'."\n";
echo '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_DELOLD_TITLE) . ' ';
if ($serendipity['eventcalfreetable'] === false) {
echo $this->backend_eventcal_questionaire(PLUGIN_EVENTCAL_ADMIN_FREE_SURE, $adminpath, '', '&serendipity[eventcaldbclean]=dbdelold&serendipity[eventcaldbcleanfreeold]=1');
} else {
$dnum = $this->backend_eventcal_free_record();
// give back ok else noresult
if ($dnum) {
echo ''."\n";
echo '
'."\n";
echo '
'."\n";
echo sprintf(PLUGIN_EVENTCAL_ADMIN_DBC_DELOLD_MSG, $dnum);
echo '
'."\n";
echo '
'."\n";
echo '
' . $attention . sprintf(PLUGIN_EVENTCAL_ADMIN_NORESULT, PLUGIN_EVENTCAL_ADMIN_NORESULT_FREE) . '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_INCREMENT_TITLE) . ' ';
if ($serendipity['eventcalinctable'] === false) {
echo $this->backend_eventcal_questionaire(PLUGIN_EVENTCAL_ADMIN_CLEAN_SURE . ''."\n";
echo '
'."\n";
echo '
'."\n";
echo sprintf(PLUGIN_EVENTCAL_ADMIN_DBC_INCREMENT_MSG, $srec);
echo '
'."\n";
echo '
'."\n";
echo '
' . $attention . sprintf(PLUGIN_EVENTCAL_ADMIN_NORESULT, PLUGIN_EVENTCAL_ADMIN_NORESULT_FREE) . '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_ICALALL_TITLE) . ' ';
/* return of mailfunction and external_plugin hook send iCal via email */
if (isset($serendipity['GET']['mailData'])) {
if ($serendipity['GET']['mailData'] == 1) {
echo $this->backend_eventcal_smsg() . PLUGIN_EVENTCAL_SENDMAIL_BLAHBLAH . $this->backend_eventcal_emsg();
} else {
echo $this->backend_eventcal_smsg() . PLUGIN_EVENTCAL_SENDMAIL_ERROR .' '. CAL_EVENT_PLEASECORRECT . $this->backend_eventcal_emsg();
}
}
// create external plugin does and donts
if (!isset($serendipity['GET']['mailData'])) {
if ($this->get_config('log_email')) {
//we use $serendipity['serendipityHTTPPath'] like /http_root better than $serendipity['baseURL'] like http://hostname/... while this gets done somewhere else and depends on differences where to sent
$url = $serendipity['serendipityHTTPPath'] . ($serendipity['rewrite'] == 'none' ? $serendipity['indexFile'] . '?/' : '') . 'plugin/ics_export/0/0/0/ml/' . $this->get_config('log_email') . '/all';
echo $this->backend_eventcal_smsg() . PLUGIN_EVENTCAL_ADMIN_ICAL_EMAILLINK . '
\n";
echo '';
echo $this->backend_eventcal_emsg();
}
}
break;
case 'dbicallog':
echo '
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_ILOG_TITLE) . ' ';
if (file_exists('templates_c/eventcal/ical.log')) {
echo 'ical.log - ' . date('Y-m-d H:i:s') . '
';
echo '';
$this->backend_eventcal_highlight_num('templates_c/eventcal/ical.log');
echo '
';
} else {
echo '' . $attention . PLUGIN_EVENTCAL_ADMIN_DBC_ILOG_MSG . '
' . $attention . sprintf(PLUGIN_EVENTCAL_ADMIN_DBC_DELFILE_MSG, $serendipity['GET']['eventcaldbcleanfilename']) . '!
' . strtoupper(PLUGIN_EVENTCAL_ADMIN_DBC_NIXDA_TITLE) . ' ';
echo '' . $attention . PLUGIN_EVENTCAL_ADMIN_DBC_NIXDA_DESC . '!
\n";
echo " \n";
echo " \n$lines\n \n";
echo " \n$content\n \n";
echo " \n";
echo "
\n";
}
/**
*
* check REQUEST & current date vars
*
* @return array
*/
function backend_check_requests() {
global $serendipity;
// form the recurring event array names
if (!isset($re) && !is_array($re)) {
$re = array( 1 => CAL_EVENT_FORM_DAY_FIRST,
2 => CAL_EVENT_FORM_DAY_SECOND,
3 => CAL_EVENT_FORM_DAY_THIRD,
4 => CAL_EVENT_FORM_DAY_FOURTH,
5 => CAL_EVENT_FORM_DAY_EACH,
-1 => CAL_EVENT_FORM_DAY_LAST,
-2 => CAL_EVENT_FORM_DAY_SECONDLAST,
-3 => CAL_EVENT_FORM_DAY_THIRDLAST
);
}
$year = date('Y');
$month = date('m');
$month = sprintf("%02d",$month); // make sure month is a two digit number
/* check for backend administration, validating data and db input issues */
if (isset($_REQUEST['calendar']['cm'])) $cm = (int)$_REQUEST['calendar']['cm'];
if (isset($_REQUEST['calendar']['cy'])) $cy = (int)$_REQUEST['calendar']['cy'];
if (isset($_REQUEST['calendar']['ev'])) $ev = (int)$_REQUEST['calendar']['ev'];
if (!isset($_REQUEST['Submit'])) $_REQUEST['Submit'] = '';
if (isset($serendipity['eventcal']['showsev']) && is_array($serendipity['eventcal']['showsev'])) {
/* event has been validated -> show newly approved single event */
$ev = $serendipity['eventcal']['showsev']['id'];
$cm = $serendipity['eventcal']['showsev']['sm'];
$cy = $serendipity['eventcal']['showsev']['sy'];
unset($serendipity['eventcal']['showsev']);
}
/* Final check for date vars, to start calendar right now */
if (!isset($cm)) $cm = (int)strftime('%m');
if (!isset($cy)) $cy = (int)strftime('%Y');
if (!isset($cd)) $cd = (int)strftime('%d');
if (!isset($ev)) $ev = false;
$req = array('re' => $re, 'year' => $year, 'month' => $month, 'cm' => $cm, 'cy' => $cy, 'ev' => $ev, 'cd' => $cd);
return $req;
}
/**
*
* @param string text - the question text string
* @param string url - the url string to pass
* @param string addno - the add to url string in case of no proceed
* @param string addyes - the add to url string in case of YES
* @return string
*/
function backend_eventcal_questionaire($text, $url, $addno, $addyes) {
global $serendipity;
return $str = $this->backend_eventcal_smsg() . '\n
\n";
}
/**
*
* @return string end html
*/
function backend_eventcal_emsg() {
return $str = "
\n
' : ' ';
$evcat = !empty($serendipity['GET']['eventcalcategory']) ? $serendipity['GET']['eventcalcategory'] : $serendipity['POST']['eventcalcategory'];
/* check for REQUEST and DATE vars, validating data issues */
$reqbuild = $this->backend_check_requests();
switch($evcat) {
case 'adevview':
default:
$url = $serendipity['serendipityHTTPPath'].'serendipity_admin.php?serendipity[adminModule]=event_display&serendipity[adminAction]=eventcal&serendipity[eventcalcategory]=adevview&serendipity[eventcalorderby]=';
echo ($serendipity['version'][0] < 2) ?
'