From 3f1aca1a80e41bb6e8d7ff30bc45f920f3a82590 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sun, 6 Sep 2015 20:51:37 +0200 Subject: Message Sequence Match Data: sequence set come before UIDs. Cf. RFC 7162: seq-match-data = "(" known-sequence-set SP known-uid-set ")" --- imapsync | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'imapsync') diff --git a/imapsync b/imapsync index ac63577..927d205 100755 --- a/imapsync +++ b/imapsync @@ -619,10 +619,10 @@ sub delete_mapping($$) { } -# Create a sample (UIDs, sequence numbers) to use as 3rd and 4th -# argument of the QRESYNC parameters to the SELECT command. +# Create a sample (sequence numbers, UIDs) to use as Message Sequence +# Match Data for the QRESYNC parameter to the SELECT command. # QRESYNC [RFC7162] doesn't force the server to remember the MODSEQs of -# EXPUNGEd messages. By passing a sample of known UIDs/sequence numbers +# EXPUNGEd messages. By passing a sample of known sequence numbers/UIDs # we let the server know that the messages have been EXPUNGEd [RFC7162, # section 3.2.5.2]. # The UID set is the largest set of higest UIDs with at most 1024 UIDs, @@ -660,7 +660,7 @@ sub sample($$$) { $uids = ($min == $max ? $min : "$min:$max") .(defined $uids ? ','.$uids : ''); } - return ( $uids, ($count - $n + 1).':'.$count ); + return ( ($count - $n + 1).':'.$count, $uids ); } -- cgit v1.2.3 From 6310edda1c366ff9510220d22d2dc8052e2c6066 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sun, 6 Sep 2015 20:58:52 +0200 Subject: =?UTF-8?q?Fix=20typo:=20lUID=20=E2=86=94=20rUID.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- imapsync | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'imapsync') diff --git a/imapsync b/imapsync index 927d205..a454c5d 100755 --- a/imapsync +++ b/imapsync @@ -563,8 +563,8 @@ my $STH_GET_INTERRUPTED_BY_IDX = $DBH->prepare(q{ my $STH_COUNT_MESSAGES = $DBH->prepare(q{SELECT COUNT(*) FROM mapping WHERE idx = ?}); # List last 1024 messages UIDs -my $STH_LASTUIDs_LOCAL = $DBH->prepare(q{SELECT rUID FROM mapping WHERE idx = ? ORDER BY rUID DESC LIMIT 1024}); -my $STH_LASTUIDs_REMOTE = $DBH->prepare(q{SELECT lUID FROM mapping WHERE idx = ? ORDER BY lUID DESC LIMIT 1024}); +my $STH_LASTUIDs_LOCAL = $DBH->prepare(q{SELECT lUID FROM mapping WHERE idx = ? ORDER BY lUID DESC LIMIT 1024}); +my $STH_LASTUIDs_REMOTE = $DBH->prepare(q{SELECT rUID FROM mapping WHERE idx = ? ORDER BY rUID DESC LIMIT 1024}); # Download some missing UIDs from $source; returns the thew allocated UIDs -- cgit v1.2.3