function setUp()
{
parent::setUp();
require_code('chat');
require_code('chat2');
$this->chatroom_id = add_chatroom('test_message', 'test_chat_room', 4, '', '2,3,4,5,6,7,8,9,10', '', '', 'EN', 0);
// Test the forum was actually created
$this->assertTrue('test_chat_room' == $GLOBALS['SITE_DB']->query_value('chat_rooms', 'room_name ', array('id' => $this->chatroom_id)));
}
/**
* Standard aed_module add actualiser.
*
* @return ID_TEXT The entry added
*/
function add_actualisation()
{
list($allow2, $allow2_groups, $disallow2, $disallow2_groups) = read_in_chat_perm_fields();
$id = add_chatroom(post_param('c_welcome'), post_param('room_name'), $GLOBALS['FORUM_DRIVER']->get_member_from_username(post_param('room_owner')), $allow2, $allow2_groups, $disallow2, $disallow2_groups, post_param('room_lang', user_lang()));
$this->set_permissions($id);
return strval($id);
}
/**
* The actualiser to add a chat room.
*
* @return tempcode The UI to choose a chat room (probably what was just added, but...)
*/
function _chat_private()
{
$title = get_page_title('CREATE_PRIVATE_ROOM');
require_code('chat2');
if (is_guest()) {
access_denied('NOT_AS_GUEST');
}
check_specific_permission('create_private_room');
// Check the input
$room_name = post_param('room_name', do_lang('CHAT_PRIVATE_DEFAULT_ROOM_NAME', $GLOBALS['FORUM_DRIVER']->get_username(get_member())));
$room_lang = post_param('room_lang', user_lang());
list($allow2, $allow2_groups, $disallow2, $disallow2_groups) = read_in_chat_perm_fields();
$allow = explode(',', $allow2);
$new_room_id = add_chatroom(post_param('c_welcome'), $room_name, get_member(), $allow2, $allow2_groups, $disallow2, $disallow2_groups, $room_lang);
$rooms = chat_get_all_rooms();
// For each person in the allow list, insert a private message into every room (except the new one) asking them to join the new room
foreach ($allow as $person) {
$person = trim($person);
if ($person != '' && $person != $GLOBALS['FORUM_DRIVER']->get_username(get_member()) && $person != do_lang('GUEST')) {
foreach ($rooms as $room) {
if ($room['id'] != $new_room_id) {
chat_post_message($room['id'], '[invite="' . $person . '"]' . $room_name . '[/invite]', get_option('chat_default_post_font'), get_option('chat_default_post_colour'));
}
}
}
}
// Set access
$admin_groups = $GLOBALS['FORUM_DRIVER']->get_super_admin_groups();
$groups = $GLOBALS['FORUM_DRIVER']->get_usergroup_list(false, true);
$GLOBALS['SITE_DB']->query_delete('group_category_access', array('module_the_name' => 'chat', 'category_name' => strval($new_room_id)));
foreach (array_keys($groups) as $group_id) {
if (in_array($group_id, $admin_groups)) {
continue;
}
$GLOBALS['SITE_DB']->query_insert('group_category_access', array('module_the_name' => 'chat', 'category_name' => strval($new_room_id), 'group_id' => $group_id));
}
$url = build_url(array('page' => '_SELF', 'type' => 'room', 'id' => $new_room_id), '_SELF');
return redirect_screen($title, $url, do_lang_tempcode('SUCCESS'));
}
function do_work()
{
$num_wanted = 100000;
require_code('config2');
set_option('post_history_days', '0');
// Needed for a little sanity in recent post retrieval
set_value('disable_sunk', '1');
// members (remember to test the username autocompleter, and birthdays)
// authors (remember to check author autocompleter and popup author list)
// lots of people getting notifications on a forum
// lots of people getting notifications on a topic
require_code('authors');
require_code('ocf_members_action');
require_code('notifications');
for ($i = $GLOBALS['FORUM_DB']->query_value('f_members', 'COUNT(*)'); $i < $num_wanted; $i++) {
$member_id = ocf_make_member(uniqid('', true), uniqid('', true), uniqid('', true) . '@example.com', array(), intval(date('d')), intval(date('m')), intval(date('Y')), array(), NULL, NULL, 1, NULL, NULL, '', NULL, '', 0, 0, 1, '', '', '', 1, 1, NULL, 1, 1, '', NULL, '', false);
add_author(random_line(), '', $member_id, random_text(), random_text());
enable_notifications('ocf_topic', 'forum:' . strval(db_get_first_id()), $member_id);
enable_notifications('ocf_topic', strval(db_get_first_id()), $member_id);
// number of friends to a single member
$GLOBALS['SITE_DB']->query_insert('chat_buddies', array('member_likes' => $member_id, 'member_liked' => db_get_first_id() + 1, 'date_and_time' => time()), false, true);
}
$member_id = db_get_first_id() + 2;
// point earn list / gift points to a single member
require_code('points2');
for ($j = $GLOBALS['SITE_DB']->query_value('gifts', 'COUNT(*)'); $j < $num_wanted; $j++) {
give_points(10, $member_id, mt_rand(db_get_first_id(), min(100, $num_wanted - 1)), random_line(), false, false);
}
// number of friends of a single member
for ($j = intval(floatval($GLOBALS['SITE_DB']->query_value('chat_buddies', 'COUNT(*)')) / 2.0); $j < $num_wanted; $j++) {
$GLOBALS['SITE_DB']->query_insert('chat_buddies', array('member_likes' => $member_id, 'member_liked' => $j + db_get_first_id(), 'date_and_time' => time()), false, true);
}
echo 'done member/authors/points/notifications/friends stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// banners
require_code('banners2');
for ($i = $GLOBALS['SITE_DB']->query_value('banners', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_banner(uniqid('', true), get_logo_url(), random_line(), random_text(), 100, get_base_url(), 3, '', db_get_first_id(), NULL, db_get_first_id() + 1, 1);
}
echo 'done banner stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// comcode pages
require_code('files');
require_code('files2');
for ($i = $GLOBALS['SITE_DB']->query_value('comcode_pages', 'COUNT(*)'); $i < $num_wanted; $i++) {
$file = uniqid('', true);
/*$path=get_custom_file_base().'/site/pages/comcode_custom/'.fallback_lang().'/'.$file.'.txt';
$myfile=fopen($path,'wt');
fwrite($myfile,random_text());
fclose($myfile);
sync_file($path);
fix_permissions($path);*/
$GLOBALS['SITE_DB']->query_insert('comcode_pages', array('the_zone' => 'site', 'the_page' => $file, 'p_parent_page' => '', 'p_validated' => 1, 'p_edit_date' => NULL, 'p_add_date' => time(), 'p_submitter' => db_get_first_id(), 'p_show_as_edit' => 0));
}
echo 'done comcode stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// zones
require_code('zones2');
require_code('abstract_file_manager');
for ($i = $GLOBALS['SITE_DB']->query_value('zones', 'COUNT(*)'); $i < min($num_wanted, 1000); $i++) {
actual_add_zone(uniqid('', true), random_line(), 'start', random_line(), 'default', 0, 0, 0);
}
echo 'done zone stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// calendar events
require_code('calendar2');
for ($i = $GLOBALS['SITE_DB']->query_value('calendar_events', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_calendar_event(db_get_first_id(), '', NULL, 0, random_line(), random_text(), 1, 1, intval(date('Y')), intval(date('m')), intval(date('d')), 0, 0);
}
echo 'done event stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// chat rooms
require_code('chat2');
require_code('chat');
for ($i = $GLOBALS['SITE_DB']->query_value('chat_rooms', 'COUNT(*)'); $i < $num_wanted; $i++) {
$room_id = add_chatroom(random_text(), random_line(), mt_rand(db_get_first_id() + 1, $num_wanted - 1), strval(db_get_first_id() + 1), '', '', '', fallback_lang());
}
$room_id = db_get_first_id() + 1;
// messages in chat room
for ($j = $GLOBALS['SITE_DB']->query_value('chat_messages', 'COUNT(*)'); $j < $num_wanted; $j++) {
$_message_parsed = insert_lang_comcode(random_text(), 4);
$GLOBALS['SITE_DB']->query_insert('chat_messages', array('system_message' => 0, 'ip_address' => '', 'room_id' => $room_id, 'user_id' => db_get_first_id(), 'date_and_time' => time(), 'the_message' => $_message_parsed, 'text_colour' => get_option('chat_default_post_colour'), 'font_name' => get_option('chat_default_post_font')));
}
echo 'done chat stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// download categories under a subcategory
require_code('downloads2');
$subcat_id = add_download_category(random_line(), db_get_first_id(), random_text(), '');
for ($i = $GLOBALS['SITE_DB']->query_value('download_categories', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_download_category(random_line(), $subcat_id, random_text(), '');
}
// downloads (remember to test content by the single author)
require_code('downloads2');
require_code('awards');
$time = time();
for ($i = $GLOBALS['SITE_DB']->query_value('download_downloads', 'COUNT(*)'); $i < $num_wanted; $i++) {
$content_id = add_download(db_get_first_id(), random_line(), get_logo_url(), random_text(), 'admin', random_text(), NULL, 1, 1, 1, 1, '', uniqid('', true) . '.jpg', 100, 110, 1);
give_award(db_get_first_id(), strval($content_id), $time - $i);
}
$content_id = db_get_first_id();
$content_url = build_url(array('page' => 'downloads', 'type' => 'entry', 'id' => $content_id), 'site');
for ($j = $GLOBALS['SITE_DB']->query_value('trackbacks', 'COUNT(*)'); $j < $num_wanted; $j++) {
// trackbacks
$GLOBALS['SITE_DB']->query_insert('trackbacks', array('trackback_for_type' => 'downloads', 'trackback_for_id' => $content_id, 'trackback_ip' => '', 'trackback_time' => time(), 'trackback_url' => '', 'trackback_title' => random_line(), 'trackback_excerpt' => random_text(), 'trackback_name' => random_line()));
// ratings
$GLOBALS['SITE_DB']->query_insert('rating', array('rating_for_type' => 'downloads', 'rating_for_id' => $content_id, 'rating_member' => $j + 1, 'rating_ip' => '', 'rating_time' => time(), 'rating' => 3));
// posts in a comment topic
$GLOBALS['FORUM_DRIVER']->make_post_forum_topic(get_option('comments_forum_name'), 'downloads_' . strval($content_id), get_member(), random_text(), random_line(), '', do_lang('COMMENT'), $content_url->evaluate(), NULL, NULL, 1, 1);
}
echo 'done download stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// forums under a forum (don't test it can display, just make sure the main index still works)
require_code('ocf_forums_action');
for ($i = $GLOBALS['FORUM_DB']->query_value('f_forums', 'COUNT(*)'); $i < $num_wanted; $i++) {
ocf_make_forum(random_line(), random_text(), db_get_first_id(), array(), db_get_first_id() + 3);
}
// forum topics
require_code('ocf_topics_action');
require_code('ocf_posts_action');
require_code('ocf_forums');
require_code('ocf_topics');
for ($i = intval(floatval($GLOBALS['FORUM_DB']->query_value('f_topics', 'COUNT(*)')) / 2.0); $i < $num_wanted; $i++) {
$topic_id = ocf_make_topic(db_get_first_id(), '', '', NULL, 1, 0, 0, 0, NULL, NULL, false);
ocf_make_post($topic_id, random_line(), random_text(), 0, true, 0, 0, NULL, NULL, NULL, NULL, NULL, NULL, NULL, false, false);
}
// forum posts in a topic
require_code('ocf_topics_action');
require_code('ocf_posts_action');
$topic_id = ocf_make_topic(db_get_first_id() + 1, '', '', NULL, 1, 0, 0, 0, NULL, NULL, false);
for ($i = intval(floatval($GLOBALS['FORUM_DB']->query_value('f_posts', 'COUNT(*)')) / 3.0); $i < $num_wanted; $i++) {
ocf_make_post($topic_id, random_line(), random_text(), 0, true, 0, 0, NULL, NULL, NULL, mt_rand(db_get_first_id(), $num_wanted - 1), NULL, NULL, NULL, false, false);
}
echo 'done forum stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// clubs
require_code('ocf_groups_action');
require_code('ocf_groups');
for ($i = $GLOBALS['FORUM_DB']->query_value('f_groups', 'COUNT(*)'); $i < $num_wanted; $i++) {
ocf_make_group(random_line(), 0, 0, 0, random_line(), '', NULL, NULL, NULL, 5, 0, 70, 50, 100, 100, 30000, 700, 25, 1, 0, 0, 0, $i, 1, 0, 1);
}
echo 'done club stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// galleries under a subcategory
require_code('galleries2');
$xsubcat_id = uniqid('', true);
add_gallery($xsubcat_id, random_line(), random_text(), '', '', 'root');
for ($i = $GLOBALS['SITE_DB']->query_value('galleries', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_gallery(uniqid('', true), random_line(), random_text(), '', '', $xsubcat_id);
}
// images
require_code('galleries2');
for ($i = $GLOBALS['SITE_DB']->query_value('images', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_image('', 'root', random_text(), get_logo_url(), get_logo_url(), 1, 1, 1, 1, '');
}
// videos / validation queue
require_code('galleries2');
for ($i = $GLOBALS['SITE_DB']->query_value('videos', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_video('', 'root', random_text(), get_logo_url(), get_logo_url(), 0, 1, 1, 1, '', 0, 0, 0);
}
echo 'done galleries stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// newsletter subscribers
require_code('newsletter');
for ($i = $GLOBALS['SITE_DB']->query_value('newsletter', 'COUNT(*)'); $i < $num_wanted; $i++) {
basic_newsletter_join(uniqid('', true) . '@example.com');
}
echo 'done newsletter stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// polls (remember to test poll archive)
require_code('polls');
for ($i = $GLOBALS['SITE_DB']->query_value('poll', 'COUNT(*)'); $i < $num_wanted; $i++) {
$poll_id = add_poll(random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), random_line(), 10, 0, 0, 0, 0, '');
}
// votes on a poll
$poll_id = db_get_first_id();
for ($j = $GLOBALS['SITE_DB']->query_value('poll_votes', 'COUNT(*)'); $j < $num_wanted; $j++) {
$cast = mt_rand(1, 6);
$ip = uniqid('', true);
$GLOBALS['SITE_DB']->query_insert('poll_votes', array('v_poll_id' => $poll_id, 'v_voter_id' => 2, 'v_voter_ip' => $ip, 'v_vote_for' => $cast));
}
echo 'done polls stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// quizzes
require_code('quiz');
for ($i = $GLOBALS['SITE_DB']->query_value('quizzes', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_quiz(random_line(), 0, random_text(), random_text(), random_text(), '', 0, time(), NULL, 3, 300, 'SURVEY', 1, '1) Some question');
}
echo 'done quizzes stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// successful searches (to test the search recommender)
// ACTUALLY: I have manually verified the code, it is an isolated portion
// cedi pages (do a long descendant tree for some, and orphans for others)
// cedi posts (remember to test cedi changes screen)
require_code('cedi');
for ($i = $GLOBALS['SITE_DB']->query_value('seedy_pages', 'COUNT(*)'); $i < $num_wanted; $i++) {
$page_id = cedi_add_page(random_line(), random_text(), '', 1);
cedi_add_post($page_id, random_text(), 1, NULL, false);
}
echo 'done cedi stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// iotds
require_code('iotds');
for ($i = $GLOBALS['SITE_DB']->query_value('iotd', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_iotd(get_logo_url(), random_line(), random_text(), get_logo_url(), 1, 0, 0, 0, '');
}
echo 'done iotd stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// logged hack attempts
for ($i = $GLOBALS['SITE_DB']->query_value('hackattack', 'COUNT(*)'); $i < $num_wanted; $i++) {
$GLOBALS['SITE_DB']->query_insert('hackattack', array('url' => get_base_url(), 'data_post' => '', 'user_agent' => '', 'referer' => '', 'user_os' => '', 'the_user' => db_get_first_id(), 'date_and_time' => time(), 'ip' => uniqid('', true), 'reason' => 'ASCII_ENTITY_URL_HACK', 'reason_param_a' => '', 'reason_param_b' => ''));
}
// logged hits in one day
require_code('site');
for ($i = $GLOBALS['SITE_DB']->query_value('stats', 'COUNT(*)'); $i < $num_wanted; $i++) {
log_stats('/testing' . uniqid('', true), mt_rand(100, 2000));
}
echo 'done logs stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// blogs and news entries (remember to test both blogs [categories] list, and a list of all news entries)
require_code('news');
for ($i = $GLOBALS['SITE_DB']->query_value('news', 'COUNT(*)'); $i < $num_wanted; $i++) {
add_news(random_line(), random_text(), 'admin', 1, 1, 1, 1, '', random_text(), NULL, NULL, NULL, db_get_first_id() + $i);
}
echo 'done news stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// support tickets
require_code('tickets');
require_code('tickets2');
for ($i = intval(floatval($GLOBALS['FORUM_DB']->query_value('f_topics', 'COUNT(*)')) / 2.0); $i < $num_wanted; $i++) {
ticket_add_post(mt_rand(db_get_first_id(), $num_wanted - 1), uniqid('', true), db_get_first_id(), random_line(), random_text(), '', '');
}
echo 'done tickets stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// catalogues
require_code('catalogues2');
$root_id = db_get_first_id();
for ($i = $GLOBALS['SITE_DB']->query_value('catalogues', 'COUNT(*)'); $i < $num_wanted; $i++) {
$catalogue_name = uniqid('', true);
$root_id = actual_add_catalogue($catalogue_name, random_line(), random_text(), mt_rand(0, 3), 1, '', 30);
}
// catalogue categories under a subcategory (remember to test all catalogue views: atoz, index, and root cat)
$catalogue_name = 'products';
$subcat_id = actual_add_catalogue_category($catalogue_name, random_line(), random_text(), '', $root_id);
for ($j = $GLOBALS['SITE_DB']->query_value('catalogue_categories', 'COUNT(*)'); $j < $num_wanted; $j++) {
actual_add_catalogue_category($catalogue_name, random_line(), random_text(), '', $subcat_id);
}
echo 'done catalogue stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
// items in ecommerce store
require_code('catalogues2');
$cat_id = $GLOBALS['SITE_DB']->query_value('catalogue_categories', 'MIN(id)', array('c_name' => 'products'));
$fields = collapse_1d_complexity('id', $GLOBALS['SITE_DB']->query_select('catalogue_fields', array('id'), array('c_name' => 'products')));
for ($i = $GLOBALS['SITE_DB']->query_value('catalogue_entries', 'COUNT(*)'); $i < $num_wanted; $i++) {
$map = array($fields[0] => random_line(), $fields[1] => uniqid('', true), $fields[2] => '1.0', $fields[3] => '1', $fields[4] => '0', $fields[5] => '1', $fields[6] => '0%', $fields[7] => get_logo_url(), $fields[8] => '2.0', $fields[9] => random_text());
$pid = actual_add_catalogue_entry($cat_id, 1, '', 1, 1, 1, $map);
unset($map);
}
// outstanding ecommerce orders
$pid = $GLOBALS['SITE_DB']->query_value('catalogue_entries', 'MIN(id)', array('c_name' => 'products'));
require_code('shopping');
for ($j = $GLOBALS['SITE_DB']->query_value('shopping_cart', 'COUNT(*)'); $j < $num_wanted; $j++) {
$product_det = array('product_id' => $pid, 'product_name' => $fields[0], 'product_code' => $fields[1], 'price' => $fields[2], 'tax' => preg_replace('#[^\\d\\.]#', '', $fields[6]), 'description' => $fields[9], 'quantity' => mt_rand(1, 20), 'product_type' => 'catalogue_items', 'product_weight' => $fields[8]);
$GLOBALS['SITE_DB']->query_insert('shopping_cart', array('session_id' => mt_rand(0, 1000000), 'ordered_by' => mt_rand(db_get_first_id() + 1, $num_wanted - 1), 'product_id' => $product_det['product_id'], 'product_name' => $product_det['product_name'], 'product_code' => $product_det['product_code'], 'quantity' => $product_det['quantity'], 'price' => round(floatval($product_det['price']), 2), 'price_pre_tax' => $product_det['tax'], 'product_description' => $product_det['description'], 'product_type' => $product_det['product_type'], 'product_weight' => $product_det['product_weight'], 'is_deleted' => 0));
}
for ($j = $GLOBALS['SITE_DB']->query_value('shopping_order', 'COUNT(*)'); $j < $num_wanted; $j++) {
$order_id = $GLOBALS['SITE_DB']->query_insert('shopping_order', array('c_member' => mt_rand(db_get_first_id() + 1, $num_wanted - 1), 'session_id' => mt_rand(0, 1000000), 'add_date' => time(), 'tot_price' => '123.00', 'order_status' => 'ORDER_STATUS_awaiting_payment', 'notes' => '', 'purchase_through' => 'purchase_module', 'transaction_id' => '', 'tax_opted_out' => 0), true);
$GLOBALS['SITE_DB']->query_insert('shopping_order_details', array('p_id' => 123, 'p_name' => random_line(), 'p_code' => 123, 'p_type' => 'catalogue_items', 'p_quantity' => 1, 'p_price' => '12.00', 'order_id' => $order_id, 'dispatch_status' => '', 'included_tax' => '1.00'));
}
echo 'done store stuff' . chr(10);
if (function_exists('gc_collect_cycles')) {
gc_enable();
}
echo '{{DONE}}' . chr(10);
}
/**
* High-level messages script handling
*/
function messages_script()
{
get_page_title('', false);
// Force session time to be updated
// Closed site
$site_closed = get_option('site_closed');
if ($site_closed == '1' && !has_specific_permission(get_member(), 'access_closed_site') && !$GLOBALS['IS_ACTUALLY_ADMIN']) {
header('Content-Type: text/plain');
@exit(get_option('closed'));
}
// Check we are allowed here
//if (!has_actual_page_access(get_member(),'chat')) access_denied('PAGE_ACCESS'); Actually we'll use room permissions for that; don't want to block the shoutbox
// Check the action
$action = get_param('action', 'new');
if ($action == 'all') {
// Getting all messages (i.e. up to five minutes ago)
_chat_messages_script_ajax(either_param_integer('room_id'), true);
} elseif ($action == 'post') {
// Posting a message
convert_data_encodings(true);
$message = either_param('message');
_chat_post_message_ajax(either_param_integer('room_id'), $message, post_param('font', ''), post_param('colour', ''), post_param_integer('first_message', 0));
} elseif ($action == 'start_im') {
require_lang('chat');
$people = get_param('people');
if ($people == '') {
exit;
}
require_code('chat2');
if (strpos($people, ',') === false) {
$room_name = $GLOBALS['FORUM_DRIVER']->get_username(get_member());
} else {
$room_name = do_lang('IM_MULTI', $GLOBALS['FORUM_DRIVER']->get_username(get_member()));
}
add_chatroom('', $room_name, get_member(), filter_invites_for_blocking(strval(get_member()) . ',' . $people), '', '', '', user_lang(), 1);
// Send response of new messages, so we get instant result
_chat_messages_script_ajax(-2, false, either_param_integer('message_id'), either_param_integer('event_id'));
} elseif ($action == 'join_im') {
$room_id = get_param_integer('room_id');
$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)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
if (!check_chatroom_access($room_check[0], true, NULL, true)) {
return;
}
// Possibly the room was closed already
$event_id = $GLOBALS['SITE_DB']->query_insert('chat_events', array('e_type_code' => 'JOIN_IM', 'e_member_id' => get_member(), 'e_room_id' => $room_id, 'e_date_and_time' => time()), true);
$myfile = @fopen(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat', 'wb') or intelligent_write_error(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
fwrite($myfile, strval($event_id));
fclose($myfile);
sync_file(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
// Catch up the current user so that they know who else is in the room just joined...
$events_output = '';
$peoplea = explode(',', $room_check[0]['allow_list']);
foreach ($peoplea as $person) {
$person = trim($person);
if ($person == '') {
continue;
}
$member_id = intval($person);
if ($member_id != get_member()) {
$username = $GLOBALS['FORUM_DRIVER']->get_username($member_id);
$avatar_url = $GLOBALS['FORUM_DRIVER']->get_member_avatar_url($member_id);
if (!is_null($username)) {
$events_output .= '<chat_event event_type="PREINVITED_TO_IM" away="' . (chatter_active($member_id) ? '0' : '1') . '" member_id="' . strval($member_id) . '" username="******" avatar_url="' . xmlentities($avatar_url) . '" room_id="' . strval($room_id) . '"></chat_event>';
}
}
}
_chat_messages_script_ajax(-1, false, -1, either_param_integer('event_id'), $events_output);
} elseif ($action == 'deinvolve_im') {
$room_id = get_param_integer('room_id');
$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)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
if (!check_chatroom_access($room_check[0], true, NULL, true)) {
return;
}
// Possibly the room was closed already
$allow_list = str_replace(',' . strval(get_member()) . ',', ',', ',' . $room_check[0]['allow_list'] . ',');
$allow_list = substr($allow_list, 1, strlen($allow_list) - 2);
$event_id = $GLOBALS['SITE_DB']->query_insert('chat_events', array('e_type_code' => 'DEINVOLVE_IM', 'e_member_id' => get_member(), 'e_room_id' => $room_id, 'e_date_and_time' => time()), true);
$myfile = @fopen(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat', 'wb') or intelligent_write_error(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
fwrite($myfile, strval($event_id));
fclose($myfile);
sync_file(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
if ($allow_list == '') {
require_code('chat2');
delete_chatroom($room_id);
} else {
$peoplea = explode(',', $allow_list);
$room_owner = $room_check[0]['room_owner'];
if ($room_owner == get_member()) {
$room_owner = intval($peoplea[0]);
}
$GLOBALS['SITE_DB']->query_update('chat_rooms', array('room_owner' => $room_owner, 'allow_list' => $allow_list), array('id' => $room_id), '', 1);
}
} elseif ($action == 'invite_im') {
$room_id = get_param_integer('room_id');
$people = get_param('people');
if ($people == '') {
exit;
}
foreach (explode(',', $people) as $person) {
$person = trim($person);
if ($person == '') {
continue;
}
$event_id = $GLOBALS['SITE_DB']->query_insert('chat_events', array('e_type_code' => 'PREINVITED_TO_IM', 'e_member_id' => intval($person), 'e_room_id' => $room_id, 'e_date_and_time' => time()), true);
$myfile = @fopen(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat', 'wb') or intelligent_write_error(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
fwrite($myfile, strval($event_id));
fclose($myfile);
sync_file(get_custom_file_base() . '/data_custom/modules/chat/chat_last_event.dat');
}
$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)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
if (!check_chatroom_access($room_check[0], true, NULL, true)) {
return;
}
// Possibly the room was closed already
$allow_list = $room_check[0]['allow_list'];
$_people = $allow_list . ',' . filter_invites_for_blocking($people);
$GLOBALS['SITE_DB']->query_update('chat_rooms', array('allow_list' => $_people), array('id' => $room_id), '', 1);
} else {
// Getting all new messages (i.e. up to our last refresh time)
_chat_messages_script_ajax(either_param_integer('room_id'), false, either_param_integer('message_id'), either_param_integer('event_id'));
}
}