viiite 0.1.0 → 0.2.0

data/spec/unit/bdb/utils/test_replace_extension.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+module Viiite
+  class BDB
+    describe Utils, ".replace_extension" do
+
+      let(:utils){ Object.new.extend(Utils) }
+      subject{ utils.replace_extension(file, ".ext") }
+
+      describe "on a file without extension" do
+        let(:file){ "hello/world" }
+        it{ should eq("hello/world.ext") }
+      end
+
+      describe "on a file with extension" do
+        let(:file){ "hello/world.rb" }
+        it{ should eq("hello/world.ext") }
+      end
+
+    end
+  end
+end

data/spec/unit/benchmark/bench_add.rb

@@ -0,0 +1,3 @@
+Viiite.bench do |b|
+  b.report(:add){ 1+1 }
+end

data/spec/unit/benchmark/test_new.rb

@@ -0,0 +1,28 @@
+require 'spec_helper'
+module Viiite
+  describe Benchmark, '.new' do
+
+    subject{ Benchmark.new(arg) }
+
+    after{
+      subject.to_a.size.should eq(1)
+      subject.to_a.first.keys.sort_by(&:to_s).should eq([:bench, :tms])
+    }
+
+    describe 'with a Proc' do
+      let(:arg){ lambda{|b| b.report(:add){ 1+1 } } }
+      it{ should be_a(Benchmark) }
+    end
+
+    describe 'with an existing file' do
+      let(:arg){ File.expand_path('../bench_add.rb', __FILE__) }
+      it{ should be_a(Benchmark) }
+    end
+
+    describe 'with an IO' do
+      let(:arg){ File.open(File.expand_path('../bench_add.rb', __FILE__), 'r') }
+      it{ should be_a(Benchmark) }
+    end
+
+  end
+end

data/spec/unit/command/commons/existing.rash

@@ -0,0 +1 @@
+{:name => "existing"}

data/spec/unit/command/commons/test_single_source.rb

@@ -0,0 +1,64 @@
+require 'spec_helper'
+module Viiite
+  class Command
+    describe Commons, "#single_source" do
+
+      let(:commons){
+        Object.new.extend(Commons).
+                   extend(Module.new{
+          attr_accessor :requester
+        })
+      }
+      subject{ commons.single_source(argv) }
+
+      describe "with an empty argv" do
+        let(:argv){ [] }
+        it{ should be_a(Alf::Reader) }
+      end
+
+      describe "with an argv with more than one arg" do
+        let(:argv){ [1, 2, 3] }
+        specify{
+          lambda{subject}.should raise_error(Quickl::InvalidArgument)
+        }
+      end
+
+      describe "with a argv with one existing file" do
+        let(:argv){ [ File.expand_path("../existing.rash", __FILE__) ] }
+        it{ should be_a(Alf::Reader) }
+        specify{
+          subject.to_a.should eq([{:name => 'existing'}])
+        }
+      end
+
+      describe "with a argv with a benchmark name but no requester" do
+        let(:argv){ [ :hello ] }
+        specify{
+          lambda{subject}.should raise_error(Quickl::InvalidArgument)
+        }
+      end
+
+      describe 'with a argv and a requester' do
+        let(:argv){ [ :hello ] }
+        let(:requester){
+          Object.new.extend Module.new{
+            def bdb; self; end
+            def dataset(name); name.to_s.upcase; end
+          }
+        }
+        before{ commons.requester = requester }
+        describe "with a block" do
+          subject{
+            commons.single_source(argv){|*args| args}
+          }
+          it{ should eq([requester, :hello]) }
+        end
+        describe "without block" do
+          it{ should eq("HELLO") }
+        end
+      end
+
+
+    end
+  end
+end

data/spec/unit/{formatter/plot → command/plot/gnuplot_utils}/test_to_data.rb

@@ -1,16 +1,16 @@
 require 'spec_helper'
 module Viiite
-  class Formatter::Plot
-    describe "to_data" do
+  class Command::Plot
+    describe GnuplotUtils, "#to_data" do
 
       let(:data) { [ {:x => 1, :y => 10}, {:x => 2, :y => 20} ] }
 
-      subject{ Formatter::Plot.to_data(data) }
+      subject{ GnuplotUtils.to_data(data) }
 
       it "should return the expected array" do
         subject.should == [ [1,2], [10,20] ]
       end
 
     end
