mongo3 0.0.1

data/lib/views/explore.erb

@@ -0,0 +1,250 @@
+<div id="crumbs"><%= partial 'crumbs' %></div>
+
+<div id="landscape"></div>
+
+<div id="right">
+  <span id="log"></span>
+  <div id="info"></div>    
+</div>
+
+<div id="details" class="overlay">
+  <div id="wrap"></div>
+</div>
+
+<script>
+
+function center( node_id ) {
+  ht.onClick( node_id, {
+     Move:      { enable: true, offsetX: 30, offsetY: 5 },
+     onComplete: function() { update_info( node_id ); } });
+}
+
+function morphit( id, json ) {
+  ht.op.sum( eval( "(" + json + ")" ), 
+  { 
+    type:       'fade:con', 
+    delay:      10, 
+    hideLabels: false, 
+    transition: Trans.Quart.easeOut,
+    onComplete: function() { update_info(id); } 
+  });
+  Log.write( "plotting..." );
+}
+
+$( function() {
+  init_landscape();  
+});
+    
+var Log = {
+  log: false,
+  write: function(text) {
+    if ( ! this.log )
+      this.log = $('span#log');
+    this.log.show();
+    this.log.html( text );
+    this.log.css('left', ((500 - this.log.offsetWidth / 2) + 'px') );
+    this.log.fadeOut( 5000 );
+ }
+};
+
+function addEvent(obj, type, fn) {
+    if (obj.addEventListener) obj.addEventListener(type, fn, false);
+    else obj.attachEvent('on' + type, fn);
+};
+
+
+function init_landscape() {
+    var tree = document.getElementById('landscape');
+    var w = tree.offsetWidth - 100, h = tree.offsetHeight - 40;
+    
+    var canvas = new Canvas( 'tree', {
+        'injectInto': 'landscape',
+        'width':  w,
+        'height': h
+    });
+
+    var style = document.getElementById('tree').style;
+    style.marginLeft = "50px";
+    style.marginTop  = "10px";
+    //init Hypertree
+    ht = new Hypertree( canvas, {
+      Node: {
+        type:        'circle',
+        overridable: true,
+        dim:         10,
+        color:       "#7c8a61"
+      },        
+      Edge: {
+        overridable: true,
+        lineWidth:   1,
+        color: "     #9a4c4c"
+      },
+        
+      onBeforeCompute: function(node) {
+        Log.write( "plotting..." );
+      },
+        
+      onCreateLabel: function(domElement, node){
+        domElement.innerHTML = truncate( unescape(node.name), 15 );
+        
+        addEvent(domElement, 'click', function () {
+          var children_count = 0;
+          for( var i in node.adjacencies )
+             children_count += 1;
+
+          if ( node.data && children_count == 1 && node.data.dyna )
+          {
+            Log.write( "fetching new data..." );
+            var url = "/explore/more_data/";
+            url     += node.data.path + "/" + node.data.crumbs + "/";
+            $.ajax( {
+              dataType: 'script',
+              type:     'GET',
+              url:      url
+            });
+          }
+          else
+          {
+             if( node.data.path.split( '|' ).length < 4 ) {
+               Log.write( "centering..." );               
+               ht.onClick( node.id, {
+                 Move:      { enable: true, offsetX: 30, offsetY: 5 },
+                 onComplete: function() { 
+                   update_info( node.id ); 
+                   $.ajax( {
+                      dataType: 'script', 
+                      type:     'GET', 
+                      url:      "/explore/update_crumb/" + node.data.path + "/" + node.data.crumbs });
+                  } });
+              }
+              else {
+                Log.write( "no more data" );
+              }
+           }
+        });
+      },
+              
+      onPlaceLabel: function(domElement, node){
+        var item = $(domElement);
+
+        item.css( 'class', "node level_#{node._depth}" );
+        
+        if (node._depth <= 1 ) {
+          item.css('top', (parseInt(item.css('top')) + 10) + 'px' );
+        }
+        else if(node._depth == 2) {
+          item.css('top', (parseInt(item.css('top')) + 10) + 'px' );
+        } 
+        else {
+         }
+        item.css( "left", (parseInt(item.css( 'left' )) - domElement.offsetWidth/2) + 'px');
+      },
+                
+      onBeforePlotNode: function( node ) {
+        level = node.data.path.split("|").length;
+        
+        if( level == 1 ) 
+        {        
+          node.data.$dim   = 10;
+          node.data.$color = "#ff8a00";
+        }
+        else if( level == 2 ) {
+          node.data.$dim   = 15;          
+          node.data.$color = "#d200ff"
+        }        
+        else if( level == 3 ) {
+          node.data.$dim   = 10;          
+          node.data.$color = "#7891ff"
+        }        
+        else {
+          node.data.$dim   = 10;          
+          node.data.$color = "#7da241";
+        }
+      },
+        
+      onAfterCompute: function() {
+        Log.write("loaded");
+      }
+    });
+    
+
+    ht.loadJSON( eval( <%=@root.to_json%> ) );
+    ht.controller.onAfterCompute(); 
+    ht.refresh();
+    update_info( 'home' );
+}
+
+function update_info(node_id)
+{
+  var node = null;  
+  if( node_id )
+    node = Graph.Util.getNode(ht.graph, node_id);                                        
+  else
+    node = Graph.Util.getClosestNodeToOrigin(ht.graph, "pos");
+  
+  // var parents = Graph.Util.getParents( node );      
+  // var parent  = parents[0];
+  var html    = "";
+  var depth   = node.data.path.split( '|' ).length
+  var legends = ['', 'environments', 'databases', 'collections']
+      
+  var children      = [];
+  var children_hash = {};
+  Graph.Util.eachAdjacency( node, function(adj) {
+    child = adj.nodeTo;
+    if( parent ) {
+      if( child.name != parent.name ) {
+        children_hash[child.name] = child;
+        children.push( child.name );
+      }
+    }
+    else {
+      children_hash[child.name] = child;
+      children.push( child.name );
+    }
+  });
+  children = children.sort();
+  
+  html += "<span class=\"what\">" + legends[depth] + "(" + children.length + ")</span>";  
+  html += "<p style='padding:5px 10px;text-align:left;color:#c1c1c1'>";
+  
+  var buff = "<ul style='font-size:0.4em'>";  
+  for( var i in children ) {
+    var node = children_hash[children[i]];
+    buff += "<li>";
+    buff += make_link( node );
+    buff += "</li>";
+  }  
+  html += "</ul>" + buff;
+  html += "</p>";
+  $('div#info').html( html );
+  
+  $('a.info[rel]').overlay( 
+    { top:    '15%',
+      expose: '#1c1c1c',
+      onBeforeLoad: function() {
+        var wrap = this.getContent().find( 'div#wrap' );
+        wrap.load( this.getTrigger().attr( 'href' ) );
+        // $.ajax( { 
+        //   url:      this.getTrigger().attr( 'href' ), 
+        //   dataType: 'script',
+        //   success:  function(data) { $('div#details').html( data ); },
+        //   type:     'GET' } );        
+      }
+    });   
+}
+
+function make_link( node )
+{
+  return "<a rel=\"div#details\" class=\"info\" href=\"/explore/show/" + node.data.path + "/" + node.data.crumbs + "\">" + node.name + "</a>";  
+}
+
+function refresh_data( url, path, name )
+{
+  $.ajax( {
+    dataType: 'script', 
+    type:     'GET', 
+    url:      url + "/" + path + "/" + name
+  });
+}
+</script>

