<?php

namespace SGalinski\Scriptmerger;

/***************************************************************
 *  Copyright notice
 *
 *  (c) Stefan Galinski <stefan@sgalinski.de>
 *  All rights reserved
 *
 *  This script is part of the TYPO3 project. The TYPO3 project 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.
 *
 *  The GNU General Public License can be found at
 *  http://www.gnu.org/copyleft/gpl.html.
 *
 *  This script 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.
 *
 *  This copyright notice MUST APPEAR in all copies of the script!
 ***************************************************************/

use JShrink\Minifier;
use TYPO3\CMS\Core\Utility\ExtensionManagementUtility;
use TYPO3\CMS\Core\Utility\GeneralUtility;

/**
 * This class contains the parsing and replacing functionality for javascript files
 */
class ScriptmergerJavascript extends ScriptmergerBase {
	/**
	 * holds the javascript code
	 *
	 * Structure:
	 * - $file
	 *   |-content => string
	 *   |-basename => string (base name of $file without file prefix)
	 *   |-minify-ignore => bool
	 *   |-merge-ignore => bool
	 *
	 * @var array
	 */
	protected $javascript = array();

	/**
	 * Controller for the processing of the javascript files.
	 *
	 * @return void
	 */
	public function process() {
		// fetch all javascript content
		$this->getFiles();

		// minify, compress and merging
		foreach ($this->javascript as $section => $javascriptBySection) {
			$mergedContent = '';
			$positionOfMergedFile = NULL;
			foreach ($javascriptBySection as $index => $javascriptProperties) {
				$newFile = '';

				// file should be minified
				if ($this->configuration['javascript.']['minify.']['enable'] === '1' &&
					!$javascriptProperties['minify-ignore']
				) {
					$newFile = $this->minifyFile($javascriptProperties);
				}

				// file should be merged
				if ($this->configuration['javascript.']['merge.']['enable'] === '1' &&
					!$javascriptProperties['merge-ignore']
				) {
					if ($positionOfMergedFile === NULL) {
						$positionOfMergedFile = $javascriptProperties['position-key'];
					}

					$mergedContent .= $javascriptProperties['content'] . LF;
					unset($this->javascript[$section][$index]);
					continue;
				}

				// file should be compressed instead?
				if ($this->configuration['javascript.']['compress.']['enable'] === '1' &&
					function_exists('gzcompress') && !$javascriptProperties['compress-ignore']
				) {
					$newFile = $this->compressFile($javascriptProperties);
				}

				// minification or compression was used
				if ($newFile !== '') {
					$this->javascript[$section][$index]['file'] = $newFile;
					$this->javascript[$section][$index]['content'] =
						$javascriptProperties['content'];
					$this->javascript[$section][$index]['basename'] =
						$javascriptProperties['basename'];
				}
			}

			// save merged content inside a new file
			if ($this->configuration['javascript.']['merge.']['enable'] === '1' && $mergedContent !== '') {
				// create property array
				$properties = array(
					'content' => $mergedContent,
					'basename' => $section . '-' . md5($mergedContent) . '.merged'
				);

				// write merged file in any case
				$newFile = $this->tempDirectories['merged'] . $properties['basename'] . '.js';
				if (!file_exists($newFile)) {
					$this->writeFile($newFile, $properties['content']);
				}

				// file should be compressed
				if ($this->configuration['javascript.']['compress.']['enable'] === '1' &&
					function_exists('gzcompress')
				) {
					$newFile = $this->compressFile($properties);
				}

				// add new entry
				$this->javascript[$section][] = array(
					'file' => $newFile,
					'content' => $properties['content'],
					'basename' => $properties['basename'],
					'position-key' => $positionOfMergedFile,
				);
			}
		}

		// write javascript content back to the document
		$this->writeToDocument();
	}

