rmonitor 1.0.1 → 2.0.0

data/lib/rmonitor/capabilities/builder.rb

@@ -0,0 +1,15 @@
+require "rmonitor/capabilities/dsl"
+
+class RMonitor
+  class Capabilities
+    class Builder
+      class << self
+        def define(&block)
+          dsl = RMonitor::Capabilities::DSL.new
+          dsl.instance_eval(&block)
+          dsl.capabilities
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/capabilities/dsl.rb

@@ -0,0 +1,15 @@
+class RMonitor
+  class Capabilities
+    class DSL
+      attr_accessor :capabilities
+
+      def initialize
+        @capabilities = []
+      end
+
+      def device(name, options = {})
+        @capabilities << options.merge(:name => name)
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/cl/base.rb

@@ -0,0 +1,13 @@
+class RMonitor
+  module Commands
+    module CL
+      class Base
+        def initialize(options = {})
+          @options = options
+          @out = options[:out] || $stdout
+          @err = options[:err] || $stderr
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/cl/invoke.rb

@@ -0,0 +1,22 @@
+require "rmonitor/commands/invoke"
+
+class RMonitor
+  module Commands
+    module CL
+      class Invoke
+        def initialize(options = {})
+          @err = options[:err] || $stderr
+          @invoke = options[:invoke] || RMonitor::Commands::Invoke.new(options)
+        end
+
+        def execute(name)
+          @invoke.execute(name)
+        rescue RMonitor::UnknownProfileError
+          @err.puts "unknown profile"
+        rescue RMonitor::UninvokableProfileError
+          @err.puts "profile is not invokable"
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/cl/list.rb

@@ -0,0 +1,43 @@
+require "rmonitor/commands/list"
+
+class RMonitor
+  module Commands
+    module CL
+      class List
+        def initialize(options = {})
+          @out = options[:out] || $stdout
+          @list = options[:list] || RMonitor::Commands::List.new(options)
+          @matcher = options[:matcher] || RMonitor::Matcher.new(options)
+        end
+
+        def execute
+          profiles = @list.execute
+
+          profiles.each do |profile|
+            @out.write("#{profile[:name]}\t")
+
+            if @matcher.invokable?(profile)
+              @out.write("invokable")
+            else
+              @out.write("uninvokable")
+            end
+
+            profile[:devices].each do |device|
+              @out.write("\t#{device[:name]}")
+
+              if device[:mode] && device[:rate]
+                @out.write(" (#{device[:mode]} #{device[:rate]})")
+              elsif device[:mode]
+                @out.write(" (#{device[:mode]})")
+              elsif device[:rate]
+                @out.write(" (#{device[:rate]})")
+              end
+            end
+
+            @out.write("\n")
+          end
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/cl/update.rb

@@ -0,0 +1,20 @@
+require "rmonitor/commands/update"
+
+class RMonitor
+  module Commands
+    module CL
+      class Update
+        def initialize(options = {})
+          @err = options[:err] || $stderr
+          @update = options[:update] || RMonitor::Commands::Update.new(options)
+        end
+
+        def execute
+          @update.execute
+        rescue RMonitor::NoInvokableProfileError
+          @err.puts "no invokable profile"
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/invoke.rb

@@ -0,0 +1,23 @@
+class RMonitor
+  module Commands
+    class Invoke
+      def initialize(options = {})
+        @profiles = options[:profiles] || Config.new.profiles
+        @matcher = options[:matcher] || Matcher.new(options)
+        @strategy = options[:strategy] || Strategies::Pessimistic.new(options)
+        @factory = options[:factory] || Actions.new(options)
+      end
+
+      def execute(name)
+        profile = @profiles.find { |p| p[:name] == name }
+
+        raise UnknownProfileError unless profile
+        raise UninvokableProfileError unless @matcher.invokable?(profile)
+
+        actions = @factory.create(profile)
+
+        @strategy.execute(actions)
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/list.rb

@@ -0,0 +1,13 @@
+class RMonitor
+  module Commands
+    class List
+      def initialize(options = {})
+        @profiles = options[:profiles] || Config.new.profiles
+      end
+
+      def execute
+        @profiles
+      end
+    end
+  end
+end

data/lib/rmonitor/commands/update.rb

@@ -0,0 +1,18 @@
+class RMonitor
+  module Commands
+    class Update
+      def initialize(options = {})
+        @invoke = options[:invoke] || Invoke.new(options)
+        @selector = options[:selector] || Selector.new(options)
+      end
+
+      def execute
+        profile = @selector.first_invokable
+
+        raise NoInvokableProfileError unless profile
+
+        @invoke.execute(profile[:name])
+      end
+    end
+  end
+end

data/lib/rmonitor/config.rb

@@ -0,0 +1,27 @@
+require "rmonitor/config/builder"
+
+class RMonitor
+  class Config
+    def profiles
+      Builder.define read
+    end
+
+    def read
+      File.read self.class.config_path
+    end
+
+    class << self
+      attr_writer :config_path
+
+      def config_path
+        @config_path || default_config_path
+      end
+
+      private
+
+      def default_config_path
+        File.join(Dir.home, ".config", "rmonitor", "config.rb")
+      end
+    end
+  end
+end

data/lib/rmonitor/config/builder.rb

