slashport 0.15.10

data/app/models/components/linuxprocess.rb

@@ -0,0 +1,55 @@
+require 'rubygems'
+
+class SlashPort::Component::LinuxProcess < SlashPort::Component
+  def self.add_process(name, &pid_method)
+    define_method(name.to_sym) do
+      pid = pid_method.call().to_i
+      query_process(pid)
+    end
+
+    attribute :name => name,
+              :handler => name.to_sym,
+              :doc => "Process data for #{name}"
+  end
+
+  def query_process(pid)
+    procinfo = ProcessInfo.new(pid)
+    limits = procinfo.get_limits
+    tuple = SlashPort::Tuple.new
+    puts limits.inspect
+    tuple.data["max_open_files"] = limits["open files"]
+    tuple.data["open_files"] = procinfo.open_files
+    return tuple
+  end
+
+end # class SlashPort::Component
+
+
+class ProcessInfo
+  def initialize(pid)
+    @pid = pid
+  end
+
+  def procpath(path)
+    return "/proc/#{@pid}/#{path}"
+  end
+
+  def get_limits
+    linere = /^Max (.*?) +\S+ +(\S+)(?: +\S+\s*)?$/
+    limits = Hash.new
+    File.open(procpath("limits")).each do |line|
+      line.chomp!
+      next if line =~ /^Limit/
+      puts line
+      match = linere.match(line)
+      next if match == nil
+      limits[match.captures[0]] = match.captures[1]
+    end
+    return limits
+  end
+
+  def open_files
+    return Dir.glob(procpath("fd/*")).length
+  end
+
+end

data/app/models/components/mysql.rb

@@ -0,0 +1,110 @@
+require 'rubygems'
+require 'sequel'
+
+class SlashPort::Component
+  class Mysql < SlashPort::Component
+    attr_accessor :host
+    attr_accessor :user
+    attr_accessor :password
+
+    attribute :name => "master-status",
+              :handler => :MasterStatus,
+              :doc => "Shows the master status of this mysql server"
+
+    attribute :name => "slave-status",
+              :handler => :SlaveStatus,
+              :doc => "Shows the slave status of this mysql server"
+
+    attribute :name => "stats",
+              :handler => :MysqlStats,
+              :doc => "Stats from 'show status' in mysql."
+
+    attribute :name => "connection", 
+              :handler => :MysqlOK,
+              :doc => "Reports whether we can send queries successfully to mysql."
+
+    #multiconfig "settings", :ConfigGetVariables, <<-doc
+      #Output of 'show variables'
+    #doc
+
+    def initialize
+      super
+      begin
+        @db = Sequel.connect("mysql://slashport@localhost")
+      rescue Sequel::AdapterNotFound => e
+        puts "Disabling #{self.class.label} component: missing mysql Sequel adapter: #{e.inspect}"
+        self.class.disable
+      end
+    end
+
+    def MysqlOK
+      tuple = SlashPort::Tuple.new
+      begin
+        # dummy query just to test our connection
+        @db["show variables like 'x'"].map
+        tuple.data["healthy"] = 1
+      rescue Sequel::DatabaseConnectionError, Sequel::DatabaseError
+        tuple.data["healthy"] = 0
+      end
+      return tuple
+    end # end MysqlOK
+
+    def MasterStatus
+      data = []
+      tuple = SlashPort::Tuple.new
+      begin
+        result = @db["show master status"].map[0]
+        result.each do |key, val|
+          tuple.data[key.to_s.downcase] = val
+        end
+        data << tuple
+      rescue Sequel::DatabaseConnectionError, Sequel::DatabaseError
+        return nil
+      end
+      return data
+    end # end MasterStatus
+
+    def SlaveStatus
+      tuple = SlashPort::Tuple.new
+      begin
+        result = @db["show slave status"].map[0]
+        ret = Hash.new
+        if result == nil
+          # this host is not a slave
+          tuple.data["is-slave"] = false
+        else
+          result.each do |key, val|
+            tuple.data[key.to_s.downcase] = val
+          end
+        end
+      rescue Sequel::DatabaseConnectionError, Sequel::DatabaseError
+        return nil
+      end
+      return tuple
+    end # end MasterStatus
+
+    def MysqlStats
+      tuple = SlashPort::Tuple.new
+      begin
+        result = @db["show global status"]
+        result.map do |row|
+          value = row[:Value]
+          # use actual value if Float fails.
+          tuple.data[row[:Variable_name].downcase] = (Float(value) rescue value)
+        end
+      rescue Sequel::DatabaseConnectionError, Sequel::DatabaseError
+        return nil
+      end
+      return tuple
+    end # end MysqlStats
+
+    def ConfigGetVariables
+      result = @db["show variables"]
+      data = Hash.new
+      result.map do |row|
+        data[row[:Variable_name]] = row[:Value]
+      end
+      return data
+    end # def ConfigGetVariables
+  end
+end

