alf-shell 0.13.0

data/spec/integration/rank/rank_1.cmd

@@ -0,0 +1 @@
+alf --text rank parts -- weight

data/spec/integration/rank/rank_1.stdout

@@ -0,0 +1,10 @@
++------+-------+--------+---------+--------+-------+
+| :pid | :name | :color | :weight | :city  | :rank |
++------+-------+--------+---------+--------+-------+
+| P1   | Nut   | Red    |  12.000 | London |     0 |
+| P5   | Cam   | Blue   |  12.000 | Paris  |     0 |
+| P4   | Screw | Red    |  14.000 | London |     2 |
+| P3   | Screw | Blue   |  17.000 | Oslo   |     3 |
+| P2   | Bolt  | Green  |  17.000 | Paris  |     3 |
+| P6   | Cog   | Red    |  19.000 | London |     5 |
++------+-------+--------+---------+--------+-------+

data/spec/integration/rank/rank_2.cmd

@@ -0,0 +1 @@
+alf --text rank parts -- weight -- pos

data/spec/integration/rank/rank_2.stdout

@@ -0,0 +1,10 @@
++------+-------+--------+---------+--------+------+
+| :pid | :name | :color | :weight | :city  | :pos |
++------+-------+--------+---------+--------+------+
+| P1   | Nut   | Red    |  12.000 | London |    0 |
+| P5   | Cam   | Blue   |  12.000 | Paris  |    0 |
+| P4   | Screw | Red    |  14.000 | London |    2 |
+| P3   | Screw | Blue   |  17.000 | Oslo   |    3 |
+| P2   | Bolt  | Green  |  17.000 | Paris  |    3 |
+| P6   | Cog   | Red    |  19.000 | London |    5 |
++------+-------+--------+---------+--------+------+

data/spec/integration/rank/rank_3.cmd

@@ -0,0 +1 @@
+alf --text rank parts -- weight pid

data/spec/integration/rank/rank_3.stdout

@@ -0,0 +1,10 @@
++------+-------+--------+---------+--------+-------+
+| :pid | :name | :color | :weight | :city  | :rank |
++------+-------+--------+---------+--------+-------+
+| P1   | Nut   | Red    |  12.000 | London |     0 |
+| P5   | Cam   | Blue   |  12.000 | Paris  |     1 |
+| P4   | Screw | Red    |  14.000 | London |     2 |
+| P2   | Bolt  | Green  |  17.000 | Paris  |     3 |
+| P3   | Screw | Blue   |  17.000 | Oslo   |     4 |
+| P6   | Cog   | Red    |  19.000 | London |     5 |
++------+-------+--------+---------+--------+-------+

data/spec/integration/rank/rank_4.cmd

@@ -0,0 +1 @@
+alf rank parts -- weight desc -- position

data/spec/integration/rank/rank_4.stdout

@@ -0,0 +1,6 @@
+{:pid => "P6", :name => "Cog", :color => "Red", :weight => 19.0, :city => "London", :position => 0}
+{:pid => "P2", :name => "Bolt", :color => "Green", :weight => 17.0, :city => "Paris", :position => 1}
+{:pid => "P3", :name => "Screw", :color => "Blue", :weight => 17.0, :city => "Oslo", :position => 1}
+{:pid => "P4", :name => "Screw", :color => "Red", :weight => 14.0, :city => "London", :position => 3}
+{:pid => "P5", :name => "Cam", :color => "Blue", :weight => 12.0, :city => "Paris", :position => 4}
+{:pid => "P1", :name => "Nut", :color => "Red", :weight => 12.0, :city => "London", :position => 4}

data/spec/integration/rank/rank_5.cmd

@@ -0,0 +1 @@
+alf rank parts -- weight desc pid asc -- position

data/spec/integration/rank/rank_5.stdout

@@ -0,0 +1,6 @@
+{:pid => "P6", :name => "Cog", :color => "Red", :weight => 19.0, :city => "London", :position => 0}
+{:pid => "P2", :name => "Bolt", :color => "Green", :weight => 17.0, :city => "Paris", :position => 1}
+{:pid => "P3", :name => "Screw", :color => "Blue", :weight => 17.0, :city => "Oslo", :position => 2}
+{:pid => "P4", :name => "Screw", :color => "Red", :weight => 14.0, :city => "London", :position => 3}
+{:pid => "P1", :name => "Nut", :color => "Red", :weight => 12.0, :city => "London", :position => 4}
+{:pid => "P5", :name => "Cam", :color => "Blue", :weight => 12.0, :city => "Paris", :position => 5}

data/spec/integration/rename/rename_0.cmd

@@ -0,0 +1 @@
+alf --text rename            suppliers -- name supplier_name city supplier_city

