oracle-sql-parser 0.1.0

data/lib/oracle-sql-parser/ast/identifier.rb

@@ -0,0 +1,7 @@
+module OracleSqlParser::Ast
+  class Identifier < Hash
+    def inspect
+      "#<#{self.class.name} #{@ast.inspect}>"
+    end
+  end
+end

data/lib/oracle-sql-parser/ast/in_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class InCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/insert_statement.rb

@@ -0,0 +1,5 @@
+module OracleSqlParser::Ast
+  class InsertStatement < Hash
+
+  end
+end

data/lib/oracle-sql-parser/ast/keyword.rb

@@ -0,0 +1,8 @@
+module OracleSqlParser::Ast
+  class Keyword < Hash
+    def inspect
+      "<##{self.class.name} #{@ast.inspect}>"
+    end
+  end
+end
+

data/lib/oracle-sql-parser/ast/like_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class LikeCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/logical_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class LogicalCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/null_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class NullCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/number_literal.rb

@@ -0,0 +1,8 @@
+module OracleSqlParser::Ast
+  class NumberLiteral < Hash
+    def inspect
+      "#<#{self.class.name} #{@ast.inspect}>"
+    end
+  end
+end
+

data/lib/oracle-sql-parser/ast/order_by_clause.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class OrderByClause < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/order_by_clause_item.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class OrderByClauseItem < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/query_block.rb

@@ -0,0 +1,17 @@
+module OracleSqlParser::Ast
+  class QueryBlock < Hash
+    def to_sql
+      [
+        "select",
+        @ast[:hint],
+        @ast[:modifier],
+        @ast[:select_list],
+        "from",
+        @ast[:select_sources],
+        @ast[:where_clause],
+        @ast[:group_by_clause],
+        @ast[:model_clause]
+      ].compact.map(&:to_sql).join(" ")
+    end
+  end
+end

data/lib/oracle-sql-parser/ast/regexp_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class RegexpCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/rollup_cube_clause.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class RollupCubeClause < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/searched_case_expression.rb

@@ -0,0 +1,8 @@
+module OracleSqlParser::Ast
+  class SearchedCaseExpression < Base
+
+    def else_clause=(ast)
+      @ast[:else_clause] = ast
+    end
+  end
+end

data/lib/oracle-sql-parser/ast/select_statement.rb

@@ -0,0 +1,5 @@
+module OracleSqlParser::Ast
+  class SelectStatement < Hash
+
+  end
+end

data/lib/oracle-sql-parser/ast/simple_case_expression.rb

@@ -0,0 +1,7 @@
+module OracleSqlParser::Ast
+  class SimpleCaseExpression < Hash
+    def else_clause=(ast)
+      @ast[:else_clause] = ast
+    end
+  end
+end

data/lib/oracle-sql-parser/ast/simple_comparision_condition.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class SimpleComparisionCondition < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/subquery.rb

@@ -0,0 +1,5 @@
+module OracleSqlParser::Ast
+  class Subquery < Hash
+
+  end
+end

data/lib/oracle-sql-parser/ast/text_literal.rb

@@ -0,0 +1,7 @@
+module OracleSqlParser::Ast
+  class TextLiteral < Hash
+    def inspect
+      "#<#{self.class.name} #{@ast.inspect}>"
+    end
+  end
+end

data/lib/oracle-sql-parser/ast/update_set_column.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class UpdateSetColumn < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/update_statement.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class UpdateStatement < Hash
+  end
+end

data/lib/oracle-sql-parser/ast/where_clause.rb

@@ -0,0 +1,4 @@
+module OracleSqlParser::Ast
+  class WhereClause < Hash
+  end
+end

data/lib/oracle-sql-parser/grammar.rb

@@ -0,0 +1,10 @@
+module OracleSqlParser::Grammar
+end
+require "oracle-sql-parser/grammar/reserved_word.rb"
+require "oracle-sql-parser/grammar/expression.rb"
+require "oracle-sql-parser/grammar/condition.rb"
+require "oracle-sql-parser/grammar/select.rb"
+require "oracle-sql-parser/grammar/update.rb"
+require "oracle-sql-parser/grammar/delete.rb"
+require "oracle-sql-parser/grammar/insert.rb"
+require "oracle-sql-parser/grammar/grammar.rb"

data/lib/oracle-sql-parser/grammar/condition.treetop

