redmon 0.0.1

data/lib/redmon/public/vendor/terminal.js

@@ -0,0 +1,135 @@
+// TryMongo
+//
+// Copyright (c) 2009 Kyle Banker
+// Licensed under the MIT Licence.
+// http://www.opensource.org/licenses/mit-license.php
+
+// Readline class to handle line input.
+var ReadLine = function(options) {
+  this.options      = options || {};
+  this.htmlForInput = this.options.htmlForInput;
+  this.inputHandler = this.options.handler;
+  this.terminal     = $(this.options.terminalId || "#terminal");
+  this.lineClass    = this.options.lineClass || '.readLine';
+  this.history      = [];
+  this.historyPtr   = 0;
+
+  this.initialize();
+};
+
+ReadLine.prototype = {
+
+  initialize: function() {
+    this.addInputLine();
+  },
+
+  // Enter a new input line with proper behavior.
+  addInputLine: function(stackLevel) {
+    stackLevel = stackLevel || 0;
+    this.terminal.append(this.htmlForInput(stackLevel));
+    var ctx = this;
+    ctx.activeLine = $(this.lineClass + '.active');
+
+    // Bind key events for entering and navigting history.
+    ctx.activeLine.bind("keydown", function(ev) {
+      switch (ev.keyCode) {
+        case EnterKeyCode:
+          ctx.processInput(this.value);
+          break;
+        case UpArrowKeyCode:
+          ctx.getCommand('previous');
+          break;
+        case DownArrowKeyCode:
+          ctx.getCommand('next');
+          break;
+      }
+    });
+
+    this.activeLine.focus();
+  },
+
+  // Returns the 'next' or 'previous' command in this history.
+  getCommand: function(direction) {
+    if(this.history.length === 0) {
+      return;
+    }
+    this.adjustHistoryPointer(direction);
+    this.activeLine[0].value = this.history[this.historyPtr];
+    $(this.activeLine[0]).focus();
+    //this.activeLine[0].value = this.activeLine[0].value;
+  },
+
+  // Moves the history pointer to the 'next' or 'previous' position.
+  adjustHistoryPointer: function(direction) {
+    if(direction == 'previous') {
+      if(this.historyPtr - 1 >= 0) {
+        this.historyPtr -= 1;
+      }
+    }
+    else {
+      if(this.historyPtr + 1 < this.history.length) {
+        this.historyPtr += 1;
+      }
+    }
+  },
+
+  // Return the handler's response.
+  processInput: function(value) {
+    value = value.trim();
+    if (!value) {
+      // deactivate the line...
+      this.activeLine.value = "";
+      this.activeLine.attr({disabled: true});
+      this.activeLine.removeClass('active');
+
+      // and add add a new command line.
+      this.addInputLine();
+      return
+
+    } else if (value == 'clear') {
+      this.clear();
+      return
+    }
+
+    var me = this;
+    me.inputHandler(value, function(response) {
+      me.insertResponse(response);
+
+      // Save to the command history...
+      if((lineValue = value.trim()) !== "") {
+        me.history.push(lineValue);
+        me.historyPtr = me.history.length;
+      }
+
+      // deactivate the line...
+      me.activeLine.value = "";
+      me.activeLine.attr({disabled: true});
+      me.activeLine.removeClass('active');
+
+      // and add add a new command line.
+      me.addInputLine();
+    });
+  },
+
+  insertResponse: function(response) {
+    if(response.length < 3) {
+      this.activeLine.parent().append("<p class='response'></p>");
+    }
+    else {
+      this.activeLine.parent().append("<p class='response'>" + response + "</p>");
+    }
+  },
+
+  clear: function() {
+    this.terminal.empty();
+    this.addInputLine();
+  },
+
+  focus: function() {
+    this.activeLine.focus();
+  }
+};
+
+var EnterKeyCode     = 13;
+var UpArrowKeyCode   = 38;
+var DownArrowKeyCode = 40;

data/lib/redmon/redis.rb