data/spec/integration/rename/rename_0.stdout

@@ -0,0 +1,9 @@
++------+----------------+---------+----------------+
+| :sid | :supplier_name | :status | :supplier_city |
++------+----------------+---------+----------------+
+| S1   | Smith          |      20 | London         |
+| S2   | Jones          |      10 | Paris          |
+| S3   | Blake          |      30 | Paris          |
+| S4   | Clark          |      20 | London         |
+| S5   | Adams          |      30 | Athens         |
++------+----------------+---------+----------------+

data/spec/integration/restrict/restrict_0.cmd

@@ -0,0 +1 @@
+alf --text restrict suppliers -- "status > 20"

data/spec/integration/restrict/restrict_0.stdout

@@ -0,0 +1,6 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S3   | Blake |      30 | Paris  |
+| S5   | Adams |      30 | Athens |
++------+-------+---------+--------+

data/spec/integration/restrict/restrict_1.cmd

@@ -0,0 +1 @@
+alf --text restrict suppliers -- city "'London'"

data/spec/integration/restrict/restrict_1.stdout

@@ -0,0 +1,6 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S1   | Smith |      20 | London |
+| S4   | Clark |      20 | London |
++------+-------+---------+--------+

data/spec/integration/show/show_base.cmd

@@ -0,0 +1 @@
+alf show suppliers

data/spec/integration/show/show_base.stdout

@@ -0,0 +1,5 @@
+{:sid => "S1", :name => "Smith", :status => 20, :city => "London"}
+{:sid => "S2", :name => "Jones", :status => 10, :city => "Paris"}
+{:sid => "S3", :name => "Blake", :status => 30, :city => "Paris"}
+{:sid => "S4", :name => "Clark", :status => 20, :city => "London"}
+{:sid => "S5", :name => "Adams", :status => 30, :city => "Athens"}

data/spec/integration/show/show_base_sort_1.cmd

@@ -0,0 +1 @@
+alf show --text suppliers -- city asc sid asc

data/spec/integration/show/show_base_sort_1.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S5   | Adams |      30 | Athens |
+| S1   | Smith |      20 | London |
+| S4   | Clark |      20 | London |
+| S2   | Jones |      10 | Paris  |
+| S3   | Blake |      30 | Paris  |
++------+-------+---------+--------+

data/spec/integration/show/show_base_sort_2.cmd

@@ -0,0 +1 @@
+alf show --text suppliers -- city asc status desc sid asc

data/spec/integration/show/show_base_sort_2.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S5   | Adams |      30 | Athens |
+| S1   | Smith |      20 | London |
+| S4   | Clark |      20 | London |
+| S3   | Blake |      30 | Paris  |
+| S2   | Jones |      10 | Paris  |
++------+-------+---------+--------+

data/spec/integration/show/show_conflictual.cmd

@@ -0,0 +1 @@
+alf --yaml show suppliers --rash

data/spec/integration/show/show_conflictual.stdout

@@ -0,0 +1,5 @@
+{:sid => "S1", :name => "Smith", :status => 20, :city => "London"}
+{:sid => "S2", :name => "Jones", :status => 10, :city => "Paris"}
+{:sid => "S3", :name => "Blake", :status => 30, :city => "Paris"}
+{:sid => "S4", :name => "Clark", :status => 20, :city => "London"}
+{:sid => "S5", :name => "Adams", :status => 30, :city => "Athens"}

data/spec/integration/show/show_ff.cmd

@@ -0,0 +1 @@
+alf show --text parts --ff=%.6f

data/spec/integration/show/show_ff.stdout

@@ -0,0 +1,10 @@
++------+-------+--------+-----------+--------+
+| :pid | :name | :color | :weight   | :city  |
++------+-------+--------+-----------+--------+
+| P1   | Nut   | Red    | 12.000000 | London |
+| P2   | Bolt  | Green  | 17.000000 | Paris  |
+| P3   | Screw | Blue   | 17.000000 | Oslo   |
+| P4   | Screw | Red    | 14.000000 | London |
+| P5   | Cam   | Blue   | 12.000000 | Paris  |
+| P6   | Cog   | Red    | 19.000000 | London |
++------+-------+--------+-----------+--------+

data/spec/integration/show/show_rash.cmd

@@ -0,0 +1 @@
+alf show suppliers --rash

data/spec/integration/show/show_rash.stdout

@@ -0,0 +1,5 @@
+{:sid => "S1", :name => "Smith", :status => 20, :city => "London"}
+{:sid => "S2", :name => "Jones", :status => 10, :city => "Paris"}
+{:sid => "S3", :name => "Blake", :status => 30, :city => "Paris"}
+{:sid => "S4", :name => "Clark", :status => 20, :city => "London"}
+{:sid => "S5", :name => "Adams", :status => 30, :city => "Athens"}

