window_blessing 0.0.1 → 0.0.4

data/spec/event_queue_spec.rb

@@ -0,0 +1,46 @@
+require 'spec_helper'
+
+module WindowBlessing
+describe "EventQueue" do
+  include Tools
+
+  it "new" do
+    em = EventQueue.new
+    em.queue.should == []
+  end
+
+  it "<<" do
+    em = EventQueue.new
+    em << 1
+    em.queue.should == [1]
+    em << [2,3]
+    em.queue.should == [1,2,3]
+  end
+
+  it "clear" do
+    em = EventQueue.new
+    em << 1
+    em.clear
+    em.queue.should == []
+  end
+
+  it "clear" do
+    em = EventQueue.new
+    em.empty?.should == true
+    em << 1
+    em.empty?.should == false
+    em.clear
+    em.empty?.should == true
+  end
+
+  it "pop_all" do
+    em = EventQueue.new
+    em << 1
+    em << 2
+    a = em.pop_all
+    a.should == [1,2]
+    em.queue.should == []
+  end
+
+end
+end

data/spec/evented_variable_spec.rb

@@ -0,0 +1,43 @@
+require 'spec_helper'
+
+module WindowBlessing
+describe "EventedVariable" do
+  include Tools
+
+  it "get" do
+    e = EventedVariable.new 4
+    e.get.should == 4
+  end
+
+  it "set (no listeners)" do
+    e = EventedVariable.new 4
+    e.set(5).should == 4
+    e.get.should == 5
+  end
+
+  it "inspect" do
+    e = EventedVariable.new 4
+    (!!e.inspect["4"]).should == true
+  end
+
+  it "set (with listeners)" do
+    e = EventedVariable.new 4
+    handled = ""
+    e.on(:change) {handled+="c"}
+    e.on(:refresh) {handled+="r"}
+    e.set(5).should == 4
+    e.get.should == 5
+    handled.should == "rc"
+  end
+
+  it "refresh (with listeners)" do
+    e = EventedVariable.new 4
+    handled = ""
+    e.on(:change) {handled+="c"}
+    e.on(:refresh) {handled+="r"}
+    e.refresh(5).should == 4
+    e.get.should == 5
+    handled.should == "r"
+  end
+end
+end

data/spec/tools_spec.rb

@@ -138,5 +138,23 @@ describe "Tools" do
     gen_array2d(point(3,3), [1, 2]).should == [[1,2,1], [2,1,2], [1,2,1]]
     gen_array2d(point(4,4), [1, 2, 3]).should == [[1, 2, 3, 1], [2, 3, 1, 2], [3, 1, 2, 3], [1,2,3,1]]
   end
+
+  it "clone_value" do
+    clone_value(0.5).should == 0.5
+    clone_value(nil).should == nil
+    clone_value(100).should == 100
+    v2 = clone_value v1 = {foo: "bar"}
+    v1[:foo] = "baz"
+    v1[:foo].should_not == v2[:foo]
+  end
+
+  it "range_length" do
+    range_length(0..-1).should == nil
+    range_length(-1..0).should == nil
+    range_length(-2..-1).should == 2
+    range_length(0..2).should == 3
+    range_length(1..2).should == 2
+    range_length(1...2).should == 1
+  end
 end
 end

data/spec/window_redraw_areas_spec.rb

