wackamole 0.0.1

data/tasks/spec.rake

@@ -0,0 +1,54 @@
+if HAVE_SPEC_RAKE_SPECTASK and not PROJ.spec.files.to_a.empty?
+require 'spec/rake/verify_rcov'
+require 'spec/data/fixtures'
+
+namespace :spec do
+
+  desc 'Run all specs with basic output'
+  Spec::Rake::SpecTask.new(:run) do |t|
+    t.ruby_opts = PROJ.ruby_opts
+    t.spec_opts = PROJ.spec.opts
+    t.spec_files = PROJ.spec.files
+    t.libs += PROJ.libs
+  end
+
+  desc 'Run all specs with text output'
+  Spec::Rake::SpecTask.new(:specdoc) do |t|
+    t.ruby_opts = PROJ.ruby_opts
+    t.spec_opts = PROJ.spec.opts + ['--format', 'specdoc']
+    t.spec_files = PROJ.spec.files
+    t.libs += PROJ.libs
+  end
+
+  if HAVE_RCOV
+    desc 'Run all specs with RCov'
+    Spec::Rake::SpecTask.new(:rcov) do |t|
+      t.ruby_opts = PROJ.ruby_opts
+      t.spec_opts = PROJ.spec.opts
+      t.spec_files = PROJ.spec.files
+      t.libs += PROJ.libs
+      t.rcov = true
+      t.rcov_dir = PROJ.rcov.dir       
+      t.rcov_opts = PROJ.rcov.opts + ['--exclude', 'spec']
+    end
+
+    RCov::VerifyTask.new(:verify) do |t| 
+      t.threshold = PROJ.rcov.threshold
+      t.index_html = File.join(PROJ.rcov.dir, 'index.html')
+      t.require_exact_threshold = PROJ.rcov.threshold_exact
+    end
+
+    task :verify => :rcov
+    remove_desc_for_task %w(spec:clobber_rcov)
+  end
+
+end  # namespace :spec
+
+desc 'Alias to spec:run'
+task :spec => 'spec:run'
+
+task :clobber => 'spec:clobber_rcov' if HAVE_RCOV
+
+end  # if HAVE_SPEC_RAKE_SPECTASK
+
+# EOF

data/tasks/svn.rake

@@ -0,0 +1,46 @@
+if HAVE_SVN
+
+unless PROJ.svn.root
+  info = %x/svn info ./
+  m = %r/^Repository Root:\s+(.*)$/.match(info)
+  PROJ.svn.root = (m.nil? ? '' : m[1])
+end
+PROJ.svn.root = File.join(PROJ.svn.root, PROJ.svn.path) unless PROJ.svn.path.empty?
+
+namespace :svn do
+
+  # A prerequisites task that all other tasks depend upon
+  task :prereqs
+
+  desc 'Show tags from the SVN repository'
+  task :show_tags => 'svn:prereqs' do |t|
+    tags = %x/svn list #{File.join(PROJ.svn.root, PROJ.svn.tags)}/
+    tags.gsub!(%r/\/$/, '')
+    tags = tags.split("\n").sort {|a,b| b <=> a}
+    puts tags
+  end
+
+  desc 'Create a new tag in the SVN repository'
+  task :create_tag => 'svn:prereqs' do |t|
+    v = ENV['VERSION'] or abort 'Must supply VERSION=x.y.z'
+    abort "Versions don't match #{v} vs #{PROJ.version}" if v != PROJ.version
+
+    svn = PROJ.svn
+    trunk = File.join(svn.root, svn.trunk)
+    tag = "%s-%s" % [PROJ.name, PROJ.version]
+    tag = File.join(svn.root, svn.tags, tag)
+    msg = "Creating tag for #{PROJ.name} version #{PROJ.version}"
+
+    puts "Creating SVN tag '#{tag}'"
+    unless system "svn cp -m '#{msg}' #{trunk} #{tag}"
+      abort "Tag creation failed" 
+    end
+  end
+
+end  # namespace :svn
+
+task 'gem:release' => 'svn:create_tag'
+
+end  # if PROJ.svn.path
+
+# EOF

data/views/dashboard/_report.erb

