@@ -97,6 +97,72 @@ public function testManageObjectAcl()
9797allAuthenticatedUsers: READER
9898Deleted allAuthenticatedUsers from $ objectUrl ACL
9999
100+ EOF ;
101+ $ this ->assertEquals ($ output , $ outputString );
102+ }
103+
104+ public function testPrintFileAclForUser ()
105+ {
106+ $ objectName = $ this ->requireEnv ('GOOGLE_STORAGE_OBJECT ' );
107+
108+ $ bucket = self ::$ storage ->bucket (self ::$ bucketName );
109+ $ object = $ bucket ->object ($ objectName );
110+ $ acl = $ object ->acl ();
111+
112+ $ output = self ::runFunctionSnippet ('add_object_acl ' , [
113+ self ::$ bucketName ,
114+ $ objectName ,
115+ 'allAuthenticatedUsers ' ,
116+ 'READER ' ,
117+ ]);
118+
119+ $ aclInfo = $ acl ->get (['entity ' => 'allAuthenticatedUsers ' ]);
120+ $ this ->assertArrayHasKey ('role ' , $ aclInfo );
121+ $ this ->assertEquals ('READER ' , $ aclInfo ['role ' ]);
122+
123+ $ output .= self ::runFunctionSnippet ('print_file_acl_for_user ' , [
124+ self ::$ bucketName ,
125+ $ objectName ,
126+ 'allAuthenticatedUsers ' ,
127+ ]);
128+
129+ $ objectUrl = sprintf ('gs://%s/%s ' , self ::$ bucketName , $ objectName );
130+ $ outputString = <<<EOF
131+ Added allAuthenticatedUsers (READER) to $ objectUrl ACL
132+ allAuthenticatedUsers: READER
133+
134+ EOF ;
135+ $ this ->assertEquals ($ output , $ outputString );
136+ }
137+
138+ public function testPrintBucketAclForUser ()
139+ {
140+ $ objectName = $ this ->requireEnv ('GOOGLE_STORAGE_OBJECT ' );
141+
142+ $ bucket = self ::$ storage ->bucket (self ::$ bucketName );
143+ $ object = $ bucket ->object ($ objectName );
144+ $ acl = $ object ->acl ();
145+
146+ $ output = self ::runFunctionSnippet ('add_bucket_acl ' , [
147+ self ::$ bucketName ,
148+ 'allAuthenticatedUsers ' ,
149+ 'READER ' ,
150+ ]);
151+
152+ $ aclInfo = $ acl ->get (['entity ' => 'allAuthenticatedUsers ' ]);
153+ $ this ->assertArrayHasKey ('role ' , $ aclInfo );
154+ $ this ->assertEquals ('READER ' , $ aclInfo ['role ' ]);
155+
156+ $ output .= self ::runFunctionSnippet ('print_bucket_acl_for_user ' , [
157+ self ::$ bucketName ,
158+ 'allAuthenticatedUsers ' ,
159+ ]);
160+
161+ $ bucketUrl = sprintf ('gs://%s ' , self ::$ bucketName );
162+ $ outputString = <<<EOF
163+ Added allAuthenticatedUsers (READER) to $ bucketUrl ACL
164+ allAuthenticatedUsers: READER
165+
100166EOF ;
101167 $ this ->assertEquals ($ output , $ outputString );
102168 }
0 commit comments