quirkey-gembox 0.1.0

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 2009-02-27
+
+* 1 major enhancement:
+  * Initial release

data/Manifest.txt

@@ -0,0 +1,41 @@
+History.txt
+Manifest.txt
+PostInstall.txt
+README.rdoc
+Rakefile
+bin/gembox
+config.ru
+gembox.rb
+lib/extensions.rb
+lib/gembox.rb
+lib/gembox/cli.rb
+lib/gembox_.rb
+public/images/edit.png
+public/images/folder.png
+public/images/git.gif
+public/images/page.png
+public/images/page_white_text.png
+public/images/rubygems-125x125t.png
+public/javascripts/base.js
+public/javascripts/jquery.form.js
+public/javascripts/jquery.js
+public/javascripts/jquery.metadata.js
+public/javascripts/jquery.ui.js
+public/swf/clippy.swf
+script/console
+script/destroy
+script/generate
+test/test_gembox.rb
+test/test_gembox_app.rb
+test/test_gembox_cli.rb
+test/test_gembox_gems.rb
+test/test_helper.rb
+views/file_tree.haml
+views/gem.haml
+views/gembox.sass
+views/gems_columns.haml
+views/gems_header.haml
+views/gems_table.haml
+views/index.haml
+views/layout.haml
+views/no_results.haml

data/PostInstall.txt

@@ -0,0 +1,7 @@
+
+For more information on gembox, see http://gembox.rubyforge.org
+
+NOTE: Change this information in PostInstall.txt 
+You can also delete it if you don't want it.
+
+

data/README.rdoc

@@ -0,0 +1,48 @@
+= gembox
+
+* FIX (url)
+
+== DESCRIPTION:
+
+FIX (describe your package)
+
+== FEATURES/PROBLEMS:
+
+* FIX (list of features or problems)
+
+== SYNOPSIS:
+
+  FIX (code sample of usage)
+
+== REQUIREMENTS:
+
+* FIX (list of requirements)
+
+== INSTALL:
+
+* FIX (sudo gem install, anything else)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2009 FIXME full name
+
+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/VERSION.yml

@@ -0,0 +1,4 @@
+--- 
+:minor: 1
+:patch: 0
+:major: 0

data/bin/gembox

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+#
+#  Created on 2009-2-27.
+#  Copyright (c) 2009. All rights reserved.
+
+require File.expand_path(File.dirname(__FILE__) + "/../lib/gembox")
+
+Gembox::App.set  :environment, :production
+Gembox::App.set :port, 5678
+Gembox::App.run!

data/lib/extensions.rb

