redis-shelf 0.1.pre

data/Gemfile

@@ -0,0 +1,6 @@
+source "http://rubygems.org"
+
+gem "rack"
+gem "redis"
+gem "thin"
+gem "haml"

data/Manifest

@@ -0,0 +1,13 @@
+Gemfile
+LICENSE
+Manifest
+README.mdown
+Rakefile
+config.ru
+config/redis.sample.yml
+lib/rack/redis-shelf.rb
+lib/redis-shelf/server.rb
+public/css/style.css
+public/style.css
+redis-shelf.gemspec
+views/show.haml

data/README.mdown

@@ -0,0 +1,22 @@
+# Redis Shelf
+
+A simple rack app to browse redis
+
+## Instructions
+
+First install gems
+
+  # required:
+  bundle install
+
+Start the server
+
+    rackup -s thin
+
+Keys are browsed using "localhost:3000/this/is/a/key", which resolves to the redis key "this:is:a:key"
+
+
+## TODO:
+
+* nicer interface (html)
+* fix issue where webrick uses full request_uri

data/Rakefile

@@ -0,0 +1,12 @@
+require 'rake'
+require 'echoe'
+
+path = File.expand_path("../lib", __FILE__)
+$:.unshift(path) unless $:.include?(path)
+
+Echoe.new('redis-shelf', '0.1.pre') do |p|
+	p.description = 'Redis key browser'
+	p.url         = 'http://github.com/jhsu/redis-shelf'
+	p.author      = 'Joseph Hsu'
+	p.email       = 'jhsu@josephhsu.com'
+end

data/config/redis.sample.yml

@@ -0,0 +1,3 @@
+host: localhost
+port: 6379
+db:   0

data/config.ru

@@ -0,0 +1,9 @@
+#\ -s thin -p 9292
+
+$LOAD_PATH.unshift ::File.expand_path(::File.dirname(__FILE__) + '/lib')
+require 'redis-shelf/server'
+
+use Rack::Static, :urls => ["/favicon"]
+use Rack::Static, :urls => ["/css"], :root => "public"
+app = Rack::RedisShelfServer.new(:host => "localhost", :port => 6379, :db => 7)
+run app

data/lib/rack/redis-shelf.rb

@@ -0,0 +1,47 @@
+require 'redis'
+
+module Rack
+	class RedisShelf
+		F = ::File
+
+		attr_accessor :config
+
+		def initialize(conf={})
+		  self.config = {:host => "localhost", :port => 6379, :db => 0}.merge(conf)
+		end
+
+		def connection
+			::Redis.new(self.config)
+		end
+
+		def parse(key)
+			if key.empty?
+				""
+			else
+				key.gsub(/^\/|\/$/,'').gsub(/[\s]+/,'').gsub('/',':')
+			end
+		end
+
+		def fetch(key)
+			key = parse(key)
+			if !key.empty?
+				case self.connection.type(key)
+				when "string" || "none"
+					connection.get(key) || ""
+				when "list"
+					connection.lrange(key, 0, -1)
+				else
+					""
+				end
+			else
+				""
+			end
+		end
+
+		def http_response(key)
+			value = fetch(key)
+			code = value ? 200 : 404
+			[value, code]
+		end
+	end
+end

data/lib/redis-shelf/server.rb

@@ -0,0 +1,42 @@
+require 'haml'
+require 'rack'
+
+require File.expand_path(File.join(File.dirname(__FILE__), '..', '/rack/redis-shelf'))
+
+module Rack
+	class RedisShelfServer
+		F = ::File
+		def initialize(conf={})
+			@shelf = RedisShelf.new(conf)
+		end
+
+		def call(env)
+			header = {"Content-Type" => "text/html"}
+			key = env["REQUEST_URI"]
+
+			key = @shelf.parse(key)
+			history(key)
+			values, code = @shelf.http_response(key)
+			content = render("show", :values => values, :key => key, :history => history, :redis => @shelf.connection)
+
+			[code, header, [content]]
+		end
+
+		def view_dir
+			F.expand_path(F.join(F.dirname(__FILE__), "..", "..", "/views" ))
+		end
+
+		def render(view, opts={})
+			::Haml::Engine.new(F.read("#{view_dir}/#{view}.haml")).render(Object.new, opts)
+		end
+
+		def history(key=nil)
+			if key
+				@shelf.connection.lpush("history", key) unless key.empty?
+			else
+				@shelf.connection.lrange("history",0,10)
+			end
+		end
+	end
+end
+

