Switch some HTMLForms in special pages to OOUI
[lhc/web/wiklou.git] / includes / media / DjVu.php
1 <?php
2 /**
3 * Handler for DjVu images.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 * @ingroup Media
22 */
23
24 /**
25 * Handler for DjVu images
26 *
27 * @ingroup Media
28 */
29 class DjVuHandler extends ImageHandler {
30 const EXPENSIVE_SIZE_LIMIT = 10485760; // 10MiB
31
32 /**
33 * @return bool
34 */
35 function isEnabled() {
36 global $wgDjvuRenderer, $wgDjvuDump, $wgDjvuToXML;
37 if ( !$wgDjvuRenderer || ( !$wgDjvuDump && !$wgDjvuToXML ) ) {
38 wfDebug( "DjVu is disabled, please set \$wgDjvuRenderer and \$wgDjvuDump\n" );
39
40 return false;
41 } else {
42 return true;
43 }
44 }
45
46 /**
47 * @param File $file
48 * @return bool
49 */
50 function mustRender( $file ) {
51 return true;
52 }
53
54 /**
55 * True if creating thumbnails from the file is large or otherwise resource-intensive.
56 * @param File $file
57 * @return bool
58 */
59 public function isExpensiveToThumbnail( $file ) {
60 return $file->getSize() > static::EXPENSIVE_SIZE_LIMIT;
61 }
62
63 /**
64 * @param File $file
65 * @return bool
66 */
67 function isMultiPage( $file ) {
68 return true;
69 }
70
71 /**
72 * @return array
73 */
74 function getParamMap() {
75 return array(
76 'img_width' => 'width',
77 'img_page' => 'page',
78 );
79 }
80
81 /**
82 * @param string $name
83 * @param mixed $value
84 * @return bool
85 */
86 function validateParam( $name, $value ) {
87 if ( $name === 'page' && trim( $value ) !== (string)intval( $value ) ) {
88 // Extra junk on the end of page, probably actually a caption
89 // e.g. [[File:Foo.djvu|thumb|Page 3 of the document shows foo]]
90 return false;
91 }
92 if ( in_array( $name, array( 'width', 'height', 'page' ) ) ) {
93 if ( $value <= 0 ) {
94 return false;
95 } else {
96 return true;
97 }
98 } else {
99 return false;
100 }
101 }
102
103 /**
104 * @param array $params
105 * @return bool|string
106 */
107 function makeParamString( $params ) {
108 $page = isset( $params['page'] ) ? $params['page'] : 1;
109 if ( !isset( $params['width'] ) ) {
110 return false;
111 }
112
113 return "page{$page}-{$params['width']}px";
114 }
115
116 /**
117 * @param string $str
118 * @return array|bool
119 */
120 function parseParamString( $str ) {
121 $m = false;
122 if ( preg_match( '/^page(\d+)-(\d+)px$/', $str, $m ) ) {
123 return array( 'width' => $m[2], 'page' => $m[1] );
124 } else {
125 return false;
126 }
127 }
128
129 /**
130 * @param array $params
131 * @return array
132 */
133 function getScriptParams( $params ) {
134 return array(
135 'width' => $params['width'],
136 'page' => $params['page'],
137 );
138 }
139
140 /**
141 * @param File $image
142 * @param string $dstPath
143 * @param string $dstUrl
144 * @param array $params
145 * @param int $flags
146 * @return MediaTransformError|ThumbnailImage|TransformParameterError
147 */
148 function doTransform( $image, $dstPath, $dstUrl, $params, $flags = 0 ) {
149 global $wgDjvuRenderer, $wgDjvuPostProcessor;
150
151 if ( !$this->normaliseParams( $image, $params ) ) {
152 return new TransformParameterError( $params );
153 }
154 $width = $params['width'];
155 $height = $params['height'];
156 $page = $params['page'];
157
158 if ( $flags & self::TRANSFORM_LATER ) {
159 $params = array(
160 'width' => $width,
161 'height' => $height,
162 'page' => $page
163 );
164
165 return new ThumbnailImage( $image, $dstUrl, $dstPath, $params );
166 }
167
168 if ( !wfMkdirParents( dirname( $dstPath ), null, __METHOD__ ) ) {
169 return new MediaTransformError(
170 'thumbnail_error',
171 $width,
172 $height,
173 wfMessage( 'thumbnail_dest_directory' )->text()
174 );
175 }
176
177 // Get local copy source for shell scripts
178 // Thumbnail extraction is very inefficient for large files.
179 // Provide a way to pool count limit the number of downloaders.
180 if ( $image->getSize() >= 1e7 ) { // 10MB
181 $work = new PoolCounterWorkViaCallback( 'GetLocalFileCopy', sha1( $image->getName() ),
182 array(
183 'doWork' => function () use ( $image ) {
184 return $image->getLocalRefPath();
185 }
186 )
187 );
188 $srcPath = $work->execute();
189 } else {
190 $srcPath = $image->getLocalRefPath();
191 }
192
193 if ( $srcPath === false ) { // Failed to get local copy
194 wfDebugLog( 'thumbnail',
195 sprintf( 'Thumbnail failed on %s: could not get local copy of "%s"',
196 wfHostname(), $image->getName() ) );
197
198 return new MediaTransformError( 'thumbnail_error',
199 $params['width'], $params['height'],
200 wfMessage( 'filemissing' )->text()
201 );
202 }
203
204 # Use a subshell (brackets) to aggregate stderr from both pipeline commands
205 # before redirecting it to the overall stdout. This works in both Linux and Windows XP.
206 $cmd = '(' . wfEscapeShellArg(
207 $wgDjvuRenderer,
208 "-format=ppm",
209 "-page={$page}",
210 "-size={$params['physicalWidth']}x{$params['physicalHeight']}",
211 $srcPath );
212 if ( $wgDjvuPostProcessor ) {
213 $cmd .= " | {$wgDjvuPostProcessor}";
214 }
215 $cmd .= ' > ' . wfEscapeShellArg( $dstPath ) . ') 2>&1';
216 wfDebug( __METHOD__ . ": $cmd\n" );
217 $retval = '';
218 $err = wfShellExec( $cmd, $retval );
219
220 $removed = $this->removeBadFile( $dstPath, $retval );
221 if ( $retval != 0 || $removed ) {
222 $this->logErrorForExternalProcess( $retval, $err, $cmd );
223 return new MediaTransformError( 'thumbnail_error', $width, $height, $err );
224 } else {
225 $params = array(
226 'width' => $width,
227 'height' => $height,
228 'page' => $page
229 );
230
231 return new ThumbnailImage( $image, $dstUrl, $dstPath, $params );
232 }
233 }
234
235 /**
236 * Cache an instance of DjVuImage in an Image object, return that instance
237 *
238 * @param File $image
239 * @param string $path
240 * @return DjVuImage
241 */
242 function getDjVuImage( $image, $path ) {
243 if ( !$image ) {
244 $deja = new DjVuImage( $path );
245 } elseif ( !isset( $image->dejaImage ) ) {
246 $deja = $image->dejaImage = new DjVuImage( $path );
247 } else {
248 $deja = $image->dejaImage;
249 }
250
251 return $deja;
252 }
253
254 /**
255 * Get metadata, unserializing it if neccessary.
256 *
257 * @param File $file The DjVu file in question
258 * @return string XML metadata as a string.
259 * @throws MWException
260 */
261 private function getUnserializedMetadata( File $file ) {
262 $metadata = $file->getMetadata();
263 if ( substr( $metadata, 0, 3 ) === '<?xml' ) {
264 // Old style. Not serialized but instead just a raw string of XML.
265 return $metadata;
266 }
267
268 MediaWiki\suppressWarnings();
269 $unser = unserialize( $metadata );
270 MediaWiki\restoreWarnings();
271 if ( is_array( $unser ) ) {
272 if ( isset( $unser['error'] ) ) {
273 return false;
274 } elseif ( isset( $unser['xml'] ) ) {
275 return $unser['xml'];
276 } else {
277 // Should never ever reach here.
278 throw new MWException( "Error unserializing DjVu metadata." );
279 }
280 }
281
282 // unserialize failed. Guess it wasn't really serialized after all,
283 return $metadata;
284 }
285
286 /**
287 * Cache a document tree for the DjVu XML metadata
288 * @param File $image
289 * @param bool $gettext DOCUMENT (Default: false)
290 * @return bool|SimpleXMLElement
291 */
292 function getMetaTree( $image, $gettext = false ) {
293 if ( $gettext && isset( $image->djvuTextTree ) ) {
294 return $image->djvuTextTree;
295 }
296 if ( !$gettext && isset( $image->dejaMetaTree ) ) {
297 return $image->dejaMetaTree;
298 }
299
300 $metadata = $this->getUnserializedMetadata( $image );
301 if ( !$this->isMetadataValid( $image, $metadata ) ) {
302 wfDebug( "DjVu XML metadata is invalid or missing, should have been fixed in upgradeRow\n" );
303
304 return false;
305 }
306
307 MediaWiki\suppressWarnings();
308 try {
309 // Set to false rather than null to avoid further attempts
310 $image->dejaMetaTree = false;
311 $image->djvuTextTree = false;
312 $tree = new SimpleXMLElement( $metadata );
313 if ( $tree->getName() == 'mw-djvu' ) {
314 /** @var SimpleXMLElement $b */
315 foreach ( $tree->children() as $b ) {
316 if ( $b->getName() == 'DjVuTxt' ) {
317 // @todo File::djvuTextTree and File::dejaMetaTree are declared
318 // dynamically. Add a public File::$data to facilitate this?
319 $image->djvuTextTree = $b;
320 } elseif ( $b->getName() == 'DjVuXML' ) {
321 $image->dejaMetaTree = $b;
322 }
323 }
324 } else {
325 $image->dejaMetaTree = $tree;
326 }
327 } catch ( Exception $e ) {
328 wfDebug( "Bogus multipage XML metadata on '{$image->getName()}'\n" );
329 }
330 MediaWiki\restoreWarnings();
331 if ( $gettext ) {
332 return $image->djvuTextTree;
333 } else {
334 return $image->dejaMetaTree;
335 }
336 }
337
338 /**
339 * @param File $image
340 * @param string $path
341 * @return bool|array False on failure
342 */
343 function getImageSize( $image, $path ) {
344 return $this->getDjVuImage( $image, $path )->getImageSize();
345 }
346
347 function getThumbType( $ext, $mime, $params = null ) {
348 global $wgDjvuOutputExtension;
349 static $mime;
350 if ( !isset( $mime ) ) {
351 $magic = MimeMagic::singleton();
352 $mime = $magic->guessTypesForExtension( $wgDjvuOutputExtension );
353 }
354
355 return array( $wgDjvuOutputExtension, $mime );
356 }
357
358 function getMetadata( $image, $path ) {
359 wfDebug( "Getting DjVu metadata for $path\n" );
360
361 $xml = $this->getDjVuImage( $image, $path )->retrieveMetaData();
362 if ( $xml === false ) {
363 // Special value so that we don't repetitively try and decode a broken file.
364 return serialize( array( 'error' => 'Error extracting metadata' ) );
365 } else {
366 return serialize( array( 'xml' => $xml ) );
367 }
368 }
369
370 function getMetadataType( $image ) {
371 return 'djvuxml';
372 }
373
374 function isMetadataValid( $image, $metadata ) {
375 return !empty( $metadata ) && $metadata != serialize( array() );
376 }
377
378 function pageCount( $image ) {
379 global $wgMemc;
380
381 $key = wfMemcKey( 'file-djvu', 'pageCount', $image->getSha1() );
382
383 $count = $wgMemc->get( $key );
384 if ( $count === false ) {
385 $tree = $this->getMetaTree( $image );
386 if ( !$tree ) {
387 return false;
388 }
389 $count = count( $tree->xpath( '//OBJECT' ) );
390 $wgMemc->set( $key, $count );
391 }
392
393 return $count;
394 }
395
396 function getPageDimensions( $image, $page ) {
397 global $wgMemc;
398
399 $key = wfMemcKey( 'file-djvu', 'dimensions', $image->getSha1() );
400
401 $dimsByPage = $wgMemc->get( $key );
402 if ( !is_array( $dimsByPage ) ) {
403 $tree = $this->getMetaTree( $image );
404 if ( !$tree ) {
405 return false;
406 }
407
408 $dimsByPage = array();
409 $count = count( $tree->xpath( '//OBJECT' ) );
410 for ( $i = 0; $i < $count; ++$i ) {
411 $o = $tree->BODY[0]->OBJECT[$i];
412 if ( $o ) {
413 $dimsByPage[$i] = array(
414 'width' => (int)$o['width'],
415 'height' => (int)$o['height']
416 );
417 } else {
418 $dimsByPage[$i] = false;
419 }
420 }
421
422 $wgMemc->set( $key, $dimsByPage );
423 }
424
425 $index = $page - 1; // MW starts pages at 1
426
427 return isset( $dimsByPage[$index] ) ? $dimsByPage[$index] : false;
428 }
429
430 /**
431 * @param File $image
432 * @param int $page Page number to get information for
433 * @return bool|string Page text or false when no text found.
434 */
435 function getPageText( $image, $page ) {
436 $tree = $this->getMetaTree( $image, true );
437 if ( !$tree ) {
438 return false;
439 }
440
441 $o = $tree->BODY[0]->PAGE[$page - 1];
442 if ( $o ) {
443 $txt = $o['value'];
444
445 return $txt;
446 } else {
447 return false;
448 }
449 }
450 }