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