alf 0.12.2 → 0.13.0

data/spec/integration/lispy/test_relation.rb

@@ -1,37 +0,0 @@
-require 'spec_helper'
-module Alf
-  describe Lispy, "Relation(...)" do
-    let(:lispy){ Alf.lispy }
-    subject{ lispy.Relation(*args) }
-
-    describe 'on a single tuple' do
-      let(:args){ [{:name => "Alf"}] }
-      it{ should eq(Relation[*args]) }
-    end
-
-    describe 'on two tuples' do
-      let(:args){ [{:name => "Alf"}, {:name => "Lispy"}] }
-      it{ should eq(Relation[*args]) }
-    end
-
-    describe 'on a Symbol' do
-      let(:args){ [:suppliers] }
-      specify{ 
-        subject.should eq(lispy.environment.dataset(:suppliers).to_rel) 
-      }
-    end
-
-    describe "on the documentation example" do
-      specify {
-        lispy.evaluate{
-          Relation(
-            Tuple(:pid => 'P1', :name => 'Nut',   :color => 'red',   :heavy => true ),
-            Tuple(:pid => 'P2', :name => 'Bolt',  :color => 'green', :heavy => false),
-            Tuple(:pid => 'P3', :name => 'Screw', :color => 'blue',  :heavy => false)
-          )      
-        }.should be_a(Relation)
-      }
-    end
-
-  end
-end

data/spec/integration/lispy/test_run.rb

@@ -1,40 +0,0 @@
-require 'spec_helper'
-module Alf
-  describe Lispy, ".run" do
-
-    let(:cities){Relation[
-      {:city => "London"},
-      {:city => "Paris"},
-      {:city => "Athens"}
-    ]}
-
-    let(:lispy){ Alf.lispy(Environment.examples) }
-    subject{ lispy.run(args).to_rel }
-
-    describe "without any pipe, on a String" do
-      let(:args){ "project suppliers -- city" }
-      it{ should eq(cities) }
-    end
-
-    describe "without any pipe, on an Array" do
-      let(:args){ %w{project suppliers -- city} }
-      it{ should eq(cities) }
-    end
-
-    describe "with alf explicitely" do
-      let(:args){ %w{alf project suppliers -- city} }
-      it{ should eq(cities) }
-    end
-
-    describe "with piped commands" do
-      let(:args){ %w{alf project suppliers -- city | alf extend -- upcased city.upcase} }
-      it{ should eq(cities.extend(:upcased => lambda{ city.upcase })) }
-    end
-
-    describe "with piped commands and a dyadic op" do
-      let(:args){ %w{alf project suppliers -- city | alf matching suppliers} }
-      it{ should eq(cities) }
-    end
-
-  end
-end

data/spec/integration/lispy/test_tuple.rb

@@ -1,36 +0,0 @@
-require 'spec_helper'
-module Alf
-  describe Lispy, "Tuple(...)" do
-    let(:lispy){ Alf.lispy }
-    subject{ lispy.Tuple(h) }
-
-    describe 'on an empty tuple' do
-      let(:h){ {} }
-      it{ should eq({}) }
-    end
-
-    describe 'on an valid tuple' do
-      let(:h){ {:name => "Alf"} }
-      it{ should eq({:name => "Alf"}) }
-    end
-
-    describe 'on an invalid tuple because of keys' do
-      let(:h){ {12 => "Alf"} }
-      specify{ lambda{subject}.should raise_error(ArgumentError) }
-    end
-
-    describe 'on an invalid tuple because of values' do
-      let(:h){ {:name => nil} }
-      specify{ lambda{subject}.should raise_error(ArgumentError) }
-    end
-
-    describe "on the documentation example" do
-      specify{
-        lispy.evaluate{
-          Tuple(:pid => 'P1', :name => 'Nut', :color => 'red', :heavy => true)
-        }.should eq(:pid => 'P1', :name => 'Nut', :color => 'red', :heavy => true)
-      }
-    end
-
-  end
-end

data/spec/integration/semantics/test_join.alf

@@ -1,9 +0,0 @@
-(specify "(join xxx, DUM) is DUM",
-  (rel_equal DUM, (join :suppliers, DUM)))
-(specify "(join DUM, xxx) is DUM",
-  (rel_equal DUM, (join DUM, :suppliers)))
-
-(specify "(join DEE, xxx) is xxx",
-  (rel_equal :suppliers, (join DEE, :suppliers)))
-(specify "(join xxx, DEE) is xxx",
-  (rel_equal :suppliers, (join :suppliers, DEE)))

data/spec/integration/semantics/test_minus.alf

@@ -1,5 +0,0 @@
-(specify \
-  "(minus (restrict ...) ...) should be equivalent to (restict ..., lambda{ not(...) })",
-  (rel_equal \
-    (minus :suppliers, (restrict :suppliers, lambda{ city == 'Paris' })),
-    (restrict :suppliers, lambda{ city != 'Paris' })))

data/spec/integration/semantics/test_project.alf

