rboss 0.9.1 → 0.9.3

data/lib/rboss/resources/run.conf.erb

@@ -1,62 +0,0 @@
-## -*- shell-script -*- ######################################################
-##                                                                          ##
-##  JBoss Bootstrap Script Configuration                                    ##
-##                                                                          ##
-##############################################################################
-
-### $Id: run.conf 91533 2009-07-22 01:20:05Z gbadner $
-
-#
-# This shell script is sourced by run.sh to initialize the environment 
-# variables that run.sh uses. It is recommended to use this file to
-# configure these variables, rather than modifying run.sh itself. 
-#
-
-#
-# Specify the maximum file descriptor limit, use "max" or "maximum" to use
-# the default, as queried by the system.
-#
-# Defaults to "maximum"
-#
-#MAX_FD="maximum"
-
-#
-# Specify the JBoss Profiler configuration file to load.
-#
-# Default is to not load a JBoss Profiler configuration file.
-#
-#PROFILER=""
-
-#
-# Specify the location of the Java home directory.  If set then $JAVA will
-# be defined to $JAVA_HOME/bin/java, else $JAVA will be "java".
-#
-#JAVA_HOME="/usr/java/jdk1.6.0"
-
-#
-# Specify the exact Java VM executable to use.
-#
-#JAVA=""
-
-#
-# Specify options to pass to the Java VM.
-#
-if [ "x$JAVA_OPTS" = "x" ]; then
-   JAVA_OPTS="-Xms<%= @config[:heap_size] %> -Xmx<%= @config[:heap_size] %>"
-   JAVA_OPTS="$JAVA_OPTS -XX:PermSize=<%= @config[:perm_size] %> -XX:MaxPermSize=<%= @config[:perm_size] %>"
-   JAVA_OPTS="$JAVA_OPTS -Xss<%= @config[:stack_size] %>"
-   JAVA_OPTS="$JAVA_OPTS -Dorg.jboss.resolver.warning=true -Dsun.rmi.dgc.client.gcInterval=3600000 -Dsun.rmi.dgc.server.gcInterval=3600000 -Dsun.lang.ClassLoader.allowArraySyntax=true"
-fi
-
-## Specify the Security Manager options
-#JAVA_OPTS="$JAVA_OPTS -Djava.security.manager -Djava.security.policy=$POLICY"
-
-# Sample JPDA settings for remote socket debugging
-<%= "#" unless @config[:debug] == :socket %>JAVA_OPTS="$JAVA_OPTS -Xrunjdwp:transport=dt_socket,address=8787,server=y,suspend=n"
-
-# Sample JPDA settings for shared memory debugging
-<%= "#" unless @config[:debug] == :shared_memory %>JAVA_OPTS="$JAVA_OPTS -Xrunjdwp:transport=dt_shmem,address=jboss,server=y,suspend=n"
-
-<% unless @jvm_args.empty? %>
-JAVA_OPTS="$JAVA_OPTS <%= @jvm_args.join ' ' %>"
-<% end %>

data/lib/rboss/twiddle.rb

@@ -1,25 +0,0 @@
-#                         The MIT License
-#
-# Copyright (c) 2011-2012 Marcelo Guimarães <ataxexe@gmail.com>
-#
-# 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.
-
-require_relative 'twiddle/base_monitor'
-require_relative 'twiddle/mbean'
-require_relative 'twiddle/monitor'

data/lib/rboss/twiddle/base_monitor.rb

@@ -1,88 +0,0 @@
-#                         The MIT License
-#
-# Copyright (c) 2011-2012 Marcelo Guimarães <ataxexe@gmail.com>
-#
-# 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.
-
-require_relative 'monitor'
-require_relative 'twiddle'
-
-module RBoss
-  module Twiddle
-
-    class BaseMonitor
-      include RBoss::Twiddle::Monitor
-
-      def initialize twiddle
-        @twiddle = twiddle
-        defaults.each do |mbean_id, config|
-          monitor mbean_id, config
-        end
-      end
-
-    end
-
-    class Invoker
-
-      def monitor
-        @monitor ||= BaseMonitor::new self
-        @monitor
-      end
-
-      def mbean id
-        monitor.mbean id
-      end
-
-      def get params
-        mbean = extract params
-        mbean[params[:property]]
-      end
-
-      def set params
-        mbean = extract params
-        mbean[params[:property]] = params[:value]
-      end
-
-      def invoke params
-        mbean = extract params
-        mbean.invoke params[:method], *params[:args]
-      end
-
-      def query params
-        mbean = extract params
-        execute :query, mbean.name, *params[:args]
-      end
-
-      def info params
-        mbean = extract params
-        execute :info, mbean.name, *params[:args]
-      end
-
-      private
-
-      def extract params
-        mbean = monitor.mbean params[:mbean]
-        mbean.with params[:name]
-      end
-
-    end
-
-  end
-
-end

data/lib/rboss/twiddle/mbean.rb

