uh-wm 0.0.2.pre → 0.0.2

data/spec/uh/wm/run_control_spec.rb

@@ -0,0 +1,102 @@
+require 'support/filesystem_helpers'
+
+module Uh
+  module WM
+    RSpec.describe RunControl do
+      include FileSystemHelpers
+
+      let(:code)    { :run_control_code }
+      let(:env)     { Env.new(StringIO.new) }
+      subject(:rc)  { described_class.new env }
+
+      describe '.evaluate' do
+        around do |example|
+          with_file ':run_control_code' do |f|
+            env.rc_path = f.path
+            example.run
+          end
+        end
+
+        it 'builds a new instance with given env' do
+          expect(described_class).to receive(:new).with(env).and_call_original
+          described_class.evaluate env
+        end
+
+        it 'tells the new instance to evaluate run control file content' do
+          expect(rc)
+            .to receive(:evaluate).with(':run_control_code', env.rc_path)
+          allow(described_class).to receive(:new) { rc }
+          described_class.evaluate env
+        end
+
+        context 'when run control file is not present' do
+          before { env.rc_path = 'non_existent_rc_file.rb' }
+
+          it 'does not raise any error' do
+            expect { described_class.evaluate env }.not_to raise_error
+          end
+        end
+      end
+
+      describe '#evaluate' do
+        it 'evaluates given code' do
+          expect { rc.evaluate 'throw :run_control_code', 'some_path' }
+            .to throw_symbol :run_control_code
+        end
+
+        it 'provides access to assigned env' do
+          expect { rc.evaluate 'fail @env.object_id.to_s', 'some_path' }
+            .to raise_error env.object_id.to_s
+        end
+      end
+
+      describe '#modifier' do
+        it 'updates env modifier' do
+          rc.modifier :ctrl
+          expect(env.modifier).to eq :ctrl
+        end
+      end
+
+      describe '#key' do
+        let(:code) { -> { :keybind_code } }
+
+        it 'registers a key binding in the env' do
+          rc.key :f, &code
+          expect(env.keybinds.keys).to include :f
+        end
+
+        it 'registers a combined keys binding in the env' do
+          rc.key :f, :shift, &code
+          expect(env.keybinds.keys).to include %i[f shift]
+        end
+
+        it 'registers given block with the key binding' do
+          rc.key :f, &code
+          expect(env.keybinds[:f].call).to eq :keybind_code
+        end
+
+        it 'translates common key names to equivalent X keysym' do
+          rc.key :enter, &code
+          expect(env.keybinds.keys).to include :Return
+        end
+
+        it 'translates upcased key name to a combination with shift' do
+          rc.key :F, &code
+          expect(env.keybinds.keys).to include %i[f shift]
+        end
+      end
+
+      describe '#worker' do
+        it 'sets the worker type in the env' do
+          rc.worker :some_worker
+          expect(env.worker[0]).to eq :some_worker
+        end
+
+        it 'sets the worker options in the env' do
+          rc.worker :some_worker, some: :option
+          expect(env.worker[1]).to eq({ some: :option })
+        end
+      end
+    end
+  end
+end

data/spec/uh/wm/runner_spec.rb

