piggly-nsd 2.3.3

data/spec/examples/tags_spec.rb

@@ -0,0 +1,285 @@
+require 'spec_helper'
+
+module Piggly
+
+describe Tags::AbstractTag do
+end
+
+describe Tags::EvaluationTag do
+end
+
+describe Tags::BlockTag do
+end
+
+describe Tags::UnconditionalBranchTag do
+end
+
+describe Tags::ConditionalLoopTag do
+end
+
+describe Tags::UnconditionalLoopTag do
+  before do
+    @tag = Tags::UnconditionalLoopTag.new('for-loop')
+  end
+
+  it "starts with state 00 (0b0000)" do
+    # - terminates normally
+    # - pass through
+    # - iterate only once
+    # - iterate more than once
+    @tag.state.should == 0b0000
+  end
+
+  it "detects state 01 (0b0001)" do
+    # - terminates normally
+    # - pass through
+    # - iterate only once
+    # + iterate more than once
+
+    # two iterations
+    @tag.ping('t')
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0001
+  end
+
+  it "detects state 02 (0b0010)" do
+    # - terminates normally
+    # - pass through
+    # + iterate only once
+    # - iterate more than once
+
+    # one iteration
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0010
+  end
+
+  it "detects state 03 (0b0011)" do
+    # - terminates normally
+    # - pass through
+    # + iterate only once
+    # + iterate more than once
+
+    # one iteration
+    @tag.ping('t')
+    @tag.ping('f')
+
+    # two iterations
+    @tag.ping('t')
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0011
+  end
+
+  it "detects state 04 (0b0100)" do
+    # - terminates normally
+    # + pass through
+    # - iterate only once
+    # - iterate more than once
+
+    # zero iterations
+    @tag.ping('f')
+
+    @tag.state.should == 0b0100
+  end
+
+  it "detects state 05 (0b0101)" do
+    # - terminates normally
+    # + pass through
+    # - iterate only once
+    # + iterate more than once
+
+    # zero iterations
+    @tag.ping('f')
+
+    # two iterations
+    @tag.ping('t')
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0101
+  end
+
+  it "detects state 06 (0b0110)" do
+    # - terminates normally
+    # + pass through
+    # + iterate only once
+    # - iterate more than once
+
+    # zero iterations
+    @tag.ping('f')
+
+    # one iteration
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0110
+  end
+
+  it "detects state 07 (0b0111)" do
+    # - terminates normally
+    # + pass through
+    # + iterate only once
+    # + iterate more than once
+    
+    # zero iterations
+    @tag.ping('f')
+
+    # one iteration
+    @tag.ping('t')
+    @tag.ping('f')
+
+    # two iterations
+    @tag.ping('t')
+    @tag.ping('t')
+    @tag.ping('f')
+
+    @tag.state.should == 0b0111
+  end
+
+  it "detects state 08 (0b1000)" do
+    # + terminates normally
+    # - pass through
+    # - iterate only once
+    # - iterate more than once
+
+    # TODO invalid
+    @tag.ping('@')
+
+    @tag.state.should == 0b1000
+  end
+
+  it "detects state 09 (0b1001)" do
+    # + terminates normally
+    # - pass through
+    # - iterate only once
+    # + iterate more than once
+
+    # iterate twice
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1001
+  end
+
+  it "detects state 10 (0b1010)" do
+    # + terminates normally
+    # - pass through
+    # + iterate only once
+    # - iterate more than once
+
+    # iterate once
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1010
+  end
+
+  it "detects state 11 (0b1011)" do
+    # + terminates normally
+    # - pass through
+    # + iterate only once
+    # + iterate more than once
+
+    # iterate once
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    # iterate twice
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1011
+  end
+
+  it "detects state 12 (0b1100)" do
+    # + terminates normally
+    # + pass through
+    # - iterate only once
+    # - iterate more than once
+
+    # TODO invalid
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1100
+  end
+
+  it "detects state 13 (0b1101)" do
+    # + terminates normally
+    # + pass through
+    # - iterate only once
+    # + iterate more than once
+
+    # iterate twice
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    # pass through
+    @tag.ping('f')
+
+    @tag.state.should == 0b1101
+  end
+
+  it "detects state 14 (0b1110)" do
+    # + terminates normally
+    # + pass through
+    # + iterate only once
+    # - iterate more than once
+    
+    # pass through
+    @tag.ping('f')
+
+    # iterate once
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1110
+  end
+
+  it "detects state 15 (0b1111)" do
+    # + terminates normally
+    # + pass through
+    # + iterate only once
+    # + iterate more than once
+
+    # pass through
+    @tag.ping('f')
+
+    # iterate once
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    # iterate twice
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('t')
+    @tag.ping('@')
+    @tag.ping('f')
+
+    @tag.state.should == 0b1111
+  end
+
+end
+
+describe Tags::ConditionalBranchTag do
+end
+
+end

