root/trunk/ming-source/comunicator.pl

#!/usr/bin/perl -w
#  Flash Operator Panel.    http://www.asternic.org
#
#  Copyright (c) 2004 Nicolas Gudino. All rights reserved.
#
#  Nicolas Gudino <nicolas@house.com.ar>
#
#  This program is free software, distributed under the terms of
#  the GNU General Public License.
#
#  THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR
#  IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
#  OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  
#  IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
#  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
#  NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 
#  DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
#  OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 
#  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, 
#  EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

use SWF qw(:ALL);
use SWF::Constants qw(:Text :Button :DisplayItem :Fill);

SWF::setScale(1);
SWF::useSWFVersion(6);
my $movie = new SWF::Movie();
$movie->setDimension(100, 100);
$movie->setBackground(0xFF, 0xFF, 0xFF);
$movie->setRate(30);
$movie->add(new SWF::Action(<<"EndOfActionScript"));

var dummyVar=(getTimer()+random(100000));

if(context != undefined) {
        context = context.toUpperCase();
        colaEvento(0,"debug","contexto leido "+context);
        if(context == "DEFAULT") {      context=""; }
} else {
        colaEvento(0,"debug","context undefined");
        context="";
}

var archivo = "variables"+context+".txt?rand="+dummyVar;

vr = new LoadVars ();

vr.onLoad = function (success)
{ 
        if (success == true) { 
                colaEvento(0,"debug","Ok al leer "+archivo);
                nextFrame();
        } else {
                colaEvento(0,"debug","Fallo al leer "+archivo);
                stop();
        }
};

vr.load(archivo);

EndOfActionScript

$movie->nextFrame(); 
$movie->add(new SWF::Action(<<"EndOfActionScript"));

function conecta() {
        _global.sock = new XMLSocket;
        _global.sock.onConnect = handleConnect;
        _global.sock.onClose = handleDisconnect;
        _global.sock.onXML = handleXML;
    if(_global.port   == undefined) {
        _global.port = 4445;
    }
    if(_global.server == undefined) {
            _global.sock.connect(null, _global.port);
        _global.server_print = "default";
    } else {
            _global.sock.connect(_global.server, _global.port);
        _global.server_print = _global.server;
    }
}

function handleConnect(connectionStatus){

    if (connectionStatus) {
                colaEvento(0,"debug","Conectado! con contexto: "+context);
        _global.reconecta = 0;
                if(_global.enable_crypto==1) {
                envia_comando("contexto", 0, 0);
                } else {
                envia_comando("contexto", 1, 0);
                }
                if(restrict != undefined) {
                        envia_comando("restrict",restrict,0);
                }
    } else {
                colaEvento(0,"debug","No pude conectar!");
        _global.reconecta = 1;
    }
}

function handleXML(doc){
        var e = doc.firstChild;
        if (e != null) {
                if (e.nodeName == "response") {
                    var numeroboton = e.attributes.btn; // btn is the button number
                        var comando     = e.attributes.cmd;
                        var textofinal  = e.attributes.data;

                        if (_global.key != undefined) {
                                if(_global.enable_crypto == 1) {
                                        comando    = decrypt(comando,    _global.key);
                                        if (textofinal.length > 0) {
                                                textofinal = decrypt(textofinal, _global.key);
                                        } 
                                } 
                        } 


                        var botonparte = numeroboton.split("@");
                        var boton_numero = botonparte[0];
                        var boton_contexto = botonparte[1];
                        var timernumber = 0;


                        if (boton_contexto == undefined) {
                                boton_contexto = "";
                        }
                        if (_root.context == undefined) {
                                _root.context = "";
                        }


                        if (comando == "key") {
                                _global.key = textofinal;
                                return;
                        }

                        if (comando == "restrict") {
                                _global.restrict = numeroboton;
                _global.mybutton = numeroboton;
                        }

                        if (comando == "version") {
                                if(textofinal != _global.swfversion) 
                                {
                                        _global.statusline=vr.version_mismatch;
                                } else {
                                        _global.statusline="";
                                }
                        }

                        if (_root.context == boton_contexto) {
                                if(_global.restrict != undefined) {
                                        if(_global.restrict == boton_numero) {
                                                colaEvento(boton_numero,comando,textofinal);
                                        }
                                } else {
                                        colaEvento(boton_numero,comando,textofinal);
                                }
                        }
                        // endif root.context
                }
                // endif == response
        }
        // endiff e != null
}

