|
|
|
/***************************************************************************
|
|
|
|
* Copyright (C) 2012 by Timothy Pearson *
|
|
|
|
* kb9vqf@pearsoncomputing.net *
|
|
|
|
* *
|
|
|
|
* 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. *
|
|
|
|
* *
|
|
|
|
* 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., *
|
|
|
|
* 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
|
|
|
|
***************************************************************************/
|
|
|
|
|
|
|
|
#include "tqtrla.h"
|
|
|
|
|
|
|
|
#include <tqwidget.h>
|
|
|
|
|
|
|
|
#include <klocale.h>
|
|
|
|
|
|
|
|
namespace KParts
|
|
|
|
{
|
|
|
|
class RemoteInstrumentPartPrivate
|
|
|
|
{
|
|
|
|
public:
|
|
|
|
RemoteInstrumentPartPrivate() {
|
|
|
|
//
|
|
|
|
}
|
|
|
|
|
|
|
|
~RemoteInstrumentPartPrivate() {
|
|
|
|
//
|
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
RemoteInstrumentPart::RemoteInstrumentPart(TQObject *parent, const char *name)
|
|
|
|
: Part( parent, name )
|
|
|
|
{
|
|
|
|
d = new RemoteInstrumentPartPrivate;
|
|
|
|
}
|
|
|
|
|
|
|
|
RemoteInstrumentPart::~RemoteInstrumentPart() {
|
|
|
|
RemoteInstrumentPart::closeURL();
|
|
|
|
delete d;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool RemoteInstrumentPart::openURL(const KURL &url) {
|
|
|
|
m_url = url;
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool RemoteInstrumentPart::closeURL() {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
TQPtrList<KAction> RemoteInstrumentPart::menuActionList() {
|
|
|
|
return TQPtrList<KAction>();
|
|
|
|
}
|
|
|
|
|
|
|
|
void RemoteInstrumentPart::resize(TQSize size) {
|
|
|
|
TQWidget* parentWidget = dynamic_cast<TQWidget*>(parent());
|
|
|
|
if (parentWidget) {
|
|
|
|
parentWidget->setFixedSize(size);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void RemoteInstrumentPart::close() {
|
|
|
|
TQWidget* parentWidget = dynamic_cast<TQWidget*>(parent());
|
|
|
|
if (parentWidget) {
|
|
|
|
parentWidget->close();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void RemoteInstrumentPart::setStatusMessage(const TQString& message) {
|
|
|
|
emit(statusMessageSet(message));
|
|
|
|
}
|
|
|
|
|
|
|
|
TQ_ULONG RemoteInstrumentPart::maximumSocketDataChunkSize() {
|
|
|
|
// FIXME
|
|
|
|
// Dynamically set this!
|
|
|
|
return 512;
|
|
|
|
}
|
|
|
|
|
|
|
|
TQStringList RemoteInstrumentPart::textForServerError(TQString shortError) {
|
|
|
|
TQStringList ret;
|
|
|
|
|
|
|
|
if (shortError == "ERRNOCONN") {
|
|
|
|
ret.append(i18n("<qt>Unable to establish connection with backend server<p>Please verify that you are currently connected to a workspace</qt>"));
|
|
|
|
ret.append(i18n("Connection Failed"));
|
|
|
|
}
|
|
|
|
else if (shortError == "ERRNOTAVL") {
|
|
|
|
ret.append(i18n("<qt>The backend server is not available at this time<p>Please try a different workspace, or try again later</qt>"));
|
|
|
|
ret.append(i18n("Connection Failed"));
|
|
|
|
}
|
|
|
|
else if (shortError == "ERRNOSERV") {
|
|
|
|
ret.append(i18n("<qt>The active laboratory workspace does not support the requested service</qt>"));
|
|
|
|
ret.append(i18n("Service Unavailable"));
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
ret.append(i18n("<qt>Unable to establish connection with remote server</qt>"));
|
|
|
|
ret.append(i18n("Connection Failed"));
|
|
|
|
}
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
bool operator==( const ServiceType &s1, const ServiceType &s2 ) {
|
|
|
|
bool identical = true;
|
|
|
|
|
|
|
|
if (s1.type != s2.type) {
|
|
|
|
identical = false;
|
|
|
|
}
|
|
|
|
|
|
|
|
return identical;
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifndef QT_NO_DATASTREAM
|
|
|
|
/*!
|
|
|
|
\relates ServiceType
|
|
|
|
|
|
|
|
Writes the ServiceType \a str to the stream \a s.
|
|
|
|
|
|
|
|
See also \link datastreamformat.html Format of the TQDataStream operators \endlink
|
|
|
|
*/
|
|
|
|
|
|
|
|
TQDataStream &operator<<( TQDataStream &s, const ServiceType &st )
|
|
|
|
{
|
|
|
|
TQ_INT8 tempchar;
|
|
|
|
|
|
|
|
s << st.type;
|
|
|
|
s << st.name;
|
|
|
|
s << st.description;
|
|
|
|
s << st.clientLibrary;
|
|
|
|
s << st.version;
|
|
|
|
tempchar = (st.singleInstance)?1:0;
|
|
|
|
s << tempchar;
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*!
|
|
|
|
\relates ServiceType
|
|
|
|
|
|
|
|
Reads a ServiceType from the stream \a s into ServiceType \a str.
|
|
|
|
|
|
|
|
See also \link datastreamformat.html Format of the TQDataStream operators \endlink
|
|
|
|
*/
|
|
|
|
|
|
|
|
TQDataStream &operator>>( TQDataStream &s, ServiceType &st )
|
|
|
|
{
|
|
|
|
TQ_INT8 tempchar;
|
|
|
|
|
|
|
|
s >> st.type;
|
|
|
|
s >> st.name;
|
|
|
|
s >> st.description;
|
|
|
|
s >> st.clientLibrary;
|
|
|
|
s >> st.version;
|
|
|
|
s >> tempchar;
|
|
|
|
st.singleInstance = (tempchar != 0);
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*!
|
|
|
|
\relates StationType
|
|
|
|
|
|
|
|
Writes the StationType \a str to the stream \a s.
|
|
|
|
|
|
|
|
See also \link datastreamformat.html Format of the TQDataStream operators \endlink
|
|
|
|
*/
|
|
|
|
|
|
|
|
TQDataStream &operator<<( TQDataStream &s, const StationType &st )
|
|
|
|
{
|
|
|
|
s << st.id;
|
|
|
|
s << st.type;
|
|
|
|
s << st.services;
|
|
|
|
s << st.name;
|
|
|
|
s << st.description;
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*!
|
|
|
|
\relates StationType
|
|
|
|
|
|
|
|
Reads a StationType from the stream \a s into StationType \a str.
|
|
|
|
|
|
|
|
See also \link datastreamformat.html Format of the TQDataStream operators \endlink
|
|
|
|
*/
|
|
|
|
|
|
|
|
TQDataStream &operator>>( TQDataStream &s, StationType &st )
|
|
|
|
{
|
|
|
|
s >> st.id;
|
|
|
|
s >> st.type;
|
|
|
|
s >> st.services;
|
|
|
|
s >> st.name;
|
|
|
|
s >> st.description;
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
#endif // QT_NO_DATASTREAM
|
|
|
|
|