/** * Function to quickly (efficiently) check to see if there's been any chat activity. */ function chat_poller() { $message_id = get_param_integer('message_id', -1); $event_id = get_param_integer('event_id', -1); if (file_exists(get_custom_file_base() . '/data_custom/modules/chat/chat_last_full_check.dat') && filemtime(get_custom_file_base() . '/data_custom/modules/chat/chat_last_full_check.dat') > time() - 3 && ($message_id != -1 && file_exists(get_custom_file_base() . '/data_custom/modules/chat/chat_last_msg.dat') && intval(file_get_contents(get_custom_file_base() . '/data_custom/modules/chat/chat_last_msg.dat', FILE_TEXT)) <= $message_id) && ($event_id != -1 && file_exists(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat') && intval(file_get_contents(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat', FILE_TEXT)) <= $event_id)) { load_user_stuff(); require_code('zones'); // Zone is needed because zones are where all ocPortal pages reside require_code('config'); // Config is needed for much active stuff require_code('users'); // Users are important due to permissions $room_id = get_param_integer('room_id', -1); require_code('chat'); chat_room_prune($room_id); header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past header('Content-Type: application/xml'); $output = '<?xml version="1.0" encoding="' . get_charset() . '" ?' . '> <response> <result> <chat_null>' . strval($room_id) . '</chat_null> </result> </response>'; exit($output); } touch(get_custom_file_base() . '/data_custom/modules/chat/chat_last_full_check.dat'); }
/** * Output messages (in XML format) from up to five minutes ago (give somebody who's just joined the chatroom some chat backlog), or the messages posted since the last check. * * @param AUTO_LINK Room ID (or -1 to mean 'all' as used for IM global process, -2 to mean none) * @param boolean Output the backlog? * @param ?AUTO_LINK Latest received message ID (NULL: we're not getting latest messages) * @param ?AUTO_LINK Latest event ID (NULL: we're not getting events, but we do request a null event so we can use that as a future reference point) * @param string Events output to append */ function _chat_messages_script_ajax($room_id, $backlog = false, $message_id = NULL, $event_id = NULL, $events_output = '') { if ($event_id == -1) { $event_id = NULL; } require_lang('chat'); require_lang('submitban'); $room_check = NULL; if ($room_id >= 0) { $room_check = $GLOBALS['SITE_DB']->query_select('chat_rooms', array('id', 'is_im', 'c_welcome', 'allow_list_groups', 'disallow_list_groups', 'allow_list', 'disallow_list', 'room_owner'), array('id' => $room_id), '', 1); if (!array_key_exists(0, $room_check)) { // This room doesn't exist warn_exit(do_lang_tempcode('MISSING_RESOURCE')); } if (!check_chatroom_access($room_check[0], true)) { return; } // Possibly the room was closed already $welcome = array_key_exists(get_member(), get_chatters_in_room($room_id)) || !$backlog || get_param_integer('no_reenter_message', 0) == 1 ? NULL : $room_check[0]['c_welcome']; } else { $welcome = NULL; } if ($room_id >= 0) { $room_check = $GLOBALS['SITE_DB']->query_select('chat_rooms', array('*'), array('id' => $room_id)); if (array_key_exists(0, $room_check)) { chat_room_prune($room_id); } } elseif ($room_id != -2) { // Note that *we are still here* if ($room_id == -1) { $GLOBALS['SITE_DB']->query_update('chat_active', array('date_and_time' => time()), array('member_id' => get_member())); } else { $GLOBALS['SITE_DB']->query_delete('chat_active', array('member_id' => get_member(), 'room_id' => $room_id), '', 1); $GLOBALS['SITE_DB']->query_insert('chat_active', array('member_id' => get_member(), 'date_and_time' => time(), 'room_id' => $room_id)); } } if (is_null($room_check)) { $room_check = $GLOBALS['SITE_DB']->query('SELECT id,is_im,c_welcome,allow_list_groups,disallow_list_groups,allow_list,disallow_list,room_owner FROM ' . get_table_prefix() . 'chat_rooms WHERE is_im=1 AND allow_list LIKE \'' . db_encode_like('%' . strval(get_member()) . '%') . '\''); } $from_id = NULL; $start = NULL; if (!$backlog) { $from_id = $message_id; } else { $start = time() - CHAT_BACKLOG_TIME; } $messages = $room_id == -2 ? array() : chat_get_room_content($room_id, $room_check, 20, false, false, $start, NULL, $from_id, NULL, $welcome, true, get_param_integer('no_reenter_message', 0) == 0); $stored_id = array_key_exists(0, $messages) ? $messages[0]['id'] : NULL; $messages_output = ''; foreach ($messages as $_message) { $edit_url = new ocp_tempcode(); $chat_ban_url = new ocp_tempcode(); $chat_unban_url = new ocp_tempcode(); if (!is_null($room_check) && array_key_exists(0, $room_check)) { $moderator = is_chat_moderator($_message['member_id'], $room_id, $room_check[0]['room_owner']); $edit_url = build_url(array('page' => 'cms_chat', 'type' => 'ed', 'id' => $_message['id'], 'room_id' => $_message['room_id']), get_module_zone('cms_chat')); if (has_specific_permission(get_member(), 'ban_chatters_from_rooms')) { if (check_chatroom_access($room_check[0], true, $_message['member_id'])) { $chat_ban_url = build_url(array('page' => 'cms_chat', 'type' => 'ban', 'id' => $_message['room_id'], 'member_id' => $_message['member_id']), get_module_zone('cms_chat')); $chat_unban_url = new ocp_tempcode(); } else { $chat_ban_url = new ocp_tempcode(); $chat_unban_url = build_url(array('page' => 'cms_chat', 'type' => 'unban', 'id' => $_message['room_id'], 'member_id' => $_message['member_id']), get_module_zone('cms_chat')); } } } else { $moderator = false; } if (addon_installed('actionlog') && has_actual_page_access(get_member(), 'admin_actionlog') && preg_match('#[:\\.]#', $_message['ip_address']) != 0) { if (is_guest($_message['member_id'])) { $ban_url = build_url(array('page' => 'admin_actionlog', 'type' => 'toggle_ip_ban', 'id' => $_message['ip_address']), 'adminzone'); } else { $ban_url = build_url(array('page' => 'admin_actionlog', 'type' => 'toggle_submitter_ban', 'id' => $_message['member_id']), 'adminzone'); } //$ban_url=build_url(array('page'=>'admin_actionlog','type'=>'multi_ban','id'=>$_message['ip_address'].':'.$_message['username']),'adminzone'); } else { $ban_url = new ocp_tempcode(); } if ($room_id != -1 && addon_installed('actionlog') && (has_actual_page_access(get_member(), 'admin_actionlog') || has_actual_page_access(get_member(), 'cms_chat'))) { $staff_actions = do_template('CHAT_STAFF_ACTIONS', array('_GUID' => 'd3fbcaa9eee688452091583ee436e465', 'CHAT_BAN_URL' => $chat_ban_url, 'CHAT_UNBAN_URL' => $chat_unban_url, 'EDIT_URL' => $edit_url, 'BAN_URL' => $ban_url)); } else { $staff_actions = new ocp_tempcode(); } $avatar_url = $GLOBALS['FORUM_DRIVER']->get_member_avatar_url($_message['member_id']); if (!is_guest($_message['member_id'])) { $user = $GLOBALS['FORUM_DRIVER']->member_profile_hyperlink($_message['member_id'], true, $_message['username']); } else { if (preg_match('#[:\\.]#', $_message['ip_address']) != 0) { $user = make_string_tempcode(escape_html(do_lang('GUEST') . '-' . substr(md5($_message['ip_address']), 0, 5))); } else { $user = make_string_tempcode(escape_html($_message['ip_address'])); } } $template = do_template('CHAT_MESSAGE', array('_GUID' => '6bcac8d9fdd166cde266f8d23b790b69', 'SYSTEM_MESSAGE' => strval($_message['system_message']), 'STAFF' => $moderator, 'OLD_MESSAGES' => $backlog, 'AVATAR_URL' => $avatar_url, 'STAFF_ACTIONS' => $staff_actions, 'USER' => $user, 'MESSAGE' => $_message['the_message'], 'TIME' => $_message['date_and_time_nice'], 'RAW_TIME' => strval($_message['date_and_time']), 'FONT_COLOUR' => $_message['text_colour'], 'FONT_FACE' => $_message['font_name'])); $messages_output .= '<div xmlns="http://www.w3.org/1999/xhtml" sender_id="' . strval($_message['member_id']) . '" room_id="' . strval($_message['room_id']) . '" id="' . strval($_message['id']) . '" timestamp="' . strval($_message['date_and_time']) . '">' . $template->evaluate() . '</div>'; } // Members update, but only for the room interface if ($room_id >= 0) { $tpl = get_chatters_in_room_tpl(get_chatters_in_room($room_id)); $events_output .= '<chat_members_update>' . escape_html($tpl->evaluate()) . '</chat_members_update>'; } // IM events and invitations, but only for the lobby IM interface $invitations_output = ''; if ($room_id < 0) { $room_check = list_to_map('id', $GLOBALS['SITE_DB']->query('SELECT * FROM ' . get_table_prefix() . 'chat_rooms WHERE is_im=1 AND allow_list LIKE \'' . db_encode_like('%' . strval(get_member()) . '%') . '\'')); foreach ($room_check as $room) { if (check_chatroom_access($room, true, NULL, true)) { if ($room['allow_list'] == strval(get_member()) && is_null($event_id)) { require_code('chat2'); delete_chatroom($room['id']); } else { $people_in_room = explode(',', $room['allow_list']); if ($room['room_name'] == $GLOBALS['FORUM_DRIVER']->get_username(get_member()) && count($people_in_room) > 1) { $test = $GLOBALS['FORUM_DRIVER']->get_username(intval($people_in_room[1])); if (!is_null($test)) { $room['room_name'] = $test; } } // Find who else is in room $participants = ''; foreach ($people_in_room as $person) { if (intval($person) != get_member()) { if ($participants != '') { $participants .= ''; } $participants .= $person; } } $num_posts = $GLOBALS['SITE_DB']->query_value('chat_messages', 'COUNT(*)', array('room_id' => $room['id'])); $avatar_url = $GLOBALS['FORUM_DRIVER']->get_member_avatar_url($room['room_owner']); $invitations_output .= '<chat_invite num_posts="' . strval($num_posts) . '" you="' . strval(get_member()) . '" inviter="' . (is_null($room['room_owner']) ? '' : strval($room['room_owner'])) . '" participants="' . xmlentities($participants) . '" room_name="' . xmlentities($room['room_name']) . '" avatar_url="' . xmlentities($avatar_url) . '">' . strval($room['id']) . '</chat_invite>'; } } } if (!is_null($event_id)) { $events = $GLOBALS['SITE_DB']->query('SELECT * FROM ' . get_table_prefix() . 'chat_events WHERE id>' . strval((int) $event_id)); foreach ($events as $event) { if ($event['e_member_id'] == get_member()) { continue; } if (is_guest($event['e_member_id'])) { continue; } $send_out = false; switch ($event['e_type_code']) { case 'BECOME_INACTIVE': case 'BECOME_ACTIVE': if (!member_blocked(get_member(), $event['e_member_id']) && member_befriended($event['e_member_id'])) { $send_out = true; } break; case 'PREINVITED_TO_IM': case 'JOIN_IM': if (array_key_exists($event['e_room_id'], $room_check) && check_chatroom_access($room_check[$event['e_room_id']], true, NULL, true)) { $send_out = true; } break; case 'DEINVOLVE_IM': if (array_key_exists($event['e_room_id'], $room_check) && check_chatroom_access($room_check[$event['e_room_id']], true, NULL, true)) { $send_out = true; } break; case 'INVITED_TO_IM': // Ignore this one break; } if ($send_out) { $username = $GLOBALS['FORUM_DRIVER']->get_username($event['e_member_id']); $avatar_url = $GLOBALS['FORUM_DRIVER']->get_member_avatar_url($event['e_member_id']); if (!is_null($username)) { $events_output .= '<chat_event away="' . (chatter_active($event['e_member_id']) ? '0' : '1') . '" event_type="' . $event['e_type_code'] . '" member_id="' . strval($event['e_member_id']) . '" username="******" avatar_url="' . xmlentities($avatar_url) . '" room_id="' . (is_null($event['e_room_id']) ? '' : strval($event['e_room_id'])) . '">' . strval($event['id']) . '</chat_event>'; } } } } else { $max_id = $GLOBALS['SITE_DB']->query_value('chat_events', 'MAX(id)'); if (is_null($max_id)) { $max_id = db_get_first_id() - 1; } $events_output .= '<chat_event type="NULL">' . strval($max_id) . '</chat_event>'; } } if ($messages_output == '') { $messages_output = '<chat_null>' . strval($room_id) . '</chat_null>'; } header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past header('Content-Type: application/xml'); $output = '<' . '?xml version="1.0" encoding="' . get_charset() . '" ?' . '> <!DOCTYPE xc:content [ <!ENTITY euro "€"> <!ENTITY ldquo "“"> <!ENTITY rdquo "”"> <!ENTITY lsquo "‘"> <!ENTITY rsquo "’"> <!ENTITY dagger "†"> <!ENTITY Dagger "‡"> <!ENTITY permil "‰"> <!ENTITY Scaron "Š"> <!ENTITY scaron "š"> <!ENTITY Yuml "Ÿ"> <!ENTITY ndash "–"> <!ENTITY mdash "—"> <!ENTITY hellip "…"> <!ENTITY copy "©"> <!ENTITY nbsp " "> <!ENTITY fnof "ƒ"> <!ENTITY reg "®"> <!ENTITY trade "™"> <!ENTITY raquo "»"> <!ENTITY frac14 "¼"> <!ENTITY frac12 "½"> <!ENTITY frac34 "¾"> ]> <response> <result> ' . $events_output . $invitations_output . $messages_output . ' </result> </response>'; echo $output; }