	/**
	 * This method parses the output content and saves any found javascript files or inline code
	 * into the "javascript" class property. The output content is cleaned up of the found results.
	 *
	 * @return array js files
	 */
	protected function getFiles() {
		// init
		$javascriptTags = array(
			'head' => array(),
			'body' => array()
		);

		// create search pattern
		$searchScriptsPattern = '/' .
			'<script' . // This expression includes any script nodes.
			'(?=.+?(?:src="(.*?)"|>))' . // It fetches the src attribute.
			'(?=.+?(?:data-ignore="(.*?)"|>))' . // and the data-ignore attribute of the tag.
			'[^>]*?>' . // Finally we finish the parsing of the opening tag
			'.*?<\/script>\s*' . // until the closing tag.
			'/is';

		// filter pattern for the inDoc scripts (fetches the content)
		$filterInDocumentPattern = '/' .
			'<script.*?>' . // The expression removes the opening script tag
			'(?:.*?\/\*<!\[CDATA\[\*\/)?' . // and the optionally prefixed CDATA string.
			'(?:.*?<!--)?' . // senseless <!-- construct
			'\s*(.*?)' . // We save the pure js content,
			'(?:\s*\/\/\s*-->)?' . // senseless <!-- construct
			'(?:\s*\/\*\]\]>\*\/)?' . // remove the possible closing CDATA string
			'\s*<\/script>' . // and closing script tag
			'/is';

		// parse scripts in the head
		$head = array();
		preg_match('/<head>.+?<\/head>/is', $GLOBALS['TSFE']->content, $head);
		$head = $oldHead = $head[0];

		preg_match_all($searchScriptsPattern, $head, $javascriptTags['head']);
		$amountOfScriptTags = count($javascriptTags['head'][0]);
		if ($amountOfScriptTags) {
			$function = create_function('', 'static $i = 0; return \'###MERGER-head\' . $i++ . \'MERGER###\';');
			$head = preg_replace_callback($searchScriptsPattern, $function, $head, $amountOfScriptTags);
			$GLOBALS['TSFE']->content = str_replace($oldHead, $head, $GLOBALS['TSFE']->content);
		}

		// parse scripts in the body
		if ($this->configuration['javascript.']['parseBody'] === '1') {
			$body = array();
			preg_match('/<body.*>.+?<\/body>/is', $GLOBALS['TSFE']->content, $body);
			$body = $oldBody = $body[0];

			preg_match_all($searchScriptsPattern, $body, $javascriptTags['body']);
			$amountOfScriptTags = count($javascriptTags['body'][0]);
			if ($amountOfScriptTags) {
				$function = create_function('', 'static $i = 0; return \'###MERGER-body\' . $i++ . \'MERGER###\';');
				$body = preg_replace_callback($searchScriptsPattern, $function, $body, $amountOfScriptTags);
				$GLOBALS['TSFE']->content = str_replace($oldBody, $body, $GLOBALS['TSFE']->content);
			}
		}

		foreach ($javascriptTags as $section => $results) {
			$amountOfResults = count($results[0]);
			for ($i = 0; $i < $amountOfResults; ++$i) {
				// get source attribute
				$source = trim($results[1][$i]);
				$isSourceFromMainAttribute = FALSE;
				if ($source !== '') {
					preg_match('/^<script([^>]*)>/', trim($results[0][$i]), $scriptAttribute);
					$isSourceFromMainAttribute = (strpos($scriptAttribute[1], $source) !== FALSE);
				}
				$ignoreDataFlagSet = intval($results[2][$i]);

				// add basic entry
				$this->javascript[$section][$i]['minify-ignore'] = FALSE;
				$this->javascript[$section][$i]['compress-ignore'] = FALSE;
				$this->javascript[$section][$i]['merge-ignore'] = FALSE;
				$this->javascript[$section][$i]['addInDocument'] = FALSE;
				$this->javascript[$section][$i]['useOriginalCodeLine'] = FALSE;
				$this->javascript[$section][$i]['file'] = $source;
				$this->javascript[$section][$i]['content'] = '';
				$this->javascript[$section][$i]['basename'] = '';
				$this->javascript[$section][$i]['position-key'] = $i;
				$this->javascript[$section][$i]['original'] = $results[0][$i];

				if ($isSourceFromMainAttribute) {
					// try to fetch the content of the css file
					$file = $source;
					if ($GLOBALS['TSFE']->absRefPrefix !== '' && strpos($file, $GLOBALS['TSFE']->absRefPrefix) === 0) {
						$file = substr($file, strlen($GLOBALS['TSFE']->absRefPrefix) - 1);
					}
					$file = PATH_site . $file;

					if (file_exists($file)) {
						$content = file_get_contents($file);
					} else {
						$content = $this->getExternalFile($source, TRUE);
					}

					// ignore this file if the content could not be fetched
					if (trim($content) === '' || $ignoreDataFlagSet) {
						$this->javascript[$section][$i]['minify-ignore'] = TRUE;
						$this->javascript[$section][$i]['compress-ignore'] = TRUE;
						$this->javascript[$section][$i]['merge-ignore'] = TRUE;
						$this->javascript[$section][$i]['useOriginalCodeLine'] = TRUE;
						continue;
					}

					// check if the file should be ignored for some processes
					$amountOfIgnores = 0;
					if ($this->configuration['javascript.']['minify.']['ignore'] !== '' &&
						preg_match($this->configuration['javascript.']['minify.']['ignore'], $source)
					) {
						$this->javascript[$section][$i]['minify-ignore'] = TRUE;
						++$amountOfIgnores;
					}

					if ($this->configuration['javascript.']['compress.']['ignore'] !== '' &&
						preg_match($this->configuration['javascript.']['compress.']['ignore'], $source)
					) {
						$this->javascript[$section][$i]['compress-ignore'] = TRUE;
						++$amountOfIgnores;
					}

					if ($this->configuration['javascript.']['merge.']['ignore'] !== '' &&
						preg_match($this->configuration['javascript.']['merge.']['ignore'], $source)
					) {
						$this->javascript[$section][$i]['merge-ignore'] = TRUE;
						++$amountOfIgnores;
					}

					if ($amountOfIgnores === 3) {
						$this->javascript[$section][$i]['useOriginalCodeLine'] = TRUE;
					}

					// set the javascript file with it's content
					$this->javascript[$section][$i]['file'] = $source;
					$this->javascript[$section][$i]['content'] = $content;

					// get base name for later usage
					// base name without file prefix and prefixed hash of the content
					$filename = basename($source);
					$hash = md5($content);
					$this->javascript[$section][$i]['basename'] =
						substr($filename, 0, strrpos($filename, '.')) . '-' . $hash;

				} else {
					// scripts which are added inside the document must be parsed again
					// to fetch the pure js code
					$javascriptContent = array();
					preg_match_all($filterInDocumentPattern, $results[0][$i], $javascriptContent);

					// we doesn't need to continue if it was an empty script tag
					if ($javascriptContent[1][0] === '') {
						unset($this->javascript[$section][$i]);
						continue;
					}

					$doNotRemoveinDocInBody =
						($this->configuration['javascript.']['doNotRemoveInDocInBody'] === '1' && $section === 'body');
					$doNotRemoveinDocInHead =
						($this->configuration['javascript.']['doNotRemoveInDocInHead'] === '1' && $section === 'head');
					if ($doNotRemoveinDocInHead || $doNotRemoveinDocInBody || $ignoreDataFlagSet) {
						$this->javascript[$section][$i]['minify-ignore'] = TRUE;
						$this->javascript[$section][$i]['compress-ignore'] = TRUE;
						$this->javascript[$section][$i]['merge-ignore'] = TRUE;
						$this->javascript[$section][$i]['useOriginalCodeLine'] = TRUE;
						$this->javascript[$section][$i]['addInDocument'] = TRUE;
						$this->javascript[$section][$i]['content'] = $javascriptContent[1][0];
						continue;
					}

					// save the content into a temporary file
					$hash = md5($javascriptContent[1][0]);
					$source = $this->tempDirectories['temp'] . 'inDocument-' . $hash;

					if (!file_exists($source . '.js')) {
						$this->writeFile($source . '.js', $javascriptContent[1][0]);
					}

					$this->javascript[$section][$i]['file'] = $source . '.js';
					$this->javascript[$section][$i]['content'] = $javascriptContent[1][0];
					$this->javascript[$section][$i]['basename'] = basename($source);
				}
			}
		}
	}

