vedeu 0.3.4 → 0.3.5

data/test/lib/vedeu/dsl/shared/text_test.rb

@@ -6,7 +6,14 @@ module Vedeu
 
     describe Text do
 
-
+      describe '#text' do
+
+        # it { described.must_respond_to(:align) }
+        # it { described.must_respond_to(:center) }
+        # it { described.must_respond_to(:centre) }
+        # it { described.must_respond_to(:left) }
+        # it { described.must_respond_to(:right) }
+      end
 
     end # Text
 

data/test/lib/vedeu/dsl/stream_test.rb

@@ -8,7 +8,7 @@ module Vedeu
 
       let(:described) { Vedeu::DSL::Stream }
       let(:instance)  { described.new(model) }
-      let(:model)     { mock('Vedeu::Stream') }
+      let(:model)     { Vedeu::Stream.new }
       let(:client)    {}
 
       describe '#initialize' do
@@ -17,6 +17,18 @@ module Vedeu
         it { instance.instance_variable_get('@client').must_equal(client) }
       end
 
+      describe '#stream' do
+        subject { instance.stream { } }
+
+        # it { subject.must_be_instance_of(Vedeu::Stream) }
+
+        context 'when the block is not given' do
+          subject { instance.stream }
+
+          it { proc { subject }.must_raise(InvalidSyntax) }
+        end
+      end
+
     end # Stream
 
   end # DSL

data/test/lib/vedeu/input/input_test.rb

@@ -4,7 +4,7 @@ module Vedeu
 
   describe Input do
 
-    let(:reader)    { mock }
+    let(:reader)    { Vedeu::Terminal }
     let(:keypress)  { 'a' }
     let(:described) { Vedeu::Input }
     let(:instance)  { described.new(reader) }

data/test/lib/vedeu/input/key_test.rb

@@ -38,11 +38,7 @@ module Vedeu
         subject.must_equal('a')
       end
 
-      context 'alias method #key' do
-        subject { instance.key }
-
-        it { subject.must_equal('a') }
-      end
+      it { instance.must_respond_to(:key) }
     end
 
     describe '#output' do
@@ -52,17 +48,8 @@ module Vedeu
         subject.must_equal(:output)
       end
 
-      context 'alias method #action' do
-        subject { instance.action }
-
-        it { subject.must_equal(:output) }
-      end
-
-      context 'alias method #press' do
-        subject { instance.press }
-
-        it { subject.must_equal(:output) }
-      end
+      it { instance.must_respond_to(:action) }
+      it { instance.must_respond_to(:press) }
     end
 
   end # Key

data/test/lib/vedeu/launcher_test.rb

@@ -24,6 +24,16 @@ module Vedeu
       it { instance.instance_variable_get('@exit_code').must_equal(1) }
     end
 
+    describe '#debug_execute!' do
+      subject { instance.debug_execute! }
+
+      context 'when debugging is enabled in the configuration' do
+      end
+
+      context 'when debugging is not enabled in the configuration' do
+      end
+    end
+
     describe '#execute!' do
       subject { instance.execute! }
 
@@ -38,7 +48,7 @@ module Vedeu
 
       #   it 'displays the exception' do
       #     capture_io do
-      #       Launcher.new.execute!
+      #       Launcher.execute!
       #     end.must_equal(["", ""])
       #   end
       # end

data/test/lib/vedeu/main_loop_test.rb

@@ -0,0 +1,41 @@
+require 'test_helper'
+
+module Vedeu
+
+  describe MainLoop do
+
+    let(:described) { Vedeu::MainLoop }
+
+    describe '.start!' do
+      before do
+        # subject.expects(:while).yields do
+        #   String.expects(:new).returns("samantha")
+        # end
+      end
+
+      subject { described.start! { } }
+
+      # it { subject; described.instance_variable_get('@started').must_equal(true) }
+      # it { subject; described.instance_variable_get('@loop').must_equal(true) }
+    end
+
+    describe '.stop!' do
+      subject { described.stop! }
+
+      it { subject; described.instance_variable_get('@loop').must_equal(false) }
+    end
+
+    describe '.safe_exit_point!' do
+      subject { described.safe_exit_point! }
+
+      context 'when we wish to continue' do
+      end
+
+      context 'when we wish to stop' do
+        # it { proc { subject }.must_raise(VedeuInterrupt) }
+      end
+    end
+
+  end # MainLoop
+
+end # Vedeu