data/app/models/components/puppet.rb

@@ -0,0 +1,20 @@
+require 'rubygems'
+
+class SlashPort::Component
+  class Puppet < SlashPort::Component
+    attribute :name => "freshness",
+              :handler => :freshness,
+              :doc => "Freshness according to puppet's localconfig.yaml"
+
+    def freshness
+      begin
+        tuple = SlashPort::Tuple.new
+        age = Time.now - File.stat("/var/puppet/state/state.yaml").mtime
+        tuple.data["freshness"] = age.to_f
+        return tuple
+      rescue Errno::ENOENT
+        return nil
+      end
+    end # def freshness
+  end # class Puppet
+end # class SlashPort::Component

data/app/views/cfg/index.html.erb

@@ -0,0 +1 @@
+You're in index of the Cfg controller.

data/app/views/exceptions/not_acceptable.html.erb

@@ -0,0 +1,63 @@
+<div id="container">
+  <div id="header-container">
+    <img src="/images/merb.jpg" />
+    <!-- <h1>Mongrel + Erb</h1> -->
+    <h2>pocket rocket web framework</h2>
+    <hr />
+  </div>
+
+  <div id="left-container">
+    <h3>Exception:</h3>
+    <p><%= request.exceptions.first.message %></p>
+  </div>
+
+  <div id="main-container">
+    <h3>Why am I seeing this page?</h3>
+    <p>Merb couldn't find an appropriate content_type to return,
+      based on what you said was available via provides() and
+      what the client requested.</p>
+
+    <h3>How to add a mime-type</h3>
+    <pre><code>
+      Merb.add_mime_type :pdf, :to_pdf, %w[application/pdf], &quot;Content-Encoding&quot; =&gt; &quot;gzip&quot;
+    </code></pre>
+    <h3>What this means is:</h3>
+    <ul>
+      <li>Add a mime-type for :pdf</li>
+      <li>Register the method for converting objects to PDF as <code>#to_pdf</code>.</li>
+      <li>Register the incoming mime-type "Accept" header as <code>application/pdf</code>.</li>
+      <li>Specify a new header for PDF types so it will set <code>Content-Encoding</code> to gzip.</li>
+    </ul>
+
+    <h3>You can then do:</h3>
+    <pre><code>
+      class Foo &lt; Application
+        provides :pdf
+      end
+    </code></pre>
+
+    <h3>Where can I find help?</h3>
+    <p>If you have any questions or if you can't figure something out, please take a
+      look at our <a href="http://merbivore.com/"> project page</a>,
+      feel free to come chat at irc.freenode.net, channel #merb,
+      or post to <a href="http://groups.google.com/group/merb">merb mailing list</a>
+      on Google Groups.</p>
+      
+    <h3>What if I've found a bug?</h3>
+    <p>If you want to file a bug or make your own contribution to Merb,
+      feel free to register and create a ticket at our
+      <a href="http://merb.lighthouseapp.com/">project development page</a>
+      on Lighthouse.</p>
+
+    <h3>How do I edit this page?</h3>
+    <p>You can change what people see when this happens by editing <tt>app/views/exceptions/not_acceptable.html.erb</tt>.</p> 
+
+  </div>
+
+  <div id="footer-container">
+    <hr />
+    <div class="left"></div>
+    <div class="right">&copy; 2008 the merb dev team</div>
+    <p>&nbsp;</p>
+  </div>
+</div>

data/app/views/exceptions/not_found.html.erb