@@ -0,0 +1,79 @@
+require 'spec_helper'
+
+module WindowBlessing
+describe "WindowRedrawAreas" do
+  include Tools
+
+  it "basic init" do
+    wra = WindowRedrawAreas.new
+    wra.areas.should == []
+    wra << rect(5,5,10,10)
+    wra.areas.should == [rect(5,5,10,10)]
+  end
+
+  it "two non overlapping areas" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(50,5,10,10)
+    wra.areas.should == [rect(5,5,10,10),rect(50,5,10,10)]
+  end
+
+  it "two overlapping areas" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(10,5,10,10)
+    wra.areas.should == [rect(5,5,15,10)]
+  end
+
+  it "three areas collaps to one" do
+    wra = WindowRedrawAreas.new
+    wra << rect(0,0,2,10)
+    wra << rect(2,5,5,5)
+    wra.areas.should == [rect(0,0,2,10),rect(2,5,5,5)]
+    wra << rect(0,9,3,1)
+    wra.areas.should == [rect(0,0,7,10)]
+  end
+
+  it "tl overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(0,0,10,10)
+    wra.areas.should == [rect(0,0,15,15)]
+  end
+
+  it "tr overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(10,0,10,10)
+    wra.areas.should == [rect(5,0,15,15)]
+  end
+
+  it "bl overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(0,10,10,10)
+    wra.areas.should == [rect(0,5,15,15)]
+  end
+
+  it "br overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,10,10)
+    wra << rect(10,10,10,10)
+    wra.areas.should == [rect(5,5,15,15)]
+  end
+
+  it "just barely no overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,5,10)
+    wra << rect(10,5,5,10)
+    wra.areas.should == [rect(5,5,5,10),rect(10,5,5,10)]
+  end
+
+  it "just barely overlap" do
+    wra = WindowRedrawAreas.new
+    wra << rect(5,5,5,10)
+    wra << rect(9,5,5,10)
+    wra.areas.should == [rect(5,5,9,10)]
+  end
+end
+end

data/spec/window_spec.rb

@@ -25,7 +25,7 @@ describe "Window" do
     w = window rect(0,0,4,4)
     c = window rect(1,1,1,2)
     c.buffer.contents = "*\n*"
-    c.clean
+    c.clear_redraw_areas
     w.add_child c
     w.draw
     w.buffer.to_s.should == "    \n *  \n *  \n    "
@@ -44,8 +44,8 @@ describe "Window" do
     w = window rect(0,0,4,4)
     (c1=w.add_child(window(rect(1,1,2,2)))).buffer.fill :string=>"*"
     (c2=w.add_child(window(rect(2,0,2,2)))).buffer.fill :string=>"@"
-    c1.clean
-    c2.clean
+    c1.clear_redraw_areas
+    c2.clear_redraw_areas
     w.draw
     w.buffer.to_s.should == "  @@\n *@@\n ** \n    "
   end
@@ -57,5 +57,140 @@ describe "Window" do
     w.each_child.collect{|a|a}.should == [c1,c2]
     w.each_child_with_index.collect{|a,i|[a,i]}.should == [[c1,0],[c2,1]]
   end
