plugin/mediathumbnails/syntax.php

<?php
/**
 * DokuWiki Plugin mediathumbnails (Syntax Component)
 *
 * @license GPL 2 http://www.gnu.org/licenses/gpl-2.0.html
 * @author  Thomas Schäfer <thomas.schaefer@itschert.net>
 */

// must be run within Dokuwiki
if (!defined('DOKU_INC')) {
    die();
}

class syntax_plugin_mediathumbnails extends DokuWiki_Syntax_Plugin {

	/**
     * @return string Syntax mode type
     */
    public function getType()
    {
        return 'substition';
    }

    /**
     * @return string Paragraph type
     */
    public function getPType()
    {
        return 'normal';
    }

    /**
     * @return int Sort order - Low numbers go before high numbers
     */
    public function getSort()
    {
        return 1;
    }

    /**
     * Connect lookup pattern to lexer.
     *
     * @param string $mode Parser mode
     */
    public function connectTo($mode)
    {
		$this->Lexer->addSpecialPattern("{{thumbnail>.+?}}", $mode, substr(get_class($this), 7));
	}

    /**
     * Handle matches of the mediathumbnails syntax
     *
     * @param string       $match   The match of the syntax
     * @param int          $state   The state of the handler
     * @param int          $pos     The position in the document
     * @param Doku_Handler $handler The handler
     *
     * @return array Data for the renderer
     */
    public function handle($match, $state, $pos, Doku_Handler $handler)
    {
		// Locate the given media file and check if it can be opened as zip
		$mediapath_file = substr($match, 12, -2); //strip markup

		$thumb = new thumbnail($mediapath_file,$this);
		if ($thumb->create()) {
			return array($mediapath_file,$thumb->getMediapath());
		}

		return array($mediapath_file);
    }

    /**
     * Render xhtml output or metadata
     *
     * @param string        $mode     Renderer mode (supported modes: xhtml)
     * @param Doku_Renderer $renderer The renderer
     * @param array         $data     The data from the handler() function
     *
     * @return bool If rendering was successful.
     */
    public function render($mode, Doku_Renderer $renderer, $data)
    {
		list ($mediapath_file, $mediapath_thumbnail) = $data;

        if ($mode == 'xhtml') {

			// check if a thumbnail file was found
			if (!$mediapath_thumbnail) {
				if ($this->getConf('show_missing_thumb_error')) {
					$renderer->doc .= trim($this->getConf('no_thumb_error_message')) . " " . $mediapath_file;
					return true;
				} else {
					return false;
				}
			}

			$src = ml($mediapath_thumbnail,array());

			$i             = array();
			$i['width']    = $this->getConf('thumb_max_dimension'); //TODO: ausrichtung herausrechnen!
			//$i['height']   = '';
			$i['title']      = $mediapath_file;
			$i['class']    = 'tn';
			$iatt = buildAttributes($i);

			$renderer->doc .= 	($this->getConf('link_to_media_file') ? '<a href="/lib/exe/fetch.php?media=' . $mediapath_file . '">' : '') .
								'<img src="'.$src.'" '.$iatt.' />' .
								($this->getConf('link_to_media_file') ? '</a>' : '');
            return true;

        } elseif ($mode == 'odt') {

			// TODO: yet to implement
			$renderer->cdata("");
			return true;

		}

        return false;
    }
}

function getFileSuffix(string $file) {
	return substr(strrchr($file,'.'),1);
}

class thumbnail {

	private $source_filepath;
	private $source_mediapath;
	private ?thumb_engine $thumb_engine = null;
	private int $max_dimension;

	private static $formats;
	private static ?bool $pdf_support = null;
	private static ?bool $image_support = null;
	private static ?bool $no_ghostscript_support = null;

