openhab-jrubyscripting 5.0.0.rc1

data/lib/openhab/log.rb

@@ -0,0 +1,348 @@
+# frozen_string_literal: true
+
+require "forwardable"
+
+module OpenHAB
+  # rubocop:disable Layout/LineLength
+
+  #
+  # Provides access to the OpenHAB logging facilities using Ruby logging methods
+  #
+  # Logging is available everywhere through the {#logger} object.
+  #
+  # The logging prefix is `org.openhab.automation.jrubyscripting`.
+  # Logging within file-based rules will have the name of the file appended to
+  # the logger name. Logging inside of a rule will have the id of the rule
+  # appended to the logger name. Any classes will have the full class anem
+  # appended to the logger name.
+  #
+  # @example The following entries are in a file named 'log_test.rb'
+  #   logger.trace('Test logging at trace') # 2020-12-03 18:05:20.903 [TRACE] [org.openhab.automation.jrubyscripting.log_test] - Test logging at trace
+  #   logger.debug('Test logging at debug') # 2020-12-03 18:05:32.020 [DEBUG] [org.openhab.automation.jrubyscripting.log_test] - Test logging at debug
+  #   logger.warn('Test logging at warn')   # 2020-12-03 18:05:41.817 [WARN ] [org.openhab.automation.jrubyscripting.log_test] - Test logging at warn
+  #   logger.info('Test logging at info')   # 2020-12-03 18:05:41.817 [INFO ] [org.openhab.automation.jrubyscripting.log_test] - Test logging at info
+  #   logger.error('Test logging at error') # 2020-12-03 18:06:02.021 [ERROR] [org.openhab.automation.jrubyscripting.log_test] - Test logging at error
+  #
+  # @example The following entries are in a file named 'log_test.rb'
+  #   rule 'foo' do
+  #     run { logger.trace('Test logging at trace') } # 2020-12-03 18:05:20.903 [TRACE] [org.openhab.automation.jrubyscripting.foo] - Test logging at trace
+  #     on_start
+  #   end
+  #
+  #
+  # @example A log entry from inside a class
+  #   class MyClass
+  #     def initialize
+  #       logger.trace("hi!") # 2020-12-03 18:05:20.903 [TRACE] [org.openhab.automation.jrubyscripting.MyClass] - hi!
+  #     end
+  #   end
+  #
+  module Log
+    # rubocop:enable Layout/LineLength
+
+    # @!visibility private
+    def self.included(base)
+      return if base.singleton_class?
+
+      base.singleton_class.include(self)
+    end
+
+    protected
+
+    #
+    # Retrieve the {Logger} for this class.
+    #
+    # @return [Logger]
+    #
+    def logger
+      # no caching on `main`
+      if (instance_of?(Object) && !singleton_methods.empty?) ||
+         # also pretend loggers in example groups are in the top-level
+         (defined?(::RSpec::Core::ExampleGroup) && is_a?(Module) && self < ::RSpec::Core::ExampleGroup)
+        return Log.logger(:main)
+      end
+      return @logger ||= Log.logger(self) if equal?(self.class) || is_a?(Module)
+
+      self.class.logger
+    end
+
+    @loggers = {}
+    class << self
+      #
+      # Retrieve a {Logger} for a particular object.
+      #
+      # @param [Module,String] object Object the logger is for, or explicit name of the logger.
+      # @return [Logger]
+      #
+      def logger(object)
+        case object
+        when Module
+          name = Logger::PREFIX
+          klass = java_klass(object)
+          name += ".#{klass.name.gsub("::", ".")}" if klass.name
+        when String
+          name = object
+        when :main
+          name = "#{Logger::PREFIX}.#{rules_file.tr_s(":", "_")
+                                   .gsub(/[^A-Za-z0-9_.-]/, "")}"
+          return @loggers[name] ||= BiLogger.new(Logger.new(name))
+        end
+
+        @loggers[name] ||= Logger.new(name)
+      end
+
+      private
+
+      # Get the appropriate java class for the supplied klass if the supplied
+      # class is a java class
+      # @param [Class] klass to inspect
+      # @return Class or Java class of supplied class
+      def java_klass(klass)
+        if klass.respond_to?(:java_class) &&
+           klass.java_class &&
+           !klass.java_class.name.start_with?("org.jruby.Ruby") &&
+           !klass.java_class.name.start_with?("org.jruby.gen")
+          klass = klass.java_class
+        end
+        klass
+      end
+
+      #
+      # Figure out the log prefix
+      #
+      # @return [String] Prefix for log messages
+      #
+      def rules_file
+        caller_locations(3, 2).map(&:path)
+                              .grep_v(%r{lib/openhab/log\.rb})
+                              .first
+                              .then { |caller| File.basename(caller, ".*") if caller }
+      end
+    end
+  end
+
+  #
+  # Ruby Logger that forwards messages at appropriate levels to OpenHAB Logger
+  #
+  class Logger
+    # The base prefix for all loggers from this gem.
+    PREFIX = "org.openhab.automation.jrubyscripting"
+
+    # @return [Array<symbol>] Supported logging levels
+    LEVELS = %i[trace debug warn info error].freeze
+
+    #
+    # Regex for matching internal calls in a stack trace
+    #
+    INTERNAL_CALL_REGEX = %r{(openhab-jrubyscripting-.*/lib)|org[./]jruby}.freeze
+    private_constant :INTERNAL_CALL_REGEX
+
+    #
+    # Regex for matching internal calls in a java stack trace
+    #
+    EXCLUDED_JAVA_PACKAGES = /jdk\.internal\.reflect|java\.lang\.reflect|org\.openhab|java\.lang\.Thread\.run/.freeze
+    private_constant :EXCLUDED_JAVA_PACKAGES
+
+    #
+    # Regex for matching internal calls in a java stack trace
+    #
+    JAVA_INTERNAL_CALL_REGEX = Regexp.union(INTERNAL_CALL_REGEX, EXCLUDED_JAVA_PACKAGES).freeze
+    private_constant :JAVA_INTERNAL_CALL_REGEX
+
+    class << self
+      # The root logger (all of OpenHAB)
+      # @return [Logger]
+      def root
+        Log.logger(org.slf4j.Logger::ROOT_LOGGER_NAME)
+      end
+
+      # The root logger for this gem
+      # @return [Logger]
+      def gem_root
+        Log.logger(PREFIX)
+      end
+
+      # The events logger (events.log)
+      # @return [Logger]
+      def events
+        Log.logger("openhab.event")
+      end
+
+      # @!visibility private
+      def log_service
+        @log_service = OSGi.service("org.apache.karaf.log.core.LogService")
+      end
+
+      private
+
+      # @!macro def_level_method
+      #   @!method $1(msg = nil)
+      #
+      #   Log a message at $1 level.
+      #
+      #   @param msg [Object, nil] The log message
+      #   @yield
+      #     Pass a block to delay generating the log message until it's
+      #     confirmed that logging is enabled at $1 level.
+      #   @yieldreturn [Object, nil] The log message
+      #   @return [void]
+      #
+      #   @example
+      #     logger.$1 do
+      #       total = Item1.state + Item2.state
+      #       average = total / 2
+      #     "Total: #{total}, Average: #{average}"
+      #     end
+      #
+      def def_level_method(level)
+        define_method(level) do |msg = nil, &block|
+          log(severity: level, msg: msg, &block)
+        end
+      end
+
+      # @!macro def_level_predicate
+      #   @!method $1?
+      #
+      #   If the logger is enabled at $1 level.
+      #
+      #   @return [true,false]
+      #
+      def def_level_predicate(level)
+        define_method("#{level}?") { @slf4j_logger.send("is_#{level}_enabled") }
+      end
+    end
+
+    # @!visibility private
+    #
+    # Create a new logger
+    #
+    # @param [String] name of the logger
+    #
+    def initialize(name)
+      @slf4j_logger = org.slf4j.LoggerFactory.getLogger(name)
+    end
+
+    # The logger name
+    # @return [String]
+    def name
+      @slf4j_logger.name
+    end
+
+    # @return [String]
+    def inspect
+      "#<OpenHAB::Logger #{name}>"
+    end
+    alias_method :to_s, :inspect
+
+    # @!attribute [rw] level
+    # @return [:error,:warn,:info,:debug,:trace] The current log level
+    def level
+      Logger.log_service.get_level(name)[name]&.downcase&.to_sym
+    end
+
+    def level=(level)
+      Logger.log_service.set_level(name, level.to_s)
+    end
+
+    def_level_method(:error)
+    def_level_predicate(:error)
+    def_level_method(:warn)
+    def_level_predicate(:warn)
+    def_level_method(:info)
+    def_level_predicate(:info)
+    def_level_method(:debug)
+    def_level_predicate(:debug)
+    def_level_method(:trace)
+    def_level_predicate(:trace)
+
+    #
+    # Print error and stack trace without calls to internal classes
+    #
+    # @param [Exception] exception A rescued error
+    # @return [void]
+    #
+    def log_exception(exception)
+      exception = clean_backtrace(exception)
+      error do
+        "#{exception.message} (#{exception.class})\n#{name}#{exception.backtrace&.join("\n")}"
+      end
+    end
+
+    private
+
+    #
+    # Cleans the backtrace of an error to remove internal calls. If logging is set
+    # to debug or lower, the full backtrace is kept
+    #
+    # @param [Exception] error An exception to be cleaned
+    #
+    # @return [Exception] the exception, potentially with a cleaned backtrace.
+    #
+    def clean_backtrace(error)
+      return error if debug?
+
+      if error.respond_to? :backtrace_locations
+        backtrace = error.backtrace_locations.map(&:to_s).grep_v(INTERNAL_CALL_REGEX)
+        error.set_backtrace(backtrace)
+      elsif error.respond_to? :stack_trace
+        backtrace = error.stack_trace.reject { |line| JAVA_INTERNAL_CALL_REGEX.match? line.to_s }
+        error.set_stack_trace(backtrace)
+      end
+      error
+    end
+
+    #
+    # Log a message to the OpenHAB Logger
+    #
+    # @param [Symbol] severity Severity to log message at
+    # @param [Object] msg to log, if no msg supplied and a block is provided,
+    #   the msg is taken from the result of the block
+    #
+    def log(severity:, msg: nil)
+      raise ArgumentError, "Unknown Severity #{severity}" unless LEVELS.include? severity
+
+      # Dynamically check enablement of underlying logger
+      return unless send("#{severity}?")
+
+      # Process block if no message provided
+      msg = yield if msg.nil? && block_given?
+
+      @slf4j_logger.send(severity, msg.to_s)
+    end
+  end
+
+  module Log
+    # Logger that changes its backing logger depending on thread context
+    class BiLogger < Logger
+      @rule_loggers = {}
+      class << self
+        # class shared cache of loggers-per-rule
+        attr_reader :rule_loggers
+      end
+
+      def initialize(file_logger) # rubocop:disable Lint/MissingSuper
+        @file_logger = file_logger
+      end
+
+      # The current logger - the file logger if rule_uid is nil,
+      # otherwise a logger specific to the rule.
+      def current_logger
+        return @file_logger unless (rule_uid = Thread.current[:openhab_rule_uid])
+
+        rule_type = Thread.current[:openhab_rule_type]
+        full_id = "#{rule_type}:#{rule_uid}"
+
+        self.class.rule_loggers[full_id] ||= Logger.new("#{Logger::PREFIX}.#{rule_type}.#{rule_uid.tr_s(":", "_")
+            .gsub(/[^A-Za-z0-9_.-]/, "")}")
+      end
+
+      extend Forwardable
+      def_delegators :current_logger, *(Logger.public_instance_methods.select do |m|
+        Logger.instance_method(m).owner == Logger
+      end - BasicObject.public_instance_methods)
+    end
+    private_constant :BiLogger
+  end
+
+  Object.include(Log)
+end

