mongrel_config 0.2.1 → 0.3

data/lib/mongrel_config/win32_app.rb

@@ -0,0 +1,251 @@
+require 'erb'
+require 'camping'
+require 'mongrel/camping'
+require 'yaml'
+require 'thread'
+
+Camping.goes :Configure
+
+require 'mongrel_config/win32'
+
+$service_group = ThreadGroup.new
+$service_logs = ""
+
+module Configure
+  module Controllers
+    class Index < R '/'
+      def get
+        @services = W32Support.list
+        render :list
+      end
+    end
+    
+    class Info < R '/info/(\w+)'
+      def get(name)
+        @services = W32Support.list.select {|s| s.service_name == name }
+        render :info
+      end
+    end
+    
+    class Start < R '/start/(\w+)'
+      def get(service)
+        runner = Thread.new do
+          W32Support.start(service) do |status|
+            $service_logs << "Starting #{service}: #{status}\n"
+            sleep 1
+          end
+        end
+
+        $service_group.add(runner)
+
+        redirect Index
+      end
+    end    
+    
+    class Stop < R '/stop/(\w+)'
+      def get(service)
+        runner = Thread.new do
+          W32Support.stop(service) do |status|
+            $service_logs << "Starting #{service}: #{status}\n"
+            sleep 1
+          end
+        end
+
+        $service_group.add(runner)
+        redirect Index
+      end
+    end
+    
+    # eventually this will also let you see a particular service's logs
+    class Logs < R '/logs'
+      def get
+        render :service_logs
+      end
+    end
+
+    class ClearLogs < R '/clear_logs'
+      def get
+        $service_logs = ""
+        $service_logs << "#{Time.now}: CLEARED"
+
+        redirect Logs
+      end
+    end
+
+    class Install < R '/install'
+      def get
+        render :install_form
+      end
+
+      def post
+        options = []
+        if bad?(input.service_name) or bad?(input.root) or bad?(input.environment) or bad?(input.address) or bad?(input.port)
+          @result = "ERROR: You must fill out all mandatory (*) fields."
+          render :install_result
+        else
+          options << ["-n", input.service_name]
+          options << ["-r", '"' + input.root + '"']
+          options << ["-e", input.environment]
+          options << ["-b", input.address]
+          options << ["-p", input.port]
+          options << ["-d", input.display_name] if good? input.display_name
+          options << ["-m", '"' + input.mime + '"'] if good? input.mime
+          options << ["-P", input.num_procs] if good? input.num_procs
+          options << ["-t", input.timeout] if good? input.timeout
+          options << ["-c", input.cpu] if good? input.cpu
+          
+          begin
+            @result = `ruby #$mongrel_rails_service install #{options.join(' ')}`
+            $service_logs << @result
+          rescue
+            @result = "Failed to start #{input.service_name}: #$!"
+            $service_logs << @result
+          end
+          
+          render :install_result
+        end
+      end
+
+      def good?(field)
+        field and not field.strip.empty?
+      end
+      
+      def bad?(field)
+        not good? field
+      end
+    end
+
+
+    class Delete < R '/delete/(\w+)'
+      def get(name)
+        W32Support.delete(name)
+        $service_logs << "Deleted #{name}\n"
+        redirect Index
+      end
+    end
+  end
+  
+  
+  module Views
+    def layout
+      links = [ 
+        ["/config", "Status"], 
+        ["/config/install", "Install"], 
+        ["/config/logs", "Logs"]
+        ]
+      body_content = yield
+      currently_running = _running_procs
+
+      open(GemPlugin::Manager.instance.resource("mongrel_config", "/index_win32.html")) do |f|
+        template = ERB.new(f.read)
+        self << template.result(binding)
+      end
+    end
+    
+
+    def list
+      div :id=>"viewport" do
+        table do
+          tr { th { "Service"}; th { "Status"}; th { "Control" }; th { "Delete" } }
+          @services.each do |s|
+            status = W32Support.status(s.service_name)
+            tr { 
+              td { a(s.service_name, :href => "/info/#{s.service_name}") }
+              td { status.capitalize }
+              td { 
+                if status =~ /stopped/
+                  a("start",:href => "/start/#{s.service_name}")
+                elsif status =~ /running/
+                  a("stop",:href => "/stop/#{s.service_name}") 
+                else
+                  b { "in progress" }
+                end
+              }
+              td {
+                a("delete!",:href => "/delete/#{s.service_name}", 
+                  :onclick=>"return confirm('Delete #{s.service_name}?') == '1'")
+              }
+            }
+          end
+        end
+      end
+    end
+    
+
+    def info
+      div :id=>"viewport" do
+        @services.each do |s|
+        
+          h2 { "#{s.service_name} service information" }
+          table do
+            tr { th {"Attribute"}; th {"Value"} }
+            
+            s.each_pair do |memb,obj|
+              name = memb.to_s.tr("_"," ").capitalize
+              tr { 
+                td { b { "#{name}: " } }
+                td { obj.inspect }
+              }
+            end
+          end
+        end
+      end
+    end
+
+    def service_logs
+      h2 { "Latest Service Activity Logs" }
+      a("[clear logs]", :href => "/clear_logs")
+
+      div :id=>"viewport" do
+        pre :style=>"font-size: 10pt;" do
+          self << $service_logs
+        end
+      end
+    end
+
+    def install_form
+      div do
+        h2 { "Install New Mongrel Service" }
+        p { "Items with an * are mandatory.  Leave an item blank to not specify it." }
+        form :action=>"/install", :method=>"POST" do
+          b { "* Service Name: "}; input :name => "service_name"; br
+          b { "* Root: "}; input :name => "root"; br
+          b { "* Environment: "}; input :name => "environment", :value => "development"; br
+          b { "*Address: "}; input :name => "address", :value => "0.0.0.0"; br
+          b { "*Port: "}; input :name => "port", :value => "4000", :size => 6; br
+          b { "Display Name: "}; input :name => "display_name"; br
+          b { "MIME Map File: "};  input :name => "mime"; br
+          b { "Number Processor Threads: "}; input :name => "num_procs", :size => 3; br
+          b { "Request Timeout: "}; input :name => "timeout", :size => 3; br
+          b { "Assigned CPU: " }; input :name => "cpu", :size => 2; br
+
+          p { input :type=>"submit", :value => "INSTALL" }
+        end
+      end
+    end
+
+
+    def install_result
+      div :id=>"viewport" do
+        h2 { "Install Results"}
+        pre do
+          self << @result
+        end
+      end
+    end
+
+    def _running_procs
+      running = []
+      W32Support.list.each {|s| running << s.service_name if s.current_state =~ /running/}
+      running
+    end
+    
+  end
+end
+
+
+
+
+
+
+

