rmonitor 1.0.0

data/spec/lib/helpers/xrandr_read_helpers_spec.rb

@@ -0,0 +1,259 @@
+require 'rmonitor/helpers/xrandr_read_helpers'
+
+describe RMonitor::XRandRReadHelpers do
+  include RMonitor::XRandRReadHelpers
+
+  describe :split_blocks do
+    it "should split each block" do
+      device_data = <<-X.strip_heredoc
+        Screen 0: minimum 320 x 200, current 3840 x 1080, maximum 8192 x 8192
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+        VGA1 disconnected (normal left inverted right x axis y axis)
+      X
+
+      split_blocks(device_data).should == [<<-X1.strip_heredoc, <<-X2.strip_heredoc, <<-X3.strip_heredoc]
+        Screen 0: minimum 320 x 200, current 3840 x 1080, maximum 8192 x 8192
+      X1
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X2
+        VGA1 disconnected (normal left inverted right x axis y axis)
+      X3
+    end
+  end
+
+  describe :collect_devices do
+    it "should filter out blocks not representing a device" do
+      blocks = [<<-X1.strip_heredoc, <<-X2.strip_heredoc, <<-X3.strip_heredoc]
+        Screen 0: minimum 320 x 200, current 3840 x 1080, maximum 8192 x 8192
+      X1
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X2
+        VGA1 disconnected (normal left inverted right x axis y axis)
+      X3
+
+      collect_devices(blocks) == [<<-X1.strip_heredoc, <<-X2.strip_heredoc]
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X1
+        VGA1 disconnected (normal left inverted right x axis y axis)
+      X2
+    end
+  end
+
+  describe :extract_name do
+    it "should extract the name from a device block" do
+      block = <<-X.strip_heredoc
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X
+
+      extract_name(block).should == "LVDS1"
+    end
+  end
+
+  describe :extract_pos do
+    context "with an disabled device" do
+      it "should return nil" do
+        block = <<-X.strip_heredoc
+          VGA1 disconnected (normal left inverted right x axis y axis)
+        X
+
+        extract_pos(block).should == nil
+      end
+    end
+
+    context "with an enabled device" do
+      it "should return the position" do
+        block = <<-X.strip_heredoc
+          HDMI2 connected 1920x1080+1920+0 (normal left inverted right x axis y axis) 477mm x 268mm
+             1920x1080      60.0*+
+             1280x1024      75.0     60.0
+             1152x864       75.0
+             1024x768       75.1     60.0
+        X
+
+        extract_pos(block).should == "1920x0"
+      end
+    end
+
+    context "with an enabled and disconncted device" do
+      it "should return the position" do
+        block = <<-X.strip_heredoc
+          HDMI2 disconnected 1920x1080+1920+0 (normal left inverted right x axis y axis) 477mm x 268mm
+        X
+
+        extract_pos(block).should == "1920x0"
+      end
+    end
+  end
+
+  describe :extract_enabled do
+    it "should return false if the device is disabled" do
+      block = <<-X.strip_heredoc
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X
+
+      extract_enabled(block).should be_false
+    end
+
+    it "should return true if the device is enabled" do
+      block = <<-X.strip_heredoc
+        HDMI1 connected 1920x1080+0+0 (normal left inverted right x axis y axis) 477mm x 268mm
+           1920x1080      60.0*+
+           1280x1024      75.0     60.0
+           1152x864       75.0
+           1024x768       75.1     60.0
+      X
+
+      extract_enabled(block).should be_true
+    end
+  end
+
+  describe :extract_connected do
+    it "should return false if the device is disconnected" do
+      block = <<-X.strip_heredoc
+        VGA1 disconnected (normal left inverted right x axis y axis)
+      X
+
+      extract_connected(block).should be_false
+    end
+
+    it "should return true if the device is connected" do
+      block = <<-X.strip_heredoc
+        LVDS1 connected (normal left inverted right x axis y axis)
+           1280x800       60.0 +
+           1024x768       60.0
+           800x600        60.3     56.2
+           640x480        59.9
+      X
+
+      extract_connected(block).should be_true
+    end
+  end
+
+  describe :extract_configuration do
+    context "with no current configuration" do
+      it "should return nil" do
+        block = <<-X.strip_heredoc
+          LVDS1 connected (normal left inverted right x axis y axis)
+             1280x800       60.0 +
+             1024x768       60.0
+             800x600        60.3
+             640x480        59.9
+        X
+
+        extract_configuration(block).should == nil
+      end
+    end
+
+    context "with a current configuration" do
+      it "should return the current configuration" do
+        block = <<-X.strip_heredoc
+          HDMI1 connected 1920x1080+0+0 (normal left inverted right x axis y axis) 477mm x 268mm
+             1920x1080      60.0*+
+             1280x1024      75.0     60.0
+             1152x864       75.0
+             1024x768       75.1     60.0
+        X
+
+        extract_configuration(block).should == { :mode => "1920x1080",
+                                                 :rate => "60.0" }
+      end
+    end
+
+    context "with a current configuration containing a rate with more than one decimal" do
+      it "should return the current configuration" do
+        block = <<-X.strip_heredoc
+            HDMI1 connected 1920x1080+0+0 (normal left inverted right x axis y axis) 477mm x 268mm
+               1920x1080      60.05*+
+               1280x1024      75.0     60.0
+               1152x864       75.0
+               1024x768       75.1     60.0
+        X
+
+        extract_configuration(block).should == { :mode => "1920x1080",
+                                                 :rate => "60.05" }
+      end
+    end
+  end
+
+  describe :extract_configurations do
+    context "with no configurations" do
+      it "should return an empty array" do
+        block = <<-X.strip_heredoc
+          VGA1 disconnected (normal left inverted right x axis y axis)
+        X
+
+        extract_configurations(block).should == []
+      end
+    end
+
+    context "with multiple modes" do
+      it "should return all possible configurations" do
+        block = <<-X.strip_heredoc
+          LVDS1 connected (normal left inverted right x axis y axis)
+             1280x800       60.0 +
+             1024x768       60.0
+             800x600        60.3
+             640x480        59.9
+        X
+
+        extract_configurations(block).should == [{ :mode => '1280x800', :rate => '60.0' },
+                                                 { :mode => '1024x768', :rate => '60.0' },
+                                                 { :mode => '800x600',  :rate => '60.3' },
+                                                 { :mode => '640x480',  :rate => '59.9' }]
+      end
+    end
+
+    context "with multiple rates per mode" do
+      it "should return all possible configurations" do
+        block = <<-X.strip_heredoc
+          LVDS1 connected (normal left inverted right x axis y axis)
+             1280x800       60.0 +
+             1024x768       60.0
+             800x600        60.3     56.2
+             640x480        59.9
+        X
+
+        extract_configurations(block).should == [{ :mode => '1280x800', :rate => '60.0' },
+                                                 { :mode => '1024x768', :rate => '60.0' },
+                                                 { :mode => '800x600',  :rate => '60.3' },
+                                                 { :mode => '800x600',  :rate => '56.2' },
+                                                 { :mode => '640x480',  :rate => '59.9' }]
+      end
+    end
+
+    context "with rates containing more than one decimal" do
+      it "should return all possible configurations" do
+        block = <<-X.strip_heredoc
+            LVDS1 connected (normal left inverted right x axis y axis)
+               1280x800       60.05
+        X
+
+        extract_configurations(block).should == [{ :mode => '1280x800', :rate => '60.05' }]
+      end
+    end
+  end
+end