data/spec/examples/util/cacheable_spec.rb

@@ -0,0 +1,41 @@
+require 'spec_helper'
+
+module Piggly
+
+=begin
+  describe Util::Cacheable do
+
+    class ExampleClass;           include Piggly::Util::Cacheable; end
+    class ExampleCacheClass;      include Piggly::Util::Cacheable; end
+    class PigglyExampleClassHTML; include Piggly::Util::Cacheable; end
+    class PigglyExampleHTMLClass; include Piggly::Util::Cacheable; end
+    class HTMLPiggly;             include Piggly::Util::Cacheable; end
+    class ExampleRedefined
+      include Piggly::Util::Cacheable
+      def self.cache_path(file)
+        'redefined'
+      end
+    end
+
+    before do
+      Config.stub(:cache_root).and_return('/')
+    end
+
+    it "installs class methods" do
+      ExampleClass.should respond_to(:cache_path)
+    end
+    
+    it "uses class name as cache subdirectory" do
+      FileUtils.should_receive(:makedirs).at_least(:once)
+
+      ExampleClass.cache_path('a.ext').should           =~ %r(/Example/a.ext$)
+      ExampleCacheClass.cache_path('a.ext').should      =~ %r(/ExampleCache/a.ext$)
+      PigglyExampleClassHTML.cache_path('a.ext').should =~ %r(/PigglyExampleClassHTML/a.ext$)
+      PigglyExampleHTMLClass.cache_path('a.ext').should =~ %r(/PigglyExampleHTML/a.ext$)
+      HTMLPiggly.cache_path('a.ext').should             =~ %r(/HTML/a.ext$)
+      ExampleRedefined.cache_path('a.ext').should       == 'redefined'
+    end
+  end
+=end
+
+end

data/spec/examples/util/enumerable_spec.rb

@@ -0,0 +1,64 @@
+require 'spec_helper'
+
+module Piggly::Util
+
+  describe Enumerable do
+    before do
+      @hash  = {:a => '%', :b => '#'}
+      @array = %w(a b c d)
+      @range = 'w'..'z'
+      @empty = []
+    end
+
+    describe "count" do
+      it "should default to `size' when no block is given" do
+        Enumerable.count(@hash).should == 2
+      end
+
+      it "should count items that satisfied block" do
+        Enumerable.count(@hash){ true }.should == @hash.size
+        Enumerable.count(@array){ false }.should == 0
+        Enumerable.count(@empty){ true }.should == @empty.size
+        Enumerable.count(@range){|c| c < 'z' }.should == 3
+      end
+    end
+
+    describe "sum" do
+      it "should append when no block is given" do
+        Enumerable.sum(@range).should == 'wxyz'
+        Enumerable.sum(@array).should == 'abcd'
+        Enumerable.sum(@empty).should == 0
+      end
+
+      it "should use block return value" do
+        Enumerable.sum(@range){ 100 }.should == 400
+        Enumerable.sum(@empty){ 100 }.should == 0
+      end
+    end
+
+    describe "group_by" do
+      it "should return a Hash" do
+        Enumerable.group_by(@array){ nil }.should be_a(Hash)
+      end
+
+      it "should collect elements into subcollections" do
+        Enumerable.group_by(@array){ :a }.should == { :a => @array }
+        Enumerable.group_by(@array){|x| x <= 'b'}.should == { true => %w(a b), false => %w(c d) }
+        Enumerable.group_by(@range){|x| x.to_i }.should == { 0 => %w(w x y z) }
+        Enumerable.group_by(@empty){ false }.should == {}
+      end
+    end
+
+    describe "index_by" do
+      it "should return a Hash" do
+        Enumerable.index_by(@array){ nil }.should be_a(Hash)
+      end
+
+      it "should collect only one element per group" do
+        Enumerable.index_by(@array){ nil }.should == { nil => 'd' }
+        Enumerable.index_by(@range){|x| x }.should == { 'w' => 'w', 'x' => 'x', 'y' => 'y', 'z' => 'z' }
+      end
+    end
+  end
+
+end

data/spec/examples/util/file_spec.rb

