You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
335 lines
9.7 KiB
335 lines
9.7 KiB
/**********************************************************************
|
|
** Copyright (C) 2005-2008 Trolltech ASA. All rights reserved.
|
|
**
|
|
** This file is part of the TQAssistantClient library.
|
|
**
|
|
** 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.
|
|
**
|
|
** 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 "tqassistantclient.h"
|
|
|
|
#include <tqsocket.h>
|
|
#include <tqtextstream.h>
|
|
#include <tqprocess.h>
|
|
#include <tqtimer.h>
|
|
#include <tqfileinfo.h>
|
|
|
|
class TQAssistantClientPrivate
|
|
{
|
|
friend class TQAssistantClient;
|
|
TQStringList arguments;
|
|
};
|
|
|
|
static TQMap<const TQAssistantClient*,TQAssistantClientPrivate*> *dpointers = 0;
|
|
|
|
static TQAssistantClientPrivate *data( const TQAssistantClient *client, bool create=FALSE )
|
|
{
|
|
if( !dpointers )
|
|
dpointers = new TQMap<const TQAssistantClient*,TQAssistantClientPrivate*>;
|
|
TQAssistantClientPrivate *d = (*dpointers)[client];
|
|
if( !d && create ) {
|
|
d = new TQAssistantClientPrivate;
|
|
dpointers->insert( client, d );
|
|
}
|
|
return d;
|
|
}
|
|
|
|
/*!
|
|
\class TQAssistantClient
|
|
\brief The TQAssistantClient class provides a means of using TQt
|
|
Assistant as an application's help tool.
|
|
|
|
Using TQt Assistant is simple: Create a TQAssistantClient instance,
|
|
then call showPage() as often as necessary to show your help
|
|
pages. When you call showPage(), TQt Assistant will be launched if
|
|
it isn't already running.
|
|
|
|
The TQAssistantClient instance can open (openAssistant()) or close
|
|
(closeAssistant()) TQt Assistant whenever required. If TQt Assistant
|
|
is open, isOpen() returns TRUE.
|
|
|
|
One TQAssistantClient instance interacts with one TQt Assistant
|
|
instance, so every time you call openAssistant(), showPage() or
|
|
closeAssistant() they are applied to the particular TQt Assistant
|
|
instance associated with the TQAssistantClient.
|
|
|
|
When you call openAssistant() the assistantOpened() signal is
|
|
emitted. Similarly when closeAssistant() is called,
|
|
assistantClosed() is emitted. In either case, if an error occurs,
|
|
error() is emitted.
|
|
|
|
This class is not included in the TQt library itself. To use it you
|
|
must link against \c libqassistantclient.a (Unix) or \c
|
|
qassistantclient.lib (Windows), which is built into \c INSTALL/lib
|
|
if you built the TQt tools (\c INSTALL is the directory where TQt is
|
|
installed). If you use qmake, then you can simply add the following
|
|
line to your pro file:
|
|
|
|
\code
|
|
LIBS += -lqassistantclient
|
|
\endcode
|
|
|
|
See also "Adding Documentation to TQt Assistant" in the \link
|
|
assistant.book TQt Assistant manual\endlink.
|
|
*/
|
|
|
|
/*!
|
|
\fn void TQAssistantClient::assistantOpened()
|
|
|
|
This signal is emitted when TQt Assistant is open and the
|
|
client-server communication is set up.
|
|
*/
|
|
|
|
/*!
|
|
\fn void TQAssistantClient::assistantClosed()
|
|
|
|
This signal is emitted when the connection to TQt Assistant is
|
|
closed. This happens when the user exits TQt Assistant, or when an
|
|
error in the server or client occurs, or if closeAssistant() is
|
|
called.
|
|
*/
|
|
|
|
/*!
|
|
\fn void TQAssistantClient::error( const TQString &msg )
|
|
|
|
This signal is emitted if TQt Assistant cannot be started or if an
|
|
error occurs during the initialization of the connection between
|
|
TQt Assistant and the calling application. The \a msg provides an
|
|
explanation of the error.
|
|
*/
|
|
|
|
/*!
|
|
Constructs an assistant client object. The \a path specifies the
|
|
path to the TQt Assistant executable. If \a path is an empty
|
|
string the system path (\c{%PATH%} or \c $PATH) is used.
|
|
|
|
The assistant client object is a child of \a parent and is called
|
|
\a name.
|
|
*/
|
|
TQAssistantClient::TQAssistantClient( const TQString &path, TQObject *parent, const char *name )
|
|
: TQObject( parent, name ), host ( "localhost" )
|
|
{
|
|
if ( path.isEmpty() )
|
|
assistantCommand = "assistant";
|
|
else {
|
|
TQFileInfo fi( path );
|
|
if ( fi.isDir() )
|
|
assistantCommand = path + "/assistant";
|
|
else
|
|
assistantCommand = path;
|
|
}
|
|
|
|
#if defined(TQ_OS_MACX)
|
|
assistantCommand += ".app/Contents/MacOS/assistant";
|
|
#elif defined(TQ_WS_WIN)
|
|
if (!assistantCommand.endsWith(".exe"))
|
|
assistantCommand += ".exe";
|
|
#endif
|
|
socket = new TQSocket( this );
|
|
connect( socket, TQT_SIGNAL( connected() ),
|
|
TQT_SLOT( socketConnected() ) );
|
|
connect( socket, TQT_SIGNAL( connectionClosed() ),
|
|
TQT_SLOT( socketConnectionClosed() ) );
|
|
connect( socket, TQT_SIGNAL( error( int ) ),
|
|
TQT_SLOT( socketError( int ) ) );
|
|
opened = FALSE;
|
|
proc = new TQProcess( this );
|
|
port = 0;
|
|
pageBuffer = "";
|
|
connect( proc, TQT_SIGNAL( readyReadStderr() ),
|
|
this, TQT_SLOT( readStdError() ) );
|
|
}
|
|
|
|
/*!
|
|
Destroys the assistant client object and frees up all allocated
|
|
resources.
|
|
*/
|
|
TQAssistantClient::~TQAssistantClient()
|
|
{
|
|
if ( proc && proc->isRunning() ) {
|
|
proc->tryTerminate();
|
|
proc->kill();
|
|
}
|
|
|
|
if( dpointers ) {
|
|
TQAssistantClientPrivate *d = (*dpointers)[ this ];
|
|
if( d ) {
|
|
dpointers->remove( this );
|
|
delete d;
|
|
if( dpointers->isEmpty() ) {
|
|
delete dpointers;
|
|
dpointers = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/*!
|
|
This function opens TQt Assistant and sets up the client-server
|
|
communiction between the application and TQt Assistant. If it is
|
|
already open, this function does nothing. If an error occurs,
|
|
error() is emitted.
|
|
|
|
\sa assistantOpened()
|
|
*/
|
|
void TQAssistantClient::openAssistant()
|
|
{
|
|
if ( proc->isRunning() )
|
|
return;
|
|
proc->clearArguments();
|
|
proc->addArgument( assistantCommand );
|
|
proc->addArgument( "-server" );
|
|
if( !pageBuffer.isEmpty() ) {
|
|
proc->addArgument( "-file" );
|
|
proc->addArgument( pageBuffer );
|
|
}
|
|
|
|
TQAssistantClientPrivate *d = data( this );
|
|
if( d ) {
|
|
TQStringList::ConstIterator it = d->arguments.begin();
|
|
while( it!=d->arguments.end() ) {
|
|
proc->addArgument( *it );
|
|
++it;
|
|
}
|
|
}
|
|
|
|
if ( !proc->launch( TQString() ) ) {
|
|
emit error( tr( "Cannot start TQt Assistant '%1'" )
|
|
.arg( proc->arguments().join( " " ) ) );
|
|
return;
|
|
}
|
|
connect( proc, TQT_SIGNAL( readyReadStdout() ),
|
|
this, TQT_SLOT( readPort() ) );
|
|
}
|
|
|
|
void TQAssistantClient::readPort()
|
|
{
|
|
TQString p = proc->readLineStdout();
|
|
TQ_UINT16 port = p.toUShort();
|
|
if ( port == 0 ) {
|
|
emit error( tr( "Cannot connect to TQt Assistant." ) );
|
|
return;
|
|
}
|
|
socket->connectToHost( host, port );
|
|
disconnect( proc, TQT_SIGNAL( readyReadStdout() ),
|
|
this, TQT_SLOT( readPort() ) );
|
|
}
|
|
|
|
/*!
|
|
Use this function to close TQt Assistant.
|
|
|
|
\sa assistantClosed()
|
|
*/
|
|
void TQAssistantClient::closeAssistant()
|
|
{
|
|
if ( !opened )
|
|
return;
|
|
proc->tryTerminate();
|
|
proc->kill();
|
|
}
|
|
|
|
/*!
|
|
Call this function to make TQt Assistant show a particular \a page.
|
|
The \a page is a filename (e.g. \c myhelpfile.html). See "Adding
|
|
Documentation to TQt Assistant" in the \link assistant.book TQt
|
|
Assistant manual\endlink for further information.
|
|
|
|
If TQt Assistant hasn't been \link openAssistant() opened\endlink
|
|
yet, this function will do nothing. You can use isOpen() to
|
|
determine whether TQt Assistant is up and running, or you can
|
|
connect to the asssistantOpened() signal.
|
|
|
|
\sa isOpen(), assistantOpened()
|
|
*/
|
|
void TQAssistantClient::showPage( const TQString &page )
|
|
{
|
|
if ( !opened ) {
|
|
pageBuffer = page;
|
|
openAssistant();
|
|
pageBuffer = TQString();
|
|
return;
|
|
}
|
|
TQTextStream os( socket );
|
|
os << page << "\n";
|
|
}
|
|
|
|
/*!
|
|
\property TQAssistantClient::open
|
|
\brief Whether TQt Assistant is open.
|
|
|
|
*/
|
|
bool TQAssistantClient::isOpen() const
|
|
{
|
|
return opened;
|
|
}
|
|
|
|
void TQAssistantClient::socketConnected()
|
|
{
|
|
opened = TRUE;
|
|
if ( !pageBuffer.isEmpty() )
|
|
showPage( pageBuffer );
|
|
emit assistantOpened();
|
|
}
|
|
|
|
void TQAssistantClient::socketConnectionClosed()
|
|
{
|
|
opened = FALSE;
|
|
emit assistantClosed();
|
|
}
|
|
|
|
void TQAssistantClient::socketError( int i )
|
|
{
|
|
if ( i == TQSocket::ErrConnectionRefused )
|
|
emit error( tr( "Could not connect to Assistant: Connection refused" ) );
|
|
else if ( i == TQSocket::ErrHostNotFound )
|
|
emit error( tr( "Could not connect to Assistant: Host not found" ) );
|
|
else
|
|
emit error( tr( "Communication error" ) );
|
|
}
|
|
|
|
void TQAssistantClient::readStdError()
|
|
{
|
|
TQString errmsg;
|
|
while ( proc->canReadLineStderr() ) {
|
|
errmsg += proc->readLineStderr();
|
|
errmsg += "\n";
|
|
}
|
|
if (!errmsg.isEmpty())
|
|
emit error( tr( errmsg.simplifyWhiteSpace() ) );
|
|
}
|
|
|
|
/*!
|
|
Sets the command line arguments used when TQt Assistant is
|
|
started to \a args.
|
|
*/
|
|
void TQAssistantClient::setArguments( const TQStringList &args )
|
|
{
|
|
TQAssistantClientPrivate *d = data( this, TRUE );
|
|
d->arguments = args;
|
|
}
|