@@ -0,0 +1,118 @@
+<div class="section" id="summary">
+  <p class="title">Current status</p>
+  <ul id="summary">
+    <li>
+      <p class="status">Users</p>
+      <div id="user_load" class="load"></div>
+    </li>
+    <li>
+      <p class="status">Features</p>
+      <div id="feature_load" class="load"></div>        
+    <li>
+      <p class="status">Performance</p>
+      <p class="result"><%=pluralize( @info[:perf_load], 'issue' )%></p>        
+    </li>
+    <li>
+      <p class="status">Uncaught Exceptions</p>
+      <p class="result"><%=pluralize( @info[:fault_load], 'issue' )%></p>
+    </li>
+  </ul>
+</div>
+
+<div class="section" id="activity">
+  <p class="title">Today's activities</p>
+  <ul class="section">
+    <li>
+      <p id="faults">Faults</p>
+      <% unless zeroed_series?( @info[:fault_series] ) %>
+        <div class="heat" id="svg_faults"></div>
+      <% else %>
+        <p class="no_report">No Issues reported.</p>
+      <% end %>
+    </li>
+    <li>
+      <p id="perfs">Performance</p>
+      <% unless zeroed_series?( @info[:perf_series] ) %>
+        <div class="heat" id="svg_perf"></div>
+      <% else %>
+        <p class='no_report'>No Issues reported.</p>
+      <% end %>
+    </li>
+    <li>
+      <p id="users">Users</p>
+      <% unless zeroed_series?( @info[:user_series] ) %>
+        <div class="heat" id="svg_users"></div>
+      <% else %>
+        <p class='no_report'>No Users reported.</p>
+      <% end %>
+    </li>
+    <li>
+      <p id="features">Features</p>
+      <% unless zeroed_series?( @info[:feature_series] ) %>
+        <div class="heat" id="svg_features"></div>
+      <% else %>
+        <p class="no_report">No Features reported.</p>
+      <% end %>
+    </li>
+  </ul>
+</div>
+
+<script>
+  function gen_load( name, value, total )
+  {
+    var p      = Raphael( name, 300, 20 );
+    var range  = Math.ceil( ((value/total)*100)/10 );
+    var x      = 2;
+    var y      = 2;
+    var spacer = 5;
+        
+    for( var i=1; i <= range; i++ )
+    {
+      var l = p.rect( x, y, 10, 16, 2 );
+      l.attr( 'fill', 'green' );
+      l.attr( 'gradient', '45-#0f0-#fff' );
+      l.attr( 'stroke-width', 0 );
+      x += 10 + spacer;
+
+    }
+    var text = p.text( 230, 10, Math.ceil((value/total)*100) + '% (' + value + " of " + total + ')' );
+    text.attr( 'fill'     , '#434343' );  
+    text.attr( 'font-size', 15 );      
+  }
+
+  function gen_heat_map( id, series, symbol )
+  {
+    var r = Raphael( id ), 
+      xs    = <%= (0..23).to_a.to_json %>,
+      ys    = <%= y = [];24.times{ y << 1 };y.to_json %>,
+      axisy = <%= %w[Mon].to_json %>,
+      axisx = <%= %w[12am 1 2 3 4 5 6 7 8 9 10 11 12 1 2 3 4 5 6 7 8 9 10 11].to_json %>;
+            
+    r.g.dotchart(0, -10, 620, 60, xs, ys, series, {symbol: symbol, max: 10, heat: true, axis: "0 0 1 0", axisxstep: 23, axisystep: 1, axisxlabels: axisx, axisxtype: " ", axisytype: " ", axisylabels: axisy}).hover(function () {
+      this.tag = this.tag || r.g.tag(this.x, this.y, this.value, 0, this.r + 2).insertBefore(this);
+      this.tag.show();
+    }, function () {
+      this.tag && this.tag.hide();
+    });      
+  }
+    
+  $( function() {
+    $('a.dash').addClass( 'current' );
+    
+    gen_load( 'user_load'   , <%=@info[:user_load]%>, <%=@info[:total_users]%> );
+    gen_load( 'feature_load', <%=@info[:feature_load]%>, <%=@info[:total_features]%> );
+      
+    <% unless zeroed_series?( @info[:fault_series] ) %>
+      gen_heat_map( 'svg_faults'  , <%=@info[:fault_series].to_json%>  , 'cross' );
+    <% end %>
+    <% unless zeroed_series?( @info[:perf_series] ) %>
+      gen_heat_map( 'svg_perf'    , <%=@info[:perf_series].to_json%>   , 'diamond' );
+    <% end %>
+    <% unless zeroed_series?( @info[:user_series] ) %>
+      gen_heat_map( 'svg_users'   , <%=@info[:user_series].to_json%>   , 'disc' );
+    <% end %>
+    <% unless zeroed_series?( @info[:user_series] ) %>
+      gen_heat_map( 'svg_features', <%=@info[:feature_series].to_json%>, 'flower' );
+    <% end %>
+  });
+</script>