function colaEvento(boton_numero,comando,textofinal) {

        if(_global.VersionFlash == "MAC") {
                // GetURL method for MAC
                jsQueue.push("javascript: docommand('"+boton_numero+"','"+comando+"','"+textofinal+"')");
        } else {
                // FSCommand method for anything else
                jsQueue.push("newevent;"+boton_numero+"|"+comando+"|"+textofinal);
        }
}


function handleDisconnect(){
        delete _global.key;
        _global.reconecta = 1;
                colaEvento(0,"debug","Attempt reconnection");
}


Inicia_Variables = function () {
        _global.jsQueue = new Array();
        var flashVersion = System.capabilities.version;
    var datos = flashVersion.split(" ");
        _global.VersionFlash = datos[0];
        _global.server = vr.server;
        _global.port = vr.port;
        _global.enable_crypto = Number(vr.enable_crypto);
        if (isNaN(_global.enable_crypto)) {
                _global.enable_crypto=0;
        } else {
                if(_global.enable_crypto != 0) {
                        _global.enable_crypto = 1;
                }
        }
};


recarga = function () {
        if(_global.restart == 1) {
                // Send command to restart Asterisk
                envia_comando("restart","1","1");
        } else {
                // Reloads FLASH client
                delete _global.key;
                var incontext = context;
                var inbutton = mybutton;
                var inrestrict = _global.restrict;
                var indial = dial;
                var innohighlight = nohighlight;
                for (var a in _root) {
                        if (typeof (_root[a]) == "object") {
                                removeMovieClip(_root[a]);
                        }
                        if (typeof (_root[a]) == "movieclip") {
                                removeMovieClip(_root[a]);
                        }
                }
                _global.context = incontext;
                _global.mybutton = inbutton;
                _global.restrict = inrestrict;
                _global.dial = indial;
                _global.nohighlight = inhighlight;
                stop();
                gotoAndPlay(1);
                }
};


_root.onEnterFrame = function() {

                if(_global.jsQueue.length>0) {
                        if(_global.VersionFlash == "MAC") {
                                getURL(jsQueue.shift());
                        } else {
                                var partes = jsQueue.shift().split(";");
                                var comando=partes[0];
                                var params=partes[1];
                                getURL("FSCommand:"+comando,params);
                        }
                }

};

Timers = function () {

        if (_global.reconecta == 1) {
                delete setInterval;
                delete _global.key;
                recarga();
                return;
        }
};

setInterval(Timers, 10000);

function ExtraeNumeroClip(name) {
        var destino = "";
        name = name._name;
        for (var s = 0; s<name.length; s++) {
                var c = name.charAt(s);
                if (c<"0" || c>"9") {
                } else {
                        destino = destino+""+c;
                }
                if (c == ".") {
                        destino = "";
                }
        }
        return destino;
}

envia_comando = function (comando, origen, destino) {
        if (comando != "bogus" && comando != "contexto" && comando != "restrict") {
                if (_global.restrict!=0) {
                        if(comando == "cortar") {
                                origen_number = ExtraeNumeroClip(origen);
                        } else {
                                origen_number = origen;
                        }
                        if(_global.restrict != undefined) {
                            if (_global.restrict == origen_number ) {
                            } else {
                                return;
                            }
                        } 
                }
        }
        message = new XML();
        message_data = message.createElement("msg");
        if (_root.context.length>0) {
                agrega_contexto = "@"+context;
        }
        if (agrega_contexto == undefined) {
                agrega_contexto = "";
        }
        if (_level0.claveinput.secret == undefined) {
                _level0.claveinput.secret = "";
        }
        if (_global.claveingresada == undefined && ( comando != "contexto" && comando != "bogus" && comando != "dial" && comando != "restrict")) {
                _root.codebox._visible = true;
                Selection.setFocus(_root.codebox.claveform);
                _root.codebox.swapDepths(_root.log);
                return;
        }
        // var clave=_level0.claveinput.secret+_global.key;
        var clave = _global.claveingresada+_global.key;
        var md5clave = "";
        var md5clave = calcMD5(clave);
        if (comando == "contexto" || comando == "restrict") {
                md5clave = "";
        }
        message_data.attributes.data = origen+agrega_contexto+"|"+comando+destino+"|"+md5clave;
        message.appendChild(message_data);
        _global.sock.send(message);
        var clave = "";
};