data/lib/openhab/osgi.rb

@@ -0,0 +1,70 @@
+# frozen_string_literal: true
+
+module OpenHAB
+  #
+  # OSGi services interface
+  #
+  module OSGi
+    class << self
+      #
+      # @param name [String] The service name
+      # @param filter [String] Filter for service names. See https://docs.osgi.org/javadoc/r4v43/core/org/osgi/framework/Filter.html
+      #
+      # @return [Object]
+      #
+      def service(name, filter: nil)
+        services(name, filter: filter).first
+      end
+
+      #
+      # @param name [String] The service name
+      # @param filter [String] Filter for service names. See https://docs.osgi.org/javadoc/r4v43/core/org/osgi/framework/Filter.html
+      #
+      # @return [Array<Object>] An array of services
+      #
+      def services(name, filter: nil)
+        (bundle_context.get_service_references(name, filter) || []).map do |reference|
+          logger.trace "OSGi service found for '#{name}' using OSGi Service Reference #{reference}"
+          bundle_context.get_service(reference)
+        end
+      end
+
+      #
+      # Register a new service instance with OSGi
+      #
+      # @param [Object] instance The service instance
+      # @param [Module] interfaces The interfaces to register this service for.
+      #   If not provided, it will default to all Java interfaces the instance
+      #   implements.
+      # @param [Hash] properties The service registration properties.
+      # @return [org.osgi.framework.ServiceRegistration]
+      #
+      def register_service(instance, *interfaces, **properties)
+        if interfaces.empty?
+          interfaces = instance.class.ancestors.select { |k| k.respond_to?(:java_class) && k.java_class&.interface? }
+        end
+
+        bundle = org.osgi.framework.FrameworkUtil.get_bundle(interfaces.first)
+        bundle.bundle_context.register_service(
+          interfaces.map(&:java_class).map(&:name).to_java(java.lang.String),
+          instance,
+          java.util.Hashtable.new(properties)
+        )
+      end
+
+      private
+
+      # @!attribute [r] bundle_context
+      # @return [org.osgi.framework.BundleContext] OSGi bundle context
+      def bundle_context
+        @bundle_context ||= bundle.bundle_context
+      end
+
+      # @!attribute [r] bundle
+      # @return [org.osgi.framework.Bundle] The OSGi Bundle for ScriptExtension Class
+      def bundle
+        @bundle ||= org.osgi.framework.FrameworkUtil.getBundle($scriptExtension.class)
+      end
+    end
+  end
+end

