Re: Yet another perl script for loading Cyrus mailboxes

From: Ken Murchison (no email)
Date: Mon Oct 15 2001 - 12:25:24 EDT


 wrote:
>
> Ken Murchison writes:
> >
> >FYI, you might want to use the Cyrus::IMAP module and use AUTHENTICATE
> >PLAIN (or add PLAIN to Net::IMAP). By doing this, you can proxy for
> >each user by logging in as an admin and assuming the user's identity
> >(see RFC2595 for details). IMO this is cleaner than patching saslauthd.
>
> Can Cyrus::IMAP do an append? I couldn't see a function for that.
> If so, that would be better, because I use it for other administrative
> functions as well.

Gary,

It looks like using Net::IMAP is much easier for your app, so I hacked
up a quick AUTH=PLAIN patch for it.

So, provided that your imapd advertises AUTH=PLAIN (either by using
'imapd -p 2' or by adding STARTTLS to Net::IMAP), the login command
would look something like:

@authinfo = ($user, $admin, $adminpass);
$response = $imap->authenticate('plain', @authinfo);

Hope this helps,
Ken

-- 
Kenneth Murchison     Oceana Matrix Ltd.
Software Engineer     21 Princeton Place
716-662-8973 x26      Orchard Park, NY 14127
--PGP Public Key--    http://www.oceana.com/~ken/ksm.pgp









Hosted Email Solutions

Invaluement Anti-Spam DNSBLs



Powered By FreeBSD   Powered By FreeBSD