function LTrim(str) {
        var whitespace = new String(" \t\n\r");
        var s = new String(str);
        if (whitespace.indexOf(s.charAt(0)) != -1) {
                var j = 0, i = s.length;
                while (j<i && whitespace.indexOf(s.charAt(j)) != -1) {
                        j++;
                }
                s = s.substring(j, i);
        }
        return s;
}

function RTrim(str) {
        var whitespace = new String(" \t\n\r");
        var s = new String(str);
        if (whitespace.indexOf(s.charAt(s.length-1)) != -1) {
                var i = s.length-1;
                // Get length of string
                while (i>=0 && whitespace.indexOf(s.charAt(i)) != -1) {
                        i--;
                }
                s = s.substring(0, i+1);
        }
        return s;
}

function Trim(str) {
        return RTrim(LTrim(str));
}

function setDND(obj, item) {
        var nroboton = ExtraeNumeroClip(obj);
        envia_comando("dnd", nroboton, nroboton);
}

function genera_selecttimeout() {

        _global.positionselect = 0;
        test = attachMovie("option","optionselected", getNextHighestDepth(),  {_x:800, _y:6});
        test._visible = true;
        test.legend = "No timeout";

        test.onPress = function() {
             _root.despliega_select();
        };


         for (a=0; a<5; a++) {
                var b=a+1;
                if (_global.opcionesTimeout[a] != undefined) {

                        testa = attachMovie("option","option"+a, getNextHighestDepth(),  {_x:800, _y:(b*22)+6});
                        testa.legend = _global.opcionesTimeout[a];
                        testa._visible = false;


                        testa.onRollOver = function() {
                        this.legend = "* "+this.legend;
                };

                        testa.onRollOut = function() {
                    this.legend = this.legend.substring(2, this.legend.length);
                };

                        testa.onPress = function() {
                    this.legend = this.legend.substring(2, this.legend.length);
                                var posicion = ExtraeNumeroClip(this);
                                _global.timeout_value = _global.opcionesTimeoutSecs[posicion];
                                _root.muestra_selecttimeout(0);
                                _root.selectbox1.gotoAndStop(1);
                                _root.optionselected._visible=true;
                                _root.optionselected.legend = this.legend;
                        };
                }
        }
};

function muestra_selecttimeout(value) {
         for (a=0; a<5; a++) {
                var v = eval("_root.option"+a);
                if(value) {
                        v._visible = true;
                } else {
                        v._visible = false;
                }
         }
};

function despliega_select() {
        _root.optionselected._visible=false;
        _root.selectbox1.gotoAndStop(2);
        _root.muestra_selecttimeout(1);

};

function base64_decode(opString) {
        if ( opString == undefined ) {
                return;
        } 
        var str = opString;
        var base64s = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
        var bits, bit1, bit2, bit3, bit4, i = 0;
        var decOut = "";
        for (i=0; i<str.length; i += 4) {
                bit1 = (base64s.indexOf(str.charAt(i)) & 0xff) << 18 ;
                bit2 = (base64s.indexOf(str.charAt(i+1)) & 0xff) << 12 ;
                bit3 = (base64s.indexOf(str.charAt(i+2)) & 0xff) << 6 ;
                bit4 = (base64s.indexOf(str.charAt(i+3)) & 0xff);
                bits = bit1 | bit2 | bit3 | bit4;
                decOut += String.fromCharCode((bits & 0xff0000) >> 16, (bits & 0xff00) >> 8, bits & 0xff);
        }
        if (str.charCodeAt(i-2) == 61) {
                return decOut.substring(0, decOut.length-2);
        } else if (str.charCodeAt(i-1) == 61) {
                return decOut.substring(0, decOut.length-1);
        } else {
                return decOut.substring(0, decOut.length);
        }
};