-  end  
+  end
 end

data/spec/unit/{formatter/plot → command/plot/gnuplot_utils}/test_to_dataset.rb

@@ -1,14 +1,14 @@
 require 'spec_helper'
 module Viiite
-  class Formatter::Plot
-    describe "to_dataset" do
+  class Command::Plot
+    describe GnuplotUtils, "#to_dataset" do
 
       let(:tuple) {
-        {:title => "serie", 
+        {:title => "serie",
          :linewidth => 4,
          :data => [ {:x => 1, :y => 10}, {:x => 2, :y => 20} ] }
       }
-      subject{ Formatter::Plot.to_dataset(tuple) }
+      subject{ GnuplotUtils.to_dataset(tuple) }
 
       it "should return a correct dataset instance" do
         subject.should be_a(Gnuplot::DataSet)
@@ -18,5 +18,5 @@ module Viiite
       end
 
     end
-  end  
+  end
 end

data/spec/unit/{formatter/plot → command/plot/gnuplot_utils}/test_to_plot.rb

@@ -1,7 +1,7 @@
 require 'spec_helper'
 module Viiite
-  class Formatter::Plot
-    describe "to_plot" do
+  class Command::Plot
+    describe GnuplotUtils, "#to_plot" do
 
       let(:data)    { [ {:x => 1, :y => 10}, {:x => 2, :y => 20} ] }
 
@@ -9,7 +9,7 @@ module Viiite
 
       let(:plot)    { {:title => "plot", :series => [ dataset ] } }
 
-      subject{ Formatter::Plot.to_plot(plot) }
+      subject{ GnuplotUtils.to_plot(plot) }
 
       it "should return a correct plot instance" do
         subject.is_a?(Gnuplot::Plot).should be_true
@@ -17,5 +17,5 @@ module Viiite
       end
 
     end
-  end  
+  end
 end

data/spec/unit/command/test_run.rb

@@ -3,21 +3,34 @@ module Viiite
   class Command
     describe Run do
 
-      subject{ Run.run(argv) }
-
-      before{ redirect_io }
-      after { restore_io  }
+      let(:bench_iteration){ fixtures_folder+'/command/bench_iteration.rb' }
+      subject{
+        out, err = capture_io { Run.run(argv) }
+        rel = Alf::Reader.reader(StringIO.new(out)).to_rel
+        rel = rel.project([:tms], {:allbut => true})
+      }
 
       describe "when passed a benchmark file" do
-        let(:argv){ [bench_iteration] }
-        specify{
-          subject
-          $stdout.string.each_line do |line|
-            h = eval(line)
-            h.should be_a(Hash)
-            h[:tms].should be_a(Viiite::Tms)
-          end
+        let(:argv){ [ bench_iteration ] }
+        it{ should eq(Alf::Relation[{:bench => :times}]) }
+      end
+
+      describe "with --runs" do
+        let(:argv){ [ bench_iteration, "--runs=2" ] }
+        let(:expected){
+          Alf::Relation[{:bench => :times, :run => 0},
+                        {:bench => :times, :run => 1}]
+        }
+        it{ should eq(expected) }
+      end
+
+      describe "with --runs and --run-key" do
+        let(:argv){ [ bench_iteration, "--runs=2", "--run-key=hello" ] }
+        let(:expected){
+          Alf::Relation[{:bench => :times, :hello => 0},
+                        {:bench => :times, :hello => 1}]
         }
+        it{ should eq(expected) }
       end
 
     end

data/spec/unit/{test_runner.rb → test_benchmark.rb}

@@ -1,16 +1,16 @@
 require 'spec_helper'
 module Viiite
-  describe Runner do
-    
-    it "should be definable with Viiite.bm" do
-      b = Viiite.bm do |viiite|
+  describe Benchmark do
+
+    it "should be definable with Viiite.bench" do
+      b = Viiite.bench do |viiite|
         viiite.report{ 1 + 1 }
       end
-      b.should be_kind_of(Viiite::Runner)
+      b.should be_kind_of(Viiite::Benchmark)
     end
 
     it "should be executable" do
-      b = Viiite.bm do |viiite|
+      b = Viiite.bench do |viiite|
         viiite.report{ 1 + 1 }
       end
       res = []
@@ -24,7 +24,7 @@ module Viiite
     end
 
     it "should be enumerable" do
-      b = Viiite.bm do |viiite|
+      b = Viiite.bench do |viiite|
         viiite.report{ 1 + 1 }
       end
       res = b.to_a
@@ -32,10 +32,10 @@ module Viiite
       res.size.should == 1
       res.first[:tms].should be_kind_of(Viiite::Tms)
     end
-    
+
     it "should support variation points" do
-      b = Viiite.bm do |viiite|
-        2.times do |i| 
+      b = Viiite.bench do |viiite|
+        2.times do |i|
           viiite.variation_point(:"#run", i)
           viiite.report do end
         end
@@ -45,7 +45,7 @@ module Viiite
     end
 
     it "should support ranging over values" do
-      b = Viiite.bm do |viiite|
+      b = Viiite.bench do |viiite|
         viiite.range_over [10, 100, 1000], :times do |t|
           viiite.report do end
         end
@@ -53,5 +53,24 @@ module Viiite
       b.to_a.collect{|t| t[:times]}.should == [10, 100, 1000]
     end
 
+   it "should support nested #with, #variation_point and #range_over" do
+      Viiite.bench do |r|
+        r.variation_point :all, true
+        r.variation_point(:ruby, :ruby) do
+          r.variation_point :for_bench1, true
+          r.range_over(1..2, :i) do
+            r.report(:bench1) {}
+          end
+        end
+        r.with(:a => :b) do
+          r.report(:bench2) {}
+        end
+      end.to_rel.project([:tms], {:allbut => true}).should == Alf::Relation[
+        {:all => true, :ruby => :ruby, :for_bench1 => true, :i => 1, :bench => :bench1},
+        {:all => true, :ruby => :ruby, :for_bench1 => true, :i => 2, :bench => :bench1},
+        {:all => true, :a => :b, :bench => :bench2}
+      ]
+    end
+
   end
 end

data/spec/unit/test_viiite.rb

@@ -1,12 +1,25 @@
 require 'spec_helper'
 describe Viiite do
-  
+
   it "should have a version number" do
     Viiite.const_defined?(:VERSION).should be_true
   end
 
-  it "should provide a way to have short ruby descr" do
-    Viiite.which_ruby.should_not be_empty
+  it "should provide a way to have a short ruby description" do
+    {
+      'ruby 1.8.7 (2011-02-18 patchlevel 334) [x86_64-linux]' => 'ruby 1.8.7p334',
+      'ruby 1.8.7 (2011-06-30 patchlevel 352) [x86_64-linux]' => 'ruby 1.8.7p352',
+      'ruby 1.8.7 (2011-02-18 patchlevel 334) [x86_64-linux], MBARI 0x6770, Ruby Enterprise Edition 2011.03' => 'ree 2011.03',
+      'ruby 1.9.2p290 (2011-07-09 revision 32553) [x86_64-linux]' => 'ruby 1.9.2p290',
+      'ruby 1.9.3dev (2011-07-31 revision 32789) [x86_64-linux]' => 'ruby 1.9.3dev',
+      'ruby 1.9.4dev (2011-08-24 trunk 33047) [x86_64-linux]' => 'ruby 1.9.4dev',
+      'rubinius 1.2.5dev (1.8.7 489d5384 yyyy-mm-dd JI) [x86_64-unknown-linux-gnu]' => 'rubinius 1.2.5dev',
+      'rubinius 2.0.0dev (1.8.7 d705d318 yyyy-mm-dd JI) [x86_64-unknown-linux-gnu]' => 'rubinius 2.0.0dev',
+      'jruby 1.6.3 (ruby-1.8.7-p330) (2011-07-07 965162f) (OpenJDK 64-Bit Server VM 1.6.0_22) [linux-amd64-java]' => 'jruby 1.6.3',
+      'jruby 1.7.0.dev (ruby-1.8.7-p330) (2011-08-24 7b9f999) (OpenJDK 64-Bit Server VM 1.6.0_22) [linux-amd64-java]' => 'jruby 1.7.0.dev',
+    }.each_pair { |description, short|
+      Viiite.short_ruby_description(description).should == short
+    }
   end
-  
+
 end

data/spec/unit/tms/test_attributes.rb

@@ -0,0 +1,11 @@
+require 'spec_helper'
+module Viiite
+  describe Tms, "#attributes" do
+    subject { Tms.new(1.0, 2.0, 3.0, 4.0, 5.0) }
+    its(:utime)  { should eq 1.0 }
+    its(:stime)  { should eq 2.0 }
+    its(:cutime) { should eq 3.0 }
+    its(:cstime) { should eq 4.0 }
+    its(:real)   { should eq 5.0 }
+  end
+end

data/spec/unit/tms/test_coerce.rb

@@ -6,40 +6,28 @@ module Viiite
 
     describe "from zero" do
       let(:arg){ 0.0 }
-      specify{ 
-        subject.should be_a(Tms)
-        subject.to_a.should eq([0.0, 0.0, 0.0, 0.0, 0.0]) 
-      }
+      it { should eq Tms[0.0, 0.0, 0.0, 0.0, 0.0] }
     end
 
     describe "from one" do
       let(:arg){ 1.0 }
-      specify{ 
-        subject.should be_a(Tms)
-        subject.to_a.should eq([1.0, 0.0, 0.0, 0.0, 0.0]) 
-      }
+      it { should eq Tms[1.0, 0.0, 0.0, 0.0, 0.0] }
     end
 
     describe "from a complete hash" do
       let(:arg){ {
-        :utime => 1.0, 
-        :stime => 2.0, 
-        :cutime => 3.0, 
-        :cstime => 4.0, 
-        :real => 5.0, 
-      } } 
-      specify{ 
-        subject.should be_a(Tms)
-        subject.to_a.should eq([1.0, 2.0, 3.0, 4.0, 5.0]) 
-      }
+        :utime => 1.0,
+        :stime => 2.0,
+        :cutime => 3.0,
+        :cstime => 4.0,
+        :real => 5.0,
+      } }
+      it { should eq Tms[1.0, 2.0, 3.0, 4.0, 5.0] }
     end
 
     describe "from an array" do