data/lib/views/landscape.erb

@@ -0,0 +1,45 @@
+<%= partial :crumbs %>
+
+<div id="actions"> 
+    <a class="prevPage">&laquo; back</a> 
+    <a class="nextPage">more &raquo;</a> 
+</div> 
+
+<div class="scrollable vertical">
+  <div class="items">
+    <% @landscape.keys.sort{ |a,b| a <=> b }.each do |name|%>
+      <% config = @landscape[name] %>
+      <div id="<%=name%>" class="item host">
+        <img class="tag" src="/images/monkey.png"/>        
+        <p class="heading">
+          <%= name %>
+        </p>
+        <% if config.has_key?(:user) %>
+          <img class="lock" src="/images/lock.png"/>
+        <% end %>        
+        <ul class="host_info">
+          <li><%=config[:host]%></li>
+          <li><%=config[:port]%></li>
+        </ul>                  
+      </div>
+    <% end %>
+  </div>
+</div>
+
+<script>
+  $("div.scrollable").scrollable({ 
+      vertical:true,  
+      size:    5
+  }).mousewheel();
+
+  $( function() {
+    $("div.item").click( function() {
+      window.location.href = "/db/" + this.id;
+    });
+        
+    $("div.item").hover( 
+      function() { $(this).addClass( "selected" ) }, 
+      function() { $(this).removeClass( "selected" ) }
+    );
+  })
+</script>

