oracle-sql-parser 0.1.0

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

@@ -0,0 +1,236 @@
+module OracleSqlParser::Grammar
+  grammar Expression
+    rule sql_expression
+      function_expression /
+      case_expression /
+      cursor_expression /
+      compound_expression /
+      datetime_expression /
+      interval_expression /
+      object_access_expression /
+      scalar_subquery_expression /
+      model_expression /
+      type_constructor_expression /
+      simple_expression /
+      variable_expression {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule simple_expression
+        rownum_keyword /
+        sysdate_keyword /
+        systimestamp_keyword /
+        null_keyword /
+        text_literal /
+        number_literal /
+        sequence /
+        simple_expression_column {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule simple_expression_column
+      name:(
+        ( schema_name space? '.' space? table_name '.' / table_name space? '.' space? )?
+        ( rowid_keyword / column_name )
+      ) {
+        def ast
+          OracleSqlParser::Ast::Identifier.new(:name => text_value)
+        end
+      }
+    end
+
+    rule compound_expression
+      'compound_expression' # not implemented
+#      (
+#        ('+' / '-' / prior_keyword) space? expr /
+#        (expr space? ('||' / '*' / '/' / '+' / '-') space? expr) /
+#        '(' space? expr space? ')'
+#      )
+    end
+
+    rule case_expression
+      case_keyword space? case_expression:(simple_case_expression / searched_case_expression) space?
+      else_clause:else_clause? space? end_keyword {
+        def ast
+          ast = case_expression.ast
+          ast.else_clause = else_clause.ast
+          ast
+        end
+      }
+    end
+
+    rule simple_case_expression
+      expr space w:(when_keyword space comparison_expr space then_keyword space? return_expr space?)+ {
+        def ast
+          OracleSqlParser::Ast::SimpleCaseExpression[
+            :condition => expr.ast,
+            :when_clauses => OracleSqlParser::Ast::Array[*when_clauses]
+          ]
+        end
+
+        def when_clauses
+          w.elements.map do |elem|
+            OracleSqlParser::Ast::Hash[
+              :when_expr => elem.comparison_expr.ast,
+              :return_expr => elem.return_expr.ast
+            ]
+          end
+        end
+      }
+    end
+
+    rule comparison_expr
+      expr {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule return_expr
+      expr {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule else_expr
+      expr {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule searched_case_expression
+      when_keyword space? condition space? then_keyword space? return_expr {
+        def ast
+          OracleSqlParser::Ast::SearchedCaseExpression[
+            :when_condition => condition.ast,
+            :return_expr => return_expr.ast
+          ]
+        end
+      }
+    end
+
+    rule else_clause
+      else_keyword space? else_expr {
+        def ast
+          else_expr.ast
+        end
+      }
+    end
+
+    rule cursor_expression
+      'cursor_expression' # not implemented
+    end
+
+    rule datetime_expression
+      'datetime_expression' # not implemented
+    end
+
+    rule function_expression
+      function_name space? '(' space? function_args:function_args? space? ')' {
+        def ast
+          OracleSqlParser::Ast::FunctionExpressoin[
+            :name => function_name.ast,
+            :args => function_args ? function_args.ast : nil
+          ]
+        end
+      }
+    end
+
+    rule function_name
+      (
+        package_name '.' procedure_name /
+        procedure_name
+      ) {
+        def ast
+          OracleSqlParser::Ast::Identifier[:name => text_value]
+        end
+      }
+    end
+
+    rule function_args
+      function_arg more:(space? ',' space? function_arg)* {
+        def ast
+          OracleSqlParser::Ast::Array[function_arg.ast, *more_function_args.map(&:ast)]
+        end
+
+        def more_function_args
+          more.elements.map(&:function_arg)
+        end
+      }
+    end
+
+    rule function_arg
+      expr {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule interval_expression
+      'interval_expression' # not implemented
+    end
+
+    rule object_access_expression
+      'object_access_expression'
+    end
+
+    rule scalar_subquery_expression
+      'scalar_subquery_expression'
+    end
+
+    rule model_expression
+      'model_expression' #
+    end
+
+    rule type_constructor_expression
+      'type_constructor_expression'
+    end
+
+    rule variable_expression
+      'variable_expression'
+    end
+
+    rule expr
+      sql_expression {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule exprs
+      expr more:(space? ',' space? more_expr:expr)* {
+        def ast
+          OracleSqlParser::Ast::Array[expr.ast, *more_exprs.map(&:ast)]
+        end
+
+        def more_exprs
+          more.elements.map{|e| e.more_expr}
+        end
+      }
+    end
+
+    rule expression_list
+      (
+        '(' e:exprs ')' /
+        e:exprs
+      ) {
+        def ast
+          e.ast
+        end
+      }
+    end
+  end
+end

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

@@ -0,0 +1,166 @@
+module OracleSqlParser::Grammar
+  grammar Grammar
+    include OracleSqlParser::Grammar::ReservedWord
+    include OracleSqlParser::Grammar::Condition
+    include OracleSqlParser::Grammar::Expression
+    include OracleSqlParser::Grammar::Select
+    include OracleSqlParser::Grammar::Update
+    include OracleSqlParser::Grammar::Insert
+    include OracleSqlParser::Grammar::Delete
+    rule sql
+      q:(
+        select_statement /
+        update_statement /
+        insert_statement /
+        delete_statement
+      ) {
+        def ast
+          q.ast
+        end
+      }
+    end
+
+    rule ident
+      !keyword [a-zA-Z] [a-zA-Z0-9_]* {
+        def ast
+          OracleSqlParser::Ast::Identifier.new(:name => text_value)
+        end
+      }
+    end
+
+    rule space
+      ' '+
+    end
+
+    rule hint # not implemented
+      '/*+' '*/' {
+        def ast
+          nil
+        end
+      }
+    end
+
+    rule t_alias
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule c_alias
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule table_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule column_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule schema_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule number_literal
+      '-'? [0-9]+ ([.] [0-9]+)? {
+        def ast
+          OracleSqlParser::Ast::NumberLiteral.new(:value => text_value)
+        end
+      }
+    end
+
+    rule position
+      integer {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule integer
+      '-'? [0-9]+ {
+        def ast
+          OracleSqlParser::Ast::NumberLiteral.new(:value => text_value)
+        end
+      }
+    end
+
+    rule text_literal
+      "'" ("\\'" / !"'" .)* "'" {
+        def ast
+          OracleSqlParser::Ast::TextLiteral.new(:value => text_value[1..-2])
+        end
+      }
+    end
+
+    rule table_reference
+      (
+        schema_name '.' table_name /
+        table_name
+      ) ('@' dblink)? {
+        def ast
+          OracleSqlParser::Ast::Identifier.new(:name => text_value)
+        end
+      }
+    end
+
+    rule dblink
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule cursor_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule sequence
+      ident space? '.' space? n:(currval_keyword / nextval_keyword) {
+        def ast
+          OracleSqlParser::Ast::Identifier[:value => text_value]
+        end
+      }
+    end
+
+    rule package_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule procedure_name
+      ident {
+        def ast
+          super
+        end
+      }
+    end
+  end
+end

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

@@ -0,0 +1,112 @@
+module OracleSqlParser::Grammar
+  grammar Insert
+    rule insert_statement
+      insert_keyword space?
+      hint?
+      t:(
+        single_table_insert /
+        multi_table_insert
+      ) {
+        def ast
+          t.ast
+        end
+      }
+    end
+
+    rule single_table_insert
+      insert_into_clause space?
+      t:(
+        values_clause returning_clause? /
+        subquery
+      ) space?
+      error_logging_clause? {
+        def ast
+          insert_into_ast = insert_into_clause.ast
+          OracleSqlParser::Ast::InsertStatement[
+            :insert => insert_into_ast.table,
+            :columns => insert_into_ast.column,
+            :values => values.ast
+          ]
+        end
+
+        def values
+          t.elements.first
+        end
+      }
+    end
+
+    rule insert_into_clause
+      into_keyword space
+      dml_table_expression_clause space
+      (t_alias space)?
+      insert_column_names:insert_column_names? {
+        def ast
+          OracleSqlParser::Ast::Hash[
+            :table => dml_table_expression_clause.ast,
+            :column => insert_column_names.ast
+          ]
+        end
+      }
+    end
+
+    rule insert_column_names
+      '(' space? column_name more:(space? ',' space? column_name)* ')' {
+        def ast
+          OracleSqlParser::Ast::Array[column_name.ast, *more_column_names.map(&:ast)]
+        end
+
+        def more_column_names
+          more.elements.map(&:column_name)
+        end
+      }
+    end
+
+    rule values_clause
+      values_keyword space? '(' space? insert_values space? ')' {
+        def ast
+          insert_values.ast
+        end
+      }
+    end
+
+    rule insert_values
+      expr_or_default more:(space? ',' space? e:expr_or_default)* {
+        def ast
+          OracleSqlParser::Ast::Array[expr_or_default.ast, *more_expr_or_defaults.map(&:ast)]
+        end
+
+        def more_expr_or_defaults
+          more.elements.map(&:e)
+        end
+      }
+    end
+
+    rule expr_or_default
+      expr / default_keyword {
+        def ast
+          super
+        end
+      }
+    end
+
+    rule dml_table_expression_clause
+      (
+        schema_name '.' table_name '@' dblink /
+        schema_name '.' table_name /
+        table_name
+      ) {
+        def ast
+          OracleSqlParser::Ast::Identifier[:name => text_value]
+        end
+      }
+    end
+
+    rule multi_table_insert
+      'multi_table_insert' # do not support
+    end
+
+    rule error_logging_clause
+      'error_logging_clause' # do not support
+    end
+  end
+end