function testEditComment()
{
// Test the forum edits
edit_calendar_event($this->event_id, 8, '', NULL, 0, 'test_event1', '', 3, 1, 2010, 1, 10, 10, 15, 2010, 1, 19, 0, 0, get_users_timezone(), 1, '', '', 1, 1, 1, 1, '');
// Test the forum was actually created
$this->assertTrue('test_event1' == get_translated_text($GLOBALS['FORUM_DB']->query_value('calendar_events', 'e_title ', array('id' => $this->event_id)), $GLOBALS['FORUM_DB']));
}
/**
* Check a POST inputted date for validity, and get the Unix timestamp for the inputted date.
*
* @param ID_TEXT The stub of the parameter name (stub_year, stub_month, stub_day, stub_hour, stub_minute)
* @param boolean Whether to allow over get parameters also
* @return ?TIME The timestamp of the date (NULL: no input date was chosen)
*/
function _get_input_date($stub, $get_also = false)
{
$timezone = post_param('timezone', get_users_timezone());
if ($get_also) {
// if (either_param_integer($stub,0)==0) return NULL; // NULL was chosen Doesn't work like this now
$year = either_param_integer($stub . '_year', NULL);
if (is_null($year)) {
return NULL;
}
$month = either_param_integer($stub . '_month', NULL);
if (is_null($month)) {
return NULL;
}
$day = either_param_integer($stub . '_day', NULL);
if (is_null($day)) {
return NULL;
}
$hour = either_param_integer($stub . '_hour', NULL);
$minute = either_param_integer($stub . '_minute', NULL);
} else {
// if (post_param_integer($stub,0)==0) return NULL; // NULL was chosen Doesn't work like this now
$year = post_param_integer($stub . '_year', NULL);
if (is_null($year)) {
return NULL;
}
$month = post_param_integer($stub . '_month', NULL);
if (is_null($month)) {
return NULL;
}
$day = post_param_integer($stub . '_day', NULL);
if (is_null($day)) {
return NULL;
}
$hour = post_param_integer($stub . '_hour', NULL);
$minute = post_param_integer($stub . '_minute', NULL);
}
if (!checkdate($month, $day, $year)) {
warn_exit(do_lang_tempcode('INVALID_DATE_GIVEN'));
}
if (is_null($hour)) {
if (strpos($stub, 'end') !== false) {
$hour = 23;
$minute = 59;
} else {
$hour = 0;
$minute = 0;
}
}
$time = mktime($hour, $minute, 0, $month, $day, $year);
if ($year >= 1970 || @strftime('%Y', @mktime(0, 0, 0, 1, 1, 1963)) == '1963') {
$amount_forward = tz_time($time, $timezone) - $time;
$time = $time - $amount_forward;
}
return $time;
}
/**
* Add a calendar event.
*
* @param AUTO_LINK The event type
* @param SHORT_TEXT The recurrence code (set to 'none' for no recurrences: blank means infinite and will basically time-out ocPortal)
* @param ?integer The number of recurrences (NULL: none/infinite)
* @param BINARY Whether to segregate the comment-topics/rating/trackbacks per-recurrence
* @param SHORT_TEXT The title of the event
* @param LONG_TEXT The full text describing the event
* @param integer The priority
* @range 1 5
* @param BINARY Whether it is a public event
* @param ?integer The year the event starts at (NULL: default)
* @param ?integer The month the event starts at (NULL: default)
* @param ?integer The day the event starts at (NULL: default)
* @param ?integer The hour the event starts at (NULL: default)
* @param ?integer The minute the event starts at (NULL: default)
* @param ?integer The year the event ends at (NULL: not a multi day event)
* @param ?integer The month the event ends at (NULL: not a multi day event)
* @param ?integer The day the event ends at (NULL: not a multi day event)
* @param ?integer The hour the event ends at (NULL: not a multi day event)
* @param ?integer The minute the event ends at (NULL: not a multi day event)
* @param ?ID_TEXT The timezone for the event (NULL: current user's timezone)
* @param BINARY Whether the time should be presented in the viewer's own timezone
* @param BINARY Whether the event has been validated
* @param BINARY Whether the event may be rated
* @param SHORT_INTEGER Whether comments are allowed (0=no, 1=yes, 2=review style)
* @param BINARY Whether the event may be trackbacked
* @param LONG_TEXT Hidden notes pertaining to the download
* @param ?MEMBER The event submitter (NULL: current member)
* @param integer The number of views so far
* @param ?TIME The add time (NULL: now)
* @param ?TIME The edit time (NULL: never)
* @param ?AUTO_LINK Force an ID (NULL: don't force an ID)
* @return AUTO_LINK The ID of the event
*/
function add_calendar_event($type, $recurrence, $recurrences, $seg_recurrences, $title, $content, $priority, $is_public, $start_year, $start_month, $start_day, $start_hour, $start_minute, $end_year = NULL, $end_month = NULL, $end_day = NULL, $end_hour = NULL, $end_minute = NULL, $timezone = NULL, $do_timezone_conv = 1, $validated = 1, $allow_rating = 1, $allow_comments = 1, $allow_trackbacks = 1, $notes = '', $submitter = NULL, $views = 0, $add_date = NULL, $edit_date = NULL, $id = NULL)
{
if (is_null($submitter)) {
$submitter = get_member();
}
if (is_null($add_date)) {
$add_date = time();
}
if (is_null($timezone)) {
$timezone = get_users_timezone();
}
require_code('comcode_check');
check_comcode($content, NULL, false, NULL, true);
if (!addon_installed('unvalidated')) {
$validated = 1;
}
$map = array('e_submitter' => $submitter, 'e_views' => $views, 'e_title' => insert_lang($title, 2), 'e_content' => 0, 'e_add_date' => $add_date, 'e_edit_date' => $edit_date, 'e_recurrence' => $recurrence, 'e_recurrences' => $recurrences, 'e_seg_recurrences' => $seg_recurrences, 'e_start_year' => $start_year, 'e_start_month' => $start_month, 'e_start_day' => $start_day, 'e_start_hour' => $start_hour, 'e_start_minute' => $start_minute, 'e_end_year' => $end_year, 'e_end_month' => $end_month, 'e_end_day' => $end_day, 'e_end_hour' => $end_hour, 'e_end_minute' => $end_minute, 'e_timezone' => $timezone, 'e_do_timezone_conv' => $do_timezone_conv, 'e_is_public' => $is_public, 'e_priority' => $priority, 'e_type' => $type, 'validated' => $validated, 'allow_rating' => $allow_rating, 'allow_comments' => $allow_comments, 'allow_trackbacks' => $allow_trackbacks, 'notes' => $notes);
if (!is_null($id)) {
$map['id'] = $id;
}
$id = $GLOBALS['SITE_DB']->query_insert('calendar_events', $map, true);
require_code('attachments2');
$GLOBALS['SITE_DB']->query_update('calendar_events', array('e_content' => insert_lang_comcode_attachments(3, $content, 'calendar', strval($id))), array('id' => $id), '', 1);
require_code('seo2');
seo_meta_set_for_implicit('event', strval($id), array($title, $content), $content);
decache('side_calendar');
if ($validated == 1) {
require_lang('calendar');
require_code('notifications');
$subject = do_lang('CALENDAR_EVENT_NOTIFICATION_MAIL_SUBJECT', get_site_name(), strip_comcode($title));
$self_url = build_url(array('page' => 'calendar', 'type' => 'view', 'id' => $id), get_module_zone('calendar'), NULL, false, false, true);
$mail = do_lang('CALENDAR_EVENT_NOTIFICATION_MAIL', comcode_escape(get_site_name()), comcode_escape($title), array($self_url->evaluate()));
dispatch_notification('calendar_event', strval($type), $subject, $mail);
}
log_it('ADD_CALENDAR_EVENT', strval($id), $title);
return $id;
}
/**
* Standard modular render function for profile tab hooks.
*
* @param MEMBER The ID of the member who is being viewed
* @param MEMBER The ID of the member who is doing the viewing
* @param boolean Whether to leave the tab contents NULL, if tis hook supports it, so that AJAX can load it later
* @return array A triple: The tab title, the tab contents, the suggested tab order
*/
function render_tab($member_id_of, $member_id_viewing, $leave_to_ajax_if_possible = false)
{
$title = do_lang_tempcode('PROFILE');
$order = 10;
$photo_url = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_photo_url');
if ($photo_url != '' && addon_installed('ocf_member_photos') && has_specific_permission($member_id_viewing, 'view_member_photos')) {
require_code('images');
$photo_thumb_url = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_photo_thumb_url');
$photo_thumb_url = ensure_thumbnail($photo_url, $photo_thumb_url, strpos($photo_url, 'uploads/photos') !== false ? 'photos' : 'ocf_photos', 'f_members', $member_id_of, 'm_photo_thumb_url');
if (url_is_local($photo_url)) {
$photo_url = get_complex_base_url($photo_url) . '/' . $photo_url;
}
if (url_is_local($photo_thumb_url)) {
$photo_thumb_url = get_complex_base_url($photo_thumb_url) . '/' . $photo_thumb_url;
}
} else {
$photo_url = '';
$photo_thumb_url = '';
}
$avatar_url = $GLOBALS['FORUM_DRIVER']->get_member_avatar_url($member_id_of);
$username = $GLOBALS['FORUM_DRIVER']->get_username($member_id_of);
// Things staff can do with this user
$modules = array();
if (has_specific_permission($member_id_viewing, 'warn_members') && has_actual_page_access($member_id_viewing, 'warnings') && addon_installed('ocf_warnings')) {
$redir_url = get_self_url(true);
$modules[] = array('usage', do_lang_tempcode('WARN_MEMBER'), build_url(array('page' => 'warnings', 'type' => 'ad', 'id' => $member_id_of, 'redirect' => $redir_url), get_module_zone('warnings')));
$modules[] = array('usage', do_lang_tempcode('PUNITIVE_HISTORY'), build_url(array('page' => 'warnings', 'type' => 'history', 'id' => $member_id_of), get_module_zone('warnings')));
}
if (has_specific_permission($member_id_viewing, 'view_content_history') && has_actual_page_access($member_id_viewing, 'admin_ocf_history')) {
$modules[] = !addon_installed('ocf_forum') ? NULL : array('usage', do_lang_tempcode('POST_HISTORY'), build_url(array('page' => 'admin_ocf_history', 'member_id' => $member_id_of), 'adminzone'));
}
if (has_actual_page_access($member_id_viewing, 'admin_lookup')) {
require_lang('submitban');
$modules[] = array('usage', do_lang_tempcode('INVESTIGATE_USER'), build_url(array('page' => 'admin_lookup', 'param' => $member_id_of), 'adminzone'));
}
if (has_actual_page_access($member_id_viewing, 'admin_security')) {
require_lang('security');
$modules[] = array('usage', do_lang_tempcode('SECURITY_LOGGING'), build_url(array('page' => 'admin_security', 'member_id' => $member_id_of), 'adminzone'));
}
if (addon_installed('actionlog')) {
if (has_actual_page_access($member_id_viewing, 'admin_actionlog')) {
require_lang('submitban');
$modules[] = array('usage', do_lang_tempcode('VIEW_ACTION_LOGS'), build_url(array('page' => 'admin_actionlog', 'type' => 'list', 'id' => $member_id_of), 'adminzone'));
}
}
if (has_actual_page_access($member_id_viewing, 'search') && addon_installed('ocf_forum') && addon_installed('search')) {
$modules[] = array('content', do_lang_tempcode('SEARCH_POSTS'), build_url(array('page' => 'search', 'type' => 'results', 'id' => 'ocf_posts', 'author' => $username, 'sort' => 'add_date', 'direction' => 'DESC', 'content' => ''), get_module_zone('search')), 'search');
}
if (has_actual_page_access($member_id_viewing, 'search') && addon_installed('search')) {
$modules[] = array('content', do_lang_tempcode('SEARCH'), build_url(array('page' => 'search', 'type' => 'misc', 'author' => $username), get_module_zone('search')), 'search');
}
if (addon_installed('authors')) {
$author = $GLOBALS['SITE_DB']->query_value_null_ok_full('SELECT author FROM ' . get_table_prefix() . 'authors WHERE (forum_handle=' . strval($member_id_viewing) . ') OR (forum_handle IS NULL AND ' . db_string_equal_to('author', $username) . ')');
if (has_actual_page_access($member_id_viewing, 'authors') && !is_null($author)) {
$modules[] = array('content', do_lang_tempcode('AUTHOR'), build_url(array('page' => 'authors', 'type' => 'misc', 'id' => $author), get_module_zone('authors')), 'me');
}
}
require_code('ocf_members2');
if (!is_guest() && ocf_may_whisper($member_id_of) && has_actual_page_access($member_id_viewing, 'topics') && ocf_may_make_personal_topic() && $member_id_viewing != $member_id_of) {
$modules[] = !addon_installed('ocf_forum') ? NULL : array('contact', do_lang_tempcode('ADD_PERSONAL_TOPIC'), build_url(array('page' => 'topics', 'type' => 'new_pt', 'id' => $member_id_of), get_module_zone('topics')), 'reply');
}
$extra_sections = array();
$info_details = array();
$hooks = find_all_hooks('modules', 'members');
foreach (array_keys($hooks) as $hook) {
require_code('hooks/modules/members/' . filter_naughty_harsh($hook));
$object = object_factory('Hook_members_' . filter_naughty_harsh($hook), true);
if (is_null($object)) {
continue;
}
if (method_exists($object, 'run')) {
$hook_result = $object->run($member_id_of);
$modules = array_merge($modules, $hook_result);
}
if (method_exists($object, 'get_info_details')) {
$hook_result = $object->get_info_details($member_id_of);
$info_details = array_merge($info_details, $hook_result);
}
if (method_exists($object, 'get_sections')) {
$hook_result = $object->get_sections($member_id_of);
$extra_sections = array_merge($extra_sections, $hook_result);
}
}
if (addon_installed('ocf_contactmember')) {
if (($GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_allow_emails') == 1 || get_option('allow_email_disable') == '0') && $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_email_address') != '' && !is_guest($member_id_of) && has_actual_page_access($member_id_viewing, 'contactmember') && $member_id_viewing != $member_id_of) {
$redirect = get_self_url(true);
$modules[] = array('contact', do_lang_tempcode('_EMAIL_MEMBER'), build_url(array('page' => 'contactmember', 'redirect' => $redirect, 'id' => $member_id_of), get_module_zone('contactmember')), 'reply');
}
}
require_lang('menus');
$sections = array('contact' => do_lang_tempcode('CONTACT'), 'profile' => do_lang_tempcode('EDIT_PROFILE'), 'views' => do_lang_tempcode('ACCOUNT'), 'usage' => do_lang_tempcode('USAGE'), 'content' => do_lang_tempcode('CONTENT'));
$actions = array();
global $M_SORT_KEY;
$M_SORT_KEY = mixed();
$M_SORT_KEY = 1;
@uasort($modules, 'multi_sort');
/* @ is to stop PHP bug warning about altered array contents when Tempcode copies are evaluated internally */
foreach ($sections as $section_code => $section_title) {
$links = new ocp_tempcode();
foreach ($modules as $module) {
if (count($module) == 3) {
list($_section_code, $lang, $url) = $module;
$rel = NULL;
} else {
list($_section_code, $lang, $url, $rel) = $module;
}
if ($section_code == $_section_code) {
$links->attach(do_template('OCF_MEMBER_ACTION', array('_GUID' => '67b2a640a368c6f53f1b1fa10f922fd0', 'ID' => strval($member_id_of), 'URL' => $url, 'LANG' => $lang, 'REL' => $rel)));
}
}
$actions[$section_code] = $links;
}
// Custom fields
$_custom_fields = ocf_get_all_custom_fields_match_member($member_id_of, $member_id_viewing != $member_id_of && !has_specific_permission($member_id_viewing, 'view_any_profile_field') ? 1 : NULL, $member_id_viewing == $member_id_of && !has_specific_permission($member_id_viewing, 'view_any_profile_field') ? 1 : NULL);
$custom_fields = array();
require_code('encryption');
$value = mixed();
foreach ($_custom_fields as $name => $_value) {
$value = $_value['RAW'];
$rendered_value = $_value['RENDERED'];
$encrypted_value = '';
if (is_data_encrypted($value)) {
$encrypted_value = remove_magic_encryption_marker($value);
} elseif (is_integer($value)) {
$value = strval($value);
} elseif (is_float($value)) {
$value = float_to_raw_string($value);
}
if (!is_object($value) && $value != '' || is_object($value) && !$value->is_empty()) {
$custom_fields[] = array('NAME' => $name, 'RAW_VALUE' => $value, 'VALUE' => $rendered_value, 'ENCRYPTED_VALUE' => $encrypted_value);
if ($name == do_lang('KEYWORDS')) {
$GLOBALS['SEO_KEYWORDS'] = is_object($value) ? $value->evaluate() : $value;
}
if ($name == do_lang('DESCRIPTION')) {
$GLOBALS['SEO_DESCRIPTION'] = is_object($value) ? $value->evaluate() : $value;
}
}
}
// Birthday
$dob = '';
if ($GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_reveal_age') == 1) {
$day = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_dob_day');
$month = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_dob_month');
$year = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_dob_year');
if (!is_null($day)) {
if (@strftime('%Y', @mktime(0, 0, 0, 1, 1, 1963)) != '1963') {
$dob = strval($year) . '-' . str_pad(strval($month), 2, '0', STR_PAD_LEFT) . '-' . str_pad(strval($day), 2, '0', STR_PAD_LEFT);
} else {
$dob = get_timezoned_date(mktime(12, 0, 0, $month, $day, $year), false, true, true);
}
}
}
// Find forum with most posts
$forums = $GLOBALS['FORUM_DB']->query('SELECT id,f_name FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_forums WHERE f_cache_num_posts>0');
$best_yet_forum = 0;
// Initialise to integer type
$best_yet_forum = NULL;
$most_active_forum = NULL;
$_best_yet_forum = $GLOBALS['FORUM_DB']->query_select('f_posts', array('COUNT(*) as cnt', 'p_cache_forum_id'), array('p_poster' => $member_id_of), 'GROUP BY p_cache_forum_id');
$_best_yet_forum = collapse_2d_complexity('p_cache_forum_id', 'cnt', $_best_yet_forum);
foreach ($forums as $forum) {
if (array_key_exists($forum['id'], $_best_yet_forum) && (is_null($best_yet_forum) || $_best_yet_forum[$forum['id']] > $best_yet_forum)) {
$most_active_forum = has_category_access($member_id_viewing, 'forums', strval($forum['id'])) ? protect_from_escaping(escape_html($forum['f_name'])) : do_lang_tempcode('PROTECTED_FORUM');
$best_yet_forum = $_best_yet_forum[$forum['id']];
}
}
$post_count = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_cache_num_posts');
$best_post_fraction = $post_count == 0 ? do_lang_tempcode('NA_EM') : make_string_tempcode(integer_format(100 * $best_yet_forum / $post_count));
$most_active_forum = is_null($best_yet_forum) ? new ocp_tempcode() : do_lang_tempcode('_MOST_ACTIVE_FORUM', $most_active_forum, make_string_tempcode(integer_format($best_yet_forum)), array($best_post_fraction));
$time_for_them_raw = tz_time(time(), get_users_timezone($member_id_of));
$time_for_them = get_timezoned_time(time(), true, $member_id_of);
$banned = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_is_perm_banned') == 1 ? do_lang_tempcode('YES') : do_lang_tempcode('NO');
$last_submit_time = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_last_submit_time');
$submit_days_ago = intval(floor(floatval(time() - $last_submit_time) / 60.0 / 60.0 / 24.0));
require_code('ocf_groups');
$primary_group_id = ocf_get_member_primary_group($member_id_of);
$primary_group = ocf_get_group_link($primary_group_id);
$signature = get_translated_tempcode($GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_signature'), $GLOBALS['FORUM_DB']);
$last_visit_time = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_last_visit_time');
if (member_is_online($member_id_of)) {
$online_now = do_lang_tempcode('YES');
$_online_now = true;
} else {
$_online_now = false;
$minutes_ago = intval(floor(floatval(time() - $last_visit_time) / 60.0));
$hours_ago = intval(floor(floatval(time() - $last_visit_time) / 60.0 / 60.0));
$days_ago = intval(floor(floatval(time() - $last_visit_time) / 60.0 / 60.0 / 24.0));
$months_ago = intval(floor(floatval(time() - $last_visit_time) / 60.0 / 60.0 / 24.0 / 31.0));
if ($minutes_ago < 180) {
$online_now = do_lang_tempcode('_ONLINE_NOW_NO_MINUTES', integer_format($minutes_ago));
} elseif ($hours_ago < 72) {
$online_now = do_lang_tempcode('_ONLINE_NOW_NO_HOURS', integer_format($hours_ago));
} elseif ($days_ago < 93) {
$online_now = do_lang_tempcode('_ONLINE_NOW_NO_DAYS', integer_format($days_ago));
} else {
$online_now = do_lang_tempcode('_ONLINE_NOW_NO_MONTHS', integer_format($months_ago));
}
}
$join_time = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_join_time');
$days_joined = intval(round((time() - $join_time) / 60 / 60 / 24));
$total_posts = $GLOBALS['FORUM_DB']->query_value('f_posts', 'COUNT(*)');
$join_date = $join_time == 0 ? '' : get_timezoned_date($join_time, false);
$count_posts = do_lang_tempcode('_COUNT_POSTS', integer_format($post_count), float_format(floatval($post_count) / floatval($days_joined == 0 ? 1 : $days_joined)), array(float_format(floatval(100 * $post_count) / floatval($total_posts == 0 ? 1 : $total_posts))));
$a = $avatar_url == '' ? 0 : ocf_get_member_best_group_property($member_id_of, 'max_avatar_width');
$b = $photo_thumb_url == '' ? 0 : intval(get_option('thumb_width'));
$right_margin = max($a, $b) == 0 ? 'auto' : strval(max($a, $b) + 6) . 'px';
breadcrumb_set_parents(array(array('_SELF:_SELF:misc', do_lang_tempcode('MEMBERS'))));
if (has_specific_permission($member_id_viewing, 'see_ip')) {
$ip_address = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_ip_address');
} else {
$ip_address = '';
}
$secondary_groups = ocf_get_members_groups($member_id_of, true);
unset($secondary_groups[$primary_group_id]);
if (count($secondary_groups) > 0) {
$_secondary_groups = array();
$all_groups = $GLOBALS['FORUM_DRIVER']->get_usergroup_list(true, false, false, array_keys($secondary_groups), $member_id_of);
foreach (array_keys($secondary_groups) as $key) {
$_secondary_groups[$key] = $all_groups[$key];
}
$secondary_groups = $_secondary_groups;
}
if (addon_installed('points')) {
require_code('points');
$count_points = integer_format(total_points($member_id_of));
} else {
$count_points = '';
}
$user_agent = NULL;
$operating_system = NULL;
if (has_specific_permission($member_id_viewing, 'show_user_browsing') && addon_installed('stats')) {
$last_stats = $GLOBALS['SITE_DB']->query_select('stats', array('browser', 'operating_system'), array('the_user' => $member_id_of), 'ORDER BY date_and_time DESC', 1);
if (array_key_exists(0, $last_stats)) {
$user_agent = $last_stats[0]['browser'];
$operating_system = $last_stats[0]['operating_system'];
}
}
/*if ((get_option('allow_member_integration')!='off') && (get_option('allow_member_integration')!='hidden'))
{
$remote=$GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of,'m_password_compat_scheme')=='remote';
} else */
$remote = NULL;
$_on_probation = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_on_probation_until');
if (is_null($_on_probation) || $_on_probation <= time()) {
$on_probation = NULL;
} else {
$on_probation = strval($_on_probation);
}
$GLOBALS['META_DATA'] += array('created' => date('Y-m-d', $join_time), 'creator' => $username, 'publisher' => '', 'modified' => '', 'type' => 'Member', 'title' => '', 'identifier' => '_SEARCH:members:view:' . strval($member_id_of), 'description' => '', 'image' => $avatar_url == '' && has_specific_permission($member_id_viewing, 'view_member_photos') ? $photo_url : $avatar_url);
// Look up member's clubs
$clubs = array();
if (addon_installed('ocf_clubs')) {
$club_ids = $GLOBALS['FORUM_DRIVER']->get_members_groups($member_id_of, true);
$club_rows = list_to_map('id', $GLOBALS['FORUM_DB']->query_select('f_groups', array('*'), array('g_is_private_club' => 1), '', 200));
if (count($club_rows) == 200) {
$club_rows = NULL;
}
foreach ($club_ids as $club_id) {
if (is_null($club_rows)) {
$club_rows = list_to_map('id', $GLOBALS['FORUM_DB']->query_select('f_groups', array('*'), array('g_is_private_club' => 1, 'id' => $club_id), '', 200));
if (!array_key_exists($club_id, $club_rows)) {
continue;
}
$club_row = $club_rows[$club_id];
$club_rows = NULL;
} else {
if (!array_key_exists($club_id, $club_rows)) {
continue;
}
$club_row = $club_rows[$club_id];
}
$club_name = get_translated_text($club_row['g_name'], $GLOBALS['FORUM_DB']);
$club_forum = $GLOBALS['FORUM_DB']->query_value_null_ok('f_forums f LEFT JOIN ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'translate t ON t.id=f.f_description', 'f.id', array('text_original' => do_lang('FORUM_FOR_CLUB', $club_name)));
$clubs[] = array('CLUB_NAME' => $club_name, 'CLUB_ID' => strval($club_row['id']), 'CLUB_FORUM' => is_null($club_forum) ? '' : strval($club_forum));
}
}
$content = do_template('OCF_MEMBER_PROFILE_ABOUT', array('_GUID' => 'fodfjdsfjsdljfdls', 'CLUBS' => $clubs, 'REMOTE' => $remote, 'RIGHT_MARGIN' => $right_margin, 'AVATAR_WIDTH' => strval($a) . 'px', 'PHOTO_WIDTH' => strval($b) . 'px', 'MOST_ACTIVE_FORUM' => $most_active_forum, 'TIME_FOR_THEM' => $time_for_them, 'TIME_FOR_THEM_RAW' => strval($time_for_them_raw), 'SUBMIT_DAYS_AGO' => integer_format($submit_days_ago), 'SUBMIT_TIME_RAW' => strval($last_submit_time), 'LAST_VISIT_TIME_RAW' => strval($last_visit_time), 'ONLINE_NOW' => $online_now, '_ONLINE_NOW' => $_online_now, 'BANNED' => $banned, 'USER_AGENT' => $user_agent, 'OPERATING_SYSTEM' => $operating_system, 'DOB' => $dob, 'IP_ADDRESS' => $ip_address, 'COUNT_POSTS' => $count_posts, 'COUNT_POINTS' => $count_points, 'PRIMARY_GROUP' => $primary_group, 'PRIMARY_GROUP_ID' => strval($primary_group_id), 'PHOTO_URL' => $photo_url, 'PHOTO_THUMB_URL' => $photo_thumb_url, 'EMAIL_ADDRESS' => $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_email_address'), 'AVATAR_URL' => $avatar_url, 'SIGNATURE' => $signature, 'JOIN_DATE' => $join_date, 'JOIN_DATE_RAW' => strval($join_time), 'CUSTOM_FIELDS' => $custom_fields, 'ACTIONS_contact' => $actions['contact'], 'ACTIONS_profile' => $actions['profile'], 'ACTIONS_views' => $actions['views'], 'ACTIONS_usage' => $actions['usage'], 'ACTIONS_content' => $actions['content'], 'USERNAME' => $username, 'MEMBER_ID' => strval($member_id_of), 'SECONDARY_GROUPS' => $secondary_groups, 'VIEW_PROFILES' => $member_id_viewing == $member_id_of || has_specific_permission($member_id_viewing, 'view_profiles'), 'ON_PROBATION' => $on_probation, 'EXTRA_INFO_DETAILS' => $info_details, 'EXTRA_SECTIONS' => $extra_sections));
return array($title, $content, $order);
}
/**
* Standard modular render function for profile tabs edit hooks.
*
* @param MEMBER The ID of the member who is being viewed
* @param MEMBER The ID of the member who is doing the viewing
* @param boolean Whether to leave the tab contents NULL, if tis hook supports it, so that AJAX can load it later
* @return ?array A tuple: The tab title, the tab body text (may be blank), the tab fields, extra Javascript (may be blank) the suggested tab order, hidden fields (optional) (NULL: if $leave_to_ajax_if_possible was set)
*/
function render_tab($member_id_of, $member_id_viewing, $leave_to_ajax_if_possible = false)
{
$order = 0;
// Actualiser
if (post_param('submitting_settings_tab', NULL) !== NULL) {
require_code('ocf_members_action2');
$is_ldap = ocf_is_ldap_member($member_id_of);
$is_httpauth = ocf_is_httpauth_member($member_id_of);
$is_remote = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_password_compat_scheme') == 'remote';
if ($is_ldap || $is_httpauth || $is_remote || $member_id_of != $member_id_viewing && !has_specific_permission($member_id_viewing, 'assume_any_member')) {
$password = NULL;
} else {
$password = post_param('edit_password');
if ($password == '') {
$password = NULL;
} else {
$password_confirm = trim(post_param('password_confirm'));
if ($password != $password_confirm) {
warn_exit(make_string_tempcode(escape_html(do_lang('PASSWORD_MISMATCH'))));
}
}
}
$custom_fields = ocf_get_all_custom_fields_match($GLOBALS['FORUM_DRIVER']->get_members_groups($member_id_of), $member_id_of != $member_id_viewing && !has_specific_permission($member_id_viewing, 'view_any_profile_field') ? 1 : NULL, $member_id_of != $member_id_viewing ? NULL : 1, $member_id_of != $member_id_viewing ? NULL : 1);
$actual_custom_fields = ocf_read_in_custom_fields($custom_fields, $member_id_of);
$pt_allow = array_key_exists('pt_allow', $_POST) ? implode(',', $_POST['pt_allow']) : '';
$tmp_groups = $GLOBALS['OCF_DRIVER']->get_usergroup_list(true, true);
$all_pt_allow = '';
foreach (array_keys($tmp_groups) as $key) {
if ($key != db_get_first_id()) {
if ($all_pt_allow != '') {
$all_pt_allow .= ',';
}
$all_pt_allow .= strval($key);
}
}
if ($pt_allow == $all_pt_allow) {
$pt_allow = '*';
}
$pt_rules_text = post_param('pt_rules_text', NULL);
if (has_specific_permission($member_id_viewing, 'member_maintenance')) {
$validated = post_param_integer('validated', 0);
$primary_group = $is_ldap || !has_specific_permission($member_id_viewing, 'assume_any_member') ? NULL : post_param_integer('primary_group', NULL);
$is_perm_banned = post_param_integer('is_perm_banned', 0);
$old_is_perm_banned = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_is_perm_banned');
if ($old_is_perm_banned != $is_perm_banned) {
if ($is_perm_banned == 1) {
ocf_ban_member($member_id_of);
} else {
ocf_unban_member($member_id_of);
}
}
$highlighted_name = post_param_integer('highlighted_name', 0);
if (has_specific_permission($member_id_viewing, 'probate_members')) {
$on_probation_until = get_input_date('on_probation_until');
$current__on_probation_until = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_on_probation_until');
if ((is_null($on_probation_until) || $on_probation_until <= time()) && $current__on_probation_until > time()) {
log_it('STOP_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $on_probation_until > time() && $current__on_probation_until <= time()) {
log_it('START_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $current__on_probation_until > $on_probation_until && $on_probation_until > time() && $current__on_probation_until > time()) {
log_it('REDUCE_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $current__on_probation_until < $on_probation_until && $on_probation_until > time() && $current__on_probation_until > time()) {
log_it('EXTEND_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
}
} else {
$on_probation_until = NULL;
}
} else {
$validated = NULL;
$primary_group = NULL;
$highlighted_name = NULL;
$on_probation_until = NULL;
}
if (has_actual_page_access($member_id_viewing, 'admin_ocf_join') || has_specific_permission($member_id_of, 'rename_self')) {
$username = $is_ldap || $is_remote ? NULL : post_param('edit_username', NULL);
} else {
$username = NULL;
}
$email = post_param('email_address', NULL);
if (!is_null($email)) {
$email = trim($email);
}
$theme = post_param('theme', NULL);
if ($is_remote) {
$preview_posts = NULL;
$zone_wide = NULL;
$auto_monitor_contrib_content = NULL;
$views_signatures = NULL;
$timezone = NULL;
} else {
$preview_posts = post_param_integer('preview_posts', 0);
$zone_wide = post_param_integer('zone_wide', 0);
$auto_monitor_contrib_content = NULL;
//post_param_integer('auto_monitor_contrib_content',0); Moved to notifications tab
$views_signatures = post_param_integer('views_signatures', 0);
$timezone = post_param('timezone', get_site_timezone());
}
ocf_edit_member($member_id_of, $email, $preview_posts, post_param_integer('dob_day', -1), post_param_integer('dob_month', -1), post_param_integer('dob_year', -1), $timezone, $primary_group, $actual_custom_fields, $theme, post_param_integer('reveal_age', 0), $views_signatures, $auto_monitor_contrib_content, post_param('language', NULL), post_param_integer('allow_emails', 0), post_param_integer('allow_emails_from_staff', 0), $validated, $username, $password, $zone_wide, $highlighted_name, $pt_allow, $pt_rules_text, $on_probation_until);
if (!array_key_exists('secondary_groups', $_POST)) {
$_POST['secondary_groups'] = array();
}
require_code('ocf_groups_action2');
$members_groups = $GLOBALS['OCF_DRIVER']->get_members_groups($member_id_of);
$group_count = $GLOBALS['FORUM_DB']->query_value('f_groups', 'COUNT(*)');
$groups = list_to_map('id', $GLOBALS['FORUM_DB']->query_select('f_groups', array('*'), $group_count > 200 ? array('g_is_private_club' => 0) : NULL));
foreach ($_POST['secondary_groups'] as $group_id) {
$group = $groups[intval($group_id)];
if ($group['g_hidden'] == 1 && !in_array($group['id'], $members_groups) && !has_specific_permission($member_id_viewing, 'see_hidden_groups')) {
continue;
}
if (!in_array($group['id'], $members_groups) && (has_specific_permission($member_id_viewing, 'assume_any_member') || $group['g_open_membership'] == 1)) {
ocf_add_member_to_group($member_id_of, $group['id']);
}
}
foreach ($members_groups as $group_id) {
if (!in_array(strval($group_id), $_POST['secondary_groups'])) {
ocf_member_leave_group($group_id, $member_id_of);
}
}
$GLOBALS['FORUM_DB']->query('DELETE FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_member_known_login_ips WHERE i_member_id=' . strval($member_id_of) . ' AND ' . db_string_not_equal_to('i_val_code', ''));
// So any re-confirms can happen
if (addon_installed('awards')) {
require_code('awards');
handle_award_setting('member', strval($member_id_of));
}
attach_message(do_lang_tempcode('SUCCESS_SAVE'), 'inform');
}
if ($leave_to_ajax_if_possible) {
return NULL;
}
// UI
$title = do_lang_tempcode('SETTINGS');
$myrow = $GLOBALS['FORUM_DRIVER']->get_member_row($member_id_of);
if (is_null($myrow)) {
warn_exit(do_lang_tempcode('USER_NO_EXIST'));
}
require_code('ocf_members_action2');
list($fields, $hidden) = ocf_get_member_fields_settings(false, $member_id_of, NULL, $myrow['m_email_address'], $myrow['m_preview_posts'], $myrow['m_dob_day'], $myrow['m_dob_month'], $myrow['m_dob_year'], get_users_timezone($member_id_of), $myrow['m_theme'], $myrow['m_reveal_age'], $myrow['m_views_signatures'], $myrow['m_auto_monitor_contrib_content'], $myrow['m_language'], $myrow['m_allow_emails'], $myrow['m_allow_emails_from_staff'], $myrow['m_validated'], $myrow['m_primary_group'], $myrow['m_username'], $myrow['m_is_perm_banned'], '', $myrow['m_zone_wide'], $myrow['m_highlighted_name'], $myrow['m_pt_allow'], get_translated_text($myrow['m_pt_rules_text'], $GLOBALS['FORUM_DB']), $myrow['m_on_probation_until']);
// Awards?
if (addon_installed('awards')) {
require_code('awards');
$fields->attach(get_award_fields('member', strval($member_id_of)));
}
$redirect = get_param('redirect', NULL);
if (!is_null($redirect)) {
$hidden->attach(form_input_hidden('redirect', $redirect));
}
$hidden->attach(form_input_hidden('submitting_settings_tab', '1'));
$javascript = "\n\t\t\tvar form=document.getElementById('email_address').form;\n\t\t\tform.prior_profile_edit_submit=form.onsubmit;\n\t\t\tform.onsubmit=function()\n\t\t\t\t{\n\t\t\t\t\tif (typeof form.elements['edit_password']!='undefined')\n\t\t\t\t\t{\n\t\t\t\t\t\tif ((form.elements['password_confirm']) && (form.elements['password_confirm'].value!=form.elements['edit_password'].value))\n\t\t\t\t\t\t{\n\t\t\t\t\t\t\twindow.fauxmodal_alert('" . php_addslashes(do_lang('PASSWORD_MISMATCH')) . "');\n\t\t\t\t\t\t\treturn false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tif (typeof form.prior_profile_edit_submit!='undefined' && form.prior_profile_edit_submit) return form.prior_profile_edit_submit();\n\t\t\t\t\treturn true;\n\t\t\t\t};\n\t\t";
$text = '';
return array($title, $fields, $text, $javascript, $order, $hidden);
}
/**
* Request that CRON loads up a block's caching in the background.
*
* @param ID_TEXT The codename of the block
* @param ?array Parameters to call up block with if we have to defer caching (NULL: none)
* @param boolean Whether we are cacheing Tempcode (needs special care)
*/
function request_via_cron($codename, $map, $tempcode)
{
global $TEMPCODE_SETGET;
$map = array('c_theme' => $GLOBALS['FORUM_DRIVER']->get_theme(), 'c_lang' => user_lang(), 'c_codename' => $codename, 'c_map' => serialize($map), 'c_timezone' => get_users_timezone(get_member()), 'c_is_bot' => is_null(get_bot_type()) ? 0 : 1, 'c_in_panel' => (array_key_exists('in_panel', $TEMPCODE_SETGET) ? $TEMPCODE_SETGET['in_panel'] : '_false') == '_true' ? 1 : 0, 'c_interlock' => (array_key_exists('interlock', $TEMPCODE_SETGET) ? $TEMPCODE_SETGET['interlock'] : '_false') == '_true' ? 1 : 0, 'c_store_as_tempcode' => $tempcode ? 1 : 0);
if (is_null($GLOBALS['SITE_DB']->query_value_null_ok('cron_caching_requests', 'id', $map))) {
$GLOBALS['SITE_DB']->query_insert('cron_caching_requests', $map);
}
}
/**
* Put a timestamp into the correct timezone for being reported onto the calendar.
*
* @param TIME Timestamp (proper UTC timestamp, not in user time)
* @param ID_TEXT The timezone associated with the event (the passed $utc_timestamp should NOT be relative to this timezone, that must be UTC)
* @param boolean Whether the time should be converted to the viewer's own timezone instead
* @return TIME Altered timestamp
*/
function cal_utctime_to_usertime($utc_timestamp, $default_timezone, $show_in_users_timezone)
{
if (!$show_in_users_timezone) {
return $utc_timestamp;
}
return tz_time($utc_timestamp, get_users_timezone());
}
/**
* Convert a user timestamp to a UTC timestamp. This is not a function to use much- you probably want utctime_to_usertime.
* What complicate understanding of matters is that "user time" is not the timestamp that would exist on a user's PC, as all timestamps are meant to be stored in UTC. "user time" is offsetted to compensate, a virtual construct.
*
* @param ?TIME Input timestamp (NULL: now)
* @param ?MEMBER Member for which the date is being rendered (NULL: current member)
* @return TIME Output timestamp
*/
function usertime_to_utctime($timestamp = NULL, $member = NULL)
{
if (is_null($timestamp)) {
$timestamp = time();
}
$timezone = get_users_timezone($member);
$amount_forward = tz_time($timestamp, $timezone) - $timestamp;
return $timestamp - $amount_forward;
}
/**
* Standard modular run function for CRON hooks. Searches for tasks to perform.
*/
function run()
{
if (get_param('keep_lang', NULL) === NULL || get_param('keep_theme', NULL) === NULL) {
// We need to run this for each language and for each theme
$langs = find_all_langs();
require_code('themes2');
$themes = find_all_themes();
foreach (array_keys($langs) as $lang) {
foreach (array_keys($themes) as $theme) {
if ($theme == 'default' || has_category_access(get_member(), 'theme', $theme)) {
$where = array('c_theme' => $theme, 'c_lang' => $lang);
$count = $GLOBALS['SITE_DB']->query_value('cron_caching_requests', 'COUNT(*)', $where);
if ($count > 0) {
$url = get_base_url() . '/data/cron_bridge.php?limit_hook=block_caching&keep_lang=' . urlencode($lang) . '&keep_theme=' . urlencode($theme);
http_download_file($url, NULL, false);
}
}
}
}
// Force re-loading of values that we use to mark progress (as above calls probably resulted in changes happening)
global $VALUES;
$VALUES = $GLOBALS['SITE_DB']->query_select('values', array('*'));
$VALUES = list_to_map('the_name', $VALUES);
return;
}
$where = array('c_theme' => $GLOBALS['FORUM_DRIVER']->get_theme(), 'c_lang' => user_lang());
$requests = $GLOBALS['SITE_DB']->query_select('cron_caching_requests', array('id', 'c_codename', 'c_map', 'c_timezone', 'c_is_bot', 'c_in_panel', 'c_interlock', 'c_store_as_tempcode'), $where);
foreach ($requests as $request) {
$GLOBALS['NO_QUERY_LIMIT'] = true;
$codename = $request['c_codename'];
$map = unserialize($request['c_map']);
$object = do_block_hunt_file($codename, $map);
if (is_object($object)) {
global $LANGS_REQUESTED, $JAVASCRIPTS, $CSSS, $LANGS_REQUESTED, $DO_NOT_CACHE_THIS, $TIMEZONE_MEMBER_CACHE;
$backup_langs_requested = $LANGS_REQUESTED;
$backup_javascripts = $JAVASCRIPTS;
$backup_csss = $CSSS;
get_users_timezone();
$backup_timezone = $TIMEZONE_MEMBER_CACHE[get_member()];
$LANGS_REQUESTED = array();
$JAVASCRIPTS = array('javascript' => 1, 'javascript_thumbnails' => 1);
$CSSS = array('no_cache' => 1, 'global' => 1);
$cache = $object->run($map);
$TIMEZONE_MEMBER_CACHE[get_member()] = $backup_timezone;
$cache->handle_symbol_preprocessing();
if (!$DO_NOT_CACHE_THIS) {
if (method_exists($object, 'cacheing_environment')) {
$info = $object->cacheing_environment();
} else {
$info = array();
$info['cache_on'] = 'array($map,$GLOBALS[\'FORUM_DRIVER\']->get_members_groups(get_member()))';
$info['ttl'] = 60 * 24;
}
$ttl = $info['ttl'];
$_cache_identifier = array();
$cache_on = $info['cache_on'];
if (is_array($cache_on)) {
$_cache_identifier = call_user_func($cache_on[0], $map);
} else {
if ($cache_on != '' && !defined('HIPHOP_PHP')) {
$_cache_on = eval('return ' . $cache_on . ';');
// NB: This uses $map, as $map is referenced inside $cache_on
if (is_null($_cache_on)) {
return NULL;
}
foreach ($_cache_on as $on) {
$_cache_identifier[] = $on;
}
} elseif (defined('HIPHOP_PHP')) {
return NULL;
}
}
$_cache_identifier[] = $request['c_timezone'];
$_cache_identifier[] = $request['c_is_bot'] == 0;
$_cache_identifier[] = strval($request['c_in_panel']);
$_cache_identifier[] = strval($request['c_interlock']);
$cache_identifier = serialize($_cache_identifier);
require_code('caches2');
if ($request['c_store_as_tempcode'] == 1) {
$cache = make_string_tempcode($cache->evaluate());
}
put_into_cache($codename, $ttl, $cache_identifier, $cache, array_keys($LANGS_REQUESTED), array_keys($JAVASCRIPTS), array_keys($CSSS), true);
}
$LANGS_REQUESTED += $backup_langs_requested;
$JAVASCRIPTS += $backup_javascripts;
$CSSS += $backup_csss;
}
$GLOBALS['SITE_DB']->query_delete('cron_caching_requests', $request);
}
}
/**
* Takes a string which is a PHP expression over $map (parameter map), and returns a derived identifier.
* We see if we have something cached by looking for a matching identifier.
*
* @param mixed PHP expression over $map (the parameter map of the block) OR a call_user_func specifier that will return a result (which will be used if cacheing is really very important, even for Hip Hop PHP)
* @param ?array The block parameter map (NULL: no parameters)
* @return ?LONG_TEXT The derived cache identifier (NULL: the identifier is CURRENTLY null meaning cannot be cached)
*/
function do_block_get_cache_identifier($cache_on, $map)
{
$_cache_identifier = array();
if (is_array($cache_on)) {
$_cache_identifier = call_user_func($cache_on[0], $map);
} else {
if ($cache_on != '' && !defined('HIPHOP_PHP')) {
$_cache_on = eval('return ' . $cache_on . ';');
// NB: This uses $map, as $map is referenced inside $cache_on
if ($_cache_on === NULL) {
return NULL;
}
foreach ($_cache_on as $on) {
$_cache_identifier[] = $on;
}
} elseif (defined('HIPHOP_PHP')) {
return NULL;
}
}
$_cache_identifier[] = get_users_timezone(get_member());
$_cache_identifier[] = get_bot_type() === NULL;
global $TEMPCODE_SETGET;
$_cache_identifier[] = isset($TEMPCODE_SETGET['in_panel']) ? $TEMPCODE_SETGET['in_panel'] : '0';
$_cache_identifier[] = isset($TEMPCODE_SETGET['interlock']) ? $TEMPCODE_SETGET['interlock'] : '0';
$cache_identifier = serialize($_cache_identifier);
return $cache_identifier;
}
/**
* Get the tempcode for a date input.
*
* @param mixed A human intelligible name for this input field
* @param mixed A description for this input field
* @param ID_TEXT The parameter name stub for this input field (it's actually a composite field, read in by passing this stub to post_param_date)
* @param boolean Whether this is a required field
* @param boolean Whether this field is empty by default
* @param boolean Whether to input time for this field also
* @param ?mixed The default timestamp to use (either TIME or array of time components) (NULL: now)
* @param ?integer The number of years to allow selection from (all into the future, as this field type is not meant for inputting past dates) (NULL: no limit)
* @param ?integer The year to start from (NULL: this year)
* @param ?integer The tab index of the field (NULL: not specified)
* @param ?boolean Whether this is rendered in pink as a required field (NULL: depend on $null_ok)
* @param boolean Whether to input date for this field (if false, will just do time)
* @param ?ID_TEXT Timezone to input in (NULL: current user's timezone)
* @param boolean Convert $default_time to $timezone
* @return tempcode The input field
*/
function form_input_date($pretty_name, $description, $stub, $null_ok, $null_default, $do_time, $default_time = NULL, $total_years_to_show = 10, $year_start = NULL, $tabindex = NULL, $required = NULL, $do_date = true, $timezone = NULL, $handle_timezone = true)
{
if (is_null($required)) {
$required = !$null_ok;
}
$tabindex = get_form_field_tabindex($tabindex);
require_lang('dates');
require_javascript('javascript_multi');
require_javascript('javascript_yahoo');
require_javascript('javascript_yahoo_events');
require_javascript('javascript_date_chooser');
require_css('date_chooser');
if (is_null($year_start)) {
$year_start = intval(date('Y'));
}
$untuned_year_start = $year_start;
// The $year_start may go down if our default date requires it, but we need to know what our $total_years_to_show should really be relative to
$default_minute = mixed();
$default_hour = mixed();
$default_month = mixed();
$default_day = mixed();
$default_year = mixed();
if (is_array($default_time) && $default_time[4] < 1970 && @strftime('%Y', @mktime(0, 0, 0, 1, 1, 1963)) != '1963') {
list($default_minute, $default_hour, $default_month, $default_day, $default_year) = $default_time;
if (is_null($default_minute)) {
$default_minute = 0;
}
if (is_null($default_hour)) {
$default_hour = 0;
}
} else {
if (is_array($default_time)) {
if (is_null($default_time[4])) {
$default_time = NULL;
} else {
list($default_minute, $default_hour, $default_month, $default_day, $default_year) = $default_time;
$default_time = mktime($default_hour, $default_minute, 0, $default_month, $default_day, $default_year);
}
}
$_default_time = filter_form_field_default($stub, is_null($default_time) ? '' : strval($default_time));
$default_time = $_default_time == '' ? NULL : intval($_default_time);
if (!is_null($default_time) && $handle_timezone) {
if (is_null($timezone)) {
$timezone = get_users_timezone();
}
$default_time = tz_time($default_time, $timezone);
}
$default_minute = is_null($default_time) ? NULL : intval(date('i', $default_time));
$default_hour = is_null($default_time) ? NULL : intval(date('H', $default_time));
$default_month = is_null($default_time) ? NULL : intval(date('n', $default_time));
$default_day = is_null($default_time) ? NULL : intval(date('j', $default_time));
$default_year = is_null($default_time) ? NULL : intval(date('Y', $default_time));
}
if (is_integer($default_year) && $default_year < $year_start) {
$year_start = $default_year;
}
ob_start();
for ($minute = 0; $minute < 60; $minute++) {
$_minute = strval($minute);
$temp = form_input_list_entry($_minute, $minute === $default_minute, $minute < 10 ? str_pad($_minute, 2, '0', STR_PAD_LEFT) : $_minute);
$temp->evaluate_echo();
}
$minutes = ob_get_contents();
ob_end_clean();
ob_start();
for ($hour = 0; $hour < 24; $hour++) {
$text_hour = locale_filter(gmdate(do_lang('time_hour'), intval($hour * 60 * 60)));
$temp = form_input_list_entry(strval($hour), $hour === $default_hour, $text_hour);
$temp->evaluate_echo();
}
$hours = ob_get_contents();
ob_end_clean();
$time = $do_time ? do_template('FORM_SCREEN_INPUT_TIME', array('NULL_OK' => $null_ok, 'DISABLED' => $null_default && has_js(), 'TABINDEX' => strval($tabindex), 'MINUTES' => $minutes, 'HOURS' => $hours, 'STUB' => $stub)) : new ocp_tempcode();
if (!$do_date) {
return _form_input($stub, $pretty_name, $description, $time, $required, false, $tabindex, false, true);
}
$null = $null_ok ? do_template('FORM_SCREEN_INPUT_DATE_NULL', array('_GUID' => '22859d15f1b295b08036e1d0308d371a', 'TICKED' => !$null_default, 'TABINDEX' => strval($tabindex), 'STUB' => $stub)) : new ocp_tempcode();
ob_start();
for ($i = 1; $i <= 31; $i++) {
$temp = form_input_list_entry(strval($i), $i === $default_day);
$temp->evaluate_echo();
}
$days = ob_get_contents();
ob_end_clean();
ob_start();
for ($i = 1; $i <= 12; $i++) {
switch ($i) {
case 1:
$month_text = do_lang_tempcode('JANUARY');
break;
case 2:
$month_text = do_lang_tempcode('FEBRUARY');
break;
case 3:
$month_text = do_lang_tempcode('MARCH');
break;
case 4:
$month_text = do_lang_tempcode('APRIL');
break;
case 5:
$month_text = do_lang_tempcode('MAY');
break;
case 6:
$month_text = do_lang_tempcode('JUNE');
break;
case 7:
$month_text = do_lang_tempcode('JULY');
break;
case 8:
$month_text = do_lang_tempcode('AUGUST');
break;
case 9:
$month_text = do_lang_tempcode('SEPTEMBER');
break;
case 10:
$month_text = do_lang_tempcode('OCTOBER');
break;
case 11:
$month_text = do_lang_tempcode('NOVEMBER');
break;
case 12:
$month_text = do_lang_tempcode('DECEMBER');
break;
}
$temp = form_input_list_entry(strval($i), $i === $default_month, $month_text);
$temp->evaluate_echo();
}
$months = ob_get_contents();
ob_end_clean();
ob_start();
if (!is_null($total_years_to_show) && $total_years_to_show < 0) {
$yt = $year_start + $total_years_to_show;
for ($i = max($untuned_year_start, $year_start); $i >= $yt; $i--) {
$temp = form_input_list_entry(strval($i), $i === $default_year);
$temp->evaluate_echo();
}
} else {
if (is_null($total_years_to_show)) {
$yt = max($untuned_year_start, $year_start) + 5;
} else {
$yt = max($untuned_year_start, $year_start) + $total_years_to_show;
}
for ($i = $year_start; $i <= $yt; $i++) {
$temp = form_input_list_entry(strval($i), $i === $default_year);
$temp->evaluate_echo();
}
}
$years = ob_get_contents();
ob_end_clean();
$input = do_template('FORM_SCREEN_INPUT_DATE', array('_GUID' => '5ace58dd0f540f70fb3bd440fb02a430', 'NULL_OK' => $null_ok, 'DISABLED' => $null_default, 'TABINDEX' => strval($tabindex), 'YEARS' => $years, 'MONTHS' => $months, 'DAYS' => $days, 'STUB' => $stub, 'NULL' => $null, 'TIME' => $time, 'UNLIMITED' => is_null($total_years_to_show)));
return _form_input($stub, $pretty_name, $description, $input, $required, false, $tabindex, false, true);
}
/**
* Get the form fields for an event input form.
*
* @param ?AUTO_LINK The event type (NULL: default)
* @param ?integer The year the event starts at (NULL: default)
* @param ?integer The month the event starts at (NULL: default)
* @param ?integer The day the event starts at (NULL: default)
* @param ?integer The hour the event starts at (NULL: default)
* @param ?integer The minute the event starts at (NULL: default)
* @param SHORT_TEXT The title of the event
* @param LONG_TEXT The full text describing the event
* @param SHORT_TEXT The recurrence code
* @param ?integer The number of recurrences (NULL: none/infinite)
* @param BINARY Whether to segregate the comment-topics/rating/trackbacks per-recurrence
* @param BINARY Whether it is a public event
* @param integer The priority
* @range 1 5
* @param ?integer The year the event ends at (NULL: not a multi day event)
* @param ?integer The month the event ends at (NULL: not a multi day event)
* @param ?integer The day the event ends at (NULL: not a multi day event)
* @param ?integer The hour the event ends at (NULL: not a multi day event)
* @param ?integer The minute the event ends at (NULL: not a multi day event)
* @param ?ID_TEXT The timezone for the event (NULL: current user's timezone)
* @param BINARY Whether the time should be presented in the viewer's own timezone
* @param BINARY Whether the event is validated
* @param ?BINARY Whether rating is allowed (NULL: decide statistically, based on existing choices)
* @param ?SHORT_INTEGER Whether comments are allowed (0=no, 1=yes, 2=review style) (NULL: decide statistically, based on existing choices)
* @param ?BINARY Whether trackbacks are allowed (NULL: decide statistically, based on existing choices)
* @param LONG_TEXT Notes
* @return array A tuple of: (fields, hidden-fields, delete-fields, edit-text, whether all delete fields are specified, posting form text, more fields)
*/
function get_form_fields($type = NULL, $start_year = NULL, $start_month = NULL, $start_day = NULL, $start_hour = NULL, $start_minute = NULL, $title = '', $content = '', $recurrence = 'none', $recurrences = NULL, $seg_recurrences = 0, $is_public = 1, $priority = 3, $end_year = NULL, $end_month = NULL, $end_day = NULL, $end_hour = NULL, $end_minute = NULL, $timezone = NULL, $do_timezone_conv = 0, $validated = 1, $allow_rating = NULL, $allow_comments = NULL, $allow_trackbacks = NULL, $notes = '')
{
list($allow_rating, $allow_comments, $allow_trackbacks) = $this->choose_feedback_fields_statistically($allow_rating, $allow_comments, $allow_trackbacks);
unset($content);
if (is_null($timezone) || $timezone == '') {
$timezone = get_users_timezone();
}
require_code('form_templates');
if (is_null($type)) {
global $NON_CANONICAL_PARAMS;
$NON_CANONICAL_PARAMS[] = 'date';
$NON_CANONICAL_PARAMS[] = 'e_type';
$NON_CANONICAL_PARAMS[] = 'validated';
$date = get_param('date', '');
$start_hour = NULL;
$start_minute = NULL;
if ($date != '') {
$date2 = explode(' ', $date);
$exploded = explode('-', $date2[0]);
//if (count($exploded)!=3) warn_exit(do_lang_tempcode('INTERNAL_ERROR'));
$start_year = intval($exploded[0]);
$start_month = intval($exploded[1]);
$start_day = intval($exploded[2]);
if (array_key_exists(1, $date2)) {
$exploded = explode(':', $date2[1]);
//if (count($exploded)!=2) warn_exit(do_lang_tempcode('INTERNAL_ERROR'));
$start_hour = intval($exploded[0]);
$start_minute = intval($exploded[1]);
}
} else {
list($start_year, $start_month, $start_day) = array(NULL, NULL, NULL);
}
$type = get_param_integer('e_type', -1);
if ($type == -1) {
$type = NULL;
}
$adding = true;
} else {
$adding = false;
}
if (is_null($type)) {
$type = db_get_first_id() + 1;
}
if (is_null($start_month)) {
$start_year = intval(date('Y'));
$start_month = intval(date('m'));
$start_day = intval(date('d'));
$start_hour = NULL;
$start_minute = NULL;
}
if ((is_null($end_year) || is_null($end_month) || is_null($end_day)) && $adding) {
$end_year = NULL;
//$start_year;
$end_month = NULL;
//$start_month;
$end_day = NULL;
//$start_day;
$end_hour = NULL;
$end_minute = NULL;
}
$fields = new ocp_tempcode();
$hidden = new ocp_tempcode();
$fields->attach(form_input_line(do_lang_tempcode('TITLE'), do_lang_tempcode('DESCRIPTION_TITLE'), 'title', $title, true));
//$fields->attach(form_input_text_comcode(do_lang_tempcode('EVENT_TEXT'),do_lang_tempcode('DESCRIPTION_EVENT_TEXT'),'content',$content,false));
// Type
$type_list = nice_get_event_types($type);
$fields->attach(form_input_list(do_lang_tempcode('TYPE'), do_lang_tempcode('DESCRIPTION_EVENT_TYPE'), 'type', $type_list));
// Dates
$fields->attach(form_input_tick(do_lang_tempcode('ALL_DAY_EVENT'), do_lang_tempcode('DESCRIPTION_ALL_DAY_EVENT'), 'all_day_event', is_null($start_hour)));
$fields->attach(form_input_date(do_lang_tempcode('DATE_TIME'), '', 'start', false, false, true, array(is_null($start_minute) ? find_timezone_start_minute_in_utc($timezone, $start_year, $start_month, $start_day) : $start_minute, is_null($start_hour) ? find_timezone_start_hour_in_utc($timezone, $start_year, $start_month, $start_day) : $start_hour, $start_month, $start_day, $start_year), 120, intval(date('Y')) - 100, NULL, NULL, true, $timezone, get_param('date', '') == ''));
$fields->attach(form_input_date(do_lang_tempcode('END_DATE_AND_TIME'), do_lang_tempcode('DESCRIPTION_END_DATE_AND_TIME'), 'end', true, is_null($end_year), true, array(is_null($end_minute) ? find_timezone_end_minute_in_utc($timezone, $end_year, $end_month, $end_day) : $end_minute, is_null($end_hour) ? find_timezone_end_hour_in_utc($timezone, $end_year, $end_month, $end_day) : $end_hour, $end_month, $end_day, $end_year), 120, intval(date('Y')) - 100, NULL, NULL, true, $timezone));
if ($validated == 0) {
$validated = get_param_integer('validated', 0);
}
if (has_some_cat_specific_permission(get_member(), 'bypass_validation_' . $this->permissions_require . 'range_content', NULL, $this->permissions_cat_require)) {
if (addon_installed('unvalidated')) {
$fields->attach(form_input_tick(do_lang_tempcode('VALIDATED'), do_lang_tempcode('DESCRIPTION_VALIDATED'), 'validated', $validated == 1));
}
}
$fields2 = new ocp_tempcode();
$fields2->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('ADVANCED'))));
// More date stuff
$list = '';
foreach (get_timezone_list() as $_timezone => $timezone_nice) {
$list .= static_evaluate_tempcode(form_input_list_entry($_timezone, $_timezone == $timezone, $timezone_nice));
}
$fields2->attach(form_input_list(do_lang_tempcode('EVENT_TIMEZONE'), do_lang_tempcode('DESCRIPTION_EVENT_TIMEZONE'), 'timezone', make_string_tempcode($list)));
$fields2->attach(form_input_tick(do_lang_tempcode('DO_TIMEZONE_CONV'), do_lang_tempcode('DESCRIPTION_DO_TIMEZONE_CONV'), 'do_timezone_conv', $do_timezone_conv == 1));
if (has_specific_permission(get_member(), 'add_public_events')) {
$fields2->attach(form_input_tick(do_lang_tempcode('IS_PUBLIC'), do_lang_tempcode('DESCRIPTION_IS_PUBLIC'), 'is_public', $is_public == 1));
}
// Priority
$priority_list = new ocp_tempcode();
$priority_list->attach(form_input_list_entry('1', $priority == 1, do_lang_tempcode('PRIORITY_1')));
$priority_list->attach(form_input_list_entry('2', $priority == 2, do_lang_tempcode('PRIORITY_2')));
$priority_list->attach(form_input_list_entry('3', $priority == 3, do_lang_tempcode('PRIORITY_3')));
$priority_list->attach(form_input_list_entry('4', $priority == 4, do_lang_tempcode('PRIORITY_4')));
$priority_list->attach(form_input_list_entry('5', $priority == 5, do_lang_tempcode('PRIORITY_5')));
$fields2->attach(form_input_list(do_lang_tempcode('PRIORITY'), '', 'priority', $priority_list));
// Recurrence
$fields2->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('RECURRENCE'))));
if (strpos($recurrence, ' ') === false) {
$recurrence_main = $recurrence;
$recurrence_pattern = '';
} else {
list($recurrence_main, $recurrence_pattern) = explode(' ', $recurrence);
}
$radios = form_input_radio_entry('recurrence', 'none', true, do_lang_tempcode('NA_EM'));
$radios->attach(form_input_radio_entry('recurrence', 'daily', $recurrence_main == 'daily', do_lang_tempcode('DAILY')));
$radios->attach(form_input_radio_entry('recurrence', 'weekly', $recurrence_main == 'weekly', do_lang_tempcode('WEEKLY')));
$radios->attach(form_input_radio_entry('recurrence', 'monthly', $recurrence_main == 'monthly', do_lang_tempcode('MONTHLY')));
$radios->attach(form_input_radio_entry('recurrence', 'yearly', $recurrence_main == 'yearly', do_lang_tempcode('YEARLY')));
$fields2->attach(form_input_radio(do_lang_tempcode('RECURRENCE'), do_lang_tempcode('DESCRIPTION_RECURRENCE'), 'recurrence', $radios));
// xth_dotw_of_monthly
$fields2->attach(form_input_line(do_lang_tempcode('RECURRENCE_PATTERN'), do_lang_tempcode('DESCRIPTION_RECURRENCE_PATTERN'), 'recurrence_pattern', $recurrence_pattern, false));
$fields2->attach(form_input_integer(do_lang_tempcode('RECURRENCES'), do_lang_tempcode('DESCRIPTION_RECURRENCES'), 'recurrences', $recurrences, false));
$fields2->attach(form_input_tick(do_lang_tempcode('SEG_RECURRENCES'), do_lang_tempcode('DESCRIPTION_SEG_RECURRENCES'), 'seg_recurrences', $seg_recurrences == 1));
if ($adding && cron_installed()) {
$fields2->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('REMINDERS'))));
$fields2->attach(form_input_tick(do_lang_tempcode('SIGN_UP_REMINDER'), do_lang_tempcode('DESCRIPTION_SIGN_UP_REMINDER'), 'sign_up_reminder', true));
if (has_specific_permission(get_member(), 'add_public_events')) {
$usergroup_list = $GLOBALS['FORUM_DRIVER']->get_usergroup_list(true);
if (get_forum_type() == 'ocf') {
unset($usergroup_list[db_get_first_id()]);
}
$t_usergroup_list = new ocp_tempcode();
foreach ($usergroup_list as $id => $name) {
$t_usergroup_list->attach(form_input_list_entry(strval($id), false, $name));
}
$fields2->attach(form_input_all_and_not(do_lang_tempcode('SIGN_UP_REMINDER_GROUPS'), do_lang_tempcode('DESCRIPTION_SIGN_UP_REMINDER_GROUPS'), 'sign_up_reminder_groups', $t_usergroup_list));
}
$fields2->attach(form_input_float(do_lang_tempcode('REMINDER_TIME'), do_lang_tempcode('DESCRIPTION_REMINDER_TIME'), 'hours_before', 1.0, true));
}
require_code('feedback2');
$fields2->attach(feedback_fields($allow_rating == 1, $allow_comments == 1, $allow_trackbacks == 1, false, $notes, $allow_comments == 2));
$fields2->attach(get_syndication_option_fields());
return array($fields, $hidden, NULL, NULL, true, NULL, $fields2);
}
/**
* Actualise the join form.
*
* @param boolean Whether to handle CAPTCHA (if enabled at all)
* @param boolean Whether to ask for intro messages (if enabled at all)
* @param boolean Whether to check for invites (if enabled at all)
* @param boolean Whether to check email-address restrictions (if enabled at all)
* @param boolean Whether to require staff confirmation (if enabled at all)
* @param boolean Whether to force email address validation (if enabled at all)
* @param boolean Whether to do COPPA checks (if enabled at all)
* @param boolean Whether to instantly log the user in
* @return array A tuple: Messages to show (currently nothing else in tuple)
*/
function ocf_join_actual($captcha_if_enabled = true, $intro_message_if_enabled = true, $invites_if_enabled = true, $one_per_email_address_if_enabled = true, $confirm_if_enabled = true, $validate_if_enabled = true, $coppa_if_enabled = true, $instant_login = false)
{
ocf_require_all_forum_stuff();
require_css('ocf');
require_code('ocf_members_action');
require_code('ocf_members_action2');
// Read in data
$username = trim(post_param('username'));
ocf_check_name_valid($username, NULL, NULL, true);
// Adjusts username if needed
$password = trim(post_param('password'));
$password_confirm = trim(post_param('password_confirm'));
if ($password != $password_confirm) {
warn_exit(make_string_tempcode(escape_html(do_lang('PASSWORD_MISMATCH'))));
}
$confirm_email_address = post_param('email_address_confirm', NULL);
$email_address = trim(post_param('email_address'));
if (!is_null($confirm_email_address)) {
if (trim($confirm_email_address) != $email_address) {
warn_exit(make_string_tempcode(escape_html(do_lang('EMAIL_ADDRESS_MISMATCH'))));
}
}
require_code('type_validation');
if (!is_valid_email_address($email_address)) {
warn_exit(do_lang_tempcode('INVALID_EMAIL_ADDRESS'));
}
if ($invites_if_enabled) {
if (get_option('is_on_invites') == '1') {
$test = $GLOBALS['FORUM_DB']->query_value_null_ok('f_invites', 'i_inviter', array('i_email_address' => $email_address, 'i_taken' => 0));
if (is_null($test)) {
warn_exit(do_lang_tempcode('NO_INVITE'));
}
}
$GLOBALS['FORUM_DB']->query_update('f_invites', array('i_taken' => 1), array('i_email_address' => $email_address, 'i_taken' => 0), '', 1);
}
$dob_day = post_param_integer('dob_day', NULL);
$dob_month = post_param_integer('dob_month', NULL);
$dob_year = post_param_integer('dob_year', NULL);
$reveal_age = post_param_integer('reveal_age', 0);
$timezone = post_param('timezone', get_users_timezone());
$language = post_param('language', get_site_default_lang());
$allow_emails = post_param_integer('allow_emails', 0);
$allow_emails_from_staff = post_param_integer('allow_emails_from_staff', 0);
$groups = ocf_get_all_default_groups(true);
// $groups will contain the built in default primary group too (it is not $secondary_groups)
$primary_group = post_param_integer('primary_group', NULL);
if ($primary_group !== NULL && !in_array($primary_group, $groups)) {
// Check security
$test = $GLOBALS['FORUM_DB']->query_value('f_groups', 'g_is_presented_at_install', array('id' => $primary_group));
if ($test == 1) {
$groups = ocf_get_all_default_groups(false);
// Get it so it does not include the built in default primary group
$groups[] = $primary_group;
// And add in the *chosen* primary group
} else {
$primary_group = NULL;
}
} else {
$primary_group = NULL;
}
if ($primary_group === NULL) {
$primary_group = get_first_default_group();
}
$custom_fields = ocf_get_all_custom_fields_match($groups, NULL, NULL, NULL, NULL, NULL, NULL, 0, true);
$actual_custom_fields = ocf_read_in_custom_fields($custom_fields);
// Check that the given address isn't already used (if one_per_email_address on)
$member_id = NULL;
if ($one_per_email_address_if_enabled) {
if (get_option('one_per_email_address') == '1') {
$test = $GLOBALS['FORUM_DB']->query_select('f_members', array('id', 'm_username'), array('m_email_address' => $email_address), '', 1);
if (array_key_exists(0, $test)) {
if ($test[0]['m_username'] != $username) {
$reset_url = build_url(array('page' => 'lostpassword', 'email_address' => $email_address), get_module_zone('lostpassword'));
warn_exit(do_lang_tempcode('EMAIL_ADDRESS_IN_USE', escape_html(get_site_name()), escape_html($reset_url->evaluate())));
}
$member_id = $test[0]['id'];
}
}
}
if ($captcha_if_enabled) {
if (addon_installed('captcha')) {
require_code('captcha');
enforce_captcha();
}
}
if (addon_installed('ldap')) {
require_code('ocf_ldap');
if (ocf_is_ldap_member_potential($username)) {
warn_exit(do_lang_tempcode('DUPLICATE_JOIN_AUTH'));
}
}
// Add member
$skip_confirm = get_option('skip_email_confirm_join') == '1';
if (!$confirm_if_enabled) {
$skip_confirm = true;
}
$validated_email_confirm_code = $skip_confirm ? '' : strval(mt_rand(1, 32000));
$require_new_member_validation = get_option('require_new_member_validation') == '1';
if (!$validate_if_enabled) {
$require_new_member_validation = false;
}
$coppa = get_option('is_on_coppa') == '1' && utctime_to_usertime(time() - mktime(0, 0, 0, $dob_month, $dob_day, $dob_year)) / 31536000.0 < 13.0;
if (!$coppa_if_enabled) {
$coppa = false;
}
$validated = $require_new_member_validation || $coppa ? 0 : 1;
if (is_null($member_id)) {
$member_id = ocf_make_member($username, $password, $email_address, $groups, $dob_day, $dob_month, $dob_year, $actual_custom_fields, $timezone, $primary_group, $validated, time(), time(), '', NULL, '', 0, get_option('default_preview_guests') == '1' ? 1 : 0, $reveal_age, '', '', '', 1, get_value('no_auto_notifications') === '1' ? 0 : 1, $language, $allow_emails, $allow_emails_from_staff, '', get_ip_address(), $validated_email_confirm_code, true, '', '');
}
// Send confirm mail
if (!$skip_confirm) {
$zone = get_module_zone('join');
if ($zone != '') {
$zone .= '/';
}
$_url = build_url(array('page' => 'join', 'type' => 'step4', 'email' => $email_address, 'code' => $validated_email_confirm_code), $zone, NULL, false, false, true);
$url = $_url->evaluate();
$_url_simple = build_url(array('page' => 'join', 'type' => 'step4'), $zone, NULL, false, false, true);
$url_simple = $_url_simple->evaluate();
$redirect = get_param('redirect', '');
if ($redirect != '') {
$url .= '&redirect=' . ocp_url_encode($redirect);
}
$message = do_lang('OCF_SIGNUP_TEXT', comcode_escape(get_site_name()), comcode_escape($url), array($url_simple, $email_address, $validated_email_confirm_code), $language);
require_code('mail');
if (!$coppa) {
mail_wrap(do_lang('CONFIRM_EMAIL_SUBJECT', get_site_name(), NULL, NULL, $language), $message, array($email_address), $username, '', '', 3, NULL, false, NULL, false, false, false, 'MAIL', true);
}
}
// Send COPPA mail
if ($coppa) {
$fields_done = do_lang('THIS_WITH_COMCODE', do_lang('USERNAME'), $username) . "\n\n";
foreach ($custom_fields as $custom_field) {
if ($custom_field['cf_type'] != 'upload') {
$fields_done .= do_lang('THIS_WITH_COMCODE', $custom_field['trans_name'], post_param('custom_' . $custom_field['id'] . '_value')) . "\n";
}
}
$_privacy_url = build_url(array('page' => 'privacy'), '_SEARCH', NULL, false, false, true);
$privacy_url = $_privacy_url->evaluate();
$message = do_lang('COPPA_MAIL', comcode_escape(get_option('site_name')), comcode_escape(get_option('privacy_fax')), array(comcode_escape(get_option('privacy_postal_address')), comcode_escape($fields_done), comcode_escape($privacy_url)), $language);
require_code('mail');
mail_wrap(do_lang('COPPA_JOIN_SUBJECT', $username, get_site_name(), NULL, $language), $message, array($email_address), $username);
}
// Send 'validate this member' notification
if ($require_new_member_validation) {
require_code('notifications');
$_validation_url = build_url(array('page' => 'members', 'type' => 'view', 'id' => $member_id), get_module_zone('members'), NULL, false, false, true, 'tab__edit');
$validation_url = $_validation_url->evaluate();
$message = do_lang('VALIDATE_NEW_MEMBER_MAIL', comcode_escape($username), comcode_escape($validation_url), comcode_escape(strval($member_id)), get_site_default_lang());
dispatch_notification('ocf_member_needs_validation', NULL, do_lang('VALIDATE_NEW_MEMBER_SUBJECT', $username, NULL, NULL, get_site_default_lang()), $message, NULL, A_FROM_SYSTEM_PRIVILEGED);
}
// Send new member notification
require_code('notifications');
$_member_url = build_url(array('page' => 'members', 'type' => 'view', 'id' => $member_id), get_module_zone('members'), NULL, false, false, true);
$member_url = $_member_url->evaluate();
$message = do_lang('NEW_MEMBER_NOTIFICATION_MAIL', comcode_escape($username), comcode_escape(get_site_name()), array(comcode_escape($member_url), comcode_escape(strval($member_id))), get_site_default_lang());
dispatch_notification('ocf_new_member', NULL, do_lang('NEW_MEMBER_NOTIFICATION_MAIL_SUBJECT', $username, get_site_name(), NULL, get_site_default_lang()), $message, NULL, A_FROM_SYSTEM_PRIVILEGED);
// Intro post
if ($intro_message_if_enabled) {
$forum_id = get_option('intro_forum_id');
if ($forum_id != '') {
if (!is_numeric($forum_id)) {
$_forum_id = $GLOBALS['FORUM_DB']->query_value_null_ok('f_forums', 'id', array('f_name' => $forum_id));
if (is_null($_forum_id)) {
$forum_id = strval(db_get_first_id());
} else {
$forum_id = strval($_forum_id);
}
}
$intro_title = post_param('intro_title', '');
$intro_post = post_param('intro_post', '');
if ($intro_post != '') {
require_code('ocf_topics_action');
if ($intro_title == '') {
$intro_title = do_lang('INTRO_POST_DEFAULT', $username);
}
$topic_id = ocf_make_topic(intval($forum_id));
require_code('ocf_posts_action');
ocf_make_post($topic_id, $intro_title, $intro_post, 0, true, NULL, 0, NULL, NULL, NULL, $member_id);
}
}
}
// Alert user to situation
$message = new ocp_tempcode();
if ($coppa) {
if (!$skip_confirm) {
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL'));
}
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL_COPPA'));
} elseif ($require_new_member_validation) {
if (!$skip_confirm) {
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL'));
}
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL_VALIDATED', escape_html(get_custom_base_url())));
} elseif ($skip_confirm) {
if ($instant_login) {
require_code('users_active_actions');
handle_active_login($username);
$message->attach(do_lang_tempcode('OCF_LOGIN_AUTO'));
} else {
$_login_url = build_url(array('page' => 'login', 'redirect' => get_param('redirect', NULL)), get_module_zone('login'));
$login_url = $_login_url->evaluate();
$message->attach(do_lang_tempcode('OCF_LOGIN_INSTANT', escape_html($login_url)));
}
} else {
if (!$skip_confirm) {
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL'));
}
$message->attach(do_lang_tempcode('OCF_WAITING_CONFIRM_MAIL_INSTANT'));
}
$message = protect_from_escaping($message);
return array($message);
}
