';
$output .= '
';
if ($uid == 0) {
$output .= t('Please ') . l(t('Log in'), 'user/login') . ' ' . t('to use Instant Messenger');
}
else {
if (sizeof($online_friends) > 0) {
$output .= t('Talk to: ');
foreach ($online_friends as $key => $friend) {
if ($friend['waiters'] > 0) {
$text = '('. $friend['waiters'] .') ';
}
else {
$text = '';
}
$text .= $friend['name'];
$onClick = 'click_on_friend(' . $friend['uid'] . ',\'' . $friend['name'] . '\'); return (false);';
$output .= l(
$text, '', array(
'attributes' => array('class' => 'im-link', 'id' => 'im-uid-'. $friend['uid'], 'onClick' => $onClick)
)
);
$output .= ' | ';
}
if (variable_get('im_show_talk_to_no_one', 1) == 1) {
$onClick = 'click_on_friend(' . '0' . ',\'' . t('No One') . '\'); return (false);';
$output .= l(t('No One'), '', array(
'attributes' => array('class' => 'im-link', 'id' => 'im-uid-0', 'onClick' => $onClick)
)
);
}
else {
$output = substr($output, 0, sizeof($output) -3);
}
}
else {
$output .= variable_get('im_no_one_online', 'Hey, where is everbody?') .'
refresh';
}
}
$output .= '
'; // close div.friends
$output .= '
';
$output .= '
';
$speaker_state = im_get_speaker_state();
$events = im_events();
$sound_files_selected = FALSE;
foreach ($events as $event) {
if($event['sound_file'] != 'none') {
$sound_files_selected = TRUE;
}
}
if ($speaker_state == 1) {
$on_display = 'block';
$off_display = 'none';
}
else {
$on_display = 'none';
$off_display = 'block';
}
if (_has_audio() && $sound_files_selected) {
$output .= '
';
$output .= '
';
}
$output .= t('Talking to: ') .'
';
$output .= ($other_name ? $other_name : 'no one') ;
$output .= '';
$output .= '
'; // close caption
$output .= '
';
$output .= drupal_get_form('im_console_form');
$output .= '
- Create a user that will represent a chat room.
- Enter the username in the box above. You can have multiple chat rooms by creating multiple users and then entering each on a separate line in the box above.
note: You can also enter a friendy name for the user name (see below).
For example, if you want chat rooms for bird lovers and cow lovers. You might make two users named 'birdlovers' and 'cowlovers'. In this case, you would then enter the following in the box above:
user=birdlovers
user=cowlovers
You can also specificy the following variables, each separated by a semi-colon:
name --- Since you might want nicer names to show in IM, you might enter the following in the box above.
user=birdlovers;name=Tweety Room
user=cowlovers;name=Moo Room
default --- example below will cause the birdlovers chatroom to open automatically when the user logs in. (if you specificy more than 1 chatroom as default, IM will use the first one it finds... i think ;-)
user=birdlovers;default=1
user=cowlovers
moderator --- this allows a user to delete individual messages in a chatroom. use 2 arguments to set this: moderator_type ('user' or 'role') and moderator_value (the username or role)
user=birdlovers;moderator_type=user;moderator_value=BigBird
user=cowlovers;moderator_type=role;moderator_value=rancher
");
$form['im_chat_room_settings']['im_chat_rooms'] = array(
'#type' => 'textarea',
'#rows' => 5,
'#title' => t('Chat Rooms'),
'#default_value' => variable_get('im_chat_rooms', ''),
'#description' => $msg,
);
$form['im_chat_room_settings']['im_housekeeping_parms'] = array(
'#type' => 'fieldset',
'#title' => t('Chat Room Housekeeping'),
'#collapsible' => true,
'#collapsed' => true,
);
$form['im_chat_room_settings']['im_housekeeping_parms']['im_chatroom_stale_msg_threshold'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Message Lifespan'),
'#default_value' => variable_get('im_chatroom_stale_msg_threshold', 5200),
'#description' => t("Number of minutes after which a message no longer appears in the console. Day=3600, Week=5200, Month=108000, Forever=0"),
);
$form['im_chat_room_settings']['im_housekeeping_parms']['im_chatroom_max_msgs_stored'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Maximum messages in console'),
'#default_value' => variable_get('im_chatroom_max_msgs_stored', 100),
'#description' => t("Maximum number of msgs per conversation or chat room that appear in the console. Enter 0 for no Max"),
);
$form['im_performance_parms'] = array(
'#type' => 'fieldset',
'#title' => t('Performance & Optimization Settings'),
'#collapsible' => true,
'#collapsed' => true,
//'#description' => t("Lalalal"),
);
$form['im_performance_parms']['im_refresh_rate'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Get Messages Refresh Rate'),
'#default_value' => variable_get('im_refresh_rate', 2000),
'#description' => t("How often IM polls the server to pull in new messages - in milliseconds"),
);
$form['im_performance_parms']['im_refresh_rate_inactive_threshold'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Inactive Threshold'),
'#default_value' => variable_get('im_refresh_rate_inactive_threshold', 10000),
'#description' => t("How long after last incoming message to apply the Inactive Refresh Rate - in milliseconds"),
);
$form['im_performance_parms']['im_refresh_rate_inactive'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Get Messages Inactive Refresh Rate'),
'#default_value' => variable_get('im_refresh_rate_inactive', 5000),
'#description' => t("How often IM polls the server to pull in new messages when Inactive"),
);
$form['im_performance_parms']['im_friendlist_refresh_rate'] = array(
'#type' => 'textfield',
'#size' => 10,
'#title' => t('Friend Picker refresh rate - in milliseconds'),
'#default_value' => variable_get('im_friendlist_refresh_rate', 10000),
'#description' => t("How often IM polls the server to refresh the Friend Picker - in milliseconds"),
);
if (_has_audio()) {
im_event_alert_settings(0,$form);
$form['im_event_alerts']['im_allow_user_alert_settings'] = array(
'#type' => 'checkbox',
'#title' => t('Allow users to change their alert settings'),
'#description' => t("Show these sound alert settings in the user profile."),
'#default_value' => variable_get('im_allow_user_alert_settings', 1),
);
}
if (module_exists('dialectic')) {
$bots = _dialectic_filters();
$options = array('none' => t('No Bot Please')) + $bots;
$form['im_bot_friend'] = array(
'#type' => 'select',
'#title' => t('Dialectic for bot friend'),
'#options' => $options,
'#default_value' => variable_get('im_bot_friend', 'none'),
'#description' => t('What dialect should your bot friend speak.'),
);
}
else {
$text1 = t("For great fun, download the") . ' '
. l('Dialectic Module', 'http://drupal.org/project/dialectic') . ' '
. t("and talk to Elmer Fudd, the Swedish Chef, a Pirate, or other various and sundry characters!
");
$form['bot_tout'] = array(
'#type' => 'markup',
//'#title' => t('Dialectic for bot friend'),
'#value' => $text1,
);
}
return system_settings_form($form);
}
function im_event_alert_settings($uid = 0, &$form = array()) {
global $user;
$sound_files_dir = drupal_get_path('module', 'im') . '/sounds';
$sound_files = _dirList($sound_files_dir);
$options = array_merge(array('none' => '(none)'), $sound_files);
$events = im_events();
$form['im_event_alerts'] = array(
'#type' => 'fieldset',
'#title' => t('IM Event Sound Alerts'),
'#collapsible' => true,
'#collapsed' => true,
'#description' => t("Assign sounds to IM events"),
);
foreach($events as $key => $event) {
$form['im_event_alerts']['im_alert_' . $key] = array(
'#type' => 'select',
'#title' => t($event['label']),
'#options' => $options,
'#default_value' => $event['sound_file'],
);
}
}
//returns list of friends who have sent a msg that hasn't been recieved
//along with the number of unreceived msgs
function _get_waiters($uid, $other_id) {
$waiters = array();
$results = db_query(
"SELECT suid, sname, COUNT(*) AS num_waiting FROM {im_msg}
WHERE ruid=%d AND suid != %d AND received_time = '%s'
GROUP BY suid",
$uid, $other_id, '0000-00-00 00:00:00');
while ($result = db_fetch_array($results)) {
$waiters[$result['suid']] = $result;
}
return $waiters;
}
//temporary DEMO site list of users
//TODO Kill this function and block delta=2
function dev_im_make_userlist() {
global $user;
$uid = $user->uid;
$output = '';
$results = db_query("SELECT uid, name FROM {users} WHERE uid NOT IN (0, %d) ORDER BY name", $uid);
while ($result = db_fetch_array($results)) {
$one = l($result['name'], 'user/'. $result['uid']);
$output .= '
'. $one;
}
return $output;
}
function _im_bot_name() {
if (module_exists('dialectic')) {
$n = variable_get('im_bot_friend', 'The ');
$a = _dialectic_filters();
return $a[$n] . 'Bot';
}
}
function _dirList ($directory) {
$results = array();
$handler = opendir($directory);
while ($file = readdir($handler)) {
if ($file != '.' && $file != '..') $results[$directory . '/' . $file] = $file;
}
closedir($handler);
return $results;
}
function im_events() {
global $user;
$event_types = array(
'current_convo_msg_in' => t('Incoming msg - current conversation'),
'other_msg_in' => t('Incoming msg - not current conversation'),
'friendpicker_user_left' => t('FriendPicker - User goes offline'),
'friendpicker_user_added' => t('FriendPicker - User comes online'),
);
foreach($event_types as $key => $label) {
$default_value = $user->{'im_alert_' . $key};
if (!$default_value) {
$default_value = variable_get('im_alert_' . $key, 'none');
}
$event = array('name' => $key, 'label' => $label, 'sound_file' => $default_value);
$events[$key] = $event;
}
return $events;
}
function _has_audio() {
return is_file(dirname(__FILE__) . DIRECTORY_SEPARATOR . 'player_mp3_js.swf');
}
function im_is_user_chatroom_admin($chatroom_id, $uid = NULL) {
global $user;
if (is_null($uid)) {
$this_user = $user;
}
else {
$this_user = user_load(array('uid' => $uid));
}
$chatrooms = im_get_chatrooms();
if (!$chatroom = $chatrooms[$chatroom_id]) {
return FALSE;
}
switch ($chatroom['moderator_type']) {
case 'user':
return ($uid == $chatroom['moderator_value']);
break;
case 'role':
return (in_array('special', array_values($this_user->roles)));
break;
}
return FALSE;
}