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
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
|
/***************************************************************************
decodeRFC2047.cpp - description
-------------------
begin : Mon Jan 28 2002
copyright : (C) 2002 by Eggert Ehmke
email : eggert.ehmke@berlin.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 "decodeRFC2047.h"
/*
* These functions have been adapted from the KMail program
*/
TQCString decodeQuotedPrintable(const TQCString& aStr)
{
TQCString bStr = aStr;
if (aStr.isNull())
bStr = "";
DwString dwsrc(bStr.data());
DwString dwdest;
DwDecodeQuotedPrintable(dwsrc, dwdest);
return dwdest.c_str();
}
TQCString decodeBase64(const TQCString& aStr)
{
TQCString bStr = aStr;
if (aStr.isNull())
bStr = "";
while (bStr.length() < 16) bStr += "=";
DwString dwsrc(bStr.data(), bStr.length());
DwString dwdest;
TQCString result;
DwDecodeBase64(dwsrc, dwdest);
result = dwdest.c_str();
return result;
}
TQTextCodec* codecForName(const TQCString& _str)
{
if (_str.isEmpty()) return NULL;
if (_str.lower() == "shift_jis" || _str.lower() == "shift-jis")
return TQTextCodec::codecForName("sjis");
return TQTextCodec::codecForName(_str.lower().replace(
TQRegExp("windows"), "cp") );
}
TQString Codecs::decodeRFC2047(const TQCString& aStr)
{
TQString result;
TQCString charset;
char *pos, *beg, *end, *mid;
TQCString str, cstr, LWSP_buffer;
char encoding, ch;
bool valid, lastWasEncodedWord=FALSE;
const int maxLen=200;
int i;
if (aStr.find("=?") < 0)
return TQString::fromLocal8Bit(aStr).replace(TQRegExp("\n[\t ]")," ");
for (pos=aStr.data(); *pos; pos++)
{
// line unfolding
if ( pos[0] == '\r' && pos[1] == '\n' ) {
pos++;
continue;
}
if ( pos[0] == '\n' )
continue;
// collect LWSP after encoded-words,
// because we might need to throw it out
// (when the next word is an encoded-word)
if ( lastWasEncodedWord && ( pos[0] == ' ' || pos[0] == '\t' ) )
{
LWSP_buffer += pos[0];
continue;
}
// verbatimly copy normal text
if (pos[0]!='=' || pos[1]!='?')
{
result += LWSP_buffer + pos[0];
LWSP_buffer = 0;
lastWasEncodedWord = FALSE;
continue;
}
// found possible encoded-word
beg = pos+2;
end = beg;
valid = TRUE;
// parse charset name
charset = "";
for (i=2,pos+=2; i<maxLen && (*pos!='?'&&(*pos==' '||ispunct(*pos)||isalnum(*pos))); i++)
{
charset += *pos;
pos++;
}
if (*pos!='?' || i<4 || i>=maxLen) valid = FALSE;
else
{
// get encoding and check delimiting question marks
encoding = toupper(pos[1]);
if (pos[2]!='?' || (encoding!='Q' && encoding!='B'))
valid = FALSE;
pos+=3;
i+=3;
}
if (valid)
{
mid = pos;
// search for end of encoded part
while (i<maxLen && *pos && !(*pos=='?' && *(pos+1)=='='))
{
i++;
pos++;
}
end = pos+2;//end now points to the first char after the encoded string
if (i>=maxLen || !*pos)
valid = FALSE;
}
if (valid)
{
// valid encoding: decode and throw away separating LWSP
ch = *pos;
*pos = '\0';
str = TQCString(mid).left((int)(mid - pos - 1));
if (encoding == 'Q')
{
// decode quoted printable text
for (i=str.length()-1; i>=0; i--)
if (str[i]=='_')
str[i]=' ';
cstr = decodeQuotedPrintable(str);
}
else
{
// decode base64 text
cstr = decodeBase64(str);
}
TQTextCodec *codec = codecForName(charset);
if (!codec)
codec = codecForName(TDEGlobal::locale()->encoding());
if (codec)
result += codec->toUnicode(cstr);
else
result += TQString::fromLocal8Bit(cstr);
lastWasEncodedWord = TRUE;
*pos = ch;
pos = end -1;
}
else
{
// invalid encoding, keep separating LWSP.
//result += "=?";
//pos = beg -1; // because pos gets increased shortly afterwards
pos = beg - 2;
result += LWSP_buffer;
result += *pos++;
result += *pos;
lastWasEncodedWord = FALSE;
}
LWSP_buffer = 0;
}
return result;
}
|