@@ -0,0 +1,186 @@
+SomeLayout = Class.new do
+  define_method(:register)    { |*args| }
+  define_method(:suggest_geo) { Uh::Geo.new(0, 0, 42, 42) }
+  define_method(:<<)          { |*args| }
+  define_method(:remove)      { |*args| }
+end
+
+module Uh
+  module WM
+    RSpec.describe Runner do
+      let(:env)         { Env.new(StringIO.new) }
+      subject(:runner)  { described_class.new env }
+
+      before do
+        env.layout_class  = SomeLayout
+        env.rc_path       = 'non_existent_run_control.rb'
+      end
+
+      it 'has the env' do
+        expect(runner.env).to be env
+      end
+
+      it 'has a dispatcher' do
+        expect(runner.events).to be_a Dispatcher
+      end
+
+      it 'is not stopped' do
+        expect(runner).not_to be_stopped
+      end
+
+      describe '#stopped?' do
+        context 'when not stopped' do
+          it 'returns false' do
+            expect(runner.stopped?).to be false
+          end
+        end
+
+        context 'when stopped' do
+          before { runner.stop! }
+
+          it 'returns true' do
+            expect(runner.stopped?).to be true
+          end
+        end
+      end
+
+      describe '#stop!' do
+        it 'sets the runner as stopped' do
+          expect { runner.stop! }
+            .to change { runner.stopped? }
+            .from(false).to(true)
+        end
+      end
+
+      describe '#manager' do
+        it 'returns the manager' do
+          expect(runner.manager).to be_a Manager
+        end
+
+        it 'sets the manager modifier as env modifier' do
+          expect(runner.manager.modifier).to eq env.modifier
+        end
+      end
+
+      describe '#evaluate_run_control' do
+        it 'evaluates the run control file with RunControl and current env' do
+          expect(RunControl).to receive(:evaluate).with env
+          runner.evaluate_run_control
+        end
+      end
+
+      describe '#register_event_hooks' do
+        it 'registers quit event hook' do
+          runner.register_event_hooks
+          expect(runner).to receive(:stop!)
+          runner.events.emit :quit
+        end
+
+        context 'layout hooks' do
+          it 'registers for :connected event' do
+            runner.register_event_hooks
+            expect(env.layout).to receive(:register).with :display
+            runner.events.emit :connected, args: :display
+          end
+
+          it 'registers for :configure event' do
+            runner.register_event_hooks
+            expect(runner.events.emit :configure, args: :window)
+              .to eq Geo.new(0, 0, 42, 42)
+          end
+
+          it 'registers for :manage event' do
+            runner.register_event_hooks
+            expect(env.layout).to receive(:<<).with :client
+            runner.events.emit :manage, args: :client
+          end
+
+          it 'registers for :unmanage event' do
+            runner.register_event_hooks
+            expect(env.layout).to receive(:remove).with :client
+            runner.events.emit :unmanage, args: :client
+          end
+        end
+
+        context 'keys hooks' do
+          it 'registers for :key' do
+            env.keybinds[:f] = -> { }
+            runner.register_event_hooks
+            expect(runner.events[:key, :f]).not_to be_empty
+          end
+
+          it 'registers for :key with combined key bindings' do
+            env.keybinds[[:f, :shift]] = -> { }
+            runner.register_event_hooks
+            expect(runner.events[:key, :f, :shift]).not_to be_empty
+          end
+
+          it 'registers code evaluation with the actions handler' do
+            env.keybinds[:f] = code = proc { }
+            runner.register_event_hooks
+            expect(runner.actions).to receive(:evaluate).with code
+            runner.events.emit :key, :f
+          end
+        end
+      end
+
+      describe '#connect_manager' do
+        let(:manager)     { instance_spy Manager }
+        subject(:runner)  { described_class.new env, manager: manager }
+
+        it 'connects the manager' do
+          expect(runner.manager).to receive :connect
+          runner.connect_manager
+        end
+
+        it 'tells the manager to grab keys for env key bindings' do
+          env.keybinds[:f] = -> { }
+          expect(runner.manager).to receive(:grab_key).with :f
+          runner.connect_manager
+        end
+      end
+
+      describe '#worker' do
+        it 'returns a worker' do
+          expect(runner.worker).to respond_to :work_events
+        end
+
+        it 'setups the read callback to tell manager to handle pending events' do
+          expect(runner.manager).to receive :handle_pending_events
+          runner.worker.on_read.call
+        end
+
+        it 'setups the read_next callback to tell manager to handle next event' do
+          expect(runner.manager).to receive :handle_next_event
+          runner.worker.on_read_next.call
+        end
+
+        it 'setups the timeout callback to tell manager to flush the output' do
+          expect(runner.manager).to receive :flush
+          runner.worker.on_timeout.call
+        end
+      end
+
+      describe '#run_until' do
+        it 'tells the worker to watch the manager' do
+          expect(runner.worker).to receive(:watch).with runner.manager
+          runner.run_until { true }
+        end
+
+        it 'tells the worker to work events until given block is true' do
+          block = proc { }
+          allow(block).to receive(:call).and_return(false, false, false, true)
+          expect(runner.worker).to receive(:work_events).exactly(3).times
+          runner.run_until &block
+        end
+      end
+
+      describe '#terminate' do
+        it 'tells the manager to disconnect' do
+          expect(runner.manager).to receive :disconnect
+          runner.terminate
+        end
+      end
+    end
+  end
+end

