faye 0.1.0

data/lib/faye-min.js

@@ -0,0 +1 @@
+if(!this.Faye)Faye={};Faye.extend=function(a,c,b){if(!c)return a;for(var d in c){if(c.hasOwnProperty(d)&&a[d]!==c[d]){if(!a.hasOwnProperty(d)||b!==false)a[d]=c[d]}}return a};Faye.extend(Faye,{BAYEUX_VERSION:'1.0',ENV:this,VERSION:'0.1.0',Grammar:{LOWALPHA:/^[a-z]$/,UPALPHA:/^[A-Z]$/,ALPHA:/^([a-z]|[A-Z])$/,DIGIT:/^[0-9]$/,ALPHANUM:/^(([a-z]|[A-Z])|[0-9])$/,MARK:/^(\-|\_|\!|\~|\(|\)|\$|\@)$/,STRING:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*$/,TOKEN:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+$/,INTEGER:/^([0-9])+$/,CHANNEL_SEGMENT:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+$/,CHANNEL_SEGMENTS:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+(\/(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+)*$/,CHANNEL_NAME:/^\/(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+(\/(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+)*$/,WILD_CARD:/^\*{1,2}$/,CHANNEL_PATTERN:/^(\/(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)))+)*\/\*{1,2}$/,VERSION_ELEMENT:/^(([a-z]|[A-Z])|[0-9])(((([a-z]|[A-Z])|[0-9])|\-|\_))*$/,VERSION:/^([0-9])+(\.(([a-z]|[A-Z])|[0-9])(((([a-z]|[A-Z])|[0-9])|\-|\_))*)*$/,CLIENT_ID:/^((([a-z]|[A-Z])|[0-9]))+$/,ID:/^((([a-z]|[A-Z])|[0-9]))+$/,ERROR_MESSAGE:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*$/,ERROR_ARGS:/^(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*(,(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*)*$/,ERROR_CODE:/^[0-9][0-9][0-9]$/,ERROR:/^([0-9][0-9][0-9]:(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*(,(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*)*:(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*|[0-9][0-9][0-9]::(((([a-z]|[A-Z])|[0-9])|(\-|\_|\!|\~|\(|\)|\$|\@)| |\/|\*|\.))*)$/},commonElement:function(a,c){for(var b=0,d=a.length;b<d;b++){if(this.indexOf(c,a[b])!==-1)return a[b]}return null},indexOf:function(a,c){for(var b=0,d=a.length;b<d;b++){if(a[b]===c)return b}return-1},each:function(a,c,b){if(a instanceof Array){for(var d=0,f=a.length;d<f;d++){if(a[d]!==undefined)c.call(b||null,a[d],d)}}else{for(var g in a){if(a.hasOwnProperty(g))c.call(b||null,g,a[g])}}},size:function(a){var c=0;this.each(a,function(){c+=1});return c},enumEqual:function(b,d){if(d instanceof Array){if(!(b instanceof Array))return false;var f=b.length;if(f!==d.length)return false;while(f--){if(b[f]!==d[f])return false}return true}else{if(!(b instanceof Object))return false;if(this.size(d)!==this.size(b))return false;var g=true;this.each(b,function(a,c){g=g&&(d[a]===c)});return g}}});Faye.Class=function(a,c){if(typeof a!=='function'){c=a;a=Object}var b=function(){if(!this.initialize)return this;return this.initialize.apply(this,arguments)||this};var d=function(){};d.prototype=a.prototype;b.prototype=new d();Faye.extend(b.prototype,c);return b};Faye.Event={_9:[],on:function(a,c,b,d){var f=function(){b.call(d)};if(a.addEventListener)a.addEventListener(c,f,false);else a.attachEvent('on'+c,f);this._9.push({_a:a,_g:c,_r:b,_b:d,_l:f})},detach:function(a,c,b,d){var f=this._9.length,g;while(f--){g=this._9[f];if((a&&a!==g._a)||(c&&c!==g._g)||(b&&b!==g._r)||(d&&d!==g._b))continue;if(g._a.removeEventListener)g._a.removeEventListener(g._g,g._l,false);else g._a.detachEvent('on'+g._g,g._l);this._9.splice(f,1);g=null}}};Faye.Event.on(Faye.ENV,'unload',Faye.Event.detach,Faye.Event);Faye.URI=Faye.extend(Faye.Class({queryString:function(){var b=[],d;Faye.each(this.params,function(a,c){b.push(encodeURIComponent(a)+'='+encodeURIComponent(c))});return b.join('&')},isLocal:function(){var a=Faye.URI.parse(Faye.ENV.location.href);var c=(a.hostname!==this.hostname)||(a.port!==this.port)||(a.protocol!==this.protocol);return!c},toURL:function(){return this.protocol+this.hostname+':'+this.port+this.pathname+'?'+this.queryString()}}),{parse:function(d,f){if(typeof d!=='string')return d;var g=new this();var k=function(c,b){d=d.replace(b,function(a){if(a)g[c]=a;return''})};k('protocol',/^https?\:\/+/);k('hostname',/^[a-z0-9\-]+(\.[a-z0-9\-]+)*\.[a-z0-9\-]{2,6}/i);k('port',/^:[0-9]+/);Faye.extend(g,{protocol:'http://',hostname:Faye.ENV.location.hostname,port:Faye.ENV.location.port},false);if(!g.port)g.port=(g.protocol==='https://')?'443':'80';g.port=g.port.replace(/\D/g,'');var i=d.split('?'),h=i.shift(),l=i.join('?'),n=l?l.split('&'):[],o=n.length,j={};while(o--){i=n[o].split('=');j[decodeURIComponent(i[0]||'')]=decodeURIComponent(i[1]||'')}Faye.extend(j,f);g.pathname=h;g.params=j;return g}});Faye.XHR={request:function(a,c,b,d,f){var g=new this.Request(a,c,b,d,f);g.send();return g},getXhrObject:function(){return Faye.ENV.ActiveXObject?new ActiveXObject("Microsoft.XMLHTTP"):new XMLHttpRequest()},Request:Faye.Class({initialize:function(a,c,b,d,f){this._c=a.toUpperCase();this._4=Faye.URI.parse(c,b);this._s=(typeof d==='function')?{success:d}:d;this._b=f||null;this._1=null},send:function(){if(this._h)return;var a=this._4.pathname,c=this._4.queryString();if(this._c==='GET')a+='?'+c;var b=this._c==='POST'?c:'';this._h=true;this._1=Faye.XHR.getXhrObject();this._1.open(this._c,a,true);if(this._c==='POST')this._1.setRequestHeader('Content-Type','application/x-www-form-urlencoded');var d=this,f=function(){if(d._1.readyState!==4)return;if(g){clearInterval(g);g=null}Faye.Event.detach(Faye.ENV,'beforeunload',d.abort,d);d._h=false;d._t();d=null};var g=setInterval(f,10);Faye.Event.on(Faye.ENV,'beforeunload',this.abort,this);this._1.send(b)},abort:function(){this._1.abort()},_t:function(){var a=this._s;if(!a)return;return this.success()?a.success&&a.success.call(this._b,this):a.failure&&a.failure.call(this._b,this)},waiting:function(){return!!this._h},complete:function(){return this._1&&!this.waiting()},success:function(){if(!this.complete())return false;var a=this._1.status;return(a>=200&&a<300)||a===304||a===1223},failure:function(){if(!this.complete())return false;return!this.success()},text:function(){if(!this.complete())return null;return this._1.responseText},status:function(){if(!this.complete())return null;return this._1.status}})};Faye.Channel={HANDSHAKE:'/meta/handshake',CONNECT:'/meta/connect',SUBSCRIBE:'/meta/subscribe',UNSUBSCRIBE:'/meta/unsubscribe',DISCONNECT:'/meta/disconnect',META:'meta',SERVICE:'service',isValid:function(a){return Faye.Grammar.CHANNEL_NAME.test(a)||Faye.Grammar.CHANNEL_PATTERN.test(a)},parse:function(a){if(!this.isValid(a))return null;return a.split('/').slice(1)},isMeta:function(a){var c=this.parse(a);return c?(c[0]===this.META):null},isService:function(a){var c=this.parse(a);return c?(c[0]===this.SERVICE):null},isSubscribable:function(a){if(!this.isValid(a))return null;return!this.isMeta(a)&&!this.isService(a)},Tree:Faye.Class({initialize:function(a){this._2=a;this._5={}},eachChild:function(b,d){Faye.each(this._5,function(a,c){b.call(d,a,c)})},each:function(b,d,f){this.eachChild(function(a,c){a=b.concat(a);c.each(a,d,f)});if(this._2!==undefined)d.call(f,b,this._2)},map:function(b,d){var f=[];this.each([],function(a,c){f.push(b.call(d,a,c))});return f},get:function(a){var c=this.traverse(a);return c?c._2:null},set:function(a,c){var b=this.traverse(a,true);if(b)b._2=c},traverse:function(a,c){if(typeof a==='string')a=Faye.Channel.parse(a);if(a===null)return null;if(a.length===0)return this;var b=this._5[a[0]];if(!b&&!c)return null;if(!b)b=this._5[a[0]]=new Faye.Channel.Tree();return b.traverse(a.slice(1),c)},glob:function(f){if(typeof f==='string')f=Faye.Channel.parse(f);if(f===null)return[];if(f.length===0)return(this._2===undefined)?[]:[this._2];var g=[];if(Faye.enumEqual(f,['*'])){Faye.each(this._5,function(a,c){if(c._2!==undefined)g.push(c._2)});return g}if(Faye.enumEqual(f,['**'])){g=this.map(function(a,c){return c});g.pop();return g}Faye.each(this._5,function(c,b){if(c!==f[0]&&c!=='*')return;var d=b.glob(f.slice(1));Faye.each(d,function(a){g.push(a)})});if(this._5['**'])g.push(this._5['**']._2);return g}})};Faye.Transport=Faye.extend(Faye.Class({initialize:function(a,c){this._m=a;this._4=c},send:function(b,d,f){b={message:JSON.stringify(b)};return this.request(b,function(c){if(!d)return;Faye.each([].concat(c),function(a){d.call(f,a);if(a.advice)this._m._u(a.advice);if(a.data&&a.channel)this._m._v(a)},this)},this)}}),{get:function(a,c){var b=a._4;if(c===undefined)c=this.supportedConnectionTypes();var d=Faye.URI.parse(b).isLocal()?['callback-polling']:['callback-polling'];var f=Faye.commonElement(d,c);if(!f)throw'Could not find a usable connection type for '+b;var g=this._i[f];return new g(a,b)},register:function(a,c){this._i[a]=c;c.prototype.connectionType=a},_i:{},supportedConnectionTypes:function(){var b=[],d;Faye.each(this._i,function(a,c){b.push(a)});return b}});Faye.XHRTransport=Faye.Class(Faye.Transport,{request:function(c,b,d){Faye.XHR.request('post',this._4,c,function(a){if(b)b.call(d,JSON.parse(a.text()))})}});Faye.Transport.register('long-polling',Faye.XHRTransport);Faye.JSONPTransport=Faye.extend(Faye.Class(Faye.Transport,{request:function(c,b,d){var f=document.getElementsByTagName('head')[0],g=document.createElement('script'),k=Faye.JSONPTransport.getCallbackName(),i=Faye.URI.parse(this._4,c);Faye.ENV[k]=function(a){Faye.ENV[k]=undefined;try{delete Faye.ENV[k]}catch(e){}f.removeChild(g);if(b)b.call(d,a)};i.params.jsonp=k;g.type='text/javascript';g.src=i.toURL();f.appendChild(g)}}),{_n:0,getCallbackName:function(){this._n+=1;return'__jsonp'+this._n+'__'}});Faye.Transport.register('callback-polling',Faye.JSONPTransport);Faye.Client=Faye.Class({_d:{},_w:{},_7:{},_x:{},_o:'handshake',_y:'retry',_p:'none',DEFAULT_ENDPOINT:'/bayeux',MAX_DELAY:0.1,INTERVAL:1000.0,initialize:function(a){this._4=a||this.DEFAULT_ENDPOINT;this._3=Faye.Transport.get(this);this._0=this._d;this._j=[];this._e=new Faye.Channel.Tree();this._6={reconnect:this._y,interval:this.INTERVAL};Faye.Event.on(Faye.ENV,'beforeunload',this.disconnect,this)},handshake:function(c,b){if(this._6.reconnect===this._p)return;if(this._0!==this._d)return;this._0=this._w;var d=this,f=this.generateId();this._3.send({channel:Faye.Channel.HANDSHAKE,version:Faye.BAYEUX_VERSION,supportedConnectionTypes:Faye.Transport.supportedConnectionTypes(),id:f},function(a){if(a.id!==f)return;if(!a.successful){setTimeout(function(){d.handshake(c,b)},this._6.interval);return this._0=this._d}this._0=this._7;this._8=a.clientId;this._3=Faye.Transport.get(this,a.supportedConnectionTypes);if(c)c.call(b)},this)},connect:function(c,b){if(this._6.reconnect===this._p)return;if(this._6.reconnect===this._o||this._0===this._d)return this.handshake(function(){this.connect(c,b)},this);if(this._0!==this._7)return;if(this._f)return;this._f=this.generateId();var d=this;this._3.send({channel:Faye.Channel.CONNECT,clientId:this._8,connectionType:this._3.connectionType,id:this._f},function(a){if(a.id!==this._f)return;delete this._f;if(a.successful)this.connect();else setTimeout(function(){d.connect()},this._6.interval)},this);if(c)c.call(b)},disconnect:function(){if(this._0!==this._7)return;this._0=this._x;this._3.send({channel:Faye.Channel.DISCONNECT,clientId:this._8});this._e=new Faye.Channel.Tree()},subscribe:function(b,d,f){if(this._0!==this._7)return;b=[].concat(b);this._k(b);var g=this.generateId();this._3.send({channel:Faye.Channel.SUBSCRIBE,clientId:this._8,subscription:b,id:g},function(c){if(c.id!==g)return;if(!c.successful)return;b=[].concat(c.subscription);Faye.each(b,function(a){this._e.set(a,[d,f])},this)},this)},unsubscribe:function(b,d,f){if(this._0!==this._7)return;b=[].concat(b);this._k(b);var g=this.generateId();this._3.send({channel:Faye.Channel.UNSUBSCRIBE,clientId:this._8,subscription:b,id:g},function(c){if(c.id!==g)return;if(!c.successful)return;b=[].concat(c.subscription);Faye.each(b,function(a){this._e.set(a,null)},this)},this)},publish:function(a,c){if(this._0!==this._7)return;this._k([a]);this.enqueue({channel:a,data:c,clientId:this._8});if(this._q)return;var b=this;this._q=setTimeout(function(){delete b._q;b.flush()},this.MAX_DELAY*1000)},generateId:function(a){a=a||32;return Math.floor(Math.pow(2,a)*Math.random()).toString(16)},enqueue:function(a){this._j.push(a)},flush:function(){this._3.send(this._j);this._j=[]},_k:function(c){Faye.each(c,function(a){if(!Faye.Channel.isValid(a))throw'"'+a+'" is not a valid channel name';if(!Faye.Channel.isSubscribable(a))throw'Clients may not subscribe to channel "'+a+'"';})},_u:function(a){Faye.extend(this._6,a);if(this._6.reconnect===this._o)this._8=null},_v:function(c){var b=this._e.glob(c.channel);Faye.each(b,function(a){if(!a)return;a[0].call(a[1],c.data)})}});if(!this.JSON){JSON={}}(function(){function l(a){return a<10?'0'+a:a}if(typeof Date.prototype.toJSON!=='function'){Date.prototype.toJSON=function(a){return this.getUTCFullYear()+'-'+l(this.getUTCMonth()+1)+'-'+l(this.getUTCDate())+'T'+l(this.getUTCHours())+':'+l(this.getUTCMinutes())+':'+l(this.getUTCSeconds())+'Z'};String.prototype.toJSON=Number.prototype.toJSON=Boolean.prototype.toJSON=function(a){return this.valueOf()}}var n=/[\u0000\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,o=/[\\\"\x00-\x1f\x7f-\x9f\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g,j,p,s={'\b':'\\b','\t':'\\t','\n':'\\n','\f':'\\f','\r':'\\r','"':'\\"','\\':'\\\\'},m;function r(b){o.lastIndex=0;return o.test(b)?'"'+b.replace(o,function(a){var c=s[a];return typeof c==='string'?c:'\\u'+('0000'+a.charCodeAt(0).toString(16)).slice(-4)})+'"':'"'+b+'"'}function q(a,c){var b,d,f,g,k=j,i,h=c[a];if(h&&typeof h==='object'&&typeof h.toJSON==='function'){h=h.toJSON(a)}if(typeof m==='function'){h=m.call(c,a,h)}switch(typeof h){case'string':return r(h);case'number':return isFinite(h)?String(h):'null';case'boolean':case'null':return String(h);case'object':if(!h){return'null'}j+=p;i=[];if(Object.prototype.toString.apply(h)==='[object Array]'){g=h.length;for(b=0;b<g;b+=1){i[b]=q(b,h)||'null'}f=i.length===0?'[]':j?'[\n'+j+i.join(',\n'+j)+'\n'+k+']':'['+i.join(',')+']';j=k;return f}if(m&&typeof m==='object'){g=m.length;for(b=0;b<g;b+=1){d=m[b];if(typeof d==='string'){f=q(d,h);if(f){i.push(r(d)+(j?': ':':')+f)}}}}else{for(d in h){if(Object.hasOwnProperty.call(h,d)){f=q(d,h);if(f){i.push(r(d)+(j?': ':':')+f)}}}}f=i.length===0?'{}':j?'{\n'+j+i.join(',\n'+j)+'\n'+k+'}':'{'+i.join(',')+'}';j=k;return f}}if(typeof JSON.stringify!=='function'){JSON.stringify=function(a,c,b){var d;j='';p='';if(typeof b==='number'){for(d=0;d<b;d+=1){p+=' '}}else if(typeof b==='string'){p=b}m=c;if(c&&typeof c!=='function'&&(typeof c!=='object'||typeof c.length!=='number')){throw new Error('JSON.stringify');}return q('',{'':a})}}if(typeof JSON.parse!=='function'){JSON.parse=function(g,k){var i;function h(a,c){var b,d,f=a[c];if(f&&typeof f==='object'){for(b in f){if(Object.hasOwnProperty.call(f,b)){d=h(f,b);if(d!==undefined){f[b]=d}else{delete f[b]}}}}return k.call(a,c,f)}n.lastIndex=0;if(n.test(g)){g=g.replace(n,function(a){return'\\u'+('0000'+a.charCodeAt(0).toString(16)).slice(-4)})}if(/^[\],:{}\s]*$/.test(g.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g,'@').replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g,']').replace(/(?:^|:|,)(?:\s*\[)+/g,''))){i=eval('('+g+')');return typeof k==='function'?h({'':i},''):i}throw new SyntaxError('JSON.parse');}}}());

data/lib/faye.rb

@@ -0,0 +1,30 @@
+require 'forwardable'
+require 'observer'
+require 'set'
+require 'rubygems'
+require 'eventmachine'
+
+module Faye
+  VERSION = '0.1.0'
+  
+  ROOT = File.expand_path(File.dirname(__FILE__))
+  CLIENT_SCRIPT = File.join(ROOT, 'faye-min.js')
+  
+  BAYEUX_VERSION   = '1.0'
+  ID_LENGTH        = 128
+  JSONP_CALLBACK   = 'jsonpcallback'
+  CONNECTION_TYPES = %w[long-polling callback-polling]
+  
+  %w[grammar server channel connection error].each do |lib|
+    require File.join(ROOT, 'faye', lib)
+  end
+  
+  autoload :RackAdapter, File.join(ROOT, 'faye', 'rack_adapter')
+  
+  def self.random(bitlength = ID_LENGTH)
+    field  = 2 ** bitlength
+    strlen = bitlength / 4
+    ("%0#{strlen}s" % rand(field).to_s(16)).gsub(' ', '0')
+  end
+end
+

data/lib/faye/channel.rb

@@ -0,0 +1,122 @@
+module Faye
+  class Channel
+    HANDSHAKE   = '/meta/handshake'
+    CONNECT     = '/meta/connect'
+    SUBSCRIBE   = '/meta/subscribe'
+    UNSUBSCRIBE = '/meta/unsubscribe'
+    DISCONNECT  = '/meta/disconnect'
+    
+    META        = :meta
+    SERVICE     = :service
+    
+    class << self
+      def valid?(name)
+        Grammar::CHANNEL_NAME =~ name or
+        Grammar::CHANNEL_PATTERN =~ name
+      end
+      
+      def parse(name)
+        return nil unless valid?(name)
+        name.split('/')[1..-1].map { |s| s.to_sym }
+      end
+      
+      def meta?(name)
+        segments = parse(name)
+        segments ? (segments.first == META) : nil
+      end
+      
+      def service?(name)
+        segments = parse(name)
+        segments ? (segments.first == SERVICE) : nil
+      end
+      
+      def subscribable?(name)
+        return nil unless valid?(name)
+        not meta?(name) and not service?(name)
+      end
+    end
+    
+    include Observable
+    attr_reader :name
+    
+    def initialize(name)
+      @name = name
+    end
+    
+    def <<(message)
+      changed(true)
+      notify_observers(message)
+    end
+    
+    class Tree
+      include Enumerable
+      attr_accessor :value
+      
+      def initialize(value = nil)
+        @value = value
+        @children = {}
+      end
+      
+      def each_child
+        @children.each { |key, subtree| yield(key, subtree) }
+      end
+      
+      def each(prefix = [], &block)
+        each_child { |path, subtree| subtree.each(prefix + [path], &block) }
+        yield(prefix, @value) unless @value.nil?
+      end
+      
+      def [](name)
+        subtree = traverse(name)
+        subtree ? subtree.value : nil
+      end
+      
+      def []=(name, value)
+        subtree = traverse(name, true)
+        subtree.value = value unless subtree.nil?
+      end
+      
+      def traverse(path, create_if_absent = false)
+        path = Channel.parse(path) if String === path
+        
+        return nil if path.nil?
+        return self if path.empty?
+        
+        subtree = @children[path.first]
+        return nil if subtree.nil? and not create_if_absent
+        subtree = @children[path.first] = self.class.new if subtree.nil?
+        
+        subtree.traverse(path[1..-1], create_if_absent)
+      end
+      
+      def glob(path = [])
+        path = Channel.parse(path) if String === path
+        
+        return [] if path.nil?
+        return @value.nil? ? [] : [@value] if path.empty?
+        
+        if path == [:*]
+          return @children.inject([]) do |list, (key, subtree)|
+            list << subtree.value unless subtree.value.nil?
+            list
+          end
+        end
+        
+        if path == [:**]
+          list = map { |key, value| value }
+          list.pop
+          return list
+        end
+        
+        list = @children.values_at(path.first, :*).
+                         compact.
+                         map { |t| t.glob(path[1..-1]) }
+        
+        list << @children[:**].value if @children[:**]
+        list.flatten
+      end
+    end
+    
+  end
+end
+

data/lib/faye/connection.rb

@@ -0,0 +1,110 @@
+module Faye
+  class Connection
+    include EventMachine::Deferrable
+    include Observable
+    
+    extend  Forwardable
+    def_delegators :EventMachine, :add_timer, :cancel_timer
+    
+    MAX_DELAY = 0.1
+    INTERVAL  = 1.0
+    TIMEOUT   = 60.0
+    
+    attr_reader :id   
+    
+    def initialize(id, options = {})
+      @id       = id
+      @options  = options
+      @channels = Set.new
+      @inbox    = Set.new
+    end
+    
+    def timeout
+      @options[:timeout] || TIMEOUT
+    end
+    
+    def subscribe(channel)
+      channel.add_observer(self) if @channels.add?(channel)
+    end
+    
+    def unsubscribe(channel)
+      return @channels.each(&method(:unsubscribe)) if channel == :all
+      return unless @channels.member?(channel)
+      @channels.delete(channel)
+      channel.delete_observer(self)
+    end
+    
+    def update(event)
+      @inbox.add(event)
+      begin_delivery_timeout! if @connected
+    end
+    
+    def connect(&block)
+      callback(&block)
+      return if @connected
+      
+      @mark_for_deletion  = false
+      @connected          = true
+      
+      begin_delivery_timeout! unless @inbox.empty?
+      begin_connection_timeout!
+    end
+    
+    def flush!
+      return unless @connected
+      release_connection!
+      
+      events = @inbox.entries
+      @inbox = Set.new
+      
+      set_deferred_status(:succeeded, events)
+      set_deferred_status(:deferred)
+    end
+    
+    def disconnect!
+      unsubscribe(:all)
+      flush!
+    end
+    
+  private
+    
+    def begin_delivery_timeout!
+      return unless @connected and not @inbox.empty? and @delivery_timeout.nil?
+      @delivery_timeout = add_timer(MAX_DELAY) { flush! }
+    end
+    
+    def begin_connection_timeout!
+      return unless @connected and @connection_timeout.nil?
+      @connection_timeout = add_timer(timeout) { flush! }
+    end
+    
+    def release_connection!
+      if @connection_timeout
+        cancel_timer(@connection_timeout)
+        @connection_timeout = nil
+      end
+      
+      if @delivery_timeout
+        cancel_timer(@delivery_timeout)
+        @delivery_timeout = nil
+      end
+      
+      @connected = false
+      schedule_for_deletion!
+    end
+    
+    def schedule_for_deletion!
+      return if @mark_for_deletion
+      @mark_for_deletion = true
+      
+      add_timer(10 * INTERVAL) do
+        if @mark_for_deletion
+          changed(true)
+          notify_observers(:stale_client, self)
+        end
+      end
+    end
+    
+  end
+end
+

data/lib/faye/error.rb

@@ -0,0 +1,44 @@
+module Faye
+  class Error
+    
+    def self.parse(string)
+      return nil unless Grammar::ERROR =~ string
+      parts = string.split(':')
+      args  = parts[1].split(',')
+      new(parts[0].to_i, args, parts[2])
+    end
+    
+    def self.method_missing(type, *args)
+      code = const_get(type.to_s.upcase)
+      new(code[0], args, code[1]).to_s
+    end
+    
+    attr_reader :code, :args, :message
+    
+    def initialize(code, args, message)
+      @code     = code
+      @args     = args
+      @message  = message
+    end
+    
+    def to_s
+      "#{ @code }:#{ @args * ',' }:#{ @message }"
+    end
+    
+    # http://code.google.com/p/cometd/wiki/BayeuxCodes
+    VERSION_MISMATCH    = [300, 'Version mismatch']
+    CONNTYPE_MISMATCH   = [301, 'Connection types not supported']
+    EXT_MISMATCH        = [302, 'Extension mismatch']
+    BAD_REQUEST         = [400, 'Bad request']
+    CLIENT_UNKNOWN      = [401, 'Unknown client']
+    PARAMETER_MISSING   = [402, 'Missing required parameter']
+    CHANNEL_FORBIDDEN   = [403, 'Forbidden channel']
+    CHANNEL_UNKNOWN     = [404, 'Unknown channel']
+    CHANNEL_INVALID     = [405, 'Invalid channel']
+    EXT_UNKNOWN         = [406, 'Unknown extension']
+    PUBLISH_FAILED      = [407, 'Failed to publish']
+    SERVER_ERROR        = [500, 'Internal server error']
+    
+  end
+end
+

data/lib/faye/grammar.rb

@@ -0,0 +1,58 @@
+module Faye
+  module Grammar
+    
+    def self.rule(&block)
+      source = instance_eval(&block)
+      %r{^#{string(source)}$}
+    end
+    
+    def self.choice(*list)
+      '(' + list.map(&method(:string)) * '|' + ')'
+    end
+    
+    def self.repeat(*pattern)
+      '(' + string(pattern) + ')*'
+    end
+    
+    def self.oneormore(*pattern)
+      '(' + string(pattern) + ')+'
+    end
+    
+    def self.string(item)
+      return item.map(&method(:string)) * '' if Array === item
+      String === item ? item : item.source.gsub(/^\^/, '').gsub(/\$$/, '')
+    end
+    
+    LOWALPHA          = rule {[ '[a-z]' ]}
+    UPALPHA           = rule {[ '[A-Z]' ]}
+    ALPHA             = rule {[ choice(LOWALPHA, UPALPHA) ]}
+    DIGIT             = rule {[ '[0-9]' ]}
+    ALPHANUM          = rule {[ choice(ALPHA, DIGIT) ]}
+    MARK              = rule {[ choice(*%w[\\- \\_ \\! \\~ \\( \\) \\$ \\@]) ]}
+    STRING            = rule {[ repeat(choice(ALPHANUM, MARK, ' ', '\\/', '\\*', '\\.')) ]}
+    TOKEN             = rule {[ oneormore(choice(ALPHANUM, MARK)) ]}
+    INTEGER           = rule {[ oneormore(DIGIT) ]}
+    
+    CHANNEL_SEGMENT   = rule {[ TOKEN ]}
+    CHANNEL_SEGMENTS  = rule {[ CHANNEL_SEGMENT, repeat('\\/', CHANNEL_SEGMENT) ]}
+    CHANNEL_NAME      = rule {[ '\\/', CHANNEL_SEGMENTS ]}
+    
+    WILD_CARD         = rule {[ '\\*{1,2}' ]}
+    CHANNEL_PATTERN   = rule {[ repeat('\\/', CHANNEL_SEGMENT), '\\/', WILD_CARD ]}
+    
+    VERSION_ELEMENT   = rule {[ ALPHANUM, repeat(choice(ALPHANUM, '\\-', '\\_')) ]}
+    VERSION           = rule {[ INTEGER, repeat('\\.', VERSION_ELEMENT) ]}
+    
+    CLIENT_ID         = rule {[ oneormore(ALPHANUM) ]}
+    
+    ID                = rule {[ oneormore(ALPHANUM) ]}
+    
+    ERROR_MESSAGE     = rule {[ STRING ]}
+    ERROR_ARGS        = rule {[ STRING, repeat(',', STRING) ]}
+    ERROR_CODE        = rule {[ DIGIT, DIGIT, DIGIT ]}
+    ERROR             = rule {[ choice(string([ERROR_CODE, ':', ERROR_ARGS, ':', ERROR_MESSAGE]),
+                                       string([ERROR_CODE, ':', ':', ERROR_MESSAGE])) ]}
+    
+  end
+end
+

data/lib/faye/rack_adapter.rb

@@ -0,0 +1,53 @@
+require 'rubygems'
+require 'rack'
+require 'json'
+
+module Faye
+  class RackAdapter
+    DEFAULT_ENDPOINT  = '/bayeux'
+    
+    TYPE_JSON   = {'Content-Type' => 'text/json'}
+    TYPE_SCRIPT = {'Content-Type' => 'text/javascript'}
+    TYPE_TEXT   = {'Content-Type' => 'text/plain'}
+    
+    def initialize(app = nil, options = nil)
+      @app      = app if app.respond_to?(:call)
+      @options  = [app, options].grep(Hash).first || {}
+      
+      @endpoint = @options[:mount] || DEFAULT_ENDPOINT
+      @script   = @endpoint + '.js'
+      @server   = Server.new(@options)
+    end
+    
+    def call(env)
+      request = Rack::Request.new(env)
+      case request.path_info
+      
+      when @endpoint then
+        message  = JSON.parse(request.params['message'])
+        jsonp    = request.params['jsonp'] || JSONP_CALLBACK
+        type     = request.get? ? TYPE_SCRIPT : TYPE_JSON
+        response = nil
+        
+        @server.process(message, false) do |replies|
+          response = JSON.unparse(replies)
+          response = "#{ jsonp }(#{ response });" if request.get?
+        end
+        
+        # TODO support Thin's async responses
+        sleep(0.1) while response.nil?
+        [200, type, [response]]
+      
+      when @script then
+        [200, TYPE_SCRIPT, File.new(CLIENT_SCRIPT)]
+      
+      else
+        env['faye.server'] = @server
+        @app ? @app.call(env) :
+               [404, TYPE_TEXT, ["Sure you're not looking for #{@endpoint} ?"]]
+      end
+    end
+    
+  end
+end
+

data/lib/faye/server.rb

@@ -0,0 +1,231 @@
+module Faye
+  class Server
+    def initialize(options = {})
+      @options  = options
+      @channels = Channel::Tree.new
+      @clients  = {}
+      Thread.new { EventMachine.run } unless EventMachine.reactor_running?
+    end
+    
+    def process(messages, local = false, &callback)
+      messages = [messages].flatten
+      processed, responses = 0, []
+      
+      messages.each do |message|
+        handle(message, local) do |reply|
+          reply = [reply].flatten
+          responses.concat(reply)
+          processed += 1
+          callback[responses] if processed == messages.size
+        end
+      end
+    end
+    
+    def handle(message, local = false, &callback)
+      client_id = message['clientId']
+      channel   = message['channel']
+      
+      if Channel.meta?(channel)
+        response = __send__(Channel.parse(channel)[1], message, local)
+        
+        client_id ||= response['clientId']
+        response['advice'] ||= {}
+        response['advice']['reconnect'] ||= @clients.has_key?(client_id) ? 'retry' : 'handshake'
+        response['advice']['interval']  ||= Connection::INTERVAL * 1000
+        
+        response['id'] = message['id']
+        
+        return callback[response] unless response['channel'] == Channel::CONNECT and
+                                         response['successful'] == true
+        
+        return connection(response['clientId']).connect do |events|
+          callback[[response] + events]
+        end
+      end
+      
+      return callback[[]] if message['clientId'].nil? or Channel.service?(channel)
+      
+      @channels.glob(channel).each { |c| c << message }
+      
+      callback[ { 'channel'     => channel,
+                  'successful'  => true,
+                  'id'          => message['id']  } ]
+    end
+    
+    # MUST contain  * version
+    #               * supportedConnectionTypes
+    # MAY contain   * minimumVersion
+    #               * ext
+    #               * id
+    def handshake(message, local = false)
+      response =  { 'channel' => Channel::HANDSHAKE,
+                    'version' => BAYEUX_VERSION,
+                    'supportedConnectionTypes' => CONNECTION_TYPES,
+                    'id'      => message['id'] }
+      
+      response['error'] = Error.parameter_missing('version') if message['version'].nil?
+      
+      client_conns = message['supportedConnectionTypes']
+      if client_conns
+        common_conns = client_conns.select { |c| CONNECTION_TYPES.include?(c) }
+        response['error'] = Error.conntype_mismatch(*client_conns) if common_conns.empty?
+      else
+        response['error'] = Error.parameter_missing('supportedConnectionTypes')
+      end
+      
+      response['successful'] = response['error'].nil?
+      return response unless response['successful']
+      
+      response['clientId'] = generate_id
+      response
+    end
+    
+    # MUST contain  * clientId
+    #               * connectionType
+    # MAY contain   * ext
+    #               * id
+    def connect(message, local = false)
+      response  = { 'channel' => Channel::CONNECT,
+                    'id'      => message['id'] }
+      
+      client_id = message['clientId']
+      client    = client_id ? @clients[client_id] : nil
+      
+      response['error'] = Error.client_unknown(client_id) if client.nil?
+      response['error'] = Error.parameter_missing('clientId') if client_id.nil?
+      response['error'] = Error.parameter_missing('connectionType') if message['connectionType'].nil?
+      
+      response['successful'] = response['error'].nil?
+      return response unless response['successful']
+      
+      response['clientId'] = client.id
+      response
+    end
+    
+    # MUST contain  * clientId
+    # MAY contain   * ext
+    #               * id
+    def disconnect(message, local = false)
+      response  = { 'channel' => Channel::DISCONNECT,
+                    'id'      => message['id'] }
+      
+      client_id = message['clientId']
+      client    = client_id ? @clients[client_id] : nil
+      
+      response['error'] = Error.client_unknown(client_id) if client.nil?
+      response['error'] = Error.parameter_missing('clientId') if client_id.nil?
+      
+      response['successful'] = response['error'].nil?
+      return response unless response['successful']
+      
+      destroy_client(client)
+      
+      response['clientId'] = client_id
+      response
+    end
+    
+    # MUST contain  * clientId
+    #               * subscription
+    # MAY contain   * ext
+    #               * id
+    def subscribe(message, local = false)
+      response      = { 'channel'   => Channel::SUBSCRIBE,
+                        'clientId'  => message['clientId'],
+                        'id'        => message['id'] }
+      
+      client_id     = message['clientId']
+      client        = client_id ? @clients[client_id] : nil
+      
+      subscription  = message['subscription']
+      subscription  = [subscription].flatten
+      
+      response['error'] = Error.client_unknown(client_id) if client.nil?
+      response['error'] = Error.parameter_missing('clientId') if client_id.nil?
+      response['error'] = Error.parameter_missing('subscription') if message['subscription'].nil?
+      
+      response['subscription'] = subscription.compact
+      
+      subscription.each do |channel|
+        next if response['error']
+        response['error'] = Error.channel_forbidden(channel) unless Channel.subscribable?(channel)
+        response['error'] = Error.channel_invalid(channel) unless Channel.valid?(channel)
+        
+        next if response['error']
+        channel = @channels[channel] ||= Channel.new(channel)
+        client.subscribe(channel)
+      end
+      
+      response['successful'] = response['error'].nil?
+      response
+    end
+    
+    # MUST contain  * clientId
+    #               * subscription
+    # MAY contain   * ext
+    #               * id
+    def unsubscribe(message, local = false)
+      response      = { 'channel'   => Channel::UNSUBSCRIBE,
+                        'clientId'  => message['clientId'],
+                        'id'        => message['id'] }
+      
+      client_id     = message['clientId']
+      client        = client_id ? @clients[client_id] : nil
+      
+      subscription  = message['subscription']
+      subscription  = [subscription].flatten
+      
+      response['error'] = Error.client_unknown(client_id) if client.nil?
+      response['error'] = Error.parameter_missing('clientId') if client_id.nil?
+      response['error'] = Error.parameter_missing('subscription') if message['subscription'].nil?
+      
+      response['subscription'] = subscription.compact
+      
+      subscription.each do |channel|
+        next if response['error']
+        
+        if not Channel.valid?(channel)
+          response['error'] = Error.channel_invalid(channel)
+          next
+        end
+        
+        channel = @channels[channel]
+        client.unsubscribe(channel) if channel
+      end
+      
+      response['successful'] = response['error'].nil?
+      response
+    end
+    
+    # Notifies the server of stale connections that should be deleted
+    def update(message, client)
+      return unless message == :stale_client
+      destroy_client(client)
+    end
+    
+    def client_ids
+      @clients.keys
+    end
+    
+  private
+    
+    def generate_id
+      id = Faye.random
+      id = Faye.random while @clients.has_key?(id)
+      connection(id).id
+    end
+    
+    def connection(id)
+      return @clients[id] if @clients.has_key?(id)
+      client = Connection.new(id, @options)
+      client.add_observer(self)
+      @clients[id] = client
+    end
+    
+    def destroy_client(client)
+      client.disconnect!
+      client.delete_observer(self)
+      @clients.delete(client.id)
+    end
+  end
+end
+