/*
* ClearURLs
* Copyright (c) 2017-2019 Kevin Röbert
*
* This program 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.
*
* This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
*/

/*jshint esversion: 6 */
/*
* This script is responsible for the core functionalities.
*/
var providers = [];
var prvKeys = [];
var badges = [];
var tabid = 0;
var siteBlockedAlert = 'javascript:void(0)';
var dataHash;
var localDataHash;
var os;
var currentURL;

/**
 * Helper function which remove the tracking fields
 * for each provider given as parameter.
 *
 * @param  {Provider} provider      Provider-Object
 * @param pureUrl                   URL as String
 * @param {boolean} quiet   if the action should be displayed in log and statistics
 * @return {Array}                  Array with changes and url fields
 */
function removeFieldsFormURL(provider, pureUrl, quiet = false)
{
    let url = pureUrl;
    let domain = "";
    let fragments = "";
    let fields = "";
    let rules = provider.getRules();
    let changes = false;
    let cancel = false;
    let rawRules = provider.getRawRules();

    if(storage.localHostsSkipping && checkLocalURL(pureUrl)) {
        return {
            "changes": false,
            "url": url,
            "cancel": false
        };
    }

    /*
    * Apply raw rules to the URL.
    */
    rawRules.forEach(function(rawRule) {
        let beforeReplace = url;
        url = url.replace(new RegExp(rawRule, "gi"), "");

        if(beforeReplace !== url) {
            //Log the action
            if(storage.loggingStatus && !quiet)
            {
                pushToLog(beforeReplace, url, rawRule);
            }

            if(badges[tabid] == null) badges[tabid] = 0;

            if(!quiet) increaseURLCounter();

            checkOSAndroid().then((res) => {
                if(!res) {

                    if(storage.badgedStatus) {
                        browser.browserAction.setBadgeText({text: (++badges[tabid]).toString(), tabId: tabid});
                    }
                    else
                    {
                        browser.browserAction.setBadgeText({text: "", tabId: tabid});
                    }
                }
            });

            changes = true;
        }
    });

    if(existsFragments(url)) {
        domain = url.replace(new RegExp("#.*", "i"), "");
    }
    if(existsFields(url)) {
        domain = url.replace(new RegExp("\\?.*", "i"), "");
    }

    /*
    * Expand the url by provider redirections. So no tracking on
    * url redirections form sites to sites.
    */
    let re = provider.getRedirection(url);
    if(re !== null)
    {
        url = decodeURL(re);

        //Log the action
        if(!quiet) pushToLog(pureUrl, url, translate('log_redirect'));

        return {
            "redirect": true,
            "url": url
        };
    }

    if(existsFields(url)) {
        fields = "?"+extractFileds(url).rmEmpty().join("&");
    }

    if(existsFragments(url)) {
        fragments = "#"+extractFragments(url).rmEmpty().join("&");
    }

    /**
    * Only test for matches, if there are fields or fragments that can be cleaned.
    */
    if(fields !== "" || fragments !== "")
    {
        rules.forEach(function(rule) {
            let beforeReplace = fields;
            let beforeReplaceFragments = fragments;
            fields = fields.replace(new RegExp(rule, "gi"), "");
            fragments = fragments.replace(new RegExp(rule, "gi"), "");

            if(beforeReplace !== fields || beforeReplaceFragments !== fragments)
            {
                //Log the action
                if(storage.loggingStatus)
                {
                    let tempURL = domain;
                    let tempBeforeURL = domain;

                    if(fields !== "") tempURL += "?"+fields.replace("?&", "?").replace("?", "");
                    if(fragments !== "") tempURL += "#"+fragments.replace("#&","#").replace("#", "");
                    if(beforeReplace !== "") tempBeforeURL += "?"+beforeReplace.replace("?&", "?").replace("?", "");
                    if(beforeReplaceFragments !== "") tempBeforeURL += "#"+beforeReplaceFragments.replace("#&","#").replace("#", "");

                    if(!quiet) pushToLog(tempBeforeURL, tempURL, rule);
                }

                if(badges[tabid] == null) badges[tabid] = 0;

                if(!quiet) increaseURLCounter();

                checkOSAndroid().then((res) => {
                    if(!res) {

                        if(storage.badgedStatus) {
                            browser.browserAction.setBadgeText({text: (++badges[tabid]).toString(), tabId: tabid});
                        }
                        else
                        {
                            browser.browserAction.setBadgeText({text: "", tabId: tabid});
                        }
                    }
                });

                changes = true;
            }
        });

        let finalURL = domain;

        if(fields !== "") finalURL += "?"+fields.replace("?", "");
        if(fragments !== "") finalURL += "#"+fragments.replace("#", "");

        url = finalURL.replace(new RegExp("\\?&"), "?").replace(new RegExp("#&"), "#");
    }

    if(provider.isCaneling()){
        if(!quiet) pushToLog(pureUrl, pureUrl, translate('log_domain_blocked'));
        if(badges[tabid] == null)
        {
            badges[tabid] = 0;
        }

        if(!quiet) increaseURLCounter();

        checkOSAndroid().then((res) => {
            if(!res) {
                if(storage.badgedStatus) {
                    browser.browserAction.setBadgeText({text: (++badges[tabid]).toString(), tabId: tabid});
                }
                else
                {
                    browser.browserAction.setBadgeText({text: "", tabId: tabid});
                }
            }
        });

        cancel = true;
    }

    return {
        "changes": changes,
        "url": url,
        "cancel": cancel
    };
}