data/lib/views/layout.erb

@@ -0,0 +1,28 @@
+<!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>M O N G O 3</title>
+    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />    
+    <link rel="icon" href="/favicon.ico" type="image/x-icon"/>
+    <link rel="shortcut icon" href="/favicon.ico" type="image/x-icon"/>    
+    <link rel="stylesheet" href="/stylesheets/mongo3.css" type="text/css" media="screen" />
+    <script src="/javascripts/jquery_min.js" type="text/javascript"></script>
+    <script src="/javascripts/jquery_ui_min.js" type="text/javascript"></script>
+    <script src="/javascripts/jquery.tools.min.js" type="text/javascript"></script>
+    <script src="/javascripts/application.js" type="text/javascript"></script>    
+    <script src="/javascripts/jit.min.js" type="text/javascript"></script>
+  </head>
+
+  <body id="body">
+    <div id="overall">
+      <div id="logo">
+        <a href="/">
+          <img src='/images/mongo3.png' style="border:none"/>
+        </a>
+      </div>      
+      <div id="main">
+        <%= yield %>
+      </div>
+    </div>      
+  </body>
+</html>

data/lib/views/more_data_js.erb

@@ -0,0 +1,3 @@
+$('div#crumbs').html( "<%=escape_javascript(partial(:crumbs))%>" );
+
+morphit( '<%=@node_id%>', '<%=escape_javascript( @sub_tree.to_json )%>' );

data/lib/views/show_cltn.erb

@@ -0,0 +1 @@
+$('div.content').html( "<%= escape_javascript( partial :cltn_info )%>")

data/lib/views/update_crumb_js.erb

@@ -0,0 +1 @@
+$('div#crumbs').html( "<%=escape_javascript(partial(:crumbs))%>" );

data/spec/mongo3/node_spec.rb