	private static function testDependencies() {
		// TODO: move support tests to a Singleton
		self::$image_support = false;
		self::$pdf_support = false;
		self::$no_ghostscript_support = false;
		if (class_exists ("Imagick")) {
			// determine file formats supported by ImageMagick
			self::$formats = \Imagick::queryformats();

			if (count(self::$formats) > 0) {
				self::$image_support = true;
				if (in_array("PDF", self::$formats)) {
					// Check if GhostScript will answer!
					try {
						// blank.pdf is an empty reference PDF file to test if GhostScript will react upon loading the file into ImageMagick
						$im = new imagick(realpath("lib/plugins/mediathumbnails/blank.pdf")."[0]");
						$im->clear();
						$im->destroy();
						self::$pdf_support = true;
					} catch (ImagickException $e) {
						if (strpos($e,"PDFDelegateFailed") !== false) {
							self::$no_ghostscript_support = true;
						}
						self::$pdf_support = false;
					}

				}
			}

		}
	}
	public static function supportsPDF() {
		if (self::$pdf_support === null) {
			self::testDependencies();
		}
		return self::$pdf_support;
	}
	public static function supportsImages() {
		if (self::$image_support === null) {
			self::testDependencies();
		}
		return self::$image_support;
	}
	public static function ghostScriptFailed() {
		if (self::$no_ghostscript_support === null) {
			self::testDependencies();
		}
		return self::$no_ghostscript_support;
	}

	public function __construct(string $source_filepath, DokuWiki_Syntax_Plugin $plugin, bool $ismediapath = true) {

		if ($ismediapath) {
			$this->source_mediapath = $source_filepath;
			$this->source_filepath = mediaFN($source_filepath);
		} else {
			$this->source_mediapath = false;
			$this->source_filepath = $source_filepath;
		}

		$this->max_dimension = $plugin->getConf('thumb_max_dimension');

		// Now attach the correct thumb_engine for the file type of the source file
		//TODO: check for extension "fileinfo", then check for MIME type: if (mime_content_type($filepath_local_file) == "application/pdf") {
		$sourceFileSuffix = getFileSuffix($this->source_filepath);
		if ($sourceFileSuffix == "pdf") {
			// file suffix is pdf, so assume it's a PDF file
			if (self::supportsPDF()) {
				$this->thumb_engine = new thumb_pdf_engine($this);
			} else {
				if (self::ghostScriptFailed()) {
					dbg("plugin mediathumbnails: PDF files are supported, but not on this system.\nMost likely, ImageMagick and its PHP extension imagick are installed properly, but GhostScript is not.\nPlease refer to the plugin documentation for a description of the dependencies.");
				} else {
					dbg("plugin mediathumbnails: PDF files are supported, but not on this system.\nMost likely, ImageMagick or its PHP extension imagick are not installed properly.\nPlease refer to the plugin documentation for a description of the dependencies.");
				}
			}
		} else if (self::supportsImages() && in_array(strtoupper($sourceFileSuffix), self::$formats)) {
			// file suffix is in support list of ImageMagick
			$this->thumb_engine = new thumb_img_engine($this);
		} else if (!self::supportsImages()) {
			dbg("plugin mediathumbnails: Image files are supported, but not on this system.\nPlease refer to the plugin documentation for a description of the dependencies.");
		} else {
			// last resort: check if the source file is a ZIP file and look for thumbnails, therein
			$this->thumb_engine = new thumb_zip_engine($this,$plugin->getConf('thumb_paths'));
		}
	}

	public function getMaxDimension() {
		return $this->max_dimension;
	}

	public function create() {
		if (!$this->thumb_engine) {
			return false;
		}

		return $this->thumb_engine->act();
	}

	public function getSourceFilepath() {
		return $this->source_filepath;
	}

	protected function getFilename() {

		return basename($this->source_filepath) . ".thumb".$this->max_dimension.".".$this->thumb_engine->getFileSuffix();
	}

	public function getFilepath() {
		return dirname($this->source_filepath) . DIRECTORY_SEPARATOR . $this->getFilename();
	}

	public function getMediapath() {
		if ($this->source_mediapath !== false) {
			return substr($this->source_mediapath,0,strrpos($this->source_mediapath,':')) . ":" . $this->getFilename();
		} else {
			return false;
		}
	}

	public function getTimestamp() {
		return file_exists($this->getFilepath()) ? filemtime($this->getFilepath()) : false;
	}
}

abstract class thumb_engine {

	private ?thumbnail $thumbnail = null;

	public function __construct(thumbnail $thumbnail) {
		$this->thumbnail = $thumbnail;
	}

