summaryrefslogtreecommitdiffstats
path: root/tdecore/kurldrag.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tdecore/kurldrag.cpp')
-rw-r--r--tdecore/kurldrag.cpp294
1 files changed, 294 insertions, 0 deletions
diff --git a/tdecore/kurldrag.cpp b/tdecore/kurldrag.cpp
new file mode 100644
index 000000000..e0a7be227
--- /dev/null
+++ b/tdecore/kurldrag.cpp
@@ -0,0 +1,294 @@
+/* This file is part of the KDE project
+ Copyright (C) 2000 David Faure <faure@kde.org>
+
+ This program is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public
+ License as published by the Free Software Foundation; either
+ version 2 of the License.
+
+ 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this program; see the file COPYING. If not, write to
+ the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA.
+*/
+
+#include "kurldrag.h"
+#include <tqstrlist.h>
+#include <tqdragobject.h>
+#include <tqfont.h>
+#include <unistd.h>
+
+#include <kdeversion.h>
+#include <kglobal.h>
+#include <klocale.h>
+#include <kdebug.h>
+
+class KURLDragPrivate
+{
+public:
+ bool m_exportAsText;
+};
+
+KURLDrag::KURLDrag( const KURL::List &urls, TQWidget* dragSource, const char * name )
+ : TQUriDrag(dragSource, name), m_metaData(), d( 0 )
+{
+ init(urls);
+}
+
+KURLDrag::KURLDrag( const KURL::List &urls, const TQMap<TQString,TQString>& metaData,
+ TQWidget* dragSource, const char * name )
+ : TQUriDrag(dragSource, name), m_metaData(metaData), d( 0 )
+{
+ init(urls);
+}
+
+KURLDrag::~KURLDrag()
+{
+ delete d;
+}
+
+void KURLDrag::init(const KURL::List &urls)
+{
+ KURL::List::ConstIterator uit = urls.begin();
+ KURL::List::ConstIterator uEnd = urls.end();
+ // Get each URL encoded in utf8 - and since we get it in escaped
+ // form on top of that, .latin1() is fine.
+ for ( ; uit != uEnd ; ++uit )
+ {
+ m_urls.append( urlToString(*uit).latin1() );
+ }
+ setUris(m_urls);
+}
+
+void KURLDrag::setExportAsText( bool exp )
+{
+ // For now d is only used here, so create it on demand
+ if ( !d )
+ d = new KURLDragPrivate;
+ d->m_exportAsText = exp;
+}
+
+KURLDrag * KURLDrag::newDrag( const KURL::List &urls, TQWidget* dragSource, const char * name )
+{
+ return new KURLDrag( urls, TQMap<TQString, TQString>(), dragSource, name );
+}
+
+KURLDrag * KURLDrag::newDrag( const KURL::List &urls, const TQMap<TQString, TQString>& metaData,
+ TQWidget* dragSource, const char * name )
+{
+ return new KURLDrag( urls, metaData, dragSource, name );
+}
+
+bool KURLDrag::decode( const TQMimeSource *e, KURL::List &uris )
+{
+ if ( e->provides( "application/x-kde-urilist" ) ) {
+ TQByteArray payload = e->tqencodedData( "application/x-kde-urilist" );
+ if ( payload.size() ) {
+ uint c=0;
+ const char* d = payload.data();
+ while (c < payload.size() && d[c]) {
+ uint f = c;
+ // Find line end
+ while (c < payload.size() && d[c] && d[c]!='\r'
+ && d[c] != '\n')
+ c++;
+ TQCString s(d+f,c-f+1);
+ if ( s[0] != '#' ) // non-comment?
+ uris.append(stringToUrl(s));
+ // Skip junk
+ while (c < payload.size() && d[c] &&
+ (d[c]=='\n' || d[c]=='\r'))
+ c++;
+ }
+ return !uris.isEmpty();
+ }
+ }
+
+ TQStrList lst;
+ TQUriDrag::decode( e, lst );
+ for (TQStrListIterator it(lst); *it; ++it)
+ {
+ KURL url = stringToUrl( *it );
+ if ( !url.isValid() )
+ {
+ uris.clear();
+ break;
+ }
+ uris.append( url );
+ }
+ return !uris.isEmpty();
+}
+
+bool KURLDrag::decode( const TQMimeSource *e, KURL::List &uris, TQMap<TQString,TQString>& metaData )
+{
+ if ( decode( e, uris ) ) // first decode the URLs (see above)
+ {
+ TQByteArray ba = e->tqencodedData( "application/x-kio-metadata" );
+ if ( ba.size() )
+ {
+ TQString s = ba.data();
+ TQStringList l = TQStringList::split( "$@@$", s );
+ TQStringList::ConstIterator it = l.begin();
+ bool readingKey = true; // true, then false, then true, etc.
+ TQString key;
+ for ( ; it != l.end(); ++it ) {
+ if ( readingKey )
+ key = *it;
+ else
+ metaData.replace( key, *it );
+ readingKey = !readingKey;
+ }
+ Q_ASSERT( readingKey ); // an odd number of items would be, well, odd ;-)
+ }
+ return true; // Success, even if no metadata was found
+ }
+ return false; // Couldn't decode the URLs
+}
+
+#ifdef Q_WS_QWS
+bool KURLDrag::decode( TQStringList const &e, KURL::List &uris )
+{
+ TQStringList::ConstIterator end(e.end());
+ for(TQStringList::ConstIterator it=e.begin(); it!=end; ++it)
+ {
+ KURL url = KURL( *it, 106 ); // 106 is mib enum for utf8 codec
+ if ( !url.isValid() )
+ {
+ uris.clear();
+ break;
+ }
+ uris.append( url );
+ }
+ return !uris.isEmpty();
+}
+#endif
+
+////
+
+const char * KURLDrag::format( int i ) const
+{
+ if ( i == 0 )
+ return "text/uri-list";
+ else if ( i == 1 )
+ return "application/x-kio-metadata";
+ if ( d && d->m_exportAsText == false )
+ return 0;
+ if ( i == 2 )
+ return "text/plain";
+ else if ( i == 3 ) //Support this for apps that use plain XA_STRING clipboard
+ return "text/plain;charset=ISO-8859-1";
+ else if ( i == 4 ) //Support this for apps that use the UTF_STRING clipboard
+ return "text/plain;charset=UTF-8";
+ else return 0;
+}
+
+TQByteArray KURLDrag::tqencodedData( const char* mime ) const
+{
+ TQByteArray a;
+ TQCString mimetype( mime );
+ if ( mimetype == "text/uri-list" )
+ return TQUriDrag::tqencodedData( mime );
+ else if ( mimetype == "text/plain" )
+ {
+ TQStringList uris;
+ for (TQStrListIterator it(m_urls); *it; ++it)
+ uris.append(stringToUrl(*it).prettyURL());
+
+ TQCString s = uris.join( "\n" ).local8Bit();
+ if( uris.count() > 1 ) // terminate last line, unless it's the only line
+ s.append( "\n" );
+ a.resize( s.length());
+ memcpy( a.data(), s.data(), s.length()); // no trailing zero in clipboard text
+ }
+ else if ( mimetype.lower() == "text/plain;charset=iso-8859-1")
+ {
+ TQStringList uris;
+ for (TQStrListIterator it(m_urls); *it; ++it)
+ for (TQStrListIterator it(m_urls); *it; ++it)
+ uris.append(stringToUrl(*it).url(0, 4)); // 4 is mib for latin1
+
+ TQCString s = uris.join( "\n" ).latin1();
+ if( uris.count() > 1 )
+ s.append( "\n" );
+ a.resize( s.length());
+ memcpy( a.data(), s.data(), s.length());
+ }
+ else if ( mimetype.lower() == "text/plain;charset=utf-8")
+ {
+ TQStringList uris;
+ for (TQStrListIterator it(m_urls); *it; ++it)
+ uris.append(stringToUrl(*it).prettyURL());
+
+ TQCString s = uris.join( "\n" ).utf8();
+ if( uris.count() > 1 )
+ s.append( "\n" );
+ a.resize( s.length());
+ memcpy( a.data(), s.data(), s.length());
+ }
+ else if ( mimetype == "application/x-kio-metadata" )
+ {
+ if ( !m_metaData.isEmpty() )
+ {
+ TQString s;
+ TQMap<TQString,TQString>::ConstIterator it;
+ for( it = m_metaData.begin(); it != m_metaData.end(); ++it )
+ {
+ s += it.key();
+ s += "$@@$";
+ s += it.data();
+ s += "$@@$";
+ }
+ a.resize( s.length() + 1 );
+ memcpy( a.data(), s.latin1(), a.size() );
+ }
+ }
+ return a;
+}
+
+KURL KURLDrag::stringToUrl(const TQCString &s)
+{
+ if (strncmp(s.data(), "file:", 5) == 0)
+ return KURL(s, KGlobal::locale()->fileEncodingMib());
+
+ return KURL(s, 106); // 106 is mib enum for utf8 codec;
+}
+
+TQString KURLDrag::urlToString(const KURL &url)
+{
+ if (url.isLocalFile())
+ {
+#if 1
+ return url.url(0, KGlobal::locale()->fileEncodingMib());
+#else
+ // According to the XDND spec, file:/ URLs for DND must have
+ // the hostname part. But in really it just breaks many apps,
+ // so it's disabled for now.
+ TQString s = url.url(0, KGlobal::locale()->fileEncodingMib());
+ if( !s.startsWith( "file://" ))
+ {
+ char hostname[257];
+ if ( gethostname( hostname, 255 ) == 0 )
+ {
+ hostname[256] = '\0';
+ return TQString( "file://" ) + hostname + s.mid( 5 );
+ }
+ }
+#endif
+ }
+
+ if ( url.protocol() == "mailto" ) {
+ return url.path();
+ }
+
+ return url.url(0, 106); // 106 is mib enum for utf8 codec
+}
+
+// deprecated ctor
+KURLDrag::KURLDrag( const TQStrList & urls, const TQMap<TQString,TQString>& metaData,
+ TQWidget * dragSource, const char* name ) :
+TQUriDrag( urls, dragSource, name ), m_urls( urls ), m_metaData( metaData ), d( 0 ) {}