cockatoo 0.0.1

data/LICENSE

@@ -0,0 +1,21 @@
+Copyright (c) 2010 Yann Klis
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+

data/Manifest

@@ -0,0 +1,11 @@
+LICENSE
+Manifest
+README.rdoc
+Rakefile
+bin/cockatoo
+cockatoo.gemspec
+extra/_chat.html.haml
+extra/_chat_initialization.html.haml
+extra/chat.js
+lib/cockatoo_daemon.rb
+lib/cockatoo_http_server.rb

data/README.rdoc

@@ -0,0 +1,51 @@
+= Cockatoo
+
+Cockatoo is a simple chat server. It's coded in Ruby with the help of the fantastic EventMachine.
+
+There are several techniques to handle the real-time web, but we decided to use the Long Polling technique.
+It works with plenty of browsers.
+
+* homepage[http://github.com/novelys/cockatoo]
+
+== Server part
+
+The server part is coded in Ruby and EventMachine. The protocol is pretty straightforward.
+
+== Client part
+
+You can use any client part you want.
+We provide 3 components so you can setup a simple chat system in any Ruby/Rails app you're working on :
+*  _chat_initialization[http://github.com/novelys/cockatoo/raw/master/extra/_chat_initialization.html.haml] HAML template
+* _chat[http://github.com/novelys/cockatoo/raw/master/extra/_chat.html.haml] HAML template
+* chat.js[http://github.com/novelys/cockatoo/raw/master/extra/chat.js] is the javascript client library (you will need jQuery[http://jquery.com])
+
+Just include the 2 templates and the javascript lib in your layout and you'll be good to go.
+
+Here are two screenshots of the client side in action :
+* http://www.novelys.com/assets/Gallery/Lollidays/BigFrame5.png
+* http://www.novelys.com/assets/Gallery/TheSphere/BigFrame3.png
+
+== Installation
+
+  gem install cockatoo
+
+== Usage
+
+Beware that you'll need a "log" directory located where you will run cockatoo.
+
+start the server (by default it will run on the 8000 port)
+  cockatoo start
+
+start the server on the 9000 port
+  cockatoo start -- 9000
+
+stop the server
+  cockatoo stop
+
+restart the server
+  cockatoo restart
+
+== Copyright
+
+Copyright (c) 2010 Yann Klis. See LICENSE[http://github.com/novelys/cockatoo/raw/master/LICENSE] for details.
+

data/Rakefile

@@ -0,0 +1,12 @@
+require 'echoe'  
+Echoe.new('cockatoo', '0.0.1') do |p|
+  p.summary        = "Cockatoo is a simple chat server"
+  p.description    = "Cockatoo is a simple chat server coded with EventMachine and using the Long Polling technique"
+  p.url            = "http://github.com/novelys/cockatoo"
+  p.author         = "Yann Klis"
+  p.email          = "yann.klis @nospam@ novelys.com"
+  p.ignore_pattern = ["tmp/*", "log/*"]
+  p.development_dependencies = []
+  p.runtime_dependencies = ["daemons >=1.1.0", "log4r >=1.1.8", "eventmachine >=0.12.10", "yajl-ruby >=0.7.0", "htmlentities >=4.2.1"]
+  p.executable_pattern = ["bin/*"]
+end

data/bin/cockatoo

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+require 'daemons'
+
+file = File.join(File.expand_path(__FILE__), '..', '..', 'lib', 'cockatoo_daemon.rb')
+pwd = Dir.pwd
+Daemons.run(file,
+            :app_name => "cockatoo",
+            :backtrace => true,
+            :log_output => true,
+            :dir_mode => :normal,
+            :dir => File.join(pwd, "log")
+           )

data/cockatoo.gemspec

@@ -0,0 +1,47 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{cockatoo}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Yann Klis"]
+  s.date = %q{2010-10-27}
+  s.default_executable = %q{cockatoo}
+  s.description = %q{Cockatoo is a simple chat server coded with EventMachine and using the Long Polling technique}
+  s.email = %q{yann.klis @nospam@ novelys.com}
+  s.executables = ["cockatoo"]
+  s.extra_rdoc_files = ["LICENSE", "README.rdoc", "bin/cockatoo", "extra/_chat.html.haml", "extra/_chat_initialization.html.haml", "extra/chat.js", "lib/cockatoo_daemon.rb", "lib/cockatoo_http_server.rb"]
+  s.files = ["LICENSE", "Manifest", "README.rdoc", "Rakefile", "bin/cockatoo", "cockatoo.gemspec", "extra/_chat.html.haml", "extra/_chat_initialization.html.haml", "extra/chat.js", "lib/cockatoo_daemon.rb", "lib/cockatoo_http_server.rb"]
+  s.homepage = %q{http://github.com/novelys/cockatoo}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Cockatoo", "--main", "README.rdoc"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{cockatoo}
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{Cockatoo is a simple chat server}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<daemons>, [">= 1.1.0"])
+      s.add_runtime_dependency(%q<log4r>, [">= 1.1.8"])
+      s.add_runtime_dependency(%q<eventmachine>, [">= 0.12.10"])
+      s.add_runtime_dependency(%q<yajl-ruby>, [">= 0.7.0"])
+      s.add_runtime_dependency(%q<htmlentities>, [">= 4.2.1"])
+    else
+      s.add_dependency(%q<daemons>, [">= 1.1.0"])
+      s.add_dependency(%q<log4r>, [">= 1.1.8"])
+      s.add_dependency(%q<eventmachine>, [">= 0.12.10"])
+      s.add_dependency(%q<yajl-ruby>, [">= 0.7.0"])
+      s.add_dependency(%q<htmlentities>, [">= 4.2.1"])
+    end
+  else
+    s.add_dependency(%q<daemons>, [">= 1.1.0"])
+    s.add_dependency(%q<log4r>, [">= 1.1.8"])
+    s.add_dependency(%q<eventmachine>, [">= 0.12.10"])
+    s.add_dependency(%q<yajl-ruby>, [">= 0.7.0"])
+    s.add_dependency(%q<htmlentities>, [">= 4.2.1"])
+  end
+end

data/extra/_chat.html.haml

@@ -0,0 +1,182 @@
+#ChatApplication.ChatApplication.is-chat
+  .body.csb-body
+    .applets
+      .FriendsApplet.bar-container
+        .Bubble.decoration.TEMPLATE.hidden
+          .header.bbl-header
+            .title
+              %span.out-title
+                [TITLE]
+              %span.date.out-date
+                [DATE]
+            .do-close.action
+              x
+          .body.bbl-body
+            .message
+              .icon.left
+                %img.author.out-author.P{ :src => "/images/user-avatar-default.png", :align => "absmiddle", :height => "60", :width => "60" }
+              .text.out-text
+                [TEXT]
+              .clearer
+                \ 
+          .footer.bbl-footer
+            .operations
+              %button.do-ok.out-ok.action.T
+                reply
+              %span.hsep-5
+              %button.do-cancel.out-cancel.action.T
+                decline
+            .tip
+              \ 
+        .FriendsList.SlidingPane.hidden
+          .header.fl-header
+            .title.T
+              My friends
+            %img.do-collapse.action.P{ :src => "/images/icon-collapse.png", :align => "absmiddle", :height => "16", :width => "16" }
+            .clearer
+              \ 
+          .body.fl-body
+            %ul.friends
+              %li.when-empty.when-service_available
+                .message.when-empty
+                  %span.text.T
+                    No online friend
+              %li.when-not_service_available.hidden
+                .message
+                  %span.text.T
+                    No service
+                  /%button.action.do-reconnect.T
+                  /  reconnect
+                  .clearer
+                    \ 
+            .clearer
+              \ 
+          .footer.TEMPLATES
+            %ul
+              %li.friend-element.when-service_available
+                .friend
+                  .left
+                    %img.icon.out-picture.P{ :src => "/images/user-avatar-default.png", :align => "absmiddle", :height => "30", :width => "30" }
+                  .name.out-name
+                    NAME
+                  .status.out-status
+                    STATUS
+                  %span.when-not_in_discussion.hidden
+                    %button.do-invite.action.T
+                      invite
+                  %span.when-in_discussion
+                    %button.do-seeChat.action.T
+                      chat
+                  .clearer
+                    \ 
+        .UserStatus.StatusBar
+          .body.us-body
+            .info
+              %img.P{ :src => "/images/icon-contact.png", :align => "absmiddle", :height => "16", :width => "16" }
+              %span
+                %span.hi
+                  %span.out-onlineFriends
+                    0
+                  %span.T.out-onlineFriendsLabel
+                    friends
+                %span
+                %span.T
+                  online
+            .toggle
+              %img.do-expand.action.when-not_expanded.P{ :src => "/images/icon-expand.png", :align => "absmiddle", :height => "16", :width => "16" }
+              %img.do-collapse.action.when-expanded.hidden.P{ :src => "/images/icon-collapse.png", :align => "absmiddle", :height => "16", :width => "16" }
+    .clearer
+      \ 
+  .footer.TEMPLATES
+    .DiscussionApplet.bar-container
+      .Bubble.decoration.TEMPLATE.hidden
+        .header.bbl-header
+          .title
+            %span.out-title
+              [TITLE]
+            %span.date.out-date
+              [DATE]
+          .do-close.action
+            x
+        .body.bbl-body
+          .message
+            .icon.left
+              %img.author.out-author.P{ :src => "/images/user-avatar-default.png", :align => "absmiddle", :height => "60", :width => "60" }
+            .text.out-text
+              [TEXT]
+            .clearer
+              \ 
+        .footer.bbl-footer
+          .operations
+            %button.do-ok.out-ok.action.T
+              reply
+            %span.hsep-5
+            %button.do-cancel.out-cancel.action.T
+              decline
+          .tip
+            \ 
+      .ChatLog.SlidingPane.decoration.hidden
+        .header.cl-header
+          .icon.left
+            %img.out-withPicture.P{ :src => "/images/user-avatar-default.png", :align => "absmiddle", :height => "45", :width => "45" }
+          .name.out-withName
+            NAME
+          .status.out-withStatus
+            STATUS
+          %img.do-collapse.action.P{ :src => "/images/icon-collapse.png", :align => "absmiddle", :height => "16", :width => "16" }
+          %img.do-close-discussion.action.P{ :src => "/images/icon-close.png", :align => "absmiddle", :height => "16", :width => "16" }
+          .clearer
+            \ 
+        .header.cl-header-2
+          .left
+            .discussionStatus
+              %span.out
+                // TODO : find something interesting to display here...
+                 
+          .right
+            %span.on-state.when-initiated.when-accepted.when-active.when-inactive.hidden
+              %button.do-endDiscussion.action.T
+                end
+            %span.on-state.when-ended.when-cancelled.when-declined.hidden
+              %button.do-closeDiscussion.action.T
+                close
+          .clearer
+            \ 
+        .body.cl-body
+          %ul.messages.is-empty
+            %li.when-empty.hidden
+          .TEMPLATES
+            %ul
+              %li
+                .message
+                  .header
+                    .left.out.name
+                      NAME
+                    .right.out.date
+                      HHhMM
+                  .body.out.text
+                    TEXT
+        .footer.cl-footer
+          .on-state.when-initiated.when-accepted.when-active.when-inactive
+            %input.in-message{ :type => "text" }
+            %button.do-writeMessage.action
+              %img.action.P{ :src => "/images/icon-bubble_and_shadow.png", :align => "absmiddle", :height => "16", :width => "16" }
+          .on-state.when-ended.when-cancelled.when-declined.hidden
+            %span.T
+              discussion ended
+      .ChatStatus.StatusBar
+        .body.us-body
+          .info
+            %img.P{ :src => "/images/icon-bubble.png", :align => "absmiddle", :height => "16", :width => "16" }
+            %span
+              %span.hi
+                %span.out-withName
+                  NAME
+              \:
+              %span.out-messageCount
+                0
+              %span.T
+                messages
+          .toggle.action
+            %img.do-expand.when-not_expanded.hidden.action.P{ :src => "/images/icon-expand.png", :align => "absmiddle", :height => "16", :width => "16" }
+            %img.do-collapse.when-expanded.action.P{ :src => "/images/icon-collapse.png", :align => "absmiddle", :height => "16", :width => "16" }

data/extra/_chat_initialization.html.haml

@@ -0,0 +1,38 @@
+:javascript
+  var ui_chat_applet = null;
+  var ui_chat_applet_status = null;
+  var ui_chat_applet_sliding_pane = null;
+  var ui_chat_applet_expanded = null;
+  var ui_chat_applet_collapsed = null;
+  var ui_chat_applet_friends = null;
+  var ui_chat_applet_friend_template = null;
+
+  var ui_chat_applets = null;
+  var ui_chat_friends_applet = null;
+  var ui_chat_discussion_applet_template = null;
+
+  var ui_chat_messages = null;
+  var ui_chat_message_template = null;
+  var friends_json = null;
+  var chat_initialization = null;
+
+  $(document).ready(function() {
+    ui_chat_applet = $('#ChatApplication')
+    ui_chat_applet_status = $('.StatusBar', ui_chat_applet)
+    ui_chat_applet_sliding_pane = $('.SlidingPane', ui_chat_applet)
+    ui_chat_applet_expanded = $('.when-expanded', ui_chat_applet) 
+    ui_chat_applet_collapsed = $('.when-not_expanded', ui_chat_applet)
+    ui_chat_applet_friends = $('.fl-body .friends', ui_chat_applet)
+    ui_chat_applet_friend_template = $('.TEMPLATES li.friend-element', ui_chat_applet)
+  
+    ui_chat_applets = $('.csb-body > .applets', ui_chat_applet)
+    ui_chat_friends_applet = $('.csb-body .FriendsApplet', ui_chat_applet)
+    ui_chat_discussion_applet_template = $('.TEMPLATES .DiscussionApplet', ui_chat_applet)
+
+    ui_chat_messages = $('ul.messages')
+    ui_chat_message_template = $('.TEMPLATES ul li')
+    
+    load_friends_json();
+    
+    chat_init();
+  });

data/extra/chat.js

@@ -0,0 +1,376 @@
+function getKeys(h) {
+  var keys = "";
+  for (var key in h)
+    keys += "," + key;
+  return keys.substr(1);
+}
+
+function load_friends_json() {
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: "/profile/friends.json",
+    async: false,
+    //error: chat_unavailable,
+    success: function(msg) {
+      friends_json = msg;
+    }
+  });
+}
+
+function chat_init() {
+  chat_initialization = true;
+  chat_available();
+  chat_register();
+  
+  $('.header', ui_chat_applet).click(function(){
+	  chat_applet_toggle();
+		return false;
+	});
+	
+	$('.info', ui_chat_applet_status).click(function(){
+    chat_applet_toggle();
+		return false;
+	});
+	$(ui_chat_applet_collapsed).click(function() {
+	  chat_applet_toggle();
+	  return false;
+	});
+	$(ui_chat_applet_expanded).click(function() {
+	  chat_applet_toggle();
+	  return false;
+	});
+	// ui_chat_applet.click(function(){
+    // chat_applet_focus()
+	// });
+}
+
+function chat_applet_toggle() {
+  chat_all_discussions_collapse();
+  
+  if ( ui_chat_applet_status.hasClass('is-expanded') ) {
+    chat_applet_collapse();
+	} else {
+    chat_applet_expand();
+  }
+}
+
+function chat_applet_collapse() {
+  ui_chat_applet_sliding_pane.addClass('hidden');
+	ui_chat_applet_collapsed.removeClass('hidden');
+	ui_chat_applet_expanded.addClass('hidden');
+  ui_chat_applet_status.removeClass('is-expanded');
+  chat_applet_unfocus();
+}
+
+function is_all_chat_discussions_collapsed() {
+  return $('.ChatLog.hidden').length == $('.ChatLog').length;
+}
+
+function chat_applet_expand() {
+  ui_chat_applet_expanded.removeClass('hidden');
+	ui_chat_applet_collapsed.addClass('hidden');
+	ui_chat_applet_sliding_pane.removeClass('hidden');
+	ui_chat_applet_status.addClass('is-expanded');
+	chat_applet_focus();
+}
+
+function chat_applet_focus(){
+  $('#ChatApplication .with-focus').removeClass('with-focus');
+  ui_chat_applet.addClass('with-focus');
+}
+
+function chat_applet_unfocus(){
+  ui_chat_applet.removeClass('with-focus');
+}
+
+function chat_discussion_toggle(nui) {
+  if ($('.toggle .do-collapse', nui).hasClass('hidden')) {
+    chat_discussion_expand(nui);
+  } else {
+    chat_discussion_collapse(nui);
+  }
+}
+
+function chat_all_discussions_collapse() {
+  $(".ChatLog").addClass('hidden');
+  $(".ChatStatus .toggle .do-collapse").addClass('hidden');
+  $(".ChatStatus .toggle .do-expand").removeClass('hidden');
+}
+
+function chat_discussion_expand(nui) {
+  chat_all_discussions_collapse();
+  $(".ChatLog", nui).removeClass('hidden');
+  $(".toggle .do-collapse", nui).removeClass('hidden');
+  $(".toggle .do-expand", nui).addClass('hidden');
+  chat_applet_collapse();
+  chat_scroll(nui);
+  focus_on_input(nui);
+}
+
+function focus_on_input(nui) {
+  $('.in-message', nui).focus();
+}
+
+function chat_discussion_collapse(nui) {
+  $(".ChatLog", nui).addClass('hidden');
+  $(".toggle .do-collapse", nui).addClass('hidden');
+  $(".toggle .do-expand", nui).removeClass('hidden');
+  chat_applet_collapse();
+}
+
+function chat_unavailable() {
+  $('.when-service_available', ui_chat_applet).addClass('hidden');
+	$('.DiscussionApplet', ui_chat_applets).addClass('hidden');
+	$('.when-not_service_available', ui_chat_applet).removeClass('hidden');
+}
+
+function chat_available() {
+  $('.when-service_available', ui_chat_applet).removeClass('hidden');
+  $('.DiscussionApplet', ui_chat_applets).removeClass('hidden');
+	$('.when-not_service_available', ui_chat_applet).addClass('hidden');
+}
+
+function chat_discussion_close(nui, fid) {
+  nui.remove();
+  
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: "/chat/close_discussion",
+    error: chat_unavailable,
+    data: {uid: uid, did: fid}
+  });
+}
+
+function chat_register() {
+  url = "/chat/register";
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: url,
+    error: chat_unavailable,
+    success: chat_dispatch_messages,
+    data: {uid: uid, "friends_ids": getKeys(friends_json)}
+  });
+}
+
+function chat_poll() {
+  url = "/chat/poll";
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: url,
+    error: chat_unavailable,
+    success: chat_dispatch_messages,
+    data: {uid: uid}
+  });
+}
+
+function chat_say(fid, msg) {
+  url = "/chat/say";
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: url,
+    data: {sid: uid, did: fid, msg: msg}
+  });
+}
+
+function chat_leave() {
+  url = "/chat/leave";
+  $.ajax({
+    cache: false,
+    type: "GET",
+    dataType: "json",
+    url: url,
+    async: false,
+    data: {uid: uid}
+  });
+}
+
+function chat_dispatch_messages(messages) {
+  if (messages) {
+    for ( var i=0, len=messages.length; i<len; ++i ){
+      message = messages[i];
+      switch(message.type) {
+        case "status":
+          // user change his status : offline/online
+          chat_user_change_status(message);
+        break;
+        case "message":
+          // user send a message to another
+          chat_incoming_message(message);
+        break;
+      }
+    }
+  }
+  chat_initialization = false;
+  
+  setTimeout(chat_poll, 0);
+}
+
+function chat_user_change_status(friend) {
+  not_existing = $('[fid='+friend.uid+']').length == 0;
+  if ( not_existing && (friend.state && (friend.state == 'ONLINE')) ) {
+    fui = ui_chat_applet_friend_template.clone();
+    fui.attr({'fid':('' + friend.uid), 'status':friend.state});
+    $('.out-name', fui).html(friends_json[friend.uid].login);
+    $('.out-status', fui).html(friend.state);
+    $('.out-picture', fui).attr({'title':friends_json[friend.uid].login, 'src':friends_json[friend.uid].avatar_url});
+    $('.do-seeChat', fui).click(function(){
+      chat_discuss_with_user(friend);
+    });
+    fui.removeClass('hidden');
+    ui_chat_applet_friends.append(fui);
+    chat_user_online(friend.uid);
+  }
+  if (friend.state && (friend.state == 'OFFLINE')) {
+    chat_user_offline(friend.uid);
+  }
+  chat_applet_update_counters();
+}
+
+function chat_user_offline(uid) {
+  $('[fid='+uid+']').remove();
+  nui = $('[discussion_with='+uid+']');
+  if (nui.length != 0) {
+    $('.out-withStatus', nui).html("OFFLINE");
+    $('.in-message', nui).attr("disabled", "disabled");
+  }
+}
+
+function chat_user_online(uid) {
+  nui = $('[discussion_with='+uid+']');
+  if (nui.length != 0) {
+    $('.out-withStatus', nui).html("ONLINE");
+    $('.in-message', nui).removeAttr("disabled");
+  }
+}
+
+function chat_scroll(nui) {
+  $('.cl-body', nui).scrollTo('100%');
+}
+
+function chat_incoming_message(message) {
+  var friend = null;
+  if (message.sid == uid) {
+    friend = {uid:message.did, state:"ONLINE"};
+    message_login = user_name;
+  } else {
+    friend = {uid:message.sid, state:"ONLINE"};
+    message_login = friends_json[friend.uid].login;
+  }
+  var nui = $('[discussion_with='+friend.uid+']');
+  if ( nui.length == 0 ) {
+    chat_discuss_with_user(friend);
+    nui = $('[discussion_with='+friend.uid+']');
+  }
+
+  var chat_log = $('.ChatLog', nui);
+  
+  if (chat_initialization) {
+    chat_discussion_collapse(nui);
+  } else if (is_all_chat_discussions_collapsed()) {
+    chat_discussion_expand(nui);
+  }
+  
+  var messages = $('ul.messages', chat_log);
+  chat_discussion_message_counter(nui, messages);
+  
+  var message_template = $('.TEMPLATES ul li', chat_log).clone();
+  var date=new Date(message.date);
+  var m=date.getMinutes();
+  var h=date.getHours();
+  $('.out.name', message_template).html(message_login);
+  $('.out.text', message_template).html(message.value);
+  $('.out.date', message_template).html(sprintf('%02dh%02d', h, m));
+  if (message.sid == uid) {
+    message_template.addClass('inbound');
+  } else {
+    message_template.addClass('outbound');
+  }
+  messages.append(message_template).removeClass('is-empty');
+  
+  chat_scroll(nui);
+  
+  // Play a sound...
+  if (!chat_initialization && message.sid != uid) {
+    chatAlarmSound.play();
+  }
+}
+
+function chat_discuss_with_user(friend) {
+  var nui = $('[discussion_with='+friend.uid+']');
+  if ( nui.length == 0 ) {
+    var nui = ui_chat_discussion_applet_template.clone();
+    nui.attr({'discussion_with':friend.uid});
+    $('.out-withName', nui).html(friends_json[friend.uid].login);
+    $('.out-withStatus', nui).html(friend.state);
+    $('.out-withPicture', nui).attr({'title':friends_json[friend.uid].login, 'src':friends_json[friend.uid].avatar_url});
+
+    
+    $('.ChatStatus.StatusBar', nui).click(function(){
+      chat_discussion_toggle(nui);
+  		return false;
+  	});
+    
+    $('.ChatLog .header .do-collapse', nui).click(function() {
+      chat_discussion_toggle(nui);
+      return false;
+    });
+    
+    $('.ChatLog .header .do-close-discussion', nui).click(function() {
+      chat_discussion_close(nui, friend.uid);
+      return false;
+    });
+    
+    $(".in-message", nui).keypress(function (e) {
+      if (e.keyCode != 13 /* Return */) return;
+      chat_send_message(nui, friend.uid);
+    });
+    
+    $(".do-writeMessage", nui).click(function() {
+      chat_send_message(nui, friend.uid);
+    });
+
+    ui_chat_applets.append(nui);
+    chat_applet_collapse();
+    focus_on_input(nui);
+  } else {
+    chat_discussion_expand(nui);
+  }
+}
+
+function chat_send_message(nui, friend_uid) {
+  /*var msg = $("#entry").attr("value").replace("\n", "");*/
+  var msg = $(".in-message", nui).attr("value");
+  if (msg != "") {
+    chat_say(friend_uid, msg);
+    $(".in-message", nui).attr("value", "");
+  }
+}
+
+function chat_discussion_message_counter(nui, messages) {
+  nbr = $('li', messages).length;
+  $('.out-messageCount', nui).html(nbr);
+}
+
+function chat_applet_update_counters() {
+  nbr = $('li.friend-element[STATUS=ONLINE]', ui_chat_applet_friends).length;
+  $('.out-onlineFriends', ui_chat_applet).html(nbr);
+  if (nbr > 0) {
+    $('.when-empty', ui_chat_applet_friends).addClass('hidden');
+  } else {
+    $('.when-empty', ui_chat_applet_friends).removeClass('hidden');
+  }
+}
+  
+$(window).unload(function () {
+  chat_leave();
+});