data/lib/openhab/rspec/configuration.rb

@@ -0,0 +1,56 @@
+# frozen_string_literal: true
+
+module OpenHAB
+  module RSpec
+    #
+    # Contains configuration for how the OpenHAB instance should be set
+    # up for the testing environment.
+    #
+    module Configuration
+      class << self
+        #
+        # Copy binding configuration from the root OpenHAB instance.
+        #
+        # Default `true`.
+        # @return [true, false]
+        #
+        attr_accessor :include_bindings
+
+        #
+        # Copy the JSONDB (managed thing and item configuration) from the root
+        # OpenHAB instance.
+        #
+        # Default `true`.
+        #
+        # @return [true, false]
+        #
+        attr_accessor :include_jsondb
+
+        #
+        # Use a private (empty) confdir (scripts, rules, items, and things
+        # files), instead of sharing with the root OpenHAB instance.
+        #
+        # Default `false`.
+        #
+        # @return [true, false]
+        #
+        attr_accessor :private_confdir
+
+        #
+        # Use the root OpenHAB instance directly, rather than creating a
+        # private (but linked) instance.
+        #
+        # Default `false`.
+        #
+        # @return [true, false]
+        #
+        attr_accessor :use_root_instance
+      end
+
+      self.include_bindings = true
+      self.include_jsondb = true
+      self.private_confdir = false
+      self.use_root_instance = false
+    end
+  end
+end