data/resources/index_win32.html

@@ -0,0 +1,68 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html>
+<head>
+<title>Mongrel Config Tool</title>
+<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
+<link href="/config/resources/style.css" rel="stylesheet" type="text/css" />
+</head>
+<body>
+<div id="container">
+  <div id="top">
+    <div id="title">Mongrel Config Tool</div>
+  </div>
+  <div id="middle">
+	  <div id="nav">
+        <ul>
+	      <% links.each do |uri,text| %>
+   	      <li><a href="<%= uri %>"><%= text %></a></li>
+		<%end%>
+        </ul>
+      </div>
+	  <div id="content">
+	  <div id="side">
+	    <% if currently_running.length > 0 %>
+	    <strong>Running Services</strong> <br />
+	    <br />
+		<%= currently_running.join(",") %>
+	    <% else %>
+	    <strong>No services running.</strong><br />
+	    <% end %>
+		<br /><br />
+		<br />
+	  <strong>Documentation</strong><br />
+        <br />
+        <a href="http://mongrel.rubyforge.org">Mongrel Home</a> <br />
+	<br />
+
+        <a href="http://mongrel.rubyforge.org/news.html">News</a><br />
+        <br />
+
+        <a href="http://mongrel.rubyforge.org/docs/started.html">Getting Started</a> <br />
+	<br />
+
+        <a href="http://mongrel.rubyforge.org/docs/win32.html">Win32 Guide</a><br />
+        <br />
+
+        <a href="http://mongrel.rubyforge.org/docs/lighttpd.html">Lighttpd Guide</a><br />
+        <br />
+
+        <a href="http://mongrel.rubyforge.org/rdoc/index.html">Mongrel API</a><br />
+        <br />
+
+        <a href="http://api.rubyonrails.org/">Ruby On Rails API</a><br />
+        <br />
+
+        <br /><br />
+      </div>
+
+      <%= body_content %>
+
+      </div>
+	</div>
+	  </div>
+	  
+  <div id="bottom">&nbsp;</div>
+  
+<div id="footertext">Copyright 2006 &copy; Zed A. Shaw &nbsp; | &nbsp; Design by Kenneth Barbour.</div>
+</body>
+</html>

data/resources/style.css

@@ -6,7 +6,6 @@ body {
 	background-position: top;
 	font-family: "Lucida Grande", Verdana, Halvetica, sans-serif;
 	text-align: center;
-
 }
 a:hover {
 	color: #990000;
@@ -148,6 +147,12 @@ a {
 	text-decoration: underline;
 }
 
+b { font-size: 10pt;  }
+
+#viewport { 
+  overflow: auto; width: 400px; height: 320px;
+}
+
 table { 
   border-collapse: collapsed;
 }

