Merge branch 'master' into 1971-show-image-thumbnails
[arvados.git] / services / api / test / unit / user_test.rb
1 require 'test_helper'
2
3 class UserTest < ActiveSupport::TestCase
4   include CurrentApiClient
5
6   # The fixture services/api/test/fixtures/users.yml serves as the input for this test case
7   setup do
8     # Make sure system_user exists before making "pre-test users" list
9     system_user
10
11     @all_users = User.find(:all)
12
13     @all_users.each do |user|
14       if user.uuid == system_user_uuid
15         @system_user = user
16       elsif user.is_admin && user.is_active
17         @admin_user = user
18       elsif user.is_active && !user.is_admin
19         @active_user = user
20       elsif !user.is_active && !user.is_invited
21         @uninvited_user = user
22       end
23     end
24   end
25
26   test "check non-admin active user properties" do
27     assert !@active_user.is_admin, 'is_admin should not be set for a non-admin user'
28     assert @active_user.is_active, 'user should be active'
29     assert @active_user.is_invited, 'is_invited should be set'
30     assert_not_nil @active_user.prefs, "user's preferences should be non-null, but may be size zero"
31     assert (@active_user.can? :read=>"#{@active_user.uuid}"), "user should be able to read own object"
32     assert (@active_user.can? :write=>"#{@active_user.uuid}"), "user should be able to write own object"
33     assert (@active_user.can? :manage=>"#{@active_user.uuid}"), "user should be able to manage own object"
34
35     assert @active_user.groups_i_can(:read).size > 0, "active user should be able read at least one group"
36
37     # non-admin user cannot manage or write other user objects
38     assert !(@active_user.can? :read=>"#{@uninvited_user.uuid}")
39     assert !(@active_user.can? :write=>"#{@uninvited_user.uuid}")
40     assert !(@active_user.can? :manage=>"#{@uninvited_user.uuid}")
41   end
42
43   test "check admin user properties" do
44     assert @admin_user.is_admin, 'is_admin should be set for admin user'
45     assert @admin_user.is_active, 'admin user cannot be inactive'
46     assert @admin_user.is_invited, 'is_invited should be set'
47     assert_not_nil @admin_user.uuid.size, "user's uuid should be non-null"
48     assert_not_nil @admin_user.prefs, "user's preferences should be non-null, but may be size zero"
49     assert @admin_user.identity_url.size > 0, "user's identity url is expected"
50     assert @admin_user.can? :read=>"#{@admin_user.uuid}"
51     assert @admin_user.can? :write=>"#{@admin_user.uuid}"
52     assert @admin_user.can? :manage=>"#{@admin_user.uuid}"
53
54     assert @admin_user.groups_i_can(:read).size > 0, "admin active user should be able read at least one group"
55     assert @admin_user.groups_i_can(:write).size > 0, "admin active user should be able write to at least one group"
56     assert @admin_user.groups_i_can(:manage).size > 0, "admin active user should be able manage at least one group"
57
58     # admin user can also write or manage other users
59     assert @admin_user.can? :read=>"#{@uninvited_user.uuid}"
60     assert @admin_user.can? :write=>"#{@uninvited_user.uuid}"
61     assert @admin_user.can? :manage=>"#{@uninvited_user.uuid}"
62   end
63
64   test "check inactive and uninvited user properties" do
65     assert !@uninvited_user.is_admin, 'is_admin should not be set for a non-admin user'
66     assert !@uninvited_user.is_active, 'user should be inactive'
67     assert !@uninvited_user.is_invited, 'is_invited should not be set'
68     assert @uninvited_user.can? :read=>"#{@uninvited_user.uuid}"
69     assert @uninvited_user.can? :write=>"#{@uninvited_user.uuid}"
70     assert @uninvited_user.can? :manage=>"#{@uninvited_user.uuid}"
71
72     assert @uninvited_user.groups_i_can(:read).size == 0, "inactive and uninvited user should not be able read any groups"
73     assert @uninvited_user.groups_i_can(:write).size == 0, "inactive and uninvited user should not be able write to any groups"
74     assert @uninvited_user.groups_i_can(:manage).size == 0, "inactive and uninvited user should not be able manage any groups"
75   end
76
77   test "find user method checks" do
78     User.find(:all).each do |user|
79       assert_not_nil user.uuid, "non-null uuid expected for " + user.full_name
80     end
81
82     user = users(:active)     # get the active user
83
84     found_user = User.find(user.id)   # find a user by the row id
85
86     assert_equal found_user.full_name, user.first_name + ' ' + user.last_name
87     assert_equal found_user.identity_url, user.identity_url
88   end
89
90   test "create new user" do
91     Thread.current[:user] = @admin_user   # set admin user as the current user
92
93     user = User.new
94     user.first_name = "first_name_for_newly_created_user"
95     user.save
96
97     # verify there is one extra user in the db now
98     assert_equal @all_users.size+1, User.find(:all).size
99
100     user = User.find(user.id)   # get the user back
101     assert_equal(user.first_name, 'first_name_for_newly_created_user')
102     assert_not_nil user.uuid, 'uuid should be set for newly created user'
103     assert_nil user.email, 'email should be null for newly created user, because it was not passed in'
104     assert_nil user.identity_url, 'identity_url should be null for newly created user, because it was not passed in'
105
106     user.first_name = 'first_name_for_newly_created_user_updated'
107     user.save
108     user = User.find(user.id)   # get the user back
109     assert_equal(user.first_name, 'first_name_for_newly_created_user_updated')
110   end
111
112   test "update existing user" do
113     Thread.current[:user] = @active_user    # set active user as current user
114     @active_user.first_name = "first_name_changed"
115     @active_user.save
116
117     @active_user = User.find(@active_user.id)   # get the user back
118     assert_equal(@active_user.first_name, 'first_name_changed')
119
120     # admin user also should be able to update the "active" user info
121     Thread.current[:user] = @admin_user # set admin user as current user
122     @active_user.first_name = "first_name_changed_by_admin_for_active_user"
123     @active_user.save
124
125     @active_user = User.find(@active_user.id)   # get the user back
126     assert_equal(@active_user.first_name, 'first_name_changed_by_admin_for_active_user')
127   end
128
129   test "delete a user and verify" do
130     active_user_uuid = @active_user.uuid
131
132     Thread.current[:user] = @admin_user
133     @active_user.delete
134
135     found_deleted_user = false
136     User.find(:all).each do |user|
137       if user.uuid == active_user_uuid
138         found_deleted_user = true
139         break
140       end
141     end
142     assert !found_deleted_user, "found deleted user: "+active_user_uuid
143
144   end
145
146   test "create new user as non-admin user" do
147     Thread.current[:user] = @active_user
148
149     begin
150       user = User.new
151       user.save
152     rescue ArvadosModel::PermissionDeniedError => e
153     end
154     assert (e.message.include? 'PermissionDeniedError'),
155         'Expected PermissionDeniedError'
156   end
157
158   test "setup new user" do
159     Thread.current[:user] = @admin_user
160
161     email = 'foo@example.com'
162     openid_prefix = 'http://openid/prefix'
163
164     user = User.create ({uuid: 'zzzzz-tpzed-abcdefghijklmno', email: email})
165
166     vm = VirtualMachine.create
167
168     response = User.setup user, openid_prefix, 'test_repo', vm.uuid
169
170     resp_user = find_obj_in_resp response, 'User'
171     verify_user resp_user, email
172
173     oid_login_perm = find_obj_in_resp response, 'Link', 'arvados#user'
174
175     verify_link oid_login_perm, 'permission', 'can_login', resp_user[:email],
176         resp_user[:uuid]
177
178     assert_equal openid_prefix, oid_login_perm[:properties][:identity_url_prefix],
179         'expected identity_url_prefix not found for oid_login_perm'
180
181     group_perm = find_obj_in_resp response, 'Link', 'arvados#group'
182     verify_link group_perm, 'permission', 'can_read', resp_user[:uuid], nil
183
184     repo_perm = find_obj_in_resp response, 'Link', 'arvados#repository'
185     verify_link repo_perm, 'permission', 'can_write', resp_user[:uuid], nil
186
187     vm_perm = find_obj_in_resp response, 'Link', 'arvados#virtualMachine'
188     verify_link vm_perm, 'permission', 'can_login', resp_user[:uuid], vm.uuid
189   end
190
191   test "setup new user in multiple steps" do
192     Thread.current[:user] = @admin_user
193
194     email = 'foo@example.com'
195     openid_prefix = 'http://openid/prefix'
196
197     user = User.create ({uuid: 'zzzzz-tpzed-abcdefghijklmno', email: email})
198
199     response = User.setup user, openid_prefix
200
201     resp_user = find_obj_in_resp response, 'User'
202     verify_user resp_user, email
203
204     oid_login_perm = find_obj_in_resp response, 'Link', 'arvados#user'
205     verify_link oid_login_perm, 'permission', 'can_login', resp_user[:email],
206         resp_user[:uuid]
207     assert_equal openid_prefix, oid_login_perm[:properties][:identity_url_prefix],
208         'expected identity_url_prefix not found for oid_login_perm'
209
210     group_perm = find_obj_in_resp response, 'Link', 'arvados#group'
211     verify_link group_perm, 'permission', 'can_read', resp_user[:uuid], nil
212
213     # invoke setup again with repo_name
214     response = User.setup user, openid_prefix, 'test_repo'
215     resp_user = find_obj_in_resp response, 'User', nil
216     verify_user resp_user, email
217     assert_equal user.uuid, resp_user[:uuid], 'expected uuid not found'
218
219     group_perm = find_obj_in_resp response, 'Link', 'arvados#group'
220     verify_link group_perm, 'permission', 'can_read', resp_user[:uuid], nil
221
222     repo_perm = find_obj_in_resp response, 'Link', 'arvados#repository'
223     verify_link repo_perm, 'permission', 'can_write', resp_user[:uuid], nil
224
225     # invoke setup again with a vm_uuid
226     vm = VirtualMachine.create
227
228     response = User.setup user, openid_prefix, 'test_repo', vm.uuid
229
230     resp_user = find_obj_in_resp response, 'User', nil
231     verify_user resp_user, email
232     assert_equal user.uuid, resp_user[:uuid], 'expected uuid not found'
233
234     group_perm = find_obj_in_resp response, 'Link', 'arvados#group'
235     verify_link group_perm, 'permission', 'can_read', resp_user[:uuid], nil
236
237     repo_perm = find_obj_in_resp response, 'Link', 'arvados#repository'
238     verify_link repo_perm, 'permission', 'can_write', resp_user[:uuid], nil
239
240     vm_perm = find_obj_in_resp response, 'Link', 'arvados#virtualMachine'
241     verify_link vm_perm, 'permission', 'can_login', resp_user[:uuid], vm.uuid
242   end
243
244   def find_obj_in_resp (response_items, object_type, head_kind=nil)
245     return_obj = nil
246     response_items.each { |x|
247       if !x
248         next
249       end
250
251       if object_type == 'User'
252         if ArvadosModel::resource_class_for_uuid(x['uuid']) == User
253           return_obj = x
254           break
255         end
256       else  # looking for a link
257         if ArvadosModel::resource_class_for_uuid(x['head_uuid']).kind == head_kind
258           return_obj = x
259           break
260         end
261       end
262     }
263     return return_obj
264   end
265
266   def verify_user (resp_user, email)
267     assert_not_nil resp_user, 'expected user object'
268     assert_not_nil resp_user['uuid'], 'expected user object'
269     assert_equal email, resp_user['email'], 'expected email not found'
270
271   end
272
273   def verify_link (link_object, link_class, link_name, tail_uuid, head_uuid)
274     assert_not_nil link_object, "expected link for #{link_class} #{link_name}"
275     assert_not_nil link_object[:uuid],
276         "expected non-nil uuid for link for #{link_class} #{link_name}"
277     assert_equal link_class, link_object[:link_class],
278         "expected link_class not found for #{link_class} #{link_name}"
279     assert_equal link_name, link_object[:name],
280         "expected link_name not found for #{link_class} #{link_name}"
281     assert_equal tail_uuid, link_object[:tail_uuid],
282         "expected tail_uuid not found for #{link_class} #{link_name}"
283     if head_uuid
284       assert_equal head_uuid, link_object[:head_uuid],
285           "expected head_uuid not found for #{link_class} #{link_name}"
286     end
287   end
288
289 end