data/views/dashboard/index.erb

@@ -0,0 +1,4 @@
+<div id="dash">
+  <%= partial :'dashboard/report' %>
+</div>
+<%= periodically_call_remote :url => "/dashboard/refresh", :frequency => @refresh_rate %>

data/views/dashboard/refresh_js.erb

@@ -0,0 +1,3 @@
+$('p#timestamp').html( "<%=escape_javascript(partial(:'shared/timestamp'))%>" );
+
+$('div#dash').html( "<%=escape_javascript(partial(:'dashboard/report'))%>" );

data/views/features/_rows.erb

@@ -0,0 +1,26 @@
+<div class="page_entries">
+  <%= page_entries_info @features, :entry_name => 'features' %>
+</div>
+
+<div id="content">
+  <table border="0" class="logs">
+    <thead>
+      <tr>
+        <th width="25%">Feature</th>
+        <th align='right' width="5%">Totals</th>
+      <tr>
+    </thead>
+    <tbody>
+      <% count=0;@features.each do |row| %>
+        <% color = count % 2 == 0 ? 'transparent' : 'transparent url(/images/fade.png) repeat-x' %>
+        <tr style="background:<%=color%>">
+          <td><b><%=display_context( row[:name] )%></b></td>
+          <td align="right"><b><%=row[:total]%></b></td>
+        </tr>
+      <% count+=1;end %>
+    </tbody>
+  </table>
+</div>
+<div class="pages">
+  <%= will_paginate @features, :previous_label => "&nbsp;&nbsp;", :next_label => "&nbsp;&nbsp;", :params => { :url => "/features" } %>
+</div>

data/views/features/filter.js.erb

@@ -0,0 +1,2 @@
+$('#features').html( '<%= escape_javascript( partial( :'features/rows' ) ) %>')
+$('p#timestamp').html( "<%=escape_javascript(partial(:'shared/timestamp'))%>" );

data/views/features/index.erb

@@ -0,0 +1,24 @@
+<%= partial :'shared/filter' %>
+
+<div id="features">
+  <%= partial :'features/rows' %>
+</div>
+
+<script>
+  $( function() {
+    $('a.features').addClass( 'current' );
+
+    $('a.nav_link').click( function() {
+      $("a.nav_link").removeClass( "current" );   
+      $(this).addClass( 'current' );    
+      return true;
+    });
+    
+    $('.pagination a').live( 'click', function() {
+      $("#content").html( '<%=partial :"shared/wait"%>' ); 
+      $.getScript( this.href );
+      return false;
+    });  
+  });
+</script>
+

data/views/features/index.js.erb

@@ -0,0 +1,2 @@
+$('#features').html( '<%= escape_javascript( partial( :'features/rows' ) ) %>')
+$('p#timestamp').html( "<%=escape_javascript(partial(:'shared/timestamp'))%>" );

data/views/layout.erb

@@ -0,0 +1,47 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
+  <head>
+    <title>W A C K a M O L E</title>
+    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
+    <link rel="icon" href="/images/small_logo.png" type="image/x-icon"/>
+    <link rel="shortcut icon" href="/images/small_logo.png" type="image/x-icon"/>
+    <%= stylesheets %w[wackamole] %>
+    <%= javascripts %w[jquery_min jquery_ui_min jquery.tools.min jquery.example application raphael.min g.raphael.min g.dot.min] %>
+  </head>
+
+  <body id="body">
+    <div id="overall">      
+      <div id="logo" style="margin-bottom:50px">
+        <%= link_to image_tag( 'wackamole_logo.png', :border => 0 ), '/mission' %>
+      </div>      
+      <div id="app_info">
+        <% if @app_info %>        
+          <ul>
+            <li>&lt;<%=@app_info[:app_name]%>&gt;</li>
+            <li id="env"><%=@app_info[:stage]%></li>
+          <ul>
+        <% end %>        
+        <p id="timestamp"><%=partial :'shared/timestamp'%></p>
+      </div>
+      <div id="main">
+        <div class="flash"></div>
+        <% if @app_info %>        
+          <div id='navigation'>
+            <%=link_to "mission control", "/mission"                                               , :class => "site_link land" %>&nbsp;&bull;&nbsp;
+            <%=link_to "dashboard"      , "/dashboard/#{@app_info[:app_name]}/#{@app_info[:stage]}", :class => "site_link dash" %>&nbsp;&bull;&nbsp;            
+            <%=link_to "logs"           , "/logs/1"                                                , :class => "site_link logs" %>&nbsp;&bull;&nbsp;
+            <%=link_to "features"       , "/features/1"                                            , :class => "site_link features" %>&nbsp;&bull;&nbsp;
+            <%=link_to "users"          , "/users/1"                                               , :class => "site_link users" %>
+          </div>
+        <% end %>
+                
+        <%= yield %>
+      </div>
+      
+      <div id="footer" style="text-align:right">
+        <%= link_to image_tag( 'powered_by.png', :border => 0 ), "http://www.rackamole.com", :target => "#" %>
+      </div>
+
+    </div>
+  </body>
+</html>