@@ -0,0 +1,21 @@
+module Gem
+  class Specification
+
+    def files_tree
+      tree = {}
+      files.each do |file|
+        split_dirs = file.split(/\//)
+        keyed_hash = {}
+        split_dirs.reverse.each do |key|
+          keyed_hash = {key => keyed_hash}
+        end
+        tree.deep_merge!(keyed_hash)
+      end
+      tree
+    end
+    
+    def on_github?
+      homepage =~ /github\.com\/([\w\d\-\_]+)\/([\w\d\-\_]+)\/tree/
+    end
+  end
+end

data/lib/gembox/app.rb

@@ -0,0 +1,65 @@
+require 'sinatra'
+
+module Gembox
+  class App < ::Sinatra::Default
+    include Gembox::ViewHelpers  
+    include WillPaginate::ViewHelpers
+    
+
+    set :public, 'public'
+    set :views,  'views'
+
+    before do
+      Gembox::Gems.load
+      @gems = Gembox::Gems.local_gems.paginate :page => params[:page], :per_page => 30
+      @stats = Gembox::Gems.stats
+    end
+
+    get '/stylesheets/:stylesheet.css' do
+      sass params[:stylesheet].to_sym
+    end
+
+    get '/' do
+      redirect '/gems'
+    end
+
+    get %r{/gems/([\w\-\_]+)/?([\d\.]+)?/?} do
+      show_layout = params[:layout] != 'false'
+      name, version = params[:captures]
+      @gems = Gembox::Gems.search(name)
+      raise Sinatra::NotFound if @gems.empty?
+      @gem_versions = @gems[0][1]
+      if version
+        @gems = Gembox::Gems.search(name, version)
+        @gem  = @gems.shift[1].first if @gems
+      end
+      if !@gem
+        @gem = @gem_versions.shift
+        redirect "/gems/#{@gem.name}/#{@gem.version}"
+      end
+      if params[:file]
+        action = params[:action] || view
+        file_path = File.join(@gem.full_gem_path, params[:file])
+        if File.readable?(file_path)
+          if action == 'edit'
+            `$EDITOR #{file_path}`
+          else
+            response.headers['Content-type'] = 'text/plain'
+            return File.read(file_path)
+          end
+        end
+      end
+      haml :gem, :layout => show_layout
+    end
+
+    get '/gems/?' do
+      show_layout = params[:layout] != 'false'
+      @show_as = params[:as] || 'columns'
+      if @search = params[:search]
+        @gems = Gembox::Gems.search(@search).paginate :page => params[:page] 
+      end
+      haml "gems_#{@show_as}".to_sym, :layout => show_layout
+    end
+    
+  end
+end

data/lib/gembox/gem_list.rb

@@ -0,0 +1,41 @@
+module Gembox
+
+  class GemList < Array
+    
+    def [](*args)
+      if args.first.is_a?(String)
+        search(args.first)
+      else
+        super
+      end
+    end
+    
+    def []=(key, value)
+      if key.is_a?(String)
+        if versions = search(key)
+          versions.replace([key, value])
+        else
+          self << [key, value]
+        end
+      else
+        super
+      end
+    end
+    
+    def search(key)
+      i = find {|v| 
+        if v.is_a?(Array)
+          v[0] == key
+        else
+          v == key
+        end
+      }
+      i.is_a?(Array) ? i[1] : i
+    end
+    
+    def has_key?(key)
+      !search(key).nil?
+    end
+  end
+  
+end

data/lib/gembox/gems.rb

@@ -0,0 +1,42 @@
+module Gembox  
+  class Gems
+    class << self
+      attr_accessor :source_index
+      
+      def load
+        @source_index ||= ::Gem.source_index
+        local_gems
+      end
+      
+      def local_gems
+        @local_gems ||= group_gems(source_index.gems)
+      end
+      
+      def search(search_term, version = nil)
+        version = version ? Gem::Requirement.create(version) : Gem::Requirement.default
+        gems = source_index.search Gem::Dependency.new(/#{Regexp.escape(search_term)}/, version)
+        group_gems(gems)
+      end
+      
+      def stats
+        num_versions = source_index.length
+        num_gems     = local_gems.length
+        oldest_gem   = source_index.min {|a,b| a[1].date <=> b[1].date }.last
+        {:num_versions => num_versions, :num_gems => num_gems, :oldest_gem => oldest_gem}
+      end
+      
+      protected
+      def group_gems(gem_collection)
+        gem_hash = GemList.new
+        gem_collection = gem_collection.values if gem_collection.is_a?(Hash)
+        gem_collection.each do |spec|
+          gem_hash[spec.name] ||= []
+          gem_hash[spec.name] << spec
+          gem_hash[spec.name].sort! {|a,b| (b.version || 0) <=> (a.version || 0) }
+        end
+        gem_hash.sort {|a, b| a[0].downcase <=> b[0].downcase } 
+      end
+    end
+    
+  end
+end

data/lib/gembox/view_helpers.rb

@@ -0,0 +1,69 @@
+module Gembox
+  module ViewHelpers
+    
+    def tag_options(options, escape = true)
+      option_string = options.collect {|k,v| %{#{k}="#{v}"}}.join(' ')
+      option_string = " " + option_string unless option_string.blank?
+    end
+
+    def content_tag(name, content, options, escape = true)
+      tag_options = tag_options(options, escape) if options
+      "<#{name}#{tag_options}>#{content}</#{name}>"
+    end
+
+    def link_to(text, link = nil, options = {})         
+      link ||= text
+      link = url_for(link)
+      "<a href=\"#{link}\">#{text}</a>"
+    end
+
+    def link_to_gem(gem, options = {})
+      text    = options[:text] || gem.name
+      version = gem.version if options[:show_version]
+      link_to(text, "/gems/#{gem.name}/#{gem.version}")
+    end
+
+    def url_for(link_options)
+      case link_options
+      when Hash
+        path = link_options.delete(:path) || request.path_info
+        params.delete('captures')
+        path + '?' + build_query(params.merge(link_options))
+      else
+        link_options
+      end
+    end
+
+    def ts(time)
+      time.strftime('%b %d, %Y') if time
+    end
+
+    def clippy(text, bgcolor='#FFFFFF')
+      html = <<-EOF
+        <object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
+                width="110"
+                height="14"
+                id="clippy" >
+        <param name="movie" value="/swf/clippy.swf"/>
+        <param name="allowScriptAccess" value="always" />
+        <param name="quality" value="high" />
+        <param name="scale" value="noscale" />
+        <param NAME="FlashVars" value="text=#{text}">
+        <param name="bgcolor" value="#{bgcolor}">
+        <embed src="/swf/clippy.swf"
+               width="110"
+               height="14"
+               name="clippy"
+               quality="high"
+               allowScriptAccess="always"
+               type="application/x-shockwave-flash"
+               pluginspage="http://www.macromedia.com/go/getflashplayer"
+               FlashVars="text=#{text}"
+               bgcolor="#{bgcolor}"
+        />
+        </object>
+      EOF
+    end
+    
+  end
+end

data/lib/gembox.rb

@@ -0,0 +1,13 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'rubygems'
+require 'active_support'
+require 'will_paginate/array'
+require 'will_paginate/view_helpers'
+
+require 'extensions'
+require 'gembox/gem_list'
+require 'gembox/gems'
+require 'gembox/view_helpers'
+require 'gembox/app'

data/test/test_gembox_app.rb

@@ -0,0 +1,133 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+describe "Gembox App" do
+  
+  describe 'getting index' do
+    before do
+      get '/'
+    end
+    
+    should "redirect to /gems" do
+      should.be.redirect
+    end
+    
+  end
+
+  describe 'getting gems' do
+    before do
+      get '/gems'
+    end
+
+    should 'load the index' do  
+      should.be.ok
+    end
+
+    should "display gem list" do
+      body.should have_element('div#gems')
+    end
+
+    should "display list of installed gems" do
+      body.should have_element('.gem')
+    end
+
+    should "display as 4 columns" do
+      body.should have_element('.column')
+    end
+  end
+
+  describe 'getting gems/ with layout = false' do
+    before do
+      get '/gems/?layout=false'
+    end
+
+    should "load" do
+      should.be.ok
+    end
+
+    should "not display layout" do
+      body.should.not have_element('html')
+    end
+
+    should "display gem list" do
+      html_body.should have_element('#gems')
+    end
+
+    should "display as 4 columns" do
+      html_body.should have_element('.column')
+    end
+  end
+
+  describe 'getting gems/ with a simple search' do
+    before do
+      get '/gems/?search=s'
+    end
+
+    should "load" do
+      should.be.ok
+    end
+
+    should "display gem list" do
+      body.should have_element('#gems')
+    end
+
+    should "display gems that match the search" do
+      body.should have_element('.gem', /sinatra/)
+    end
+
+    should "not display gems that do not match the search" do
+      body.should.not have_element('.gem', /rack/)
+    end
+  end
+
+  describe 'getting gems/ with as = table' do
+    before do
+      get '/gems/?layout=false&as=table'
+    end
+
+    should "load" do
+      should.be.ok
+    end
+
+    should "not display layout" do
+      body.should.not have_element('html')
+    end
+
+    should "display as table" do
+      html_body.should have_element('table#gems')
+      html_body.should have_element('table#gems tr.gem')
+    end
+  end
+
+  describe 'getting gems/:name' do
+    before do
+      get '/gems/sinatra'
+    end
+    
+    should "redirect to most recent version" do
+      status.should.be.equal 302
+    end
+  end
+
+  describe 'getting gems/name/version' do
+    before do
+      get '/gems/sinatra/0.9.0.4'
+    end
+
+    should "display dependencies" do
+      body.should have_element('#dependencies .gem', /rack/)
+    end
+
+    should "display link to gems website" do
+      body.should have_element('a', 'http://sinatra.rubyforge.org')
+    end
+
+    should "load gem spec specified version" do
+      body.should have_element('.version', '0.9.0.4')
+    end
+
+    should "display links to all versions" do
+      body.should have_element('#versions a')
+    end
+  end
+
+end

data/test/test_gembox_gems.rb

@@ -0,0 +1,61 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+describe 'Gembox::Gems' do
+
+  describe '#load' do
+    before do
+      Gembox::Gems.load
+    end
+
+    should "load local gems" do
+      Gembox::Gems.local_gems.should.be.an instance_of(Array)
+    end
+
+    should "load source index into source_index" do
+      Gembox::Gems.source_index.should.be.an instance_of(Gem::SourceIndex)
+    end
+  end
+
+  describe "#local_gems" do
+    before do
+      Gembox::Gems.load
+      @gems = Gembox::Gems.local_gems
+    end
+
+    should "return array of array of gems" do
+      @gems.should.be.an instance_of(Gembox::GemList)
+    end
+
+    should "only have one entry per gem" do
+      @gems.should.has_key? 'sinatra'
+      @gems.should.not.has_key? 'sinatra-0.9.0.5'
+    end
+
+    should "have an array of spec versions per gem name" do
+      @gems['sinatra'].should.be.an instance_of(Array)
+      @gems['sinatra'].first.should.be.an instance_of(Gem::Specification)
+    end
+  end
+  
+  describe '#search' do
+    before do
+      Gembox::Gems.load
+      @gems = Gembox::Gems.search 'sin'
+    end
+    
+    should "return a list of gem specs" do
+      @gems.should.be.an instance_of(Gembox::GemList)
+    end
+    
+    should "only have one entry per gem" do
+      @gems.should.has_key? 'sinatra'
+      @gems.should.not.has_key? 'sinatra-0.9.0.5'
+    end
+    
+    should "return gems that match the specname" do
+      @gems.should.not.has_key? 'rack'
+    end
+    
+  end
+
+end

data/test/test_helper.rb

@@ -0,0 +1,56 @@
+require 'rubygems'
+require 'sinatra'
+require 'sinatra/test/bacon'
+require 'mocha'
+
+require File.join(File.dirname(__FILE__), '..', 'gembox.rb')
+
+require 'nokogiri'
+
+
+module TestHelper
+  
+  def instance_of(klass)
+    lambda {|obj| obj.is_a?(klass) }
+  end
+  
+  # HTML matcher for bacon
+  # 
+  #    it 'should display document' do
+  #      body.should have_element('#document')
+  #    end
+  #
+  # With content matching:
+  # 
+  #    it 'should display loaded document' do
+  #      body.should have_element('#document .title', /My Document/)
+  #    end
+  def have_element(search, content = nil)
+    lambda do |obj|
+      doc = Nokogiri.parse(obj.to_s)
+      node_set = doc.search(search)
+      if node_set.empty?
+        false
+      else
+        collected_content = node_set.collect {|t| t.content }.join(' ')
+        case content
+        when Regexp
+          collected_content =~ content
+        when String
+          collected_content.include?(content)
+        when nil
+          true
+        end
+      end
+    end
+  end
+  
+  def html_body
+    body =~ /^\<html/ ? body : "<html><body>#{body}</body></html>"
+  end
+
+
+end
+
+Bacon::Context.send(:include, TestHelper)
+

metadata

@@ -0,0 +1,98 @@
+--- !ruby/object:Gem::Specification 
+name: quirkey-gembox
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Aaron Quint
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-02-27 00:00:00 -08:00
+default_executable: gembox
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rubygems
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.3.1
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: activesupport
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.2.2
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: mislav-will_paginate
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.3.7
+    version: 
+description: A sinatra based interface for browsing and admiring your gems
+email: aaron@quirkey.com
+executables: 
+- gembox
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- History.txt
+- Manifest.txt
+- PostInstall.txt
+- README.rdoc
+- VERSION.yml
+- bin/gembox
+- lib/extensions.rb
+- lib/gembox
+- lib/gembox/app.rb
+- lib/gembox/gem_list.rb
+- lib/gembox/gems.rb
+- lib/gembox/view_helpers.rb
+- lib/gembox.rb
+- test/test_gembox_app.rb
+- test/test_gembox_gems.rb
+- test/test_helper.rb
+has_rdoc: true
+homepage: http://github.com/quirkey/gembox
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: A sinatra based interface for browsing and admiring your gems.
+test_files: []
+