#!/usr/bin/env node

// | Trace server |________________________/

// |

// | (C) Mozilla Corp

// | licensed under MPL 2.0 http://www.mozilla.org/MPL/

// \____________________________________________/

define('/trace/trace_server',function(require){

if(process.version.indexOf('v0.6') != -1 || process.version.indexOf('v0.4') != -1){

console.log("Node version too old, try 0.8 or 0.10")

process.exit(-1)

return

}

var path = require('path')

var fs = require('fs')

var url = require('url')

var zlib = require('zlib')

var http = require('http')

var https = require('https')

var crypto = require('crypto')

var instrument = require('./instrument')

var childproc = require('child_process')

// the nodejs loader

if(process.argv[2] && process.argv[2].indexOf('-l')==0) return nodeLoader()

function nodeLoader(){

var filter = makeFilter(process.argv[2].slice(2))

var m = require('module').Module.prototype;

var oldCompile = m._compile;

var did = 1

m._compile = function(content, filename){

if(filter.active && filter(filename))

return oldCompile.call(this, content, filename)

// lets instrument

var t = instrument(filename, content, did, filter.opt)

did = t.id

// send the dictionary out

var m = {dict:1, src:t.input, f:filename, d:t.d}

if(process.send) process.send(m)

else process.stderr.write('\x1f'+JSON.stringify(m)+'\x17')

return oldCompile.call(this, t.output, filename)

}

process.argv.splice(1,2) // remove leading arguments

// clear require cache

for(var k in define.require.cache) delete define.require.cache[k]

var file = path.resolve(process.argv[1])

define.require(file);

}

var fn = require('../core/fn')

var ssl = require('../core/io_ssl')

var ioServer = require('../core/io_server')

function out() {

for (var v = Array.prototype.slice.call(arguments), i = 0, c = out.colors; i < v.length; i++) {

v[i] = String(v[i]).replace(/~(\w*)~/g, function(m, a) {

return "\033[" + (c[a] || 0) + "m";

}) + "\033[0m";

process.stderr.write(v[i]);

}

}

out.colors = {

bl:"30",bo:"1",r:"0;31",g:"0;32",y:"0;33",b:"0;34",m:"0;35",c:"0;36",

w:"0;37",br:"1;31",bg:"1;32",by:"1;33",bb:"1;34",bm:"1;35",bc:"1;36",bw:"1;37"

}

function makeFilter(fspec){

if(typeof fspec == 'string') fspec = JSON.parse(fspec)

var _do = init(fspec._do)

var _no = init(fspec._no)

function init(a){

var d = []

for(var i = 0;i<a.length;i++){

if(a[i].charAt(0)==':') d[i] = a[i].slice(1)

else d[i] = new RegExp(a[i].slice(1),"i")

}

return d

}

function match(d, f){

if(!d.length) return 0

for(var i = 0;i<d.length;i++){

if(typeof d[i] == 'string'){

if(f.indexOf(d[i]) != -1) return 2

} else if(f.match(d[i])) return 2

}

return 1

}

function f(file){

if(match(_do, file) == 1) return true

if(match(_no, file) == 2) return true

return false

}

f.opt = fspec._opt

f.active = _do.length || _no.length

f.stringify = function(){

return JSON.stringify(fspec)

}

return f

}

out('~~[trace.GL] ~bc~See~w~ your code. \n')

function loadSettings(file){

if(!fs.existsSync(file)) return

try{

var data = fs.readFileSync(file).toString().replace(/\/\*[\s|S]?\*\//g,'').replace(/\/\/.*?\n/g,'')

define.settings = JSON.parse(data)

define.settingsData = data

define.settingsFile = file

}

catch(e){

console.log("Error reading settings file ("+file+") ",e)

}

}

if(!loadSettings(path.resolve(process.cwd(),"tracegl.json")) &&

!loadSettings("~/tracegl.json") &&

!loadSettings(path.resolve(path.dirname(__filename),"tracegl.json")) &&

!define.settings)

loadSettings(path.resolve(path.dirname(__filename),"tracegl.json"))

// argument parse variables

function processArgs(arg){

var sender // send messages to ui or zip

var uiport = 2000

var bind = "0.0.0.0"

var tgtport = 2080

var fspec = {_no:[], _do:[], _opt:{}}

function usage(err){

out('~br~'+err+'\n')

out('~w~Usage:\n')

out('~w~node tracegl ~c~[flag] ~g~target ~y~[args]\n')

out(' ~g~../path/to/wwwroot ~w~Trace browser js via static fileserver\n')

out(' ~g~http://proxytarget:port ~w~Trace browser js via proxy\n')

out(' ~g~nodefile.js ~y~[args] ~w~Trace Node.js process\n')

out(' ~g~trace.gz ~w~Play back trace.gz file\n')

out(' ~c~-gz[:trace.gz] ~w~Record trace to gzip file. No trace UI started\n')

out(' ~c~-do[/:]match ~w~Only trace filenames containing match. Filters -do set first, then -no\n')

out(' ~c~-no[/:]match ~w~Ignore filenames containing match. Replace : with / for a regexp, use double escaped \\\\ \n')

out(' ~c~-nolib ~w~Short for -no/jquery.* -no:require.js -no/node\\\\_modules -no/bower\\\\_components \n')

out(' ~c~-nocatch ~w~Don\'t create exception catching\n')

out(' ~c~-bind:0.0.0.0 ~w~Set the hostname to bind our external ports to, default 0.0.0.0\n')

out(' ~c~-ui:port ~w~Set trace UI port. default: 2000\n')

out(' ~c~-tgt:port ~w~Set browser JS port. default: 2080\n')

out('~w~node tracegl.js ~r~[commmand]\n')

out(' ~r~-settings ~w~write a .tracegl settings template in the current dir\n')

return

}

// process arguments

for(var i = 2;i<arg.length;i++){

var a = arg[i]

if(a.charAt(0) == '-'){

var d = a.indexOf(':')

var b

if(d!=-1) b = a.slice(d+1)

if(a.indexOf('-gz') == 0){

if(d!=-1) sender = gzSender(a.slice(d+1))

else sender = gzSender('trace.gz')

} else if(a.indexOf('-install') == 0){

} else if(a.indexOf('-ui') == 0){

if(d==-1) return usage("No port specified")

uiport = parseInt(b)

} else if(a.indexOf('-tgt') == 0){

if(d==-1) return usage("No port specified")

tgtport = parseInt(b)

} else if(a.indexOf('-no') == 0){

if(a == '-nocatch'){

fspec._opt.nocatch = 1

} else

if(a == '-nolib'){

fspec._no.push("/jquery.*")

fspec._no.push(":require.js")

fspec._no.push("/node\\_modules")

fspec._no.push("/bower\\_components")

} else {

fspec._no.push(a.slice(3))

}

} else if(a.indexOf('-do') == 0){

fspec._do.push(a.slice(3))

} else if(a.indexOf('-settings') == 0){

if(fs.existsSync('tracegl.json')){

return out('~r~ERROR: ~~ .tracegl file already exists, remove before creating a new template\n')

}

fs.writeFileSync("tracegl.json", define.settingsData)

return out('~g~OK: ~~ tracegl.jsonl file written in current directory, open it in an editor to modify settings\n')

} else if(a.indexOf('-bind')== 0){

bind = a.slice(6)

} else return usage("Invalid argument "+a)

} else {

if(!sender) sender = uiSender(uiport, bind)

var f = makeFilter(fspec)

var isfile;

try{ isfile = fs.statSync(a).isFile() } catch(e){}

// execute the right mode

if(a.match(/\.gz$/i)) return gzPlaybackMode(f, a, sender)

if(a.match(/\.js$/i) || isfile) return nodeJSMode(f, a, arg.slice(i+1), sender)

if(a.match(/^https?/)) return proxyMode(f, tgtport, bind, a, sender)

return browserJSMode(f, tgtport, bind, path.resolve(process.cwd(), a), sender)

break

}

}

usage("Error, no target specified")

}

return processArgs(process.argv)

// create a file finder

function fileFinder(root){

var scanHash

function scan(dir, done) {

fs.readdir(dir, function(err, list) {

if (err) return done(err)

var i = 0

function next() {

var file = list[i++]

if (!file) return done()

file = dir + '/' + file

fs.stat(file, function(err, stat) {

if (stat && stat.isDirectory()) scan(file, next)

else {

var f = file.toLowerCase().split('/')

while(f.length){

scanHash[f.join('/')] = file

f.shift()

}

next()

}

})

}

next()

})

}

return function(file, found){

// open a file in the editor

fs.stat(file, function(err, stat){

if(!err) return found(null, file)

var sp = file.split('/')

resolve()

function resolve(){

if(sp.length == 0){ // not found the fast way

function find(){

var f = file.toLowerCase().split('/')

while(f.length){

var sf = scanHash[f.join('/')]

if(sf) return found(null, sf)

f.shift()

}

return found("Could not match "+file+" to anything in "+root)

}

if(!scanHash){

console.log("Building file find search db from "+root+" ..")

scanHash = {}

scan(root, find)

}

else find()

} else {

var sf = path.resolve(root, sp.join('/'))

fs.stat(sf, function(err, stat){

if(!err) return found(null, sf)

sp.shift()

resolve()

})

}

}

})

}

}

function openEditor(file, line){

var ed

var s = define.settings

if(!s.editors ||

!(ed = s.editors[process.platform]))

return console.log("No editor settings available for your platform")

// lets try all editors

for(var k in ed){

if(fs.existsSync(ed[k].bin)){

// execute editor

var rep = {file:file, line:line}

var args = ed[k].args

var narg = []

for(var i = 0;i<args.length;i++){

narg[i] = args[i].replace(/\$(\w+)/g,function(m,a){

if(!a in rep) console.log("Opening editor: argument not supported "+a)

return rep[a]

})

}

console.log('Opening '+file+' line '+line+' with '+k)

var child = childproc.spawn(ed[k].bin, narg,{

detached:true,

stdio:[process.stdin,process.stdout,process.stderr]

})

return

}

}

}

// send data to UI

function uiSender(port, bind){

ui = ioServer()

ui.main = "./trace/trace_client"

ui.pass = fn.sha1hex("p4ssw0rd")

if(require.absolute)

ui.packaged = require.absolute('./trace_client')

else

ui.packaged = 1

ui.favicon = "R0lGODlhEAAQAPcAAAAAAAMBAAIAAwIDAQICAgEBBAIABAIABQIBBAAGAAAGAQAHAAAHAQEHAAEHAQIFAQMFAQIEAgIGAAIGAQMFBAQCAwYBAgYDAwYDBQcDBAQEAAQFAwUEAgUFAgUGAAQGAgUGAgYFAgYFAwYGAQcGAwQEBAUEBAUEBQUFBAYEBAYEBQYGBgAIAAAJAAEIAQEJAQIIAAULAQQLAgcJAQcJAgcKAAgEAwsGAg4FBggJAgsKCAsLDAARAAASAAATAAtvCgV0BwN9BQZ4BAZ9Bwl2Aw9wCQ5wDAx+CQ1+ChBvDxNuDBZsERVsHRhtEhhuERhvERhvExB8DBJxEBVzERZxExVyFBV1EhV2FRZ2FhZ2FxF7ERV4EhV6EhZ6ERZ8EhZ8Fhh0Exl1Exp4FiRsHSFzHSNsISNsIyRrIiRsIiZsI6usra6rrL+/wb2/xL2/x7+8x76/xL6+xr6+ybnBx7zAw7/AwL/Aw7/Bxb7Ax73Hwr7EwsK/wMG9xcC/xcS/xcDBwsLAwcPDwcPDwsDDxcPDxMHEw8HGwcLEw8LGx8TFwMTExMbGx8TFyMfFyMXGzMPKw8TIycjFxtv/3d//4OD/3OL/3uL/4uP/5OP/5+v/7Pf/9/j++Pj/+Pn/+fr/+Pv/+vz8/P3+/szMzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAkKAKIAIf8LTkVUU0NBUEUyLjADAQAAACwAAAAAEAAQAAAI/gBBARhIsGDBUBjs0FnIsOHCOydUGAJQZGBFihYBLDphY5AFKDloLIkho0mNGU9UCOKQ4VGRKFewHAkDBkmWK1qK9OEQQpGHKQoYUJkgoUqDBFZGICqhgg0IIZs4BWHAYIgmT0Q0NFLRwc6NTBA+THoAw1KEDZhwQDphIlERSWbOXBqTplIZNJSKrDGB4s8lMi5YbPnUScwLB0AuFTKRQg0BLz54cOnh40uPHl0GACJhgtCOIgtY/GDBwgiLFkp0MKogIlARKUWKOImdJDaTIpEyXNCDsffFiocopPCTpw4eOG3eyOHjJs4cR3sygBIhQACC6wgKGDiwPcAKUAEBACH5BAlkAI0ALAAAAAAQABAAhwAAAAMBAAIAAwIDAQICAgEBBAIABAIABQIBBAAGAAAGAQAHAAAHAQEHAAEHAQIFAQMFAQIEAgIGAAIGAQMFBAQCAwYBAgYDAwYDBQcDBAQEAAUEAgUFAgUGAAUGAgYFAgYFAwYGAQcGAwQEBAUEBAUEBQUFBAYEBAYEBQYGBgAIAAAJAAEIAQEJAQULAQQLAgcJAQcJAgcKAAgEAw4FBggJAgsKCAsLDAwICAARAAASAAATAAtvCgN9BQl2Aw9wCQ5wDAx+CQ1+ChBvDxNuDBZsERVsHRhtEhhuERhvERhvExB8DBJxEBVzERZxExVyFBV1EhV2FRZ2FhZ2FxF7ERV6EhZ6ERZ8EhZ8Fhh0Exl1Exp4FiFzHSNsISNsI6usra6rrL+/wb2/xL2/x7+8x76/xL6+xr6+ybnBx7zAw7/AwL/Aw7/Bxb7Ax73Hwr7EwsK/wMG9xcC/xcS/xcDBwsLAwcPDwcPDwsDDxcPDxMHEw8HGwcLEw8LGx8TFwMTExMbGx8TFyMfFyMXGzMPKw8TIycjFxuP/5Pf/9/j++Pv/+vz8/P3+/szMzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAj1ABcBGEiwYEFGGNakWciw4UI2JVDsAfBjYEWKFgEAKjEDjwUlNWIUcfHiiAwYSVDc2ZCB0I8lUaQE0ZJFyJQoVH7I2fDhT4cmChg4mSDhSYMEUEL0GYEijIdDiRj0YMDgECIGPjQIQsFhzaEfEL4++BrhK41CJUj4+erl64+vXdyCIWGCDg4uLFQcUsRgSwsHhw7pIXHiC4ErO3JU0bEDiw4dVgbUEUEiz40fC1TwUKECiIoVRGwEqgDCzg8mP34gST0ktZEfhjJceIOx9sWKfCicmONGTZsyYsiciTPGDJpBcDIsAiFAAILnCAoYODA9QIpFAQEAIfkECQoAhAAsAAAAABAAEACHAAAAAwEAAgADAgMBAgICAQEEAgAEAgAFAgEEAAYAAAYBAAcAAAcBAQcAAgYAAgYBAwUEBAIDBgECBgMDBgMFBwMEBAQABQQCBQUCBQYABgUCBgUDBgYBBwYDBAQEBQQEBQQFBQUEBgQEBgQFBgYGAAgAAAkAAQgBAQkBBQsBBAsCBwkBBwkCBwoACAQDCAkCCwoICwsMDAgIABEAABIAABMAC28KA30FCXYDD3AJDnAMDH4JDX4KEG8PE24MFmwRFWwdGG0SGG4RGG8RGG8TEHwMEnEQFXMRFnETFXIUFXUSFXYVFnYWFnYXEXsRFXoSFnoRFnwSFnwWGHQTGXUTGnUUGngWIXMdq6ytrqusv7/Bvb/Evb/Hv7zHvr/Evr7Gvr7JucHHvMDDv8DAv8DDv8HFvsDHvcfCvsTCwr/Awb3FwL/FxL/FwMHCwsDBw8PBw8PCwMPFw8PEwcTDwcbBwsTDwsbHxMXAxMTExsbHxMXIx8XIxcbMw8rDxMjJyMXG4//k+P/4/Pz8/f7+zMzMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACOoABQEYSLBgwUEUyIhZyLDhwjIgRtABkGNgRYoWAeQB4SKOBCIvWPxIoSJIixVDRsC5UKFPjiJLmOygMoVHkyVOcqy5oAFPhiMKGCB54CBJgwRKONjxMEJLIEAMGNyoAggqAxwW9ozAQIZBDqhfvYIF5AfEhzs5vqYFtHZtlg8h2si4cqJqVCso7M75IAILgSg1ZjyhUUMKDRpQBrjp8EFOjBwLStgoUUJHCRM+YOiJsOFNDiNphaTtkRZIjj8VJqDByPpixToQRLA5M8aMly1dwKjh8iUMnzQVBG0QIACBcQQFDBxQHoCEoIAAIfkECQoAgAAsAAAAABAAEACHAAAAAwEAAgADAgMBAgICAQEEAgAEAgAFAgEEAAYAAAYBAAcAAAcBAQcAAgYAAgYBAwUEBAIDBgECBgMDBgMFBwMEBQQCBQUCBQYABgUCBgUDBgYBBwYDBAQEBQQEBQQFBQUEBgQEBgQFBgYGAAgAAAkABQsBBAsCBwkBBwkCBwoACAQDCAkCCwoICwsMDAgIABEAABIAABMAC28KA30FCXYDD3AJDnAMDH4JDX4KEG8PE24MFmwRFWwdGG0SGG4RGG8RGG8TEHwMEnEQFXMRFnETFXIUFXUSFXYVFnYWFnYXEXsRFXoSFnoRFnwSFnwWGHQTGXUTGngWIXMdq6ytrqusv7/Bvb/Evb/Hv7zHvr/Evr7Gvr7JucHHvMDDv8DAv8DDv8HFvsDHvcfCvsTCwr/Awb3FwL/FxL/FwMHCwsDBw8PBw8PCwMPFw8PEwcTDwcbBwsTDwsbHxMXAxMTExsbHxMXIx8XIxcbMw8rDxMjJyMXG4//k+P/4/Pz8/f7+zMzMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACOkA/QAYSLBgwT8UwHhZyLDhwjAfRMABYGNgRYoWAdT5sKKNhCAsUvAwccKHChRARLCxUCGPDSFIkuCIAiWHEiRLbJyxkIEOBiIKGBR54MBIgwRHNsjpIMJKHxsMGNDgwwcqgxp87oi4AIYBn6hfvYJloOeDhzk2qqa1sXZtFQ8g0ryYQtWqlLoM3ngIQYWAExkwmMSQ8SRGjCYD1HDw4MaFjQUkZpAgcYNEiR0t7ETQsMbGELY/2Opg28PGngoTyGBcfbFiHAgh0Iz5IkbLlSxczGDZ0gVPmQp+NAgQgKA4ggIGDiQPMMJPQAAh+QQJCgB7ACwAAAAAEAAQAIYAAAADAQACAAMCAwECAgIBAQQCAAQCAAUCAQQABgAABgEABwAABwEBBwACBgACBgEDBQQEAgMGAQIGAwMGAwUHAwQFBAIFBQIFBgAGBQIGBQMGBgEHBgMEBAQFBAQFBAUFBQQGBAQGBAUGBgYACAAACQAFCwEECwIHCQEHCQIHCgAIBAMICQILCggLCwwMCAgAEQAAEgAAEwALbwoPcAkOcAwMfgkNfgoQbw8TbgwWbBEVbB0YbRIYbhEYbxEYbxMQfAwScRAVcxEWcRMVchQVdRIVdhUWdhYWdhcRexEVehIWehEWfBIWfBYYdBMZdROrrK2uq6y/v8G9v8S9v8e/vMe+v8S+vsa+vsm5wce8wMO/wMC/wMO/wcW+wMe9x8K+xMLCv8DBvcXAv8XEv8XAwcLCwMHDw8HDw8LAw8XDw8TBxMPBxsHCxMPCxsfExcDExMTGxsfExcjHxcjFxszDysPEyMnIxcbj/+T8/Pz9/v7MzMwAAAAAAAAAAAAAAAAH1YB5AIOEhYV6FFxai4yNi10fImwANIOVlJYAcR8raRI/LCk6Jic8Kig+ImgWFXU0QEZHNk9ON0hGSTRjFhlwGEIKDEMPDkQNCUUbbh0iUgw0DAx4eM/R03MiF1x40NzS3dB2Hx5v3DTm6DQ0UR4gZS/T1dLmDGseIVAETDIwSjEyTWLEWDLADAcPalzQWEBiBgkSNUiUyNFCTgQNZ2gEUddDHQ51O2jcqTABDKaTlyq1gRCCzJctXqxMqYJFDJUrWeiEqZBHgwABCIIiKGDgQNEAI/IEAgAh+QQJCgB6ACwAAAAAEAAQAIYAAAADAQACAAMCAwECAgIBAQQCAAQCAAUCAQQABgAABgEABwAABwEBBwACBgACBgEDBQQEAgMGAQIGAwMGAwUHAwQFBAIFBQIFBgAGBQIGBQMGBgEHBgMEBAQFBAQFBAUFBQQGBAQGBAUGBgYACAAACQAFCwEECwIHCQEHCQIHCgAIBAMICQILCggLCwwAEQAAEgAAEwALbwoPcAkOcAwMfgkNfgoQbw8TbgwWbBEVbB0YbRIYbhEYbxEYbxMQfAwScRAVcxEWcRMVchQVdRIVdhUWdhYWdhcRexEVehIWehEWfBIWfBYYdBMZdROrrK2uq6y/v8G9v8S9v8e/vMe+v8S+vsa+vsm5wce8wMO/wMC/wMO/wcW+wMe9x8K+xMLCv8DBvcXAv8XEv8XAwcLCwMHDw8HDw8LAw8XDw8TBxMPBxsHCxMPCxsfExcDExMTGxsfExcjHxcjFxszDysPEyMnIxcbj/+T8/Pz9/v7MzMwAAAAAAAAAAAAAAAAAAAAH04B4AIOEhYV5FFtZi4yNi1wfImsAM4OVlJYAcB8raBI+LCk5Jic7Kig9ImcWFXQzP0VGNU5NNkdFSDNiFhlvGEEKDEIPDkMNCUQbbR0iUQwzDHd3DM/R03IiF1vP0zPd33UfHm4z3uV35+dQHiBk0tTQ79VqHiFPBEsxL0kwMUwwMJQMKMPBQxoXMxaQkEGCBA0SJXC0iBNBg5kZQMrxKHejnI4ZdipM+IKp5KVKbCCEGONFS5cqUqhcCTPFCpY5YCrg0SBAAIKfCAoYODA0wAg8gQAAOw=="

ui.listen(port, bind)

out("~~[trace.GL]~w~ WebGL trace UI: http://"+bind+":"+port+"\n")

var dict = []

var queue = []

var joined = false

var finder = fileFinder(process.cwd())

// set a filewatch on settings

if(define.settingsFile)

fs.exists(define.settingsFile, function(exists){

if(exists){

fs.watch(define.settingsFile, function(){

loadSettings(define.settingsFile)

ui.send({settings:define.settings})

console.log("Reloading settings file "+define.settingsFile)

})

}

})

// incoming channel data

ui.data = function(m, c){

if(m.t == 'join'){

for(var i = 0;i<dict.length;i++) c.send(dict[i])

for(var i = 0;i<queue.length;i++) c.send(queue[i])

joined = true

} else if(m.t == 'open'){

finder(m.file, function(err, file){

if(err) return console.log(err)

openEditor(file, m.line)

})

// next up is just eating off

}

else console.log('unused message',m)

}

// outgoing data channel

var lgc = 0

return function(m){

// verify ordering

if(!m.dict){

if(!lgc) lgc = m.g

else{

if(lgc + 1 != m.g){

console.log("Message order error", lgc, m.g)

}

lgc = m.g

}

if(joined && m.d == 1) queue = [] // clear the queue at depth 1

queue.push(m)

} else { // keep dictionaries for join

dict.push(m)

}

// keep all messages with depth 0

if(joined) ui.send(m)

}

}

// send data to zip

function gzSender(file){

// pipe writer into gzip into file

var gz = zlib.createGzip()

var fstr = fs.createWriteStream(file)

fstr.on('error', function(err){

console.log("Error writing "+file+" "+err)

})

gz.on('error', function(err){

console.log("Error zipping "+file+" "+err)

})

gz.pipe(fstr)

var buf = []

var total = 0

function flush(end){

if(buf.length){

gz.write(buf.join(''))

gz.flush();

if (end) gz.end();

buf = []

total = 0

}

}

var terminated = false

process.on('SIGINT', function() {

terminated = true

console.log('got sigint, flushing gz')

process.stdin.resume()

flush()

// wait for the drain, then end and exit

gz.flush(function(){

fstr.end(function(){

console.log("end!")

process.exit(0)

})

})

});

process.on('exit', function(){

console.log('exit!')

})

return function(m){

if (!m) flush(true);

else {

// we should buffer atleast a megabyte

var data = '\x1f'+JSON.stringify(m)+'\x17'

buf.push(data)

total += data.length

if(total > 1024*1024) flush()

}

}

}

// app server

function browserJSMode(filter, port, bind, root, sender){

// start the target server

var tgt = ioServer()

tgt.root = root

tgt.listen(port, bind)

//appHttp.watcher = define.watcher()

out("~~[trace.GL]~w~ Serving browser JS: http://"+bind+":"+port+"\n")

// incoming message, forward to sender

tgt.data = function(m, c){

sender(m)

}

var fileCache= {}

var did = 1 // count instrument offset id

tgt.fileChange = function(f){

// lets flush everything

fileCache = {}

did = 1

// send reload message to UI

sender({reload:1})

}

tgt.process = function(file, data, type){

if(type != "application/javascript") return data

if(filter.active && filter(file)) return data

// cache

if(fileCache[file]) return fileCache[file].output

// lets use trace

var t = fileCache[file] = instrument(file, data.toString('utf8'), did, filter.opt)

did = t.id

// send to UI

sender({dict:1, f:file, src:t.input, d:t.d})

return t.output

}

}

function streamParser(dataCb, sideCb){

var last = ""

return function(d){

var data = last + d.toString();

last = "";

data = data.replace(/\x1f(.*?)\x17/g, function(x, m){

try{

dataCb(JSON.parse(m))

} catch(e){

fn('error in '+e,m)

}

return ''

})

if(data.indexOf('\x1f')!= -1) last = data;

else if(data.length && sideCb) sideCb(data)

}

}

// node server

function nodeJSMode(filter, file, args, sender){

// we start up ourselves with -l

var cp = require('child_process')

args.unshift(file)

args.unshift('-l' + filter.stringify())

args.unshift(process.argv[1])

var stdio = [process.stdin, process.stdout,'pipe']

//if(process.version.indexOf('v0.8') != -1) stdio.push('ipc')

var child = cp.spawn(process.execPath, args, {

stdio: stdio

})

// stderr datapath

var sp = streamParser(sender, function(d){

process.stderr.write(d)

})

if(child.stderr) child.stderr.on('data',sp)

// ipc datapath

child.on('message', function(m){

sender(m)

})

child.on('exit', function () {

sender(false);

})

}

function proxyMode(filter, port, bind, proxy, sender){

// start the target server

var tgt = ioServer()

tgt.root = root

tgt.proxy = url.parse(proxy)

tgt.listen(port, "0.0.0.0")

//appHttp.watcher = define.watcher()

out("~~[trace.GL]~w~ Proxying browser JS: http://"+bind+":"+port+" -> "+proxy+"\n")

// incoming message, forward to sender

tgt.data = function(m, c){

sender(m)

}

var fileCache= {}

var did = 1 // count instrument offset id

tgt.process = function(file, data, type){

if(type != "application/javascript") return data

if(filter.active && filter(file)) return data

// turn off cache

// if(fileCache[file]) return fileCache[file].output

// lets use trace

var t = fileCache[file] = instrument(file, data.toString('utf8'), did, filter.opt)

did = t.id

// send to UI

sender({dict:1, f:file, src:t.input, d:t.d})

// dump the last 100 chars

return t.output

}

}

function gzPlaybackMode(filter, file, sender){

// just output the gz file to sender

var rs = fs.createReadStream(file)

var gz = zlib.createGunzip()

process.stdout.write("Loading gzipped trace .")

rs.pipe(gz)

var sp = streamParser(function(m){

if(m.g%1000 == 0) process.stdout.write(".")

sender(m)

})

gz.on('data', sp)

gz.on('end', function(){

process.stdout.write("Complete!\n")

})

}

})

function define(id,fac){

//PACKSTART

// | returns path of file

function path(p){ //

if(!p) return ''

p = p.replace(/\.\//g, '')

var b = p.match(/([\s\S]*)\/[^\/]*$/)

return b ? b[1] : ''

}

// | normalizes relative path r against base b

function norm(r, b){

b = b.split(/\//)

r = r.replace(/\.\.\//g,function(){ b.pop(); return ''}).replace(/\.\//g, '')

var v = b.join('/')+ '/' + r

if(v.charAt(0)!='/') v = '/'+v

return v

}

//PACKEND

//PACKSTART

function def(id, fac){

if(!fac) fac = id, id = null

def.factory[id || '_'] = fac

}

def.module = {}

def.factory = {}

def.urls = {}

def.tags = {}

function req(id, base){

if(!base) base = ''

if(typeof require !== "undefined" && id.charAt(0) != '.') return require(id)

id = norm(id, base)

var c = def.module[id]

if(c) return c.exports

var f = def.factory[id]

if(!f) throw new Error('module not available '+id + ' in base' + base)

var m = {exports:{}}

var localreq = def.mkreq(id)

var ret = f(localreq, m.exports, m)

if(ret) m.exports = ret

def.module[id] = m

return m.exports

}

def.mkreq = function(base){

function localreq(i){

return def.req(i, path(base))

}

localreq.reload = function(i, cb){

var id = norm(i, base)

script(id, 'reload', function(){

delete def.module[id] // cause reexecution of module

cb( req(i, base) )

})

}

localreq.absolute = function(i){

return norm(i, path(base))

}

return localreq

}

def.req = req

def.outer = define

if(typeof require !== 'undefined') def.require = require

def.path = path

def.norm = norm

define = def

def(id, fac)

//PACKEND

}

// | Function, utility lib|_____________________/

// |

// | (C) Mozilla Corp

// | licensed under MPL 2.0 http://www.mozilla.org/MPL/

// \____________________________________________/

define('/core/fn',function(){

if(console.log.bind)

var fn = console.log.bind(console)

else

var fn = function(){

var s = ''

for(var i = 0;i<arguments.length;i++) s+= (s?', ':'')+arguments[i]

console.log(s)

}

fn.list = list

fn.stack = stack

fn.ps = ps

fn.wait = wait

fn.repeat = repeat

fn.events = events

fn.dt = dt

fn.mt = mt

fn.sha1hex = sha1hex

fn.rndhex = rndhex

fn.tr = tr

fn.dump = dump

fn.walk = walk

fn.min = min

fn.max = max

fn.clamp = clamp

fn.nextpow2 = nextpow2

fn.named = named

// | named arguments

// \____________________________________________/

function named(a, f){

var t = typeof a[0]

if(t == 'function' || t== 'object') return t

if(!f) f = named.caller

if(!f._c) f._c = f.toString()

if(!f._n) f._n = f._c.match(/function.*?\((.*?)\)/)[1].split(',')

var n = f._n

if(a.length > n.length) throw new Error("Argument list mismatch, "+a.length+" instead of "+n.length)

var g = {}

for(var i = 0, j = a.length;i<j;i++) g[n[i]] = a[i]

return g

}

// | left right linked list

// \____________________________________________/

function list(l, r){

// var u // unique id/

// var f // free slot

var b // begin

var e // end

function li(){

return li.fn.apply(0, arguments)

}

li.fn = function(a){

if(arguments.length > 1){

var rm = {}

for(var i = 0, j = arguments.length; i<j; i++) li.add(rm[i] = arguments[i])

return function(){

for(var i in rm) li.rm(rm[i])

rm = null

}

}

li.add(a)

return function(){

if(a) li.rm(a)

a = null

}

}

var ln = 0

li.len = 0

li.add = add

li.rm = rm

li.clear = function(){

var n = b

while(n){

var m = n[r]

delete n[r]

delete n[l]

n = m

}

b = e = undefined

li.len = ln = 0

}

li.drop = function(){

b = e = undefined

li.len = ln = 0

}

//| add an item to the list

function add(i){

if(arguments.length > 1){

for(var i = 0, j = arguments.length; i<j; i++) add(arguments[i])

return ln

}

// already in list

if( l in i || r in i || b == i) return ln

if(!e) b = e = i

else e[r] = i, i[l] = e, e = i

li.len = ++ln

if(ln == 1 && li.fill) li.fill()

return ln

}

//| add a sorted item scanning from the end

li.sorted = function(i, s){

if( l in i || r in i || b == i) return ln

var a = e

while(a){

if(a[s] <= i[s]){ // insert after a

if(a[r]) a[r][l] = i, i[r] = a[r]

else e = i

i[l] = a

a[r] = i

break

}

a = a[l]

}

if(!a){ // add beginning

if(!e) e = i

if(b) i[r] = b, b[l] = i

b = i

}

li.len = ++ln

if(ln == 1 && li.fill) li.fill()

return ln

}

//| remove item from the list

function rm(i){

if(arguments.length > 1){

for(var i = 0, j = arguments.length; i<j; i++) rm(arguments[i])

return ln

}

var t = 0

if(b == i) b = i[r], t++

if(e == i) e = i[l], t++

if(i[r]){

if(i[l]) i[r][l] = i[l]

else delete i[r][l]

t++

}

if(i[l]){

if(i[r]) i[l][r] = i[r]

else delete i[l][r]

t++

}

if(!t) return

delete i[r]

delete i[l]

//if(!e && f) freeid()

li.len = --ln

if(!ln && li.empty) li.empty()

return ln

}

//| run all items in the list

li.run = function(){

var n = b, t, v

while(n) v = n.apply(null, arguments), t = v !== undefined ? v : t, n = n[r]

return t

}

//| iterate over all items

li.each = function(c){

var n = b

var j = 0

var t

while(n) {

var x = n[r]

v = c(n, li, j)

if(v !== undefined) t = v

n = x, j++

}

return t

}

//| check if item is in the list

li.has = function(i){

return l in i || r in i || b == i

}

li.first = function(){

return b

}

li.last = function(){

return e

}

return li

}

// | apply event pattern to object

// \____________________________________________/

function events(o){

o.on = function(e, f){

var l = this.$l || (this.$l = {})

var a = l[e]

if(!a) l[e] = f

else{

if(Array.isArray(a)) a.push(event)

else l[e] = [l[e], f]

}

}

o.off = function(e, f){

var l = this.$l || (this.$l = {})

if(!l) return

var a = l[e]

if(!a) return

if(Array.isArray(a)){

for(var i = 0;i<a.length;i++){

if(a[i] == f) a.splice(i,1), i--

}

}

else if (l[e] == f) delete l[e]

}

o.clear = function(e, f){

var l = this.$l

if(!l) return

delete l[e]

}

o.emit = function(e){

var l = this.$l

if(!l) return

var a = l[e]

if(!a) return

if(arguments.length>1){

var arg = Array.prototype.slice.call(arguments, 1)

if(typeof a == 'function') a.apply(null, arg)

else for(var i = 0;i<a.length;i++) a[i].apply(null, arg)

} else {

if(typeof a == 'function') a()

else for(var i = 0;i<a.length;i++) a[i]()

}

}

}

// | simple fixed integer stack

// \____________________________________________/

function stack(){

function st(){

return st.fn.apply(null, arguments)

}

st.fn = function(a){

if(arguments.length > 1){

var rm = {}

for(var i = 0, j = arguments.length; i<j; i++) rm[push(arguments[i])] = 1

return function(){

for(var i in rm) st.rm(i)

rm = null

}

} else {

var i = push(a)

return function(){

if(i !== undefined) st.rm(i)

i = undefined

}

}

}

st.push = push

st.shift = shift

st.set = set

//| length of the stack, externals are readonly

var b = st.beg = 1

var e = st.end = 1

var l = st.len = 0

//| return item on bottom of stack

st.bottom = function(){

if(b == e) return null

return st[b]

}

//| item on the top of the staci

st.top = function(){

if(b == e) return null

return st[e]

}

//| push item to the top of the stack

function push(a){

if(arguments.length > 1){

var r

for(var i = 0, j = arguments.length; i<j; i++) r = push(arguments[i])

return r

}

st[e++] = a, st.len = ++l

return (st.end = e) - 1

}

//| pop item from the top of the stack

st.pop = function(){

var p = st[e - 1]

if(b != e){

delete st[e]