@@ -1,148 +0,0 @@
-#                         The MIT License
-#
-# Copyright (c) 2011-2012 Marcelo Guimarães <ataxexe@gmail.com>
-#
-# 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.
-
-require_relative 'twiddle'
-
-module RBoss
-  class MBean
-
-    attr_reader :pattern
-    attr_accessor :resource, :twiddle, :description
-
-    @@__detail__resourced__ = proc do |resources, &block|
-      resouces = parse_resource resources
-      details = {}
-      resouces.each do |resource|
-        with resource do
-          details[resource] = {}
-          @properties.each do |property|
-            details[resource][property] = self[property].value
-          end
-        end
-      end
-      details.each &block if block
-      details
-    end
-
-    @@__detail__ = proc do |&block|
-      details = {}
-      @properties.each do |property|
-        details[property] = self[property].value
-      end
-      details.each &block if block
-      details
-    end
-
-    def initialize params
-      @pattern = params[:pattern]
-      @twiddle = params[:twiddle]
-      @properties = params[:properties]
-      @description = params[:description]
-      if params[:scan]
-        (
-        class << self
-          self
-        end).send :define_method, :scan, &params[:scan]
-        (
-        class << self
-          self
-        end).send :define_method, :each do |&block|
-          scan.each &block
-        end
-      end
-      if params[:properties]
-        (
-        class << self
-          self
-        end).send :define_method,
-                  :detail,
-                  &(params[:scan] ?
-                    @@__detail__resourced__ : @@__detail__)
-      end
-    end
-
-    def with resource
-      @resource = resource
-      if block_given?
-        yield
-        @resource = nil
-      end
-      self
-    end
-
-    def name
-      if pattern['#{resource}'] and not @resource
-        domain, name = pattern.split ':'
-        name.gsub! /[^,]+\{resource\}/, ''
-        name << "," if name.empty?
-        name << "*"
-        return "#{domain}:#{name}"
-      end
-      resource = @resource
-      eval("\"#{pattern}\"")
-    end
-
-    def [] property
-      resource = @resource
-      query = eval("\"#{pattern}\"")
-      result = @twiddle.execute(:get, query, property)
-
-      def result.value
-        self.split( /=/, 2)[1]
-      end
-
-      result
-    end
-
-    def []= property, value
-      resource = @resource
-      query = eval("\"#{pattern}\"")
-      @twiddle.execute :set, query, property, value
-    end
-
-    def invoke method, *args, &block
-      resource = @resource
-      query = eval("\"#{pattern} #{method}\"")
-      return_value = @twiddle.execute :invoke, query, args
-      if block_given?
-        block.call return_value
-      end
-      return_value
-    end
-
-    def query query, &block
-      result = @twiddle.execute(:query, query)
-      return [] unless result
-      result = result.split /\s+/
-      block ? result.collect(&block) : result
-    end
-
-    def parse_resource resources
-      return scan if resources == :all
-      return [resources] unless resources.respond_to? :each
-      resources
-    end
-
-  end
-
-end
-

data/lib/rboss/twiddle/monitor.rb