@@ -1,8 +0,0 @@
-cities = Relation(
-  Tuple(:city => 'London'), 
-  Tuple(:city => 'Paris'), 
-  Tuple(:city => 'Athens'))
-(specify \
-  "(project ..., [...]) should remove duplicates",
-  (rel_equal \
-    (project :suppliers, [:city]), cities))

data/spec/integration/semantics/test_rank.alf

@@ -1,34 +0,0 @@
-input = Relation(
-  Tuple(:id => 1, :weight => 10.0),
-  Tuple(:id => 2, :weight => 12.0),
-  Tuple(:id => 3, :weight => 12.0)
-)
-
-(specify "rank should respect < by default",
-  (rel_equal \
-    (Relation Tuple(:id => 1, :weight => 10.0, :rank => 0),
-              Tuple(:id => 2, :weight => 12.0, :rank => 1),
-              Tuple(:id => 3, :weight => 12.0, :rank => 1)),
-    (rank input, [:weight])))
-
-(specify "rank should support a strict order",
-  (rel_equal \
-    (Relation Tuple(:id => 1, :weight => 10.0, :rank => 0),
-              Tuple(:id => 2, :weight => 12.0, :rank => 1),
-              Tuple(:id => 3, :weight => 12.0, :rank => 2)),
-    (rank input, [:weight, :id])))
-      
-(specify "rank should support a reverse order",
-  (rel_equal \
-    (Relation Tuple(:id => 1, :weight => 10.0, :rank => 2),
-              Tuple(:id => 2, :weight => 12.0, :rank => 0),
-              Tuple(:id => 3, :weight => 12.0, :rank => 0)),
-    (rank input, [[:weight, :desc]])))
-
-(specify "rank should allow specifying a name",
-  (rel_equal \
-    (Relation Tuple(:id => 1, :weight => 10.0, :pos => 0),
-              Tuple(:id => 2, :weight => 12.0, :pos => 1),
-              Tuple(:id => 3, :weight => 12.0, :pos => 1)),
-    (rank input, [:weight], :pos)))
-      

data/spec/integration/shell/alf/alf_e.cmd

@@ -1 +0,0 @@
-alf -e "(restrict :suppliers, lambda{ status > 10})"

data/spec/integration/shell/alf/alf_e.stdout

