bmg 0.9.1 → 0.10.0

data/lib/bmg/sql/nodes/intersect.rb

@@ -0,0 +1,14 @@
+module Bmg
+  module Sql
+    module Intersect
+      include SetOperator
+
+      INTERSECT = "INTERSECT".freeze
+
+      def keyword
+        INTERSECT
+      end
+
+    end # module Intersect
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/limit_clause.rb

@@ -0,0 +1,19 @@
+module Bmg
+  module Sql
+    module LimitClause
+      include Expr
+
+      LIMIT = "LIMIT"
+
+      def limit
+        last.to_i
+      end
+
+      def to_sql(buffer, dialect)
+        buffer << LIMIT << SPACE << limit.to_s
+        buffer
+      end
+
+    end # module LimitClause
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/literal.rb

@@ -0,0 +1,18 @@
+module Bmg
+  module Sql
+    module Literal
+      include Expr
+      include Predicate::Expr
+
+      def would_be_name
+        nil
+      end
+
+      def to_sql(buffer, dialect)
+        to_sql_literal(buffer, last)
+        buffer
+      end
+
+    end # module Literal
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/name_intro.rb

@@ -0,0 +1,23 @@
+module Bmg
+  module Sql
+    module NameIntro
+      include Expr
+
+      def table_name
+        self[1]
+      end
+
+      def subquery
+        self[2]
+      end
+
+      def to_sql(buffer, dialect)
+        table_name.to_sql(buffer, dialect)
+        buffer << SPACE << AS << SPACE
+        subquery.to_sql(buffer, dialect, true)
+        buffer
+      end
+
+    end # module WithSpec
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/native_table_as.rb

@@ -0,0 +1,31 @@
+module Bmg
+  module Sql
+    module NativeTableAs
+      include Expr
+
+      def left
+        self[1]
+      end
+
+      def right
+        self[2]
+      end
+
+      def native_table
+        self[1].last
+      end
+
+      def as_name
+        self[2].last
+      end
+
+      def to_sql(buffer, dialect)
+        buffer << self[1].to_s
+        buffer << SPACE << AS << SPACE
+        self[2].to_sql(buffer, dialect)
+        buffer
+      end
+
+    end # module NativeTableAs
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/offset_clause.rb

@@ -0,0 +1,19 @@
+module Bmg
+  module Sql
+    module OffsetClause
+      include Expr
+
+      OFFSET = "OFFSET"
+
+      def offset
+        last.to_i
+      end
+
+      def to_sql(buffer, dialect)
+        buffer << OFFSET << SPACE << offset.to_s
+        buffer
+      end
+
+    end # module OffsetClause
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/order_by_clause.rb

@@ -0,0 +1,25 @@
+module Bmg
+  module Sql
+    module OrderByClause
+      include Expr
+
+      ORDER_BY = "ORDER BY".freeze
+
+      def to_ordering
+        @ordering ||= sexpr_body.map{|x|
+          [x.as_name.to_sym, x.direction.to_sym]
+        }
+      end
+
+      def to_sql(buffer, dialect)
+        buffer << ORDER_BY << SPACE
+        each_child do |item,index|
+          buffer << COMMA << SPACE unless index == 0
+          item.to_sql(buffer, dialect)
+        end
+        buffer
+      end
+
+    end # module OrderByClause
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/order_by_term.rb

@@ -0,0 +1,30 @@
+module Bmg
+  module Sql
+    module OrderByTerm
+      include Expr
+
+      def qualified_name
+        self[1]
+      end
+
+      def qualifier
+        qualified_name.qualifier
+      end
+
+      def as_name
+        qualified_name.as_name
+      end
+
+      def direction
+        last
+      end
+
+      def to_sql(buffer, dialect)
+        self[1].to_sql(buffer, dialect)
+        buffer << SPACE << direction.upcase
+        buffer
+      end
+
+    end # module OrderByTerm
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/qualified_name.rb

@@ -0,0 +1,32 @@
+module Bmg
+  module Sql
+    #
+    # [:qualified_name,
+    #   [:range_var_name `qualifier`],
+    #   [:column_name, `as_name`] ]
+    #
+    module QualifiedName
+      include Expr
+
+      def qualifier
+        self[1].qualifier
+      end
+
+      def as_name
+        last.as_name
+      end
+
+      def would_be_name
+        as_name
+      end
+
+      def to_sql(buffer, dialect)
+        self[1].to_sql(buffer, dialect)
+        buffer << '.'
+        self[2].to_sql(buffer, dialect)
+        buffer
+      end
+
+    end # module QualifiedName
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/range_var_name.rb