function start()
{
    /**
    * Initialize the JSON provider object keys.
    *
    * @param {JSON Object} obj
    */
    function getKeys(obj){
        for(const key in obj){
            prvKeys.push(key);
        }
    }

    /**
    * Initialize the providers form the JSON object.
    *
    */
    function createProviders()
    {
        let data = storage.ClearURLsData;

        for(let p = 0; p < prvKeys.length; p++)
        {
            //Create new provider
            providers.push(new Provider(prvKeys[p], data.providers[prvKeys[p]].completeProvider,
                data.providers[prvKeys[p]].forceRedirection));

                //Add URL Pattern
                providers[p].setURLPattern(data.providers[prvKeys[p]].urlPattern);

                //Add rules to provider
                for(let r = 0; r < data.providers[prvKeys[p]].rules.length; r++)
                {
                    providers[p].addRule(data.providers[prvKeys[p]].rules[r]);
                }

                //Add raw rules to provider
                for(let raw = 0; raw < data.providers[prvKeys[p]].rawRules.length; raw++)
                {
                    providers[p].addRawRule(data.providers[prvKeys[p]].rawRules[raw]);
                }

                //Add referral marketing rules to provider
                for(let referralMarketing = 0; referralMarketing < data.providers[prvKeys[p]].referralMarketing.length; referralMarketing++)
                {
                    providers[p].addReferralMarketing(data.providers[prvKeys[p]].referralMarketing[referralMarketing]);
                }

                //Add exceptions to provider
                for(let e = 0; e < data.providers[prvKeys[p]].exceptions.length; e++)
                {
                    providers[p].addException(data.providers[prvKeys[p]].exceptions[e]);
                }

                //Add redirections to provider
                for(let re = 0; re < data.providers[prvKeys[p]].redirections.length; re++)
                {
                    providers[p].addRedirection(data.providers[prvKeys[p]].redirections[re]);
                }
            }
        }

        /**
        * Convert the external data to Objects and
        * call the create provider function.
        *
        * @param  {String} retrievedText - pure data form github
        */
        function toObject(retrievedText) {
            getKeys(storage.ClearURLsData.providers);
            createProviders();
        }

        /**
        * Get the hash for the rule file on github.
        * Check the hash with the hash form the local file.
        * If the hash has changed, then download the new rule file.
        * Else do nothing.
        */
        function getHash()
        {
            //Get the target hash from github
            fetch(storage.hashURL)
            .then(function(response){
                const responseTextHash = response.clone().text().then(function (responseTextHash) {
                    if (response.ok && $.trim(responseTextHash)) {
                        dataHash = responseTextHash;

                        if ($.trim(dataHash) !== $.trim(localDataHash)) {
                            fetchFromURL();
                        } else {
                            toObject(storage.ClearURLsData);
                            storeHashStatus(1);
                            saveOnDisk(['hashStatus']);
                        }
                    } else {
                        dataHash = false;
                    }
                });
            });
        }

        /*
        * ##################################################################
        * # Fetch Rules & Exception from URL                               #
        * ##################################################################
        */
        function fetchFromURL()
        {
            fetch(storage.ruleURL)
            .then(checkResponse);

            function checkResponse(response)
            {
                const responseText = response.clone().text().then(function (responseText) {
                    if (response.ok && $.trim(responseText)) {
                        const downloadedFileHash = $.sha256(responseText);

                        if ($.trim(downloadedFileHash) === $.trim(dataHash)) {
                            storage.ClearURLsData = responseText;
                            storage.dataHash = downloadedFileHash;
                            storeHashStatus(2);
                        } else {
                            storeHashStatus(3);
                        }
                        storage.ClearURLsData = JSON.parse(storage.ClearURLsData);
                        toObject(storage.ClearURLsData);
                        saveOnDisk(['ClearURLsData', 'dataHash', 'hashStatus']);
                    }
                });
            }
        }

        // ##################################################################

        /*
        * ##################################################################
        * # Supertyp Provider                                              #
        * ##################################################################
        */
        /**
        * Declare constructor
        *
        * @param {String} _name                Provider name
        * @param {boolean} _completeProvider    Set URL Pattern as rule
        * @param {boolean} _forceRedirection    Whether redirects should be enforced via a "tabs.update"
        * @param {boolean} _isActive            Is the provider active?
        */
        function Provider(_name, _completeProvider = false, _forceRedirection = false, _isActive = true){
            let name = _name;
            let urlPattern;
            let enabled_rules = {};
            let disabled_rules = {};
            let enabled_exceptions = {};
            let disabled_exceptions = {};
            let canceling = _completeProvider;
            let enabled_redirections = {};
            let disabled_redirections = {};
            let active = _isActive;
            let enabled_rawRules = {};
            let disabled_rawRules = {};
            let enabled_referralMarketing = {};
            let disabled_referralMarketing = {};

            if(_completeProvider){
                enabled_rules[".*"] = true;
            }

            /**
            * Returns whether redirects should be enforced via a "tabs.update"
            * @return {boolean}    whether redirects should be enforced
            */
            this.shouldForceRedirect = function() {
                return _forceRedirection;
            };

            /**
            * Returns the provider name.
            * @return {String}
            */
            this.getName = function() {
                return name;
            };

            /**
            * Add URL pattern.
            *
            * @require urlPatterns as RegExp
            */
            this.setURLPattern = function(urlPatterns) {
                urlPattern = new RegExp(urlPatterns, "i");
            };

            /**
            * Return if the Provider Request is canceled
            * @return {Boolean} isCanceled
            */
            this.isCaneling = function() {
                return canceling;
            };

            /**
            * Check the url is matching the ProviderURL.
            *
            * @return {boolean}    ProviderURL as RegExp
            */
            this.matchURL = function(url) {
                return urlPattern.test(url) && !(this.matchException(url));
            };

            /**
             * Apply a rule to a given tuple of rule array.
             * @param enabledRuleArray      array for enabled rules
             * @param disabledRulesArray    array for disabled rules
             * @param {String} rule         RegExp as string
             * @param {boolean} isActive    Is this rule active?
             */
            this.applyRule = (enabledRuleArray, disabledRulesArray, rule, isActive = true) => {
                if(isActive)
                {
                    enabledRuleArray[rule] = true;

                    if(disabledRulesArray[rule] !== undefined)
                    {
                        delete disabledRulesArray[rule];
                    }
                }
                else {
                    disabledRulesArray[rule] = true;

                    if(enabledRuleArray[rule] !== undefined)
                    {
                        delete enabledRuleArray[rule];
                    }
                }
            };

            /**
            * Add a rule to the rule array
            * and replace old rule with new rule.
            *
            * @param {String} rule        RegExp as string
            * @param {boolean} isActive   Is this rule active?
            */
            this.addRule = function(rule, isActive = true) {
                rule = "([\\/|\\?|#]|(&|&amp;))+("+rule+"=[^\\/|\\?|&]*)";

                this.applyRule(enabled_rules, disabled_rules, rule, isActive);
            };

            /**
            * Return all active rules as an array.
            *
            * @return Array RegExp strings
            */
            this.getRules = function() {
                return Object.keys(enabled_rules);
            };

            /**
            * Add a raw rule to the raw rule array
            * and replace old raw rule with new raw rule.
            *
            * @param {String} rule        RegExp as string
            * @param {boolean} isActive   Is this rule active?
            */
            this.addRawRule = function(rule, isActive = true) {
                this.applyRule(enabled_rawRules, disabled_rawRules, rule, isActive);
            };

            /**
            * Return all active raw rules as an array.
            *
            * @return Array RegExp strings
            */
            this.getRawRules = function() {
                if(!storage.referralMarketing) {
                    return Object.keys(Object.assign(enabled_rawRules, enabled_referralMarketing));
                }

                return Object.keys(enabled_rawRules);
            };

            /**
             * Add a referral marketing rule to the referral marketing array
             * and replace old referral marketing rule with new referral marketing rule.
             *
             * @param {String} rule        RegExp as string
             * @param {boolean} isActive   Is this rule active?
             */
            this.addReferralMarketing = function(rule, isActive = true) {
                this.applyRule(enabled_referralMarketing, disabled_referralMarketing, rule, isActive);
            };

            /**
            * Add a exception to the exceptions array
            * and replace old with new exception.
            *
            * @param {String} exception   RegExp as string
            * @param {Boolean} isActive   Is this exception acitve?
            */
            this.addException = function(exception, isActive = true) {
                if(isActive)
                {
                    enabled_exceptions[exception] = true;

                    if(disabled_exceptions[exception] !== undefined)
                    {
                        delete disabled_exceptions[exception];
                    }
                }
                else {
                    disabled_exceptions[exception] = true;

                    if(enabled_exceptions[exception] !== undefined)
                    {
                        delete enabled_exceptions[exception];
                    }
                }
            };

            /**
            * Private helper method to check if the url
            * an exception.
            *
            * @param  {String} url     RegExp as string
            * @return {boolean}        if matching? true: false
            */
            this.matchException = function(url) {
                let result = false;

                //Add the site blocked alert to every exception
                if(url === siteBlockedAlert) return true;

                for(const exception in enabled_exceptions) {
                    if(result) break;

                    let exception_regex = new RegExp(exception, "i");
                    result = exception_regex.test(url);
                }

                return result;
            };

            /**
            * Add a redirection to the redirections array
            * and replace old with new redirection.
            *
            * @param {String} redirection   RegExp as string
            * @param {Boolean} isActive     Is this redirection active?
            */
            this.addRedirection = function(redirection, isActive = true) {
                if(isActive)
                {
                    enabled_redirections[redirection] = true;

                    if(disabled_redirections[redirection] !== undefined)
                    {
                        delete disabled_redirections[redirection];
                    }
                }
                else {
                    disabled_redirections[redirection] = true;

                    if(enabled_redirections[redirection] !== undefined)
                    {
                        delete enabled_redirections[redirection];
                    }
                }
            };

            /**
            * Return all redirection.
            *
            * @return url
            */
            this.getRedirection = function(url) {
                let re = null;

                for(const redirection in enabled_redirections) {
                    let result = (url.match(new RegExp(redirection, "i")));

                    if (result && result.length > 0 && redirection)
                    {
                        re = (new RegExp(redirection, "i")).exec(url)[1];

                        break;
                    }
                }

                return re;
            };
        }
        // ##################################################################

        /**
        * Function which called from the webRequest to
        * remove the tracking fields from the url.
        *
        * @param  {webRequest} request     webRequest-Object
        * @return {Array}                  redirectUrl or none
        */
        function clearUrl(request)
        {
            const URLbeforeReplaceCount = countFields(request.url);

            //Add Fields form Request to global url counter
            increaseGlobalURLCounter(URLbeforeReplaceCount);

            if(storage.globalStatus){
                let result = {
                    "changes": false,
                    "url": "",
                    "redirect": false,
                    "cancel": false
                };

                /*
                * Call for every provider the removeFieldsFormURL method.
                */
                for (let i = 0; i < providers.length; i++) {

                    if(providers[i].matchURL(request.url))
                    {
                        result = removeFieldsFormURL(providers[i], request.url);
                    }

                    /*
                    * Expand urls and bypass tracking.
                    * Cancel the active request.
                    */
                    if(result.redirect)
                    {
                        if(providers[i].shouldForceRedirect() &&
                        request.type === 'main_frame') {
                            browser.tabs.update(request.tabId, {url: result.url});
                            return {cancel: true};
                        }

                        return {
                            redirectUrl: result.url
                        };
                    }

                    /*
                    * Cancel the Request and redirect to the site blocked alert page,
                    * to inform the user about the full url blocking.
                    */
                    if(result.cancel){
                        if(request.type === 'main_frame') {
                            const blockingPage = browser.extension.getURL("html/siteBlockedAlert.html?source="+encodeURIComponent(request.url));
                            browser.tabs.update(request.tabId, {url: blockingPage});

                            return {cancel: true};
                        } else {
                            return {
                                redirectUrl: siteBlockedAlert
                            };
                        }
                    }

                    /*
                    * Ensure that the function go not into
                    * a loop.
                    */
                    if(result.changes){
                        return {
                            redirectUrl: result.url
                        };
                    }
                }
            }

            // Default case
            return {};
        }

        /**
        * Call loadOldDataFromStore, getHash, counter, status and log functions
        */

        loadOldDataFromStore();
        getHash();
        setBadgedStatus();

        /**
        * Call by each tab is updated.
        * And if url has changed.
        */
        function handleUpdated(tabId, changeInfo, tabInfo) {
            if(changeInfo.url)
            {
                delete badges[tabId];
            }
            currentURL = tabInfo.url;
        }

        /**
        * Call by each tab is updated.
        */
        browser.tabs.onUpdated.addListener(handleUpdated);

        /**
        * Call by each tab change to set the actual tab id
        */
        function handleActivated(activeInfo) {
            tabid = activeInfo.tabId;
            browser.tabs.get(tabid).then(function (tab) {
                currentURL = tab.url;
            });
        }

        /**
        * Call by each tab change.
        */
        browser.tabs.onActivated.addListener(handleActivated);

        /**
        * Check the request.
        */
        function promise(requestDetails)
        {
            if(isDataURL(requestDetails))
            {
                return {};
            }
            else {
                return clearUrl(requestDetails);
            }
        }

        /**
        * To prevent long loading on data urls
        * we will check here for data urls.
        *
        * @type {requestDetails}
        * @return {boolean}
        */
        function isDataURL(requestDetails) {
            const s = requestDetails.url;

            return s.substring(0,4) === "data";
        }

        /**
        * Call by each Request and checking the url.
        *
        * @type {Array}
        */
        browser.webRequest.onBeforeRequest.addListener(
            promise,
            {urls: ["<all_urls>"], types: getData("types")},
            ["blocking"]
        );
    }

    /**
    * Function to log all activities from ClearUrls.
    * Only logging when activated.
    * The log is only temporary saved in the cache and will
    * permanently saved with the saveLogOnClose function.
    *
    * @param beforeProcessing  the url before the clear process
    * @param afterProcessing   the url after the clear process
    * @param rule              the rule that triggered the process
    */
    function pushToLog(beforeProcessing, afterProcessing, rule)
    {
        const limit = storage.logLimit;
        if(storage.loggingStatus && limit !== 0)
        {
            if(limit > 0 && !isNaN(limit)) {
                while(storage.log.log.length >= limit) {
                    storage.log.log.shift();
                }
            }

            storage.log.log.push(
                {
                    "before": beforeProcessing,
                    "after": afterProcessing,
                    "rule": rule,
                    "timestamp": Date.now()
                }
            );
            deferSaveOnDisk('log');
        }
    }