data/uh-wm.gemspec

@@ -0,0 +1,25 @@
+require File.expand_path('../lib/uh/wm/version', __FILE__)
+
+Gem::Specification.new do |s|
+  s.name    = 'uh-wm'
+  s.version = Uh::WM::VERSION.dup
+  s.summary = 'minimalistic tiling and stacking window manager for X'
+  s.description = s.name
+  s.homepage = 'https://rubygems.org/gems/uh-wm'
+
+  s.authors = 'Thibault Jouan'
+  s.email   = 'tj@a13.fr'
+
+  s.files       = `git ls-files`.split $/
+  s.test_files  = s.files.grep /\A(spec|features)\//
+  s.executables = s.files.grep(/\Abin\//) { |f| File.basename(f) }
+
+  s.add_dependency 'uh',        '2.0.0.pre2'
+  s.add_dependency 'uh-layout', '0.2.0.pre'
+
+  s.add_development_dependency 'aruba',     '~> 0.6'
+  s.add_development_dependency 'cucumber',  '~> 2.0'
+  s.add_development_dependency 'headless',  '~> 1.0'
+  s.add_development_dependency 'rake',      '~> 10.4'
+  s.add_development_dependency 'rspec',     '~> 3.2'
+end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: uh-wm
 version: !ruby/object:Gem::Version
-  version: 0.0.2.pre
+  version: 0.0.2
 platform: ruby
 authors:
 - Thibault Jouan
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-04-15 00:00:00.000000000 Z
+date: 2015-04-21 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: uh
@@ -16,14 +16,14 @@ dependencies:
     requirements:
     - - '='
       - !ruby/object:Gem::Version
-        version: 2.0.0.pre
+        version: 2.0.0.pre2
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - '='
       - !ruby/object:Gem::Version
-        version: 2.0.0.pre
+        version: 2.0.0.pre2
 - !ruby/object:Gem::Dependency
   name: uh-layout
   requirement: !ruby/object:Gem::Requirement
@@ -110,20 +110,81 @@ dependencies:
         version: '3.2'
 description: uh-wm
 email: tj@a13.fr
-executables: []
+executables:
+- uhwm
 extensions: []
 extra_rdoc_files: []
 files:
+- ".gitignore"
+- ".rspec"
+- ".travis.yml"
+- Gemfile
+- Guardfile
+- LICENSE
+- README.md
+- Rakefile
+- bin/uhwm
+- config/cucumber.yaml
+- features/actions/execute.feature
+- features/actions/layout_delegation.feature
+- features/actions/quit.feature
+- features/cli/debug.feature
+- features/cli/layout.feature
+- features/cli/require.feature
+- features/cli/run_control.feature
+- features/cli/usage.feature
+- features/cli/verbose.feature
+- features/cli/version.feature
+- features/cli/worker.feature
+- features/layout/manage.feature
+- features/layout/protocol.feature
+- features/layout/unmanage.feature
+- features/manager/check_other_wm.feature
+- features/manager/input_events.feature
+- features/manager/manage.feature
+- features/manager/unmanage.feature
+- features/manager/x_errors.feature
+- features/run_control/evaluation.feature
+- features/run_control/key.feature
+- features/run_control/modifier.feature
+- features/run_control/worker.feature
+- features/session/connection.feature
+- features/session/termination.feature
+- features/steps/filesystem_steps.rb
+- features/steps/output_steps.rb
+- features/steps/run_control_steps.rb
+- features/steps/run_steps.rb
+- features/steps/x_steps.rb
+- features/support/env.rb
 - lib/uh/wm.rb
 - lib/uh/wm/actions_handler.rb
 - lib/uh/wm/cli.rb
+- lib/uh/wm/client.rb
 - lib/uh/wm/dispatcher.rb
 - lib/uh/wm/env.rb
+- lib/uh/wm/env_logging.rb
+- lib/uh/wm/logger_formatter.rb
 - lib/uh/wm/manager.rb
 - lib/uh/wm/run_control.rb
 - lib/uh/wm/runner.rb
 - lib/uh/wm/testing/acceptance_helpers.rb
 - lib/uh/wm/version.rb
+- lib/uh/wm/workers.rb
+- lib/uh/wm/workers/base.rb
+- lib/uh/wm/workers/blocking.rb
+- lib/uh/wm/workers/mux.rb
+- spec/spec_helper.rb
+- spec/support/exit_helpers.rb
+- spec/support/filesystem_helpers.rb
+- spec/uh/wm/actions_handler_spec.rb
+- spec/uh/wm/cli_spec.rb
+- spec/uh/wm/client_spec.rb
+- spec/uh/wm/dispatcher_spec.rb
+- spec/uh/wm/env_spec.rb
+- spec/uh/wm/manager_spec.rb
+- spec/uh/wm/run_control_spec.rb
+- spec/uh/wm/runner_spec.rb
+- uh-wm.gemspec
 homepage: https://rubygems.org/gems/uh-wm
 licenses: []
 metadata: {}
@@ -138,13 +199,55 @@ required_ruby_version: !ruby/object:Gem::Requirement
       version: '0'
 required_rubygems_version: !ruby/object:Gem::Requirement
   requirements:
-  - - ">"
+  - - ">="
     - !ruby/object:Gem::Version
-      version: 1.3.1
+      version: '0'
 requirements: []
 rubyforge_project: 
 rubygems_version: 2.4.5
 signing_key: 
 specification_version: 4
-summary: uh window manager
-test_files: []
+summary: minimalistic tiling and stacking window manager for X
+test_files:
+- features/actions/execute.feature
+- features/actions/layout_delegation.feature
+- features/actions/quit.feature
+- features/cli/debug.feature
+- features/cli/layout.feature
+- features/cli/require.feature
+- features/cli/run_control.feature
+- features/cli/usage.feature
+- features/cli/verbose.feature
+- features/cli/version.feature
+- features/cli/worker.feature
+- features/layout/manage.feature
+- features/layout/protocol.feature
+- features/layout/unmanage.feature
+- features/manager/check_other_wm.feature
+- features/manager/input_events.feature
+- features/manager/manage.feature
+- features/manager/unmanage.feature
+- features/manager/x_errors.feature
+- features/run_control/evaluation.feature
+- features/run_control/key.feature
+- features/run_control/modifier.feature
+- features/run_control/worker.feature
+- features/session/connection.feature
+- features/session/termination.feature
+- features/steps/filesystem_steps.rb
+- features/steps/output_steps.rb
+- features/steps/run_control_steps.rb
+- features/steps/run_steps.rb
+- features/steps/x_steps.rb
+- features/support/env.rb
+- spec/spec_helper.rb
+- spec/support/exit_helpers.rb
+- spec/support/filesystem_helpers.rb
+- spec/uh/wm/actions_handler_spec.rb
+- spec/uh/wm/cli_spec.rb
+- spec/uh/wm/client_spec.rb
+- spec/uh/wm/dispatcher_spec.rb
+- spec/uh/wm/env_spec.rb
+- spec/uh/wm/manager_spec.rb
+- spec/uh/wm/run_control_spec.rb
+- spec/uh/wm/runner_spec.rb