Merge branch '13561-collection-versions-api'
[arvados.git] / services / api / test / unit / arvados_model_test.rb
1 # Copyright (C) The Arvados Authors. All rights reserved.
2 #
3 # SPDX-License-Identifier: AGPL-3.0
4
5 require 'test_helper'
6
7 class ArvadosModelTest < ActiveSupport::TestCase
8   fixtures :all
9
10   def create_with_attrs attrs
11     a = Specimen.create({material: 'caloric'}.merge(attrs))
12     a if a.valid?
13   end
14
15   test 'non-admin cannot assign uuid' do
16     set_user_from_auth :active_trustedclient
17     want_uuid = Specimen.generate_uuid
18     a = create_with_attrs(uuid: want_uuid)
19     assert_nil a, "Non-admin should not assign uuid."
20   end
21
22   test 'admin can assign valid uuid' do
23     set_user_from_auth :admin_trustedclient
24     want_uuid = Specimen.generate_uuid
25     a = create_with_attrs(uuid: want_uuid)
26     assert_equal want_uuid, a.uuid, "Admin should assign valid uuid."
27     assert a.uuid.length==27, "Auto assigned uuid length is wrong."
28   end
29
30   test 'admin cannot assign uuid with wrong object type' do
31     set_user_from_auth :admin_trustedclient
32     want_uuid = Human.generate_uuid
33     a = create_with_attrs(uuid: want_uuid)
34     assert_nil a, "Admin should not be able to assign invalid uuid."
35   end
36
37   test 'admin cannot assign badly formed uuid' do
38     set_user_from_auth :admin_trustedclient
39     a = create_with_attrs(uuid: "ntoheunthaoesunhasoeuhtnsaoeunhtsth")
40     assert_nil a, "Admin should not be able to assign invalid uuid."
41   end
42
43   test 'admin cannot assign empty uuid' do
44     set_user_from_auth :admin_trustedclient
45     a = create_with_attrs(uuid: "")
46     assert_nil a, "Admin cannot assign empty uuid."
47   end
48
49   [ {:a => 'foo'},
50     {'a' => :foo},
51     {:a => ['foo', 'bar']},
52     {'a' => [:foo, 'bar']},
53     {'a' => ['foo', :bar]},
54     {:a => [:foo, :bar]},
55     {:a => {'foo' => {'bar' => 'baz'}}},
56     {'a' => {:foo => {'bar' => 'baz'}}},
57     {'a' => {'foo' => {:bar => 'baz'}}},
58     {'a' => {'foo' => {'bar' => :baz}}},
59     {'a' => {'foo' => ['bar', :baz]}},
60   ].each do |x|
61     test "prevent symbol keys in serialized db columns: #{x.inspect}" do
62       set_user_from_auth :active
63       link = Link.create!(link_class: 'test',
64                           properties: x)
65       raw = ActiveRecord::Base.connection.
66           select_value("select properties from links where uuid='#{link.uuid}'")
67       refute_match(/:[fb]/, raw)
68     end
69   end
70
71   [ {['foo'] => 'bar'},
72     {'a' => {['foo', :foo] => 'bar'}},
73     {'a' => {{'foo' => 'bar'} => 'bar'}},
74     {'a' => {['foo', :foo] => ['bar', 'baz']}},
75   ].each do |x|
76     test "refuse non-string keys in serialized db columns: #{x.inspect}" do
77       set_user_from_auth :active
78       assert_raises(ArgumentError) do
79         Link.create!(link_class: 'test',
80                      properties: x)
81       end
82     end
83   end
84
85   test "Stringify symbols coming from serialized attribute in database" do
86     set_user_from_auth :admin_trustedclient
87     fixed = Link.find_by_uuid(links(:has_symbol_keys_in_database_somehow).uuid)
88     assert_equal(["baz", "foo"], fixed.properties.keys.sort,
89                  "Hash symbol keys from DB did not get stringified.")
90     assert_equal(['waz', 'waz', 'waz', 1, nil, false, true],
91                  fixed.properties['baz'],
92                  "Array symbol values from DB did not get stringified.")
93     assert_equal true, fixed.save, "Failed to save fixed model back to db."
94   end
95
96   test "No HashWithIndifferentAccess in database" do
97     set_user_from_auth :admin_trustedclient
98     link = Link.create!(link_class: 'test',
99                         properties: {'foo' => 'bar'}.with_indifferent_access)
100     raw = ActiveRecord::Base.connection.
101       select_value("select properties from links where uuid='#{link.uuid}'")
102     assert_equal '{"foo": "bar"}', raw
103   end
104
105   test "store long string" do
106     set_user_from_auth :active
107     longstring = "a"
108     while longstring.length < 2**16
109       longstring = longstring + longstring
110     end
111     g = Group.create! name: 'Has a long description', description: longstring
112     g = Group.find_by_uuid g.uuid
113     assert_equal g.description, longstring
114   end
115
116   [['uuid', {unique: true}],
117    ['owner_uuid', {}]].each do |the_column, requires|
118     test "unique index on all models with #{the_column}" do
119       checked = 0
120       ActiveRecord::Base.connection.tables.each do |table|
121         columns = ActiveRecord::Base.connection.columns(table)
122
123         next unless columns.collect(&:name).include? the_column
124
125         indexes = ActiveRecord::Base.connection.indexes(table).reject do |index|
126           requires.map do |key, val|
127             index.send(key) == val
128           end.include? false
129         end
130         assert_includes indexes.collect(&:columns), [the_column], 'no index'
131         checked += 1
132       end
133       # Sanity check: make sure we didn't just systematically miss everything.
134       assert_operator(10, :<, checked,
135                       "Only #{checked} tables have a #{the_column}?!")
136     end
137   end
138
139   test "search index exists on models that go into projects" do
140     all_tables =  ActiveRecord::Base.connection.tables
141     all_tables.delete 'schema_migrations'
142     all_tables.delete 'permission_refresh_lock'
143
144     all_tables.each do |table|
145       table_class = table.classify.constantize
146       if table_class.respond_to?('searchable_columns')
147         search_index_columns = table_class.searchable_columns('ilike')
148         # Disappointing, but text columns aren't indexed yet.
149         search_index_columns -= table_class.columns.select { |c|
150           c.type == :text or c.name == 'description' or c.name == 'file_names'
151         }.collect(&:name)
152
153         indexes = ActiveRecord::Base.connection.indexes(table)
154         search_index_by_columns = indexes.select do |index|
155           index.columns.sort == search_index_columns.sort
156         end
157         search_index_by_name = indexes.select do |index|
158           index.name == "#{table}_search_index"
159         end
160         assert !search_index_by_columns.empty?, "#{table} has no search index with columns #{search_index_columns}. Instead found search index with columns #{search_index_by_name.first.andand.columns}"
161       end
162     end
163   end
164
165   test "full text search index exists on models" do
166     indexes = {}
167     conn = ActiveRecord::Base.connection
168     conn.exec_query("SELECT i.relname as indname,
169       i.relowner as indowner,
170       idx.indrelid::regclass::text as table,
171       am.amname as indam,
172       idx.indkey,
173       ARRAY(
174             SELECT pg_get_indexdef(idx.indexrelid, k + 1, true)
175                    FROM generate_subscripts(idx.indkey, 1) as k
176                    ORDER BY k
177                    ) as keys,
178       idx.indexprs IS NOT NULL as indexprs,
179       idx.indpred IS NOT NULL as indpred
180       FROM   pg_index as idx
181       JOIN   pg_class as i
182       ON     i.oid = idx.indexrelid
183       JOIN   pg_am as am
184       ON     i.relam = am.oid
185       JOIN   pg_namespace as ns
186       ON     ns.oid = i.relnamespace
187       AND    ns.nspname = ANY(current_schemas(false))").each do |idx|
188       if idx['keys'].match(/to_tsvector/)
189         indexes[idx['table']] ||= []
190         indexes[idx['table']] << idx
191       end
192     end
193     fts_tables =  ["collections", "container_requests", "groups", "jobs",
194                    "pipeline_instances", "pipeline_templates", "workflows"]
195     fts_tables.each do |table|
196       table_class = table.classify.constantize
197       if table_class.respond_to?('full_text_searchable_columns')
198         expect = table_class.full_text_searchable_columns
199         ok = false
200         indexes[table].andand.each do |idx|
201           if expect == idx['keys'].scan(/COALESCE\(([A-Za-z_]+)/).flatten
202             ok = true
203           end
204         end
205         assert ok, "#{table} has no full-text index\nexpect: #{expect.inspect}\nfound: #{indexes[table].inspect}"
206       end
207     end
208   end
209
210   test "selectable_attributes includes database attributes" do
211     assert_includes(Job.selectable_attributes, "success")
212   end
213
214   test "selectable_attributes includes non-database attributes" do
215     assert_includes(Job.selectable_attributes, "node_uuids")
216   end
217
218   test "selectable_attributes includes common attributes in extensions" do
219     assert_includes(Job.selectable_attributes, "uuid")
220   end
221
222   test "selectable_attributes does not include unexposed attributes" do
223     refute_includes(Job.selectable_attributes, "nodes")
224   end
225
226   test "selectable_attributes on a non-default template" do
227     attr_a = Job.selectable_attributes(:common)
228     assert_includes(attr_a, "uuid")
229     refute_includes(attr_a, "success")
230   end
231
232   test 'create and retrieve using created_at time' do
233     set_user_from_auth :active
234     group = Group.create! name: 'test create and retrieve group'
235     assert group.valid?, "group is not valid"
236
237     results = Group.where(created_at: group.created_at)
238     assert_includes results.map(&:uuid), group.uuid,
239       "Expected new group uuid in results when searched with its created_at timestamp"
240   end
241
242   test 'create and update twice and expect different update times' do
243     set_user_from_auth :active
244     group = Group.create! name: 'test create and retrieve group'
245     assert group.valid?, "group is not valid"
246
247     # update 1
248     group.update_attributes!(name: "test create and update name 1")
249     results = Group.where(uuid: group.uuid)
250     assert_equal "test create and update name 1", results.first.name, "Expected name to be updated to 1"
251     updated_at_1 = results.first.updated_at.to_f
252
253     # update 2
254     group.update_attributes!(name: "test create and update name 2")
255     results = Group.where(uuid: group.uuid)
256     assert_equal "test create and update name 2", results.first.name, "Expected name to be updated to 2"
257     updated_at_2 = results.first.updated_at.to_f
258
259     assert_equal true, (updated_at_2 > updated_at_1), "Expected updated time 2 to be newer than 1"
260   end
261
262   test 'jsonb column' do
263     set_user_from_auth :active
264
265     c = Collection.create!(properties: {})
266     assert_equal({}, c.properties)
267
268     c.update_attributes(properties: {'foo' => 'foo'})
269     c.reload
270     assert_equal({'foo' => 'foo'}, c.properties)
271
272     c.update_attributes(properties: nil)
273     c.reload
274     assert_equal({}, c.properties)
275
276     c.update_attributes(properties: {foo: 'bar'})
277     assert_equal({'foo' => 'bar'}, c.properties)
278     c.reload
279     assert_equal({'foo' => 'bar'}, c.properties)
280   end
281 end