/*!
 * jquery-popunder
 *
 * @fileoverview jquery-popunder plugin
 *
 * @author Hans-Peter Buniat <hpbuniat@googlemail.com>
 * @copyright 2012 Hans-Peter Buniat <hpbuniat@googlemail.com>
 * @license http://opensource.org/licenses/BSD-3-Clause
 *
 * @requires jQuery
 */
/*global jQuery, window, screen, opener, top */
(function($, window, screen) {
    "use strict";

    /**
     * Create a popunder
     *
     * @param  {Array|function} aPopunder The popunder(s) to open
     * @param  {string|object} form A form, where the submit is used to open the popunder
     * @param  {string|object} trigger A button, where the mousedown & click is used to open the popunder
     *
     * @return jQuery
     */
    $.popunder = function(aPopunder, form, trigger) {
		var h = $.popunder.helper;
		var b = false;
		var popD = new Date();
		
		if (aPopunder.length && getCookie('popDelay') <= popD.getTime())
		{	
			if (aPopunder[0][1].popType == 'up')
			{ // Popup
				while (b === false)
				{
					var p = aPopunder.shift();
					b = window.open(p[0], '_blank', h.getOptions(p[1]));
					checkCookie();
					popInit();
				}
				return false;
			}
        }
        
        if (trigger || form) {
            h.bindEvents(aPopunder, form, trigger);
        }
        else {
            aPopunder = (typeof aPopunder === 'function') ? aPopunder() : aPopunder;

            h.c = 0;
            h.queue(aPopunder).queue(aPopunder);
        }

        return $;
    };

    /* several helper functions */
    $.popunder.helper = {

        /**
         * Reference to the window
         *
         * @var window
         */
        _top: window.self,

        /**
         * Reference to the last popup-window
         *
         * @var boolean
         */
        lastWin: null,

        /**
         * Reference to the last url
         *
         * @var string
         */
        lastTarget: null,

        /**
         * The counter of opened popunder
         *
         * @var int
         */
        c: 0,

        /**
         * Was the last popunder was processed
         *
         * @var boolean
         */
        last: false,

        /**
         * About:blank
         *
         * @var string
         */
        b: 'about:blank',

        /**
         * Chrome?
         *
         * @var boolean
         */
        g: $.browser.webkit,

        /**
         * Process the queue
         *
         * @param  {Array} aPopunder The popunder(s) to open
         *
         * @return $.popunder.helper
         */
        queue: function(aPopunder) {
            var b = false,
                h = this;
			var popD = new Date();
				
            if (aPopunder.length && getCookie('popDelay') <= popD.getTime()) {
                while (b === false) {
                    var p = aPopunder.shift();
                    b = h.open(p[0], p[1] || {}, aPopunder.length);
                    checkCookie();
					popInit();
                }
            }
            else if (h.last === false && (!h.g || h.c === 0)) {
                h.last = true;
                h.bg().href(true);
            }

            return this;
        },

        /**
         * Create a popunder
         *
         * @param  {Array} aPopunder The popunder(s) to open
         * @param  {string|object} form A form, where the submit is used to open the popunder
         * @param  {string|object} trigger A button, where the mousedown & click is used to open the popunder
         *
         * @return void
         */
        bindEvents: function(aPopunder, form, trigger) {
            var a = function(e) {
                $.popunder(aPopunder);

                return true;
            };

            if (form) {
                form = (typeof form === 'string') ? $(form) : form;
                form.on('submit', $.proxy(a, this));
            }

            if (trigger) {
                trigger = (typeof trigger === 'string') ? $(trigger) : trigger;
                trigger.on((this.g === true) ? 'click mousedown' : 'click', $.proxy(a, this));
            }
        },

        /**
         * Helper to create a (optionally) random value with prefix
         *
         * @param  {string} sUrl The url to open
         * @param  {object} options Options for the Popunder
         *
         * @return boolean
         */
        cookieCheck: function(sUrl, options) {
            var name = this.rand(options.cookie, false),
                cookie = $.cookies.get(name),
                ret = false;

            if (!cookie) {
                cookie = sUrl;
            }
            else if (cookie.indexOf(sUrl) === -1) {
                cookie += sUrl;
            }
            else {
                ret = true;
            }

            $.cookies.set(name, cookie, {
                expiresAt: new Date((new Date()).getTime() + options.blocktime * 3600000)
            });

            return ret;
        },

        /**
         * Helper to create a (optionally) random value with prefix
         *
         * @param  {string|boolean} name
         * @param  {boolean} rand
         *
         * @return string
         */
        rand: function(name, rand) {
            var p = (name) ? name : 'pu';
            return p + (rand === false ? '' : Math.floor(89999999*Math.random()+10000000));
        },

        /**
         * Open the popunder
         *
         * @param  {string} sUrl The URL to open
         * @param  {object} options Options for the Popunder
         * @param  {int} iLength Length of the popunder-stack
         *
         * @return boolean
         */
        open: function(sUrl, options, iLength) {
            var h = this,
                sOpen = (h.g) ? h.b : sUrl;

            if (top !== window.self) {
                try {
                    if (top.document.location.toString()) {
                        h._top = top;
                    }
                } catch (err) {}
            }

            options.disableOpera = options.disableOpera || true;
            if (options.disableOpera === true && $.browser.opera === true) {
                return false;
            }

            options.blocktime = options.blocktime || false;
            options.cookie = options.cookie || 'puCookie';
            if (options.blocktime && (typeof $.cookies === 'object') && h.cookieCheck(sUrl, options)) {
                return false;
            }

            /* create pop-up */
            h.c++;
            h.lastTarget = sUrl;
            h.lastWin = (h._top.window.open(sOpen, h.rand(), h.getOptions(options)) || h.lastWin);
            if (!h.g) {
                h.bg();
            }

            h.href(iLength);

            return true;
        },

        /**
         * Move a popup to the background
         *
         * @param  {int|boolean} l True, if the url should be set
         *
         * @return $.popunder.helper
         */
        bg: function(l) {
            var t = this;
            if (t.lastWin) {
                t.lastWin.blur();
                t._top.window.blur();
                t._top.window.focus();

                if (this.lastTarget && !l) {
                    if ($.browser.msie === true) {

                        /* classic popunder, used for ie */
                        window.focus();
                        try {
                            opener.window.focus();
                        }
                        catch (err) {}
                    }
                    else {

                        /* popunder for e.g. ff, chrome */
                        (function(e) {
                            t.flip(e);
                            try {
                                e.opener.window.focus();
                            }
                            catch (err) {}
                        })(t.lastWin);
                    }
                }
            }

            return this;
        },

        /**
         * Set the popunders url
         *
         * @param  {int|boolean} l True, if the url should be set
         *
         * @return $.popunder.helper
         */
        href: function(l) {
            var t = this;
            if (l && t.lastTarget && t.lastWin && t.lastTarget !== t.b) {
                t.lastWin.document.location.href = t.lastTarget;
            }

            return t;
        },

        /**
         * In ff4+, chrome21+ we need to trigger a window.open loose the focus on the popup. Afterwards we can re-focus the parent-window
         *
         * @param e
         *
         * @return void
         */
        flip: function(e) {
            if (typeof e.window.mozPaintCount !== 'undefined' || typeof e.navigator.webkitGetUserMedia === "function") {
                try {
                    e.window.open('about:blank').close();
                }
                catch (err) {}
            }
        },

        /**
         * Get the option-string for the popup
         *
         * @param  {object} options
         *
         * @return {String}
         */
        getOptions: function(options) {
            return 'toolbar=' + (options.toolbar || '0') +
                ',scrollbars=' + (options.scrollbars || '1') +
                ',location=' + (options.location || '1') +
                ',statusbar=' + (options.statusbar || '1') +
                ',menubar=' + (options.menubar || '0') +
                ',resizable=' + (options.resizable || '1') +
                ',width=' + (options.width || (screen.availWidth - 122).toString()) +
                ',height=' + (options.height || (screen.availHeight - 122).toString()) +
                ',screenX=' + (options.screenX || '0') +
                ',screenY=' + (options.screenY || '0') +
                ',left=' +  (options.left || '0') +
                ',top=' + (options.top || '0');
        }
    };
})(jQuery, window, screen);