@@ -0,0 +1,47 @@
+<div id="container">
+  <div id="header-container">
+    <img src="/images/merb.jpg" />
+    <!-- <h1>Mongrel + Erb</h1> -->
+    <h2>pocket rocket web framework</h2>
+    <hr />
+  </div>
+
+  <div id="left-container">
+    <h3>Exception:</h3>
+    <p><%= request.exceptions.first.message %></p>
+  </div>
+
+  <div id="main-container">
+    <h3>Welcome to Merb!</h3>
+    <p>Merb is a light-weight MVC framework written in Ruby.  We hope you enjoy it.</p>
+    
+    <h3>Where can I find help?</h3>
+    <p>If you have any questions or if you can't figure something out, please take a
+      look at our <a href="http://merbivore.com/"> project page</a>,
+      feel free to come chat at irc.freenode.net, channel #merb,
+      or post to <a href="http://groups.google.com/group/merb">merb mailing list</a>
+      on Google Groups.</p>
+      
+    <h3>What if I've found a bug?</h3>
+    <p>If you want to file a bug or make your own contribution to Merb,
+      feel free to register and create a ticket at our
+      <a href="http://merb.lighthouseapp.com/">project development page</a>
+      on Lighthouse.</p>
+
+    <h3>How do I edit this page?</h3>
+    <p>You're seeing this page because you need to edit the following files:
+      <ul>
+        <li>config/router.rb <strong><em>(recommended)</em></strong></li>
+        <li>app/views/exceptions/not_found.html.erb <strong><em>(recommended)</em></strong></li>
+        <li>app/views/layout/application.html.erb <strong><em>(change this layout)</em></strong></li>
+      </ul>
+    </p>
+  </div>
+
+  <div id="footer-container">
+    <hr />
+    <div class="left"></div>
+    <div class="right">&copy; 2008 the merb dev team</div>
+    <p>&nbsp;</p>
+  </div>
+</div>

data/app/views/layout/application.html.erb

@@ -0,0 +1,12 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en-us" lang="en-us">
+  <head>
+    <title>Fresh Merb App</title>
+    <meta http-equiv="content-type" content="text/html; charset=utf-8" />
+    <link rel="stylesheet" href="/stylesheets/master.css" type="text/css" media="screen" charset="utf-8" />
+  </head>
+  <body>
+    <%#= message[:notice] %>
+    <%= catch_content :for_layout %>
+  </body>
+</html>

data/app/views/var/index.json.erb

@@ -0,0 +1 @@
+<%= @attributes.to_json %>

data/app/views/var/index.pp.erb

@@ -0,0 +1,10 @@
+<% 
+require "pp"
+require "stringio"
+
+sio = StringIO.new
+PP.pp(@attributes, sio)
+sio.rewind
+output = sio.read
+%>
+<%= output %>

data/app/views/var/index.text.erb

@@ -0,0 +1,18 @@
+<% 
+data = []
+@attributes.each do |tuple| 
+  # component, section - first
+  keys = ["component", "section"]
+  # the other keys next, sorted by key
+  keys += tuple.labels.keys.select { |k| !keys.include?(k) }.sort
+
+  labelstr = keys.collect { |k| "#{k}=#{tuple.labels[k]}" }.join(",")
+
+  # for each datum in our tuple, output one line.
+  # This gives us "label1=value1,label2=...,data1=value1" for
+  tuple.data.each do |key,value|
+    data << "#{labelstr},#{key}=#{value}"
+  end
+end
+-%>
+<%= data.sort.join("\n") %>

data/app/views/vardoc/index.html.erb

@@ -0,0 +1 @@
+You're in index of the Vardoc controller.

data/autotest/discover.rb

@@ -0,0 +1 @@
+Autotest.add_discovery { "merb" }

data/autotest/merb.rb

