Tickets :: Comment on [#8734] Synchronization of multiple calendars with SyncML

* Your Email Address
* Spam protection	Enter the letters below: .___.. ..__ \ /. . \| \| \|\| \ >< \|\ \| \| \|__\|\|__// \\| \\|
Comment	>>> It seems multiple calendarsynchronizations are only working for >>> owner-owned calendars. We have some group calendars and most of our >>> users wants to be able to sync the calendars they have read-access to. >>> So is it possible to add synchronaization for "not" owned calendars? >> >> No. There are a number of issues with this. For your case,the most >> important is that there is no way to mark calendar entries readonly >> in activesync. Editing an event in a read only calendar would appear >> to work on the client,would fail to update server side which would >> cause the client to continuously attempt to sync this change. There >> is a thread on the dev list with more detailed discussion about this >> owner-only limitation. > > OK, i solved this issue for me with his script... Maybe this will > help someone else: > > > #!/usr/bin/perl > > use DBD::mysql; > use strict; > > # CONFIGURE > my $user="$ARGV[0]"; > my $database="$ARGV[1]"; > my $host="localhost"; > my $dbuser="root"; > my $password=`gtc-crypt -a mysqlroot -p`; > chomp($password); > > # Connect to the DB > my $dbh = > DBI->connect("DBI:mysql:database=$database;host=$host","$dbuser", > "$password", {'RaiseError' => 1}) \|\| die "No connection to DB > $database: $? $!"; > $password=""; > > # Create synccalendar if not exists > # Get primary calendar of the user > my $sth = $dbh->prepare("SELECT share_name FROM kronolith_sharesng > WHERE share_owner='$user'"); > $sth->execute(); > my $synccal; > my $nosynccal=1; > my $first=1; > while (my $cal = $sth->fetchrow_array()) { > if ($first) { > $synccal=$cal; > $synccal=~s/^...../SYNC-/; > $first=0; > } > else { > if ($cal eq $synccal) { > $nosynccal=0; > last; > } > } > } > if (($nosynccal) && ($synccal)) { > my $insert="INSERT INTO kronolith_sharesng (share_name, share_owner, > share_flags, perm_creator_2, perm_creator_4, perm_creator_8, > perm_creator_16, perm_creator_1024, perm_default_2, perm_default_4, > perm_default_8, perm_default_16, perm_default_1024, perm_guest_2, > perm_guest_4, perm_guest_8, perm_guest_16, perm_guest_1024, > attribute_name, attribute_desc, attribute_color, share_parents) > VALUES ('$synccal', '$user', '0', '0', '0', '0', '0', '0', '0', '0', > '0', '0', '0', '0', '0', '0', '0', '0', 'Sync', 'Only for syncing', > '#ffffff', 'NULL')"; > $dbh->do($insert) \|\| die "Error: $! $?"; > } > exit 1 unless ($synccal); > > # Get displayed calendars of user > my @cals; > my $sth = $dbh->prepare("SELECT pref_value FROM horde_prefs WHERE > pref_scope='kronolith' AND pref_name='display_cals' AND > pref_uid='$user'"); > $sth->execute(); > while (my $ref = $sth->fetchrow_hashref()) { > my $cals= $ref->{'pref_value'}; > $cals=~s/^a:.+:{//; > $cals=~s/i:.;s:23://g; > $cals=~s/\"//g; > $cals=~s/;}$//; > @cals=split(/;/, $cals); > } > exit 1 unless ($cals[0]); > > # Set Sync-Calendar in Horde-Prefs > $dbh->do("DELETE FROM horde_prefs WHERE pref_uid='$user' AND > pref_name='sync_calendars' AND pref_scope='kronolith'"); > $dbh->do("INSERT INTO horde_prefs (pref_uid, pref_scope, pref_name, > pref_value) VALUES ('$user', 'kronolith', 'sync_calendars', > 'a:1:{i:0;s:23:\"$synccal\";}')"); > > # Clear the sync-calendar > $dbh->do("DELETE FROM kronolith_events WHERE calendar_id='$synccal'"); > > # Copy Calendars to sync-Calendar > foreach my $cal (@cals) { > if ($cal eq $synccal) { next } > my $sth = $dbh->prepare("SELECT * FROM kronolith_events WHERE > calendar_id='$cal'"); > $sth->execute(); > while (my $ref = $sth->fetchrow_hashref()) { > $ref->{'event_id'}=~s/^...../SYNC-/; > my $insert="INSERT INTO kronolith_events (event_keywords, > event_exceptions, event_recurinterval, event_recurdays, > event_recurenddate, event_recurcount, event_baseid, > event_exceptionoriginaldate, event_id, event_uid, event_creator_id, > event_title, event_description, event_location, event_url, > event_private, event_status, event_attendees, event_resources, > event_modified, event_start, event_end, event_allday, event_alarm, > event_alarm_methods, event_recurtype, calendar_id) VALUES > ('$ref->{'event_keywords'}', '$ref->{'event_exceptions'}', > '$ref->{'event_recurinterval'}', '$ref->{'event_recurdays'}', > '$ref->{'event_recurenddate'}', '$ref->{'event_recurcount'}', > '$ref->{'event_baseid'}', '$ref->{'event_exceptionoriginaldate'}', > '$ref->{'event_id'}', '$ref->{'event_uid'}', > '$ref->{'event_creator_id'}', '$ref->{'event_title'}', > '$ref->{'event_description'}', '$ref->{'event_location'}', > '$ref->{'event_url'}', '$ref->{'event_private'}', > '$ref->{'event_status'}', '$ref->{'event_attendees'}', > '$ref->{'event_resources'}', '$ref->{'event_modified'}', > '$ref->{'event_start'}', '$ref->{'event_end'}', > '$ref->{'event_allday'}', '$ref->{'event_alarm'}', > '$ref->{'event_alarm_methods'}', '$ref->{'event_recurtype'}', > '$synccal')"; > $dbh->do($insert) \|\| die "Error: $! $?"; > } > $sth->finish(); > > # Copy Horde-Histories-Settings for synchronization > $sth = $dbh->prepare("SELECT * FROM horde_histories"); > $sth->execute(); > while (my $ref = $sth->fetchrow_hashref()) { > if ($ref->{'object_uid'} =~ /^kronolith\:$cal/) { > $ref->{'object_uid'}=~s/^kronolith\:$cal/kronolith\:$synccal/; > my $insert="INSERT INTO horde_histories (object_uid, > history_action, history_ts, history_desc, history_who, history_extra) > VALUES ('$ref->{'object_uid'}', '$ref->{'history_action'}', > '$ref->{'history_ts'}', '$ref->{'history_desc'}', > '$ref->{'history_who'}', '$ref->{'history_extra'}')"; > $dbh->do($insert) \|\| die "Error: $! $?"; > next; > } > if ($ref->{'object_uid'} =~ /^kronolith\:$synccal/) { > $dbh->do("DELETE FROM horde_histories WHERE > history_id='$ref->{'history_id'}'"); > } > } > $sth->finish(); > } > > >
Attachment
Watch this ticket

Saved Queries