data/views/logs/_array.erb

@@ -0,0 +1,12 @@
+<table class="moled">
+  <thead>
+    <th width="100%">Trace</th>
+  </thead>
+  <tbody>  
+    <% array.each do |stack| %>
+      <tr>
+        <td><%=stack%></td>
+      </tr>
+    <% end %>
+  </tbody>
+</table>

data/views/logs/_hash.erb

@@ -0,0 +1,14 @@
+<table class="moled">
+  <thead>
+    <th width="10%">Parameter</th>
+    <th width="80%">Value</th>
+  </thead>
+  <tbody>  
+    <% hash.each_pair do |k,v| %>
+      <tr>
+        <td class="label"><%=k%></td>
+        <td><%=v%></td>
+      </tr>
+    <% end %>
+  </tbody>
+</table>

data/views/logs/_rows.erb

@@ -0,0 +1,65 @@
+<div class="page_entries">
+  <%= page_entries_info @logs, :entry_name => 'log' %>
+</div>
+  
+<div id="content">
+  <table class="logs">
+    <thead>
+      <th width="20%">Context</th>
+      <th width="5%">Method</th>
+      <th width="20%">User</th>    
+      <th width="10%">IP</th>
+      <th width="10%">Server</th>
+      <th width="10%">Date</th>
+      <th align="right" width="5%">Timing</th>
+      <th align="right" width="3%">&nbsp;</th>
+    </thead>
+    <tbody>
+      <% count=0;@logs.each do |log| %>
+        <tr class="<%=row_class_for log['typ'] %>" href="<%="/logs/#{log['_id']}/show"%>" rel='#details'>
+          <td><%=context_for log['fid'] %></td>
+          <td><%=log['met']%></td>
+          <td><%=truncate( user_name_for( log['uid'] ), 30 )%></td>
+          <td><%=log['ip']%></td>
+          <td><%=format_host( log['hos'] )%></td>
+          <td><%=timestamp_for log %></td>
+          <td align="right"><%=request_time( log['rti'] )%></td>
+          <td align="right"><%=browser_icon( log['bro'] )%></td>
+        </tr>
+      <% count+=1;end %>
+    </body>
+  </table>
+</div>
+
+<div class="pages">
+  <%= will_paginate @logs, :previous_label => "&nbsp;&nbsp;", :next_label => "&nbsp;&nbsp;", :params => { :url => "/logs" } %>
+</div>
+
+<div class="overlay" id="details">
+  <div class="ov_content"></div>
+</div>
+
+<script>
+ $( function() {
+   $( "tr[rel]").hover( 
+     function() {
+       $(this).addClass( 'highlight' );
+     },
+     function() {
+       $(this).removeClass( 'highlight' );
+     }
+    );
+   $( "tr[rel]" ).overlay( {
+     expose: 'gray',
+     onBeforeLoad: function() {  
+       var wrap = this.getContent().find( '.ov_content' );
+       wrap.load( this.getTrigger().attr( 'href' ) );
+     }
+   });
+  $('.pagination a').live( 'click', function() {
+    $("#content").html( '<%=partial :"shared/wait"%>' ); 
+    $.getScript( this.href );
+    return false;
+  });     
+ });
+</script>

data/views/logs/filter.js.erb

@@ -0,0 +1,4 @@
+<%= erb :'shared/flash.js', :layout => false %>
+
+$('#logs').html( '<%= escape_javascript( partial( :'logs/rows' ) ) %>')
+$('p#timestamp').html( "<%=escape_javascript(partial(:'shared/timestamp'))%>" );

data/views/logs/index.erb

@@ -0,0 +1,13 @@
+<div id="filter">
+  <%= partial :'shared/filter' %>
+</div>
+
+<div id="logs">
+  <%= partial :'logs/rows' %>
+</div>
+
+<script>
+  $( function() {
+     $('a.logs').addClass( 'current' );
+  });     
+</script>