/**************************************************************************** ** ** Implementation of TQUrlOperator class ** ** Created : 950429 ** ** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved. ** ** This file is part of the kernel module of the TQt GUI Toolkit. ** ** This file may be used under the terms of the GNU General ** Public License versions 2.0 or 3.0 as published by the Free ** Software Foundation and appearing in the files LICENSE.GPL2 ** and LICENSE.GPL3 included in the packaging of this file. ** Alternatively you may (at your option) use any later version ** of the GNU General Public License if such license has been ** publicly approved by Trolltech ASA (or its successors, if any) ** and the KDE Free TQt Foundation. ** ** Please review the following information to ensure GNU General ** Public Licensing requirements will be met: ** http://trolltech.com/products/qt/licenses/licensing/opensource/. ** If you are unsure which license is appropriate for your use, please ** review the following information: ** http://trolltech.com/products/qt/licenses/licensing/licensingoverview ** or contact the sales department at sales@trolltech.com. ** ** This file may be used under the terms of the Q Public License as ** defined by Trolltech ASA and appearing in the file LICENSE.TQPL ** included in the packaging of this file. Licensees holding valid TQt ** Commercial licenses may use this file in accordance with the TQt ** Commercial License Agreement provided with the Software. ** ** This file is provided "AS IS" with NO WARRANTY OF ANY KIND, ** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR ** A PARTICULAR PURPOSE. Trolltech reserves all rights not granted ** herein. ** **********************************************************************/ #include "qurloperator.h" #ifndef QT_NO_NETWORKPROTOCOL #include "qurlinfo.h" #include "qnetworkprotocol.h" #include "qmap.h" #include "qdir.h" #include "qptrdict.h" #include "qguardedptr.h" //#define TQURLOPERATOR_DEBUG class TQUrlOperatorPrivate { public: TQUrlOperatorPrivate() { oldOps.setAutoDelete( FALSE ); networkProtocol = 0; nameFilter = "*"; currPut = 0; } ~TQUrlOperatorPrivate() { delete networkProtocol; while ( oldOps.first() ) { oldOps.first()->free(); oldOps.removeFirst(); } } TQMap entryMap; TQNetworkProtocol *networkProtocol; TQString nameFilter; TQDir dir; // maps needed for copy/move operations TQPtrDict getOpPutOpMap; TQPtrDict getOpPutProtMap; TQPtrDict getOpGetProtMap; TQPtrDict getOpRemoveOpMap; TQGuardedPtr currPut; TQStringList waitingCopies; TQString waitingCopiesDest; bool waitingCopiesMove; TQPtrList< TQNetworkOperation > oldOps; }; /*! \class TQUrlOperator qurloperator.h \brief The TQUrlOperator class provides common operations on URLs. \if defined(commercial) It is part of the TQt Enterprise Edition. \endif \ingroup io \ingroup misc \mainclass \module network This class operates on hierarchical structures (such as filesystems) using URLs. Its API facilitates all the common operations: \table \header \i Operation \i Function \row \i List files \i \l listChildren() \row \i Make a directory \i \l mkdir() \row \i Remove a file \i \l remove() \row \i Rename a file \i \l rename() \row \i Get a file \i \l get() \row \i Put a file \i \l put() \row \i Copy a file \i \l copy() \endtable You can obtain additional information about the URL with isDir() and info(). If a directory is to be traversed using listChildren(), a name filter can be set with setNameFilter(). A TQUrlOperator can be used like this, for example to download a file (and assuming that the FTP protocol is \link qInitNetworkProtocols() registered\endlink): \code TQUrlOperator *op = new TQUrlOperator(); op->copy( TQString("ftp://ftp.trolltech.com/qt/source/qt-2.1.0.tar.gz"), "file:/tmp" ); \endcode If you want to be notified about success/failure, progress, etc., you can connect to TQUrlOperator's signals, e.g. to start(), newChildren(), createdDirectory(), removed(), data(), dataTransferProgress(), startedNextCopy(), connectionStateChanged(), finished(), etc. A network operation can be stopped with stop(). The class uses the functionality of registered network protocols to perform these operations. Depending of the protocol of the URL, it uses an appropriate network protocol class for the operations. Each of the operation functions of TQUrlOperator creates a TQNetworkOperation object that describes the operation and puts it into the operation queue for the network protocol used. If no suitable protocol could be found (because no implementation of the necessary network protocol is registered), the URL operator emits errors. Not every protocol supports every operation, but error handling deals with this problem. To register the available network protocols, use the qInitNetworkProtocols() function. The protocols currently supported are: \list \i \link TQFtp FTP\endlink, \i \link TQHttp HTTP\endlink, \i \link TQLocalFs local file system\endlink. \endlist For more information about the TQt Network Architecture see the \link network.html TQt Network Documentation\endlink. \sa TQNetworkProtocol, TQNetworkOperation */ /*! \fn void TQUrlOperator::newChildren( const TQValueList &i, TQNetworkOperation *op ) This signal is emitted after listChildren() was called and new children (i.e. files) have been read from a list of files. \a i holds the information about the new files. \a op is a pointer to the operation object which contains all the information about the operation, including the state. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::finished( TQNetworkOperation *op ) This signal is emitted when an operation of some sort finishes, whether with success or failure. \a op is a pointer to the operation object, which contains all the information, including the state, of the operation which has been finished. Check the state and error code of the operation object to see whether or not the operation was successful. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::start( TQNetworkOperation *op ) Some operations (such as listChildren()) emit this signal when they start processing the operation. \a op is a pointer to the operation object which contains all the information about the operation, including the state. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::createdDirectory( const TQUrlInfo &i, TQNetworkOperation *op ) This signal is emitted when mkdir() succeeds and the directory has been created. \a i holds the information about the new directory. \a op is a pointer to the operation object, which contains all the information about the operation, including the state. \c op->arg(0) holds the new directory's name. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::removed( TQNetworkOperation *op ) This signal is emitted when remove() has been succesful and the file has been removed. \a op is a pointer to the operation object which contains all the information about the operation, including the state. \c op->arg(0) holds the name of the file that was removed. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::itemChanged( TQNetworkOperation *op ) This signal is emitted whenever a file which is a child of the URL has been changed, for example by successfully calling rename(). \a op is a pointer to the operation object which contains all the information about the operation, including the state. \c op->arg(0) holds the original file name and \c op->arg(1) holds the new file name (if it was changed). \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::data( const TQByteArray &data, TQNetworkOperation *op ) This signal is emitted when new \a data has been received after calling get() or put(). \a op is a pointer to the operation object which contains all the information about the operation, including the state. \c op->arg(0) holds the name of the file whose data is retrieved and op->rawArg(1) holds the (raw) data. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::dataTransferProgress( int bytesDone, int bytesTotal, TQNetworkOperation *op ) This signal is emitted during data transfer (using put() or get()). \a bytesDone specifies how many bytes of \a bytesTotal have been transferred. More information about the operation is stored in \a op, a pointer to the network operation that is processed. \a bytesTotal may be -1, which means that the total number of bytes is not known. \sa TQNetworkOperation, TQNetworkProtocol */ /*! \fn void TQUrlOperator::startedNextCopy( const TQPtrList &lst ) This signal is emitted if copy() starts a new copy operation. \a lst contains all TQNetworkOperations related to this copy operation. \sa copy() */ /*! \fn void TQUrlOperator::connectionStateChanged( int state, const TQString &data ) This signal is emitted whenever the URL operator's connection state changes. \a state describes the new state, which is a \l{TQNetworkProtocol::ConnectionState} value. \a data is a string that describes the change of the connection. This can be used to display a message to the user. */ /*! Constructs a TQUrlOperator with an empty (i.e. invalid) URL. */ TQUrlOperator::TQUrlOperator() : TQUrl() { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: cstr 1" ); #endif d = new TQUrlOperatorPrivate; } /*! Constructs a TQUrlOperator using \a url and parses this string. If you pass strings like "/home/qt" the "file" protocol is assumed. */ TQUrlOperator::TQUrlOperator( const TQString &url ) : TQUrl( url ) { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: cstr 2" ); #endif d = new TQUrlOperatorPrivate; getNetworkProtocol(); } /*! Constructs a copy of \a url. */ TQUrlOperator::TQUrlOperator( const TQUrlOperator& url ) : TQObject(), TQUrl( url ) { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: cstr 3" ); #endif d = new TQUrlOperatorPrivate; *d = *url.d; d->networkProtocol = 0; getNetworkProtocol(); d->nameFilter = "*"; d->currPut = 0; } /*! Constructs a TQUrlOperator. The URL on which this TQUrlOperator operates is constructed out of the arguments \a url, \a relUrl and \a checkSlash: see the corresponding TQUrl constructor for an explanation of these arguments. */ TQUrlOperator::TQUrlOperator( const TQUrlOperator& url, const TQString& relUrl, bool checkSlash ) : TQUrl( url, relUrl, checkSlash ) { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: cstr 4" ); #endif d = new TQUrlOperatorPrivate; if ( relUrl == "." ) *d = *url.d; d->networkProtocol = 0; getNetworkProtocol(); d->currPut = 0; } /*! Destructor. */ TQUrlOperator::~TQUrlOperator() { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: dstr" ); #endif delete d; } /*! This private function is used by the simple operation functions, i.e. listChildren(), mkdir(), remove(), rename(), get() and put(), to really start the operation. \a op is a pointer to the network operation that should be started. Returns \a op on success; otherwise returns 0. */ const TQNetworkOperation *TQUrlOperator::startOperation( TQNetworkOperation *op ) { if ( !d->networkProtocol ) getNetworkProtocol(); if ( d->networkProtocol && (d->networkProtocol->supportedOperations()&op->operation()) ) { d->networkProtocol->addOperation( op ); if ( op->operation() == TQNetworkProtocol::OpListChildren ) clearEntries(); return op; } // error TQString msg; if ( !d->networkProtocol ) { msg = tr( "The protocol `%1' is not supported" ).arg( protocol() ); } else { switch ( op->operation() ) { case TQNetworkProtocol::OpListChildren: msg = tr( "The protocol `%1' does not support listing directories" ).arg( protocol() ); break; case TQNetworkProtocol::OpMkDir: msg = tr( "The protocol `%1' does not support creating new directories" ).arg( protocol() ); break; case TQNetworkProtocol::OpRemove: msg = tr( "The protocol `%1' does not support removing files or directories" ).arg( protocol() ); break; case TQNetworkProtocol::OpRename: msg = tr( "The protocol `%1' does not support renaming files or directories" ).arg( protocol() ); break; case TQNetworkProtocol::OpGet: msg = tr( "The protocol `%1' does not support getting files" ).arg( protocol() ); break; case TQNetworkProtocol::OpPut: msg = tr( "The protocol `%1' does not support putting files" ).arg( protocol() ); break; default: // this should never happen break; } } op->setState( TQNetworkProtocol::StFailed ); op->setProtocolDetail( msg ); op->setErrorCode( (int)TQNetworkProtocol::ErrUnsupported ); emit finished( op ); deleteOperation( op ); return 0; } /*! Starts listing the children of this URL (e.g. the files in the directory). The start() signal is emitted before the first entry is listed and finished() is emitted after the last one. The newChildren() signal is emitted for each list of new entries. If an error occurs, the signal finished() is emitted, so be sure to check the state of the network operation pointer. Because the operation may not be executed immediately, a pointer to the TQNetworkOperation object created by this function is returned. This object contains all the data about the operation and is used to refer to this operation later (e.g. in the signals that are emitted by the TQUrlOperator). The return value can also be 0 if the operation object couldn't be created. The path of this TQUrlOperator must to point to a directory (because the children of this directory will be listed), not to a file. */ const TQNetworkOperation *TQUrlOperator::listChildren() { if ( !checkValid() ) return 0; TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpListChildren, TQString::null, TQString::null, TQString::null ); return startOperation( res ); } /*! Tries to create a directory (child) with the name \a dirname. If it is successful, a newChildren() signal with the new child is emitted, and the createdDirectory() signal with the information about the new child is also emitted. The finished() signal (with success or failure) is emitted after the operation has been processed, so check the state of the network operation object to see whether or not the operation was successful. Because the operation will not be executed immediately, a pointer to the TQNetworkOperation object created by this function is returned. This object contains all the data about the operation and is used to refer to this operation later (e.g. in the signals that are emitted by the TQUrlOperator). The return value can also be 0 if the operation object couldn't be created. The path of this TQUrlOperator must to point to a directory (not a file) because the new directory will be created in this path. */ const TQNetworkOperation *TQUrlOperator::mkdir( const TQString &dirname ) { if ( !checkValid() ) return 0; TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpMkDir, dirname, TQString::null, TQString::null ); return startOperation( res ); } /*! Tries to remove the file (child) \a filename. If it succeeds the removed() signal is emitted. finished() (with success or failure) is also emitted after the operation has been processed, so check the state of the network operation object to see whether or not the operation was successful. Because the operation will not be executed immediately, a pointer to the TQNetworkOperation object created by this function is returned. This object contains all the data about the operation and is used to refer to this operation later (e.g. in the signals that are emitted by the TQUrlOperator). The return value can also be 0 if the operation object couldn't be created. The path of this TQUrlOperator must point to a directory; because if \a filename is relative, it will try to remove it in this directory. */ const TQNetworkOperation *TQUrlOperator::remove( const TQString &filename ) { if ( !checkValid() ) return 0; TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpRemove, filename, TQString::null, TQString::null ); return startOperation( res ); } /*! Tries to rename the file (child) called \a oldname to \a newname. If it succeeds, the itemChanged() signal is emitted. finished() (with success or failure) is also emitted after the operation has been processed, so check the state of the network operation object to see whether or not the operation was successful. Because the operation may not be executed immediately, a pointer to the TQNetworkOperation object created by this function is returned. This object contains all the data about the operation and is used to refer to this operation later (e.g. in the signals that are emitted by the TQUrlOperator). The return value can also be 0 if the operation object couldn't be created. This path of this TQUrlOperator must to point to a directory because \a oldname and \a newname are handled relative to this directory. */ const TQNetworkOperation *TQUrlOperator::rename( const TQString &oldname, const TQString &newname ) { if ( !checkValid() ) return 0; TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpRename, oldname, newname, TQString::null ); return startOperation( res ); } /*! Copies the file \a from to \a to. If \a move is TRUE, the file is moved (copied and removed). \a from must point to a file and \a to must point to a directory (into which \a from is copied) unless \a toPath is set to FALSE. If \a toPath is set to FALSE then the \a to variable is assumed to be the absolute file path (destination file path + file name). The copying is done using the get() and put() operations. If you want to be notified about the progress of the operation, connect to the dataTransferProgress() signal. Bear in mind that the get() and put() operations emit this signal through the TQUrlOperator. The number of transferred bytes and the total bytes that you receive as arguments in this signal do not relate to the the whole copy operation; they relate first to the get() and then to the put() operation. Always check what type of operation the signal comes from; this is given in the signal's last argument. At the end, finished() (with success or failure) is emitted, so check the state of the network operation object to see whether or not the operation was successful. Because a move or copy operation consists of multiple operations (get(), put() and maybe remove()), this function doesn't return a single TQNetworkOperation, but rather a list of them. They are in the order: get(), put() and (if applicable) remove(). \sa get(), put() */ TQPtrList TQUrlOperator::copy( const TQString &from, const TQString &to, bool move, bool toPath ) { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: copy %s %s %d", from.latin1(), to.latin1(), move ); #endif TQPtrList ops; ops.setAutoDelete( FALSE ); TQUrlOperator *uFrom = new TQUrlOperator( *this, from ); TQUrlOperator *uTo = new TQUrlOperator( to ); // prepare some string for later usage TQString frm = *uFrom; TQString file = uFrom->fileName(); if (frm == to + file) return ops; file.prepend( "/" ); // uFrom and uTo are deleted when the TQNetworkProtocol deletes itself via // autodelete uFrom->getNetworkProtocol(); uTo->getNetworkProtocol(); TQNetworkProtocol *gProt = uFrom->d->networkProtocol; TQNetworkProtocol *pProt = uTo->d->networkProtocol; uFrom->setPath( uFrom->dirPath() ); if ( gProt && (gProt->supportedOperations()&TQNetworkProtocol::OpGet) && pProt && (pProt->supportedOperations()&TQNetworkProtocol::OpPut) ) { connect( gProt, SIGNAL( data(const TQByteArray&,TQNetworkOperation*) ), this, SLOT( copyGotData(const TQByteArray&,TQNetworkOperation*) ) ); connect( gProt, SIGNAL( dataTransferProgress(int,int,TQNetworkOperation*) ), this, SIGNAL( dataTransferProgress(int,int,TQNetworkOperation*) ) ); connect( gProt, SIGNAL( finished(TQNetworkOperation*) ), this, SLOT( continueCopy(TQNetworkOperation*) ) ); connect( gProt, SIGNAL( finished(TQNetworkOperation*) ), this, SIGNAL( finished(TQNetworkOperation*) ) ); connect( gProt, SIGNAL( connectionStateChanged(int,const TQString&) ), this, SIGNAL( connectionStateChanged(int,const TQString&) ) ); connect( pProt, SIGNAL( dataTransferProgress(int,int,TQNetworkOperation*) ), this, SIGNAL( dataTransferProgress(int,int,TQNetworkOperation*) ) ); connect( pProt, SIGNAL( finished(TQNetworkOperation*) ), this, SIGNAL( finished(TQNetworkOperation*) ) ); connect( pProt, SIGNAL( finished(TQNetworkOperation*) ), this, SLOT( finishedCopy() ) ); TQNetworkOperation *opGet = new TQNetworkOperation( TQNetworkProtocol::OpGet, frm, TQString::null, TQString::null ); ops.append( opGet ); gProt->addOperation( opGet ); TQString toFile = to + file; if (!toPath) toFile = to; TQNetworkOperation *opPut = new TQNetworkOperation( TQNetworkProtocol::OpPut, toFile, TQString::null, TQString::null ); ops.append( opPut ); d->getOpPutProtMap.insert( (void*)opGet, pProt ); d->getOpGetProtMap.insert( (void*)opGet, gProt ); d->getOpPutOpMap.insert( (void*)opGet, opPut ); if ( move && (gProt->supportedOperations()&TQNetworkProtocol::OpRemove) ) { gProt->setAutoDelete( FALSE ); TQNetworkOperation *opRm = new TQNetworkOperation( TQNetworkProtocol::OpRemove, frm, TQString::null, TQString::null ); ops.append( opRm ); d->getOpRemoveOpMap.insert( (void*)opGet, opRm ); } else { gProt->setAutoDelete( TRUE ); } #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: copy operation should start now..." ); #endif return ops; } else { TQString msg; if ( !gProt ) { msg = tr( "The protocol `%1' is not supported" ).arg( uFrom->protocol() ); } else if ( gProt->supportedOperations() & TQNetworkProtocol::OpGet ) { msg = tr( "The protocol `%1' does not support copying or moving files or directories" ).arg( uFrom->protocol() ); } else if ( !pProt ) { msg = tr( "The protocol `%1' is not supported" ).arg( uTo->protocol() ); } else { msg = tr( "The protocol `%1' does not support copying or moving files or directories" ).arg( uTo->protocol() ); } delete uFrom; delete uTo; TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpGet, frm, to, TQString::null ); res->setState( TQNetworkProtocol::StFailed ); res->setProtocolDetail( msg ); res->setErrorCode( (int)TQNetworkProtocol::ErrUnsupported ); emit finished( res ); deleteOperation( res ); } return ops; } /*! \overload Copies the \a files to the directory \a dest. If \a move is TRUE the files are moved, not copied. \a dest must point to a directory. This function calls copy() for each entry in \a files in turn. You don't get a result from this function; each time a new copy begins, startedNextCopy() is emitted, with a list of TQNetworkOperations that describe the new copy operation. */ void TQUrlOperator::copy( const TQStringList &files, const TQString &dest, bool move ) { d->waitingCopies = files; d->waitingCopiesDest = dest; d->waitingCopiesMove = move; finishedCopy(); } /*! Returns TRUE if the URL is a directory; otherwise returns FALSE. This may not always work correctly, if the protocol of the URL is something other than file (local filesystem). If you pass a bool pointer as the \a ok argument, \a *ok is set to TRUE if the result of this function is known to be correct, and to FALSE otherwise. */ bool TQUrlOperator::isDir( bool *ok ) { if ( ok ) *ok = TRUE; if ( isLocalFile() ) { if ( TQFileInfo( path() ).isDir() ) return TRUE; else return FALSE; } if ( d->entryMap.contains( "." ) ) { return d->entryMap[ "." ].isDir(); } // #### can assume that we are a directory? if ( ok ) *ok = FALSE; return TRUE; } /*! Tells the network protocol to get data from \a location or, if this is TQString::null, to get data from the location to which this URL points (see TQUrl::fileName() and TQUrl::encodedPathAndQuery()). What happens then depends on the network protocol. The data() signal is emitted when data comes in. Because it's unlikely that all data will come in at once, it is common for multiple data() signals to be emitted. The dataTransferProgress() signal is emitted while processing the operation. At the end, finished() (with success or failure) is emitted, so check the state of the network operation object to see whether or not the operation was successful. If \a location is TQString::null, the path of this TQUrlOperator should point to a file when you use this operation. If \a location is not empty, it can be a relative URL (a child of the path to which the TQUrlOperator points) or an absolute URL. For example, to get a web page you might do something like this: \code TQUrlOperator op( "http://www.whatever.org/cgi-bin/search.pl?cmd=Hello" ); op.get(); \endcode For most other operations, the path of the TQUrlOperator must point to a directory. If you want to download a file you could do the following: \code TQUrlOperator op( "ftp://ftp.whatever.org/pub" ); // do some other stuff like op.listChildren() or op.mkdir( "new_dir" ) op.get( "a_file.txt" ); \endcode This will get the data of ftp://ftp.whatever.org/pub/a_file.txt. \e Never do anything like this: \code TQUrlOperator op( "http://www.whatever.org/cgi-bin" ); op.get( "search.pl?cmd=Hello" ); // WRONG! \endcode If \a location is not empty and relative it must not contain any queries or references, just the name of a child. So if you need to specify a query or reference, do it as shown in the first example or specify the full URL (such as http://www.whatever.org/cgi-bin/search.pl?cmd=Hello) as \a location. \sa copy() */ const TQNetworkOperation *TQUrlOperator::get( const TQString &location ) { TQUrl u( *this ); if ( !location.isEmpty() ) u = TQUrl( *this, location ); if ( !u.isValid() ) return 0; if ( !d->networkProtocol ) { setProtocol( u.protocol() ); getNetworkProtocol(); } TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpGet, u, TQString::null, TQString::null ); return startOperation( res ); } /*! This function tells the network protocol to put \a data in \a location. If \a location is empty (TQString::null), it puts the \a data in the location to which the URL points. What happens depends on the network protocol. Depending on the network protocol, some data might come back after putting data, in which case the data() signal is emitted. The dataTransferProgress() signal is emitted during processing of the operation. At the end, finished() (with success or failure) is emitted, so check the state of the network operation object to see whether or not the operation was successful. If \a location is TQString::null, the path of this TQUrlOperator should point to a file when you use this operation. If \a location is not empty, it can be a relative (a child of the path to which the TQUrlOperator points) or an absolute URL. For putting some data to a file you can do the following: \code TQUrlOperator op( "ftp://ftp.whatever.com/home/me/filename.dat" ); op.put( data ); \endcode For most other operations, the path of the TQUrlOperator must point to a directory. If you want to upload data to a file you could do the following: \code TQUrlOperator op( "ftp://ftp.whatever.com/home/me" ); // do some other stuff like op.listChildren() or op.mkdir( "new_dir" ) op.put( data, "filename.dat" ); \endcode This will upload the data to ftp://ftp.whatever.com/home/me/filename.dat. \sa copy() */ const TQNetworkOperation *TQUrlOperator::put( const TQByteArray &data, const TQString &location ) { TQUrl u( *this ); if ( !location.isEmpty() ) u = TQUrl( *this, location ); if ( !u.isValid() ) return 0; if ( !d->networkProtocol ) { setProtocol( u.protocol() ); getNetworkProtocol(); } TQNetworkOperation *res = new TQNetworkOperation( TQNetworkProtocol::OpPut, u, TQString::null, TQString::null ); res->setRawArg( 1, data ); return startOperation( res ); } /*! Sets the name filter of the URL to \a nameFilter. \sa TQDir::setNameFilter() */ void TQUrlOperator::setNameFilter( const TQString &nameFilter ) { d->nameFilter = nameFilter; } /*! Returns the name filter of the URL. \sa TQUrlOperator::setNameFilter() TQDir::nameFilter() */ TQString TQUrlOperator::nameFilter() const { return d->nameFilter; } /*! Clears the cache of children. */ void TQUrlOperator::clearEntries() { d->entryMap.clear(); } /*! Adds an entry to the cache of children. */ void TQUrlOperator::addEntry( const TQValueList &i ) { TQValueList::ConstIterator it = i.begin(); for ( ; it != i.end(); ++it ) d->entryMap[ ( *it ).name().stripWhiteSpace() ] = *it; } /*! Returns the URL information for the child \a entry, or returns an empty TQUrlInfo object if there is no information available about \a entry. Information about \a entry is only available after a successfully finished listChildren() operation. */ TQUrlInfo TQUrlOperator::info( const TQString &entry ) const { if ( d->entryMap.contains( entry.stripWhiteSpace() ) ) { return d->entryMap[ entry.stripWhiteSpace() ]; } else if ( entry == "." || entry == ".." ) { // return a faked TQUrlInfo TQUrlInfo inf; inf.setName( entry ); inf.setDir( TRUE ); inf.setFile( FALSE ); inf.setSymLink( FALSE ); inf.setOwner( tr( "(unknown)" ) ); inf.setGroup( tr( "(unknown)" ) ); inf.setSize( 0 ); inf.setWritable( FALSE ); inf.setReadable( TRUE ); return inf; } return TQUrlInfo(); } /*! Finds a network protocol for the URL and deletes the old network protocol. */ void TQUrlOperator::getNetworkProtocol() { delete d->networkProtocol; TQNetworkProtocol *p = TQNetworkProtocol::getNetworkProtocol( protocol() ); if ( !p ) { d->networkProtocol = 0; return; } d->networkProtocol = (TQNetworkProtocol *)p; d->networkProtocol->setUrl( this ); connect( d->networkProtocol, SIGNAL( itemChanged(TQNetworkOperation*) ), this, SLOT( slotItemChanged(TQNetworkOperation*) ) ); } /*! Deletes the currently used network protocol. */ void TQUrlOperator::deleteNetworkProtocol() { if (d->networkProtocol) { d->networkProtocol->deleteLater(); d->networkProtocol = 0; } } /*! \reimp */ void TQUrlOperator::setPath( const TQString& path ) { TQUrl::setPath( path ); if ( d->networkProtocol ) d->networkProtocol->setUrl( this ); } /*! \reimp */ void TQUrlOperator::reset() { TQUrl::reset(); deleteNetworkProtocol(); d->nameFilter = "*"; } /*! \reimp */ bool TQUrlOperator::parse( const TQString &url ) { bool b = TQUrl::parse( url ); if ( !b ) { return b; } getNetworkProtocol(); return b; } /*! \reimp */ TQUrlOperator& TQUrlOperator::operator=( const TQUrlOperator &url ) { deleteNetworkProtocol(); TQUrl::operator=( url ); TQPtrDict getOpPutOpMap = d->getOpPutOpMap; TQPtrDict getOpPutProtMap = d->getOpPutProtMap; TQPtrDict getOpGetProtMap = d->getOpGetProtMap; TQPtrDict getOpRemoveOpMap = d->getOpRemoveOpMap; *d = *url.d; d->oldOps.setAutoDelete( FALSE ); d->getOpPutOpMap = getOpPutOpMap; d->getOpPutProtMap = getOpPutProtMap; d->getOpGetProtMap = getOpGetProtMap; d->getOpRemoveOpMap = getOpRemoveOpMap; d->networkProtocol = 0; getNetworkProtocol(); return *this; } /*! \reimp */ TQUrlOperator& TQUrlOperator::operator=( const TQString &url ) { deleteNetworkProtocol(); TQUrl::operator=( url ); d->oldOps.setAutoDelete( FALSE ); getNetworkProtocol(); return *this; } /*! \reimp */ bool TQUrlOperator::cdUp() { bool b = TQUrl::cdUp(); if ( d->networkProtocol ) d->networkProtocol->setUrl( this ); return b; } /*! \reimp */ bool TQUrlOperator::checkValid() { // ###### if ( !isValid() ) { //emit error( ErrValid, tr( "The entered URL is not valid!" ) ); return FALSE; } else return TRUE; } /*! \internal */ void TQUrlOperator::copyGotData( const TQByteArray &data_, TQNetworkOperation *op ) { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: copyGotData: %d new bytes", data_.size() ); #endif TQNetworkOperation *put = d->getOpPutOpMap[ (void*)op ]; if ( put ) { TQByteArray &s = put->raw( 1 ); int size = s.size(); s.resize( size + data_.size() ); memcpy( s.data() + size, data_.data(), data_.size() ); } emit data( data_, op ); } /*! \internal */ void TQUrlOperator::continueCopy( TQNetworkOperation *op ) { if ( op->operation() != TQNetworkProtocol::OpGet ) return; if ( op->state()!=TQNetworkProtocol::StDone && op->state()!=TQNetworkProtocol::StFailed ) { return; } #ifdef TQURLOPERATOR_DEBUG if ( op->state() != TQNetworkProtocol::StFailed ) { qDebug( "TQUrlOperator: continue copy (get finished, put will start)" ); } #endif TQNetworkOperation *put = d->getOpPutOpMap[ (void*)op ]; TQNetworkProtocol *gProt = d->getOpGetProtMap[ (void*)op ]; TQNetworkProtocol *pProt = d->getOpPutProtMap[ (void*)op ]; TQNetworkOperation *rm = d->getOpRemoveOpMap[ (void*)op ]; d->getOpPutOpMap.take( op ); d->getOpGetProtMap.take( op ); d->getOpPutProtMap.take( op ); d->getOpRemoveOpMap.take( op ); if ( pProt ) pProt->setAutoDelete( TRUE ); if ( put && pProt ) { if ( op->state() != TQNetworkProtocol::StFailed ) { pProt->addOperation( put ); d->currPut = pProt; } else { deleteOperation( put ); } } if ( gProt ) { gProt->setAutoDelete( TRUE ); } if ( rm && gProt ) { if ( op->state() != TQNetworkProtocol::StFailed ) { gProt->addOperation( rm ); } else { deleteOperation( rm ); } } disconnect( gProt, SIGNAL( data(const TQByteArray&,TQNetworkOperation*) ), this, SLOT( copyGotData(const TQByteArray&,TQNetworkOperation*) ) ); disconnect( gProt, SIGNAL( finished(TQNetworkOperation*) ), this, SLOT( continueCopy(TQNetworkOperation*) ) ); } /*! \internal */ void TQUrlOperator::finishedCopy() { #ifdef TQURLOPERATOR_DEBUG qDebug( "TQUrlOperator: finished copy (finished putting)" ); #endif if ( d->waitingCopies.isEmpty() ) return; TQString cp = d->waitingCopies.first(); d->waitingCopies.remove( cp ); TQPtrList lst = copy( cp, d->waitingCopiesDest, d->waitingCopiesMove ); emit startedNextCopy( lst ); } /*! Stops the current network operation and removes all this TQUrlOperator's waiting network operations. */ void TQUrlOperator::stop() { d->getOpPutOpMap.clear(); d->getOpRemoveOpMap.clear(); d->getOpGetProtMap.setAutoDelete( TRUE ); d->getOpPutProtMap.setAutoDelete( TRUE ); TQPtrDictIterator it( d->getOpPutProtMap ); for ( ; it.current(); ++it ) it.current()->stop(); d->getOpPutProtMap.clear(); it = TQPtrDictIterator( d->getOpGetProtMap ); for ( ; it.current(); ++it ) it.current()->stop(); d->getOpGetProtMap.clear(); if ( d->currPut ) { d->currPut->stop(); delete (TQNetworkProtocol *) d->currPut; d->currPut = 0; } d->waitingCopies.clear(); if ( d->networkProtocol ) d->networkProtocol->stop(); getNetworkProtocol(); } /*! \internal */ void TQUrlOperator::deleteOperation( TQNetworkOperation *op ) { if ( op ) d->oldOps.append( op ); } /*! \internal updates the entryMap after a network operation finished */ void TQUrlOperator::slotItemChanged( TQNetworkOperation *op ) { if ( !op ) return; switch ( op->operation() ) { case TQNetworkProtocol::OpRename : { if ( op->arg( 0 ) == op->arg( 1 ) ) return; TQMap::iterator mi = d->entryMap.find( op->arg( 0 ) ); if ( mi != d->entryMap.end() ) { mi.data().setName( op->arg( 1 ) ); d->entryMap[ op->arg( 1 ) ] = mi.data(); d->entryMap.erase( mi ); } break; } case TQNetworkProtocol::OpRemove : { TQMap::iterator mi = d->entryMap.find( op->arg( 0 ) ); if ( mi != d->entryMap.end() ) d->entryMap.erase( mi ); break; } default: break; } } #endif // QT_NO_NETWORKPROTOCOL