@@ -0,0 +1,40 @@
+require 'spec_helper'
+
+module Piggly::Util
+
+  describe File, "cache invalidation" do
+    before do
+      mtime = Hash['a' => 1,  'b' => 2,  'c' => 3]
+      allow(::File).to receive(:mtime) { |f| mtime.fetch(f) }
+      allow(::File).to receive(:exist?) { |f| mtime.include?(f) }
+    end
+
+    it "invalidates non-existant cache file" do
+      expect(File.stale?('d', 'a')).to eq(true)
+      expect(File.stale?('d', 'a', 'b')).to eq(true)
+    end
+
+    it "performs validation using file mtimes" do
+      expect(File.stale?('c', 'b')).not_to be_truthy
+      expect(File.stale?('c', 'a')).not_to be_truthy
+      expect(File.stale?('c', 'b', 'a')).not_to be_truthy
+      expect(File.stale?('c', 'a', 'b')).not_to be_truthy
+
+      expect(File.stale?('b', 'a')).not_to be_truthy
+      expect(File.stale?('b', 'c')).to be_truthy
+      expect(File.stale?('b', 'a', 'c')).to be_truthy
+      expect(File.stale?('b', 'c', 'a')).to be_truthy
+
+      expect(File.stale?('a', 'b')).to be_truthy
+      expect(File.stale?('a', 'c')).to be_truthy
+      expect(File.stale?('a', 'b', 'c')).to be_truthy
+      expect(File.stale?('a', 'c', 'b')).to be_truthy
+    end
+
+    it "assumes sources exist" do
+      expect{ File.stale?('a', 'd') }.to raise_error(StandardError)
+      expect{ File.stale?('c', 'a', 'x') }.to raise_error(StandardError)
+    end
+  end  
+
+end

data/spec/examples/util/process_queue_spec.rb

@@ -0,0 +1,16 @@
+require 'spec_helper'
+
+module Piggly
+
+  describe Util::ProcessQueue do
+    context "when empty" do
+    end
+
+    context "when less than @max items pending" do
+    end
+
+    context "when more than @max items pending" do
+    end
+  end
+
+end

data/spec/examples/util/thunk_spec.rb

@@ -0,0 +1,59 @@
+require 'spec_helper'
+
+module Piggly
+
+  describe Util::Thunk do
+
+    context "not already evaluated" do
+      before do
+        @work  = double('computation')
+        @thunk = Util::Thunk.new { @work.evaluate }
+      end
+
+      it "responds to thunk? without evaluating" do
+        expect(@work).not_to receive(:evaluate)
+        expect(@thunk.thunk?).to be_truthy
+      end
+
+      it "evaluates when force! is explicitly called" do
+        expect(@work).to receive(:evaluate).and_return(@work)
+        expect(@thunk.force!).to eq(@work)
+      end
+
+      it "evaluates when some other method is called" do
+        expect(@work).to receive(:evaluate).and_return(@work)
+        expect(@work).to receive(:something).and_return(@work)
+        expect(@thunk.something).to eq(@work)
+      end
+    end
+
+    context "previously evaluated" do
+      before do
+        @work = double('computation')
+        allow(@work).to receive(:evaluate).and_return(@work)
+
+        @thunk = Util::Thunk.new { @work.evaluate }
+        @thunk.force!
+      end
+
+      it "responds to thunk? without evaluating" do
+        expect(@work).not_to receive(:evaluate)
+        expect(@thunk.thunk?).to be_truthy
+      end
+
+      it "should not re-evaluate when force! is called" do
+        expect(@work).not_to receive(:evaluate)
+        @thunk.force!
+      end
+
+      it "should not re-evaluate when some other method is called" do
+        expect(@work).not_to receive(:evaluate)
+        expect(@work).to receive(:something).and_return(@work)
+        expect(@thunk.something).to eq(@work)
+      end
+    end
+
+  end
+
+end
+

data/spec/issues/007_spec.rb

@@ -0,0 +1,25 @@
+require "spec_helper"
+
+module Piggly
+  describe "github issue #7" do
+    include GrammarHelper
+
+    it "can loop over dynamic query results" do
+      node = parse(:stmtForLoop, "FOR r IN EXECUTE 'SELECT * FROM pg_user;' LOOP END LOOP;")
+      node.should be_statement
+
+      cond = node.find{|e| e.named?(:cond) }
+      cond.source_text.should == "EXECUTE 'SELECT * FROM pg_user;' "
+      cond.should be_sql
+    end
+
+    it "can loop over dynamic query results when query contains the word 'LOOP'" do
+      node = parse(:stmtForLoop, "FOR r IN EXECUTE 'SELECT * FROM pg_user.LOOP;' LOOP END LOOP;")
+      node.should be_statement
+
+      cond = node.find{|e| e.named?(:cond) }
+      cond.source_text.should == "EXECUTE 'SELECT * FROM pg_user.LOOP;' "
+      cond.should be_sql
+    end
+  end
+end

