/AS3/Zombeez/src/mochi/as3/MochiServices.as

/**
* MochiServices
* Connection class for all MochiAds Remote Services
* @author Mochi Media
*/

package mochi.as3 {

    import flash.geom.Rectangle;
    import flash.display.DisplayObject;
    import flash.display.DisplayObjectContainer;
    import flash.display.Sprite;
    import flash.display.MovieClip;
    import flash.events.StatusEvent;
    import flash.events.TimerEvent;
    import flash.system.Security;
    import flash.system.Capabilities;
    import flash.display.Loader;
    import flash.events.Event;
    import flash.events.IOErrorEvent;
    import flash.net.URLRequest;
    import flash.net.URLRequestMethod;
    import flash.net.URLVariables;
    import flash.net.LocalConnection;
    import flash.net.navigateToURL;
    import flash.utils.Timer;
    import flash.utils.getTimer;
    import flash.utils.ByteArray;
    import flash.utils.Endian;
    import flash.utils.setTimeout;

    public class MochiServices {

        private static var _id:String;
        private static var _container:Object;
        private static var _clip:MovieClip;
        private static var _loader:Loader;
        private static var _timer:Timer;
        private static var _preserved:Object;

        private static var _servURL:String = "http://www.mochiads.com/static/lib/services/"
        private static var _services:String = "services.swf";
        private static var _mochiLC:String = "MochiLC.swf";

        private static var _swfVersion:String;

        private static var _listenChannelName:String = "__ms_";
        private static var _sendChannel:LocalConnection;
        private static var _sendChannelName:String;

        private static var _connecting:Boolean = false;
        private static var _connected:Boolean = false;

        public static var netup:Boolean = true;
        public static var netupAttempted:Boolean = false;

        public static var onError:Object;

        public static var widget:Boolean = false;
        public static var servicesSync:MochiSync = new MochiSync();

        private static var _mochiLocalConnection:MovieClip;

        private static var _queue:Array;
        private static var _nextCallbackID:Number;
        private static var _callbacks:Object;

        //
        public static function get id ():String {
            return _id;
        }

        //
        public static function get clip ():Object {
            return _container;
        }

        //
        public static function get childClip ():Object {
            return _clip;
        }

        //
        //
        public static function getVersion():String {
            return "3.8 as3";
        }

        //
        //
        public static function allowDomains(server:String):String {
            if( flash.system.Security.sandboxType != "application" )
            {
                flash.system.Security.allowDomain("*");
                flash.system.Security.allowInsecureDomain("*");
            }

            if (server.indexOf("http://") != -1) {
                var hostname:String = server.split("/")[2].split(":")[0];

                if( flash.system.Security.sandboxType != "application" )
                {
                    flash.system.Security.allowDomain(hostname);
                    flash.system.Security.allowInsecureDomain(hostname);
                }
            }

            return hostname;
        }

        //
        //
        public static function isNetworkAvailable():Boolean {
            return Security.sandboxType != "localWithFile";
        }

        //
        public static function set comChannelName(val:String):void {
            if (val != null) {
                if (val.length > 3) {
                    _sendChannelName = val + "_fromgame";
                    initComChannels();
                }
            }
        }

        //
        public static function get connected ():Boolean {
            return _connected;
        }

        public static function warnID(bid:String, leaderboard:Boolean):void {
            bid = bid.toLowerCase();

            if( bid.length != 16 )
            {
                trace( "WARNING: " + (leaderboard?"board":"game") + " ID is not the appropriate length" );
                return ;
            }
            else if( bid == "1e113c7239048b3f" )
            {
                if( leaderboard )
                    trace( "WARNING: Using testing board ID");
                else
                    trace( "WARNING: Using testing board ID as game ID");
                return ;
            }
            else if( bid == "84993a1de4031cd8" )
            {
                if( leaderboard )
                    trace( "WARNING: Using testing game ID as board ID");
                else
                    trace( "WARNING: Using testing game ID");
                return ;
            }

            for( var i:Number = 0; i < bid.length; i++ )
            {
                switch( bid.charAt(i) )
                {
                    case "0": case "1": case "2": case "3":
                    case "4": case "5": case "6": case "7":
                    case "8": case "9": case "a": case "b":
                    case "c": case "d": case "e": case "f":
                        continue ;
                    default:
                        trace( "WARNING: Board ID contains illegal characters: " + bid );
                        return ;
                }
            }
        }

        /**
         * Method: connect
         * Connects your game to the MochiServices API
         * @param    id the MochiAds ID of your game
         * @param    clip the MovieClip in which to load the API (optional for all but AS3, defaults to _root)
         * @param    onError a function to call upon connection or IO error
         */
        public static function connect (id:String, clip:Object, onError:Object = null):void {
            warnID( id, false );
            if (clip is DisplayObject) {
                if( clip.stage == null )
                {
                    trace("MochiServices connect requires the containing clip be attached to the stage");
                }
                if (!_connected && _clip == null) {
                    trace("MochiServices Connecting...");
                    _connecting = true;
                    init(id, clip);
                }
            } else {
                trace("Error, MochiServices requires a Sprite, Movieclip or instance of the stage.");
            }
            if (onError != null) {
                MochiServices.onError = onError;
            } else if (MochiServices.onError == null) {
                MochiServices.onError = function (errorCode:String):void { trace(errorCode); }
            }
        }

        public static function disconnect ():void {
            if (_connected || _connecting) {
                if (_clip != null) {
                    if (_clip.parent != null) {
                        if (_clip.parent is Sprite) {
                            Sprite(_clip.parent).removeChild(_clip);
                            _clip = null;
                        }
                    }
                }
                _connecting = _connected = false;
                flush(true);
                try {
                    _mochiLocalConnection.close();
                } catch (error:Error) { }
            }
            if (_timer != null) {
                try {
                    _timer.stop();
                } catch (error:Error) { }
            }
        }

        public static function stayOnTop ():void {
            _container.addEventListener(Event.ENTER_FRAME, MochiServices.bringToTop, false, 0, true);
            if (_clip != null) { _clip.visible = true; }
        }


        public static function doClose ():void {
            _container.removeEventListener(Event.ENTER_FRAME, MochiServices.bringToTop);
        }

        public static function bringToTop (e:Event = null):void {
            if (MochiServices.clip != null && MochiServices.childClip != null) {
                try {
                    if (MochiServices.clip.numChildren > 1) {
                        MochiServices.clip.setChildIndex(MochiServices.childClip, MochiServices.clip.numChildren - 1);
                    }
                } catch (errorObject:Error) {
                    trace("Warning: Depth sort error.");
                    _container.removeEventListener(Event.ENTER_FRAME, MochiServices.bringToTop);
                }
            }
        }

        //
        //
        private static function init (id:String, clip:Object):void {
            _id = id;
            if (clip != null) {
                _container = clip;
                loadCommunicator(id, _container);
            }

        }

        //
        //
        public static function setContainer (container:Object = null, doAdd:Boolean = true):void {
            if( _clip.parent )
                _clip.parent.removeChild(_clip);
                
            if (container != null) {
                if (container is DisplayObjectContainer) _container = container;
            }

            if (doAdd) {
                if (_container is DisplayObjectContainer) {
                    DisplayObjectContainer(_container).addChild(_clip);
                }
            }
        }


        //
        //
        private static function loadCommunicator (id:String, clip:Object):MovieClip {
            if (_clip != null) {
                return _clip;
            }

            if (!MochiServices.isNetworkAvailable()) {
                return null;
            }

            if (urlOptions(clip).servURL) {
                _servURL = urlOptions(clip).servURL;
            }
            var servicesURL:String = _servURL + _services;

            if (urlOptions(clip).servicesURL) {
                servicesURL = urlOptions(clip).servicesURL;
            }

            _listenChannelName += Math.floor((new Date()).time) + "_" + Math.floor(Math.random() * 99999);

            MochiServices.allowDomains(servicesURL);

            _clip = new MovieClip();

            loadLCBridge(_clip);

            // load services swf into container
            _loader = new Loader();
            _loader.contentLoaderInfo.addEventListener(IOErrorEvent.IO_ERROR, loadError);

            var req:URLRequest = new URLRequest(servicesURL);
            var vars:URLVariables = new URLVariables();

            // variables for services.swf
            vars.listenLC = _listenChannelName;
            vars.mochiad_options = clip.loaderInfo.parameters.mochiad_options;
            vars.api_version = getVersion();

            if( widget )
                vars.widget = true;
            req.data = vars;
            _loader.load(req);

            _clip.addChild(_loader);

            // init send channel
            _sendChannel = new LocalConnection();

            _queue = [];
            _nextCallbackID = 0;
            _callbacks = {};

            _timer = new Timer(10000, 1);
            _timer.addEventListener(TimerEvent.TIMER, connectWait);
            _timer.start();

            return _clip;
        }        

        private static function loadLCBridge(clip:Object):void {
            var loader:Loader = new Loader();
            var mochiLCURL:String = _servURL + _mochiLC;
            var req:URLRequest = new URLRequest(mochiLCURL);

            var complete:Function = function(ev:Object):void {
                _mochiLocalConnection = MovieClip(loader.content);
                listen();
            }

            loader.contentLoaderInfo.addEventListener(Event.COMPLETE, complete);
            loader.contentLoaderInfo.addEventListener(IOErrorEvent.IO_ERROR, loadError);

            loader.load(req);

            clip.addChild(loader);
        }

        private static function loadError(ev:Object):void {
            _clip._mochiad_ctr_failed = true;
            trace("MochiServices could not load.");
            MochiServices.disconnect();
            MochiServices.onError("IOError");
        }

        //
        //
        public static function connectWait (e:TimerEvent):void {
            if (!_connected) {
                _clip._mochiad_ctr_failed = true;
                trace("MochiServices could not load. (timeout)");
                MochiServices.disconnect();
                MochiServices.onError("IOError");
            }
        }

        //
        //
        private static function listen ():void {
            _mochiLocalConnection.connect(_listenChannelName);
            _clip.handshake = function (args:Object):void { MochiServices.comChannelName = args.newChannel; }
            trace("Waiting for MochiAds services to connect...");
        }

        //
        //
        private static function initComChannels ():void {
            if (!_connected) {
                trace("[SERVICES_API] connected!");
                _connecting = false;
                _connected = true;

                _mochiLocalConnection.send(_sendChannelName, "onReceive", {methodName: "handshakeDone"});
                _mochiLocalConnection.send(_sendChannelName, "onReceive", {methodName: "registerGame", preserved:_preserved, id: _id, version: getVersion(), parentURL: _container.loaderInfo.loaderURL } );

                _clip.onReceive = onReceive;
                _clip.onEvent = onEvent;
                _clip.onError = function ():void { MochiServices.onError("IOError"); };

                while(_queue.length > 0) {
                    _mochiLocalConnection.send(_sendChannelName, "onReceive", _queue.shift());
                }
            }
        }

        private static function onReceive(pkg:Object):void {
            var cb:String = pkg.callbackID;
            var cblst:Object = _callbacks[cb];
            if (!cblst) return;
            var method:* = cblst.callbackMethod;
            var methodName:String = "";
            var obj:Object = cblst.callbackObject;
            if (obj && typeof(method) == 'string') {
                methodName = method;
                if (obj[method] != null) {
                    method = obj[method];
                } else {
                    trace("Error: Method  " + method + " does not exist.");
                }
            }
            if (method != undefined) {
                try {
                    method.apply(obj, pkg.args);
                } catch (error:Error) {
                    trace("Error invoking callback method '" + methodName + "': " + error.toString());
                }
            } else if (obj != null) {
                try {
                    obj(pkg.args);
                } catch (error:Error) {
                    trace("Error invoking method on object: " + error.toString());
                }
            }
            delete _callbacks[cb];
        }

        private static function onEvent(pkg:Object):void {
            var target:String = pkg.target;
            var event:String = pkg.event;

            switch( target )
            {
                // MochiEvents tunnel
                case "events":
                    MochiEvents.triggerEvent( pkg.event, pkg.args );
                    break ;
                // MochiSocial tunnel
                case "coins":
                    MochiCoins.triggerEvent( pkg.event, pkg.args );
                    break ;
                // MochiSync tunnel
                case "sync":
                    servicesSync.triggerEvent( pkg.event, pkg.args );
                    break ;
            }
        }

        public static function updateCopy( args:Object ):void {
            MochiServices.send("coins_updateCopy", args, null, null );
        }

        //
        //
        private static function flush (error:Boolean):void {

            var request:Object;
            var callback:Object;

            if (_clip && _queue) {
                while (_queue.length > 0) {
                    request = _queue.shift();
                    callback = null;

                    if (request != null) {
                        if (request.callbackID != null) callback = _callbacks[request.callbackID];
                        delete _callbacks[request.callbackID];

                        if (error && callback != null) {
                            handleError(request.args, callback.callbackObject, callback.callbackMethod);
                        }
                    }
                }
            }
        }

        //
        //
        private static function handleError (args:Object, callbackObject:Object, callbackMethod:Object):void {

            if (args != null) {
                if (args.onError != null) {
                    args.onError.apply(null, ["NotConnected"]);
                }
                if (args.options != null && args.options.onError != null) {
                    args.options.onError.apply(null, ["NotConnected"]);
                }
            }

            if (callbackMethod != null) {

                args = { };
                args.error = true;
                args.errorCode = "NotConnected";

                if (callbackObject != null && callbackMethod is String) {
                    try {
                        callbackObject[callbackMethod](args);
                    } catch (error:Error) { }
                } else if (callbackMethod != null) {
                    try {
                        callbackMethod.apply(args);
                    } catch (error:Error) { }
                }

            }

        }

        //
        //
        public static function send (methodName:String, args:Object = null, callbackObject:Object = null, callbackMethod:Object = null):void {
            if (_connected) {
                _mochiLocalConnection.send(_sendChannelName, "onReceive", {methodName: methodName, args: args, callbackID: _nextCallbackID});
            } else if (_clip == null || !_connecting) {
                trace( "Error: MochiServices not connected.   Please call MochiServices.connect().  Function: " + methodName);
                handleError(args, callbackObject, callbackMethod);
                flush(true);
                return;
            } else {
                _queue.push({methodName: methodName, args: args, callbackID: _nextCallbackID});
            }
            if (_clip != null) {
                if (_callbacks != null ) {
                    _callbacks[_nextCallbackID] = {callbackObject: callbackObject, callbackMethod: callbackMethod};
                    _nextCallbackID++;
                }
            }
        }

        private static function urlOptions(clip:Object):Object {
            var opts:Object = {};
            var options:String;
            if (clip.stage) {
                options = clip.stage.loaderInfo.parameters.mochiad_options;
            } else {
                options = clip.loaderInfo.parameters.mochiad_options;
            }

            if (options) {
                var pairs:Array = options.split("&");
                for (var i:Number = 0; i < pairs.length; i++) {
                    var kv:Array = pairs[i].split("=");
                    opts[unescape(kv[0])] = unescape(kv[1]);
                }
            }

            return opts;
        }

        public static function addLinkEvent(url:String, burl:String, btn:DisplayObjectContainer, onClick:Function = null):void {
            var vars:Object = new Object();
            var avm1Click:DisplayObject;

            vars["mav"] = getVersion();
            vars["swfv"] = "9";
            vars["swfurl"] = btn.loaderInfo.loaderURL;
            vars["fv"] = Capabilities.version;
            vars["os"] = Capabilities.os;
            vars["lang"] = Capabilities.language;
            vars["scres"] = (Capabilities.screenResolutionX + "x" + Capabilities.screenResolutionY);

            var s:String = "?";
            var i:Number = 0;
            for (var x:String in vars) {
                if (i != 0) s = s + "&";
                i++;
                s = s + x + "=" + escape(vars[x]);
            }

            var req:URLRequest = new URLRequest("http://x.mochiads.com/linkping.swf");
            var loader:Loader = new Loader();

            var setURL:Function = function(url:String):void {
                if (avm1Click) {
                    btn.removeChild(avm1Click);
                }

                avm1Click = clickMovie(url, onClick );
                var rect:Rectangle = btn.getBounds(btn);
                btn.addChild(avm1Click);
                avm1Click.x = rect.x;
                avm1Click.y = rect.y;
                avm1Click.scaleX = 0.01 * rect.width;
                avm1Click.scaleY = 0.01 * rect.height;
            }

            var err:Function = function (ev:Object):void {
                netup = false;
                ev.target.removeEventListener(ev.type, arguments.callee);
                setURL(burl);
            }
            var complete:Function = function(ev:Object):void {
                ev.target.removeEventListener(ev.type, arguments.callee);
            }

            if (netup) {
                setURL(url + s);
            } else {
                setURL(burl);
            }

            if (! ( netupAttempted || _connected )) {
                netupAttempted = true;

                loader.contentLoaderInfo.addEventListener(IOErrorEvent.IO_ERROR, err);
                loader.contentLoaderInfo.addEventListener(Event.COMPLETE, complete);
                loader.load(req);
            }
        }


        private static function clickMovie(url:String, cb:Function):MovieClip {
            var avm1_bytecode:Array = [150, 21, 0, 7, 1, 0, 0, 0, 0, 98, 116, 110, 0, 7, 2, 0, 0, 0, 0, 116, 104, 105, 115, 0, 28, 150, 22, 0, 0, 99, 114, 101, 97, 116, 101, 69, 109, 112, 116, 121, 77, 111, 118, 105, 101, 67, 108, 105, 112, 0, 82, 135, 1, 0, 0, 23, 150, 13, 0, 4, 0, 0, 111, 110, 82, 101, 108, 101, 97, 115, 101, 0, 142, 8, 0, 0, 0, 0, 2, 42, 0, 114, 0, 150, 17, 0, 0, 32, 0, 7, 1, 0, 0, 0, 8, 0, 0, 115, 112, 108, 105, 116, 0, 82, 135, 1, 0, 1, 23, 150, 7, 0, 4, 1, 7, 0, 0, 0, 0, 78, 150, 8, 0, 0, 95, 98, 108, 97, 110, 107, 0, 154, 1, 0, 0, 150, 7, 0, 0, 99, 108, 105, 99, 107, 0, 150, 7, 0, 4, 1, 7, 1, 0, 0, 0, 78, 150, 27, 0, 7, 2, 0, 0, 0, 7, 0, 0, 0, 0, 0, 76, 111, 99, 97, 108, 67, 111, 110, 110, 101, 99, 116, 105, 111, 110, 0, 64, 150, 6, 0, 0, 115, 101, 110, 100, 0, 82, 79, 150, 15, 0, 4, 0, 0, 95, 97, 108, 112, 104, 97, 0, 7, 0, 0, 0, 0, 79, 150, 23, 0, 7, 255, 0, 255, 0, 7, 1, 0, 0, 0, 4, 0, 0, 98, 101, 103, 105, 110, 70, 105, 108, 108, 0, 82, 23, 150, 25, 0, 7, 0, 0, 0, 0, 7, 0, 0, 0, 0, 7, 2, 0, 0, 0, 4, 0, 0, 109, 111, 118, 101, 84, 111, 0, 82, 23, 150, 25, 0, 7, 100, 0, 0, 0, 7, 0, 0, 0, 0, 7, 2, 0, 0, 0, 4, 0, 0, 108, 105, 110, 101, 84, 111, 0, 82, 23, 150, 25, 0, 7, 100, 0, 0, 0, 7, 100, 0, 0, 0, 7, 2, 0, 0, 0, 4, 0, 0, 108, 105, 110, 101, 84, 111, 0, 82, 23, 150, 25, 0, 7, 0, 0, 0, 0, 7, 100, 0, 0, 0, 7, 2, 0, 0, 0, 4, 0, 0, 108, 105, 110, 101, 84, 111, 0, 82, 23, 150, 25, 0, 7, 0, 0, 0, 0, 7, 0, 0, 0, 0, 7, 2, 0, 0, 0, 4, 0, 0, 108, 105, 110, 101, 84, 111, 0, 82, 23, 150, 16, 0, 7, 0, 0, 0, 0, 4, 0, 0, 101, 110, 100, 70, 105, 108, 108, 0, 82, 23];
            var b:int;
            var header:Array = [
                0x68, 0x00, 0x1f, 0x40, 0x00, 0x07, 0xd0, 0x00,
                0x00, 0x0c, 0x01, 0x00, 0x43, 0x02, 0xff, 0xff,
                0xff, 0x3f, 0x03
            ];
            var footer:Array = [0x00, 0x40, 0x00, 0x00, 0x00];

            var mc:MovieClip = new MovieClip();
            var lc:LocalConnection = new LocalConnection();
            var lc_name:String = "_click_" + Math.floor(Math.random() * 999999) + "_" + Math.floor((new Date()).time);
            lc = new LocalConnection();
            mc.lc = lc;
            mc.click = cb;
            lc.client = mc;
            lc.connect(lc_name)

            var ba:ByteArray = new ByteArray();
            var cpool:ByteArray = new ByteArray();

            cpool.endian = Endian.LITTLE_ENDIAN;
            cpool.writeShort(1);
            cpool.writeUTFBytes(url + " " + lc_name);
            cpool.writeByte(0);

            var actionLength:uint = avm1_bytecode.length + cpool.length + 4;
            var fileLength:uint = actionLength + 35;

            ba.endian = Endian.LITTLE_ENDIAN;
            ba.writeUTFBytes("FWS");
            ba.writeByte(8);
            ba.writeUnsignedInt(fileLength);
            for each (b in header) {
                ba.writeByte(b);
            }
            ba.writeUnsignedInt(actionLength);

            ba.writeByte(0x88);
            ba.writeShort(cpool.length);
            ba.writeBytes(cpool);

            for each (b in avm1_bytecode) {
                ba.writeByte(b);
            }

            for each (b in footer) {
                ba.writeByte(b);
            }

            var loader:Loader = new Loader();
            loader.loadBytes(ba);
            mc.addChild(loader);
            return mc;
        }
    }
}