@@ -0,0 +1,224 @@
+module OracleSqlParser::Grammar
+  grammar Condition
+    # where
+    rule where_clause
+      where_keyword space? logical_condition {
+        def ast
+          OracleSqlParser::Ast::WhereClause[:condition => logical_condition.ast]
+        end
+      }
+    end
+
+    rule condition
+      comparision_condition /
+      floating_point_condition /
+      model_condition /
+      mutiset_condition /
+      pattern_maching_condition /
+      range_condition /
+      null_condition /
+      xml_condition /
+      compound_condition /
+      between_condition /
+      exists_condition /
+      in_condition /
+      is_of_type_condition {
+          def ast
+            super
+          end
+        }
+    end
+
+    rule logical_condition
+      (
+        op:not_keyword space? right:condition /
+        left:condition space? op:and_keyword space? right:condition /
+        left:condition space? op:or_keyword space? right:condition  /
+        cond:condition
+      ) {
+        def ast
+          if respond_to? :op
+            if respond_to? :left
+              OracleSqlParser::Ast::LogicalCondition[
+                :left => left.ast,
+                :op => op.ast,
+                :right => right.ast]
+            else
+              OracleSqlParser::Ast::LogicalCondition[
+                :op => op.ast,
+                :right => right.ast]
+            end
+          else
+            cond.ast
+          end
+        end
+      }
+    end
+
+    rule comparision_condition
+      (
+        simple_comparision_condition /
+        group_comparision_condition
+      ) {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule group_comparision_condition
+      'group_comparision_condition'
+    end
+
+    rule simple_comparision_condition
+      (
+        left:expr space? op:('!=' / '^=' / '<>' / '>=' / '<=' / '=' / '>' / '<') space? right:expr /
+        '(' space? left:exprs space? ')' op:space? ('!=' / '^=' / '<>' / '=') space? '(' space? right:subquery space? ')'
+      ) {
+        def ast
+          OracleSqlParser::Ast::SimpleComparisionCondition[
+            :left => left.ast,
+            :op => op.text_value,
+            :right => right.ast]
+        end
+      }
+    end
+
+    rule floating_point_condition
+      'floating_point_condition'
+    end
+
+    rule model_condition
+      'model_condition'
+    end
+
+    rule mutiset_condition
+      'mutiset_condition'
+    end
+
+    rule pattern_maching_condition
+      (
+        like_condition /
+        regexp_like_condition
+      ) {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule like_condition
+      target:ident space
+      n:(not_keyword:not_keyword space)?
+      like:(like_keyword / like2_keyword / like4_keyword / likec_keyword) space
+      text:text_literal
+      e:(space escape_keyword space escape_text:text_literal)? {
+        def ast
+          OracleSqlParser::Ast::LikeCondition[
+            :target => target.ast,
+            :not => not_keyword.ast,
+            :like => like.ast,
+            :text => text.ast,
+            :escape => escape_text.ast]
+        end
+
+        def not_keyword
+          n.elements && n.elements.first
+        end
+
+        def escape_text
+          if e.respond_to? :escape_text
+            e.escape_text
+          end
+        end
+      }
+    end
+
+    rule regexp_like_condition
+      regexp_like_keyword '(' space? target:ident space? ',' space? regexp:text_literal space? ')' {
+        def ast
+          OracleSqlParser::Ast::RegexpCondition[
+            :target => target.ast,
+            :regexp => regexp.ast]
+        end
+      }
+    end
+
+    rule range_condition
+      'range_condition'
+    end
+
+    rule null_condition
+      expr space is_keyword space n:(not_keyword space)? null_keyword {
+        def ast
+          OracleSqlParser::Ast::NullCondition[
+            :target => expr.ast,
+            :not => not_keyword.ast]
+        end
+
+        def not_keyword
+          n.elements && n.elements.first
+        end
+      }
+    end
+
+    rule xml_condition
+      'xml_condition'
+    end
+
+    rule compound_condition
+      '(' logical_condition ')' {
+        def ast
+          logical_condition.ast
+        end
+      }
+    end
+
+    rule between_condition
+      target:expr space n:(not_keyword space)? between_keyword space from:expr space and_keyword space to:expr {
+        def ast
+          OracleSqlParser::Ast::BetweenCondition[
+            :target => target.ast,
+            :not => not_keyword.ast,
+            :from => from.ast,
+            :to => to.ast
+          ]
+        end
+
+        def not_keyword
+          n.elements && n.elements.first
+        end
+      }
+    end
+
+    rule exists_condition
+      exists_keyword space? '(' space? subquery space? ')' {
+        def ast
+          OracleSqlParser::Ast::ExistsCondition[
+            :target => subquery.ast
+          ]
+        end
+      }
+    end
+
+    rule in_condition
+      target:expr space n:(not_keyword space)? in_keyword space? '(' space? values:( exprs / subquery ) space? ')' {
+        def ast
+          OracleSqlParser::Ast::InCondition[
+            :target => target.ast,
+            :not => not_keyword.ast,
+            :values =>  values.ast
+          ]
+        end
+
+        def not_keyword
+          n.elements && n.elements.first
+        end
+      }
+    end
+
+    rule is_of_type_condition
+      'is_of_type_condition'
+    end
+  end
+end

data/lib/oracle-sql-parser/grammar/delete.treetop

@@ -0,0 +1,68 @@
+module OracleSqlParser::Grammar
+  grammar Delete
+    rule delete_statement
+      delete_keyword space?
+      delete_from_clause space?
+      delete_condition:delete_condition?
+      returning_clause:returning_clause? {
+        def ast
+          OracleSqlParser::Ast::DeleteStatement[
+            :target => delete_from_clause.ast,
+            :condition => delete_condition.ast
+          ]
+        end
+      }
+    end
+
+    rule delete_from_clause
+      from_keyword space? delete_target {
+        def ast
+          delete_target.ast
+        end
+      }
+    end
+
+    rule delete_target
+      t:(
+        table_reference /
+        delete_target_subquery
+      ) space?
+      t_alias:t_alias? {
+        def ast
+          OracleSqlParser::Ast::DeleteTarget[
+            :name => t.ast,
+            :alias => t_alias.ast
+          ]
+        end
+      }
+    end
+
+    rule delete_target_subquery
+      (table_keyword space)? '(' space? subquery space? ')' {
+        def ast
+          subquery.ast
+        end
+      }
+    end
+
+    rule delete_condition
+      where_keyword space?
+      where:(
+        search_condition /
+        current_of
+      ) {
+        def ast
+          where.ast
+        end
+      }
+    end
+
+    rule current_of
+      current_of_keyword space? cursor_name {
+        def ast
+          cursor_name.ast
+        end
+      }
+    end
+  end
+end