data/lib/cockatoo_daemon.rb

@@ -0,0 +1,26 @@
+require File.join(File.expand_path(File.dirname(__FILE__) + "/cockatoo_http_server"))
+require 'log4r'
+include Log4r
+
+$logger = Logger.new 'cockatoo'
+$logger.outputters = Outputter.stdout
+
+
+loop do
+  begin
+    GC.start
+    $chat_users = {}
+    $timers = {}
+    EM.epoll if EM.epoll?
+    EM.run do
+      $logger.info "#{Time.now} Starting server on port #{ARGV.first || 8000}"
+      EM.start_server '0.0.0.0', ARGV.first || 8000, ChatHttpServer
+    end
+  rescue Interrupt
+    $logger.info "#{Time.now} Shuting down..."
+    exit
+  rescue
+    $logger.error "#{Time.now} Error: " + $!.message
+    $logger.error "\t" + $!.backtrace.join("\n\t")
+  end
+end

data/lib/cockatoo_http_server.rb

@@ -0,0 +1,205 @@
+require 'eventmachine'
+require 'cgi'
+require 'yajl'
+require "htmlentities"
+
+class Object
+  def blank?
+    respond_to?(:empty?) ? empty? : !self
+  end
+
+  def present?
+    !blank?
+  end
+end
+
+class ChatUser
+  attr_accessor :uid, :discussion, :friends_ids
+  def self.new_from_query(query)
+    return nil unless query.present? && query['uid'].present?
+    new(:uid => query['uid'].first.to_i)
+  end
+  
+  def initialize(attributes)
+    @uid = attributes[:uid]
+    @friends_ids = []
+  end
+  
+  def log_with_user(other_chat_user)
+    self.discussion.present? ? self.discussion.log.select { |message| message["type"] == "message" && (message["sid"] == other_chat_user.uid || message["did"] == other_chat_user.uid) } : []
+  end
+  
+  def clear_discussion(did)
+    if self.discussion.present?
+      self.discussion.log.delete_if { |message| message["sid"] == did || message["did"] == did }
+    end
+  end
+end
+
+class Discussion < EM::Channel
+  attr_accessor :log
+  
+  def initialize
+    @log = []
+    super()
+  end
+
+  def say(ary)
+    ary = [ ary ].flatten
+    @log = (@log + ary)[0, 500]
+    json = Yajl::Encoder.encode(ary)
+    push json
+  end
+end
+
+module ChatHttpServer
+
+  def unbind
+    $chat_users[@user_id].discussion.unsubscribe(@sid) if @user_id && @sid && $chat_users[@user_id] && $chat_users[@user_id].discussion
+  end
+
+  def receive_data(data)
+    # puts "received data : #{data}"
+    lines = data.split(/[\r\n]+/)
+    method, request, version = lines.shift.split(' ', 3)
+    if request.nil?
+      $logger.error "#{Time.now} Warning: strange request #{[method, request, version].inspect}"
+      close_connection
+      return
+    else
+      path, query = request.split('?', 2)
+      $logger.info "#{Time.now} request on #{path} with #{query}"
+      query = CGI.parse(query) if not query.nil?
+      cookies = {}
+      lines.each do |line|
+        if line[0..6].downcase == 'cookie:'
+          cookies = CGI::Cookie.parse(line.split(':', 2).last.strip)
+        end
+      end
+    end
+   
+    if query.present? && query['uid'].present?
+      uid = query['uid'].first.to_i
+      chat_user = ($chat_users[uid] ||= ChatUser.new_from_query(query))
+    end
+    
+    case path
+
+    when '/chat/register'
+      if chat_user && query['friends_ids'].present? && query['friends_ids'].first.present?
+        remove_all_timers_for(chat_user)
+        
+        chat_user.friends_ids = query["friends_ids"].first.split(',').map { |id| id.to_i }
+        
+        message = { "type" => "status", "state" => "ONLINE", "uid" => chat_user.uid }
+        back_messages = []
+        chat_user.friends_ids.each do |fid|
+          chat_user_friend = $chat_users[fid]
+          if chat_user_friend && chat_user_friend.discussion
+            chat_user_friend.discussion.say(message)
+            back_messages << {"type" => "status", "state" => "ONLINE", "uid" => fid}
+
+            back_messages += chat_user.discussion ? chat_user.log_with_user(chat_user_friend) : chat_user_friend.log_with_user(chat_user)
+          end
+        end
+        respond Yajl::Encoder.encode(back_messages)
+      else
+        respond "no user id or no friends ids", 500
+      end
+
+    when '/chat/leave'
+      if chat_user
+        empty_response
+        unregister_user_after(chat_user, 15)
+      else
+        respond "no user id", 500
+      end
+      
+    when '/chat/close_discussion'
+      empty_response
+      
+      if chat_user && query['did'].present?
+        did = query['did'].first.to_i
+        $logger.info "User #{chat_user.uid} clears discussion for user #{did}"
+        chat_user.clear_discussion(did)
+      end
+
+    when '/chat/poll'
+      if chat_user
+        unregister_user_after(chat_user, 120)
+        timer = EventMachine::Timer.new(30) do
+          empty_response
+        end
+        @user_id = chat_user.uid
+        chat_user.discussion ||= Discussion.new
+        @sid = chat_user.discussion.subscribe do |code|
+          respond code
+        end
+      else
+        respond "no user id", 500
+      end
+
+    when '/chat/say'
+      if query['sid'].present? and query['msg'].present? and query['did'].present?
+        empty_response
+        sid = query['sid'].first.to_i
+        did = query['did'].first.to_i
+        msg = query['msg'].first
+        
+        chat_user_sender = $chat_users[sid]
+        chat_user_recipient = $chat_users[did]
+        message = {"type" => "message", "value" => HTMLEntities.new.encode(msg.gsub('"', '\"')), "sid" => sid, "did" => did, "date" => (Time.now.to_i * 1000)}
+        
+        if chat_user_sender && chat_user_recipient
+          chat_user_sender.discussion.say(message)
+          chat_user_recipient.discussion.say(message)
+        else
+          $logger.error "#{Time.now} ERROR : message could not be transmitted between sid #{sid} and did #{did}!"
+        end
+      else
+        respond "USER and MSG parameters are mandatory", 500
+      end
+
+    else
+      respond "not found", 404
+    end
+  end
+
+  RESPONSE = [
+    "HTTP/1.1 %d Cockatoo Alpha 1",
+    "Content-length: %d",
+    "Content-type: %s",
+    "Connection: close",
+    "",
+    "%s"].join("\r\n")
+    
+  def empty_response
+    respond Yajl::Encoder.encode([])
+  end
+
+  def respond(body, status = 200, content_type = 'application/json; charset=utf-8')
+    send_data RESPONSE % [status, body.length, content_type, body]
+    close_connection_after_writing
+  end
+  
+  def unregister_user_after(chat_user, seconds)
+    remove_all_timers_for(chat_user)
+    $logger.info "INFO : new timer for unregister user #{chat_user.uid} in #{seconds} sec."
+    $timers[chat_user.uid] = EventMachine::Timer.new(seconds) do
+      $logger.info "INFO : execute timer for user #{chat_user.uid}"
+      message = { "type" => "status", "state" => "OFFLINE", "uid" => chat_user.uid }
+      chat_user.friends_ids.each{|fid|
+        $chat_users[fid].discussion.say(message) if $chat_users[fid] && $chat_users[fid].discussion
+      }
+      $chat_users.delete(chat_user.uid)
+    end
+  end
+  
+  def remove_all_timers_for(chat_user)
+    if $timers[chat_user.uid]
+      $logger.info "INFO : Removes timer for user #{chat_user.uid}"
+      $timers[chat_user.uid].cancel
+      $timers.delete(chat_user.uid)
+    end
+  end
+end