data/spec/issues/008_spec.rb

@@ -0,0 +1,73 @@
+require "spec_helper"
+
+module Piggly
+
+  describe "github issue #8" do
+    include GrammarHelper
+
+    context "with declare" do
+      it "doesn't require a space before the := symbol" do
+        node, rest = parse_some(:stmtDeclare, "declare a text:= 10; begin")
+      # node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "doesn't require a space after the := symbol" do
+        node, rest = parse_some(:stmtDeclare, "declare a text :=10;")
+        rest.should == ""
+      # node.count{|e| e.assignment? }.should == 1
+      end
+
+      it "doesn't require a space after the := symbol" do
+        node, rest = parse_some(:stmtDeclare, "declare a text :=10; begin")
+      # node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "allows escaped strings" do
+        node, rest = parse_some(:stmtDeclare, "declare a text :=E'\\001abc'; begin")
+      # node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "allows escaped octal characters" do
+        node, rest = parse_some(:stmtDeclare, "declare a text :=E'\\001abc'; begin")
+      # node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+    end
+
+    context "without declare" do
+      it "doesn't require a space before the := symbol" do
+        node, rest = parse_some(:statement, "a:= 10; begin")
+        node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "doesn't require a space after the := symbol" do
+        node = parse(:statement, "a :=10;")
+        node.should be_statement
+        node.count{|e| e.assignment? }.should == 1
+      end
+
+      it "doesn't require a space after the := symbol" do
+        node, rest = parse_some(:statement, "a :=10; begin")
+        node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "allows escaped strings" do
+        node, rest = parse_some(:statement, "a :=E'\\001abc'; begin")
+        node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+
+      it "allows escaped octal characters" do
+        node, rest = parse_some(:statement, "a :=E'\\001abc'; begin")
+        node.count{|e| e.assignment? }.should == 1
+        rest.should == "begin"
+      end
+    end
+
+  end
+end

data/spec/issues/018_spec.rb

@@ -0,0 +1,25 @@
+require "spec_helper"
+
+module Piggly
+  describe "github issue #18" do
+    include GrammarHelper
+
+      it "can parse the example" do
+        body = <<-SQL
+          DECLARE
+            schema TEXT = 'pg_catalog';
+            r RECORD;
+          BEGIN
+            FOR r IN EXECUTE 'SELECT * FROM ' || quote_ident(schema) || 'pg_user;'
+            LOOP
+              -- do nothing
+            END LOOP;
+          END;
+        SQL
+
+        node = parse(:start, body)
+        node.count{|e| e.for? }.should == 1
+        node.count{|e| e.comment? }.should == 1
+      end
+  end
+end

data/spec/issues/028_spec.rb

@@ -0,0 +1,48 @@
+require "spec_helper"
+
+module Piggly
+  describe "github issue #28" do
+    include GrammarHelper
+
+    it "can parse a GET STACKED DIAGNOSTICS statement" do
+      body = 'GET STACKED DIAGNOSTICS text_var1 = MESSAGE_TEXT, text_var2 = PG_EXCEPTION_DETAIL, text_var3 = PG_EXCEPTION_HINT;'
+
+      node = parse(:statement, body)
+      node.should be_statement
+    end
+
+    it "can parse a procedure with GET STACKED DIAGNOSTICS" do
+      body = <<-SQL
+      DECLARE
+        text_var1 text;
+        text_var2 text;
+        text_var3 text;
+      BEGIN
+        RETURN 1/0;
+      EXCEPTION WHEN SQLSTATE '22012' THEN
+        GET STACKED DIAGNOSTICS text_var1 = MESSAGE_TEXT,
+                                text_var2 = PG_EXCEPTION_DETAIL,
+                                text_var3 = PG_EXCEPTION_HINT;
+      END
+      SQL
+
+      node = parse(:start, body.strip)
+      node.count{|e| e.branch? }.should == 1 # catch
+      node.find{|e| e.branch? }.body.source_text.strip.should =~ /^GET.+HINT;/m
+    end
+
+    it "can parse WITH <> AS <> SELECT <> SQL query" do
+      body = <<-SQL
+      DECLARE
+      BEGIN
+        WITH n AS (SELECT first_name FROM users where id > 1000)
+          SELECT * FROM people WHERE people.first_name = n.first_name;
+        RETURN 1;
+      END
+      SQL
+
+      node = parse(:start, body.strip.downcase)
+      node.count{|e| e.sql? }.should == 1
+    end
+  end
+end