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.
136 lines
4.2 KiB
136 lines
4.2 KiB
/**********************************************************************
|
|
*
|
|
* imapinfo.cc - IMAP4rev1 EXAMINE / SELECT 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 "rfcdecoder.h"
|
|
#include "imaplist.h"
|
|
#include "imapparser.h"
|
|
|
|
#include <kdebug.h>
|
|
|
|
imapList::imapList (): parser_(0), noInferiors_ (false),
|
|
noSelect_ (false), marked_ (false), unmarked_ (false),
|
|
hasChildren_ (false), hasNoChildren_ (false)
|
|
{
|
|
}
|
|
|
|
imapList::imapList (const imapList & lr):parser_(lr.parser_),
|
|
hierarchyDelimiter_ (lr.hierarchyDelimiter_),
|
|
name_ (lr.name_),
|
|
noInferiors_ (lr.noInferiors_),
|
|
noSelect_ (lr.noSelect_), marked_ (lr.marked_), unmarked_ (lr.unmarked_),
|
|
hasChildren_ (lr.hasChildren_), hasNoChildren_ (lr.hasNoChildren_),
|
|
attributes_ (lr.attributes_)
|
|
{
|
|
}
|
|
|
|
imapList & imapList::operator = (const imapList & lr)
|
|
{
|
|
// Avoid a = a.
|
|
if (this == &lr)
|
|
return *this;
|
|
|
|
parser_ = lr.parser_;
|
|
hierarchyDelimiter_ = lr.hierarchyDelimiter_;
|
|
name_ = lr.name_;
|
|
noInferiors_ = lr.noInferiors_;
|
|
noSelect_ = lr.noSelect_;
|
|
marked_ = lr.marked_;
|
|
unmarked_ = lr.unmarked_;
|
|
hasChildren_ = lr.hasChildren_;
|
|
hasNoChildren_ = lr.hasNoChildren_;
|
|
attributes_ = lr.attributes_;
|
|
|
|
return *this;
|
|
}
|
|
|
|
imapList::imapList (const TQString & inStr, imapParser &parser)
|
|
: parser_(&parser),
|
|
noInferiors_ (false),
|
|
noSelect_ (false),
|
|
marked_ (false), unmarked_ (false), hasChildren_ (false),
|
|
hasNoChildren_ (false)
|
|
{
|
|
parseString s;
|
|
s.data.duplicate(inStr.latin1(), inStr.length());
|
|
|
|
if (s[0] != '(')
|
|
return; //not proper format for us
|
|
|
|
s.pos++; // tie off (
|
|
|
|
parseAttributes( s );
|
|
|
|
s.pos++; // tie off )
|
|
parser_->skipWS (s);
|
|
|
|
hierarchyDelimiter_ = parser_->parseOneWordC(s);
|
|
if (hierarchyDelimiter_ == "NIL")
|
|
hierarchyDelimiter_ = TQString();
|
|
name_ = rfcDecoder::fromIMAP (parser_->parseLiteral (s)); // decode modified UTF7
|
|
}
|
|
|
|
void imapList::parseAttributes( parseString & str )
|
|
{
|
|
TQCString attribute, orig;
|
|
|
|
while ( !str.isEmpty () && str[0] != ')' )
|
|
{
|
|
orig = parser_->parseOneWordC(str);
|
|
attributes_ << orig;
|
|
attribute = orig.lower();
|
|
if (-1 != attribute.tqfind ("\\noinferiors"))
|
|
noInferiors_ = true;
|
|
else if (-1 != attribute.tqfind ("\\noselect"))
|
|
noSelect_ = true;
|
|
else if (-1 != attribute.tqfind ("\\marked"))
|
|
marked_ = true;
|
|
else if (-1 != attribute.tqfind ("\\unmarked"))
|
|
unmarked_ = true;
|
|
else if (-1 != attribute.tqfind ("\\hastqchildren"))
|
|
hasChildren_ = true;
|
|
else if (-1 != attribute.tqfind ("\\hasnotqchildren"))
|
|
hasNoChildren_ = true;
|
|
else
|
|
kdDebug(7116) << "imapList::imapList: bogus attribute " << attribute << endl;
|
|
}
|
|
}
|
|
|