	/**
	 * This method minifies a javascript file. It's based upon the JSMin+ class
	 * of the project minify. Alternatively the old JSMin class can be used, but it's
	 * definitely not the preferred solution!
	 *
	 * @param array $properties properties of an entry (copy-by-reference is used!)
	 * @return string new filename
	 */
	protected function minifyFile(&$properties) {
		// stop further processing if the file already exists
		$newFile = $this->tempDirectories['minified'] . $properties['basename'] . '.min.js';
		if (file_exists($newFile)) {
			$properties['basename'] .= '.min';
			$properties['content'] = file_get_contents($newFile);
			return $newFile;
		}

		// check for conditional compilation code to fix an issue with jsmin+
		$hasConditionalCompilation = FALSE;
		if ($this->configuration['javascript.']['minify.']['useJSMinPlus'] === '1') {
			$hasConditionalCompilation = preg_match('/\/\*@cc_on/is', $properties['content']);
		}

		// minify content (the ending semicolon must be added to prevent minimisation bugs)
		$hasErrors = FALSE;
		$minifiedContent = '';
		try {
			if (!$hasConditionalCompilation && $this->configuration['javascript.']['minify.']['useJShrink'] === '1') {
				if (!class_exists('JShrink\Minifier', FALSE)) {
					require_once(ExtensionManagementUtility::extPath('scriptmerger') . 'Resources/JShrink/Minifier.php');
				}

				$minifiedContent =  Minifier::minify($properties['content']);
			} elseif (!$hasConditionalCompilation && $this->configuration['javascript.']['minify.']['useJSMinPlus'] === '1') {
				if (!class_exists('JSMinPlus', FALSE)) {
					require_once(ExtensionManagementUtility::extPath('scriptmerger') . 'Resources/jsminplus.php');
				}

				$minifiedContent = \JSMinPlus::minify($properties['content']);

			} else {
				if (!class_exists('JSMin', FALSE)) {
					require_once(ExtensionManagementUtility::extPath('scriptmerger') . 'Resources/jsmin.php');
				}

				/** @noinspection PhpUndefinedClassInspection */
				$minifiedContent = \JSMin::minify($properties['content']);
			}
		} catch (\Exception $exception) {
			$hasErrors = TRUE;
		}

		// check if the minified content has more than two characters or more than 50 lines and no errors occurred
		if (!$hasErrors && (strlen($minifiedContent) > 2 || count(explode(LF, $minifiedContent)) > 50)) {
			$properties['content'] = $minifiedContent . ';';
		} else {
			$message = 'This javascript file could not be minified: "' . $properties['file'] . '"! ' .
				'You should exclude it from the minification process!';
			GeneralUtility::sysLog($message, 'scriptmerger', GeneralUtility::SYSLOG_SEVERITY_ERROR);
		}

		$this->writeFile($newFile, $properties['content']);
		$properties['basename'] .= '.min';

		return $newFile;
	}