data/spec/integration/show/show_rash_pretty.cmd

@@ -0,0 +1 @@
+alf show suppliers --rash --pretty

data/spec/integration/show/show_rash_pretty.stdout

@@ -0,0 +1,30 @@
+{
+  :sid => "S1",
+  :name => "Smith",
+  :status => 20,
+  :city => "London"
+}
+{
+  :sid => "S2",
+  :name => "Jones",
+  :status => 10,
+  :city => "Paris"
+}
+{
+  :sid => "S3",
+  :name => "Blake",
+  :status => 30,
+  :city => "Paris"
+}
+{
+  :sid => "S4",
+  :name => "Clark",
+  :status => 20,
+  :city => "London"
+}
+{
+  :sid => "S5",
+  :name => "Adams",
+  :status => 30,
+  :city => "Athens"
+}

data/spec/integration/show/show_yaml.cmd

@@ -0,0 +1 @@
+alf show suppliers --yaml -- sid asc

data/spec/integration/show/show_yaml.stdout

@@ -0,0 +1,22 @@
+---
+- :sid: S1
+  :name: Smith
+  :status: 20
+  :city: London
+- :sid: S2
+  :name: Jones
+  :status: 10
+  :city: Paris
+- :sid: S3
+  :name: Blake
+  :status: 30
+  :city: Paris
+- :sid: S4
+  :name: Clark
+  :status: 20
+  :city: London
+- :sid: S5
+  :name: Adams
+  :status: 30
+  :city: Athens
+

data/spec/integration/sort/sort_0.cmd

@@ -0,0 +1 @@
+alf --text sort suppliers -- name

data/spec/integration/sort/sort_0.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S5   | Adams |      30 | Athens |
+| S3   | Blake |      30 | Paris  |
+| S4   | Clark |      20 | London |
+| S2   | Jones |      10 | Paris  |
+| S1   | Smith |      20 | London |
++------+-------+---------+--------+

data/spec/integration/sort/sort_1.cmd

@@ -0,0 +1 @@
+alf --text sort suppliers -- name desc

data/spec/integration/sort/sort_1.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S1   | Smith |      20 | London |
+| S2   | Jones |      10 | Paris  |
+| S4   | Clark |      20 | London |
+| S3   | Blake |      30 | Paris  |
+| S5   | Adams |      30 | Athens |
++------+-------+---------+--------+

data/spec/integration/sort/sort_2.cmd

@@ -0,0 +1 @@
+alf --text sort suppliers -- city name

data/spec/integration/sort/sort_2.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S5   | Adams |      30 | Athens |
+| S4   | Clark |      20 | London |
+| S1   | Smith |      20 | London |
+| S3   | Blake |      30 | Paris  |
+| S2   | Jones |      10 | Paris  |
++------+-------+---------+--------+

data/spec/integration/sort/sort_3.cmd

@@ -0,0 +1 @@
+alf --text sort suppliers -- city desc name asc

data/spec/integration/sort/sort_3.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S3   | Blake |      30 | Paris  |
+| S2   | Jones |      10 | Paris  |
+| S4   | Clark |      20 | London |
+| S1   | Smith |      20 | London |
+| S5   | Adams |      30 | Athens |
++------+-------+---------+--------+

data/spec/integration/summarize/summarize_0.cmd

@@ -0,0 +1 @@
+alf --text summarize supplies -- sid -- total_qty "sum{ qty }"

data/spec/integration/summarize/summarize_0.stdout

@@ -0,0 +1,8 @@
++------+------------+
+| :sid | :total_qty |
++------+------------+
+| S1   |       1300 |
+| S2   |        700 |
+| S3   |        200 |
+| S4   |        900 |
++------+------------+

data/spec/integration/test_shell.rb