data/test/test_config.rb

@@ -1,7 +1,53 @@
 require 'test/unit'
+require 'mongrel_config/init'
+
+class CommandTest < Test::Unit::TestCase
+  def setup
+    @pmgr = GemPlugin::Manager.instance
+  end
+
+  def test_command_loaded
+    assert @pmgr.create("/commands/configtool", "configtool not loaded")
+  end
+
+end
+
+
+# these are only run if we're running on windows
+if RUBY_PLATFORM =~ /mswin/
+  require 'mongrel_config/win32'
+
+  class Win32Test < Test::Unit::TestCase
+    
+    def test_list
+      svcs = W32Support.list
+      assert svcs.length > 0, "No services returned.  Make sure you have one mongrel installed."
+    end
+
+    def test_display_name
+      svcs = W32Support.list
+      svcs.each { |s| W32Support.display(s.service_name) }
+    end
+
+    def test_start_stop
+      svcs = W32Support.list
+      svcs.each { |s|
+        puts "Starting #{W32Support.display(s.service_name)} (might take a while)"
+        i = 1
+        W32Support.start(s.service_name) do |status|
+          print "Starting #{s.service_name}: #{status} (#{i} seconds)\r"
+          sleep 1
+          i += 1
+        end
+
+        W32Support.stop(s.service_name) do |status|
+          puts "Stopping #{s.service_name}: #{status}"
+          sleep 1
+        end
+      }
+    end
 
-class EmptyTest < Test::Unit::TestCase
-  def test_nothing
   end
 end
 
+  

data/tools/rakehelp.rb

@@ -93,7 +93,8 @@ def setup_gem(pkg_name, pkg_version)
     
   Rake::GemPackageTask.new(spec) do |p|
     p.gem_spec = spec
-    p.need_tar = true
+    # win32 chokes on this
+    p.need_tar = true if RUBY_PLATFORM !~ /mswin/
   end
 end
 

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.11
 specification_version: 1
 name: mongrel_config
 version: !ruby/object:Gem::Version 
-  version: 0.2.1
-date: 2006-03-12 00:00:00 -05:00
+  version: "0.3"
+date: 2006-03-15 00:00:00 -05:00
 summary: Mongrel plugin that gives you web based config tool using Camping
 require_paths: 
 - lib
@@ -32,14 +32,105 @@ files:
 - LICENSE
 - README
 - Rakefile