data/test/lib/vedeu/models/geometry_test.rb

@@ -143,58 +143,39 @@ module Vedeu
     describe '#origin' do
       it 'returns the origin for the interface' do
         geometry = Geometry.new({ width: 5, height: 5 })
-        geometry.origin.must_equal("\e[1;1H")
+        geometry.origin.must_be_instance_of(Vedeu::Position)
+        geometry.origin.y.must_equal(1)
+        geometry.origin.x.must_equal(1)
       end
 
       it 'returns the origin for the interface' do
         geometry = Geometry.new({ width: 5, height: 5, centred: true })
-        geometry.origin.must_equal("\e[10;38H")
+        geometry.origin.must_be_instance_of(Vedeu::Position)
+        geometry.origin.y.must_equal(10)
+        geometry.origin.x.must_equal(38)
       end
 
       it 'returns the line position relative to the origin' do
         geometry = Geometry.new({ width: 5, height: 5 })
-        geometry.origin(3).must_equal("\e[4;1H")
+        geometry.origin(3).must_be_instance_of(Vedeu::Position)
+        geometry.origin(3).y.must_equal(4)
+        geometry.origin(3).x.must_equal(1)
       end
 
       it 'returns the origin for the interface when the interface' \
          ' is at a custom position' do
         geometry = Geometry.new({ width: 5, height: 5, x: 3, y: 6 })
-        geometry.origin.must_equal("\e[6;3H")
+        geometry.origin.must_be_instance_of(Vedeu::Position)
+        geometry.origin.y.must_equal(6)
+        geometry.origin.x.must_equal(3)
       end
 
       it 'returns the line position relative to the origin when the' \
          ' interface is at a custom position' do
         geometry = Geometry.new({ width: 5, height: 5, x: 3, y: 6 })
-        geometry.origin(3).must_equal("\e[9;3H")
-      end
-    end
-
-    describe '#raw_origin' do
-      it 'returns the origin for the interface' do
-        geometry = Geometry.new({ width: 5, height: 5 })
-        geometry.raw_origin.must_equal([1, 1])
-      end
-
-      it 'returns the origin for the interface' do
-        geometry = Geometry.new({ width: 5, height: 5, centred: true })
-        geometry.raw_origin.must_equal([10, 38])
-      end
-
-      it 'returns the line position relative to the origin' do
-        geometry = Geometry.new({ width: 5, height: 5 })
-        geometry.raw_origin(3).must_equal([4, 1])
-      end
-
-      it 'returns the origin for the interface when the interface' \
-         ' is at a custom position' do
-        geometry = Geometry.new({ width: 5, height: 5, x: 3, y: 6 })
-        geometry.raw_origin.must_equal([6, 3])
-      end
-
-      it 'returns the line position relative to the origin when the' \
-         ' interface is at a custom position' do
-        geometry = Geometry.new({ width: 5, height: 5, x: 3, y: 6 })
-        geometry.raw_origin(3).must_equal([9, 3])
+        geometry.origin(3).must_be_instance_of(Vedeu::Position)
+        geometry.origin(3).y.must_equal(9)
+        geometry.origin(3).x.must_equal(3)
       end
     end
 

data/test/lib/vedeu/models/view/char_test.rb

@@ -5,7 +5,16 @@ module Vedeu
   describe Char do
 
     let(:described)     { Vedeu::Char }
