Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
define('NO_MOODLE_COOKIES', true); // Session not used here.
18
 
19
require_once('../../../config.php');
20
require_once($CFG->dirroot.'/mod/chat/lib.php');
21
 
22
$chatsid   = required_param('chat_sid', PARAM_ALPHANUM);
23
$beep       = optional_param('beep', 0, PARAM_INT);  // Beep target.
24
 
25
$PAGE->set_url('/mod/chat/gui_header_js/users.php', array('chat_sid' => $chatsid));
26
$PAGE->set_popup_notification_allowed(false);
27
 
28
if (!$chatuser = $DB->get_record('chat_users', array('sid' => $chatsid))) {
29
    throw new \moodle_exception('notlogged', 'chat');
30
}
31
 
32
// Get the minimal course.
33
if (!$course = $DB->get_record('course', array('id' => $chatuser->course))) {
34
    throw new \moodle_exception('invalidcourseid');
35
}
36
 
37
// Get the user theme and enough info to be used in chat_format_message() which passes it along to.
38
// No optimisation here, it would break again in future!
39
if (!$user = $DB->get_record('user', array('id' => $chatuser->userid, 'deleted' => 0, 'suspended' => 0))) {
40
    throw new \moodle_exception('invaliduser');
41
}
42
\core\session\manager::set_user($user);
43
 
44
$PAGE->set_pagelayout('embedded');
45
 
46
// Setup course, lang and theme.
47
$PAGE->set_course($course);
48
 
49
$courseid = $chatuser->course;
50
 
51
if (!$cm = get_coursemodule_from_instance('chat', $chatuser->chatid, $courseid)) {
52
    throw new \moodle_exception('invalidcoursemodule');
53
}
54
 
55
if ($beep) {
56
    chat_send_chatmessage($chatuser, "beep $beep", 0, $cm);
57
    $chatuser->lastmessageping = time(); // A beep is a ping.
58
}
59
 
60
$chatuser->lastping = time();
61
$DB->set_field('chat_users', 'lastping', $chatuser->lastping, array('id' => $chatuser->id));
62
 
63
$refreshurl = "users.php?chat_sid=$chatsid";
64
 
65
// Get list of users.
66
 
67
if (!$chatusers = chat_get_users($chatuser->chatid, $chatuser->groupid, $cm->groupingid)) {
68
    throw new \moodle_exception('errornousers', 'chat');
69
}
70
 
71
$uidles = Array();
72
foreach ($chatusers as $chatuser) {
73
    $uidles[] = $chatuser->id;
74
}
75
 
76
$module = array(
77
    'name'      => 'mod_chat_header',
78
    'fullpath'  => '/mod/chat/gui_header_js/module.js',
79
    'requires'  => array('node')
80
);
81
$PAGE->requires->js_init_call('M.mod_chat_header.init_users', array($uidles), false, $module);
82
 
83
// Print user panel body.
84
$timenow    = time();
85
$stridle    = get_string('idle', 'chat');
86
$strbeep    = get_string('beep', 'chat');
87
 
88
$table = new html_table();
89
$table->width = '100%';
90
$table->data = array();
91
foreach ($chatusers as $chatuser) {
92
    $lastping = $timenow - $chatuser->lastmessageping;
93
    $min = (int) ($lastping / 60);
94
    $sec = $lastping - ($min * 60);
95
    $min = $min < 10 ? '0'.$min : $min;
96
    $sec = $sec < 10 ? '0'.$sec : $sec;
97
    $idle = $min.':'.$sec;
98
 
99
    $row = array();
100
    $row[0] = $OUTPUT->user_picture($chatuser, array('courseid' => $courseid, 'popup' => true));
101
    $row[1]  = html_writer::start_tag('p');
102
    $row[1] .= html_writer::start_tag('font', array('size' => '1'));
103
    $row[1] .= fullname($chatuser).'<br />';
104
    $row[1] .= html_writer::tag('span', $stridle . html_writer::tag('span',
105
                                                                    $idle,
106
                                                                    array('name' => 'uidles', 'id' => 'uidle'.$chatuser->id)),
107
                                array('class' => 'dimmed_text')) . ' ';
108
    $row[1] .= html_writer::tag('a', $strbeep, array('href' => new moodle_url('/mod/chat/gui_header_js/users.php',
109
                                                                              array('chat_sid' => $chatsid,
110
                                                                              'beep' => $chatuser->id))));
111
    $row[1] .= html_writer::end_tag('font');
112
    $row[1] .= html_writer::end_tag('p');
113
    $table->data[] = $row;
114
}
115
 
116
ob_start();
117
echo $OUTPUT->header();
118
echo html_writer::tag('div', html_writer::tag('a', get_string('refresh'),
119
        array('href' => $refreshurl, 'id' => 'refreshLink')), array('style' => 'display:none'));
120
echo html_writer::table($table);
121
echo $OUTPUT->footer();
122
 
123
// Support HTTP Keep-Alive by printing Content-Length
124
//
125
// If the user pane is refreshing often, using keepalives
126
// is lighter on the server and faster for most clients.
127
//
128
// Apache is normally configured to have a 15s timeout on
129
// keepalives, so let's observe that. Unfortunately, we cannot
130
// autodetect the keepalive timeout.
131
//
132
// Using keepalives when the refresh is longer than the timeout
133
// wastes server resources keeping an apache child around on a
134
// connection that will timeout. So we don't.
135
if ($CFG->chat_refresh_userlist < 15) {
136
    header("Content-Length: " . ob_get_length() );
137
    ob_end_flush();
138
}
139
 
140
exit; // No further output.
141