@@ -0,0 +1,56 @@
+require 'spec_helper'
+
+def wlang(str, binding)
+  str.gsub(/\$\(([\S]+)\)/){ Kernel.eval($1, binding) }
+end
+
+def _(path, file)
+  File.expand_path("../#{path}", file)
+end
+
+describe "Alf's alf command / " do
+
+  Path.dir.glob('**/*.cmd').each do |input|
+    cmd = wlang(input.readlines.first, binding)
+    specify{ cmd.should =~ /^alf / }
+  
+    describe "#{input.basename}: #{cmd}" do
+      let(:argv)            { Quickl.parse_commandline_args(cmd)[1..-1] }
+      let(:stdout)          { input.sub_ext('.stdout') }
+      let(:stderr)          { input.sub_ext('.stderr') }
+      let(:stdout_expected) { stdout.exists? ? wlang(stdout.read, binding) : "" }
+      let(:stderr_expected) { stderr.exists? ? wlang(stderr.read, binding) : "" }
+
+      before{ 
+        $oldstdout = $stdout 
+        $oldstderr = $stderr
+        $stdout = StringIO.new
+        $stderr = StringIO.new
+      }
+      after { 
+        $stdout = $oldstdout
+        $stderr = $oldstderr
+        $oldstdout = nil 
+        $oldstderr = nil 
+      }
+      
+      specify{
+        begin 
+          dir = Path.relative('__database__')
+          main = Alf::Shell::Main.new
+          main.database = Alf.connect(dir)
+          main.run(argv, __FILE__)
+        rescue => ex
+          begin
+            Alf::Shell::Main.handle_error(ex, main)
+          rescue SystemExit
+            $stdout << "SystemExit" << "\n"
+          end
+        end
+        $stdout.string.should(eq(stdout_expected))
+        $stderr.string.should(eq(stderr_expected))
+      }
+    end
+  end
+    
+end

data/spec/integration/union/union_0.cmd

@@ -0,0 +1 @@
+alf --text union             suppliers suppliers

data/spec/integration/union/union_0.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S1   | Smith |      20 | London |
+| S2   | Jones |      10 | Paris  |
+| S3   | Blake |      30 | Paris  |
+| S4   | Clark |      20 | London |
+| S5   | Adams |      30 | Athens |
++------+-------+---------+--------+

data/spec/integration/unwrap/unwrap_0.cmd

@@ -0,0 +1 @@
+alf --text unwrap            suppliers -- loc_and_status

data/spec/integration/unwrap/unwrap_0.stdout

@@ -0,0 +1,9 @@
++------+-------+---------+--------+
+| :sid | :name | :status | :city  |
++------+-------+---------+--------+
+| S1   | Smith |      20 | London |
+| S2   | Jones |      10 | Paris  |
+| S3   | Blake |      30 | Paris  |
+| S4   | Clark |      20 | London |
+| S5   | Adams |      30 | Athens |
++------+-------+---------+--------+

data/spec/integration/wrap/wrap_0.cmd

@@ -0,0 +1 @@
+alf --text wrap suppliers -- city status -- loc_and_status

data/spec/integration/wrap/wrap_0.stdout

@@ -0,0 +1,9 @@
++------+-------+--------------------------------+
+| :sid | :name | :loc_and_status                |
++------+-------+--------------------------------+
+| S1   | Smith | {:city=>"London", :status=>20} |
+| S2   | Jones | {:city=>"Paris", :status=>10}  |
+| S3   | Blake | {:city=>"Paris", :status=>30}  |
+| S4   | Clark | {:city=>"London", :status=>20} |
+| S5   | Adams | {:city=>"Athens", :status=>30} |
++------+-------+--------------------------------+

data/spec/spec_helper.rb

@@ -0,0 +1,21 @@
+$LOAD_PATH.unshift File.expand_path('../../lib', __FILE__)
+require 'alf-shell'
+require "rspec"
+
+module Helpers
+
+  def examples_database(&bl)
+    Alf.examples
+  end
+
+  def suppliers
+    Alf::Algebra.named_operand(:suppliers, examples_database)
+  end
+
+end
+
+RSpec.configure do |c|
+  c.include Helpers
+  c.extend  Helpers
+  c.filter_run_excluding :ruby19 => (RUBY_VERSION < "1.9")
+end

data/spec/test_shell.rb

@@ -0,0 +1,10 @@
+require 'spec_helper'
+module Alf
+  describe Shell do
+
+    it "should have a version number" do
+      Shell.const_defined?(:VERSION).should be_true
+    end
+
+  end
+end

data/spec/unit/doc_manager/dynamic.md

@@ -0,0 +1 @@
+#(command_name)

data/spec/unit/doc_manager/example.md

@@ -0,0 +1 @@
+  !(alf autonum suppliers -- unique_id)

data/spec/unit/doc_manager/example_1.txt

@@ -0,0 +1,11 @@
+  $ alf autonum suppliers -- unique_id
+  
+    +------+-------+---------+--------+------------+
+    | :sid | :name | :status | :city  | :unique_id |
+    +------+-------+---------+--------+------------+
+    | S1   | Smith |      20 | London |          0 |
+    | S2   | Jones |      10 | Paris  |          1 |
+    | S3   | Blake |      30 | Paris  |          2 |
+    | S4   | Clark |      20 | London |          3 |
+    | S5   | Adams |      30 | Athens |          4 |
+    +------+-------+---------+--------+------------+