@@ -0,0 +1,21 @@
+require "rmonitor/config/dsl"
+
+class RMonitor
+  class Config
+    class Builder
+      class << self
+        def define(input = nil, &block)
+          dsl = RMonitor::Config::DSL.new
+
+          if input
+            dsl.instance_eval(input)
+          else
+            dsl.instance_eval(&block)
+          end
+
+          dsl.profiles
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/config/dsl.rb

@@ -0,0 +1,25 @@
+require "rmonitor/profile/builder"
+
+class RMonitor
+  class Config
+    class DSL
+      attr_accessor :profiles
+
+      def initialize
+        @profiles = []
+      end
+
+      def profile(name, options = {}, &block)
+        @profiles << RMonitor::Profile::Builder.define(name, options, &block)
+
+        if @profiles.last.has_key?(:only_if)
+          @profiles.last[:only_if] = method(@profiles.last[:only_if])
+        end
+
+        if @profiles.last.has_key?(:not_if)
+          @profiles.last[:not_if] = method(@profiles.last[:not_if])
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/invoker.rb

@@ -0,0 +1,9 @@
+class RMonitor
+  class Invoker
+    def initialize(*); end
+
+    def invoke(command)
+      Kernel.`(command)
+    end
+  end
+end

data/lib/rmonitor/matcher.rb

@@ -0,0 +1,32 @@
+class RMonitor
+  class Matcher
+    def initialize(options = {})
+      @capabilities = options[:capabilities] || Capabilities.new(options).parse
+    end
+
+    def invokable?(profile)
+      return false if profile.has_key?(:only_if) && !profile[:only_if].call
+      return false if profile.has_key?(:not_if) && profile[:not_if].call
+
+      profile[:devices].all? do |device|
+        has_desired_capability? device
+      end
+    end
+
+    private
+
+    def has_desired_capability?(desire)
+      @capabilities.any? do |capability|
+        match_desire_capability?(desire, capability)
+      end
+    end
+
+    def match_desire_capability?(desire, capability)
+      return false if desire[:name] != capability[:name]
+      return false if desire[:mode] && desire[:mode] != capability[:mode]
+      return false if desire[:rate] && desire[:rate] != capability[:rate]
+
+      true
+    end
+  end
+end

data/lib/rmonitor/profile/builder.rb

@@ -0,0 +1,15 @@
+require "rmonitor/profile/dsl"
+
+class RMonitor
+  module Profile
+    class Builder
+      class << self
+        def define(name, options = {}, &block)
+          dsl = RMonitor::Profile::DSL.new
+          dsl.instance_eval &block
+          options.merge :name => name, :devices => dsl.devices
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/profile/dsl.rb

@@ -0,0 +1,15 @@
+class RMonitor
+  module Profile
+    class DSL
+      attr_accessor :devices
+
+      def initialize
+        @devices = []
+      end
+
+      def device(name, options = {})
+        @devices << options.merge(:name => name)
+      end
+    end
+  end
+end

data/lib/rmonitor/selector.rb

@@ -0,0 +1,14 @@
+class RMonitor
+  class Selector
+    def initialize(options = {})
+      @profiles = options[:profiles] || Config.new.profiles
+      @matcher = options[:matcher] || Matcher.new(options)
+    end
+
+    def first_invokable
+      @profiles.find do |profile|
+        @matcher.invokable? profile
+      end
+    end
+  end
+end

data/lib/rmonitor/strategies/base.rb

@@ -0,0 +1,10 @@
+class RMonitor
+  module Strategies
+    class Base
+      def initialize(options = {})
+        @xrandr = options[:xrandr] || XRandR.new(options)
+        @transformer = options[:transformer] || Transformer.new
+      end
+    end
+  end
+end

data/lib/rmonitor/strategies/optimistic.rb

@@ -0,0 +1,15 @@
+require "rmonitor/strategies/base"
+
+class RMonitor
+  module Strategies
+    class Optimistic < Base
+      def execute(actions)
+        transformations = actions.map do |action|
+          @transformer.transform(action)
+        end
+
+        @xrandr.invoke(*transformations.flatten)
+      end
+    end
+  end
+end

data/lib/rmonitor/strategies/pessimistic.rb

@@ -0,0 +1,17 @@
+require "rmonitor/strategies/base"
+
+class RMonitor
+  module Strategies
+    class Pessimistic < Base
+      def execute(actions)
+        transformations = actions.map do |action|
+          @transformer.transform(action)
+        end
+
+        transformations.each do |transformation|
+          @xrandr.invoke(*transformation)
+        end
+      end
+    end
+  end
+end

data/lib/rmonitor/transformer.rb

@@ -0,0 +1,38 @@
+class RMonitor
+  class Transformer
+    def transform(action)
+      case action.delete(:action)
+        when :off
+          transform_off(action)
+        when :on
+          transform_on(action)
+        when :option
+          transforn_option(action)
+      end
+    end
+
+    private
+
+    def transform_on(action)
+      args = ["--output", action.delete(:name)]
+
+      action.each do |key, value|
+        args << "--#{key.to_s.gsub("_", "-")}"
+
+        unless value.is_a?(TrueClass)
+          args << value.to_s
+        end
+      end
+
+      args
+    end
+
+    def transform_off(action)
+      ["--output", action.delete(:name), "--off"]
+    end
+
+    def transforn_option(action)
+      ["--#{action[:name].to_s.gsub("_", "-")}", action[:value].to_s]
+    end
+  end
+end