@@ -0,0 +1,63 @@
+module Redmon
+  module Redis
+    extend self
+
+    UNSUPPORTED = [
+      :eval,
+      :psubscribe,
+      :punsubscribe,
+      :subscribe,
+      :unsubscribe,
+      :unwatch,
+      :watch
+    ]
+
+    def redis
+      @redis ||= ::Redis.connect(:url => Redmon[:redis_url])
+    end
+
+    def ns
+      Redmon[:namespace]
+    end
+
+    def redis_url
+      @redis_url ||= Redmon[:redis_url].gsub(/\w*:\w*@/, '')
+    end
+
+    def redis_host
+      redis_url.gsub('redis://', '')
+    end
+
+    def config
+      redis.config :get, '*' rescue {}
+    end
+
+    def unquoted
+      %w{string OK} << '(empty list or set)'
+    end
+
+    def supported?(cmd)
+      !UNSUPPORTED.include? cmd
+    end
+
+    def empty_result
+      '(empty list or set)'
+    end
+
+    def unknown(cmd)
+      "(error) ERR unknown command '#{cmd}'"
+    end
+
+    def wrong_number_of_arguments_for(cmd)
+      "(error) ERR wrong number of arguments for '#{cmd}' command"
+    end
+
+    def connection_refused
+      "Could not connect to Redis at #{redis_url.gsub(/\w*:\/\//, '')}: Connection refused"
+    end
+
+    def stats_key
+      "#{ns}:redis:#{redis_host}:stats"
+    end
+  end
+end

data/lib/redmon/version.rb

@@ -0,0 +1,3 @@
+module Redmon
+  VERSION = "0.0.1"
+end

data/lib/redmon/views/app.haml

@@ -0,0 +1,178 @@
+!!!
+%html
+  %head
+    %title Redmon
+
+    %script(type="text/javascript" src="vendor/jquery-1.7.1.min.js")
+    %script(type="text/javascript" src="vendor/jquery-effects-core.min.js")
+    %script(type="text/javascript" src="vendor/jquery.editinplace.js")
+    %script(type="text/javascript" src="vendor/jquery.flot.js")
+    %script(type="text/javascript" src="vendor/bootstrap-modal.js")
+    %script(type="text/javascript" src="vendor/terminal.js")
+    %script(type="text/javascript" src="redmon.js")
+
+    %link(type="text/css" rel="stylesheet" href="vendor/bootstrap.min.css")
+    %link(type="text/css" rel="stylesheet" href="redmon.css")
+
+  %body
+    .topbar
+      .fill
+        .container
+          %a.brand Redmon
+          %ul.nav
+            %li.active{:id => 'dashboard'}
+              %a Dashboard
+            %li{:id => 'keys'}
+              %a Keys
+            %li{:id => 'cli'}
+              %a CLI
+            %li{:id => 'config'}
+              %a Configuration
+          .pull-right
+            %a.brand #{redis_url}
+            .btns
+              %button.btn.primary{:id => 'flush-btn'} Flush DB
+              %button.btn.primary{:id => 'reset-btn'} Reset Statistics
+
+    .container.viewport
+      .dashboard
+        .content
+          .page-header
+            %h1 Dashboard
+          .row
+            .span15
+              .row
+                .span15
+                  .widget
+                    .headbar
+                      %h2 Memory Usage
+                    #memory-container.chart
+              .row
+                .span15
+                  .widget
+                    .headbar
+                      %h2 Keyspace
+                    #keyspace-container.chart
+              .row
+                .span15
+                  .widget
+                    .headbar
+                      %h2 Slow Log
+                    %div{:style => "height:225px;overflow-y:scroll;"}
+                      %table.condensed-table{:id => "slow-tbl"}
+                        %tbody
+
+            .span6
+              .widget
+                .headbar
+                  %h2 Info
+                %table.condensed-table{:id => "info-tbl"}
+                  %tbody
+                    %tr
+                      %td{:style => "width: 65%"} Version
+                      %td{:id => "redis_version"}
+                    %tr
+                      %td Role
+                      %td{:id => "role"}
+                    %tr
+                      %td Uptime Days
+                      %td{:id => "uptime_in_days"}
+                    %tr
+                      %td Memory Used
+                      %td{:id => "used_memory_human"}
+                    %tr
+                      %td Memory Peak
+                      %td{:id => "used_memory_peak_human"}
+                    %tr
+                      %td Memory Fragmentation Ratio
+                      %td{:id => "mem_fragmentation_ratio"}
+                    %tr
+                      %td DB Size (Keys)
+                      %td{:id => "dbsize", :type => 'number'}
+                    %tr
+                      %td Keyspace Hits
+                      %td{:id => "keyspace_hits", :type => 'number'}
+                    %tr
+                      %td Keyspace Misses
+                      %td{:id => "keyspace_misses", :type => 'number'}
+                    %tr
+                      %td Pub/Sub Channels
+                      %td{:id => "pubsub_channels", :type => 'number'}
+                    %tr
+                      %td Pub/Sub Patterns
+                      %td{:id => "pubsub_patterns", :type => 'number'}
+                    %tr
+                      %td Total Connections Received
+                      %td{:id => "total_connections_received", :type => 'number'}
+                    %tr
+                      %td Total Commands Processed
+                      %td{:id => "total_commands_processed", :type => 'number'}
+                    %tr
+                      %td Blocked Clients
+                      %td{:id => "blocked_clients", :type => 'number'}
+                    %tr
+                      %td Connected Slaves
+                      %td{:id => "connected_slaves", :type => 'number'}
+                    %tr
+                      %td Last Save
+                      %td{:id => "last_save_time", :type => 'date'}
+                    %tr
+                      %td Changes Since Last Save
+                      %td{:id => "changes_since_last_save", :type => 'number'}
+                    %tr
+                      %td AOF Enabled
+                      %td{:id => "aof_enabled"}
+                    %tr
+                      %td VM Enabled
+                      %td{:id => "vm_enabled"}
+      .keys.hidden
+        .content
+          .page-header
+            %h1 Keys - Coming soon!
+          .row
+            .span6
+              .input-prepend
+                %span.add-on pattern
+                %input.span5
+            .span15
+
+      .cli.hidden
+        .content
+          .page-header
+            %h1 Command Line Interface
+          .row
+            .span21{:style => "height:620px"}
+              #terminal
+
+      .config.hidden
+        .content
+          .page-header
+            %h1 Configuration
+            .widget
+              .headbar
+                %h2 Parameters
+              %table.condensed-table{:id => "config-table"}
+                %tbody
+                - config.each do |k,v|
+                  %tr
+                    %td{:style => "width: 20%"}= k
+                    %td
+                      .editable{:id => "#{k}"}= v
+
+    #flush-confirm.modal.hide
+      .modal-header
+        %a.close x
+        %h3 Flush DB
+      .modal-body
+        %p This action will, without a doubt, delete all the keys of the redis server.
+      .modal-footer
+        %button.btn.secondary{:id => 'flush-cancel-btn'} Well On Second Thought
+        %button.btn.danger{:id => 'flush-confirm-btn'} Just Do It Already!
+
+:javascript
+  $(document).ready(function() {
+    Redmon.init({
+      pollInterval : #{poll_interval},
+      cliPrompt    : "#{prompt}"
+    });
+  });

