* URL_PROTOCOLS => $wgUrlProtcols
[lhc/web/wiklou.git] / includes / SpecialImagelist.php
1 <?php
2 /**
3 *
4 * @package MediaWiki
5 * @subpackage SpecialPage
6 */
7
8 /**
9 *
10 */
11 function wfSpecialImagelist() {
12 global $wgUser, $wgOut, $wgLang, $wgContLang, $wgRequest, $wgMiserMode;
13
14 $sort = $wgRequest->getVal( 'sort' );
15 $wpIlMatch = $wgRequest->getText( 'wpIlMatch' );
16 $dbr =& wfGetDB( DB_SLAVE );
17 $image = $dbr->tableName( 'image' );
18 $sql = "SELECT img_size,img_name,img_user,img_user_text," .
19 "img_description,img_timestamp FROM $image";
20
21 $byname = wfMsg( "byname" );
22 $bydate = wfMsg( "bydate" );
23 $bysize = wfMsg( "bysize" );
24
25 if ( !$wgMiserMode && !empty( $wpIlMatch ) ) {
26 $nt = Title::newFromUrl( $wpIlMatch );
27 if($nt ) {
28 $m = $dbr->strencode( strtolower( $nt->getDBkey() ) );
29 $m = str_replace( "%", "\\%", $m );
30 $m = str_replace( "_", "\\_", $m );
31 $sql .= " WHERE LCASE(img_name) LIKE '%{$m}%'";
32 }
33 }
34 if ( "bysize" == $sort ) {
35 $sql .= " ORDER BY img_size DESC";
36 $st = $bysize;
37 } else if ( "byname" == $sort ) {
38 $sql .= " ORDER BY img_name";
39 $st = $byname;
40 } else {
41 $sort = "bydate";
42 $sql .= " ORDER BY img_timestamp DESC";
43 $st = $bydate;
44 }
45 list( $limit, $offset ) = wfCheckLimits( 50 );
46 if ( 0 == $limit ) {
47 $lt = wfMsg( 'imagelistall' );
48 } else {
49 $lt = $wgLang->formatNum( "${limit}" );
50 $sql .= " LIMIT {$limit}";
51 }
52 $wgOut->addHTML( "<p>" . wfMsg( "imglegend" ) . "</p>\n" );
53
54 $text = wfMsg( "imagelisttext",
55 "<strong>{$lt}</strong>", "<strong>{$st}</strong>" );
56 $wgOut->addHTML( "<p>{$text}\n</p>" );
57
58 $sk = $wgUser->getSkin();
59 $sub = wfMsg( "ilsubmit" );
60 $titleObj = Title::makeTitle( NS_SPECIAL, "Imagelist" );
61 $action = $titleObj->escapeLocalURL( "sort={$sort}&limit={$limit}" );
62
63 if ( !$wgMiserMode ) {
64 $wgOut->addHTML( "<form id=\"imagesearch\" method=\"post\" action=\"" .
65 "{$action}\">" .
66 "<input type='text' size='20' name=\"wpIlMatch\" value=\"" .
67 htmlspecialchars( $wpIlMatch ) . "\" /> " .
68 "<input type='submit' name=\"wpIlSubmit\" value=\"{$sub}\" /></form>" );
69 }
70 $nums = array( 50, 100, 250, 500 );
71 $here = Title::makeTitle( NS_SPECIAL, 'Imagelist' );
72
73 $fill = "";
74 $first = true;
75 foreach ( $nums as $num ) {
76 if ( ! $first ) { $fill .= " | "; }
77 $first = false;
78
79 $fill .= $sk->makeKnownLinkObj( $here, $wgLang->formatNum( $num ),
80 "sort=byname&limit={$num}&wpIlMatch=" . urlencode( $wpIlMatch ) );
81 }
82 $text = wfMsg( "showlast", $fill, $byname );
83 $wgOut->addHTML( "<p>{$text}<br />\n" );
84
85 $fill = "";
86 $first = true;
87 foreach ( $nums as $num ) {
88 if ( ! $first ) { $fill .= " | "; }
89 $first = false;
90
91 $fill .= $sk->makeKnownLinkObj( $here, $wgLang->formatNum( $num ),
92 "sort=bysize&limit={$num}&wpIlMatch=" . urlencode( $wpIlMatch ) );
93 }
94 $text = wfMsg( "showlast", $fill, $bysize );
95 $wgOut->addHTML( "{$text}<br />\n" );
96
97 $fill = "";
98 $first = true;
99 foreach ( $nums as $num ) {
100 if ( ! $first ) { $fill .= " | "; }
101 $first = false;
102
103 $fill .= $sk->makeKnownLinkObj( $here, $wgLang->formatNum( $num ),
104 "sort=bydate&limit={$num}&wpIlMatch=" . urlencode( $wpIlMatch ) );
105 }
106 $text = wfMsg( "showlast", $fill, $bydate );
107 $wgOut->addHTML( "{$text}</p>\n<p>" );
108
109 $res = $dbr->query( $sql, "wfSpecialImagelist" );
110 while ( $s = $dbr->fetchObject( $res ) ) {
111 $name = $s->img_name;
112 $ut = $s->img_user_text;
113 if ( 0 == $s->img_user ) {
114 $ul = $ut;
115 } else {
116 $ul = $sk->makeLinkObj( Title::makeTitle( NS_USER, $ut ), $ut );
117 }
118
119 $ilink = "<a href=\"" . htmlspecialchars( Image::imageUrl( $name ) ) .
120 "\">" . strtr(htmlspecialchars( $name ), '_', ' ') . "</a>";
121
122 $nb = wfMsg( "nbytes", $wgLang->formatNum( $s->img_size ) );
123 $l = "(" .
124 $sk->makeKnownLinkObj( Title::makeTitle( NS_IMAGE, $name ),
125 wfMsg( "imgdesc" ) ) .
126 ") {$ilink} . . {$nb} . . {$ul} . . " .
127 $wgLang->timeanddate( $s->img_timestamp, true );
128
129 $l .= $sk->commentBlock( $s->img_description );
130 $wgOut->addHTML( "{$l}<br />\n" );
131 }
132 $wgOut->addHTML( "</p>" );
133 $dbr->freeResult( $res );
134 }
135
136 ?>