@@ -0,0 +1,84 @@
+require File.join(File.dirname(__FILE__), %w[.. spec_helper])
+require 'ostruct'
+
+describe Mongo3::Node do
+  
+  before( :all ) do
+    @root = Mongo3::Node.new( 0, "root", :blee => 'duh', :fred => 10 )
+    id = 100
+    
+    @envs = []
+    2.times do |i|
+      node = Mongo3::Node.new( id, "env_#{i}" )
+      @envs << node
+      @root << node
+      id += 1
+    end
+    
+    @dbs   = []
+    @cltns = []
+    4.times do |i|
+      db = Mongo3::Node.new( id, "db_#{i}" )
+      @dbs << db
+      4.times do |j|
+        cltn = Mongo3::Node.new( id, "cltn_#{j}" )
+        @cltns << cltn
+        db << cltn
+        id += 1
+      end
+      if i % 2 == 0
+        @root.children.first << db
+      else
+        @root.children.last << db
+      end
+      id += 1
+    end
+  end
+  
+  it "should create a node correctly" do
+    @root.oid.should         == 0
+    @root.name.should        == "root"
+    @root.children.should    have(2).items    
+    @root.data.should_not    be_nil
+    @root.data[:blee].should == 'duh'
+    @root.data[:fred].should == 10
+  end
+  
+  it "should add children correctly" do
+    @root.children.should            have(2).items
+    @root.children.first.name.should == "env_0"
+    @root.children.last.name.should  == "env_1"
+  end
+  
+  it "should set the parent correctly" do
+    @root.parent.should be_nil
+    @envs.each do |env|
+      env.parent.should == @root
+    end
+    
+    @dbs.each do |db|
+      db.parent.name.should match(/^env_/)
+    end
+    
+    @cltns.each do |cltn|
+      cltn.parent.name.should match(/^db_/)
+    end
+  end
+  
+  it "should set the path correctly" do
+    @cltns.first.data[:path].should == "root|env_0|db_0|cltn_0"
+    @dbs.last.data[:path].should    == "root|env_1|db_3"
+    @envs.first.data[:path].should  == "root|env_0"
+    @root.data[:path].should        be_nil
+  end
+  
+  it "should dump to json correctly" do
+    @cltns.first.to_json.should == "{\"name\":\"cltn_0\",\"id\":102,\"children\":[],\"data\":{\"path\":\"root|env_0|db_0|cltn_0\"}}"
+    @dbs.first.to_json.should   == "{\"name\":\"db_0\",\"id\":102,\"children\":[{\"name\":\"cltn_0\",\"id\":102,\"children\":[],\"data\":{\"path\":\"root|env_0|db_0|cltn_0\"}},{\"name\":\"cltn_1\",\"id\":103,\"children\":[],\"data\":{\"path\":\"root|env_0|db_0|cltn_1\"}},{\"name\":\"cltn_2\",\"id\":104,\"children\":[],\"data\":{\"path\":\"root|env_0|db_0|cltn_2\"}},{\"name\":\"cltn_3\",\"id\":105,\"children\":[],\"data\":{\"path\":\"root|env_0|db_0|cltn_3\"}}],\"data\":{\"path\":\"root|env_0|db_0\"}}"
+  end
+  
+  it "should dump adjacencies correctly" do
+    @cltns.first.to_adjacencies.should == [{:adjacencies=>[], :name=>"cltn_0", :data=>{:path=>"root|env_0|db_0|cltn_0"}, :id=>102}]
+    @dbs.first.to_adjacencies.should   == [{:name=>"db_0", :adjacencies=>[102, 103, 104, 105], :data=>{:path=>"root|env_0|db_0"}, :id=>102}, {:name=>"cltn_0", :adjacencies=>[], :data=>{:path=>"root|env_0|db_0|cltn_0"}, :id=>102}, {:name=>"cltn_1", :adjacencies=>[], :data=>{:path=>"root|env_0|db_0|cltn_1"}, :id=>103}, {:name=>"cltn_2", :adjacencies=>[], :data=>{:path=>"root|env_0|db_0|cltn_2"}, :id=>104}, {:name=>"cltn_3", :adjacencies=>[], :data=>{:path=>"root|env_0|db_0|cltn_3"}, :id=>105}] 
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,8 @@
+require 'rubygems'
+require 'rack'
+# require 'rack/test'
+
+require File.join(File.dirname(__FILE__), %w[.. lib mongo3])
+
+Spec::Runner.configure do |config|
+end

data/tasks/bones.rake

@@ -0,0 +1,20 @@
+
+if HAVE_BONES
+
+namespace :bones do
+
+  desc 'Show the PROJ open struct'
+  task :debug do |t|
+    atr = if t.application.top_level_tasks.length == 2
+      t.application.top_level_tasks.pop
+    end
+
+    if atr then Bones::Debug.show_attr(PROJ, atr)
+    else Bones::Debug.show PROJ end
+  end
+
+end  # namespace :bones
+
+end  # HAVE_BONES
+
+# EOF

data/tasks/gem.rake

