You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdepim/kioslaves/imap4/imapinfo.cc

237 lines
7.1 KiB

/**********************************************************************
*
* imapinfo.cc - IMAP4rev1 SELECT / EXAMINE handler
* Copyright (C) 2000 Sven Carstens
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*
* Send comments and bug fixes to
*
*********************************************************************/
/*
References:
RFC 2060 - Internet Message Access Protocol - Version 4rev1 - December 1996
RFC 2192 - IMAP URL Scheme - September 1997
RFC 1731 - IMAP Authentication Mechanisms - December 1994
(Discusses KERBEROSv4, GSSAPI, and S/Key)
RFC 2195 - IMAP/POP AUTHorize Extension for Simple Challenge/Response
- September 1997 (CRAM-MD5 authentication method)
RFC 2104 - HMAC: Keyed-Hashing for Message Authentication - February 1997
Supported URLs:
imap://server/ - Prompt for user/pass, list all folders in home directory
imap://user:pass@server/ - Uses LOGIN to log in
imap://user;AUTH=method:pass@server/ - Uses AUTHENTICATE to log in
imap://server/folder/ - List messages in folder
*/
#include "imapinfo.h"
#include "imapparser.h"
#include <kdebug.h>
imapInfo::imapInfo ():count_ (0),
recent_ (0),
unseen_ (0),
uidValidity_ (0),
uidNext_ (0),
flags_ (0),
permanentFlags_ (0),
readWrite_ (false),
countAvailable_ (false),
recentAvailable_ (false),
unseenAvailable_ (false),
uidValidityAvailable_ (false),
uidNextAvailable_ (false),
flagsAvailable_ (false),
permanentFlagsAvailable_ (false), readWriteAvailable_ (false)
{
}
imapInfo::imapInfo (const imapInfo & mi):count_ (mi.count_),
recent_ (mi.recent_),
unseen_ (mi.unseen_),
uidValidity_ (mi.uidValidity_),
uidNext_ (mi.uidNext_),
flags_ (mi.flags_),
permanentFlags_ (mi.permanentFlags_),
readWrite_ (mi.readWrite_),
countAvailable_ (mi.countAvailable_),
recentAvailable_ (mi.recentAvailable_),
unseenAvailable_ (mi.unseenAvailable_),
uidValidityAvailable_ (mi.uidValidityAvailable_),
uidNextAvailable_ (mi.uidNextAvailable_),
flagsAvailable_ (mi.flagsAvailable_),
permanentFlagsAvailable_ (mi.permanentFlagsAvailable_),
readWriteAvailable_ (mi.readWriteAvailable_)
{
}
imapInfo & imapInfo::operator = (const imapInfo & mi)
{
// Avoid a = a.
if (this == &mi)
return *this;
count_ = mi.count_;
recent_ = mi.recent_;
unseen_ = mi.unseen_;
uidValidity_ = mi.uidValidity_;
uidNext_ = mi.uidNext_;
flags_ = mi.flags_;
permanentFlags_ = mi.permanentFlags_;
readWrite_ = mi.readWrite_;
countAvailable_ = mi.countAvailable_;
recentAvailable_ = mi.recentAvailable_;
unseenAvailable_ = mi.unseenAvailable_;
uidValidityAvailable_ = mi.uidValidityAvailable_;
uidNextAvailable_ = mi.uidNextAvailable_;
flagsAvailable_ = mi.flagsAvailable_;
permanentFlagsAvailable_ = mi.permanentFlagsAvailable_;
readWriteAvailable_ = mi.readWriteAvailable_;
return *this;
}
imapInfo::imapInfo (const TQStringList & list):count_ (0),
recent_ (0),
unseen_ (0),
uidValidity_ (0),
uidNext_ (0),
flags_ (0),
permanentFlags_ (0),
readWrite_ (false),
countAvailable_ (false),
recentAvailable_ (false),
unseenAvailable_ (false),
uidValidityAvailable_ (false),
uidNextAvailable_ (false),
flagsAvailable_ (false),
permanentFlagsAvailable_ (false), readWriteAvailable_ (false)
{
for (TQStringList::ConstIterator it (list.begin ()); it != list.end (); ++it)
{
TQString line (*it);
line.truncate(line.length() - 2);
TQStringList tokens(TQStringList::split (' ', line));
kdDebug(7116) << "Processing: " << line << endl;
if (tokens[0] != "*")
continue;
if (tokens[1] == "OK")
{
if (tokens[2] == "[UNSEEN")
setUnseen (tokens[3].left (tokens[3].length () - 1).toULong ());
else if (tokens[2] == "[UIDVALIDITY")
setUidValidity (tokens[3].left (tokens[3].length () - 1).toULong ());
else if (tokens[2] == "[UIDNEXT")
setUidNext (tokens[3].left (tokens[3].length () - 1).toULong ());
else if (tokens[2] == "[PERMANENTFLAGS")
{
int flagsStart = line.find('(');
int flagsEnd = line.find(')');
kdDebug(7116) << "Checking permFlags from " << flagsStart << " to " << flagsEnd << endl;
if ((-1 != flagsStart) && (-1 != flagsEnd) && flagsStart < flagsEnd)
setPermanentFlags (_flags (line.mid (flagsStart, flagsEnd).latin1()));
}
else if (tokens[2] == "[READ-WRITE")
{
setReadWrite (true);
}
else if (tokens[2] == "[READ-ONLY")
{
setReadWrite (false);
}
else
{
kdDebug(7116) << "unknown token2: " << tokens[2] << endl;
}
}
else if (tokens[1] == "FLAGS")
{
int flagsStart = line.find ('(');
int flagsEnd = line.find (')');
if ((-1 != flagsStart) && (-1 != flagsEnd) && flagsStart < flagsEnd)
setFlags (_flags (line.mid (flagsStart, flagsEnd).latin1() ));
}
else
{
if (tokens[2] == "EXISTS")
setCount (tokens[1].toULong ());
else if (tokens[2] == "RECENT")
setRecent (tokens[1].toULong ());
else
kdDebug(7116) << "unknown token1/2: " << tokens[1] << " " << tokens[2] << endl;
}
}
}
ulong imapInfo::_flags (const TQCString & inFlags)
{
ulong flags = 0;
parseString flagsString;
flagsString.data.duplicate(inFlags.data(), inFlags.length());
if (flagsString[0] == '(')
flagsString.pos++;
while (!flagsString.isEmpty () && flagsString[0] != ')')
{
TQCString entry = imapParser::parseOneWordC(flagsString).upper();
if (entry.isEmpty ())
flagsString.clear();
else if (0 != entry.tqcontains ("\\SEEN"))
flags ^= Seen;
else if (0 != entry.tqcontains ("\\ANSWERED"))
flags ^= Answered;
else if (0 != entry.tqcontains ("\\FLAGGED"))
flags ^= Flagged;
else if (0 != entry.tqcontains ("\\DELETED"))
flags ^= Deleted;
else if (0 != entry.tqcontains ("\\DRAFT"))
flags ^= Draft;
else if (0 != entry.tqcontains ("\\RECENT"))
flags ^= Recent;
else if (0 != entry.tqcontains ("\\*"))
flags ^= User;
// non standard kmail falgs
else if ( entry.tqcontains( "KMAILFORWARDED" ) || entry.tqcontains( "$FORWARDED" ) )
flags = flags | Forwarded;
else if ( entry.tqcontains( "KMAILTODO" ) || entry.tqcontains( "$TODO" ) )
flags = flags | Todo;
else if ( entry.tqcontains( "KMAILWATCHED" ) || entry.tqcontains( "$WATCHED" ) )
flags = flags | Watched;
else if ( entry.tqcontains( "KMAILIGNORED" ) || entry.tqcontains( "$IGNORED" ) )
flags = flags | Ignored;
}
return flags;
}