1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
/***************************************************************************
FilterPlain.cxx - Plain mail import
-------------------
begin : Fri Jun 14 2002
copyright : (C) 2002 by Laurence Anderson
email : l.d.anderson@warwick.ac.uk
***************************************************************************/
/***************************************************************************
* *
* 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 <config.h>
#include <klocale.h>
#include <kfiledialog.h>
#include <libgen.h>
#include "filter_plain.hxx"
FilterPlain::FilterPlain() :
Filter(i18n("Import Plain Text Emails"),
"Laurence Anderson <p>( Filter accelerated by Danny Kukawka )</p>",
i18n("<p>Select the directory containing the emails on your system. "
"The emails are placed in a folder with the same name as the "
"directory they were in, prefixed by PLAIN-</p>"
"<p>This filter will import all .msg, .eml and .txt emails.</p>"))
{}
FilterPlain::~FilterPlain()
{
endImport();
}
void FilterPlain::import(FilterInfo *info)
{
// Select directory containing plain text emails
TQString mailDir = KFileDialog::getExistingDirectory(TQDir::homeDirPath(),info->parent());
if (mailDir.isEmpty()) { // No directory selected
info->alert(i18n("No directory selected."));
return;
}
TQDir dir (mailDir);
TQStringList files = dir.entryList("*.[eE][mM][lL]; *.[tT][xX][tT]; *.[mM][sS][gG]", TQDir::Files, TQDir::Name);
// Count total number of files to be processed
info->addLog(i18n("Counting files..."));
int totalFiles = files.count();
int currentFile = 0;
info->addLog(i18n("Importing new mail files..."));
for ( TQStringList::Iterator mailFile = files.begin(); mailFile != files.end(); ++mailFile ) {
info->setFrom(*mailFile);
info->setTo(dir.dirName());
info->setCurrent(0);
/* comment by Danny Kukawka:
* addMessage() == old function, need more time and check for duplicates
* addMessage_fastImport == new function, faster and no check for duplicates
*/
if(info->removeDupMsg) {
if(! addMessage( info, "PLAIN-" + dir.dirName(), dir.filePath(*mailFile) )) {
info->addLog( i18n("Could not import %1").arg( *mailFile ) );
}
} else {
if( ! addMessage_fastImport( info, "PLAIN-" + dir.dirName(), dir.filePath(*mailFile) )) {
info->addLog( i18n("Could not import %1").arg( *mailFile ) );
}
}
info->setCurrent(100);
info->setOverall(100 * ++currentFile/ totalFiles);
if ( info->shouldTerminate() ) break;
}
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."));
count_duplicates = 0;
}
|