+- doc/rdoc/classes
+- doc/rdoc/created.rid
+- doc/rdoc/files
+- doc/rdoc/fr_class_index.html
+- doc/rdoc/fr_file_index.html
+- doc/rdoc/fr_method_index.html
+- doc/rdoc/index.html
+- doc/rdoc/rdoc-style.css
+- doc/rdoc/classes/ConfigTool.html
+- doc/rdoc/classes/ConfigTool.src
+- doc/rdoc/classes/Configure
+- doc/rdoc/classes/Configure.html
+- doc/rdoc/classes/W32Support.html
+- doc/rdoc/classes/W32Support.src
+- doc/rdoc/classes/ConfigTool.src/M000001.html
+- doc/rdoc/classes/ConfigTool.src/M000002.html
+- doc/rdoc/classes/ConfigTool.src/M000003.html
+- doc/rdoc/classes/Configure/Controllers
+- doc/rdoc/classes/Configure/Controllers.html
+- doc/rdoc/classes/Configure/Views.html
+- doc/rdoc/classes/Configure/Views.src
+- doc/rdoc/classes/Configure/Controllers/ClearLogs.html
+- doc/rdoc/classes/Configure/Controllers/ClearLogs.src
+- doc/rdoc/classes/Configure/Controllers/Delete.html
+- doc/rdoc/classes/Configure/Controllers/Delete.src
+- doc/rdoc/classes/Configure/Controllers/Index.html
+- doc/rdoc/classes/Configure/Controllers/Index.src
+- doc/rdoc/classes/Configure/Controllers/Info.html
+- doc/rdoc/classes/Configure/Controllers/Info.src
+- doc/rdoc/classes/Configure/Controllers/Install.html
+- doc/rdoc/classes/Configure/Controllers/Install.src
+- doc/rdoc/classes/Configure/Controllers/Kill.html
+- doc/rdoc/classes/Configure/Controllers/Kill.src
+- doc/rdoc/classes/Configure/Controllers/Logs.html
+- doc/rdoc/classes/Configure/Controllers/Logs.src
+- doc/rdoc/classes/Configure/Controllers/Start.html
+- doc/rdoc/classes/Configure/Controllers/Start.src
+- doc/rdoc/classes/Configure/Controllers/Stop.html
+- doc/rdoc/classes/Configure/Controllers/Stop.src
+- doc/rdoc/classes/Configure/Controllers/ClearLogs.src/M000043.html
+- doc/rdoc/classes/Configure/Controllers/Delete.src/M000036.html
+- doc/rdoc/classes/Configure/Controllers/Index.src/M000027.html
+- doc/rdoc/classes/Configure/Controllers/Index.src/M000028.html
+- doc/rdoc/classes/Configure/Controllers/Info.src/M000035.html
+- doc/rdoc/classes/Configure/Controllers/Install.src/M000039.html
+- doc/rdoc/classes/Configure/Controllers/Install.src/M000040.html
+- doc/rdoc/classes/Configure/Controllers/Install.src/M000041.html
+- doc/rdoc/classes/Configure/Controllers/Install.src/M000042.html
+- doc/rdoc/classes/Configure/Controllers/Kill.src/M000029.html
+- doc/rdoc/classes/Configure/Controllers/Logs.src/M000037.html
+- doc/rdoc/classes/Configure/Controllers/Logs.src/M000038.html
+- doc/rdoc/classes/Configure/Controllers/Start.src/M000032.html
+- doc/rdoc/classes/Configure/Controllers/Start.src/M000033.html
+- doc/rdoc/classes/Configure/Controllers/Start.src/M000034.html
+- doc/rdoc/classes/Configure/Controllers/Stop.src/M000030.html
+- doc/rdoc/classes/Configure/Controllers/Stop.src/M000031.html
+- doc/rdoc/classes/Configure/Views.src/M000011.html
+- doc/rdoc/classes/Configure/Views.src/M000012.html
+- doc/rdoc/classes/Configure/Views.src/M000013.html
+- doc/rdoc/classes/Configure/Views.src/M000014.html
+- doc/rdoc/classes/Configure/Views.src/M000015.html
+- doc/rdoc/classes/Configure/Views.src/M000016.html
+- doc/rdoc/classes/Configure/Views.src/M000017.html
+- doc/rdoc/classes/Configure/Views.src/M000018.html
+- doc/rdoc/classes/Configure/Views.src/M000019.html
+- doc/rdoc/classes/Configure/Views.src/M000020.html
+- doc/rdoc/classes/Configure/Views.src/M000021.html
+- doc/rdoc/classes/Configure/Views.src/M000022.html
+- doc/rdoc/classes/Configure/Views.src/M000023.html
+- doc/rdoc/classes/Configure/Views.src/M000024.html
+- doc/rdoc/classes/Configure/Views.src/M000025.html
+- doc/rdoc/classes/Configure/Views.src/M000026.html
+- doc/rdoc/classes/W32Support.src/M000004.html
+- doc/rdoc/classes/W32Support.src/M000005.html
+- doc/rdoc/classes/W32Support.src/M000006.html
+- doc/rdoc/classes/W32Support.src/M000007.html
+- doc/rdoc/classes/W32Support.src/M000008.html
+- doc/rdoc/classes/W32Support.src/M000009.html
+- doc/rdoc/classes/W32Support.src/M000010.html
+- doc/rdoc/files/COPYING.html
+- doc/rdoc/files/lib
+- doc/rdoc/files/LICENSE.html
+- doc/rdoc/files/README.html
+- doc/rdoc/files/lib/mongrel_config
+- doc/rdoc/files/lib/mongrel_config/app_rb.html
+- doc/rdoc/files/lib/mongrel_config/init_rb.html
+- doc/rdoc/files/lib/mongrel_config/win32_app_rb.html
+- doc/rdoc/files/lib/mongrel_config/win32_rb.html
 - test/test_config.rb
 - lib/mongrel_config
 - lib/mongrel_config/app.rb
 - lib/mongrel_config/init.rb
+- lib/mongrel_config/win32.rb
+- lib/mongrel_config/win32_app.rb
 - tools/rakehelp.rb
 - resources/defaults.yaml
 - resources/images
 - resources/index.html
+- resources/index_win32.html
 - resources/style.css
 - resources/images/0170_bubble.png
 - resources/images/0171_new_page.png
@@ -68,7 +159,7 @@ dependencies:
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
-        version: 0.3.10.1
+        version: 0.3.11
     version: 
 - !ruby/object:Gem::Dependency 
   name: gem_plugin
@@ -77,7 +168,7 @@ dependencies:
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
-        version: "0.2"
+        version: 0.2.1
     version: 
 - !ruby/object:Gem::Dependency 
   name: camping