Mercurial > pub > Impl
view Lib/IMPL/Security/Rule/RoleCheck.pm @ 63:76b878ad6596
Added serialization support for the IMPL::Object::List
More intelligent Exception message
Fixed encoding support in the actions
Improoved tests
Minor fixes
author | wizard |
---|---|
date | Mon, 15 Mar 2010 02:38:09 +0300 |
parents | a1498298d3ee |
children | 79bf75223afe |
line wrap: on
line source
package IMPL::Security::Rule::RoleCheck; require IMPL::Security::Role; sub SatisfyAll { my ($secPackage,$object,$desiredAccess,$context) = @_; my $roleEffective = new IMPL::Security::Role ( effective => $context->AssignedRoles ); return $roleEffective->Satisfy(ExtractRoles($object)); } sub _ExtractRoles { return (); }