	protected function getSourceFilepath() {
		return $this->thumbnail->getSourceFilepath();
	}

	protected function getTargetFilepath() {
		return $this->thumbnail->getFilepath();
	}

	protected function getTargetMaxDimension() {
		return $this->thumbnail->getMaxDimension();
	}

	public function act() {
		if ($this->act_internal()) {
			// Set timestamp to the source file's timestamp (this is used to check in later passes if the file already exists in the correct version).
			if (filemtime($this->getSourceFilepath()) !== filemtime($this->getTargetFilepath())) {
				touch($this->getTargetFilepath(), filemtime($this->getSourceFilepath()));
			}
			return true;
		}
		return false;
	}

	// Checks if a thumbnail file for the current file version has already been created
	protected function thumb_needs_update() {
		return !file_exists($this->getTargetFilepath()) || filemtime($this->getTargetFilepath()) !== filemtime($this->getSourceFilepath());
	}

	public abstract function act_internal();

	public abstract function getFileSuffix();
}

class thumb_pdf_engine extends thumb_engine {

	public function getFileSuffix() {
		return "jpg";
	}

	public function act_internal() {
		if ($this->thumb_needs_update()) {
			$im = new imagick($this->getSourceFilepath()."[0]");
			$im->setImageColorspace(255);
			$im->setResolution(300, 300);
			$im->setCompressionQuality(95);
			$im->setImageFormat('jpeg');
			//$im->resizeImage($this->getTargetMaxDimension(),0,imagick::FILTER_LANCZOS,0.9);
			//$im->thumbnailImage($this->getTargetMaxDimension(),$this->getTargetMaxDimension(),true,false);
			$im->writeImage($this->getTargetFilepath());
			$im->clear();
			$im->destroy();

			// unfortunately, resizeImage or thumbnailImage leads to a black thumbnail in my setup, so I reopen the file and resize it now.
			$im = new imagick($this->getTargetFilepath());
			$im->thumbnailImage($this->getTargetMaxDimension(),$this->getTargetMaxDimension(),true,false);
			$im->writeImage($this->getTargetFilepath());
			$im->clear();
			$im->destroy();

			return true;
		} else {
			return true;
		}
	}
}

class thumb_img_engine extends thumb_engine {

	public function getFileSuffix() {
		return getFileSuffix($this->getSourceFilepath());
	}

	public function act_internal() {
		if ($this->thumb_needs_update()) {
			$im = new imagick( $this->getSourceFilepath() );
			$im->thumbnailImage($this->getTargetMaxDimension(),$this->getTargetMaxDimension(),true,false);
			$im->writeImage($this->getTargetFilepath());
			$im->clear();
			$im->destroy();

			return true;
		} else {
			return true;
		}
	}
}

class thumb_zip_engine extends thumb_engine {

	private array $thumb_paths;
	private $file_suffix = "";

	public function __construct(thumbnail $thumbnail, array $thumb_paths) {
		parent::__construct($thumbnail);
		$this->thumb_paths = $thumb_paths;
	}

	public function getFileSuffix() {
		return $this->file_suffix;
	}

	public function act_internal() {

		$zip = new ZipArchive;
		if ($zip->open($this->getSourceFilepath()) !== true) {
			// file is no zip or cannot be opened
			return false;
		}

		// The media file exists and acts as a zip file!

		// Check all possible paths (configured in configuration key 'thumb_paths') if there is a file available
		foreach($this->thumb_paths as $thumbnail_path) {
			$this->file_suffix = substr(strrchr($thumbnail_path,'.'),1);

			if ($zip->locateName($thumbnail_path) !== false) {

				if (!$this->thumb_needs_update()) {
					return true;
				}

				// Get the thumbnail file!
				$fp = $zip->getStream($thumbnail_path);
				if(!$fp) {
					return false;
				}

				$thumbnaildata = '';
				while (!feof($fp)) {
					$thumbnaildata .= fread($fp, 8192);
				}

				fclose($fp);

				// Write thumbnail file to media folder
				file_put_contents($this->getTargetFilepath(), $thumbnaildata);

				return true;
			}
		}

		return true;
	}
}