[Postfixbuch-users] Cyrus und PERL script, ACL setzen?
Berger, Stefan
stefan.berger at uniteddata.de
Mo Feb 21 19:57:39 CET 2005
Hi Liste,
weiß jemand wie ich meinem Script (setacl_script) beibringe, dass es
beim Aufruf durch "/setacl_script username"nicht nur wie unten
programmiert von der Mailbox user/username die ACL setzt sondern auch
von allen Unterordnern?
Habe versucht mit Wildcards (%,*) zu mogeln aber kein Erfolg gehabt. Im
Cyradm geht das ja auch problemlos mit "sam user/username* cyrus all".
Wär für jeden Tip dankbar...
Beste Grüße!
_______________________________________________________________
#!/usr/bin/perl
#"authenticate" ["--minssf" N] ["--maxssf" N] ["--mechanisms" list] [user]
#use strict;
use Cyrus::IMAP::Admin;
my $server='localhost';
my $admin='cyrus';
my $pass='absolutmegageheim';
$olduser=$ARGV[0];
my $cyradm = Cyrus::IMAP::Admin->new($server) or
die "$0: Unable to connect to IMAP server '$server': $!" ;
$cyradm->authenticate(-user => $admin, -password => $pass, -mechanism
=> "LOGIN") or
die "$0: Failed to authenticate to IMAP server
as '$server': $!";
!!!!!! Diese Zeile --------> $cyradm->setacl("user/$olduser", $admin
=> "all") or <------------ diese Zeile !!!!!
warn "$0: Unable to setacl for $user on mailbox user/$olduser : $!";
___________________________________________________________________
--
Stefan Berger
-IT - Management-
United Data GmbH
Wir bringen Sie ins Gespräch.
address:
Nonnenstrasse 19
04229 Leipzig
phone: +49 (0)341 200 949 01
fax: +49 (0)341 940 1 333
mobile: +49 (0)172 37 21 231
email: stefan.berger at uniteddata.de
www: www.uniteddata.de
___________________________________________________________
This e-mail may contain information that is privileged and confidential. The
information is intended only for the use of the addressee. If you are not the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited and may be unlawful. If you have received this
e-mail in error, please notify Uniteddata immediately and erase all copies of the
message.
Mehr Informationen über die Mailingliste Postfixbuch-users