data/lib/redmon/views/cli.haml

@@ -0,0 +1,15 @@
+- if @cmd == :info
+  - @result.each do |item|
+    %span= item.join ':'
+    %br
+- elsif @result.respond_to? :each_with_index
+  - @result.each_with_index do |item, index|
+    %span= "#{index+1}) \"#{item}\""
+    %br
+- elsif @result.is_a? Fixnum
+  %span= "(integer) #{@result}"
+  %br
+- else
+  - @result = "\"#{@result}\"" unless unquoted.include? @result
+  %span= @result
+  %br

data/lib/redmon/worker.rb

@@ -0,0 +1,41 @@
+module Redmon
+  class Worker
+    include Redmon::Redis
+
+    def run!
+      EM::PeriodicTimer.new(interval) {record_stats}
+    end
+
+    def record_stats
+      redis.zadd stats_key, *stats
+    end
+
+    def stats
+      stats = redis.info.merge! \
+        :dbsize  => redis.dbsize,
+        :time    => ts = Time.now.to_i * 1000,
+        :slowlog => entries(redis.slowlog :get)
+      [ts, stats.to_json]
+    end
+
+    def entries(slowlog)
+      sort(slowlog).map do |entry|
+        {
+          :id           => entry.shift,
+          :timestamp    => entry.shift * 1000,
+          :process_time => entry.shift,
+          :command      => entry.shift.join(' ')
+        }
+      end
+    end
+
+    def sort(slowlog)
+      slowlog.sort_by{|a| a[2]}.reverse!
+    end
+
+    def interval
+      Redmon[:poll_interval]
+    end
+
+  end
+end

data/load_sim.rb

@@ -0,0 +1,20 @@
+$: << ::File.expand_path("../lib/", __FILE__)
+require "rubygems"
+require "bundler/setup"
+require 'redmon'
+require 'redis'
+
+redis = Redis.connect
+
+loop do
+  start = rand(100000)
+  multi = rand(5)
+  start.upto(multi * start) do |i|
+    redis.set("key-#{i}", "abcdedghijklmnopqrstuvwxyz")
+  end
+
+  start.upto(multi * start) do |i|
+    redis.get("key-#{i}")
+    redis.del("key-#{i}")
+  end
+end