///<reference path="/Web/Js/TESCO.js" />
///<reference path="/Web/Js/system/event.js" />
///<reference path="/Web/Js/system/event.manager.js" />
///<reference path="/Web/Js/system/exception.js" />
///<reference path="/Web/Js/system/DOM.node.js" />
///<reference path="/Web/Js/UI/effects.js" />
///<reference path="/Web/Js/UI/position.js" />
///<reference path="/Web/Js/system/validation.js" />
///<reference path="/Web/Js/system/XMLHTTP.js" />
///<reference path="/Web/Js/system/ajax.js" />
///<reference path="../siteTracker.js" />
///<reference path="dialogue.js" />
///<reference path="entities.js" />

/*
   SiteTracker 5.1.10
   Copyright (C) 2007 Site Intelligence Ltd.
*/
TESCO.$("sites.retail.system").SiteTracker = {}

if (TESCO.sites.Configuration.siteTracker.enabled) {

    TESCO.sites.retail.system.SiteTracker = new function() {
        var undefined; // For JS engines that don't support this keyword natively
		var today;

        if (window['siAutoTracer'] == undefined) {
            window.siAutoTracer = false;  // Set to false if you don't want automatic page tracking
        }

        var siBaseDirectory = "/si";
        var siTaggingServer = null; // Send tags to same server as document comes from
        var siCookieName = "SM";
        var siTracerCookieName = "SITRACER";
        var siLinkAttribute = "si:link";  // This must either be "si:link" or "id"
        var siCookieQPName = "simigvis";
        var siCookiePath = "/";
        var siCookieTimeout = 315360000000;
        var siTracerTimeout = 1000; // ms to wait maximum for tracer to be sent
        var siDomainList = new Array(TESCO.sites.Configuration.application.domain.zone);
        var siCentralCookie = false;
        var siCentralReqName = "req";
        var siCentralRefName = "refer";
        var siCentralURL = "";
        var siTrackerUrl = TESCO.sites.Configuration.application.img.path + "/track.gif";


        //////////////////////////////////
        // Do not edit below this line! //
        //////////////////////////////////

        var siIsCookieNew = "N";
        var siCookieValue = null;
        var siExtClickID = "t" + (new Date()).getTime() + "h" + window.history.length;
        var siClickedLinkID = "";
        var siRefClickID = "";
        var siTracerPath = "";
        var siTracerQuery = "";
        var siSendParams = "";
        var siTracerCookieIdx = 0;
        var siImageSet = new Array(1);
        var siReferrer = document.referrer;
        var siRequest = document.URL;
        var siPageIDAttrName = "si:pageID";
        var siTagType = "";
        var siSentPageTag = false;
        var siSyncTracersOutstanding = 0;
        var siSyncFinishedAction = null;

        var _self = this;

        function SiInternalGetLinkClickingClosure(anchor) {
            var targetLoc = null;
            var destination = anchor.href;
            var target = anchor.getAttribute("target");
            if (target && target != "_self") {
                if (target == "_top") targetLoc = "top";
                else if (target == "_parent") targetLoc = "parent";
                else {
                    if (target == "_new") {
                        return function() { window.open(destination); }
                    }
                    else {
                        targetLoc = top.frames[target];
                        if (!targetLoc) {
                            return function() { window.open(destination, target); }
                        }
                    }
                }
            }

            if (targetLoc == null) {
                return function() { location.href = destination; }
            }
            else {
                return function() { targetLoc.location.href = destination; }
            }
        }


        function SiEncodeString(Input) {
            if (!Input) {
                return "";
            }

            var TransChars = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
            var Output = "";
            for (var i = 0; i < Input.length; i += 3) {
                var NumBytesLeft = Input.length - i;
                var Value = 0;
                Value = (Input.charCodeAt(i) << 16) & 0x00ff0000;
                Value |= (NumBytesLeft > 1) ? (Input.charCodeAt(i + 1) << 8) & 0x0000ff00 : 0;
                Value |= (NumBytesLeft > 2) ? Input.charCodeAt(i + 2) & 0x000000ff : 0;
                Output += TransChars.charAt((Value & 0x00fC0000) >> 18);
                Output += TransChars.charAt((Value & 0x0003f000) >> 12);
                Output += (NumBytesLeft > 1) ? TransChars.charAt((Value & 0x00000fc0) >> 6) : '_';
                Output += (NumBytesLeft > 2) ? TransChars.charAt((Value & 0x0000003f)) : '_';
            }
            return Output;
        }

        //---------------------------------------------------------------------------------------------
        // Encode all the relevent detals into a string
        //---------------------------------------------------------------------------------------------
        function SiEncodeDetails(Format) {
            var Output = "";
            for (var i = 0; i < Format.length; i++) {
                var Data;
                switch (Format.charAt(i)) {
                    case 'r':
                        Data = siReferrer;
                        break;
                    case 'p':
                        Data = siRequest;
                        break;
                    case 'd':
                        Data = screen.availWidth + "x" + screen.availHeight + "x" + screen.colorDepth + "." + navigator.javaEnabled();
                        if (navigator.plugins) Data += "." + navigator.plugins.length;
                        break;
                    case 'c':
                        Data = siCookieValue;
                        break;
                    case 'u':
                        Data = window.history.length + "." + (Math.random() * 1000) + "." + (new Date()).getTime();
                        break;
                    case 't':
                        Data = siExtClickID;
                        break;
                    case 'f':
                        Data = siTracerPath;
                        break;
                    case 'q':
                        Data = siTracerQuery;
                        break;
                    case 'g':
                        Data = SiCollateTagData();
                        break;
                    case 'w':
                        Data = siIsCookieNew;
                        break;
                    case 'y':
                        Data = siTagType;
                        break;
                }
                Output += SiEncodeString(Data) + "*";
            }
            return Output;
        }

        function SiCollateTagData() {
            var TagData = "";

            TagData += "co=" + window.screen.colorDepth;
            TagData += "&sr=" + window.screen.width + 'x' + window.screen.height;
            today = new Date();
            if (null != today) {
                TagData += "&lt=" + SiFormatDate(today);
            }
            if (navigator.javaEnabled()) {
                TagData += "&jv=1";
            }
            else {
                TagData += "&jv=0";
            }
            TagData += SiCollatePageRules();

            if (document.body) {
                var ThisPageID = document.body.getAttribute(siPageIDAttrName);
                if (ThisPageID) {
                    TagData += "&req=" + ThisPageID;
                }
            }

            if (siClickedLinkID && siClickedLinkID.length > 0) {
                TagData += "&rl=" + siClickedLinkID;
            }

            if (siRefClickID.length > 0) {
                TagData += "&rcid=" + siRefClickID;
            }

            return TagData;
        }

        function SiCollatePageRules() {
            var PageData = "";

            if (window.siIsFrameset) {
                PageData += "&page:fset";
            }
            if (window.siIsMenu) {
                PageData += "&page:menu";
            }
            if (window.siIsExtraFrame) {
                PageData += "&page:x-frame";
            }
            if (window.siIsRedirection) {
                PageData += "&page:redir";
            }
            if (window.siIsPopup) {
                PageData += "&page:popup";
            }

            return PageData;
        }

        function SiIsMenu() {
            window.siIsMenu = true;
        }

        function SiIsFrameset() {
            window.siIsFrameset = true;
        }

        function SiIsExtraFrame() {
            window.siIsExtraFrame = true;
        }

        function SiIsRedirection() {
            window.siIsRedirection = true;
        }

        function SiIsPopup() {
            window.siIsPopup = true;
        }

        function SiSetPageID(id) {
            document.body.setAttribute(siPageIDAttrName, id);
        }

        function SiFormatDate(date) {
            var output = "";
            output += date.getFullYear() + "";
            output += "-";
            output += leadingZero(date.getMonth() + 1);
            output += "-";
            output += leadingZero(date.getDate());
            output += "T";
            output += leadingZero(date.getHours());
            output += ":";
            output += leadingZero(date.getMinutes());
            output += ":";
            output += leadingZero(date.getSeconds());
            return output;
        }

        function leadingZero(n) {
            return (n > 9 ? "" : "0") + n;
        }

        function SiGetDomain() {
            var DomainValue = null;
            var firstDot;
            var secondDot;
            var lastDot;
            var useHostname = document.location.hostname;
            if (useHostname != null) {
                var arIndex;
                for (arIndex = 0; (arIndex < siDomainList.length) && (DomainValue == null); arIndex++) {
                    var tldIndex = useHostname.lastIndexOf(siDomainList[arIndex]);
                    if (tldIndex > 0) {
                        var nextDot = useHostname.lastIndexOf('.', tldIndex - 1);
                        if (nextDot >= 0) {
                            DomainValue = useHostname.substring(nextDot);
                        }
                        else {
                            DomainValue = "." + useHostname;
                        }
                    }
                }
            }
            return DomainValue;
        }

        function SiTrackLink(idVar) {
            siTagType = "trace";

            if (/string/.test(typeof (idVar))) {
                siClickedLinkID = idVar;
            }
            else {
                // We have an anchor tag or equivalent
                siClickedLinkID = idVar.getAttribute(siLinkAttribute);
            }

            SiInternalTrackLink();
            return true;
        }

        function SiInternalTrackLink() {
            SiInternalDoLinkTrack(SiDeferTracer);
        }

        function SiInternalTrackLinkImmediate() {
            SiInternalDoLinkTrack(SiSyncTracer);
        }

        function SiInternalTrackLinkWait() {
            SiInternalDoLinkTrack(SiSendTracerWithWait);
        }

        function SiInternalTrackLinkViaSynchronousSend(anchorTag, closure) {
            if (!closure)
                closure = SiInternalGetLinkClickingClosure(anchorTag);

            SiInternalDoLinkTrack(SiSyncTracer, closure, siTracerTimeout);
        }

        function SiInternalDoLinkTrack(dispatcher, closure, timeout) {
            siRefClickID = siExtClickID;
            siTracerPath = "http://" + document.location.hostname + siBaseDirectory + "/link";
            siTracerQuery = "";

            // Call the dispatcher with appropriate arguments
            if (closure) {
                if (timeout) {
                    dispatcher("fctgy", "fdtgy", closure, timeout);
                } else {
                    dispatcher("fctgy", "fdtgy", closure);
                }
            } else {
                dispatcher("fctgy", "fdtgy");
            }

            siClickedLinkID = "";
            siRefClickID = "";
            siTracerPath = "";
        }

        function SiTrackEvent(eventName) {
            siClickedLinkID = eventName;
            siTagType = "trace";
            SiInternalTrackLink();
            SiSendDeferredTracers();
        }

        function SiTrackExternalLink(idVar, closure) {
            siTagType = "trace";
            if (/string/.test(typeof (idVar))) {
                siClickedLinkID = idVar;
            }
            else {
                siClickedLinkID = idVar.getAttribute(siLinkAttribute);
            }
            SiInternalTrackLinkViaSynchronousSend(idVar, closure);
            return false;
        }

        function SiTrackLinkToUntagged(anchorTag) {
            siClickedLinkID = anchorTag.getAttribute(siLinkAttribute);
            siTagType = "trace";
            SiInternalTrackLinkImmediate();
            siTagType = "page";
            siTracerPath = anchorTag.href;
            if (siTracerPath.indexOf('://') == -1) {
                if (siTracerPath.substring(0, 1) != '/') {
                    var lastSlash = document.location.pathname.lastIndexOf('/');
                    var currentDirectory = document.location.pathname.substring(0, lastSlash + 1);
                    siTracerPath = currentDirectory + siTracerPath;
                }
                if (siTracerPath.substring(0, 2) != '//') {
                    siTracerPath = '//' + document.location.hostname + siTracerPath;
                }
                siTracerPath = document.location.protocol + siTracerPath;
            }
            var closure = SiInternalGetLinkClickingClosure(anchorTag);
            SiSyncTracer("fctgy", "fdtgy", closure, siTracerTimeout);
            return false;
        }

        function SiTrackData(query) {
            siTracerPath = "http://" + document.location.hostname + siBaseDirectory + "/data";
            siTracerQuery = query;
            siTagType = "extra";
            SiSendTracer(false, "fqcrtgy", "fqdrtgy");
        }

        this.SiAddTrackParam = function(name, value) {
            if (siSendParams != "")
                siSendParams += "&";
            siSendParams += escape(name) + "=" + escape(value);
            if (siSendParams.length >= 512)
                _self.SiSendTrackParams();
        }

        this.SiSendTrackParams = function() {
            if (siSendParams != "") {
                SiTrackData(siSendParams);
                siSendParams = "";
            }
        }

        function SiSetCookie(Name, Value, Timeout) {
            var Expiry = new Date;
            Expiry.setTime(Expiry.getTime() + Timeout);
            var Domain = SiGetDomain();
            var CookieDetails = Name + "=" + Value + ((siCookiePath) ? "; path=" + siCookiePath : "") + ((Domain) ? "; domain=" + Domain : "");
            document.cookie = CookieDetails + "; expires=" + Expiry.toGMTString();
            if (SiGetCookie(Name) != Value) {
                // Failed to set persistent cookie so try session cookie
                document.cookie = CookieDetails;
            }
        }

        function SiGetCookie(Name) {
            return SiExtractPart(Name, document.cookie, ";");
        }

        function SiExtractPart(Name, DataSource, DataEndChar) {
            var Prefix = Name + "=";
            var Value = null;
            var Begin = DataSource.indexOf(Prefix);
            if ((Begin != -1) && (Name.length > 0)) {
                var End = DataSource.indexOf(DataEndChar, Begin);
                if (End == -1) End = DataSource.length;
                Value = DataSource.substring(Begin + Prefix.length, End);
            }
            return Value;
        }

        function SiDeleteCookie(Name, Path, Domain) {
            var Expiry = new Date();
            Expiry.setTime(Expiry.getTime() - 1);
            if (!Path) Path = siCookiePath;
            if (!Domain) Domain = SiGetDomain();
            var CookieDetails = Name + "=null" + ((Path) ? "; path=" + Path : "") + ((Domain) ? "; domain=" + Domain : "");
            document.cookie = CookieDetails + "; expires=" + Expiry.toGMTString();
        }

        function SiBuildCookie() {
            var CookieValue = SiExtractPart(siCookieQPName, document.URL, "&");
            if (CookieValue != null) {
                SiSetCookie(siCookieName, CookieValue, siCookieTimeout);

                if (siCentralCookie) {
                    // Extract original referrer
                    var extractedURL = SiExtractPart(siCentralRefName, document.URL, "&");
                    if (extractedURL != null) {
                        siReferrer = unescape(extractedURL);
                    }

                    // Extract original request
                    extractedURL = SiExtractPart(siCentralReqName, document.URL, "&");
                    if (extractedURL != null) {
                        siRequest = unescape(extractedURL);
                    }
                }
            }
            else {
                CookieValue = SiGetCookie(siCookieName);
                if (CookieValue == null) {
                    CookieValue = SiEncodeDetails("u");
                    siIsCookieNew = 'Y';
                    SiSetCookie(siCookieName, CookieValue, siCookieTimeout);

                    if (siCentralCookie) {
                        // Check cookies can be set
                        CookieValue = SiGetCookie(siCookieName);
                        if (CookieValue != null) {
                            var centralURL = siCentralURL;
                            if (siCentralURL.indexOf("?") == -1) {
                                centralURL += "?";
                            }
                            else {
                                centralURL += "&";
                            }
                            centralURL += siCentralReqName + "=" + escape(document.URL) + "&" + siCentralRefName + "=" + escape(document.referrer);

                            // Stop any possibility of tag firing
                            siAutoTracer = false;

                            // Redirect to central cookie server
                            document.location = centralURL;
                        }
                    }
                }
            }
            CookieValue = SiGetCookie(siCookieName);
            return CookieValue;
        }

        function SiMigrateCookie(link) {
            var CookieValue = SiGetCookie(siCookieName);
            if (CookieValue != null) link.href = link.href + ((link.href.indexOf('?') > 0) ? "&" : "?") + siCookieQPName + "=" + CookieValue;
            return true;
        }

        function SiMigrateCookieForm(form) {
            var CookieValue = SiGetCookie(siCookieName);
            if (CookieValue != null) {
                if (form.method.toUpperCase() == "GET") {
                    try {
                        try {
                            var element = document.createElement('<input name="' + siCookieQPName + '" type="hidden" value="' + CookieValue + '" />');
                        }
                        catch (e) {
                            var element = document.createElement("input");
                            element.setAttribute("name", siCookieQPName);
                            element.setAttribute("type", "hidden");
                            element.setAttribute("value", CookieValue);
                        }
                        form.appendChild(element);
                    }
                    catch (andIgnore) { }
                }
                else {
                    form.action = form.action + ((form.action.indexOf('?') > 0) ? "&" : "?") + siCookieQPName + "=" + CookieValue;
                }
            }
            return true;
        }

        function SiProcessTracer(cookieForm, noCookieForm, dispatcher) {
            var tracer;
            if (siCookieValue == null) {
                tracer = siTaggingServer + siTrackerUrl + "?f=" + noCookieForm + "&d=" + SiEncodeDetails(noCookieForm);
            }
            else {
                tracer = siTaggingServer + siTrackerUrl + "?f=" + cookieForm + "&d=" + SiEncodeDetails(cookieForm);
            }

            siTagType = "";
            dispatcher(tracer);
        }

        function SiSendTracer(isPage, cookieForm, noCookieForm) {
            var sendNow = function(tracer) {
                var Tracker = new Image();
                Tracker.src = tracer;
                siImageSet[siImageSet.length] = Tracker;
            }

            SiProcessTracer(cookieForm, noCookieForm, sendNow);
        }

        function SiSyncTracer(cookieForm, noCookieForm, action, timeout) {
            var send = function(tracer) {
                var Tracker = new Image();
                if (action) {
                    siSyncFinishedAction = action;
                    if (timeout) {
                        var timeoutFn = function() {
                            if (siSyncFinishedAction) {
                                var exec = siSyncFinishedAction;
                                siSyncFinishedAction = null;
                                exec();
                            }
                        }
                        timeoutFn.toString = function() { return 'var exec = siSyncFinishedAction; siSyncFinishedAction = null; exec();' };
                        var runningTimeout = window.setTimeout(timeoutFn, timeout);
                    }
                }
                var checkDone = function() {
                    if (Tracker.complete && --siSyncTracersOutstanding == 0 && siSyncFinishedAction) {
                        if (runningTimeout) window.clearTimeout(runningTimeout);
                        var exec = siSyncFinishedAction;
                        siSyncFinishedAction = null;
                        exec();
                    }
                };
                try {
                    Tracker.addEventListener ?
		      Tracker.addEventListener("load", checkDone, false) :
		      Tracker.attachEvent("onreadystatechange", checkDone);
                } catch (e) { }
                ++siSyncTracersOutstanding;
                Tracker.src = tracer;
                siImageSet[siImageSet.length] = Tracker;
            }
            SiProcessTracer(cookieForm, noCookieForm, send)
        }

        function SiDeferTracer(cookieForm, noCookieForm) {
            if (siTracerCookieIdx < 25) {
                var defer = function(tracer) {
                    if (siTracerCookieIdx > 0) {
                        if (SiGetCookie(siTracerCookieName + (siTracerCookieIdx - 1)) == null)
                            siTracerCookieIdx = 0;
                    }

                    var cookieName = siTracerCookieName + siTracerCookieIdx++;
                    SiSetCookie(cookieName, tracer, 1800000); // 30 minute lifetime
                }

                SiProcessTracer(cookieForm, noCookieForm, defer);
            }
        }

        function SiTrackFormData(form, list) {
            return SiTrackForm(null, form, list);
        }

        function SiTrackExternalFormData(form, list, closure) {
            siTracerPath = "http://" + document.location.hostname + siBaseDirectory + "/form";
            SiInternalBuildFormTracerQuery(form, list);
            siTagType = "extra";
            if (!closure)
                closure = function() { form.submit() };
            SiSyncTracer("fqcrty", "fqdrty", closure, siTracerTimeout);
            return false;
        }

        function SiTrackForm(filePath, form, list) {
            siTracerPath = "http://" + document.location.hostname + (filePath == null ? siBaseDirectory + "/form" : filePath);
            SiInternalBuildFormTracerQuery(form, list);
            siTagType = "extra";
            SiDeferTracer("fqcrty", "fqdrty");
            return true;
        }

        function SiInternalBuildFormTracerQuery(form, list) {
            siTracerQuery = "";
            if (form.elements && (form.elements.length > 0)) {
                var doamp = false;
                for (var i = 0; i < form.elements.length; i++) {
                    var el = form.elements[i];
                    if (el.name) {
                        var capture = (list == null);
                        if (list != null) {
                            for (var j = 0; !capture && (j < list.length); j++) {
                                if (el.name == list[j]) capture = true;
                            }
                        }
                        if (capture && (el.type == "radio")) capture = el.checked;
                        if (capture) {
                            if (doamp) siTracerQuery += "&";
                            siTracerQuery += escape(el.name) + "=" + ((el.type == "checkbox") ? ((el.checked) ? "true" : "false") : escape(el.value));
                            doamp = true;
                        }
                    }
                }
            }
        }

        function SiTrackTracer(filePath, queryString) {
            SiInternalTrackTracer(filePath, queryString, null);
        }

        this.SiSendAdditionalTracer = function(filePath, queryString) {
            //console.log('sisending... ' + queryString);
            SiInternalTrackTracer(filePath, queryString, 'trace');
        }

        function SiInternalTrackTracer(filePath, queryString, tagType) {
            // If a base relative path prepend it with document protocol and hostname
            if (filePath.substring(0, 1) == '/') {
                filePath = document.location.protocol + "//" + document.location.hostname + filePath;
            }
            siTracerPath = filePath;
            siTracerQuery = queryString;
            siTagType = tagType;
            SiSendTracer(false, "fqcrtgy", "fqdrtgy");
        }

        this.SiTrackPage = function(pageID) {
            // If a page ID is supplied use it (ensuring it starts with /) as the path
            // but keep any existing query string
            if (pageID != undefined) {
                if (pageID.indexOf('://') == -1) {
                    if (pageID.substring(0, 1) != '/')
                        pageID = '/' + pageID;

                    pageID = document.location.protocol + "//" + document.location.hostname + pageID;
                }

                siRequest = pageID.indexOf('?') == -1 ? pageID + window.location.search : pageID + "&" + window.location.search.substring(1);
            }

            siTagType = "page";
            SiSendTracer(true, "pcrtgy", "pdrtgy");
        }

        function SiInitPage() {
            // Check if tagging server is specified
            if (siTaggingServer == null) {
                siTaggingServer = document.location.protocol + "//" + document.location.hostname + ":" + document.location.port;
            }
            else if (siTaggingServer.substring(0, 4) != "http") {
                // Assume tagging server specifies hostname but pick up protocol+port from document location
                siTaggingServer = document.location.protocol + "//" + siTaggingServer + ":" + document.location.port;
            }

            siCookieValue = SiBuildCookie();
            SiSendDeferredTracers();
        }

        function SiSendDeferredTracers() {
            var i = 0;
            var cookieName = siTracerCookieName + i++;
            var tracer = SiGetCookie(cookieName);
            while (tracer) {
                var Tracker = new Image();
                Tracker.src = tracer;
                siImageSet[siImageSet.length] = Tracker;

                SiDeleteCookie(cookieName);

                cookieName = siTracerCookieName + i++;
                tracer = SiGetCookie(cookieName);
            }
        }

        SiInitPage();

        if (window.siAutoTracer) {
            this.SiTrackPage();
        }
    }
}