+
+  it "route_poiner_event" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+    handled = ""
+    w1.on(:pointer) {handled+="w1"}
+    w2.on(:pointer) {handled+="w2"}
+    w1.route_pointer_event type: :pointer, loc: point()
+    handled.should == "w1"
+
+    handled=""
+    w1.route_pointer_event type: :pointer, loc: point(2,0)
+    handled.should == "w1"
+
+    handled=""
+    w1.route_pointer_event type: [:pointer, :button_up], loc: point(2,0)
+    handled.should == "w1"
+
+    handled=""
+    w1.route_pointer_event type: :pointer, loc: point(2,0)
+    handled.should == "w2"
+  end
+
+  it "blur and focus" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w3 = window rect(0,2,4,4)
+    w4 = window rect(0,2,4,4)
+    w1.add_child w2
+    w2.add_child w4
+    w1.add_child w3
+
+    handled = ""
+    w1.on(:focus) {handled+="w1f"}
+    w1.on(:blur)  {handled+="w1b"}
+    w2.on(:focus) {handled+="w2f"}
+    w2.on(:blur)  {handled+="w2b"}
+    w3.on(:focus) {handled+="w3f"}
+    w3.on(:blur)  {handled+="w3b"}
+    w4.on(:focus) {handled+="w4f"}
+    w4.on(:blur)  {handled+="w4b"}
+
+    w1.focus
+    handled.should == "w1f"
+
+    handled = ""
+    w4.focus
+    handled.should == "w2fw4f"
+
+    handled = ""
+    w3.focus
+    handled.should == "w4bw2bw3f"
+  end
+
+  it "move and redraw" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+    w1.draw
+
+    w1.redraw_requested?.should == false
+    w2.redraw_requested?.should == false
+
+    w2.area = rect(0,0,4,4)
+    w1.redraw_requested?.should == true
+    w2.redraw_requested?.should == false
+  end
+
+  it "resize smaller and redraw" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+    w1.draw
+
+    w1.redraw_requested?.should == false
+    w2.redraw_requested?.should == false
+
+    w2.area = rect(2,0,4,3)
+    w1.redraw_requested?.should == true
+    w2.redraw_requested?.should == false
+  end
+
+  it "resize larger and redraw" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+    w1.draw
+
+    w1.redraw_requested?.should == false
+    w2.redraw_requested?.should == false
+
+    w2.area = rect(2,0,4,5)
+    w1.redraw_requested?.should == true
+    w2.redraw_requested?.should == true
+  end
+
+  it "redirect_keyboard_event" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+
+    handled = ""
+    w1.on(:key_press) {handled+="w1kp"}
+    w2.on(:key_press) {handled+="w2kp"}
+
+    w1.route_keyboard_event type: :key_press
+    handled.should == "w1kp"
+
+    handled = ""
+    w2.focus
+    w1.route_keyboard_event type: :key_press
+    handled.should == "w2kpw1kp"
+  end
+
+  it "path & parent_path" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(2,0,4,4)
+    w1.add_child w2
+    w1.name = "foo"
+    w2.name = "bar"
+
+    w2.path.should == "WindowBlessing::Window(0,0,10,10):foo,WindowBlessing::Window(2,0,4,4):bar"
+    w2.parent_path.should == "WindowBlessing::Window(0,0,10,10):foo"
+  end
+
+  it "move_onscreen" do
+    w1 = window rect(0,0,10,10)
+    w2 = window rect(8,0,4,4)
+    w1.add_child w2
+
+    w2.move_onscreen
+    w2.area.should == rect(6,0,4,4)
+
+  end
 end
 end

data/spec/xterm_event_parser_spec.rb