@@ -1,4 +0,0 @@
-{:sid => "S1", :name => "Smith", :status => 20, :city => "London"}
-{: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/shell/alf/alf_env.cmd

@@ -1 +0,0 @@
-alf --env=$(_("shell/alf",__FILE__)) show rel

data/spec/integration/shell/alf/alf_env.stdout

@@ -1,5 +0,0 @@
-+--------+
-| :hello |
-+--------+
-| world  |
-+--------+

data/spec/integration/shell/alf/alf_env_sqlite.cmd

@@ -1 +0,0 @@
-alf --env=$(_("shell/alf/alf.db",__FILE__)) show suppliers

data/spec/integration/shell/alf/alf_env_sqlite.stdout

@@ -1,9 +0,0 @@
-+------+-------+---------+--------+
-| :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/shell/alf/alf_help.cmd

@@ -1 +0,0 @@
-alf --help

data/spec/integration/shell/alf/alf_help.stdout

@@ -1,69 +0,0 @@
-
-alf - Relational algebra at your fingertips
-
-SYNOPSIS
-
-    alf [--version] [--help] 
-    alf -e '(lispy command)'
-    alf [FILE.alf]
-    alf [alf opts] OPERATOR [operator opts] ARGS ...
-    alf help OPERATOR
-
-OPTIONS
-
-    -e, --execute                    Execute one line of script (Lispy API)
-    --rash                       Render output as ruby hashes
-    --text                       Render output as a text table
-    --yaml                       Render output as a yaml output
-    --csv                        Render output as a csv file
-    --env=ENV                    Set the environment to use
-    --input-reader=READER        Specify the kind of reader when reading on $stdin (rash,alf,csv,logs)
-    -Idirectory                      Specify $LOAD_PATH directory (may be used more than once)
-    -rlibrary                        Require the library, before executing alf
-    --[no-]pretty                Enable/disable pretty print best effort
-    -h, --help                       Show help
-    -v, --version                    Show version
-
-RELATIONAL OPERATORS
-
-    extend           Relational extension (additional, computed attributes)
-    project          Relational projection (clip + compact)
-    restrict         Relational restriction (aka where, predicate filtering)
-    rename           Relational renaming (rename some attributes)
-    union            Relational union
-    minus            Relational minus (aka difference)
-    intersect        Relational intersection (aka a logical and)
-    join             Relational join (and cartesian product)
-    matching         Relational matching (join + project back on left)
-    not-matching     Relational not matching (inverse of matching)
-    wrap             Relational wrapping (tuple-valued attributes)
-    unwrap           Relational un-wrapping (inverse of wrap)
-    group            Relational grouping (relation-valued attributes)
-    ungroup          Relational un-grouping (inverse of group)
-    summarize        Relational summarization (group-by + aggregate ops)
-    rank             Relational ranking (explicit tuple positions)
-
-EXPERIMENTAL RELATIONAL OPERATORS
-
-    quota       Generalized quota-queries (position, sum progression, etc.)
-    heading     Relational heading (print the relation type)
-
-NON-RELATIONAL OPERATORS
-
-    autonum       Extend its operand with an unique autonumber attribute
-    defaults      Force default values on missing/nil attributes
-    compact       Remove tuple duplicates
-    sort          Sort input tuples according to an order relation
-    clip          Clip input tuples to a subset of attributes
-    coerce        Force attribute coercion according to a heading
-    generator     Generate a relation with an auto-numbered attribute
-
-OTHER NON-RELATIONAL COMMANDS
-
-    exec     Executes an .alf file on current environment
-    help     Show help about a specific command
-    show     Output input tuples through a specific renderer (text, yaml, ...)
-
-See 'alf help COMMAND' for details about a specific command.
-
-SystemExit

data/spec/integration/shell/alf/alf_implicit.alf

@@ -1 +0,0 @@
-(restrict :suppliers, lambda{ status > 10 })

data/spec/integration/shell/alf/alf_implicit_exec.cmd

@@ -1 +0,0 @@
-alf $(_("shell/alf/alf_implicit.alf",__FILE__))

data/spec/integration/shell/alf/alf_implicit_exec.stdout

@@ -1,4 +0,0 @@
-{:sid => "S1", :name => "Smith", :status => 20, :city => "London"}
-{: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/shell/alf/alf_r.cmd

@@ -1 +0,0 @@
-alf -ruri extend suppliers -- uri "URI::parse(name).to_s"

data/spec/integration/shell/alf/alf_r.stdout

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

data/spec/integration/shell/alf/alf_version.cmd

@@ -1 +0,0 @@
-alf --version

data/spec/integration/shell/alf/alf_version.stdout

@@ -1,2 +0,0 @@
-alf $(Alf::VERSION) (c) 2011, Bernard Lambeau
-SystemExit

data/spec/integration/shell/alf/alf_yaml.cmd

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

data/spec/integration/shell/alf/alf_yaml.stdout

@@ -1,22 +0,0 @@
----
-- :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/shell/alf/rel.rash

@@ -1 +0,0 @@
-{:hello => "world"}

data/spec/integration/shell/autonum/autonum_0.cmd

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

data/spec/integration/shell/autonum/autonum_0.stdout

@@ -1,9 +0,0 @@
-+------+-------+---------+--------+----------+
-| :sid | :name | :status | :city  | :autonum |
-+------+-------+---------+--------+----------+
-| 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 |
-+------+-------+---------+--------+----------+

data/spec/integration/shell/autonum/autonum_1.cmd

@@ -1 +0,0 @@
-alf --text autonum suppliers -- unique_id

data/spec/integration/shell/autonum/autonum_1.stdout

@@ -1,9 +0,0 @@
-+------+-------+---------+--------+------------+
-| :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 |
-+------+-------+---------+--------+------------+

data/spec/integration/shell/clip/clip_0.cmd

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

data/spec/integration/shell/clip/clip_0.stdout

@@ -1,9 +0,0 @@
-+-------+--------+
-| :name | :city  |
-+-------+--------+
-| Smith | London |
-| Jones | Paris  |
-| Blake | Paris  |
-| Clark | London |
-| Adams | Athens |
-+-------+--------+

data/spec/integration/shell/clip/clip_1.cmd

@@ -1 +0,0 @@
-alf --text clip suppliers --allbut -- name city

data/spec/integration/shell/clip/clip_1.stdout

@@ -1,9 +0,0 @@
-+------+---------+
-| :sid | :status |
-+------+---------+
-| S1   |      20 |
-| S2   |      10 |
-| S3   |      30 |
-| S4   |      20 |
-| S5   |      30 |
-+------+---------+

data/spec/integration/shell/coerce/coerce_1.cmd

@@ -1 +0,0 @@
-alf coerce suppliers_csv -- sid Symbol status Integer

data/spec/integration/shell/coerce/coerce_1.stdout

@@ -1,5 +0,0 @@
-{: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/shell/compact/compact_0.cmd

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

data/spec/integration/shell/compact/compact_0.stdout

@@ -1,9 +0,0 @@
-+------+-------+---------+--------+
-| :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/shell/defaults/defaults_0.cmd

@@ -1 +0,0 @@
-alf --text defaults suppliers -- country "'Belgium'"

data/spec/integration/shell/defaults/defaults_0.stdout

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

data/spec/integration/shell/defaults/defaults_1.cmd

@@ -1 +0,0 @@
-alf --text defaults --strict suppliers -- country "'Belgium'"

data/spec/integration/shell/defaults/defaults_1.stdout

@@ -1,9 +0,0 @@
-+----------+
-| :country |
-+----------+
-| Belgium  |
-| Belgium  |
-| Belgium  |
-| Belgium  |
-| Belgium  |
-+----------+