@@ -0,0 +1,201 @@
+
+require 'find'
+require 'rake/packagetask'
+require 'rubygems/user_interaction'
+require 'rubygems/builder'
+
+module Bones
+class GemPackageTask < Rake::PackageTask
+  # Ruby GEM spec containing the metadata for this package.  The
+  # name, version and package_files are automatically determined
+  # from the GEM spec and don't need to be explicitly provided.
+  #
+  attr_accessor :gem_spec
+
+  # Tasks from the Bones gem directory
+  attr_reader :bones_files
+
+  # Create a GEM Package task library.  Automatically define the gem
+  # if a block is given.  If no block is supplied, then +define+
+  # needs to be called to define the task.
+  #
+  def initialize(gem_spec)
+    init(gem_spec)
+    yield self if block_given?
+    define if block_given?
+  end
+
+  # Initialization tasks without the "yield self" or define
+  # operations.
+  #
+  def init(gem)
+    super(gem.name, gem.version)
+    @gem_spec = gem
+    @package_files += gem_spec.files if gem_spec.files
+    @bones_files = []
+
+    local_setup = File.join(Dir.pwd, %w[tasks setup.rb])
+    if !test(?e, local_setup)
+      Dir.glob(::Bones.path(%w[lib bones tasks *])).each {|fn| bones_files << fn}
+    end
+  end
+
+  # Create the Rake tasks and actions specified by this
+  # GemPackageTask.  (+define+ is automatically called if a block is
+  # given to +new+).
+  #
+  def define
+    super
+    task :prereqs
+    task :package => ['gem:prereqs', "#{package_dir_path}/#{gem_file}"]
+    file "#{package_dir_path}/#{gem_file}" => [package_dir_path] + package_files + bones_files do
+      when_writing("Creating GEM") {
+        chdir(package_dir_path) do
+          Gem::Builder.new(gem_spec).build
+          verbose(true) {
+            mv gem_file, "../#{gem_file}"
+          }
+        end
+      }
+    end
+
+    file package_dir_path => bones_files do
+      mkdir_p package_dir rescue nil
+
+      gem_spec.files = (gem_spec.files +
+          bones_files.map {|fn| File.join('tasks', File.basename(fn))}).sort
+
+      bones_files.each do |fn|
+        base_fn = File.join('tasks', File.basename(fn))
+        f = File.join(package_dir_path, base_fn)
+        fdir = File.dirname(f)
+        mkdir_p(fdir) if !File.exist?(fdir)
+        if File.directory?(fn)
+          mkdir_p(f)
+        else
+          raise "file name conflict for '#{base_fn}' (conflicts with '#{fn}')" if test(?e, f)
+          safe_ln(fn, f)
+        end
+      end
+    end
+  end
+  
+  def gem_file
+    if @gem_spec.platform == Gem::Platform::RUBY
+      "#{package_name}.gem"
+    else
+      "#{package_name}-#{@gem_spec.platform}.gem"
+    end
+  end
+end  # class GemPackageTask
+end  # module Bones
+
+namespace :gem do
+
+  PROJ.gem._spec = Gem::Specification.new do |s|
+    s.name = PROJ.name
+    s.version = PROJ.version
+    s.summary = PROJ.summary
+    s.authors = Array(PROJ.authors)
+    s.email = PROJ.email
+    s.homepage = Array(PROJ.url).first
+    s.rubyforge_project = PROJ.rubyforge.name
+
+    s.description = PROJ.description
+
+    PROJ.gem.dependencies.each do |dep|
+      s.add_dependency(*dep)
+    end
+
+    PROJ.gem.development_dependencies.each do |dep|
+      s.add_development_dependency(*dep)
+    end
+
+    s.files = PROJ.gem.files
+    s.executables = PROJ.gem.executables.map {|fn| File.basename(fn)}
+    s.extensions = PROJ.gem.files.grep %r/extconf\.rb$/
+
+    s.bindir = 'bin'
+    dirs = Dir["{#{PROJ.libs.join(',')}}"]
+    s.require_paths = dirs unless dirs.empty?
+
+    incl = Regexp.new(PROJ.rdoc.include.join('|'))
+    excl = PROJ.rdoc.exclude.dup.concat %w[\.rb$ ^(\.\/|\/)?ext]
+    excl = Regexp.new(excl.join('|'))
+    rdoc_files = PROJ.gem.files.find_all do |fn|
+                   case fn
+                   when excl; false
+                   when incl; true
+                   else false end
+                 end
+    s.rdoc_options = PROJ.rdoc.opts + ['--main', PROJ.rdoc.main]
+    s.extra_rdoc_files = rdoc_files
+    s.has_rdoc = true
+
+    if test ?f, PROJ.test.file
+      s.test_file = PROJ.test.file
+    else
+      s.test_files = PROJ.test.files.to_a
+    end
+
+    # Do any extra stuff the user wants
+    PROJ.gem.extras.each do |msg, val|
+      case val
+      when Proc
+        val.call(s.send(msg))
+      else
+        s.send "#{msg}=", val
+      end
+    end
+  end  # Gem::Specification.new
+
+  Bones::GemPackageTask.new(PROJ.gem._spec) do |pkg|
+    pkg.need_tar = PROJ.gem.need_tar
+    pkg.need_zip = PROJ.gem.need_zip
+  end
+
+  desc 'Show information about the gem'
+  task :debug => 'gem:prereqs' do
+    puts PROJ.gem._spec.to_ruby
+  end
+
+  desc 'Write the gemspec '
+  task :spec => 'gem:prereqs' do
+    File.open("#{PROJ.name}.gemspec", 'w') do |f|
+      f.write PROJ.gem._spec.to_ruby
+    end
+  end
+
+  desc 'Install the gem'
+  task :install => [:clobber, 'gem:package'] do
+    sh "#{SUDO} #{GEM} install --local pkg/#{PROJ.gem._spec.full_name}"
+
+    # use this version of the command for rubygems > 1.0.0
+    #sh "#{SUDO} #{GEM} install --no-update-sources pkg/#{PROJ.gem._spec.full_name}"
+  end
+
+  desc 'Uninstall the gem'
+  task :uninstall do
+    installed_list = Gem.source_index.find_name(PROJ.name)
+    if installed_list and installed_list.collect { |s| s.version.to_s}.include?(PROJ.version) then
+      sh "#{SUDO} #{GEM} uninstall --version '#{PROJ.version}' --ignore-dependencies --executables #{PROJ.name}"
+    end
+  end
+
+  desc 'Reinstall the gem'
+  task :reinstall => [:uninstall, :install]
+
+  desc 'Cleanup the gem'
+  task :cleanup do
+    sh "#{SUDO} #{GEM} cleanup #{PROJ.gem._spec.name}"
+  end
+end  # namespace :gem
+
+
+desc 'Alias to gem:package'
+task :gem => 'gem:package'
+
+task :clobber => 'gem:clobber_package'
+remove_desc_for_task 'gem:clobber_package'
+
+# EOF

data/tasks/git.rake

@@ -0,0 +1,40 @@
+
+if HAVE_GIT
+
+namespace :git do
+
+  # A prerequisites task that all other tasks depend upon
+  task :prereqs
+
+  desc 'Show tags from the Git repository'
+  task :show_tags => 'git:prereqs' do |t|
+    puts %x/git tag/
+  end
+
+  desc 'Create a new tag in the Git repository'
+  task :create_tag => 'git: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
+
+    tag = "%s-%s" % [PROJ.name, PROJ.version]
+    msg = "Creating tag for #{PROJ.name} version #{PROJ.version}"
+
+    puts "Creating Git tag '#{tag}'"
+    unless system "git tag -a -m '#{msg}' #{tag}"
+      abort "Tag creation failed"
+    end
+
+    if %x/git remote/ =~ %r/^origin\s*$/
+      unless system "git push origin #{tag}"
+        abort "Could not push tag to remote Git repository"
+      end
+    end
+  end
+
+end  # namespace :git
+
+task 'gem:release' => 'git:create_tag'
+
+end  # if HAVE_GIT
+
+# EOF