data/public/css/style.css

@@ -0,0 +1,11 @@
+#history {
+  overflow: auto;
+}
+
+#history li {
+  float: left;
+}
+
+#history li a {
+  display: block;
+}

data/public/style.css

@@ -0,0 +1,14 @@
+#history {
+  overflow: auto;
+  margin: 0;
+  padding: 0;
+}
+
+#history li {
+  float: left;
+}
+
+#history li a {
+  display: block;
+  padding: 4px 8px;
+}

data/redis-shelf.gemspec

@@ -0,0 +1,30 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{redis-shelf}
+  s.version = "0.1.pre"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Joseph Hsu"]
+  s.date = %q{2010-07-28}
+  s.description = %q{Redis key browser}
+  s.email = %q{jhsu@josephhsu.com}
+  s.extra_rdoc_files = ["LICENSE", "README.mdown", "lib/rack/redis-shelf.rb", "lib/redis-shelf/server.rb"]
+  s.files = ["Gemfile", "LICENSE", "Manifest", "README.mdown", "Rakefile", "config.ru", "config/redis.sample.yml", "lib/rack/redis-shelf.rb", "lib/redis-shelf/server.rb", "public/css/style.css", "public/style.css", "redis-shelf.gemspec", "views/show.haml"]
+  s.homepage = %q{http://github.com/jhsu/redis-shelf}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Redis-shelf", "--main", "README.mdown"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{redis-shelf}
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{Redis key browser}
+
+  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
+    else
+    end
+  else
+  end
+end

data/views/show.haml

@@ -0,0 +1,23 @@
+%html
+  %head
+    %link{:href => "/css/style.css", :rel => "stylesheet", :media => "screen"}
+
+  %body
+    %h2= key
+
+    %ul#history
+      - history.each do |key|
+        %li
+          %a{:href => "./#{key}"}= key
+
+
+    #values
+      - if values.is_a?(String)
+        = values
+      - else
+        %ul
+          - values.each do |value| 
+            %li.value= value
+
+    #config
+      = "#{redis.client.host}:#{redis.client.port} db: #{redis.client.db}"

metadata

@@ -0,0 +1,88 @@
+--- !ruby/object:Gem::Specification 
+name: redis-shelf
+version: !ruby/object:Gem::Version 
+  hash: -673414397
+  prerelease: true
+  segments: 
+  - 0
+  - 1
+  - pre
+  version: 0.1.pre
+platform: ruby
+authors: 
+- Joseph Hsu
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-07-28 00:00:00 -04:00
+default_executable: 
+dependencies: []
+
+description: Redis key browser
+email: jhsu@josephhsu.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.mdown
+- lib/rack/redis-shelf.rb
+- lib/redis-shelf/server.rb
+files: 
+- Gemfile
+- LICENSE
+- Manifest
+- README.mdown
+- Rakefile
+- config.ru
+- config/redis.sample.yml
+- lib/rack/redis-shelf.rb
+- lib/redis-shelf/server.rb
+- public/css/style.css
+- public/style.css
+- redis-shelf.gemspec
+- views/show.haml
+has_rdoc: true
+homepage: http://github.com/jhsu/redis-shelf
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Redis-shelf
+- --main
+- README.mdown
+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: redis-shelf
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Redis key browser
+test_files: []
+