@@ -1,222 +0,0 @@
-#                         The MIT License
-#
-# Copyright (c) 2011-2012 Marcelo Guimarães <ataxexe@gmail.com>
-#
-# 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.
-
-require_relative 'mbean'
-
-module RBoss
-  module Twiddle
-
-    module Monitor
-
-      def defaults
-        @@defaults ||= {
-          :webapp => {
-            :title => 'Deployed webapps',
-            :pattern => 'jboss.web:type=Manager,host=localhost,path=/#{resource}',
-            :properties => %W(activeSessions maxActive distributable maxActiveSessions
-                                    expiredSessions rejectedSessions),
-            :header => ["Active\nSessions", "Max\nSessions", "Distributable",
-                        "Max Active\nSession", "Expired\nSessions", "Rejected\nSessions"],
-            :format => {
-              :distributable => :boolean
-            },
-            :scan => proc do
-              query "jboss.web:type=Manager,*" do |path|
-                path.gsub!("jboss.web:type=Manager,path=/", "")
-                path.gsub!(/,host=.+/, '')
-                path
-              end
-            end
-          },
-          :web_deployment => {
-            :title => 'Deployed webapp control',
-            :pattern => 'jboss.web.deployment:war=/#{resource}'
-          },
-          :connector => {
-            :title => 'JBossWeb connector',
-            :pattern => 'jboss.web:type=ThreadPool,name=#{resource}',
-            :properties => %W(maxThreads currentThreadCount currentThreadsBusy),
-            :header => ['Max Threads', 'Current Threads', 'Busy Threads'],
-            :health => {
-              :current_threads => {
-                :percentage => {
-                  :max => :max_threads,
-                  :using => :current_threads
-                }
-              }
-            },
-            :scan => proc do
-              query "jboss.web:type=ThreadPool,*" do |path|
-                path.gsub "jboss.web:type=ThreadPool,name=", ""
-              end
-            end
-          },
-          :cached_connection_manager => {
-            :title => 'JBoss JCA cached connections',
-            :pattern => 'jboss.jca:service=CachedConnectionManager',
-            :properties => %W(InUseConnections),
-            :header => ['In Use Connections'],
-          },
-          :main_deployer => {
-            :title => 'Main Deployer',
-            :pattern => 'jboss.system:service=MainDeployer'
-          },
-          :engine => {
-            :title => 'JBossWeb engine',
-            :pattern => 'jboss.web:type=Engine',
-            :properties => %W(jvmRoute name defaultHost),
-            :header => ['JVM Route', 'Name', 'Default Host'],
-          },
-          :log4j => {
-            :title => 'JBoss Log4J Service',
-            :pattern => 'jboss.system:service=Logging,type=Log4jService',
-            :properties => %W(DefaultJBossServerLogThreshold),
-            :header => ['Default Server Log Threshold'],
-          },
-          :logger => {
-            :description => 'Logger Service',
-            :pattern => 'jboss.system:service=Logging,type=Logger'
-          },
-          :server => {
-            :title => 'JBoss Server specifications',
-            :pattern => 'jboss.system:type=Server',
-            :properties => %W(StartDate VersionName VersionNumber Version),
-            :layout => :vertical,
-            :header => ['Start Date', 'Version Name', 'Version Number', 'Version'],
-          },
-          :server_info => {
-            :title => 'JBoss Server runtime info',
-            :pattern => 'jboss.system:type=ServerInfo',
-            :properties => %W(ActiveThreadCount MaxMemory FreeMemory AvailableProcessors
-                                    JavaVendor JavaVersion OSName OSArch),
-            :header => ["Active Threads", "Max Memory", "Free Memory",
-                        "Processors", "Java Vendor", "Java Version", "OS Name", "OS Arch"],
-            :layout => :vertical,
-            :format => {
-              :max_memory => :byte,
-              :free_memory => :byte
-            },
-            :health => {
-              :free_memory => {
-                :percentage => {
-                  :max => :max_memory,
-                  :free => :free_memory
-                }
-              }
-            }
-          },
-          :server_config => {
-            :title => 'JBoss Server configuration',
-            :pattern => 'jboss.system:type=ServerConfig',
-            :properties => %W(ServerName HomeDir ServerLogDir ServerHomeURL),
-            :layout => :vertical,
-            :header => ['Server Name', 'Home Dir', 'Log Dir', 'Home URL'],
-          },
-          :system_properties => {
-            :title => 'System properties',
-            :pattern => 'jboss:name=SystemProperties,type=Service'
-          },
-          :request => {
-            :title => 'JBossWeb connector requests',
-            :pattern => 'jboss.web:type=GlobalRequestProcessor,name=#{resource}',
-            :properties => %W(requestCount errorCount maxTime),
-            :header => ['Requests', 'Errors', 'Max Time'],
-            :health => {
-              :errors => {
-                :percentage => {
-                  :max => :requests,
-                  :using => :errors
-                }
-              }
-            },
-            :scan => proc do
-              query "jboss.web:type=ThreadPool,*" do |path|
-                path.gsub "jboss.web:type=ThreadPool,name=", ""
-              end
-            end
-          },
-          :datasource => {
-            :title => 'Datasource',
-            :pattern => 'jboss.jca:service=ManagedConnectionPool,name=#{resource}',
-            :properties => %W(MinSize MaxSize AvailableConnectionCount
-                                      InUseConnectionCount ConnectionCount),
-            :header => ["Min\nSize", "Max\nSize", "Avaliable\nConnections",
-                        "In Use\nConnections", "Connection\nCount"],
-            :health => {
-              :in_use_connections => {
-                :percentage => {
-                  :max => :max_size,
-                  :using => :in_use_connections
-                }
-              }
-            },
-            :scan => proc do
-              query "jboss.jca:service=ManagedConnectionPool,*" do |path|
-                path.gsub "jboss.jca:service=ManagedConnectionPool,name=", ""
-              end
-            end
-          },
-          :queue => {
-            :title => 'JMS Queue',
-            :pattern => 'jboss.messaging.destination:service=Queue,name=#{resource}',
-            :properties => %W(JNDIName MessageCount DeliveringCount
-                    ScheduledMessageCount MaxSize FullSize Clustered ConsumerCount),
-            :header => ['JNDI Name', 'Messages', 'Deliveries', 'Scheduleded', 'Max Size',
-                        'Full Size', 'Clustered', 'Consumed'],
-            :scan => proc do
-              query "jboss.messaging.destination:service=Queue,*" do |path|
-                path.gsub "jboss.messaging.destination:service=Queue,name=", ""
-              end
-            end
-          },
-          :jndi => {
-            :title => 'JNDI View',
-            :pattern => 'jboss:service=JNDIView'
-          }
-        }
-      end
-
-      module_function :defaults
-
-      def mbeans
-        @mbeans ||= {}
-      end
-
-      def monitor(mbean_id, params)
-        mbeans[mbean_id] = RBoss::MBean::new params.merge(:twiddle => @twiddle)
-      end
-
-      def mbean(mbean_id)
-        mbean = mbeans[mbean_id]
-        return RBoss::MBean::new :pattern => mbean_id.to_s, :twiddle => @twiddle unless mbean
-        if @current_resource
-          mbean.with @current_resource
-        end
-        mbean
-      end
-
-    end
-
-  end
-
-end
-