// MD5 ROUTINE
/*
 * Convert a 32-bit number to a hex string with ls-byte first
 */
var hex_chr = "0123456789abcdef";
// 
// somehow the expression (bitAND(b, c) | bitAND((~b), d)) didn't return coorect results on Mac
// for: 
// b&c = a8a20450, ((~b)&d) = 0101c88b, (bitAND(b, c) | bitAND((~b), d)) = a8a20450 <-- !!!
// looks like the OR is not executed at all.
//
// let's try to trick the P-code compiler into working with us... Prayer beads are GO!
// 
function bitOR(a, b) {
        var lsb = (a & 0x1) | (b & 0x1);
        var msb31 = (a >>> 1) | (b >>> 1);
        return (msb31 << 1) | lsb;
}
//  
// will bitXOR be the only one working...?
// Nope. XOR fails too if values with bit31 set are XORed. 
//
// Note however that OR (and AND and XOR?!) works alright for the statement
//   (msb31 << 1) | lsb
// even if the result of the left-shift operation has bit 31 set.
// So there might be an extra condition here (Guessmode turned on):
// Mac Flash fails (OR, AND and XOR) if either one of the input operands has bit31 set
// *and* both operands have one or more bits both set to 1. In other words: when both
// input bit-patterns 'overlap'.
// Stuff to munch on for the MM guys, I guess...
//
function bitXOR(a, b) {
        var lsb = (a & 0x1) ^ (b & 0x1);
        var msb31 = (a >>> 1) ^ (b >>> 1);
        return (msb31 << 1) | lsb;
}
// 
// bitwise AND for 32-bit integers. This uses 31 + 1-bit operations internally
// to work around bug in some AS interpreters. (Mac Flash!)
// 
function bitAND(a, b) {
        var lsb = (a & 0x1) & (b & 0x1);
        var msb31 = (a >>> 1) & (b >>> 1);
        return (msb31 << 1) | lsb;
        // return (a & b);
}
// 
// Add integers, wrapping at 2^32. This uses 16-bit operations internally
// to work around bugs in some AS interpreters. (Mac Flash!)
// 
function addme(x, y) {
        var lsw = (x & 0xFFFF)+(y & 0xFFFF);
        var msw = (x >> 16)+(y >> 16)+(lsw >> 16);
        return (msw << 16) | (lsw & 0xFFFF);
}
function rhex(num) {
        str = "";
        for (j=0; j<=3; j++) {
                str += hex_chr.charAt((num >> (j*8+4)) & 0x0F)+hex_chr.charAt((num >> (j*8)) & 0x0F);
        }
        return str;
}
/*
 * Convert a string to a sequence of 16-word blocks, stored as an array.
 * Append padding bits and the length, as described in the MD5 standard.
 */
function str2blks_MD5(str) {
        nblk = ((str.length+8) >> 6)+1;
        // 1 + (len + 8)/64
        blks = new Array(nblk*16);
        for (i=0; i<nblk*16; i++) {
                blks[i] = 0;
        }
        /*
                                Input: 
                                
                                'willi' without the quotes.
                                
                                trace() Output on Intel (and MAC now?):
                                
                                see TXT files: *.Output.txt
                                
                                */
        for (i=0; i<str.length; i++) {
                blks[i >> 2] |= str.charCodeAt(i) << (((str.length*8+i)%4)*8);
        }
        blks[i >> 2] |= 0x80 << (((str.length*8+i)%4)*8);
        var l = str.length*8;
        blks[nblk*16-2] = (l & 0xFF);
        blks[nblk*16-2] |= ((l >>> 8) & 0xFF) << 8;
        blks[nblk*16-2] |= ((l >>> 16) & 0xFF) << 16;
        blks[nblk*16-2] |= ((l >>> 24) & 0xFF) << 24;
        return blks;
}
/*
 * Bitwise rotate a 32-bit number to the left
 */