-      let(:arg){ [1.0, 2.0, 3.0, 4.0, 5.0] } 
-      specify{ 
-        subject.should be_a(Tms)
-        subject.to_a.should eq([1.0, 2.0, 3.0, 4.0, 5.0]) 
-      }
+      let(:arg){ [1.0, 2.0, 3.0, 4.0, 5.0] }
+      it { should eq Tms[1.0, 2.0, 3.0, 4.0, 5.0] }
     end
 
   end

data/spec/unit/tms/test_conversions.rb

@@ -0,0 +1,23 @@
+require 'spec_helper'
+module Viiite
+  describe Tms, "conversions" do
+
+    let(:tms) { Tms.new(1.0, 2.0, 3.0, 4.0, 5.0) }
+
+    specify '#to_s' do
+      tms.to_s.should eq "  1.000000   2.000000  10.000000 (  5.000000)"
+    end
+
+    specify '#to_a' do
+      tms.to_a.should eq [1.0, 2.0, 3.0, 4.0, 5.0]
+    end
+
+    specify '#to_h' do
+      tms.to_h.should eq :utime=>1.0, :stime=>2.0, :cutime=>3.0, :cstime=>4.0, :real=>5.0
+    end
+
+    specify '#to_ruby_literal' do
+      eval(tms.to_ruby_literal).should eq tms
+    end
+  end
+end

data/spec/unit/tms/test_operations.rb

@@ -0,0 +1,22 @@
+require 'spec_helper'
+module Viiite
+  describe Tms, "operations: +,-,*,/" do
+
+    let(:tms){ Tms.new(1.0, 2.0, 3.0, 4.0, 5.0) }
+
+    specify "with an integer" do
+      (tms + 2).should eq Tms[3.0, 4.0, 5.0, 6.0, 7.0]
+      (tms / 2).should eq Tms[0.5, 1.0, 1.5, 2.0, 2.5]
+    end
+
+    specify "with another tms" do
+      (tms - tms).should eq Tms[0.0, 0.0, 0.0, 0.0, 0.0]
+      (tms / tms).should eq Tms[1.0, 1.0, 1.0, 1.0, 1.0]
+    end
+
+    specify "the other way round" do
+      (2 + tms).should eq Tms[3.0, 4.0, 5.0, 6.0, 7.0]
+    end
+
+  end
+end