@@ -0,0 +1,149 @@
+# Adapted from Autotest::Rails
+require 'autotest'
+
+class Autotest::Merb < Autotest
+  
+  # +model_tests_dir+::      the directory to find model-centric tests
+  # +controller_tests_dir+:: the directory to find controller-centric tests
+  # +view_tests_dir+::       the directory to find view-centric tests
+  # +fixtures_dir+::         the directory to find fixtures in
+  attr_accessor :model_tests_dir, :controller_tests_dir, :view_tests_dir, :fixtures_dir
+  
+  def initialize
+    super
+    
+    initialize_test_layout
+    
+    # Ignore any happenings in these directories
+    add_exception %r%^\./(?:doc|log|public|tmp)%
+    
+    # Ignore any mappings that Autotest may have already set up
+    clear_mappings
+    
+    # Any changes to a file in the root of the 'lib' directory will run any 
+    # model test with a corresponding name.
+    add_mapping %r%^lib\/.*\.rb% do |filename, _|
+      files_matching Regexp.new(["^#{model_test_for(filename)}$"])
+    end
+    
+    # Any changes to a fixture will run corresponding view, controller and 
+    # model tests
+    add_mapping %r%^#{fixtures_dir}/(.*)s.yml% do |_, m|
+      [
+        model_test_for(m[1]), 
+        controller_test_for(m[1]), 
+        view_test_for(m[1])
+      ]
+    end
+    
+    # Any change to a test or test will cause it to be run
+    add_mapping %r%^test/(unit|models|integration|controllers|views|functional)/.*rb$% do |filename, _|
+      filename
+    end
+    
+    # Any change to a model will cause it's corresponding test to be run
+    add_mapping %r%^app/models/(.*)\.rb$% do |_, m|
+      model_test_for(m[1])
+    end
+    
+    # Any change to the global helper will result in all view and controller 
+    # tests being run
+    add_mapping %r%^app/helpers/global_helpers.rb% do
+      files_matching %r%^test/(views|functional|controllers)/.*_test\.rb$%
+    end
+    
+    # Any change to a helper will run it's corresponding view and controller 
+    # tests, unless the helper is the global helper. Changes to the global 
+    # helper run all view and controller tests.
+    add_mapping %r%^app/helpers/(.*)_helper(s)?.rb% do |_, m|
+      if m[1] == "global" then
+        files_matching %r%^test/(views|functional|controllers)/.*_test\.rb$%
+      else
+        [
+          view_test_for(m[1]), 
+          controller_test_for(m[1])
+        ]
+      end
+    end
+    
+    # Changes to views result in their corresponding view and controller test 
+    # being run
+    add_mapping %r%^app/views/(.*)/% do |_, m|
+      [
+        view_test_for(m[1]), 
+        controller_test_for(m[1])
+      ]
+    end
+    
+    # Changes to a controller result in its corresponding test being run. If 
+    # the controller is the exception or application controller, all 
+    # controller tests are run.
+    add_mapping %r%^app/controllers/(.*)\.rb$% do |_, m|
+      if ["application", "exception"].include?(m[1])
+        files_matching %r%^test/(controllers|views|functional)/.*_test\.rb$%
+      else
+        controller_test_for(m[1])
+      end
+    end
+
+    # If a change is made to the router, run all controller and view tests
+    add_mapping %r%^config/router.rb$% do # FIX
+      files_matching %r%^test/(controllers|views|functional)/.*_test\.rb$%
+    end
+
+    # If any of the major files governing the environment are altered, run 
+    # everything
+    add_mapping %r%^test/test_helper.rb|config/(init|rack|environments/test.rb|database.yml)% do # FIX
+      files_matching %r%^test/(unit|models|controllers|views|functional)/.*_test\.rb$%
+    end
+  end
+  
+private
+
+  # Determines the paths we can expect tests or specs to reside, as well as 
+  # corresponding fixtures.
+  def initialize_test_layout
+    self.model_tests_dir      = "test/unit"
+    self.controller_tests_dir = "test/functional"
+    self.view_tests_dir       = "test/views"
+    self.fixtures_dir         = "test/fixtures"
+  end
+  
+  # Given a filename and the test type, this method will return the 
+  # corresponding test's or spec's name.
+  # 
+  # ==== Arguments
+  # +filename+<String>:: the file name of the model, view, or controller
+  # +kind_of_test+<Symbol>:: the type of test we that we should run
+  # 
+  # ==== Returns
+  # String:: the name of the corresponding test or spec
+  # 
+  # ==== Example
+  # 
+  #   > test_for("user", :model)
+  #   => "user_test.rb"
+  #   > test_for("login", :controller)
+  #   => "login_controller_test.rb"
+  #   > test_for("form", :view)
+  #   => "form_view_spec.rb" # If you're running a RSpec-like suite
+  def test_for(filename, kind_of_test)
+    name  = [filename]
+    name << kind_of_test.to_s if kind_of_test == :view
+    name << "test"
+    return name.join("_") + ".rb"
+  end
+  
+  def model_test_for(filename)
+    [model_tests_dir, test_for(filename, :model)].join("/")
+  end
+  
+  def controller_test_for(filename)
+    [controller_tests_dir, test_for(filename, :controller)].join("/")
+  end
+  
+  def view_test_for(filename)
+    [view_tests_dir, test_for(filename, :view)].join("/")
+  end
+  
+end