Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.

BUG:215923


git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdepim@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 234 insertions, 0 deletions

diff --git a/kmailcvt/filter_thunderbird.cxx b/kmailcvt/filter_thunderbird.cxx
new file mode 100644
index 000000000..e5d71564c
--- /dev/null
+++ b/kmailcvt/filter_thunderbird.cxx
@@ -0,0 +1,234 @@
+/***************************************************************************
+            filter_thunderbird.cxx  -  Thunderbird mail import
+                             -------------------
+    begin                : Januar 26 2005
+    copyright            : (C) 2005 by Danny Kukawka
+    email                : danny.kukawka@web.de
+ ***************************************************************************/
+
+/***************************************************************************
+ *                                                                         *
+ *   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.                                   *
+ *                                                                         *
+ ***************************************************************************/
+
+#include "filter_thunderbird.hxx"
+
+#include <config.h>
+#include <klocale.h>
+#include <kfiledialog.h>
+#include <ktempfile.h>
+
+
+/** Default constructor. */
+FilterThunderbird::FilterThunderbird(void) :
+        Filter(i18n("Import Thunderbird/Mozilla Local Mails and Folder Structure"),
+               "Danny Kukawka",
+               i18n("<p><b>Thunderbird/Mozilla import filter</b></p>"
+                    "<p>Select your base Thunderbird/Mozilla mailfolder"
+                    " (usually ~/.thunderbird/*.default/Mail/Local Folders/).</p>"
+                    "<p><b>Note:</b> Never choose a Folder which <u>does not</u> contain mbox-files (for example,"
+                    " a maildir): if you do, you will get many new folders.</p>"
+                    "<p>Since it is possible to recreate the folder structure, the folders "
+                    "will be stored under: \"Thunderbird-Import\".</p>"))
+{}
+
+/** Destructor. */
+FilterThunderbird::~FilterThunderbird(void)
+{
+    endImport();
+}
+
+/** Recursive import of Evolution's mboxes. */
+void FilterThunderbird::import(FilterInfo *info)
+{
+    /**
+     * We ask the user to choose Evolution's root directory. 
+     * This should be usually ~/.thunderbird/xxxx.default/Mail/Local Folders/
+     */
+    QString thunderDir = QDir::homeDirPath() + "/.thunderbird/";
+    QDir d( thunderDir );
+    if ( !d.exists() ) {
+        thunderDir = QDir::homeDirPath();
+    }
+
+    KFileDialog *kfd;
+    kfd = new KFileDialog( thunderDir, "", 0, "kfiledialog", true );
+    kfd->setMode(KFile::Directory | KFile::LocalOnly);
+    kfd->exec();
+    mailDir  = kfd->selectedFile();
+
+    if (mailDir.isEmpty()) {
+        info->alert(i18n("No directory selected."));
+    }
+    /**
+     * If the user only select homedir no import needed because 
+     * there should be no files and we surely import wrong files.
+     */
+    else if ( mailDir == QDir::homeDirPath() || mailDir == (QDir::homeDirPath() + "/")) {
+        info->addLog(i18n("No files found for import."));
+    } else {
+        info->setOverall(0);
+
+        /** Recursive import of the MailArchives */
+        QDir dir(mailDir);
+        QStringList rootSubDirs = dir.entryList("[^\\.]*", QDir::Dirs, QDir::Name); // Removal of . and ..
+        int currentDir = 1, numSubDirs = rootSubDirs.size();
+        for(QStringList::Iterator filename = rootSubDirs.begin() ; filename != rootSubDirs.end() ; ++filename, ++currentDir) {
+            if(info->shouldTerminate()) break;
+            importDirContents(info, dir.filePath(*filename), *filename, *filename);
+            info->setOverall((int) ((float) currentDir / numSubDirs * 100));
+        }
+
+        /** import last but not least all archives from the root-dir */
+        QDir importDir (mailDir);
+        QStringList files = importDir.entryList("[^\\.]*", QDir::Files, QDir::Name);
+        for ( QStringList::Iterator mailFile = files.begin(); mailFile != files.end(); ++mailFile) {
+            if(info->shouldTerminate()) break;
+            QString temp_mailfile = *mailFile;
+            if (temp_mailfile.endsWith(".msf") || temp_mailfile.endsWith("msgFilterRules.dat")) {}
+            else {
+                info->addLog( i18n("Start import file %1...").arg( temp_mailfile ) );
+                importMBox(info, mailDir + temp_mailfile , temp_mailfile, QString::null);
+            }
+        }
+
+        info->addLog( i18n("Finished importing emails from %1").arg( mailDir ));
+        if(count_duplicates > 0) {
+            info->addLog( i18n("1 duplicate message not imported", "%n duplicate messages not imported", count_duplicates));
+        }
+    }
+    if (info->shouldTerminate()) info->addLog( i18n("Finished import, canceled by user."));
+    info->setCurrent(100);
+    info->setOverall(100);
+}
+
+/**
+ * Import of a directory contents.
+ * @param info Information storage for the operation.
+ * @param dirName The name of the directory to import.
+ * @param KMailRootDir The directory's root directory in KMail's folder structure.
+ * @param KMailSubDir The directory's direct ancestor in KMail's folder structure.
+ */
+void FilterThunderbird::importDirContents(FilterInfo *info, const QString& dirName, const QString& KMailRootDir, const QString& KMailSubDir)
+{
+    if(info->shouldTerminate()) return;
+    /** Here Import all archives in the current dir */
+    QDir dir(dirName);
+
+    QDir importDir (dirName);
+    QStringList files = importDir.entryList("[^\\.]*", QDir::Files, QDir::Name);
+    for ( QStringList::Iterator mailFile = files.begin(); mailFile != files.end(); ++mailFile) {
+        if(info->shouldTerminate()) break;
+        QString temp_mailfile = *mailFile;
+        if (temp_mailfile.endsWith(".msf") || temp_mailfile.endsWith("msgFilterRules.dat")) {}
+        else {
+            info->addLog( i18n("Start import file %1...").arg( temp_mailfile ) );
+            importMBox(info, (dirName + "/" + temp_mailfile) , KMailRootDir, KMailSubDir);
+        }
+    }
+
+    /** If there are subfolders, we import them one by one */
+    QDir subfolders(dirName);
+    QStringList subDirs = subfolders.entryList("[^\\.]*", QDir::Dirs, QDir::Name);
+    for(QStringList::Iterator filename = subDirs.begin() ; filename != subDirs.end() ; ++filename) {
+        if(info->shouldTerminate()) break;
+        QString kSubDir;
+        if(!KMailSubDir.isNull()) {
+            kSubDir = KMailSubDir + "/" + *filename;
+        } else {
+            kSubDir = *filename;
+        }
+        importDirContents(info, subfolders.filePath(*filename), KMailRootDir, kSubDir);
+    }
+}
+
+/**
+ * Import of a MBox file.
+ * @param info Information storage for the operation.
+ * @param dirName The MBox's name.
+ * @param KMailRootDir The directory's root directory in KMail's folder structure.
+ * @param KMailSubDir The directory's equivalent in KMail's folder structure. *
+ */
+void FilterThunderbird::importMBox(FilterInfo *info, const QString& mboxName, const QString& rootDir, const QString& targetDir)
+{
+    QFile mbox(mboxName);
+    bool first_msg = true;
+    if (!mbox.open(IO_ReadOnly)) {
+        info->alert(i18n("Unable to open %1, skipping").arg(mboxName));
+    } else {
+        QFileInfo filenameInfo(mboxName);
+
+        info->setCurrent(0);
+        if( mboxName.length() > 20 ) {
+            QString tmp_info = mboxName;
+            tmp_info = tmp_info.replace( mailDir, "../" );
+            if (tmp_info.contains(".sbd"))
+                tmp_info.remove(".sbd");
+            info->setFrom( tmp_info );
+        } else
+            info->setFrom(mboxName);
+        if(targetDir.contains(".sbd")) {
+            QString tmp_info = targetDir;
+            tmp_info.remove(".sbd");
+            info->setTo(tmp_info);
+        } else
+            info->setTo(targetDir);
+
+        QByteArray input(MAX_LINE);
+        long l = 0;
+
+        while (!mbox.atEnd()) {
+            KTempFile tmp;
+            /** @todo check if the file is really a mbox, maybe search for 'from' string at start */
+            /* comment by Danny:
+            * Don't use QTextStream to read from mbox, etter use QDataStream. QTextStream only 
+            * support Unicode/Latin1/Locale. So you lost information from emails with 
+            * charset!=Unicode/Latin1/Locale (e.g. KOI8-R) and Content-Transfer-Encoding != base64 
+            * (e.g. 8Bit). It also not help to convert the QTextStream to Unicode. By this you
+            * get Unicode/UTF-email but KMail can't detect the correct charset.
+            */
+            QCString seperate;
+
+            if(!first_msg)
+                tmp.file()->writeBlock( input, l );
+            l = mbox.readLine( input.data(),MAX_LINE); // read the first line, prevent "From "
+            tmp.file()->writeBlock( input, l );
+
+            while ( ! mbox.atEnd() &&  (l = mbox.readLine(input.data(),MAX_LINE)) && ((seperate = input.data()).left(5) != "From ")) {
+                tmp.file()->writeBlock( input, l );
+            }
+            tmp.close();
+            first_msg = false;
+
+            QString destFolder;
+            QString _targetDir = targetDir;
+            if(!targetDir.isNull()) {
+                if(_targetDir.contains(".sbd"))
+                    _targetDir.remove(".sbd");
+                destFolder += "Thunderbird-Import/" + _targetDir + "/" + filenameInfo.baseName(TRUE);// mboxName;
+            } else {
+                destFolder = "Thunderbird-Import/" + rootDir;
+                if(destFolder.contains(".sbd"))
+                    destFolder.remove(".sbd");
+            }
+
+            if(info->removeDupMsg)
+                addMessage( info, destFolder, tmp.name() );
+            else
+                addMessage_fastImport( info, destFolder, tmp.name() );
+
+            tmp.unlink();
+            int currentPercentage = (int) (((float) mbox.at() / filenameInfo.size()) * 100);
+            info->setCurrent(currentPercentage);
+            if (info->shouldTerminate()) {
+                mbox.close();
+                return;
+            }
+        }
+        mbox.close();
+    }
+}