Added shared mailbox option default tip
authorroot@pop.net.schlittermann.de
Thu, 17 Sep 2009 13:03:02 +0200
changeset 8 7d66f58516c1
parent 7 2d6d5cafd56e
Added shared mailbox option
cyrus-migrate.pl
mailboxes.all
--- a/cyrus-migrate.pl	Mon Aug 03 17:11:08 2009 +0200
+++ b/cyrus-migrate.pl	Thu Sep 17 13:03:02 2009 +0200
@@ -39,6 +39,7 @@
     --help	    this help text
     --folders	    only sync folders
     --acls	    fix ACLs
+    --shared	    migrage shared mailboxes
 #
 
 use strict;
@@ -73,12 +74,14 @@
 my $opt_maxage = 0;
 my $opt_folders = 0;
 my $opt_acls = 0;
+my $opt_shared = 0;
 
 GetOptions(
     "dry-ryn"	    =>	\$opt_dry,
     "skip"	    =>	\$opt_skip,
     "folders"	    =>	\$opt_folders,
     "acls"	    =>	\$opt_acls,
+    "shared"	    =>	\$opt_shared,
     "logdir=s"	    =>	\$opt_logdir,
     "maxage=i"	    =>	\$opt_maxage,
 ) or die eval "\"$usage\"";
@@ -91,6 +94,13 @@
     exit 0;
 }
 
+if ($opt_shared) {
+    system("./imapsync --syncacls --ssl1 --ssl2 --prefix2 'Shared Folders' --prefix1 'Shared Folders' --sep1 / --sep2 / --host1 $imap_from_host --host2  $imap_to_host     --subscribe --user1 heiko\@schlittermann.de --user2 heiko\@schlittermann.de --authuser1 root --authuser2 root   --password1 x --password2 x --folder 'Shared Folders/domains'");
+    exit 0;
+}
+
+
+
 ### connection to mysql account database
 my $dbh = DBI->connect($dsn, $db_user, $db_pass, { RaiseError => 1} ) or
     die "$ME: cannot conncet to mysql: $!\n";
--- a/mailboxes.all	Mon Aug 03 17:11:08 2009 +0200
+++ b/mailboxes.all	Thu Sep 17 13:03:02 2009 +0200
@@ -12,7 +12,6 @@
 antje@prana-kreis.de
 arbes@sandsteine.de
 arnold@schlittermann.de
-aviehrig@saxacon.de
 b.braeckle@ajh-drucktechnik.de
 beate.becher@sandsteine.de
 beate.gross@ugvo.de