summaryrefslogtreecommitdiffstats
path: root/tdeioslave/smtp/request.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tdeioslave/smtp/request.cpp')
-rw-r--r--tdeioslave/smtp/request.cpp189
1 files changed, 189 insertions, 0 deletions
diff --git a/tdeioslave/smtp/request.cpp b/tdeioslave/smtp/request.cpp
new file mode 100644
index 000000000..6d38fdd6e
--- /dev/null
+++ b/tdeioslave/smtp/request.cpp
@@ -0,0 +1,189 @@
+/*
+ request.cpp
+
+ This file is part of tdeio_smtp, the KDE SMTP tdeioslave.
+ Copyright (c) 2003 Marc Mutz <mutz@kde.org>
+
+ This program is free software; you can redistribute it and/or modify it
+ under the terms of the GNU General Public License, version 2, as
+ published by the Free Software Foundation.
+
+ 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
+
+ In addition, as a special exception, the copyright holders give
+ permission to link the code of this program with any edition of
+ the Qt library by Trolltech AS, Norway (or with modified versions
+ of Qt that use the same license as Qt), and distribute linked
+ combinations including the two. You must obey the GNU General
+ Public License in all respects for all of the code used other than
+ Qt. If you modify this file, you may extend this exception to
+ your version of the file, but you are not obligated to do so. If
+ you do not wish to do so, delete this exception statement from
+ your version.
+*/
+
+#include <config.h>
+
+#include "request.h"
+
+#include <kurl.h>
+#include <kidna.h>
+#include <kmdcodec.h>
+#include <kdebug.h>
+
+#include <assert.h>
+
+namespace KioSMTP {
+
+ Request Request::fromURL( const KURL & url ) {
+ Request request;
+
+ const TQStringList query = TQStringList::split( '&', url.query().mid(1) );
+#ifndef NDEBUG
+ kdDebug(7112) << "Parsing request from query:\n" + query.join("\n" ) << endl;
+#endif
+ for ( TQStringList::const_iterator it = query.begin() ; it != query.end() ; ++it ) {
+ int equalsPos = (*it).find( '=' );
+ if ( equalsPos <= 0 )
+ continue;
+
+ const TQString key = (*it).left( equalsPos ).lower();
+ const TQString value = KURL::decode_string( (*it).mid( equalsPos + 1 ) );
+
+ if ( key == "to" )
+ request.addTo( value );
+ else if ( key == "cc" )
+ request.addCc( value );
+ else if ( key == "bcc" )
+ request.addBcc( value );
+ else if ( key == "headers" ) {
+ request.setEmitHeaders( value == "0" );
+ request.setEmitHeaders( false ); // ### ???
+ }
+ else if ( key == "subject" )
+ request.setSubject( value );
+ else if ( key == "from" )
+ request.setFromAddress( value );
+ else if ( key == "profile" )
+ request.setProfileName( value );
+ else if ( key == "hostname" )
+ request.setHeloHostname( value );
+ else if ( key == "body" )
+ request.set8BitBody( value.upper() == "8BIT" );
+ else if ( key == "size" )
+ request.setSize( value.toUInt() );
+ else
+ kdWarning(7112) << "while parsing query: unknown query item \""
+ << key << "\" with value \"" << value << "\"" << endl;
+ }
+
+ return request;
+ }
+
+ TQCString Request::heloHostnameCString() const {
+ return KIDNA::toAsciiCString( heloHostname() );
+ }
+
+ static bool isUsAscii( const TQString & s ) {
+ for ( uint i = 0 ; i < s.length() ; ++i )
+ if ( s[i].unicode() > 127 ) return false;
+ return true;
+ }
+
+
+
+ static inline bool isSpecial( char ch ) {
+ static const TQCString specials = "()<>[]:;@\\,.\"";
+ return specials.find( ch ) >= 0;
+ }
+
+
+
+ static inline bool needsQuoting( char ch ) {
+ return ch == '\\' || ch == '"' || ch == '\n' ;
+ }
+
+
+
+ static inline TQCString rfc2047Encode( const TQString & s ) {
+ TQCString r = KCodecs::base64Encode( s.stripWhiteSpace().utf8(), false );
+ return "=?utf-8?b?" + r + "?=" ; // use base64 since that always gives a valid encoded-word
+ }
+
+
+
+ static TQCString quote( const TQString & s ) {
+ assert( isUsAscii( s ) );
+
+ TQCString r( s.length() * 2 );
+ bool needsQuotes = false;
+
+ unsigned int j = 0;
+ for ( unsigned int i = 0 ; i < s.length() ; ++i ) {
+ char ch = s[i].latin1();
+ if ( isSpecial( ch ) ) {
+ if ( needsQuoting( ch ) )
+ r[j++] = '\\';
+ needsQuotes = true;
+ }
+ r[j++] = ch;
+ }
+ r.truncate( j );
+
+ if ( needsQuotes )
+ return '"' + r + '"';
+ else
+ return r;
+ }
+
+
+
+ static TQCString formatFromAddress( const TQString & fromRealName, const TQString & fromAddress ) {
+ if ( fromRealName.isEmpty() )
+ return fromAddress.latin1(); // no real name: return "joe@user.org"
+
+ // return "Joe User <joe@user.org>", "\"User, Joe\" <joe@user.org>"
+ // or "=?utf-8?q?Joe_User?= <joe@user.org>", depending on real name's nature.
+ TQCString r = isUsAscii( fromRealName ) ? quote( fromRealName ) : rfc2047Encode( fromRealName );
+ return r + " <" + fromAddress.latin1() + '>';
+ }
+
+
+
+ static TQCString formatSubject( TQString s ) {
+ if ( isUsAscii( s ) )
+ return TQString(s.remove( '\n' )).latin1(); // don't break header folding,
+ // so remove any line break
+ // that happen to be around
+ else
+ return rfc2047Encode( s );
+ }
+
+
+
+ TQCString Request::headerFields( const TQString & fromRealName ) const {
+ if ( !emitHeaders() )
+ return 0;
+
+ assert( hasFromAddress() ); // should have been checked for by
+ // caller (MAIL FROM comes before DATA)
+
+ TQCString result = "From: " + formatFromAddress( fromRealName, fromAddress() ) + "\r\n";
+
+ if ( !subject().isEmpty() )
+ result += "Subject: " + formatSubject( subject() ) + "\r\n";
+ if ( !to().empty() )
+ result += TQCString( "To: " ) + to().join( ",\r\n\t" /* line folding */ ).latin1() + "\r\n";
+ if ( !cc().empty() )
+ result += TQCString( "Cc: " ) + cc().join( ",\r\n\t" /* line folding */ ).latin1() + "\r\n";
+ return result;
+ }
+
+} // namespace KioSMTP