1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
<?php
/*
* Service Provider Example -- Online User Viewer
*
* Copyright (C) 2004 Entr'ouvert
* http://lasso.entrouvert.org
*
* Authors: Christophe Nowicki <cnowicki@easter-eggs.com>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
require_once 'DB.php';
if (!file_exists('config.inc'))
{
?>
<p align='center'><b>Service Provider Configuration file is not available</b><br>
Please run the setup script :<br>
<a href='setup.php'>Lasso Service Provider Setup</a><br>
You can get more informations about <b>Lasso</b> at <br>
<a href='http://lasso.entrouvert.org/'>http://lasso.entrouvert.org/</a></p>
<?php
exit();
}
$config = unserialize(file_get_contents('config.inc'));
$db = &DB::connect($config['dsn']);
if (DB::isError($db))
die($db->getMessage());
$query = "SELECT nameidentifiers.user_id,users.username,ip ";
$query .= "FROM nameidentifiers,sso_sessions,users ";
$query .= "WHERE sso_sessions.name_identifier = nameidentifiers.name_identifier ";
$query .= "AND nameidentifiers.user_id = users.user_id";
$res =& $db->query($query);
if (DB::isError($res))
die($res->getMessage());
$numRows = $res->numRows();
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">
<head>
<title>Lasso Service Provider Example : View Online Users</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-15" />
</head>
<body>
<p align='center'>
<table align='center' width='95%' border='1'>
<caption>Online Users</caption>
<thead>
<tr>
<td align='center'>User ID</td>
<td align='center'>User Name</td>
<td align='center'>Address IP</td>
<td align='center'>Started</td>
<td align='center'>Duration</td>
</tr>
</thead>
<tbody>
<?php
if ($numRows)
{
$num_col = $res->numCols();
$tableinfo = $db->tableInfo($res);
while($row = $res->fetchRow())
{
echo "<tr>";
for ($i = 0; $i < $num_col; $i++)
{
echo "<td align='center'>";
switch ($tableinfo[$i]['name'])
{
case "ip":
echo long2ip($row[$i]);
break;
default:
echo $row[$i];
}
echo "</td>";
}
echo "</tr>";
}
}
?>
</tbody>
<tfoot>
<tr>
<td colspan='5'> </td>
</tr>
</tfoot>
</table>
</p>
<br>
<p align='center'><a href='index.php'>Index</a>
</p>
<br>
<p align='center'>Copyright © 2004 Entr'ouvert</p>
</body>
</html>
|