function rol(num, cnt) {
        return (num << cnt) | (num >>> (32-cnt));
}
/*
 * These functions implement the basic operation for each round of the
 * algorithm.
 */
function cmn(q, a, b, x, s, t) {
        return addme(rol((addme(addme(a, q), addme(x, t))), s), b);
}

function ff(a, b, c, d, x, s, t) {
        return cmn(bitOR(bitAND(b, c), bitAND((~b), d)), a, b, x, s, t);
}

function gg(a, b, c, d, x, s, t) {
        return cmn(bitOR(bitAND(b, d), bitAND(c, (~d))), a, b, x, s, t);
}

function hh(a, b, c, d, x, s, t) {
        return cmn(bitXOR(bitXOR(b, c), d), a, b, x, s, t);
}

function ii(a, b, c, d, x, s, t) {
        return cmn(bitXOR(c, bitOR(b, (~d))), a, b, x, s, t);
}
/*
 * Take a string and return the hex representation of its MD5.
 */
function calcMD5(str) {
        x = str2blks_MD5(str);
        a = 1732584193;
        b = -271733879;
        c = -1732584194;
        d = 271733878;
        var step;
        for (i=0; i<x.length; i += 16) {
                olda = a;
                oldb = b;
                oldc = c;
                oldd = d;
                step = 0;
                a = ff(a, b, c, d, x[i+0], 7, -680876936);
                d = ff(d, a, b, c, x[i+1], 12, -389564586);
                c = ff(c, d, a, b, x[i+2], 17, 606105819);
                b = ff(b, c, d, a, x[i+3], 22, -1044525330);
                a = ff(a, b, c, d, x[i+4], 7, -176418897);
                d = ff(d, a, b, c, x[i+5], 12, 1200080426);
                c = ff(c, d, a, b, x[i+6], 17, -1473231341);
                b = ff(b, c, d, a, x[i+7], 22, -45705983);
                a = ff(a, b, c, d, x[i+8], 7, 1770035416);
                d = ff(d, a, b, c, x[i+9], 12, -1958414417);
                c = ff(c, d, a, b, x[i+10], 17, -42063);
                b = ff(b, c, d, a, x[i+11], 22, -1990404162);
                a = ff(a, b, c, d, x[i+12], 7, 1804603682);
                d = ff(d, a, b, c, x[i+13], 12, -40341101);
                c = ff(c, d, a, b, x[i+14], 17, -1502002290);
                b = ff(b, c, d, a, x[i+15], 22, 1236535329);
                a = gg(a, b, c, d, x[i+1], 5, -165796510);
                d = gg(d, a, b, c, x[i+6], 9, -1069501632);
                c = gg(c, d, a, b, x[i+11], 14, 643717713);
                b = gg(b, c, d, a, x[i+0], 20, -373897302);
                a = gg(a, b, c, d, x[i+5], 5, -701558691);
                d = gg(d, a, b, c, x[i+10], 9, 38016083);
                c = gg(c, d, a, b, x[i+15], 14, -660478335);
                b = gg(b, c, d, a, x[i+4], 20, -405537848);
                a = gg(a, b, c, d, x[i+9], 5, 568446438);
                d = gg(d, a, b, c, x[i+14], 9, -1019803690);
                c = gg(c, d, a, b, x[i+3], 14, -187363961);
                b = gg(b, c, d, a, x[i+8], 20, 1163531501);
                a = gg(a, b, c, d, x[i+13], 5, -1444681467);
                d = gg(d, a, b, c, x[i+2], 9, -51403784);
                c = gg(c, d, a, b, x[i+7], 14, 1735328473);
                b = gg(b, c, d, a, x[i+12], 20, -1926607734);
                a = hh(a, b, c, d, x[i+5], 4, -378558);
                d = hh(d, a, b, c, x[i+8], 11, -2022574463);
                c = hh(c, d, a, b, x[i+11], 16, 1839030562);
                b = hh(b, c, d, a, x[i+14], 23, -35309556);
                a = hh(a, b, c, d, x[i+1], 4, -1530992060);
                d = hh(d, a, b, c, x[i+4], 11, 1272893353);
                c = hh(c, d, a, b, x[i+7], 16, -155497632);
                b = hh(b, c, d, a, x[i+10], 23, -1094730640);
                a = hh(a, b, c, d, x[i+13], 4, 681279174);
                d = hh(d, a, b, c, x[i+0], 11, -358537222);
                c = hh(c, d, a, b, x[i+3], 16, -722521979);
                b = hh(b, c, d, a, x[i+6], 23, 76029189);
                a = hh(a, b, c, d, x[i+9], 4, -640364487);
                d = hh(d, a, b, c, x[i+12], 11, -421815835);
                c = hh(c, d, a, b, x[i+15], 16, 530742520);
                b = hh(b, c, d, a, x[i+2], 23, -995338651);
                a = ii(a, b, c, d, x[i+0], 6, -198630844);
                d = ii(d, a, b, c, x[i+7], 10, 1126891415);
                c = ii(c, d, a, b, x[i+14], 15, -1416354905);
                b = ii(b, c, d, a, x[i+5], 21, -57434055);
                a = ii(a, b, c, d, x[i+12], 6, 1700485571);
                d = ii(d, a, b, c, x[i+3], 10, -1894986606);
                c = ii(c, d, a, b, x[i+10], 15, -1051523);
                b = ii(b, c, d, a, x[i+1], 21, -2054922799);
                a = ii(a, b, c, d, x[i+8], 6, 1873313359);
                d = ii(d, a, b, c, x[i+15], 10, -30611744);
                c = ii(c, d, a, b, x[i+6], 15, -1560198380);
                b = ii(b, c, d, a, x[i+13], 21, 1309151649);
                a = ii(a, b, c, d, x[i+4], 6, -145523070);
                d = ii(d, a, b, c, x[i+11], 10, -1120210379);
                c = ii(c, d, a, b, x[i+2], 15, 718787259);
                b = ii(b, c, d, a, x[i+9], 21, -343485551);
                a = addme(a, olda);
                b = addme(b, oldb);
                c = addme(c, oldc);
                d = addme(d, oldd);
        }
        return rhex(a)+rhex(b)+rhex(c)+rhex(d);
}


