Mercurial > pub > Impl

view Lib/IMPL/Security/Rule/RoleCheck.pm @ 199:e743a8481327

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added REST support for forms (with only get and post methods)
author sergey
date Mon, 23 Apr 2012 01:36:52 +0400
parents 4d0e1962161c
children 6d8092d8ce1b
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->rolesAssigned );
    
    return $roleEffective->Satisfy(ExtractRoles($object));
}

sub _ExtractRoles {
    return ();
}