data/lib/openhab/rspec/example_group.rb

@@ -0,0 +1,90 @@
+# frozen_string_literal: true
+
+module OpenHAB
+  module RSpec
+    # ::RSpec::ExampleGroup extensions
+    module ExampleGroup
+      # Extensions for ::RSpec::ExampleGroup's singleton class.
+      module ClassMethods
+        # @!attribute [w] mock_timers
+        #
+        # Set if timers should be mocked for this example group.
+        #
+        # @param value [true, false, nil]
+        # @return [true, false, nil]
+        #
+        # @example
+        #   describe "my_rule" do
+        #     self.mock_timers = false
+        #
+        #     it "runs a timer" do
+        #       expect(self.class.mock_timers?).to be false
+        #     end
+        #   end
+        #
+        def mock_timers=(value)
+          @mock_timers = value
+        end
+
+        #
+        # If timers are mocked for this example group
+        #
+        # It will search through parent groups until it finds one where it's
+        # explicitly defined, or defaults to `true` if none are.
+        #
+        # @return [true, false]
+        #
+        def mock_timers?
+          return @mock_timers if instance_variable_defined?(:@mock_timers) && !@mock_timers.nil?
+          return superclass.mock_timers? if superclass.is_a?(ClassMethods)
+
+          true
+        end
+
+        # @!attribute [w] consistent_proxies
+        #
+        # Set if Items and Thing proxies should return consistent objects.
+        #
+        # @param value [true, false, nil]
+        # @return [true, false, nil]
+        #
+        # @example
+        #   describe "my_rule" do
+        #     self.consistent_proxies = false
+        #
+        #     it "does something" do
+        #       expect(self.class.consistent_proxies?).to be false
+        #     end
+        #   end
+        #
+        # @see #consistent_proxies?
+        #
+        def consistent_proxies=(value)
+          @consistent_proxies = value
+        end
+
+        #
+        # If Item and Thing proxies will consistently return the same object.
+        #
+        # Useful for mocking and using the `be` matcher.
+        #
+        # It will search through parent groups until it finds one where it's
+        # explicitly defined, or defaults to `true` if none are.
+        #
+        # @return [true, false]
+        #
+        def consistent_proxies?
+          return @consistent_proxies if instance_variable_defined?(:@consistent_proxies) && !@consistent_proxies.nil?
+          return superclass.consistent_proxies? if superclass.is_a?(ClassMethods)
+
+          true
+        end
+      end
+
+      # @!visibility private
+      def self.included(klass)
+        klass.singleton_class.include(ClassMethods)
+      end
+    end
+  end
+end