// TEA2

c2b = new Object();
c2b['\\000'] = 0;
c2b["\001"] = 1;
c2b["\002"] = 2;
c2b["\003"] = 3;
c2b["\004"] = 4;
c2b["\005"] = 5;
c2b["\006"] = 6;
c2b["\007"] = 7;
c2b["\010"] = 8;
c2b["\011"] = 9;
c2b["\012"] = 10;
c2b["\013"] = 11;
c2b["\014"] = 12;
c2b["\015"] = 13;
c2b["\016"] = 14;
c2b["\017"] = 15;
c2b["\020"] = 16;
c2b["\021"] = 17;
c2b["\022"] = 18;
c2b["\023"] = 19;
c2b["\024"] = 20;
c2b["\025"] = 21;
c2b["\026"] = 22;
c2b["\027"] = 23;
c2b["\030"] = 24;
c2b["\031"] = 25;
c2b["\032"] = 26;
c2b["\033"] = 27;
c2b["\034"] = 28;
c2b["\035"] = 29;
c2b["\036"] = 30;
c2b["\037"] = 31;
c2b["\040"] = 32;
c2b["\041"] = 33;
c2b['\042'] = 34;
c2b["\043"] = 35;
c2b["\044"] = 36;
c2b["\045"] = 37;
c2b["\046"] = 38;
c2b["\047"] = 39;
c2b["\050"] = 40;
c2b["\051"] = 41;
c2b["\052"] = 42;
c2b["\053"] = 43;
c2b["\054"] = 44;
c2b["\055"] = 45;
c2b["\056"] = 46;
c2b["\057"] = 47;
c2b["\060"] = 48;
c2b["\061"] = 49;
c2b["\062"] = 50;
c2b["\063"] = 51;
c2b["\064"] = 52;
c2b["\065"] = 53;
c2b["\066"] = 54;
c2b["\067"] = 55;
c2b["\070"] = 56;
c2b["\071"] = 57;
c2b["\072"] = 58;
c2b["\073"] = 59;
c2b["\074"] = 60;
c2b["\075"] = 61;
c2b["\076"] = 62;
c2b["\077"] = 63;
c2b["\100"] = 64;
c2b["\101"] = 65;
c2b["\102"] = 66;
c2b["\103"] = 67;
c2b["\104"] = 68;
c2b["\105"] = 69;
c2b["\106"] = 70;
c2b["\107"] = 71;
c2b["\110"] = 72;
c2b["\111"] = 73;
c2b["\112"] = 74;
c2b["\113"] = 75;
c2b["\114"] = 76;
c2b["\115"] = 77;
c2b["\116"] = 78;
c2b["\117"] = 79;
c2b["\120"] = 80;
c2b["\121"] = 81;
c2b["\122"] = 82;
c2b["\123"] = 83;
c2b["\124"] = 84;
c2b["\125"] = 85;
c2b["\126"] = 86;
c2b["\127"] = 87;
c2b["\130"] = 88;
c2b["\131"] = 89;
c2b["\132"] = 90;
c2b["\133"] = 91;
var pepe="\";
c2b[pepe] = 92;
var pepe="]";
c2b[pepe] = 93;
c2b["\136"] = 94;
c2b["\137"] = 95;
c2b["\140"] = 96;
c2b["\141"] = 97;
c2b["\142"] = 98;
c2b["\143"] = 99;
c2b["\144"] = 100;
c2b["\145"] = 101;
c2b["\146"] = 102;
c2b["\147"] = 103;
c2b["\150"] = 104;
c2b["\151"] = 105;
c2b["\152"] = 106;
c2b["\153"] = 107;
c2b["\154"] = 108;
c2b["\155"] = 109;
c2b["\156"] = 110;
c2b["\157"] = 111;
c2b["\160"] = 112;
c2b["\161"] = 113;
c2b["\162"] = 114;
c2b["\163"] = 115;
c2b["\164"] = 116;
c2b["\165"] = 117;
c2b["\166"] = 118;
c2b["\167"] = 119;
c2b["\170"] = 120;
c2b["\171"] = 121;
c2b["\172"] = 122;
c2b["\173"] = 123;
c2b["\174"] = 124;
c2b["\175"] = 125;
c2b["\176"] = 126;
c2b["\177"] = 127;
c2b["\200"] = 128;
c2b["\201"] = 129;
c2b["\202"] = 130;
c2b["\203"] = 131;
c2b["\204"] = 132;
c2b["\205"] = 133;
c2b["\206"] = 134;
c2b["\207"] = 135;
c2b["\210"] = 136;
c2b["\211"] = 137;
c2b["\212"] = 138;
c2b["\213"] = 139;
c2b["\214"] = 140;
c2b["\215"] = 141;
c2b["\216"] = 142;
c2b["\217"] = 143;
c2b["\220"] = 144;
c2b["\221"] = 145;
c2b["\222"] = 146;
c2b["\223"] = 147;
c2b["\224"] = 148;
c2b["\225"] = 149;
c2b["\226"] = 150;
c2b["\227"] = 151;
c2b["\230"] = 152;
c2b["\231"] = 153;
c2b["\232"] = 154;
c2b["\233"] = 155;
c2b["\234"] = 156;
c2b["\235"] = 157;
c2b["\236"] = 158;
c2b["\237"] = 159;
c2b["\240"] = 160;
c2b["\241"] = 161;
c2b["\242"] = 162;
c2b["\243"] = 163;
c2b["\244"] = 164;
c2b["\245"] = 165;
c2b["\246"] = 166;
c2b["\247"] = 167;
c2b["\250"] = 168;
c2b["\251"] = 169;
c2b["\252"] = 170;
c2b["\253"] = 171;
c2b["\254"] = 172;
c2b["\255"] = 173;
c2b["\256"] = 174;
c2b["\257"] = 175;
c2b["\260"] = 176;
c2b["\261"] = 177;
c2b["\262"] = 178;
c2b["\263"] = 179;
c2b["\264"] = 180;
c2b["\265"] = 181;
c2b["\266"] = 182;
c2b["\267"] = 183;
c2b["\270"] = 184