Initial revision
[lhc/web/wiklou.git] / includes / SpecialListusers.php
1 <?
2
3 function wfSpecialListusers()
4 {
5 global $wgUser, $wgOut, $wgLang, $offset, $limit;
6
7 if ( ! $limit ) {
8 $limit = $wgUser->getOption( "rclimit" );
9 if ( ! $limit ) { $limit = 50; }
10 }
11 if ( ! $offset ) { $offset = 0; }
12
13 $top = wfShowingResults( $offset, $limit );
14 $wgOut->addHTML( "<p>{$top}\n" );
15
16 $sl = wfViewPrevNext( $offset, $limit,
17 $wgLang->specialPage( "Listusers" ) );
18 $wgOut->addHTML( "<br>{$sl}\n<ol start=" . ( $offset + 1 ) . ">" );
19
20 $sql = "SELECT user_name,user_rights FROM user ORDER BY " .
21 "user_name LIMIT {$offset}, {$limit}";
22 $res = wfQuery( $sql, "wfSpecialListusers" );
23
24 $sk = $wgUser->getSkin();
25 while ( $s = wfFetchObject( $res ) ) {
26 $n = $s->user_name;
27 $r = $s->user_rights;
28
29 $l = $sk->makeLink( $wgLang->getNsText(
30 Namespace::getUser() ) . ":{$n}", $n );
31
32 if ( "" != $r ) {
33 $link = $sk->makeKnownLink( wfMsg( "administrators" ), $r );
34 $l .= " ({$link})";
35 }
36 $wgOut->addHTML( "<li>{$l}</li>\n" );
37 }
38 wfFreeResult( $res );
39 $wgOut->addHTML( "</ol><p>{$sl}\n" );
40 }
41
42 ?>