/*!
 * @author        : a-Sansara <dev]]@[[a-sansara]]dot[[net>
 * @contributors  :
 * @copyright     : pluie.org
 * @date          : 2015-12-10 22:22:34
 * @version       : 0.8
 * @license       : MIT
 * @require       : html5 localStorage svan (small vanilla jquery-like lib)
 * @desc          : manage communication between browser tabs
 *
 *  USAGE :
 *
 *
 *  Initialize
 *
 *
 *      $(document).ready(function() {
 *          // $bt.zkillonload = false // disable zombkill cmd at statup
 *          $bt.init(optionalCallback);
 *      });
 *
 *
 *
 *  Internal Commands
 *
 *      // append data on node to other browser tabs
 *      $bt.append('#test', "<b>it's cool to append</b>");
 *
 *      // rewrite content on node to other browser tabs
 *      $bt.html('#test', "<b>it's cool to rewrite</b>");
 *
 *      // append content to specific browser tab
 *      $bt.append('#test', "<b>it's cool to rewrite</b>", null, null, '1449974562012');
 *
 *      // rewrite content to specified browser tab with callback
 *      // callback must be define before command with method $bt.setCallback('callbackname', callback);
 *      $bt.html('#test', "<b>it's cool to rewrite</b>", null, 'callbackname', '1449974562012');
 *
 *      // append content to specified browser tab on specific frame
 *      $bt.append('#test', "<b>it's cool to rewrite</b>", 'frameName', null, '1449974562012');
 *
 *      // perform a node synchro to other browser tabs
 *      $bt.sync('#test');
 *
 *      // perform a node synchro to specified browser tab on specific frame with callback
 *      $bt.sync('#test', 'frameName', 'callbackname', '1449974562012');
 *
 *      // perform a node attr synchro to all browser tab
 *      $bt.attr('#test', ['class', 'title']);
 *
 *      // perform a varset to all tabs
 *      $bt.varset('myVar', { toto : tutu : { tata : "titi" }});
 *
 *       // perform a varsync from specific tab (for example after calling tab will reload)
 *      $bt.varsync('myVar', '1449974562012');
 *
 *      // reload other browser tabs
 *      $bt.reload();
 *
 *      // reload specific browser tab to specific url
 *      $bt.reload(window.location.path+"?reloaded=1", '1449974562012');
 *
 *      // check and kill zombies tabs
 *      $bt.zombkill();
 *
 *      // get browser tab list
 *      $bt.list;
 *
 *      // current browser tab id
 *      $bt.id;
 *
 *
 *  Custom Commands
 *
 *      // define a new custom cmd
 *      $bt.CMD_CUSTOM = "customCmd";
 *      // treat custom command to other browser tabs
 *      $bt.on = function(cmd) {
 *          switch (cmd.name) {
 *              case $bt.CMD_CUSTOM :
 *                  // do stuff
 *                  $bt.log("custom command `'+cmd.name+'` with `'+cmd.customKey+'`');
 *              break;
 *          }
 *      }
 *
 *      // it's also possible to define a before and after function :
 *      $bt.before = function(cmd) {
 *          $bt.log("i'm fired before every command");
 *      }
 * 
 *      $bt.after = function(cmd) {
 *          $bt.log("i'm fired after every command");
 *      }
 *
 *      // send a custom command to other browser tabs
 *      $bt.send({ name : $bt.CMD_CUSTOM, customKey : 'customValue' });
 *
 *
 *  Bonus
 *
 *      // alias localStorage : clear|rem|get|set
 *      $l;
 *      // alias json : str|obj
 *      $j
 *
 *  enjoy !
 */

var $l = (function alias() {
    var a = localStorage;
    return {
        clear : function() { return a.clear(); },
        get   : function(k) { return a.getItem(k); },
        rem   : function(k) { return a.removeItem(k); },
        set   : function(k, v) { return a.setItem(k, v); }
    };
}());

var $j = (function alias() {
    var a = JSON;
    return {
        str : function(o) { return a.stringify(o); },
        obj : function(s) { return a.parse(s); }
    };
}());