data/spec/lib/helpers/xrandr_write_helpers_spec.rb

@@ -0,0 +1,158 @@
+require 'rmonitor/helpers/xrandr_write_helpers'
+
+describe RMonitor::XRandRWriteHelpers do
+  include RMonitor::XRandRWriteHelpers
+
+  describe :turn_off do
+    it "should return an appropriate XRandR directive for turning off a device" do
+      turn_off("HDMI1").should == "--output HDMI1 --off"
+    end
+  end
+
+  describe :turn_on do
+    it "should return a XRandR directive containing mode and rate when nothing else is specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+      }
+
+      turn_on("HDMI1", options).should ==
+          "--output HDMI1 --mode 1920x1080 --rate 60.0"
+    end
+
+    it "should return a XRandR directive containing --pos when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :pos => "1920x0",
+      }
+
+      turn_on("HDMI1", options).should ==
+          "--output HDMI1 --mode 1920x1080 --rate 60.0 --pos 1920x0"
+    end
+
+    it "should return a XRandR directive containing --left-of when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :left_of => "HDMI1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --left-of HDMI1"
+    end
+
+    it "should return a XRandR directive containing --right-of when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :right_of => "HDMI1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --right-of HDMI1"
+    end
+
+    it "should return a XRandR directive containing --above when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :above => "HDMI1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --above HDMI1"
+    end
+
+    it "should return a XRandR directive containing --below when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :below => "HDMI1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --below HDMI1"
+    end
+
+    it "should return a XRandR directive containing --same-as when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :same_as => "LVDS1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --same-as LVDS1"
+    end
+
+    it "should return a XRandR directive containing only one option specifying placement when given multiple" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :pos => "1920x0",
+          :left_of => "HDMI1",
+          :right_of => "HDMI1",
+          :above => "HDMI1",
+          :same_as => "LVDS1",
+          :below => "HDMI1",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --pos 1920x0"
+    end
+
+    it "should return a XRandR directive containing --primary when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :primary => true,
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --primary"
+    end
+
+    it "should return a XRandR directive containing --rotate when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :rotate => "normal",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --rotate normal"
+    end
+
+    it "should raise an exception if a wrong --rotate directive is specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :rotate => "this does not exist",
+      }
+
+      lambda { turn_on("HDMI2", options) }.should raise_error
+    end
+
+    it "should return a XRandR directive containing --reflect when specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :reflect => "normal",
+      }
+
+      turn_on("HDMI2", options).should ==
+          "--output HDMI2 --mode 1920x1080 --rate 60.0 --reflect normal"
+    end
+
+    it "should raise an exception if a wrong --reflect directive is specified" do
+      options = {
+          :mode => "1920x1080",
+          :rate => "60.0",
+          :reflect => "this does not exist",
+      }
+
+      lambda { turn_on("HDMI2", options) }.should raise_error
+    end
+  end
+end

data/spec/support/device_helper.rb

@@ -0,0 +1,3 @@
+def parse_device(device_data)
+  RMonitor::Devices.parse(device_data).first
+end

data/spec/support/profile_helper.rb

@@ -0,0 +1,3 @@
+def configuration(&block)
+  block
+end

data/spec/support/string_helpers.rb

@@ -0,0 +1,25 @@
+class String
+  # Strips indentation in heredocs.
+  #
+  # For example in
+  #
+  #   if options[:usage]
+  #     puts <<-USAGE.strip_heredoc
+  #       This command does such and such.
+  #
+  #       Supported options are:
+  #         -h         This message
+  #         ...
+  #     USAGE
+  #   end
+  #
+  # the user would see the usage message aligned against the left margin.
+  #
+  # Technically, it looks for the least indented line in the whole string, and removes
+  # that amount of leading whitespace.
+  def strip_heredoc
+    indent = scan(/^[ \t]*(?=\S)/).min
+    indent = (indent and indent.size) || 0
+    gsub(/^[ \t]{#{indent}}/, '')
+  end
+end