@@ -0,0 +1,17 @@
+module Bmg
+  module Sql
+    module RangeVarName
+      include Expr
+
+      def qualifier
+        last
+      end
+
+      def to_sql(buffer, dialect)
+        buffer << dialect.quote_identifier(last)
+        buffer
+      end
+
+    end # module RangeVarName
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/select_exp.rb

@@ -0,0 +1,109 @@
+module Bmg
+  module Sql
+    module SelectExp
+      include Expr
+
+      SELECT_DISTINCT = "SELECT DISTINCT".freeze
+
+      SELECT = "SELECT".freeze
+
+      def set_quantifier
+        self[1]
+      end
+
+      def with_exp?
+        false
+      end
+
+      def is_table_dee?
+        from_clause.nil? && select_list.is_table_dee?
+      end
+
+      def distinct?
+        set_quantifier.distinct?
+      end
+
+      def all?
+        set_quantifier.all?
+      end
+
+      def join?
+        from_clause && from_clause.join?
+      end
+
+      def should_be_reused?
+        join? or distinct? or complex_clause?
+      end
+
+      def complex_clause?
+        where_clause or order_by_clause or limit_clause or offset_clause
+      end
+
+      def select_exp
+        self
+      end
+
+      def select_list
+        self[2]
+      end
+
+      def is_select_star?
+        self[2].first == :select_star
+      end
+
+      def where_clause
+        find_child(:where_clause)
+      end
+
+      def predicate
+        where_clause && where_clause.predicate
+      end
+
+      def from_clause
+        find_child(:from_clause)
+      end
+
+      def table_spec
+        from_clause.table_spec
+      end
+
+      def order_by_clause
+        find_child(:order_by_clause)
+      end
+
+      def limit_clause
+        find_child(:limit_clause)
+      end
+
+      def offset_clause
+        find_child(:offset_clause)
+      end
+
+      def desaliaser
+        select_list.desaliaser
+      end
+
+    ### to_xxx
+
+      def to_attr_list
+        select_list.to_attr_list
+      end
+
+    ### to_sql
+
+      def to_sql(buffer, dialect, parenthesize = !buffer.empty?)
+        if parenthesize
+          sql_parenthesized(buffer){|b| to_sql(b, dialect, false) }
+        else
+          buffer << (distinct? ? SELECT_DISTINCT : SELECT)
+          each_child(1) do |elm,i|
+            buffer << SPACE
+            elm.to_sql(buffer, dialect)
+          end
+          buffer
+        end
+      end
+
+    end # module SelectExp
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/select_item.rb

@@ -0,0 +1,37 @@
+module Bmg
+  module Sql
+    module SelectItem
+      include Expr
+
+      def left
+        self[1]
+      end
+
+      def right
+        self[2]
+      end
+
+      def qualifier
+        left.qualifier
+      end
+
+      def would_be_name
+        left.would_be_name
+      end
+
+      def as_name
+        last.as_name
+      end
+
+      def to_sql(buffer, dialect)
+        self[1].to_sql(buffer, dialect)
+        unless would_be_name == as_name
+          buffer << SPACE << AS << SPACE
+          last.to_sql(buffer, dialect)
+        end
+        buffer
+      end
+
+    end # module SelectItem
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/select_list.rb

@@ -0,0 +1,35 @@
+module Bmg
+  module Sql
+    module SelectList
+      include Expr
+
+      def desaliaser
+        ->(a){
+          item = sexpr_body.find{|item| item.as_name.to_s == a.to_s }
+          item && item.left
+        }
+      end
+
+      def is_table_dee?
+        Builder::IS_TABLE_DEE == self
+      end
+
+      def knows?(as_name)
+        find_child{|child| child.as_name == as_name }
+      end
+
+      def to_attr_list
+        sexpr_body.map{|a| a.as_name.to_sym }
+      end
+
+      def to_sql(buffer, dialect)
+        sexpr_body.each_with_index do |item,index|
+          buffer << COMMA << SPACE unless index == 0
+          item.to_sql(buffer, dialect)
+        end
+        buffer
+      end
+
+    end # module SelectList
+  end # module Sql
+end # module Bmg

data/lib/bmg/sql/nodes/select_star.rb

@@ -0,0 +1,22 @@
+module Bmg
+  module Sql
+    module SelectStar
+      include Expr
+
+      STAR = "*".freeze
+
+      def desaliaser
+        ->(a){
+          Predicate::Grammar.sexpr [ :qualified_identifier, last[1], a.to_s ]
+        }
+      end
+
+      def to_sql(buffer, dialect)
+        last.to_sql(buffer, dialect)
+        buffer << DOT << STAR
+        buffer
+      end
+
+    end # module SelectStar
+  end # module Sql
+end # module Bmg