@@ -0,0 +1,86 @@
+require 'spec_helper'
+
+module WindowBlessing
+describe "XtermEventParser" do
+  include Tools
+
+  def parse(str)
+    events = XtermEventParser.new.parse(str).events
+    events.length.should == 1
+    events[0]
+  end
+
+  it "blur and focus" do
+    {:type=>:blur, :raw=>"\e[O"}.should == parse("\e[O")
+    {:type=>:focus, :raw=>"\e[I"}.should == parse("\e[I")
+  end
+
+  it "escape, tab, enter/return" do
+    {:type=>[:key_press, :escape], :key=>:escape, :raw=>"\e"}.should == parse("\e")
+    {:type=>[:key_press, :enter], :key=>:enter, :raw=>"\r"}.should == parse("\r")
+    {:type=>[:key_press, :tab], :key=>:tab, :raw=>"\t"}.should == parse("\t")
+    {:type=>[:key_press, :reverse_tab], :key=>:reverse_tab, :raw=>"\e[Z"}.should == parse("\e[Z")
+  end
+
+  it "arrow keys" do
+    {:type=>[:key_press, :down], :key=>:down, :alt=>true, :raw=>"\e\e[B"}.should == parse("\e\e[B")
+    {:type=>[:key_press, :down], :key=>:down, :raw=>"\e[B"}.should == parse("\e[B")
+    {:type=>[:key_press, :down], :key=>:down, :shift=>true, :alt=>true, :raw=>"\e[1;10B"}.should == parse("\e[1;10B")
+    {:type=>[:key_press, :down], :key=>:down, :shift=>true, :raw=>"\e[1;2B"}.should == parse("\e[1;2B")
+    {:type=>[:key_press, :left], :key=>:left, :alt=>true, :raw=>"\e\e[D"}.should == parse("\e\e[D")
+    {:type=>[:key_press, :left], :key=>:left, :raw=>"\e[D"}.should == parse("\e[D")
+    {:type=>[:key_press, :left], :key=>:left, :shift=>true, :alt=>true, :raw=>"\e[1;10D"}.should == parse("\e[1;10D")
+    {:type=>[:key_press, :left], :key=>:left, :shift=>true, :raw=>"\e[1;2D"}.should == parse("\e[1;2D")
+    {:type=>[:key_press, :right], :key=>:right, :alt=>true, :raw=>"\e\e[C"}.should == parse("\e\e[C")
+    {:type=>[:key_press, :right], :key=>:right, :raw=>"\e[C"}.should == parse("\e[C")
+    {:type=>[:key_press, :right], :key=>:right, :shift=>true, :alt=>true, :raw=>"\e[1;10C"}.should == parse("\e[1;10C")
+    {:type=>[:key_press, :right], :key=>:right, :shift=>true, :raw=>"\e[1;2C"}.should == parse("\e[1;2C")
+    {:type=>[:key_press, :up], :key=>:up, :alt=>true, :raw=>"\e\e[A"}.should == parse("\e\e[A")
+    {:type=>[:key_press, :up], :key=>:up, :raw=>"\e[A"}.should == parse("\e[A")
+    {:type=>[:key_press, :up], :key=>:up, :shift=>true, :alt=>true, :raw=>"\e[1;10A"}.should == parse("\e[1;10A")
+    {:type=>[:key_press, :up], :key=>:up, :shift=>true, :raw=>"\e[1;2A"}.should == parse("\e[1;2A")
+  end
+
+  it "control-a" do
+    {:type=>:key_press, :key=>:a, :control=>true, :raw=>"\x01"}.should == parse("\x01")
+  end
+
+  it "size" do
+    {:type=>:xterm_state, :state_type=>:size, :state=>point(99,68), :raw=>"\e[8;68;99t"}.should == parse("\e[8;68;99t")
+  end
+
+  it "f-keys" do
+    {:type=>[:key_press, :f1], :key=>:f1, :raw=>"\eOP"}.should == parse("\eOP")
+    {:type=>[:key_press, :f1], :key=>:f1, :shift=>true, :raw=>"\e[1;2P"}.should == parse("\e[1;2P")
+    {:type=>[:key_press, :f2], :key=>:f2, :raw=>"\eOQ"}.should == parse("\eOQ")
+    {:type=>[:key_press, :f2], :key=>:f2, :shift=>true, :raw=>"\e[1;2Q"}.should == parse("\e[1;2Q")
+    {:type=>[:key_press, :f3], :key=>:f3, :raw=>"\eOR"}.should == parse("\eOR")
+    {:type=>[:key_press, :f3], :key=>:f3, :shift=>true, :raw=>"\e[1;2R"}.should == parse("\e[1;2R")
+    {:type=>[:key_press, :f4], :key=>:f4, :raw=>"\eOS"}.should == parse("\eOS")
+    {:type=>[:key_press, :f4], :key=>:f4, :shift=>true, :raw=>"\e[1;2S"}.should == parse("\e[1;2S")
+    {:type=>[:key_press, :f5], :key=>:f5, :shift=>false, :raw=>"\e[15~"}.should == parse("\e[15~")
+    {:type=>[:key_press, :f5], :key=>:f5, :shift=>true, :raw=>"\e[15;2~"}.should == parse("\e[15;2~")
+    {:type=>[:key_press, :f6], :key=>:f6, :shift=>false, :raw=>"\e[17~"}.should == parse("\e[17~")
+    {:type=>[:key_press, :f6], :key=>:f6, :shift=>true, :raw=>"\e[17;2~"}.should == parse("\e[17;2~")
+    {:type=>[:key_press, :f7], :key=>:f7, :shift=>false, :raw=>"\e[18~"}.should == parse("\e[18~")
+    {:type=>[:key_press, :f7], :key=>:f7, :shift=>true, :raw=>"\e[18;2~"}.should == parse("\e[18;2~")
+    {:type=>[:key_press, :f8], :key=>:f8, :shift=>false, :raw=>"\e[19~"}.should == parse("\e[19~")
+    {:type=>[:key_press, :f8], :key=>:f8, :shift=>true, :raw=>"\e[19;2~"}.should == parse("\e[19;2~")
+    {:type=>[:key_press, :f9], :key=>:f9, :shift=>false, :raw=>"\e[20~"}.should == parse("\e[20~")
+    {:type=>[:key_press, :f9], :key=>:f9, :shift=>true, :raw=>"\e[20;2~"}.should == parse("\e[20;2~")
+    {:type=>[:key_press, :f10], :key=>:f10, :shift=>false, :raw=>"\e[21~"}.should == parse("\e[21~")
+    {:type=>[:key_press, :f10], :key=>:f10, :shift=>true, :raw=>"\e[21;2~"}.should == parse("\e[21;2~")
+  end
+
+  it "mouse" do
+    {:type=>[:pointer, :button_down, 1], :button=>[:button_down, 1], :state=>32, :loc=>point(23,51), :shift=>false, :alt=>false, :control=>false, :raw=>"\e[M 8T"}.should == parse("\e[M 8T")
+    {:type=>[:pointer, :button_up], :button=>:button_up, :state=>35, :loc=>point(33,50), :shift=>false, :alt=>false, :control=>false, :raw=>"\e[M#BS"}.should == parse("\e[M#BS")
+    {:type=>[:pointer, :button_down, 1], :button=>[:button_down, 1], :state=>36, :loc=>point(22,31), :shift=>true, :alt=>false, :control=>false, :raw=>"\e[M$7@"}.should == parse("\e[M$7@")
+    {:type=>[:pointer, :button_up], :button=>:button_up, :state=>39, :loc=>point(22,31), :shift=>true, :alt=>false, :control=>false, :raw=>"\e[M'7@"}.should == parse("\e[M'7@")
+    {:type=>[:pointer, :drag], :button=>:drag, :state=>64, :loc=>point(24,51), :shift=>false, :alt=>false, :control=>false, :raw=>"\e[M@9T"}.should == parse("\e[M@9T")
+    {:type=>[:pointer, :drag], :button=>:drag, :state=>68, :loc=>point(34,30), :shift=>true, :alt=>false, :control=>false, :raw=>"\e[MDC?"}.should == parse("\e[MDC?")
+    {:type=>[:pointer, :wheel_down], :button=>:wheel_down, :state=>96, :loc=>point(28,44), :shift=>false, :alt=>false, :control=>false, :raw=>"\e[M`=M"}.should == parse("\e[M`=M")
+    {:type=>[:pointer, :wheel_up], :button=>:wheel_up, :state=>97, :loc=>point(28,44), :shift=>false, :alt=>false, :control=>false, :raw=>"\e[Ma=M"}.should == parse("\e[Ma=M")
+  end
+end
+end

data/window_blessing.gemspec

@@ -8,8 +8,8 @@ Gem::Specification.new do |gem|
   gem.version       = WindowBlessing::VERSION
   gem.authors       = ["Shane Brinkman-Davis"]
   gem.email         = ["shanebdavis@gmail.com"]
-  gem.description   = "Forget Curses! Try Blessings instead! WindowBlessing is an evented windowing framework for terminal apps."
-  gem.summary       = ""
+  gem.description   = "Forget curses. Try blessings. WindowBlessing is an evented, windowing framework for terminal apps."
+  gem.summary       = "Evented windowing framework for terminal apps."
   gem.homepage      = "https://github.com/shanebdavis/window_blessing"
 
   gem.files         = `git ls-files`.split($/)
@@ -18,7 +18,8 @@ Gem::Specification.new do |gem|
   gem.require_paths = ["lib"]
 
   gem.add_dependency 'babel_bridge', ">= 0.5.3"
-  gem.add_dependency 'gui_geometry', ">= 0.2.2"
+  gem.add_dependency 'gui_geometry', ">= 0.3.1"
+
   gem.add_development_dependency 'rake'
   gem.add_development_dependency 'rspec'
   gem.add_development_dependency 'guard-rspec'