> > I'm following a previous thread. I would like to be able to open a seen > > skiplist database in order to verify if a particular user has red its mail. > > If possible, a way to do that in PERL would be perfect. > > Thanks in advance > That's, um, tricky actually. > You need to read the uniqueid of the mailbox from the cyrus.header file > first, then read the contents of the skiplist file. The easiest way to > do that is `cyr_dbtool /path/to/seen/file.db skiplist get $uniqueid`, > which will give you the seen record. You then need to parse that for > uniqueids - it's in the format: > range,range,range > where range is either a single integer or $low:$high where low and high > are both integers - in which case all the messages in that range > inclusive are seen. > There's some other stuff in that seen record as well. Here we go: > [brong@imap3 hm]$ cat /mnt/meta8/slot308/store23/meta/b/user/brong/cyrus.header | grep user.brong > user.brong 6af857f64475158a Maybe I'm looking in the wrong place; but on my test server (cyrus-imapd-2.3.11) my cyrus.header looks like - estate1:/var/spool/imap/user/awilliam # cat cyrus.header Cyrus mailbox header "The best thing about this system was that it had lots of goals." --Jim Morris on Andrew 46a0a0b041114dce Junk $Label1 $Label2 $Label3 $Label4 $Label5 $MDNSent NotJunk receipt-handled $has_cal awilliam lrswipcda Is "46a0a0b041114dce" the id? > [brong@imap3 hm]$ /usr/cyrus/bin/cyr_dbtool -C /etc/imapd-slot308-master.conf /mnt/meta8/slot308/store23/conf/user/b/brong.seen skiplist get 6af857f64475158a > 1 1242810803 386716 1242800567 1:386615 > Looks like I've seen all my email! Also notice 4 other > fields at the start: > <version> <lastread> <lastuid> <lastchange> <seen_items> <lastchange> is an epoch time stamp? I'm not clear on what <lastuid> is; looks like it is a message id? What operation sets/updates the <lastuid> value? > Here's a more interesting couple of folders to give you an idea > of what ranges look like: > 798b2df94146a5fe 1 1095746485 1526 1095740252 1:559,561:772,774:920,922:1109,1111:1115,1117:1138,1140:1170,1172:1195,1197:1521 > 798b2df941576261 1 1125837870 34307 1123831223 1:28289,29118,30871,31887,31935,32058,32209:32210,32214:32219,32222,32228 > So - in summary. It's not easy. Some plumbing required... > (lastuid gives you "\Recent" as per the IMAP flag - anything > newer than that is recent!) So any message with $id > $lastuid is "recent". ---- Cyrus Home Page: http://cyrusimap.web.cmu.edu/ Cyrus Wiki/FAQ: http://cyrusimap.web.cmu.edu/twiki List Archives/Info: http://asg.web.cmu.edu/cyrus/mailing-list.html