-    let(:instance)      { described.new(value, parent, colour, style, position) }
+    let(:instance)      { described.new(attributes) }
+    let(:attributes)    {
+      {
+        colour: colour,
+        parent: parent,
+        position: position,
+        style: style,
+        value: value,
+      }
+    }
     let(:value)         { 'a' }
     let(:parent)        { Line.new(parent_attributes) }
     let(:parent_attributes) {
@@ -22,42 +31,6 @@ module Vedeu
     let(:parent_colour) { nil }
     let(:parent_style)  { nil }
 
-    describe '.coerce' do
-      subject { described.coerce(value, parent, colour, style, position) }
-
-      context 'when the value is already a Char' do
-        let(:value) { described.new('b') }
-
-        it { subject.must_equal(value) }
-      end
-
-      context 'when the value is an Array' do
-        context 'and the Array contains instances of Char' do
-          let(:value) { [described.new('b')] }
-
-          it { subject.must_equal(value) }
-        end
-
-        context 'and the Array contains instances of String' do
-          let(:value) { ['carbon'] }
-
-          it { subject.must_be_instance_of(Array) }
-        end
-
-        context 'and the Array contains instances of NilClass' do
-          let(:value) { [] }
-
-          it { subject.must_be_instance_of(NilClass) }
-        end
-      end
-
-      context 'when the value is not a Char or Array' do
-        let(:value) { {} }
-
-        it { subject.must_be_instance_of(NilClass) }
-      end
-    end
-
     describe '#initialize' do
       it { instance.must_be_instance_of(Char) }
       it { instance.instance_variable_get('@colour').must_be_instance_of(Vedeu::Colour) }
@@ -84,13 +57,13 @@ module Vedeu
 
       context 'when the value is set' do
         it { subject.must_equal('a') }
+      end
+    end
 
-        context 'and the value is more than one character' do
-          let(:value) { 'multi' }
+    describe '#to_html' do
+      subject { instance.to_html }
 
-          it { subject.must_equal('m') }
-        end
-      end
+      it { subject.must_be_instance_of(String) }
     end
 
     describe '#to_s' do
@@ -159,11 +132,37 @@ module Vedeu
 
         it { subject.must_equal("") }
       end
+    end
+
+    describe '#x' do
+      let(:position) { Position.new(17, 2) }
+
+      subject { instance.x }
+
+      context 'when a position is set' do
+        it { subject.must_equal(2) }
+      end
 
-      context 'when the value is more than one character' do
-        let(:value) { 'multi' }
+      context 'when a position is not set' do
+        let(:position) {}
+
+        it { subject.must_equal(nil) }
+      end
+    end
+
+    describe '#y' do
+      let(:position) { Position.new(17, 2) }
+
+      subject { instance.y }
+
+      context 'when a position is set' do
+        it { subject.must_equal(17) }
+      end
+
+      context 'when a position is not set' do
+        let(:position) {}
 
-        it { subject.must_equal("m") }
+        it { subject.must_equal(nil) }
       end
     end
 

data/test/lib/vedeu/models/view/interface_test.rb

@@ -102,6 +102,12 @@ module Vedeu
 
       #   context 'when the interface has a group' do
       #     it { skip }
+      #
+      #     context 'when the group exists' do
+      #     end
+      #
+      #     context 'when the group does not exist' do
+      #     end
       #   end
       # end
     end

data/test/lib/vedeu/models/view/line_test.rb

@@ -33,7 +33,7 @@ module Vedeu
 
     let(:streams_parent) { Line.new({ streams: nil, parent: parent, colour: colour, style: style }) }
 
-    let(:parent)    { mock('Interface') }
+    let(:parent)    { Vedeu::Interface.new }
     let(:colour)    { Colour.new({ foreground: '#ff0000', background: '#000000' }) }
     let(:style)     { Style.new('normal') }
 

data/test/lib/vedeu/models/view/stream_test.rb

@@ -25,7 +25,7 @@ module Vedeu
     }
     let(:colour)      { Colour.new({ background: '#ff0000', foreground: '#000000' }) }
     let(:style)       { Style.new('normal') }
-    let(:line_parent) { mock('Vedeu::Interface') }
+    let(:line_parent) { Vedeu::Interface.new }
 
     describe '#initialize' do
       it { instance.must_be_instance_of(described) }

data/test/lib/vedeu/output/border_test.rb

@@ -14,6 +14,7 @@ module Vedeu
 
     before do
       Vedeu.interfaces.reset
+      Vedeu.borders.reset
       Vedeu.interface 'borders' do
         geometry do
           height 5
