/*
 * Copyright 2018 Gildas Lormeau
 * contact : gildas.lormeau <at> gmail.com
 * 
 * This file is part of SingleFile.
 *
 *   SingleFile is free software: you can redistribute it and/or modify
 *   it under the terms of the GNU Lesser General Public License as published by
 *   the Free Software Foundation, either version 3 of the License, or
 *   (at your option) any later version.
 *
 *   SingleFile 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 Lesser General Public License for more details.
 *
 *   You should have received a copy of the GNU Lesser General Public License
 *   along with SingleFile.  If not, see <http://www.gnu.org/licenses/>.
 */

/* global CSSRule, docHelper, cssWhat, lazyLoader */

this.imagesMinifier = this.imagesMinifier || (() => {

	const DEBUG = false;
	const SVG_NS = "http://www.w3.org/2000/svg";
	const PREFIX_DATA_URI_IMAGE_SVG = "data:image/svg+xml";
	const SINGLE_FILE_IMAGE_ATTRIBUTE = "single-file-ref";
	const IGNORED_ATTRIBUTES = ["src", "viewBox", "preserveAspectRatio", "xlink:href", "title", "class", "style"];
	const SINGLE_FILE_SELECTOR = {
		type: "attribute",
		action: "exists",
		ignoreCase: false,
		name: SINGLE_FILE_IMAGE_ATTRIBUTE,
		value: ""
	};

	return {
		process: (doc, mediaAllInfo, options) => {
			const matchedImageSelectors = new Map();
			getImageRuleInfos(mediaAllInfo, matchedImageSelectors);
			const imageGroups = getImageGroups(doc);
			let duplicates = new Set();
			const duplicateURLs = [];
			imageGroups.forEach((elements, src) => {
				if (elements.length > 1 && src && src != doc.baseURI) {
					elements.forEach(element => duplicates.add(element));
					duplicateURLs.push(src);
				}
			});
			if (duplicateURLs.length) {
				processStyleSheets(doc, duplicates, mediaAllInfo, matchedImageSelectors);
				processImages(doc, duplicates, duplicateURLs, options);
			}
		},
		postProcess(doc) {
			doc.querySelectorAll("svg[" + SINGLE_FILE_IMAGE_ATTRIBUTE + "]").forEach(svgElement => {
				const useElement = svgElement.childNodes[0];
				if (useElement) {
					const refImageId = useElement.getAttribute("xlink:href").substring(1);
					if (refImageId) {
						const refImageElement = doc.getElementById(refImageId);
						if (refImageElement && refImageElement.getAttribute("xlink:href").startsWith(PREFIX_DATA_URI_IMAGE_SVG)) {
							svgElement.removeAttributeNS(SVG_NS, "preserveAspectRatio");
						}
					}
				}
			});
		}
	};

	function getImageRuleInfos(parentMediaInfo, matchedImageSelectors) {
		parentMediaInfo.elements.forEach((elementInfo, element) => {
			const tagName = element.tagName.toLowerCase();
			if (tagName == "img" || tagName == "svg") {
				elementInfo.forEach(selectorInfo => {
					if (selectorInfo.selector) {
						const selectors = matchedImageSelectors.get(selectorInfo.ruleInfo.cssRule.selectorText) || JSON.parse(JSON.stringify(selectorInfo.ruleInfo.selectors));
						const selectorIndex = selectorInfo.ruleInfo.selectors.indexOf(selectorInfo.selector);
						if (selectorIndex != -1 && !selectors[selectorIndex].transformed) {
							let selector = JSON.parse(JSON.stringify(selectorInfo.selector));
							selector.push({
								type: "pseudo",
								name: "not",
								data: [[SINGLE_FILE_SELECTOR]]
							});
							selector.transformed = true;
							selectors[selectorIndex] = selector;
							selector = JSON.parse(JSON.stringify(selectorInfo.selector));
							selectors.push(selector);
							matchedImageSelectors.set(selectorInfo.ruleInfo.cssRule.selectorText, selectors);
						}
					}
				});
			}
		});
		parentMediaInfo.medias.forEach(mediaInfo => getImageRuleInfos(mediaInfo, matchedImageSelectors));
	}

	function getImageGroups(doc) {
		const imageGroups = new Map();
		doc.querySelectorAll("img[src]:not([srcset])").forEach(imageElement => {
			if (imageElement.src) {
				let imageInfo = imageGroups.get(imageElement.src);
				if (!imageInfo) {
					imageInfo = [];
					imageGroups.set(imageElement.src, imageInfo);
				}
				imageInfo.push(imageElement);
			}
		});
		return imageGroups;
	}

	function processStyleSheets(doc, duplicates, mediaAllInfo, matchedImageSelectors) {
		const matchedSelectors = getMatchedSelectors(duplicates, mediaAllInfo);
		doc.querySelectorAll("style").forEach((styleElement, sheetIndex) => {
			if (styleElement.sheet) {
				const cssRules = styleElement.sheet.cssRules;
				let mediaInfo;
				if (styleElement.media && styleElement.media != "all") {
					mediaInfo = mediaAllInfo.medias.get("style-" + sheetIndex + "-" + styleElement.media);
				} else {
					mediaInfo = mediaAllInfo;
				}
				styleElement.textContent = processRules(doc, cssRules, sheetIndex, mediaInfo, matchedSelectors, matchedImageSelectors);
			}
		});
	}

	function processImages(doc, duplicates, duplicateURLs, options) {
		const svgElement = doc.createElementNS(SVG_NS, "svg");
		const defsElement = doc.createElementNS(SVG_NS, "defs");
		svgElement.setAttributeNS(SVG_NS, "width", 0);
		svgElement.setAttributeNS(SVG_NS, "height", 0);
		svgElement.setAttributeNS(SVG_NS, "style", "display:none!important");
		svgElement.appendChild(defsElement);
		doc.body.appendChild(svgElement);
		const ignoredAttributeNames = [];
		if (options.lazyLoadImages) {
			const imageSelectors = lazyLoader.imageSelectors;
			Object.keys(imageSelectors.src).forEach(selector => ignoredAttributeNames.push(imageSelectors.src[selector]));
			Object.keys(imageSelectors.srcset).forEach(selector => ignoredAttributeNames.push(imageSelectors.srcset[selector]));
		}
		doc.querySelectorAll("img[src]:not([srcset])").forEach(imgElement => {
			let replaceImage = !options.lazyLoadImages;
			if (!replaceImage) {
				replaceImage = !Object.keys(ignoredAttributeNames).map(key => ignoredAttributeNames[key]).find(attributeName => imgElement.getAttribute(attributeName));
			}
			if (replaceImage && duplicates.has(imgElement)) {
				const urlIndex = duplicateURLs.indexOf(imgElement.src);
				if (urlIndex != -1) {
					const dataAttributeName = docHelper.imagesAttributeName(options.sessionId);
					const imageData = options.imageData[Number(imgElement.getAttribute(dataAttributeName))];
					const width = (imageData.naturalWidth > 1 && imageData.naturalWidth) || imageData.width;
					const height = (imageData.naturalHeight > 1 && imageData.naturalHeight) || imageData.height;
					if (width > 1 && height > 1) {
						const svgElement = doc.createElementNS(SVG_NS, "svg");
						const useElement = doc.createElementNS(SVG_NS, "use");
						svgElement.appendChild(useElement);
						imgElement.getAttributeNames().forEach(attributeName => {
							if (!IGNORED_ATTRIBUTES.concat([docHelper.imagesAttributeName(options.sessionId)]).includes(attributeName)) {
								try {
									svgElement.setAttributeNS(SVG_NS, attributeName, imgElement.getAttribute(attributeName));
								} catch (error) {
									/* ignored */
								}
							}
						});
						const className = imgElement.getAttribute("class");
						if (className) {
							svgElement.setAttribute("class", className);
						}
						const title = imgElement.getAttribute("title");
						if (title) {
							const titleElement = doc.createElementNS(SVG_NS, "title");
							titleElement.textContent = title;
							svgElement.appendChild(titleElement);
						}
						svgElement.setAttribute(SINGLE_FILE_IMAGE_ATTRIBUTE, "");
						const style = svgElement.getAttribute("style") || "";
						svgElement.setAttribute("style", style + (style && ";") + "box-sizing:content-box!important;width:" + imageData.clientWidth + "px!important;" + "height:" + imageData.clientHeight + "px!important");
						svgElement.setAttributeNS(SVG_NS, "viewBox", "0 0 " + width + " " + height);
						svgElement.setAttributeNS(SVG_NS, "width", imageData.clientWidth);
						svgElement.setAttributeNS(SVG_NS, "height", imageData.clientHeight);
						svgElement.setAttributeNS(SVG_NS, "preserveAspectRatio", "none");
						useElement.setAttributeNS(SVG_NS, "xlink:href", "#single-file-" + urlIndex);
						let imageElement = doc.getElementById("single-file-" + urlIndex);
						if (!imageElement) {
							imageElement = doc.createElementNS(SVG_NS, "image");
							imageElement.setAttribute("xlink:href", imgElement.src);
							imageElement.id = "single-file-" + urlIndex;
							defsElement.appendChild(imageElement);
						}
						if (!imageElement.getAttributeNS(SVG_NS, "width") && !imageElement.getAttributeNS(SVG_NS, "height")) {
							imageElement.setAttributeNS(SVG_NS, "viewBox", "0 0 " + width + " " + height);
							imageElement.setAttributeNS(SVG_NS, "width", width);
							imageElement.setAttributeNS(SVG_NS, "height", height);
						}
						imgElement.parentElement.replaceChild(svgElement, imgElement);
					}

				}
			}
		});
	}

	function getMatchedSelectors(duplicates, parentMediaInfo, matchedRules = new Map()) {
		duplicates.forEach(imageElement => {
			let elementInfo = parentMediaInfo.elements.get(imageElement);
			if (!elementInfo) {
				elementInfo = parentMediaInfo.pseudos.get(imageElement);
			}
			if (elementInfo) {
				elementInfo.forEach(elementInfo => {
					if (elementInfo.ruleInfo) {
						let selectors = matchedRules.get(elementInfo.selectorText);
						if (!selectors) {
							matchedRules.set(elementInfo.ruleInfo.cssRule.selectorText, elementInfo.ruleInfo.selectors);
						}
					}
				});
			}
		});
		parentMediaInfo.medias.forEach(mediaInfo => getMatchedSelectors(duplicates, mediaInfo, matchedRules));
		return matchedRules;
	}

	function processRules(doc, cssRules, sheetIndex, mediaInfo, matchedSelectors, matchedImageSelectors) {
		let sheetContent = "", mediaRuleIndex = 0;
		let startTime;
		if (DEBUG && cssRules.length > 1) {
			startTime = Date.now();
			log("  -- STARTED processRules", "rules.length =", cssRules.length);
		}
		Array.from(cssRules).forEach(cssRule => {
			if (cssRule.type == CSSRule.MEDIA_RULE) {
				sheetContent += "@media " + Array.from(cssRule.media).join(",") + "{";
				sheetContent += processRules(doc, cssRule.cssRules, sheetIndex, mediaInfo.medias.get("rule-" + sheetIndex + "-" + mediaRuleIndex + "-" + cssRule.media.mediaText), matchedSelectors, matchedImageSelectors);
				mediaRuleIndex++;
				sheetContent += "}";
			} else if (cssRule.type == CSSRule.STYLE_RULE) {
				const imageSelectors = matchedImageSelectors.get(cssRule.selectorText);
				let selectors = matchedSelectors.get(cssRule.selectorText);
				if (imageSelectors || selectors) {
					selectors = imageSelectors || selectors;
					selectors.forEach(selector => {
						const newSelector = getSVGSelector(selector);
						if (newSelector) {
							selectors.push(newSelector);
						}
					});
					const selectorText = selectors.map(selector => cssWhat.stringify([selector])).join(",");
					cssRule.selectorText = selectorText;
				}
				sheetContent += cssRule.cssText;
			} else {
				sheetContent += cssRule.cssText;
			}
		});
		if (DEBUG && cssRules.length > 1) {
			log("  -- ENDED   processRules delay =", Date.now() - startTime);
		}
		return sheetContent;
	}

	function getSVGSelector(selector) {
		selector = JSON.parse(JSON.stringify(selector));
		let simpleSelector, selectorIndex = selector.length - 1, imageTagFound;
		while (selectorIndex >= 0 && !imageTagFound) {
			simpleSelector = selector[selectorIndex];
			if (simpleSelector.type == "pseudo" && simpleSelector.name == "not") {
				const negatedSelector = simpleSelector.data[0][0];
				if (negatedSelector.type == SINGLE_FILE_SELECTOR.type && negatedSelector.action == SINGLE_FILE_SELECTOR.action && negatedSelector.name == SINGLE_FILE_SELECTOR.name) {
					selector.splice(selectorIndex, 1);
				}
				selectorIndex--;
			} else {
				imageTagFound = simpleSelector.type == "tag" && simpleSelector.name == "img";
				if (!imageTagFound) {
					selectorIndex--;
				}
			}
		}
		if (imageTagFound) {
			simpleSelector.name = "svg";
			selector.splice(selectorIndex + 1, 0, SINGLE_FILE_SELECTOR);
			return selector;
		}
	}

	function log(...args) {
		console.log("S-File <img-min>", ...args); // eslint-disable-line no-console
	}

})();