Calendar functions library | > Module written by Matt Mecham | > Date started: 12th June 2002 | | > Module Version Number: 1.0.0 +-------------------------------------------------------------------------- */ $idx = new calendar; class calendar { var $output = ""; var $base_url = ""; var $html = ""; var $page_title = ""; var $nav; var $chosen_month = ""; var $chosen_year = ""; var $now_date = ""; var $our_datestamp = ""; var $offset = ""; var $start_date = ""; var $first_day_array = ""; var $month_words = array(); var $day_words = array(); function calendar() { global $ibforums, $DB, $std, $print, $skin_universal; $ibforums->lang = $std->load_words($ibforums->lang, 'lang_calendar', $ibforums->lang_id); $ibforums->lang = $std->load_words($ibforums->lang, 'lang_post', $ibforums->lang_id); $this->html = $std->load_template('skin_calendar'); $this->post_html = $std->load_template('skin_post'); //----------------------------------------- // Prep our chosen dates //----------------------------------------- // There is something whacky with getdate and GMT // This handrolled method seems to take into account // DST where getdate refuses. $a = explode( ',', gmdate( 'Y,n,j,G,i,s', time() + $std->get_time_offset() ) ); $this->now_date = array( 'year' => $a[0], 'mon' => $a[1], 'mday' => $a[2], 'hours' => $a[3], 'minutes' => $a[4], 'seconds' => $a[5] ); $this->chosen_month = ( ! intval($ibforums->input['m']) ) ? $this->now_date['mon'] : intval($ibforums->input['m']); $this->chosen_year = ( ! intval($ibforums->input['y']) ) ? $this->now_date['year'] : intval($ibforums->input['y']); //----------------------------------------- // Make sure the date is in range. //----------------------------------------- if ( ! checkdate( $this->chosen_month, 1 , $this->chosen_year ) ) { $this->chosen_month = $this->now_date['mon']; $this->chosen_year = $this->now_date['year']; } //----------------------------------------- // Get the timestamp for our chosen date //----------------------------------------- $this->our_datestamp = mktime( 1,1,1, $this->chosen_month, 1, $this->chosen_year); $this->first_day_array = getdate($this->our_datestamp); //----------------------------------------- // Finally, build up the lang arrays //----------------------------------------- $this->month_words = array( $ibforums->lang['M_1'] , $ibforums->lang['M_2'] , $ibforums->lang['M_3'] , $ibforums->lang['M_4'] , $ibforums->lang['M_5'] , $ibforums->lang['M_6'] , $ibforums->lang['M_7'] , $ibforums->lang['M_8'] , $ibforums->lang['M_9'] , $ibforums->lang['M_10'], $ibforums->lang['M_11'], $ibforums->lang['M_12'] ); $this->day_words = array( $ibforums->lang['D_0'], $ibforums->lang['D_1'], $ibforums->lang['D_2'], $ibforums->lang['D_3'], $ibforums->lang['D_4'], $ibforums->lang['D_5'], $ibforums->lang['D_6'] ); //----------------------------------------- switch( $ibforums->input['code'] ) { case 'newevent': $this->new_event(); break; case 'showday': $this->show_day(); break; case 'showevent': $this->show_event(); break; case 'addnewevent': $this->add_new_event(); break; case 'birthdays': $this->show_birthdays(); break; case 'edit': $this->edit(); break; case 'doedit': $this->do_edit(); break; case 'delete': $ibforums->input['eventid'] = intval($ibforums->input['e']); $this->do_edit(1); break; default: $this->show_month(); break; } //----------------------------------------- if ($this->page_title == "") { $this->page_title = $ibforums->vars['board_name']." ".$ibforums->lang['page_title']; } if (! is_array($this->nav) ) { $this->nav[] = "{$ibforums->lang['page_title']}"; } $print->add_output("$this->output"); $print->do_output( array( 'TITLE' => $this->page_title, 'JS' => 0, NAV => $this->nav ) ); } //-------------------------------------- // Display Edit / Delete boxes //-------------------------------------- function edit() { global $ibforums, $DB, $std, $print; if ( $ibforums->member['g_calendar_post'] != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } if ( ! $ibforums->member['id']) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } //----------------------------------------- $eventid = intval($ibforums->input['eventid']); if ($eventid == "") { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } $DB->query("SELECT * FROM ibf_calendar_events WHERE eventid=$eventid"); if ( ! $event = $DB->fetch_row() ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- $can_edit = 0; //----------------------------------------- // Do we have permission to edit this event? //----------------------------------------- if ($ibforums->member['id'] == $event['userid']) { $can_edit = 1; } else if ($ibforums->member['g_is_supmod'] == 1) { $can_edit = 1; } else { $can_edit = 0; } if ($can_edit != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- // Do we have permission to see the event? //----------------------------------------- if ( $event['read_perms'] != '*' ) { if ( ! preg_match( "/(^|,)".$ibforums->member['mgroup']."(,|$)/", $event['read_perms'] ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } } //----------------------------------------- $ibforums->lang['the_max_length'] = $ibforums->vars['max_post_length'] ? $ibforums->vars['max_post_length'] * 1024 : 2140000; $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $ibforums->lang['edit_event']." ".$event['title']; //----------------------------------------- $checked = array( 'normal' => '', 'range' => '', 'recur' => '' ); if ( $event['event_ranged'] ) { $range_on = 'show'; $range_off = 'none'; $recur_on = 'none'; $recur_off = 'show'; $checked['range'] = 'checked="checked"'; } else if ( $event['event_repeat'] ) { $range_on = 'none'; $range_off = 'show'; $recur_on = 'show'; $recur_off = 'none'; $checked['recur'] = 'checked="checked"'; } else { $range_on = 'none'; $range_off = 'show'; $recur_on = 'none'; $recur_off = 'show'; $checked['normal'] = 'checked="checked"'; } $recur_menu = ""; $recur_menu .= $event['repeat_unit'] == 'w' ? "" : ""; $recur_menu .= $event['repeat_unit'] == 'm' ? "" : ""; $recur_menu .= $event['repeat_unit'] == 'y' ? "" : ""; $this->output .= $this->post_html->get_javascript(); $this->output .= $this->html->calendar_start_edit_form($event['eventid']); $this->output .= $this->html->table_top($ibforums->lang['edit_event']); $this->output .= $this->html->calendar_delete_box(); $this->output .= $this->html->calendar_event_title($event['title']); $this->output .= $this->html->calendar_choose_date( $this->get_day_dropdown($event['mday']), $this->get_month_dropdown($event['month']), $this->get_year_dropdown($event['year']), $this->get_day_dropdown($event['end_day']), $this->get_month_dropdown($event['end_month']), $this->get_year_dropdown($event['end_year']), $this->get_day_dropdown("1"), $recur_menu, array( 'range_on' => $range_on, 'range_off' => $range_off, 'recur_on' => $recur_on, 'recur_off' => $recur_off ), $checked, array( 'bg' => $this->get_color_dropdown('bg',$event['event_bgcolor']), 'ft' => $this->get_color_dropdown('ft',$event['event_color']) ), array( 'd' => $this->get_day_dropdown($event['end_day']), 'm' => $this->get_month_dropdown($event['end_month']), 'y' => $this->get_year_dropdown($event['end_year']) ) ); $public = ""; $private = ""; if ($event['priv_event'] == 1) { $private = ' selected'; } else { $public = ' selected'; } $this->output .= $this->html->calendar_event_type($public, $private); if ($ibforums->member['mgroup'] == $ibforums->vars['admin_group']) { // Get all the group ID's and names from the DB and build the selection box $group_choices = ""; $DB->query("SELECT g_id, g_title FROM ibf_groups ORDER BY g_title"); while ( $r = $DB->fetch_row() ) { $selected = ""; if ( preg_match( "/(^|,)".$r['g_id']."(,|$)/", $event['read_perms'] ) ) { $selected = ' selected'; } $group_choices .= "\n"; } $this->output .= $this->html->calendar_admin_group_box($group_choices); } $this->output .= $this->post_html->postbox_buttons( str_replace( "
", "\n", $event['event_text'] ) ); $this->output = str_replace( '' , $this->post_html->get_box_enableemo( $event['show_emoticons'] ? 'checked="checked"' : "" ) , $this->output ); $this->output .= $this->html->calendar_end_form($ibforums->lang['calendar_edit_submit']); //-------------------------------------- // Add in the smilies box //-------------------------------------- $show_table = 0; $count = 0; $smilies = "\n"; // Get the smilies from the DB $DB->query("SELECT * FROM ibf_emoticons WHERE clickable='1'"); while ($elmo = $DB->fetch_row() ) { $show_table++; $count++; $smilies .= "vars['EMOTICONS_URL']."/".$elmo['image']."\" alt='smilie' border='0'> \n"; if ($count == $ibforums->vars['emo_per_row']) { $smilies .= "\n\n"; $count = 0; } } if ($count != $ibforums->vars['emo_per_row']) { for ($i = $count ; $i < $ibforums->vars['emo_per_row'] ; ++$i) { $smilies .= " \n"; } $smilies .= ""; } $table = $this->post_html->smilie_table(); if ($show_table != 0) { $table = preg_replace( "//", $smilies, $table ); $this->output = preg_replace( "//", $table, $this->output ); } // Remove the "add sig" box $this->output = preg_replace( "/.+?/s", "", $this->output ); } //----------------------------------------- // Do the edit //----------------------------------------- function do_edit($del=0) { global $ibforums, $DB, $std, $print, $HTTP_POST_VARS; if ( $ibforums->member['g_calendar_post'] != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } if ( ! $ibforums->member['id']) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } //----------------------------------------- $eventid = intval($ibforums->input['eventid']); if ($eventid == "") { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } $DB->query("SELECT * FROM ibf_calendar_events WHERE eventid='$eventid'"); if ( ! $event = $DB->fetch_row() ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- $can_edit = 0; //----------------------------------------- // Do we have permission to edit this event? //----------------------------------------- if ($ibforums->member['id'] == $event['userid']) { $can_edit = 1; } else if ($ibforums->member['g_is_supmod'] == 1) { $can_edit = 1; } else { $can_edit = 0; } if ($can_edit != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- // Are we deleting this event? //----------------------------------------- if ($HTTP_POST_VARS['event_delete'] == 1 or $del == 1) { $DB->query("DELETE FROM ibf_calendar_events WHERE eventid='$eventid'"); $print->redirect_screen( $ibforums->lang['delete_event_redirect'] , "&act=calendar" ); } else { $ibforums->vars['max_post_length'] = $ibforums->vars['max_post_length'] ? $ibforums->vars['max_post_length'] : 2140000; //----------------------------------------- // Sort out some of the form data, check for // posting length, etc. //----------------------------------------- $allow_emoticons = $ibforums->input['enableemo'] == 'yes' ? 1 : 0; $private_event = $ibforums->input['e_type'] == 'private' ? 1 : 0; //----------------------------------------- // Do we have a valid post? //----------------------------------------- if (strlen( trim($HTTP_POST_VARS['Post']) ) < 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_post') ); } if (strlen( $HTTP_POST_VARS['Post'] ) > ($ibforums->vars['max_post_length']*1024)) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'post_too_long') ); } //----------------------------------------- // Fix up the Event Title //----------------------------------------- $ibforums->input['event_title'] = str_replace( "
", "", $ibforums->input['event_title'] ); $ibforums->input['event_title'] = trim(stripslashes($ibforums->input['event_title'])); if ( (strlen($ibforums->input['event_title']) < 2) or (!$ibforums->input['event_title']) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_title_none') ); } if ( strlen($ibforums->input['event_title']) > 64 ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_title_long') ); } //----------------------------------------- // Are we an admin, and have we set w/groups // can see? //----------------------------------------- $read_perms = '*'; if ($ibforums->member['mgroup'] == $ibforums->vars['admin_group']) { if ( is_array( $HTTP_POST_VARS['e_groups'] ) ) { $read_perms = implode( ",", $HTTP_POST_VARS['e_groups'] ); $read_perms .= ",".$ibforums->vars['admin_group']; } if ($read_perms == "") { $read_perms = '*'; } } $day = intval($ibforums->input['e_day']); $month = intval($ibforums->input['e_month']); $year = intval($ibforums->input['e_year']); $end_day = ""; $end_month = ""; $end_year = ""; $end_date = ""; $event_ranged = 0; $event_repeat = 0; if ( $ibforums->input['eventtype'] == 'range' ) { $end_day = intval($ibforums->input['end_day']); $end_month = intval($ibforums->input['end_month']); $end_year = intval($ibforums->input['end_year']); if ( $end_year < $year ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_year == $year ) { if ( $end_month < $month ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_month == $month AND $end_day <= $day ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } } $event_ranged = 1; } elseif ($ibforums->input['eventtype'] == 'recur') { $end_day = intval($ibforums->input['recend_day']); $end_month = intval($ibforums->input['recend_month']); $end_year = intval($ibforums->input['recend_year']); if ( $ibforums->input['recur_unit'] ) { $event_repeat = 1; } if ( $end_year < $year ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_year == $year ) { if ( $end_month < $month ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_month == $month AND $end_day <= $day ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } } } //----------------------------------------- // Do we have a sensible date? //----------------------------------------- if ( ! checkdate( $month, $day , $year ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_date_oor') ); } //----------------------------------------- // Add it to the DB //----------------------------------------- $db_string = $DB->compile_db_update_string( array ( 'year' => $year, 'month' => $month, 'mday' => $day, 'title' => $ibforums->input['event_title'], 'event_text' => $ibforums->input['Post'], 'read_perms' => $read_perms, 'priv_event' => $private_event, 'unix_stamp' => mktime( 23, 59, 59, $month, $day, $year), 'show_emoticons' => $allow_emoticons, 'end_day' => $end_day, 'end_month' => $end_month, 'end_year' => $end_year, 'end_unix_stamp' => mktime( 23, 59, 59, $end_month, $end_day, $end_year), 'event_ranged' => $event_ranged, 'event_bgcolor' => $ibforums->input['bg'], 'event_color' => $ibforums->input['ft'], 'event_repeat' => $event_repeat, 'repeat_unit' => $ibforums->input['recur_unit'], ) ); $DB->query("UPDATE ibf_calendar_events SET $db_string WHERE eventid='$eventid'"); $print->redirect_screen( $ibforums->lang['edit_event_redirect'] , "&act=calendar&code=showevent&eventid=$eventid" ); } } //----------------------------------------- function show_month() { global $ibforums, $DB, $std, $print; //----------------------------------------- // Get the birthdays from the database //----------------------------------------- if ( $ibforums->vars['show_bday_calendar'] ) { $birthdays = array(); $DB->query("SELECT bday_day from ibf_members WHERE bday_month=".$this->chosen_month); while ($user = $DB->fetch_row()) { $birthdays[ $user['bday_day'] ]++; } } //----------------------------------------- // Get recurring events //----------------------------------------- $recurring = array(); $timenow = mktime( 1, 1, 1, $this->chosen_month, 1, $this->chosen_year); $timethen = mktime( 23, 59, 59, $this->chosen_month, 0, $this->chosen_year); $DB->query("SELECT * FROM ibf_calendar_events WHERE event_repeat=1 AND ( repeat_unit IN ('w','m') OR (repeat_unit='y' AND month={$this->chosen_month}) ) "); while ( $rec = $DB->fetch_row() ) { $recurring[] = $rec; } //----------------------------------------- // Get the events //----------------------------------------- $events = array(); $DB->query("SELECT * FROM ibf_calendar_events WHERE event_repeat <> 1 AND month={$this->chosen_month} AND year={$this->chosen_year} OR (event_ranged=1 AND ( unix_stamp < $timenow AND end_unix_stamp > $timenow ) ) "); while ( $event = $DB->fetch_row() ) { if ( $event['priv_event'] == 1 ) { if ($ibforums->member['id'] != $event['userid']) { continue; } } if ( $event['read_perms'] != '*' ) { if ( ! preg_match( "/(^|,)".$ibforums->member['mgroup']."(,|$)/", $event['read_perms'] ) ) { continue; } } if ( $event['event_ranged'] == 1 ) { $range[$event['eventid']] = array( 'end_unix_stamp' => $event['end_unix_stamp'], 'unix_stamp' => $event['unix_stamp'], 'day' => $event['mday'], 'month' => $event['month'], 'year' => $event['year'], 'end_day' => $event['end_day'], 'end_month' => $event['end_month'], 'end_year' => $event['end_year'], 'ft' => $event['event_color'], 'bg' => $event['event_bgcolor'], 'eventid' => $event['eventid'], 'title' => $event['title'], ); } $events[ $event['mday'] ][] = $event; } //----------------------------------------- // Flip the range array to ensure that old // ranges go to the top for consistency //----------------------------------------- if ( is_array($range) ) { $range = array_reverse($range, TRUE); } //----------------------------------------- // Figure out the next / previous links //----------------------------------------- $prev_month = array(); $next_month = array(); $prev_month['year_id'] = $this->chosen_year; $next_month['year_id'] = $this->chosen_year; $prev_month['month_id'] = $this->chosen_month - 1; $prev_month['month_name'] = $this->month_words[$this->chosen_month - 2]; $next_month['month_name'] = $this->month_words[$this->chosen_month]; $next_month['month_id'] = $this->chosen_month + 1; if ($this->chosen_month == 1) { $prev_month['month_name'] = $this->month_words[11]; $prev_month['month_id'] = 12; $prev_month['year_id'] = $this->chosen_year - 1; } else if ($this->chosen_month == 12) { $next_month['month_name'] = $this->month_words[0]; $next_month['month_id'] = 1; $next_month['year_id'] = $this->chosen_year + 1; } $this->output .= $this->html->cal_main_content($this->month_words[$this->chosen_month - 1], $this->chosen_year, $prev_month, $next_month); //----------------------------------------- // Print the days table top row //----------------------------------------- $day_output = ""; $cal_output = ""; foreach ($this->day_words as $day) { $day_output .= $this->html->cal_day_bit($day); } //----------------------------------------- // Print the main calendar body //----------------------------------------- $seen_days = array(); // Holds yday $seen_ids = array(); for ( $c = 0 ; $c < 42; $c++ ) { $day_array = getdate($this->our_datestamp); if ( (($c) % 7 ) == 0 ) { //----------------------------------------- // Kill the loop if we are no longer on our month //----------------------------------------- if ($day_array['mon'] != $this->chosen_month) { break; } $cal_output .= $this->html->cal_new_row(); } //----------------------------------------- // Run out of legal days for this month? // Or have we yet to get to the first day? //----------------------------------------- if ( ($c < $this->first_day_array['wday']) or ($day_array['mon'] != $this->chosen_month) ) { $cal_output .= $this->html->cal_blank_cell(); } else { if ( $seen_days[ $day_array['yday'] ] == 1 ) { //$c++; continue; } $seen_days[ $day_array['yday'] ] = 1; $this_day_events = ""; $cal_date = $day_array['mday']; //---------------------------------------- // Ranged Events... //---------------------------------------- if ( count($range) > 0 ) { foreach( $range as $r => $d) { $s = 0; if ( $day_array['year'] == $d['year'] and $day_array['year'] == $d['end_year']) { //------------------------------ // Span across months past to cur // (Don't ask me how I got to this, it was late // and I was tired and I don't remember much now) //------------------------------ if ( $day_array['mon'] < $d['end_month'] AND ( $day_array['mon'] >= $d['month'] AND $day_array['mday'] >= $d['day'] ) ) { $s = 1; } //------------------------------ // Span across months cur to past //------------------------------ else if ( $day_array['mon'] == $d['end_month'] AND ( $day_array['mon'] > $d['month'] AND $day_array['mday'] <= $d['end_day'] ) ) { $s = 1; if ( $day_array['mday'] == 1 ) { $d['title'] = "«".$d['title']; } } //------------------------------ // Current month //------------------------------ else if ( ($day_array['mon'] == $d['end_month']) AND ( $day_array['mday'] <= $d['end_day'] AND $day_array['mday'] >= $d['day'] ) ) { $s = 1; } } else if ( $day_array['year'] == $d['year'] and $day_array['year'] < $d['end_year'] ) { if ( $day_array['mon'] >= $d['end_month'] AND $day_array['mday'] >= $d['day'] ) { $s = 1; } } else if ( $day_array['year'] > $d['year'] and $day_array['year'] == $d['end_year'] ) { if ( $day_array['mon'] <= $d['end_month'] AND $day_array['mday'] <= $d['end_day'] ) { $s = 1; } } if ($s == 1) { $this_day_events .= $this->html->cal_events_wrap_range( "code=showevent&eventid=".$d['eventid'], $d['title'], $d['ft'], $d['bg']); $seen_ids[$d['eventid']] = 1; } } } $this->our_datestamp += 86400; //---------------------------------------- // Recurring Events... //---------------------------------------- if ( count($recurring) > 0 ) { foreach( $recurring as $rc ) { $recur_start = getdate( $rc['unix_stamp'] ); $sh = 0; //-------------------------------------- // Out of range END? //-------------------------------------- if ( $day_array['year'] > $rc['end_year'] ) { continue; } else if ( $day_array['year'] == $rc['end_year'] ) { if ( $day_array['mon'] > $rc['end_month'] ) { continue; } else if ( ($day_array['mon'] == $rc['end_month']) AND ($day_array['mday'] > $rc['end_day']) ) { continue; } } //-------------------------------------- // Out of range START? //-------------------------------------- if ( $day_array['year'] < $rc['year'] ) { continue; } else if ( $day_array['year'] == $rc['year'] ) { if ( $day_array['mon'] < $rc['month'] ) { continue; } else if ( ($day_array['mon'] == $rc['month']) AND ($day_array['mday'] < $rc['mday']) ) { continue; } } //-------------------------------------- // Lets do da WEEKLY //-------------------------------------- if ( $rc['repeat_unit'] == 'w' ) { if ( $day_array['wday'] == $recur_start['wday']) { $sh = 1; } } //-------------------------------------- // Lets do da MONTHLY //-------------------------------------- elseif ( $rc['repeat_unit'] == 'm' ) { if ( $day_array['mday'] == $rc['mday'] ) { $sh = 1; } } //-------------------------------------- // Lets do da YEARLY //-------------------------------------- elseif ( $rc['repeat_unit'] == 'y' ) { if ( ($day_array['mday'] == $rc['mday']) AND ($day_array['mon'] == $rc['month']) ) { $sh = 1; } } //-------------------------------------- // Show it! //-------------------------------------- if ( $sh == 1 ) { $this_day_events .= $this->html->cal_events_wrap_recurring("code=showevent&eventid=".$rc['eventid'],$rc['title']); } } } //---------------------------------------- // Normal Events... //---------------------------------------- if ( isset($events[ $day_array['mday'] ]) and is_array($events[ $day_array['mday'] ]) ) { if ( count( $events[ $day_array['mday'] ] ) > 0 ) { foreach( $events[ $day_array['mday'] ] as $idx => $data ) { if ( $seen_ids[ $data['eventid'] ] == 1 ) { continue; } $this_day_events .= $this->html->cal_events_wrap("code=showevent&eventid=".$data['eventid'],$data['title']); } } } //---------------------------------------- // Birthdays //---------------------------------------- if ( isset($birthdays[ $day_array['mday'] ]) and $birthdays[ $day_array['mday'] ] > 0 ) { $this_day_events .= $this->html->cal_events_wrap( "code=birthdays&y=".$this->chosen_year."&m=".$this->chosen_month."&d=".$day_array['mday'], sprintf( $ibforums->lang['entry_birthdays'], $birthdays[ $day_array['mday'] ] ) ); } if ($this_day_events != "") { $cal_date = "{$day_array['mday']}"; $this_day_events = $this->html->cal_events_start() . $this_day_events . $this->html->cal_events_end(); } if ( ($day_array['mday'] == $this->now_date['mday']) and ($this->now_date['mon'] == $day_array['mon']) and ($this->now_date['year'] == $day_array['year'])) { $cal_output .= $this->html->cal_date_cell_today($cal_date, $this_day_events); } else { $cal_output .= $this->html->cal_date_cell($cal_date, $this_day_events); } unset($this_day_events); } } //----------------------------------------- // Switch the HTML tags... //----------------------------------------- if ( $this->chosen_year < 1500 ) { $this->month_words[$this->chosen_month - 1] = str_replace(",", ';&#', "Y,101,32,111,108,100,32,99,97,108,101,110,100,97,114,32,111,102;").' '.$this->month_words[$this->chosen_month - 1]; } $this->output = str_replace( "", $day_output, $this->output ); $this->output = str_replace( "" , $cal_output, $this->output ); $this->output = str_replace( "" , $this->get_month_dropdown(), $this->output ); $this->output = str_replace( "" , $this->get_year_dropdown() , $this->output ); $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $this->month_words[$this->chosen_month - 1]." ".$this->chosen_year; } //----------------------------------------- // POST NEW CALENDAR EVENT //----------------------------------------- function new_event() { global $ibforums, $DB, $std, $print; if ( $ibforums->member['g_calendar_post'] != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } if ( ! $ibforums->member['id']) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } $ibforums->lang['the_max_length'] = $ibforums->vars['max_post_length'] ? $ibforums->vars['max_post_length'] * 1024 : 2140000; $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $ibforums->lang['post_new_event']; $this->output .= $this->post_html->get_javascript(); $this->output .= $this->html->calendar_start_form(); $this->output .= $this->html->table_top($ibforums->lang['post_new_event']); $this->output .= $this->html->calendar_event_title(); $this->output .= $this->html->calendar_choose_date( $this->get_day_dropdown(), $this->get_month_dropdown(), $this->get_year_dropdown(), $this->get_day_dropdown(), $this->get_month_dropdown(), $this->get_year_dropdown(), $this->get_day_dropdown("1"), "", array( 'range_on' => 'none', 'range_off' => 'show', 'recur_on' => 'none', 'recur_off' => 'show' ), array( 'range' => '', 'recur' => '', 'normal' => 'checked="checked"' ), array( 'bg' => $this->get_color_dropdown('bg','darkblue'), 'ft' => $this->get_color_dropdown('ft','white') ), array( 'd' => $this->get_day_dropdown(), 'm' => $this->get_month_dropdown(), 'y' => $this->get_year_dropdown() ) ); $this->output .= $this->html->calendar_event_type(); if ($ibforums->member['mgroup'] == $ibforums->vars['admin_group']) { // Get all the group ID's and names from the DB and build the selection box $group_choices = ""; $DB->query("SELECT g_id, g_title FROM ibf_groups ORDER BY g_title"); while ( $r = $DB->fetch_row() ) { $group_choices .= "\n"; } $this->output .= $this->html->calendar_admin_group_box($group_choices); } $this->output .= $this->post_html->postbox_buttons(""); $this->output = str_replace( '' , $this->post_html->get_box_enableemo( 'checked="checked"' ) , $this->output ); $this->output .= $this->html->calendar_end_form($ibforums->lang['calendar_submit']); //-------------------------------------- // Add in the smilies box //-------------------------------------- $show_table = 0; $count = 0; $smilies = "\n"; // Get the smilies from the DB $DB->query("SELECT * FROM ibf_emoticons WHERE clickable=1"); while ($elmo = $DB->fetch_row() ) { $show_table++; $count++; // Make single quotes as URL's with html entites in them // are parsed by the browser, so ' causes JS error :o if (strstr( $elmo['typed'], "'" ) ) { $in_delim = '"'; $out_delim = "'"; } else { $in_delim = "'"; $out_delim = '"'; } $smilies .= "vars['EMOTICONS_URL']."/".$elmo['image']."\" alt='smilie' border='0'> \n"; if ($count == $ibforums->vars['emo_per_row']) { $smilies .= "\n\n"; $count = 0; } } if ($count != $ibforums->vars['emo_per_row']) { for ($i = $count ; $i < $ibforums->vars['emo_per_row'] ; ++$i) { $smilies .= " \n"; } $smilies .= ""; } $table = $this->post_html->smilie_table(); if ($show_table != 0) { $table = preg_replace( "//", $smilies, $table ); $this->output = preg_replace( "//", $table, $this->output ); } // Remove the "add sig" box $this->output = preg_replace( "/.+?/s", "", $this->output ); } //----------------------------------------- // ADD NEW CALENDAR EVENT TO THE DB //----------------------------------------- function add_new_event() { global $ibforums, $DB, $std, $print, $HTTP_POST_VARS; if ( $ibforums->member['g_calendar_post'] != 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } if ( ! $ibforums->member['id']) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_permission') ); } $ibforums->vars['max_post_length'] = $ibforums->vars['max_post_length'] ? $ibforums->vars['max_post_length'] : 2140000; //----------------------------------------- // Sort out some of the form data, check for // posting length, etc. //----------------------------------------- $allow_emoticons = $ibforums->input['enableemo'] == 'yes' ? 1 : 0; $private_event = $ibforums->input['e_type'] == 'private' ? 1 : 0; //----------------------------------------- // Do we have a valid post? //----------------------------------------- if (strlen( trim($HTTP_POST_VARS['Post']) ) < 1) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'no_post') ); } if (strlen( $HTTP_POST_VARS['Post'] ) > ($ibforums->vars['max_post_length']*1024)) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'post_too_long') ); } //----------------------------------------- // Fix up the Event Title //----------------------------------------- $ibforums->input['event_title'] = str_replace( "
", "", $ibforums->input['event_title'] ); $ibforums->input['event_title'] = trim(stripslashes($ibforums->input['event_title'])); if ( (strlen($ibforums->input['event_title']) < 2) or (!$ibforums->input['event_title']) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_title_none') ); } if ( strlen($ibforums->input['event_title']) > 64 ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_title_long') ); } //----------------------------------------- // Are we an admin, and have we set w/groups // can see? //----------------------------------------- $read_perms = '*'; if ($ibforums->member['mgroup'] == $ibforums->vars['admin_group']) { if ( is_array( $HTTP_POST_VARS['e_groups'] ) ) { $read_perms = implode( ",", $HTTP_POST_VARS['e_groups'] ); $read_perms .= ",".$ibforums->vars['admin_group']; } if ($read_perms == "") { $read_perms = '*'; } } $day = intval($ibforums->input['e_day']); $month = intval($ibforums->input['e_month']); $year = intval($ibforums->input['e_year']); $end_day = ""; $end_month = ""; $end_year = ""; $end_date = ""; $event_ranged = 0; $event_repeat = 0; if ( $ibforums->input['eventtype'] == 'range' ) { $end_day = intval($ibforums->input['end_day']); $end_month = intval($ibforums->input['end_month']); $end_year = intval($ibforums->input['end_year']); if ( $end_year < $year ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_year == $year ) { if ( $end_month < $month ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_month == $month AND $end_day <= $day ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } } $event_ranged = 1; } elseif ($ibforums->input['eventtype'] == 'recur') { $end_day = intval($ibforums->input['recend_day']); $end_month = intval($ibforums->input['recend_month']); $end_year = intval($ibforums->input['recend_year']); if ( $ibforums->input['recur_unit'] ) { $event_repeat = 1; } if ( $end_year < $year ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_year == $year ) { if ( $end_month < $month ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } if ( $end_month == $month AND $end_day <= $day ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_range_wrong') ); } } } //----------------------------------------- // Do we have a sensible date? //----------------------------------------- if ( ! checkdate( $month, $day , $year ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_date_oor') ); } //----------------------------------------- // Add it to the DB //----------------------------------------- $db_string = $DB->compile_db_insert_string( array ( 'userid' => $ibforums->member['id'], 'year' => $year, 'month' => $month, 'mday' => $day, 'title' => $ibforums->input['event_title'], 'event_text' => $ibforums->input['Post'], 'read_perms' => $read_perms, 'unix_stamp' => mktime( 23, 59, 59, $month, $day, $year), 'priv_event' => $private_event, 'show_emoticons' => $allow_emoticons, 'end_day' => $end_day, 'end_month' => $end_month, 'end_year' => $end_year, 'end_unix_stamp' => mktime( 23, 59, 59, $end_month, $end_day, $end_year), 'event_ranged' => $event_ranged, 'event_bgcolor' => $ibforums->input['bg'], 'event_color' => $ibforums->input['ft'], 'event_repeat' => $event_repeat, 'repeat_unit' => $ibforums->input['recur_unit'], ) ); $DB->query("INSERT INTO ibf_calendar_events (" .$db_string['FIELD_NAMES']. ") VALUES (". $db_string['FIELD_VALUES'] .")"); $print->redirect_screen( $ibforums->lang['new_event_redirect'] , "&act=calendar" ); } //----------------------------------------- // SHOW DAYS EVENTS //----------------------------------------- function show_day() { global $ibforums, $DB, $std, $print; $day = intval($ibforums->input['d']); $month = intval($ibforums->input['m']); $year = intval($ibforums->input['y']); $day_array = getdate( mktime( 1,1,1, $month, $day, $year) ); $printed = 0; /*header("Content-type: text/plain"); print_r($day_array); exit();*/ //----------------------------------------- // Do we have a sensible date? //----------------------------------------- if ( ! checkdate( $month, $day , $year ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_date_oor') ); } require "./sources/lib/post_parser.php"; $this->parser = new post_parser(); $this->output .= $this->html->cal_page_events_start(); $seen = array(); //----------------------------------------- // Get recurring events //----------------------------------------- $DB->query("SELECT * FROM ibf_calendar_events WHERE event_repeat=1 AND ( repeat_unit IN ('w','m') OR (repeat_unit='y' AND month={$month}) ) "); while ( $rc = $DB->fetch_row() ) { $recur_start = getdate( $rc['unix_stamp'] ); $sh = 0; //-------------------------------------- // Out of range END? //-------------------------------------- if ( $day_array['year'] > $rc['end_year'] ) { continue; } else if ( $day_array['year'] == $rc['end_year'] ) { if ( $day_array['mon'] > $rc['end_month'] ) { continue; } else if ( ($day_array['mon'] == $rc['end_month']) AND ($day_array['mday'] > $rc['end_day']) ) { continue; } } //-------------------------------------- // Out of range START? //-------------------------------------- if ( $day_array['year'] < $rc['year'] ) { continue; } else if ( $day_array['year'] == $rc['year'] ) { if ( $day_array['mon'] < $rc['month'] ) { continue; } else if ( ($day_array['mon'] == $rc['month']) AND ($day_array['mday'] < $rc['mday']) ) { continue; } } //-------------------------------------- // Lets do da WEEKLY //-------------------------------------- if ( $rc['repeat_unit'] == 'w' ) { if ( $day_array['wday'] == $recur_start['wday']) { $sh = 1; } } //-------------------------------------- // Lets do da MONTHLY //-------------------------------------- elseif ( $rc['repeat_unit'] == 'm' ) { if ( $day_array['mday'] == $rc['mday'] ) { $sh = 1; } } //-------------------------------------- // Lets do da YEARLY //-------------------------------------- elseif ( $rc['repeat_unit'] == 'y' ) { if ( ($day_array['mday'] == $rc['mday']) AND ($day_array['mon'] == $rc['month']) ) { $sh = 1; } } //-------------------------------------- // Show it! //-------------------------------------- if ( $sh == 1 ) { $this->output .= $this->make_event_html($rc); $seen[ $rc['eventid'] ] = 1; $printed++; } } //----------------------------------------- // Normal Events //----------------------------------------- $timenow = mktime( 1, 1, 1, $month, $day, $year); //$day_array = array( 'mon' => $month, 'mday' => $day, 'year' => $year ); $eq = $DB->query("SELECT * FROM ibf_calendar_events WHERE month='$month' AND mday='$day' AND year='$year' OR (event_ranged=1 AND ( unix_stamp < $timenow AND end_unix_stamp > $timenow ) )"); if ( $DB->get_num_rows($eq) ) { while ( $event = $DB->fetch_row($eq) ) { if ( $event['event_ranged'] == 1 ) { if ( ! $seen[ $event['eventid'] ] ) { $range[$event['eventid']] = $event; } } else { //----------------------------------------- // Is it a private event? //----------------------------------------- if ($event['priv_event'] == 1 and $ibforums->member['id'] != $event['userid']) { continue; } //----------------------------------------- // Do we have permission to see the event? //----------------------------------------- if ( $event['read_perms'] != '*' ) { if ( ! preg_match( "/(^|,)".$ibforums->member['mgroup']."(,|$)/", $event['read_perms'] ) ) { continue; } } if ( ! $seen[ $event['eventid'] ] ) { $this->output .= $this->make_event_html($event); $printed++; $seen[ $event['eventid'] ] = 1; } } } //---------------------------------------- // Ranged Events... //---------------------------------------- if ( count($range) > 0 ) { foreach( $range as $r => $d) { if ( $day_array['year'] == $d['year'] ) { if ( ($day_array['mon'] == $d['end_month']) AND ( $day_array['mday'] <= $d['end_day'] AND $day_array['mday'] >= $d['mday'] ) ) { $this->output .= $this->make_event_html($d); $printed++; } } } } } //----------------------------------------- // Do we have any printed events? //----------------------------------------- if ($printed > 0) { $switch = 1; } else { // Error if no birthdays $switch = 0; } $this->output .= $this->make_birthday_html($month, $day, $switch); $this->output .= $this->html->cal_page_events_end(); $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $day." ".$this->month_words[$this->chosen_month - 1]." ".$this->chosen_year; } //----------------------------------------- // SHOW A SINGLE EVENT BASED ON eventid //----------------------------------------- function show_event() { global $ibforums, $DB, $std, $print; $eventid = intval($ibforums->input['eventid']); if ($eventid == "") { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } $DB->query("SELECT * FROM ibf_calendar_events WHERE eventid=$eventid"); if ( ! $event = $DB->fetch_row() ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- // Is it a private event? //----------------------------------------- if ($event['priv_event'] == 1 and $ibforums->member['id'] != $event['userid']) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } //----------------------------------------- // Do we have permission to see the event? //----------------------------------------- if ( $event['read_perms'] != '*' ) { if ( ! preg_match( "/(^|,)".$ibforums->member['mgroup']."(,|$)/", $event['read_perms'] ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } } //----------------------------------------- // Get the pre parsed event HTML //----------------------------------------- require "./sources/lib/post_parser.php"; $this->parser = new post_parser(); //----------------------------------------- $this->output .= $this->html->cal_page_events_start() . $this->make_event_html($event) . $this->html->cal_page_events_end(); $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $event['title']; } //----------------------------------------- // MAKE EVENT HTML (return HTML for bdays) //----------------------------------------- function make_event_html($event) { global $ibforums, $DB, $std, $print; //----------------------------------------- // Parse the text //----------------------------------------- $event['event_text'] = $this->parser->convert( array( 'TEXT' => $event['event_text'], 'SMILIES' => $event['show_emoticons'], 'CODE' => 1, 'HTML' => 0 ) ); //----------------------------------------- // What kind of event is it? //----------------------------------------- $event_type = $ibforums->lang['public_event']; if ($event['priv_event'] == 1) { $event_type = $ibforums->lang['private_event']; } else if ($event['read_perms'] != '*') { $event_type = $ibforums->lang['restricted_event']; } //----------------------------------------- // Do we have an edit button? //----------------------------------------- $edit_button = ""; // Are we a super dooper moderator? if ($ibforums->member['g_is_supmod'] == 1) { $edit_button = $this->html->cal_edit_del_button($event['eventid']); } // Are we the OP of this event? else if ($ibforums->member['id'] == $event['userid']) { $edit_button = $this->html->cal_edit_del_button($event['eventid']); } //----------------------------------------- // Get the member details and stuff //----------------------------------------- $DB->query("SELECT m.id, m.name, m.mgroup, m.posts, m.joined, m.avatar, m.avatar_size, ". "g.g_id, g.g_title FROM ibf_members m, ibf_groups g WHERE m.id='".$event['userid']."' AND g.g_id=m.mgroup"); $member = $DB->fetch_row(); $member['joined'] = $std->get_date( $member['joined'], 'JOINED' ); $member['avatar'] = $std->get_avatar( $member['avatar'], $ibforums->member['view_avs'], $member['avatar_size']); $member['posts'] = $std->do_number_format($member['posts']); $event['month_text'] = $this->month_words[$event['month'] - 1]; $ibforums->input['d'] = $event['mday']; $ibforums->input['m'] = $event['month']; $ibforums->input['y'] = $event['year']; $type = $ibforums->lang['se_normal']; $de = ""; if ($event['event_ranged'] == 1 ) { $type = $ibforums->lang['se_range']; $de = $ibforums->lang['se_ends'].' '.gmdate( $ibforums->vars['clock_joined'], $event['end_unix_stamp'] ); //$std->get_date( $event['end_unix_stamp'], 'JOINED' ); } else if ( $event['event_repeat'] == 1 ) { $type = $ibforums->lang['se_recur']; $de = $ibforums->lang['se_ends'].' '.gmdate( $ibforums->vars['clock_joined'], $event['end_unix_stamp'] ); } return $this->html->cal_show_event($event, $member, $event_type, $edit_button, $type, $de ); } //----------------------------------------- // SHOW BIRTHDAYS //----------------------------------------- function show_birthdays() { global $ibforums, $DB, $std, $print; $day = intval($ibforums->input['d']); $month = intval($ibforums->input['m']); $year = intval($ibforums->input['y']); //----------------------------------------- // Do we have a sensible date? //----------------------------------------- if ( ! checkdate( $month, $day , $year ) ) { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_date_oor') ); } $this->output .= $this->html->cal_page_events_start() . $this->make_birthday_html($month, $day) . $this->html->cal_page_events_end(); $this->nav[] = "{$ibforums->lang['page_title']}"; $this->nav[] = $ibforums->lang['cal_birthdays']." ".$this->month_words[$this->chosen_month - 1]." ".$this->chosen_year; } //----------------------------------------- // MAKE BIRTHDAY HTML (return HTML for bdays) //----------------------------------------- function make_birthday_html($month, $day, $switch=0) { global $ibforums, $DB, $std, $print; //----------------------------------------- // Get the birthdays from the database //----------------------------------------- $birthdays = array(); $output = ""; $DB->query("SELECT id, name, bday_year from ibf_members WHERE bday_month='".$month."' and bday_day='$day'"); if ( ! $DB->get_num_rows() ) { if ($switch == 1) { return; } else { $std->Error( array( 'LEVEL' => 1, 'MSG' => 'cal_no_events') ); } } else { $output .= $this->html->cal_birthday_start(); while ( $r = $DB->fetch_row() ) { $age = $this->chosen_year - $r['bday_year']; $output .= $this->html->cal_birthday_entry($r['id'], $r['name'], $age); } $output .= $this->html->cal_birthday_end(); } return $output; } //----------------------------------------- function get_month_dropdown($month="") { global $ibforums; $return = ""; if ($month == "") { $month = $this->chosen_month; } for ( $x = 1 ; $x <= 12 ; $x++ ) { $return .= "\t\n"; } return $return.""; } } ?>