@@ -280,11 +281,11 @@ module Vedeu
 
         it 'returns the escape sequences to draw a border' do
           subject.must_equal(
-            "\e(0l\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0k\e(B\n" \
-            "\e(0x\e(BBeryll\e(0x\e(B\n" \
-            "\e(0x\e(BMagnes\e(0x\e(B\n" \
-            "\e(0x\e(BPluton\e(0x\e(B\n" \
-            "\e(0m\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0j\e(B"
+            "\e(0l\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0k\e(B
+\e(0x\e(BBeryll\e(0x\e(B
+\e(0x\e(BMagnes\e(0x\e(B
+\e(0x\e(BPluton\e(0x\e(B
+\e(0m\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0q\e(B\e(0j\e(B"
           )
         end
       end

data/test/lib/vedeu/output/compositor_test.rb

@@ -12,6 +12,7 @@ module Vedeu
     let(:buffer)    { Buffer.new(_name, interface) }
     let(:interface) {
       Vedeu.interface(_name) do
+        border!
         geometry do
           height 5
           width  10
@@ -50,26 +51,7 @@ module Vedeu
         end
 
         context 'when the view has not redefined the geometry' do
-          it 'returns the escape sequences and content sent to the console' do
-            subject.must_equal(
-              [
-                [
-                  "\e[1;1H          \e[1;1H" \
-                  "\e[2;1H          \e[2;1H" \
-                  "\e[3;1H          \e[3;1H" \
-                  "\e[4;1H          \e[4;1H" \
-                  "\e[5;1H          \e[5;1H" \
-                  "\e[1;1HSome text." \
-                  "\e[2;1H          " \
-                  "\e[3;1H          " \
-                  "\e[4;1H          " \
-                  "\e[5;1H          ",
-
-                  "\e[1;1H\e[?25l"
-                ]
-              ]
-            )
-          end
+          # it { skip }
         end
       end
     end

data/test/lib/vedeu/output/html_char_test.rb

@@ -0,0 +1,85 @@
+require 'test_helper'
+
+module Vedeu
+
+  describe HTMLChar do
+
+    let(:described)  { Vedeu::HTMLChar }
+    let(:instance)   { described.new(char) }
+    let(:char)       { Vedeu::Char.new(attributes) }
+    let(:attributes) {
+      {
+        border: border,
+        colour: colour,
+        parent: parent,
+        value:  value
+      }
+    }
+    let(:border) {}
+    let(:colour) {}
+    let(:parent) { Vedeu::Line.new({ colour: parent_colour }) }
+    let(:parent_colour) {}
+    let(:value) {}
+
+    describe '#initialize' do
+      it { instance.must_be_instance_of(Vedeu::HTMLChar) }
+      it { instance.instance_variable_get('@char').must_equal(char) }
+    end
+
+    describe '.render' do
+      subject { described.render(char) }
+
+      it { subject.must_be_instance_of(String) }
+
+      context 'when there is a border' do
+        let(:border) { :top_left }
+
+        context 'when there is a colour' do
+          let(:colour) { Vedeu::Colour.new({ background: '#220022', foreground: '#aadd00' }) }
+
+          it { subject.must_equal(
+            "<td style='background:#220022;color:#aadd00;border:1px #220022 solid;border-top:1px #aadd00 solid;border-left:1px #aadd00 solid;'>&nbsp;</td>"
+          ) }
+        end
+
+        context 'when there is no colour' do
+          context 'when there is a parent colour' do
+            let(:parent_colour) { Vedeu::Colour.new({ background: '#002222', foreground: '#dd2200' }) }
+
+            it { subject.must_equal(
+              "<td style='background:#002222;color:#dd2200;border:1px #002222 solid;border-top:1px #dd2200 solid;border-left:1px #dd2200 solid;'>&nbsp;</td>"
+            ) }
+          end
+
+          context 'when there is no parent colour' do
+            it { subject.must_equal(
+              "<td style='background:#000;color:#222;border:1px #000 solid;border-top:1px #222 solid;border-left:1px #222 solid;'>&nbsp;</td>"
+            ) }
+          end
+        end
+      end
+
+      context 'when there is no border' do
+        context 'when there is no value' do
+          it { subject.must_equal("<td>&nbsp;</td>") }
+        end
+
+        context 'when the value is empty' do
+          let(:value) { '' }
+
+          it { subject.must_equal("<td>&nbsp;</td>") }
+        end
+
+        context 'when there is a value' do
+          let(:value) { 'a' }
+
+          it { subject.must_equal(
+            "<td style='background:#000;color:#222;border:1px #000 solid;'>a</td>"
+          ) }
+        end
+      end
+    end
+
+  end # HTMLChar
+
+end # Vedeu

data/test/lib/vedeu/output/html_renderer_test.rb

@@ -0,0 +1,37 @@
+require 'test_helper'
+
+module Vedeu
+
+  describe HTMLRenderer do
+
+    let(:described) { Vedeu::HTMLRenderer }
+    let(:instance)  { described.new(output) }
+    let(:output)    {}
+
+    describe '#initialize' do
+      it { instance.must_be_instance_of(Vedeu::HTMLRenderer) }
+      it { instance.instance_variable_get('@output').must_equal(output) }
+    end
+
+    describe '#render' do
+      subject { instance.render }
+
+      it { subject.must_be_instance_of(String) }
+    end
+
+    describe '#to_file' do
+      let(:path) {}
+
+      subject { instance.to_file(path) }
+
+      context 'when a path is given' do
+        let(:path) { '/tmp/test_vedeu_html_renderer.html' }
+      end
+
+      context 'when a path is not given' do
+      end
+    end
+
+  end # HTMLRenderer
+
+end # Vedeu

data/test/lib/vedeu/output/position_index_test.rb

@@ -47,11 +47,7 @@ module Vedeu
 
         it { subject.must_equal(5) }
 
-        context 'alias method: first' do
-          subject { instance.first }
-
-          it { subject.must_equal(5) }
-        end
+        it { instance.must_respond_to(:first) }
       end
 
       context '#x' do
@@ -59,11 +55,7 @@ module Vedeu
 
         it { subject.must_equal(16) }
 
-        context 'alias method: last' do
-          subject { instance.last }
-
-          it { subject.must_equal(16) }
-        end
+        it { instance.must_respond_to(:last) }
       end
     end
 

data/test/lib/vedeu/output/renderer_test.rb

@@ -0,0 +1,24 @@
+require 'test_helper'
+
+module Vedeu
+
+  describe Renderer do
+
+    let(:described) { Vedeu::Renderer }
+    let(:instance)  { described.new(output) }
+    let(:output)    {}
+
+    describe '#initialize' do
+      it { instance.must_be_instance_of(Vedeu::Renderer) }
+      it { instance.instance_variable_get('@output').must_equal([output]) }
+    end
+
+    describe '.render' do
+      subject { described.render }
+
+      it { subject.must_be_instance_of(String) }
+    end
+
+  end # Renderer
+
+end # Vedeu

data/test/lib/vedeu/output/virtual_buffer_test.rb

@@ -0,0 +1,53 @@
+require 'test_helper'
+
+module Vedeu
+
+  describe VirtualBuffer do
+
+    let(:described) { Vedeu::VirtualBuffer }
+
+    before { described.clear }
+
+    describe '#retrieve' do
+      subject { described.retrieve }
+
+      context 'when no buffers are stored' do
+        it { subject.must_be_instance_of(NilClass) }
+      end
+
+      context 'when buffers are stored' do
+        before { described.store([[Vedeu::Char.new]]) }
+
+        it { subject.must_be_instance_of(Array) }
+      end
+    end
+
+    describe '#store' do
+      let(:data) { :data }
+
+      subject { described.store(data) }
+
+      it { subject.must_be_instance_of(Array) }
+
+      it { subject.wont_be_empty }
+    end
+
+    describe '#size' do
+      subject { described.size }
+
+      it { subject.must_be_instance_of(Fixnum) }
+    end
+
+    describe '#clear' do
+      subject { described.clear }
+
+      it { subject.must_be_instance_of(Array) }
+
+      it { subject.must_be_empty }
+
+      it { described.must_respond_to(:reset) }
+    end
+
+  end # VirtualBuffer
+
+end # Vedeu