Author image Michael Gregorowicz

NAME

SVN::Access::Resource - Object representing a SVN Access file group!

SYNOPSIS

  use SVN::Access;

  my $acl = SVN::Access->new(acl_file => '/usr/local/svn/conf/badnews_svn_access.conf');

  # grant mikey_g read-write access to /
  $acl->resource('/')->authorize('mikey_g', rw);

  # print out users and their authorization for /
  while (my ($user, $perms) = each(%{$acl->resource('/')->authorized})) {
      print "$user: $perms\n";    
  }

  # revoke access for mikey_g to /
  $acl->resource->('/')->deauthorize('mikey_g');

DESCRIPTION

SVN::Access::Resource is an object wrapper around a SVN::Access resource.

METHODS

new constructor, the most basic kind, i'm only looking for authorized (hashref), and name.

Example: my $resource = SVN::Access::Resource->new( name => '/', authorized => { rick => 'rw', # commit access.. randal => 'r', # read only access luthor => '', # explicitly deny access } );

authorized returns a hash reference containing (user, access) pairs.

Example: my %authorized = %{$resource->authorized};

authorize authorizes a user / group for access to this resource.

Example: $resource->authorize('@admins' => 'rw'); # give the admins commit $resource->authorize('*', => 'r'); # give anonymous read only

deauthorize revokes the user / group's access to this resource.

Example: $resource->deauthorize('rick'); # later, rick.

name accessor method that returns the resource's name (path)

SEE ALSO

subversion (http://subversion.tigris.org/), SVN::ACL, svnserve.conf

AUTHOR

Michael Gregorowicz, <mike@mg2.org>

COPYRIGHT AND LICENSE

Copyright (C) 2007 by Michael Gregorowicz

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.