aboutsummaryrefslogtreecommitdiffstats
path: root/lib/arel/visitors/mssql.rb
blob: 92362a0c5fc7a192edd425a2b3faf0a7a7114f82 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
module Arel
  module Visitors
    class MSSQL < Arel::Visitors::ToSql
      RowNumber = Struct.new :children

      def initialize(*)
        @primary_keys = {}
        super
      end

      private

      # `top` wouldn't really work here. I.e. User.select("distinct first_name").limit(10) would generate
      # "select top 10 distinct first_name from users", which is invalid query! it should be
      # "select distinct top 10 first_name from users"
      def visit_Arel_Nodes_Top o
        ""
      end

      def visit_Arel_Visitors_MSSQL_RowNumber o, collector
        collector << "ROW_NUMBER() OVER (ORDER BY "
        inject_join(o.children, collector, ', ') << ") as _row_num"
      end

      def visit_Arel_Nodes_SelectStatement o, collector
        if !o.limit && !o.offset
          return super
        end

        is_select_count = false
        o.cores.each { |x|
          core_order_by = row_num_literal determine_order_by(o.orders, x)
          if select_count? x
            x.projections = [core_order_by]
            is_select_count = true
          else
            x.projections << core_order_by
          end
        }

        if is_select_count
          # fixme count distinct wouldn't work with limit or offset
          collector << "SELECT COUNT(1) as count_id FROM ("
        end

        collector << "SELECT _t.* FROM ("
        collector = o.cores.inject(collector) { |c,x|
          visit_Arel_Nodes_SelectCore x, c
        }
        collector << ") as _t WHERE #{get_offset_limit_clause(o)}"

        if is_select_count
          collector << ") AS subquery"
        else
          collector
        end
      end

      def get_offset_limit_clause o
        first_row = o.offset ? o.offset.expr.to_i + 1 : 1
        last_row  = o.limit ? o.limit.expr.to_i - 1 + first_row : nil
        if last_row
          " _row_num BETWEEN #{first_row} AND #{last_row}"
        else
          " _row_num >= #{first_row}"
        end
      end

      def visit_Arel_Nodes_DeleteStatement o, collector
        collector << 'DELETE '
        if o.limit
          collector << 'TOP ('
          visit o.limit.expr, collector
          collector << ') '
        end
        collector << 'FROM '
        collector = visit o.relation, collector
        if o.wheres.any?
          collector << ' WHERE '
          inject_join o.wheres, collector, AND
        else
          collector
        end
      end

      def determine_order_by orders, x
        if orders.any?
          orders
        elsif x.groups.any?
          x.groups
        else
          pk = find_left_table_pk(x.froms)
          pk ? [pk] : []
        end
      end

      def row_num_literal order_by
        RowNumber.new order_by
      end

      def select_count? x
        x.projections.length == 1 && Arel::Nodes::Count === x.projections.first
      end

      # FIXME raise exception of there is no pk?
      def find_left_table_pk o
        if o.kind_of?(Arel::Nodes::Join)
          find_left_table_pk(o.left)
        elsif o.instance_of?(Arel::Table)
          find_primary_key(o)
        end
      end

      def find_primary_key(o)
        @primary_keys[o.name] ||= begin
          primary_key_name = @connection.primary_key(o.name)
          # some tables might be without primary key
          primary_key_name && o[primary_key_name]
        end
      end
    end
  end
end