	/**
	 * This method compresses a javascript file.
	 *
	 * @param array $properties properties of an entry (copy-by-reference is used!)
	 * @return string new filename
	 */
	protected function compressFile(&$properties) {
		$newFile = $this->tempDirectories['compressed'] . $properties['basename'] . '.gz.js';
		if (file_exists($newFile)) {
			return $newFile;
		}

		$this->writeFile($newFile, gzencode($properties['content'], 5));

		return $newFile;
	}

	/**
	 * This method writes the javascript back to the document.
	 *
	 * @return void
	 */
	protected function writeToDocument() {
		$shouldBeAddedInDoc = $this->configuration['javascript.']['addContentInDocument'] === '1';
		foreach ($this->javascript as $section => $javascriptBySection) {
			ksort($javascriptBySection);
			if (!is_array($javascriptBySection)) {
				continue;
			}

			// addBeforeBody was deprecated in version 4.0.0 and can be removed later on
			$pattern = '';
			if ($section === 'body' || $this->configuration['javascript.']['addBeforeBody'] === '1') {
				$pattern = '/' . preg_quote($this->configuration['javascript.']['mergedBodyFilePosition'], '/') . '/i';
			} elseif (trim($this->configuration['javascript.']['mergedHeadFilePosition']) !== '') {
				$pattern = '/' . preg_quote($this->configuration['javascript.']['mergedHeadFilePosition'], '/') . '/i';
			}

			foreach ($javascriptBySection as $javascriptProperties) {
				if ($javascriptProperties['useOriginalCodeLine']) {
					$content = $javascriptProperties['original'];
				} elseif ($javascriptProperties['addInDocument'] || $shouldBeAddedInDoc) {
					$content = "\t" .
						'<script type="text/javascript">' . LF .
						"\t" . '/* <![CDATA[ */' . LF .
						"\t" . $javascriptProperties['content'] . LF .
						"\t" . '/* ]]> */' . LF .
						"\t" . '</script>' . LF;
				} else {
					$file = $javascriptProperties['file'];
					if (file_exists($file)) {
						$file = $GLOBALS['TSFE']->absRefPrefix .
							(PATH_site === '/' ? $file : str_replace(PATH_site, '', $file));
					}

					if ($this->configuration['javascript.']['deferLoading'] === '1') {
						$content = '
	<script type="text/javascript" defer="defer">
		function downloadJSAtOnload() {
			var element = document.createElement("script");
			element.src = "' . $file . '";
			document.body.appendChild(element);
		}

		if (window.addEventListener) {
			window.addEventListener("load", downloadJSAtOnload, false);
		} else if (window.attachEvent) {
			window.attachEvent("onload", downloadJSAtOnload);
		} else {
			window.onload = downloadJSAtOnload;
		}
</script>';
					} else {
						$content = "\t" .
							'<script type="text/javascript" src="' . $file . '"></script>' . LF;
					}
				}

				if ($pattern === '' || $javascriptProperties['merge-ignore']) {
					// add body scripts back to their original place if they were ignored
					$GLOBALS['TSFE']->content = str_replace(
						'###MERGER-' . $section . $javascriptProperties['position-key'] . 'MERGER###',
						$content,
						$GLOBALS['TSFE']->content
					);
				} else {
					$GLOBALS['TSFE']->content = preg_replace($pattern, $content . '\0', $GLOBALS['TSFE']->content, 1);
				}
			}
		}

		// remove any empty markers
		$pattern = '/###MERGER-(head|body)[0-9]*?MERGER###/is';
		$GLOBALS['TSFE']->content = preg_replace($pattern, '', $GLOBALS['TSFE']->content);
	}
}

?>