var $bt  = {
    VERSION      : 0.8,
    UID          : null,
    HASH         : null,
    TRACE        : true && !$.isNone(console),
    setConstant  : function(value, name) {
        if (!name) {
            if (this.UID == null) throw Error('UID is not define, you need to define $bt.UID or provide the "name" parameter');
            else if (this.HASH == null) {
                this.HASH = this._getHash(this.UID);
            }
            return this.HASH+'.'+value;
        }
        return _getHash(name)+'.'+value;
    },
    /*! @var vars */
    vars         : [],
    /*! @var callbacks */
    callbacks    : [],
    /*! @var zomblist */
    zomblist     : [],
    /*! @var zkillonload */
    zkillonload  : true,
    /*! @var zombTimeout in ms */
    zombTimeout  : 250,
    /*!
     * @desc    initialize on dom ready
     * @public
     * @method  init
     * @param   string  fn          a function to call on initializing on dom ready
     */
    init         : function(uid, fn) {
        if (!fn && $.isFunc(uid) || arguments.length==0) {
            if (this.UID == null) throw Error('UID is not define, you need to define $bt.UID or provide the "uid" parameter');
            if (arguments.length > 0) fn  = uid;
            uid = this.UID;
        }
        this._initConstant(uid);
        this._init(fn);
    },
    /*!
     * @desc    custom method to implements before custom command
     * @public
     * @method  before
     * @param   string  cmd         a cmd to treat
     */
    /*!
     * @desc    custom method to implements after  custom command
     * @public
     * @method  after
     * @param   string  cmd         a cmd to treat
     */
    /*!
     * @desc    custom method to implements custom command
     * @public
     * @method  on
     * @param   string  cmd         a cmd to treat
     */
    /*!
     * @desc    console log if trace is enabled
     * @public
     * @method  on
     * @param   mix     data        data to log
     */
    log          : function(data) {
        if (this.TRACE) console.log(data);
    },
    /*!
     * @desc    send a command to other tabs
     * @public
     * @method  send
     * @param   object  cmd         the cmd to send
     */
    send         : function(cmd) {
        cmd.uid  = this.id+Math.random();
        cmd.from = this.id;
        if ($.isNone(cmd.to)) cmd.to = "*";
        cmd = $j.str(cmd);
        $bt.log('sending cmd : '+this.LS_CMD+' : '+cmd);
        $l.set(this.LS_CMD, cmd);
        $l.rem(this.LS_CMD);
    },
    /*!
     * @desc    perform a dom append command on other tabs
     * @public
     * @method  append
     * @param   string  selector    the selector wich target the node(s)
     * @param   string  data        the data to append
     * @param   string  ctx         context name of selector (frame name relative to document wich match specified selector) or if not defined or null current document
     * @param   string  callback    callback name to fire on command
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    append       : function(selector, data, ctx, callback, btid) {
        this._dom(this.CMD_APPEND, ctx, selector, data, callback, btid);
    },
    /*!
     * @desc    perform a dom prepend command on other tabs
     * @public
     * @method  append
     * @param   string  selector    the selector wich target the node(s)
     * @param   string  data        the data to append
     * @param   string  ctx         context name of selector (frame name relative to document wich match specified selector) or if not defined or null current document
     * @param   string  callback    callback name to fire on command
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    prepend       : function(selector, data, ctx, callback, btid) {
        this._dom(this.CMD_PREPEND, ctx, selector, data, callback, btid);
    },
    /*!
     * @desc    perform a dom html command on other tabs
     * @public
     * @method  append
     * @param   string  selector    the selector wich target the node(s)
     * @param   string  data        the data to append
     * @param   string  ctx         context name of selector (frame name relative to document wich match specified selector) or if not defined or null current document
     * @param   string  callback    callback name to fire on command
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    html         : function(selector, data, ctx, callback, btid) {
        this._dom(this.CMD_HTML, ctx, selector, data, callback, btid);
    },
    /*!
     * @desc    perform a dom synchro command on other tabs
     * @public
     * @method  sync
     * @param   string  selector    the selector wich target the node(s) to synchro
     * @param   string  ctx         context name of selector (frame name relative to document wich match specified selector) or if not defined or null current document
     * @param   string  callback    callback name to fire on command
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    sync         : function(selector, ctx, callback, btid) {
        var c = !$.isNone(ctx) && ctx != null ? parent.frames[ctx].document : document;
        this._dom(this.CMD_HTML, ctx, selector, $(selector, c).html(), callback, btid);
    },
    /*!
     * @desc    perform a reload command on other tabs with specified url
     * @public
     * @method  reload
     * @param   string  url         the url to load (if not defined load current page)
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    reload       : function(url, btid) {
        $bt.send({ name : $bt.CMD_RELOAD, url : url, to : !btid ? '*' : btid });
    },
    /*!
     * @desc    define a callback. callback are fire on desire command 
     * @public
     * @method  setCallback
     * @param   string   name        the callback name (for command binding)
     * @param   function callback    the callback
     */
    setCallback  : function(name, callback) {
        if ($.isNone($bt.callbacks[name])) {
            $bt.callbacks[name] = callback;
        }
        else {
            console.log("BT ERROR : callback name already exist");
        }
    },
    /*!
     * @desc    kill all zombi tabs
     * @public
     * @method  zombkill
     * @param   int     timeout     timeout ins ms for killing zombies (no ping reply)
     */
    zombkill     : function(callback, timeout) {
        var askid = (new Date).getTime();
        $bt.zomblist[''+askid] = [];
        $bt.list.forEach(function(id) {
            if (id != $bt.id) {
                $bt.zomblist[''+askid]['ping'+id] = '';
            }
        });
        $bt.send({ name : $bt.CMD_ZOMBKILL, askid : askid, to : '*' });
        var tid = setTimeout(function() {
            $bt._refresh();
            for(var k in $bt.zomblist[''+askid]) {
                if ($bt.zomblist[''+askid][k] != 'pong') {
                    var i = $bt.list.indexOf(parseInt(k.substring(4)));
                    if (i > -1) $bt.list.splice(i, 1);
                }
            }
            $l.set($bt.LS_TABS, $j.str($bt.list));
            $bt._broadcast();
            $bt.log($bt.list);
            clearTimeout(tid);
            if ($.isFunc(callback)) callback();
        }, !timeout ? $bt.zombTimeout : timeout);
    },
    /*!
     * @desc    perform a var set command on other tabs
     * @public
     * @method  varset
     * @param   string  varName     the var identifier
     * @param   object  data        the data object (wich need to be stringifiable via json)
     * @param   string  callback    callback name to fire on command
     * @param   int     btid        target browser tab id (if not defined all target all tabs)
     */
    varset : function(varName, data, callback, btid) {
        try {
            var djson = $j.str(data);
            $bt.vars[varName] = data;
            $bt.send({ name : $bt.CMD_VAR_SET, varName : varName, data : djson, callback : callback, to : !btid ? '*' : btid });
        }
        catch(e) {
            console.log(e);
        }
    },
    /*!
     * @desc    perform a var sync command on specified tab
     * @public
     * @method  varset
     * @param   string  varName     the var identifier
     * @param   string  callback    callback name to fire on command
     * @param   int     fromId      target browser tab id (must be defined and uniq)
     */
    varsync : function(varName, callback, toId) {
        $bt.send({ name : $bt.CMD_VAR_SYNC, varName : varName, data : '', callback : callback, to : toId });
    },
    /*!
     * @desc    perform a dom attribute synchro command on other tabs
     * @public
     * @method  sync
     * @param   string           selector    the selector wich target the node(s) to synchro
     * @param   string|[string]  attrName    attribute name to sync
     * @param   string           ctx         context name of selector (frame name relative to document wich match specified selector) or if not defined or null current document
     * @param   string           callback    callback name to fire on command
     * @param   int              btid        target browser tab id (if not defined all target all tabs)
     */
    attr : function(selector, attrName, ctx, callback, btid) {
        var context = !ctx ? document : window.parent.frames[ctx].document;
        if ($.isStr(attrName)) attrName = [ attrName ];
        var data = [];
        attrName.forEach(function (attr, index) {
            data.push(attr != "disabled" ? $(selector, context).attr(attr) : $(selector, context).first().disabled);
        });
        $bt.send({ name : $bt.CMD_ATTR_SYNC, attr : attrName, selector : selector, data : data, context : ctx, callback : callback, to : !btid ? '*' : btid });
    },
    _dontkill    : function(askid, id) {
        $bt.send({ name : $bt.CMD_DONTKILL, askid : askid, to : id });
    },
    /*! @private */
    _refresh     : function() {
        $bt.list = $j.obj($l.get($bt.LS_TABS));
    },
    /*! @private */
    _broadcast   : function() {
        $bt.send({ name : $bt.CMD_SYNC });
    },
    /*! @private */
    _remove      : function(id) {
        if (!id) id = $bt.id;
        var i = $bt.list.indexOf(id);
        if (i > -1) $bt.list.splice(i, 1);
    },
    /*! @private */
    _getHash     : function(name) {
        name = window.location.host + '#' + name;
        var uid = 0;
        for (var i = 0, c = 0, lim = name.length; i < lim; i++) {
            uid = ((uid<<5)-uid)+name.charCodeAt(i);
            uid = uid & uid; // Convert to 32bit integer
        }
        return Math.abs(uid);
    },
    /*! @private */
    _initConstant : function(name) {
        var uid = this.HASH != null ? this.HASH : this._getHash(name);
        /*! @constant LS_TABS localStorage key for browsertabs list  */
        this.LS_TABS       = uid+'.bt.list',
        /*! @constant LS_CURTAB localStorage key for current browsertab */
        this.LS_CURTAB     = uid+'.bt.current',
        /*! @constant LS_CMD localStorage key command to interact with other tabs */
        this.LS_CMD        = uid+'.bt.event',
        /*! @constant CMD_SYNC internal command to perform a browser tab synchro */
        this.CMD_SYNC      = uid+'.bt.sync',
        /*! @constant CMD_VAR_SET internal command to perform a browser tab var set */
        this.CMD_VAR_SET   = uid+'.bt.varset',
        /*! @constant CMD_VAR_SYNC internal command to perform a browser tab var sync */
        this.CMD_VAR_SYNC  = uid+'.bt.varsync',
        /*! @constant CMD_ATTR_SYNC internal command to perform a dom sync attribute */
        this.CMD_ATTR_SYNC = uid+'.bt.attr',
        /*! @constant CMD_APPEND internal command to perform a dom append */
        this.CMD_APPEND    = uid+'.bt.dom.append',
        /*! @constant CMD_PREPEND internal command to perform a dom append */
        this.CMD_PREPEND   = uid+'.bt.dom.prepend',
        /*! @constant CMD_HTML internal command to perform a dom html */
        this.CMD_HTML      = uid+'.bt.dom.rewrite',
        /*! @constant CMD_RELOAD internal command to perform a browser tab reload */
        this.CMD_RELOAD    = uid+'.bt.reload',
        /*! @constant CMD_ZOMBKILL internal command to perform a browser tab zombies kill */
        this.CMD_ZOMBKILL  = uid+'.bt.zombkill',
        /*! @constant CMD_DONTKILL internal command to perform a dontkill browser tab (CMD_ZOMBKILL reply) */
        this.CMD_DONTKILL  = uid+'.bt.dontkill'
    },
    /*! @private */
    _init        : function(fn) {
        $(window).on('beforeunload', $bt._unload);
        $(window).on('storage', $bt._cmd);
        $bt._defHandlerCurrentTab();
        // $(window).on('focus', $bt._focus); replace by _defHandlerCurrentTab to fix frame context
        $bt.id   = (new Date).getTime();
        var t    = $l.get($bt.LS_TABS);
        $bt.list = t==null ? [] : $j.obj(t);
        $bt.list.push($bt.id);
        $l.set($bt.LS_TABS, $j.str($bt.list));
        $bt._broadcast();
        $bt.log($bt.list);
        if ($bt.zkillonload) $bt.zombkill(fn);
        else if ($.isFunc(fn)) {
            fn();
        }
    },
    /*! @private */
    _defHandlerCurrentTab : function() {
        var evcVal  = "hidden";
        var evcType = "visibilitychange";
        if (!$.isNone(document.mozHidden)) {
            evcVal  = "mozHidden";
            evcType = "mozvisibilitychange";
        } else if (!$.isNone(document.msHidden)) {
            evcVal  = "msHidden";
            evcType = "msvisibilitychange";
        } else if (!$.isNone(document.webkitHidden)) {
            evcVal  = "webkitHidden";
            evcType = "webkitvisibilitychange";
        }
        $(window).on(evcType, function() {
            if (!document[evcVal]) {
                $bt.log('SET CURRENT TAB : '+$bt.id);
                $l.set($bt.LS_CURTAB, $bt.id);
            }
        }, false);
    },
    /*! @private */
    _dom         : function(n, c, s, d, cb, id) {
        $bt.send({ name : n, context : c, selector : s, data : d, callback : cb, to : !id ? '*' : id });
    },
    /*! @private */
    _unload      : function(e) {
        $bt._refresh();
        $bt._remove();
        $l.set($bt.LS_TABS, $j.str($bt.list));
        $bt._broadcast();
        return null;
    },
    /*! @private */
    //~ _focus       : function(e) {
        //~ $l.set($bt.LS_CURTAB, $bt.id);
    //~ },
    /*! @private */
    _cmd         : function(e) {
        if (!$.isNone(e.originalEvent)) e = e.originalEvent;
        if (e.key!=$bt.LS_CMD) return;
        var cmd = $j.obj(e.newValue);
        if (!cmd) return;
        if (cmd.to == "*" || cmd.to == $bt.id) {
            console.log('RECEIVING cmd '+cmd.name+' : ');
            console.log(cmd);
            try {
                if (!$.isNone(cmd.context) && cmd.context!=null && !$.isNone(window.parent.frames[cmd.context])) {
                    cmd.context = window.parent.frames[cmd.context].document;
                }
                else cmd.context = document;
            }
            catch(e) {
                $bt.log("bad context "+cmd.context+" : "+e.message);
            }
            if ($.isFunc($bt.before)) $bt.before(cmd);
            switch(cmd.name) {

                case $bt.CMD_SYNC : 
                    $bt._refresh();
                    $bt.log($bt.list);
                    break;

                case $bt.CMD_APPEND :
                    $(cmd.selector, cmd.context).append(cmd.data);
                    break;

                case $bt.CMD_HTML :
                    $(cmd.selector, cmd.context).html(cmd.data);
                    break;

                case $bt.CMD_PREPEND :
                    $(cmd.selector, cmd.context).prepend(cmd.data);
                    break;

                case $bt.CMD_RELOAD :
                    window.location = !$.isNone(cmd.url) ? cmd.url : window.location;
                    break;

                // emit response for zombkill
                case $bt.CMD_ZOMBKILL :
                    $bt._dontkill(cmd.askid, cmd.from);
                    break;

                // receiv response for zombkill
                case $bt.CMD_DONTKILL :
                    $bt.zomblist[''+cmd.askid]['ping'+cmd.from] = 'pong';
                    break;

                case $bt.CMD_VAR_SET :
                    $bt.vars[cmd.varName] = $j.obj(cmd.data);
                    break;

                case $bt.CMD_VAR_SYNC :
                    if (!$.isNone($bt.vars[cmd.varName])) $bt.varset(cmd.varName, $bt.vars[cmd.varName]);
                    break;

                case $bt.CMD_ATTR_SYNC :
                    cmd.attr.forEach(function(attr, index) {
                        if (cmd.attr != "disabled") {
                            $(cmd.selector, cmd.context).attr(attr, cmd.data[index]);
                        }
                        else {
                            $(cmd.selector, cmd.context).first().disabled = cmd.data[index];
                        }
                    });
                    break;

                default :
                    // do your stuff here
                    if ($.isFunc($bt.on)) $bt.on(cmd);
                    break;
            }
            if ($.isStr(cmd.callback) && cmd.callback.length>0 && !$.isNone($bt.callbacks[cmd.callback]) && $.isFunc($bt.callbacks[cmd.callback])) {
                $bt.log(cmd.callback);
                $bt.callbacks[cmd.callback].call({}, cmd);
            }
            if ($.isFunc($bt.after)) $bt.after(cmd);
        }
    }
}