metadata

@@ -0,0 +1,169 @@
+--- !ruby/object:Gem::Specification 
+name: cockatoo
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Yann Klis
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-10-27 00:00:00 +02:00
+default_executable: cockatoo
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: daemons
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 19
+        segments: 
+        - 1
+        - 1
+        - 0
+        version: 1.1.0
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: log4r
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 1
+        - 1
+        - 8
+        version: 1.1.8
+  type: :runtime
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: eventmachine
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 59
+        segments: 
+        - 0
+        - 12
+        - 10
+        version: 0.12.10
+  type: :runtime
+  version_requirements: *id003
+- !ruby/object:Gem::Dependency 
+  name: yajl-ruby
+  prerelease: false
+  requirement: &id004 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        - 7
+        - 0
+        version: 0.7.0
+  type: :runtime
+  version_requirements: *id004
+- !ruby/object:Gem::Dependency 
+  name: htmlentities
+  prerelease: false
+  requirement: &id005 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 53
+        segments: 
+        - 4
+        - 2
+        - 1
+        version: 4.2.1
+  type: :runtime
+  version_requirements: *id005
+description: Cockatoo is a simple chat server coded with EventMachine and using the Long Polling technique
+email: yann.klis @nospam@ novelys.com
+executables: 
+- cockatoo
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+- bin/cockatoo
+- extra/_chat.html.haml
+- extra/_chat_initialization.html.haml
+- extra/chat.js
+- lib/cockatoo_daemon.rb
+- lib/cockatoo_http_server.rb
+files: 
+- LICENSE
+- Manifest
+- README.rdoc
+- Rakefile
+- bin/cockatoo
+- cockatoo.gemspec
+- extra/_chat.html.haml
+- extra/_chat_initialization.html.haml
+- extra/chat.js
+- lib/cockatoo_daemon.rb
+- lib/cockatoo_http_server.rb
+has_rdoc: true
+homepage: http://github.com/novelys/cockatoo
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Cockatoo
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 11
+      segments: 
+      - 1
+      - 2
+      version: "1.2"
+requirements: []
+
+rubyforge_project: cockatoo
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Cockatoo is a simple chat server
+test_files: []
+