<?php
/**
 * @license GPL-2.0-only
 *
 * Modified by academylms using {@see https://github.com/BrianHenryIE/strauss}.
 */

namespace Academy\Mpdf\Css;

class InlineStyleParser
{
	/**
	 * @var NormalizeProperties
	 */
	private $normalizeProperties;

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

	/**
	 * Parse inline CSS style attribute.
	 *
	 * Parses a CSS string from an HTML style attribute and returns
	 * an array of CSS properties.
	 *
	 * @param string $html CSS string from style attribute
	 * @return array Parsed CSS properties
	 */
	public function parse($html)
	{
		$html = htmlspecialchars_decode($html); // mPDF 5.7.4 URLs
		// mPDF 5.7.4 URLs
		// Characters "(", ")", and ";" in url() e.g. background-image, cause problems parsing the CSS string
		// URLencode ( and ), but change ";" to a code which can be converted back after parsing (so as not to confuse ;
		// with a segment delimiter in the URI)
		$html = $this->processUrlsInCss($html);

		// Fix incomplete CSS code
		$size = strlen($html) - 1;
		if (substr($html, $size, 1) !== ';') {
			$html .= ';';
		}

		// Make CSS[Name-of-the-class] = array(key => value)
		$regexp = '|\\s*?(\\S+?):(.+?);|i';
		preg_match_all($regexp, $html, $styleinfo);
		$properties = $styleinfo[1];
		$values = $styleinfo[2];

		// Array-properties and Array-values must have the SAME SIZE!
		$classproperties = [];
		$properties_count = count($properties);
		for ($i = 0; $i < $properties_count; $i++) {

			// Ignores -webkit-gradient so doesn't override -moz-
			if ((strtoupper($properties[$i]) === 'BACKGROUND-IMAGE' || strtoupper($properties[$i]) === 'BACKGROUND') && false !== stripos($values[$i], '-webkit-gradient')) {
				continue;
			}

			$values[$i] = str_replace('%ZZ', ';', $values[$i]); // mPDF 5.7.4 URLs
			$classproperties[strtoupper($properties[$i])] = trim($values[$i]);
		}

		return $this->normalizeProperties->normalize($classproperties);
	}

	/**
	 * Process URLs in CSS strings by encoding special characters.
	 *
	 * Characters "(", ")", and ";" in url() can cause problems parsing CSS.
	 * This method URLencodes ( and ), and temporarily encodes ";" to prevent
	 * confusion with CSS segment delimiters.
	 *
	 * @param string $css CSS string containing url() references
	 * @return string CSS string with processed URLs
	 */
	public function processUrlsInCss($css)
	{
		if (strpos($css, 'url(') === false) {
			return $css;
		}

		// Process urls with double quotes
		preg_match_all('/url\(\"(.*?)\"\)/', $css, $m);
		foreach ($m[1] as $i => $url) {
			$tmp = str_replace(['(', ')', ';'], ['%28', '%29', '%ZZ'], $m[1][$i]);
			$css = str_replace($m[0][$i], 'url(\'' . $tmp . '\')', $css);
		}

		// Process urls with single quotes
		preg_match_all('/url\(\'(.*?)\'\)/', $css, $m);
		foreach ($m[1] as $i => $url) {
			$tmp = str_replace(['(', ')', ';'], ['%28', '%29', '%ZZ'], $m[1][$i]);
			$css = str_replace($m[0][$i], 'url(\'' . $tmp . '\')', $css);
		}

		// Process urls without quotes
		preg_match_all('/url\(([^\'\"].*?[^\'\"])\)/', $css, $m);
		foreach ($m[1] as $i => $url) {
			$tmp = str_replace(['(', ')', ';'], ['%28', '%29', '%ZZ'], $m[1][$i]);
			$css = str_replace($m[0][$i], 'url(\'' . $tmp . '\')', $css);
		}

		return $css;
	}
}
