/** * Handle hooks supported bot commands. Note multiple bots may support the same commands, and all respond. It is recommended all bots support the command 'help'. * * @param AUTO_LINK The ID of the chat room * @param string The command used. This is just the chat message, so you can encode and recognise your own parameter scheme if you like. * @return ?string Bot reply (NULL: bot does not handle the command) */ function handle_commands($room_id, $command) { switch ($command) { case 'help': $out = do_lang('CHAT_HELP_BOTMSG'); return do_lang('CHAT_WEBSITE_HELPER_BOT', $out); case 'users_online': // On the site $count = 0; $members = get_online_members(true, NULL, $count); if (is_null($members)) { return do_lang('TOO_MANY_USERS_ONLINE'); } $guests = 0; $site_members = ''; foreach ($members as $member) { if (is_guest($member['the_user']) || is_null($member['cache_username'])) { $guests++; } else { if ($site_members != '') { $site_members .= ', '; } $site_members .= '{{' . $member['cache_username'] . '}}'; } } // In this room $room_members = get_chatters_in_room($room_id); $_room_members = ''; foreach ($room_members as $room_member) { if ($_room_members != '') { $_room_members .= ', '; } $_room_members .= '{{' . $room_member . '}}'; } // Show our complete result $out = do_lang('CHAT_USERSONLINE_BOTMSG', $site_members, $_room_members); return do_lang('CHAT_WEBSITE_HELPER_BOT', $out); case 'time': $out = do_lang('CHAT_TIME_BOTMSG', get_timezoned_date(time(), true, true, true, true)); return do_lang('CHAT_WEBSITE_HELPER_BOT', $out); } return NULL; }
/** * Standard modular run function for OcCLE hooks. * * @param array The options with which the command was called * @param array The parameters with which the command was called * @param array A reference to the OcCLE filesystem object * @return array Array of stdcommand, stdhtml, stdout, and stderr responses */ function run($options, $parameters, &$occle_fs) { if (array_key_exists('h', $options) || array_key_exists('help', $options)) { return array('', do_command_help('users_online', array('h'), array()), '', ''); } else { $count = 0; $members = get_online_members(true, NULL, $count); if (is_null($members)) { return array('', '', do_lang('TOO_MANY_USERS_ONLINE'), ''); } $out = new ocp_tempcode(); $guests = 0; $valid_members = array(); foreach ($members as $member) { if (is_guest($member['the_user']) || is_null($member['cache_username'])) { $guests++; } else { $valid_members[$member['cache_username']] = $member['the_user']; } } return array('', do_template('OCCLE_USERS_ONLINE', array('_GUID' => 'fcf779ef175895d425b706e40fb3252a', 'MEMBERS' => $valid_members, 'GUESTS' => integer_format($guests))), '', ''); } }
/** * Get the number of users on the site in the last 5 minutes. The function also maintains the statistic via the sessions table. * * @return integer The number of users on the site */ function get_num_users_site() { global $NUM_USERS_SITE, $PEAK_USERS_EVER; $users_online_time_seconds = 60 * intval(get_option('users_online_time')); $NUM_USERS_SITE = get_value_newer_than('users_online', time() - $users_online_time_seconds / 2); if ($NUM_USERS_SITE === NULL) { $NUM_USERS_SITE = get_value('users_online'); $count = 0; get_online_members(false, NULL, $count); if (strval($count) != $NUM_USERS_SITE) { $NUM_USERS_SITE = strval($count); set_value('users_online', $NUM_USERS_SITE); } } if (intval($NUM_USERS_SITE) > intval(get_option('maximum_users')) && intval(get_option('maximum_users')) > 1 && get_page_name() != 'login' && !has_specific_permission(get_member(), 'access_overrun_site') && !running_script('cron_bridge')) { $GLOBALS['HTTP_STATUS_CODE'] = '503'; header('HTTP/1.0 503 Service Unavailable'); critical_error('BUSY', do_lang('TOO_MANY_USERS')); } if (addon_installed('stats')) { $PEAK_USERS_EVER = get_value_newer_than('user_peak', time() - $users_online_time_seconds * 10); if ($PEAK_USERS_EVER === NULL || $PEAK_USERS_EVER == '') { $_peak_users_user = $GLOBALS['SITE_DB']->query_value_null_ok('usersonline_track', 'MAX(peak)', NULL, '', true); $PEAK_USERS_EVER = $_peak_users_user === NULL ? $NUM_USERS_SITE : strval($_peak_users_user); set_value('user_peak', $PEAK_USERS_EVER); } if ($NUM_USERS_SITE > $PEAK_USERS_EVER) { // In case the record is beaten more than once within the same second $time = time(); $GLOBALS['SITE_DB']->query_delete('usersonline_track', array('date_and_time' => $time), '', 1, NULL, true); // New record $GLOBALS['SITE_DB']->query_insert('usersonline_track', array('date_and_time' => $time, 'peak' => intval($NUM_USERS_SITE)), false, true); } } return intval($NUM_USERS_SITE); }
/** * Standard modular run function. * * @param array A map of parameters. * @return tempcode The result of execution. */ function run($map) { unset($map); require_css('side_blocks'); $count = 0; $members = get_online_members(false, NULL, $count); if (is_null($members)) { return new ocp_tempcode(); } // Too many to show if (get_forum_type() == 'ocf') { require_code('ocf_general'); require_code('ocf_members'); require_css('ocf'); } $out = new ocp_tempcode(); $guests = 0; $_members = 0; $done_members = array(); $done_ips = array(); foreach ($members as $_member) { $member = $_member['the_user']; $name = $_member['cache_username']; $ip = $_member['ip']; if (is_guest($member) || is_null($name)) { if (!array_key_exists($ip, $done_ips)) { $done_ips[$ip] = 1; $guests++; } } else { if (!array_key_exists($member, $done_members)) { $colour = get_forum_type() == 'ocf' ? get_group_colour(ocf_get_member_primary_group($member)) : NULL; $done_members[$member] = 1; $url = $GLOBALS['FORUM_DRIVER']->member_profile_url($member, true, true); $out->attach(do_template('BLOCK_SIDE_USERS_ONLINE_USER', array('_GUID' => 'a0b55810fe2f306c2886ec0c4cd8e8fd', 'URL' => $url, 'NAME' => $name, 'COLOUR' => $colour))); $_members++; } } } $newest = new ocp_tempcode(); $birthdays = new ocp_tempcode(); if (get_forum_type() == 'ocf') { require_lang('ocf'); // Show newest member if (get_option('usersonline_show_newest_member', true) == '1') { $newest_member = $GLOBALS['FORUM_DB']->query_select('f_members', array('m_username', 'id'), array('m_validated' => 1), 'ORDER BY id DESC', 1); $username_link = $GLOBALS['FORUM_DRIVER']->member_profile_hyperlink($newest_member[0]['id'], false, $newest_member[0]['m_username']); $newest->attach(paragraph(do_lang_tempcode('NEWEST_MEMBER_WELCOME', $username_link), 'gdgdfhrug')); } // Birthdays if (get_option('usersonline_show_birthdays', true) == '1') { require_code('ocf_members'); $_birthdays = ocf_find_birthdays(); foreach ($_birthdays as $_birthday) { $colour = get_group_colour(ocf_get_member_primary_group($_birthday['id'])); $birthday = do_template('OCF_USER_MEMBER', array('_GUID' => 'b2d355ff45f4b4170b937ef0753e6a78', 'COLOUR' => $colour, 'AGE' => array_key_exists('age', $_birthday) ? integer_format($_birthday['age']) : NULL, 'PROFILE_URL' => $GLOBALS['FORUM_DRIVER']->member_profile_url($_birthday['id'], false, true), 'USERNAME' => $_birthday['username'])); $birthdays->attach($birthday); } if (!$birthdays->is_empty()) { $birthdays = do_template('OCF_BIRTHDAYS', array('_GUID' => '080ed2e74efd6410bd6b83ec01962c04', 'BIRTHDAYS' => $birthdays)); } } } return do_template('BLOCK_SIDE_USERS_ONLINE', array('_GUID' => 'fdfa68dff479b4ea7d517585297ea6af', 'CONTENT' => $out, 'GUESTS' => integer_format($guests), 'MEMBERS' => integer_format($_members), '_GUESTS' => strval($guests), '_MEMBERS' => strval($_members), 'BIRTHDAYS' => $birthdays, 'NEWEST' => $newest)); }
/** * Do the wrapper that fits around OCF module output. * * @param tempcode The title for the module output that we are wrapping. * @param tempcode The module output that we are wrapping. * @param boolean Whether to include the personal bar in the wrap. * @param boolean Whether to include statistics in the wrap. * @param ?AUTO_LINK The forum to make the search link search under (NULL: Users own PT forum/unknown). * @return tempcode The wrapped output. */ function ocf_wrapper($title, $content, $show_personal_bar = true, $show_stats = true, $forum_id = NULL) { global $ZONE; $wide = is_wide(); if ($wide == 0 && get_value('force_forum_bar') !== '1') { $show_personal_bar = false; $show_stats = false; } // Notifications if (!is_guest() && (get_page_name() == 'forumview' || get_page_name() == 'topicview' || get_page_name() == 'vforums')) { $cache_identifier = serialize(array(get_member())); $_notifications = NULL; if ((get_option('is_on_block_cache') == '1' || get_param_integer('keep_cache', 0) == 1 || get_param_integer('cache', 0) == 1) && (get_param_integer('keep_cache', NULL) !== 0 && get_param_integer('cache', NULL) !== 0)) { $_notifications = get_cache_entry('_new_pp', $cache_identifier, 10000); } if (is_null($_notifications)) { require_code('ocf_notifications'); list($notifications, $num_unread_pps) = generate_notifications($cache_identifier); } else { list($__notifications, $num_unread_pps) = $_notifications; $notifications = new ocp_tempcode(); if (!$notifications->from_assembly($__notifications, true)) { require_code('ocf_notifications'); list($notifications, $num_unread_pps) = generate_notifications($cache_identifier); } if (!$notifications->is_empty()) { require_javascript('javascript_ajax'); } } } else { $notifications = new ocp_tempcode(); $num_unread_pps = 0; } if ($show_personal_bar) { if (get_member() != $GLOBALS['OCF_DRIVER']->get_guest_id()) { $member_info = ocf_read_in_member_profile(get_member(), true); $profile_url = $GLOBALS['OCF_DRIVER']->member_profile_url(get_member(), true, true); $_new_topics = $GLOBALS['FORUM_DB']->query('SELECT COUNT(*) AS mycnt FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_topics WHERE NOT t_forum_id IS NULL AND t_cache_first_time>' . strval((int) $member_info['last_visit_time'])); $new_topics = $_new_topics[0]['mycnt']; $_new_posts = $GLOBALS['FORUM_DB']->query('SELECT COUNT(*) AS mycnt FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_posts WHERE NOT p_cache_forum_id IS NULL AND p_time>' . strval((int) $member_info['last_visit_time'])); $new_posts = $_new_posts[0]['mycnt']; $max_avatar_height = ocf_get_member_best_group_property(get_member(), 'max_avatar_height'); // Any unread PT-PPs? $pt_extra = $num_unread_pps == 0 ? new ocp_tempcode() : do_lang_tempcode('NUM_UNREAD', integer_format($num_unread_pps)); $personal_topic_url = build_url(array('page' => 'members', 'type' => 'view', 'id' => get_member()), get_module_zone('members'), NULL, true, false, false, 'tab__pts'); $head = do_template('OCF_MEMBER_BAR', array('_GUID' => 's3kdsadf0p3wsjlcfksdj', 'AVATAR' => array_key_exists('avatar', $member_info) ? $member_info['avatar'] : '', 'PROFILE_URL' => $profile_url, 'USERNAME' => $member_info['username'], 'LOGOUT_URL' => build_url(array('page' => 'login', 'type' => 'logout'), get_module_zone('login')), 'NUM_POINTS_ADVANCE' => array_key_exists('num_points_advance', $member_info) ? make_string_tempcode(integer_format($member_info['num_points_advance'])) : do_lang('NA'), 'NUM_POINTS' => array_key_exists('points', $member_info) ? integer_format($member_info['points']) : '', 'NUM_POSTS' => integer_format($member_info['posts']), 'PRIMARY_GROUP' => $member_info['primary_group_name'], 'LAST_VISIT_DATE_RAW' => strval($member_info['last_visit_time']), 'LAST_VISIT_DATE' => $member_info['last_visit_time_string'], 'PERSONAL_TOPIC_URL' => $personal_topic_url, 'NEW_POSTS_URL' => build_url(array('page' => 'vforums', 'type' => 'misc'), get_module_zone('vforums')), 'UNREAD_TOPICS_URL' => build_url(array('page' => 'vforums', 'type' => 'unread'), get_module_zone('vforums')), 'RECENTLY_READ_URL' => build_url(array('page' => 'vforums', 'type' => 'recently_read'), get_module_zone('vforums')), 'INLINE_PERSONAL_POSTS_URL' => build_url(array('page' => 'topicview'), get_module_zone('topicview')), 'PT_EXTRA' => $pt_extra, 'NEW_TOPICS' => integer_format($new_topics), 'NEW_POSTS' => integer_format($new_posts), 'MAX_AVATAR_HEIGHT' => strval($max_avatar_height))); } else { if (count($_POST) > 0) { $_this_url = build_url(array('page' => 'forumview'), 'forum', array('keep_session' => 1)); } else { $_this_url = build_url(array('page' => '_SELF'), '_SELF', array('keep_session' => 1), true); } $this_url = $_this_url->evaluate(); $login_url = build_url(array('page' => 'login', 'type' => 'login', 'redirect' => $this_url), get_module_zone('login')); $full_link = build_url(array('page' => 'login', 'type' => 'misc', 'redirect' => $this_url), get_module_zone('login')); $join_url = build_url(array('page' => 'join', 'redirect' => $this_url), get_module_zone('join')); $head = do_template('OCF_GUEST_BAR', array('NAVIGATION' => '', 'LOGIN_URL' => $login_url, 'JOIN_LINK' => $join_url, 'FULL_LINK' => $full_link)); } } else { $head = new ocp_tempcode(); } if ($show_stats) { $stats = ocf_get_forums_stats(); // Users online $users_online = new ocp_tempcode(); $count = 0; $members = get_online_members(false, NULL, $count); $groups_seen = array(); if (!is_null($members)) { //$members=collapse_2d_complexity('the_user','cache_username',$members); $guests = 0; foreach ($members as $bits) { $member = $bits['the_user']; $username = $bits['cache_username']; if ($member == $GLOBALS['OCF_DRIVER']->get_guest_id()) { $guests++; continue; } if (is_null($username)) { continue; } $url = $GLOBALS['OCF_DRIVER']->member_profile_url($member, false, true); if (!array_key_exists('m_primary_group', $bits)) { $bits['m_primary_group'] = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member, 'm_primary_group'); } $pgid = $bits['m_primary_group']; //$GLOBALS['FORUM_DRIVER']->get_member_row_field($member,'m_primary_group'); if (is_null($pgid)) { continue; } // Deleted member $groups_seen[$pgid] = 1; $col = get_group_colour($pgid); $usergroup = ocf_get_group_name($pgid); if (get_value('disable_user_online_groups') === '1') { $usergroup = NULL; $col = NULL; $groups_seen = array(); } $users_online->attach(do_template('OCF_USER_MEMBER', array('_GUID' => 'a9cb1af2a04b14edd70749c944495bff', 'COLOUR' => $col, 'PROFILE_URL' => $url, 'USERNAME' => $username, 'USERGROUP' => $usergroup))); } if ($guests != 0) { if (!$users_online->is_empty()) { $users_online->attach(do_lang_tempcode('LIST_SEP')); } $users_online->attach(do_lang_tempcode('NUM_GUESTS', integer_format($guests))); } } // Birthdays $_birthdays = ocf_find_birthdays(); $birthdays = new ocp_tempcode(); foreach ($_birthdays as $_birthday) { $birthday_link = build_url(array('page' => 'topics', 'type' => 'birthday', 'id' => $_birthday['username']), get_module_zone('topics')); $birthday = do_template('OCF_BIRTHDAY_LINK', array('_GUID' => 'a98959187d37d80e134d47db7e3a52fa', 'AGE' => array_key_exists('age', $_birthday) ? integer_format($_birthday['age']) : NULL, 'PROFILE_URL' => $GLOBALS['OCF_DRIVER']->member_profile_url($_birthday['id'], false, true), 'USERNAME' => $_birthday['username'], 'BIRTHDAY_LINK' => $birthday_link)); $birthdays->attach($birthday); } if (!$birthdays->is_empty()) { $birthdays = do_template('OCF_BIRTHDAYS', array('_GUID' => '03da2c0d46e76407d63bff22aac354bd', 'BIRTHDAYS' => $birthdays)); } // Usergroup keys $groups = array(); $all_groups = $GLOBALS['FORUM_DRIVER']->get_usergroup_list(true, false, false, NULL, NULL, true); foreach ($all_groups as $gid => $gtitle) { if ($gid == db_get_first_id()) { continue; } // Throw out the first, guest if (array_key_exists($gid, $groups_seen)) { $groups[] = array('GCOLOUR' => get_group_colour($gid), 'GID' => strval($gid), 'GTITLE' => $gtitle); } } $foot = do_template('OCF_STATS', array('_GUID' => 'sdflkdlfd303frksdf', 'NEWEST_MEMBER_PROFILE_URL' => $GLOBALS['OCF_DRIVER']->member_profile_url($stats['newest_member_id'], false, true), 'NEWEST_MEMBER_USERNAME' => $stats['newest_member_username'], 'NUM_MEMBERS' => integer_format($stats['num_members']), 'NUM_TOPICS' => integer_format($stats['num_topics']), 'NUM_POSTS' => integer_format($stats['num_posts']), 'BIRTHDAYS' => $birthdays, 'USERS_ONLINE' => $users_online, 'USERS_ONLINE_URL' => has_actual_page_access(get_member(), 'onlinemembers') ? build_url(array('page' => 'onlinemembers'), get_module_zone('onlinemembers')) : new ocp_tempcode(), 'GROUPS' => $groups)); } else { $foot = new ocp_tempcode(); } $wrap = do_template('OCF_WRAPPER', array('_GUID' => '456c21db6c09ae260accfa4c2a59fce7', 'TITLE' => $title, 'NOTIFICATIONS' => $notifications, 'HEAD' => $head, 'FOOT' => $foot, 'CONTENT' => $content)); return $wrap; }
/** * Find if a member is online. * * @param MEMBER The member to check * @return boolean Whether they are online */ function member_is_online($member_id) { $count = 0; $online = get_online_members(false, $member_id, $count); foreach ($online as $m) { if ($m['the_user'] == $member_id) { return true; } } return false; }
/** * Standard modular run function. * * @return tempcode The result of execution. */ function run() { if (get_forum_type() != 'ocf') { warn_exit(do_lang_tempcode('NO_OCF')); } else { ocf_require_all_forum_stuff(); } $title = get_page_title('USERS_ONLINE'); global $EXTRA_HEAD; $EXTRA_HEAD->attach('<meta name="robots" content="noindex" />'); // XHTMLXHTML $count = 0; $members = get_online_members(has_specific_permission(get_member(), 'show_user_browsing'), NULL, $count); if (is_null($members) && has_specific_permission(get_member(), 'show_user_browsing')) { $members = get_online_members(false, NULL, $count); } if (is_null($members)) { warn_exit(do_lang_tempcode('TOO_MANY_USERS_ONLINE')); } $rows = new ocp_tempcode(); $members = array_reverse($members); global $M_SORT_KEY; $M_SORT_KEY = 'last_activity'; usort($members, 'multi_sort'); $members = array_reverse($members); foreach ($members as $row) { $last_activity = $row['last_activity']; $member = $row['the_user']; $name = $row['cache_username']; $location = $row['the_title']; if ($location == '' && $row['the_type'] == 'rss') { $location = 'RSS'; $at_url = make_string_tempcode(find_script('backend')); } elseif ($location == '' && $row['the_page'] == '') { $at_url = new ocp_tempcode(); } else { $map = array('page' => $row['the_page']); if ($row['the_type'] != '') { $map['type'] = $row['the_type']; } if ($row['the_id'] != '') { $map['id'] = $row['the_id']; } $at_url = build_url($map, $row['the_zone']); } $ip = $row['ip']; if (substr($ip, -1) == '*') { if (is_guest($member)) { if (addon_installed('stats')) { $test = $GLOBALS['SITE_DB']->query_value_null_ok('stats', 'ip', array('the_user' => -$row['the_session'])); if (!is_null($test) && $test != '') { $ip = $test; } else { $test = $GLOBALS['SITE_DB']->query_value_null_ok_full('SELECT ip FROM ' . get_table_prefix() . 'stats WHERE ip LIKE \'' . db_encode_like(str_replace('*', '%', $ip)) . '\' ORDER BY date_and_time DESC'); if (!is_null($test) && $test != '') { $ip = $test; } } } } else { $test = $GLOBALS['FORUM_DRIVER']->get_member_ip($member); if (!is_null($test) && $test != '') { $ip = $test; } } } $link = $GLOBALS['FORUM_DRIVER']->member_profile_hyperlink($member, false, $name); if ($ip != '') { // CRON? $rows->attach(do_template('OCF_MEMBER_ONLINE_ROW', array('_GUID' => '2573786f3bccf9e613b125befb3730e8', 'IP' => $ip, 'AT_URL' => $at_url, 'LOCATION' => $location, 'MEMBER' => $link, 'TIME' => integer_format(intval((time() - $last_activity) / 60))))); } } return do_template('OCF_MEMBERS_ONLINE_SCREEN', array('_GUID' => '2f63e2926c5a4690d905f97661afe6cc', 'TITLE' => $title, 'ROWS' => $rows)); }