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/kmail/kmfolderdir.cpp

314 lines
8.0 KiB

// kmfolderdir.cpp
#include <config.h>
#include <tqdir.h>
#include "kmfolderdir.h"
#include "kmfoldersearch.h"
#include "kmfoldercachedimap.h"
#include "kmfolder.h"
#include <assert.h>
#include <errno.h>
#include <klocale.h>
#include <kmessagebox.h>
#include <kdebug.h>
#include <kstandarddirs.h>
//=============================================================================
//=============================================================================
KMFolderRootDir::KMFolderRootDir(KMFolderMgr* manager, const TQString& path,
KMFolderDirType dirType)
: KMFolderDir( 0, 0, path, dirType ),
mPath( path ),
mManager( manager )
{
}
//-----------------------------------------------------------------------------
KMFolderRootDir::~KMFolderRootDir()
{
// WABA: We can't let KMFolderDir do this because by the time its
// desctructor gets called, KMFolderRootDir is already destructed
// Most notably the path.
clear();
}
//-----------------------------------------------------------------------------
void KMFolderRootDir::setPath(const TQString& aPath)
{
mPath = aPath;
}
//-----------------------------------------------------------------------------
TQString KMFolderRootDir::path() const
{
return mPath;
}
//-----------------------------------------------------------------------------
TQString KMFolderRootDir::prettyURL() const
{
if ( !mBaseURL.isEmpty() )
return i18n( mBaseURL.data() );
else
return TQString::null;
}
//-----------------------------------------------------------------------------
void KMFolderRootDir::setBaseURL( const TQCString &baseURL )
{
mBaseURL = baseURL;
}
//-----------------------------------------------------------------------------
KMFolderMgr* KMFolderRootDir::manager() const
{
return mManager;
}
//=============================================================================
//=============================================================================
KMFolderDir::KMFolderDir( KMFolder * owner, KMFolderDir* parent,
const TQString& name, KMFolderDirType dirType )
: KMFolderNode( parent, name ), KMFolderNodeList(),
mOwner( owner ), mDirType( dirType )
{
setAutoDelete( true );
}
//-----------------------------------------------------------------------------
KMFolderDir::~KMFolderDir()
{
clear();
}
//-----------------------------------------------------------------------------
KMFolder* KMFolderDir::createFolder(const TQString& aFolderName, bool aSysFldr, KMFolderType aFolderType)
{
KMFolder* fld;
assert(!aFolderName.isEmpty());
// FIXME urgs, is this still needed
if (mDirType == KMImapDir)
fld = new KMFolder( this, aFolderName, KMFolderTypeImap );
else
fld = new KMFolder( this, aFolderName, aFolderType );
assert(fld != 0);
fld->setSystemFolder(aSysFldr);
KMFolderNode* fNode;
int index = 0;
for (fNode=first(); fNode; fNode=next()) {
if (fNode->name().lower() > fld->name().lower()) {
insert( index, fld );
break;
}
++index;
}
if (!fNode)
append(fld);
fld->correctUnreadMsgsCount();
return fld;
}
//----------------------------------------------------------------------------
TQString KMFolderDir::path() const
{
static TQString p;
if (parent())
{
p = parent()->path();
p.append("/");
p.append(name());
}
else p = "";
return p;
}
//----------------------------------------------------------------------------
TQString KMFolderDir::label() const
{
if ( mOwner )
return mOwner->label();
else
return TQString::null;
}
//-----------------------------------------------------------------------------
TQString KMFolderDir::prettyURL() const
{
TQString parentUrl;
if ( parent() )
parentUrl = parent()->prettyURL();
if ( !parentUrl.isEmpty() )
return parentUrl + '/' + label();
else
return label();
}
//-----------------------------------------------------------------------------
bool KMFolderDir::reload(void)
{
TQDir dir;
KMFolder* folder;
TQFileInfo* fileInfo;
TQStringList diList;
TQPtrList<KMFolder> folderList;
clear();
const TQString fldPath = path();
dir.setFilter(TQDir::Files | TQDir::Dirs | TQDir::Hidden);
dir.setNameFilter("*");
if (!dir.cd(fldPath, TRUE))
{
TQString msg = i18n("<qt>Cannot enter folder <b>%1</b>.</qt>").arg(fldPath);
KMessageBox::information(0, msg);
return FALSE;
}
QFileInfoList* fiList=(QFileInfoList*)dir.entryInfoList();
if (!fiList)
{
TQString msg = i18n("<qt>Folder <b>%1</b> is unreadable.</qt>").arg(fldPath);
KMessageBox::information(0, msg);
return FALSE;
}
for (fileInfo=fiList->first(); fileInfo; fileInfo=fiList->next())
{
const TQString fname = fileInfo->fileName();
if( ( fname[0] == '.' ) && !fname.endsWith( ".directory" ) ) {
// ignore all hidden files except our subfolder containers
continue;
}
if( fname == ".directory" ) {
// ignore .directory files (not created by us)
continue;
}
// Collect subdirectories.
if ( fileInfo->isDir() &&
fname.startsWith( "." ) && fname.endsWith( ".directory" ) ) {
diList.append(fname);
continue;
}
if ( mDirType == KMImapDir
&& path().startsWith( KMFolderImap::cacheLocation() ) )
{
// Is the below needed for dimap as well?
if ( KMFolderImap::encodeFileName(
KMFolderImap::decodeFileName( fname ) ) == fname )
{
folder = new KMFolder( this, KMFolderImap::decodeFileName( fname ),
KMFolderTypeImap );
append(folder);
folderList.append(folder);
}
}
else if ( mDirType == KMDImapDir
&& path().startsWith( KMFolderCachedImap::cacheLocation() ) )
{
if (fileInfo->isDir()) // a directory
{
// For this to be a cached IMAP folder, it must be in the KMail dimap
// subdir and must be have a uidcache file or be a maildir folder
TQString maildir(fname + "/new");
TQString imapcachefile = TQString::fromLatin1(".%1.uidcache").arg(fname);
if ( dir.exists( imapcachefile) || dir.exists( maildir ) )
{
folder = new KMFolder( this, fname, KMFolderTypeCachedImap );
append(folder);
folderList.append(folder);
}
}
}
else if ( mDirType == KMSearchDir)
{
folder = new KMFolder( this, fname, KMFolderTypeSearch );
append(folder);
folderList.append(folder);
}
else if ( mDirType == KMStandardDir )
{
// This is neither an imap, dimap nor a search folder. Can be either
// mbox or maildir.
if (fileInfo->isDir())
{
// Maildir folder
if( dir.exists( fname + "/new" ) )
{
folder = new KMFolder( this, fname, KMFolderTypeMaildir );
append(folder);
folderList.append(folder);
}
}
else
{
// all other files are folders (at the moment ;-)
folder = new KMFolder( this, fname, KMFolderTypeMbox );
append(folder);
folderList.append(folder);
}
}
}
for (folder=folderList.first(); folder; folder=folderList.next())
{
for(TQStringList::Iterator it = diList.begin();
it != diList.end();
++it)
if (*it == "." + folder->fileName() + ".directory")
{
KMFolderDir* folderDir = new KMFolderDir( folder, this, *it, mDirType);
folderDir->reload();
append(folderDir);
folder->setChild(folderDir);
break;
}
}
return TRUE;
}
//-----------------------------------------------------------------------------
KMFolderNode* KMFolderDir::hasNamedFolder(const TQString& aName)
{
KMFolderNode* fNode;
for (fNode=first(); fNode; fNode=next()) {
if (fNode->name() == aName)
return fNode;
}
return 0;
}
//-----------------------------------------------------------------------------
KMFolderMgr* KMFolderDir::manager() const
{
return parent()->manager();
}
#include "kmfolderdir.moc"