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.
156 lines
3.9 KiB
156 lines
3.9 KiB
12 years ago
|
/*
|
||
|
* Remote Laboratory FPGA Viewer Part
|
||
|
*
|
||
|
* 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 3 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.,
|
||
|
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||
|
*
|
||
|
* (c) 2012 Timothy Pearson
|
||
|
* Raptor Engineering
|
||
|
* http://www.raptorengineeringinc.com
|
||
|
*/
|
||
|
|
||
|
#include "define.h"
|
||
|
#include "part.h"
|
||
|
|
||
|
#include <kaboutdata.h> //::createAboutData()
|
||
|
#include <kaction.h>
|
||
|
#include <klocale.h>
|
||
|
#include <kmessagebox.h> //::start()
|
||
|
#include <kparts/genericfactory.h>
|
||
|
#include <kstatusbar.h>
|
||
|
#include <kstdaction.h>
|
||
|
#include <tqfile.h> //encodeName()
|
||
|
#include <tqtimer.h> //postInit() hack
|
||
|
#include <tqvbox.h>
|
||
|
#include <tqsocket.h>
|
||
|
#include <tqmutex.h>
|
||
|
#include <tqeventloop.h>
|
||
|
#include <tqapplication.h>
|
||
|
#include <unistd.h> //access()
|
||
|
#include <stdint.h>
|
||
|
|
||
|
|
||
|
|
||
|
#include "tracewidget.h"
|
||
|
#include "floatspinbox.h"
|
||
|
#include "layout.h"
|
||
|
|
||
|
/* exception handling */
|
||
|
struct exit_exception {
|
||
|
int c;
|
||
|
exit_exception(int c):c(c) { }
|
||
|
};
|
||
|
|
||
|
namespace RemoteLab {
|
||
|
|
||
|
typedef KParts::GenericFactory<RemoteLab::FPGAViewPart> Factory;
|
||
|
K_EXPORT_COMPONENT_FACTORY( libremotelab_fpgaviewer, RemoteLab::Factory )
|
||
|
|
||
|
|
||
|
FPGAViewPart::FPGAViewPart(TQWidget *parentWidget, const char *widgetName, TQObject *parent, const char *name, const TQStringList&)
|
||
|
: ReadOnlyPart( parent, name ), m_socket(0), m_base(0)
|
||
|
{
|
||
|
// Initialize mutex
|
||
|
m_instrumentMutex = new TQMutex(false);
|
||
|
|
||
|
// Initialize kpart
|
||
|
setInstance(Factory::instance());
|
||
|
setWidget(new TQVBox(parentWidget, widgetName));
|
||
|
|
||
|
// Create timers
|
||
|
m_updateTimer = new TQTimer(this);
|
||
|
|
||
|
// Create widgets
|
||
|
m_base = new FPGAViewBase(widget());
|
||
|
|
||
|
TQTimer::singleShot(0, this, TQT_SLOT(postInit()));
|
||
|
}
|
||
|
|
||
|
FPGAViewPart::~FPGAViewPart() {
|
||
|
if (m_socket) {
|
||
|
m_socket->close();
|
||
|
while (m_socket->state() == TQSocket::Closing) {
|
||
|
tqApp->processEvents();
|
||
|
}
|
||
|
delete m_socket;
|
||
|
}
|
||
|
|
||
|
delete m_instrumentMutex;
|
||
|
}
|
||
|
|
||
|
void FPGAViewPart::postInit() {
|
||
|
connect(m_updateTimer, SIGNAL(timeout()), this, SLOT(updateDisplay()));
|
||
|
}
|
||
|
|
||
|
bool FPGAViewPart::openURL(const KURL &url) {
|
||
|
return connectToServer(url.url());
|
||
|
}
|
||
|
|
||
|
bool FPGAViewPart::closeURL() {
|
||
|
if (m_socket) {
|
||
|
m_socket->close();
|
||
|
|
||
|
while (m_socket->state() != TQSocket::Idle) {
|
||
|
tqApp->processEvents();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
m_url = KURL();
|
||
|
|
||
|
if (m_instrumentMutex->locked()) {
|
||
|
throw exit_exception(-1);
|
||
|
}
|
||
|
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
int FPGAViewPart::connectToServer(TQString server) {
|
||
|
if (!m_socket) {
|
||
|
m_socket = new TDEKerberosClientSocket(this);
|
||
|
}
|
||
|
m_socket->setServiceName("remotefpga");
|
||
|
m_socket->setServerFQDN(server);
|
||
|
m_socket->connectToHost(server, 4004);
|
||
|
while ((m_socket->state() != TQSocket::Connected) && (m_socket->state() != TQSocket::Idle)) {
|
||
|
tqApp->eventLoop()->processEvents(TQEventLoop::AllEvents);
|
||
|
}
|
||
|
if (m_socket->state() != TQSocket::Connected) {
|
||
|
return -1;
|
||
|
}
|
||
|
if (m_socket->setUsingKerberos(true) != 0) {
|
||
|
m_socket->close();
|
||
|
KMessageBox::error(0, i18n("<qt>Unable to establish Kerberos protocol with remote server<p>Please verify that you currently hold a valid Kerberos ticket</qt>"), i18n("Connection Failed"));
|
||
|
return -1;
|
||
|
}
|
||
|
TQDataStream ds(m_socket);
|
||
|
// RAJA FIXME
|
||
|
// How do we know which service to request?
|
||
|
// ds << TQString("SERV");
|
||
|
// ds <<
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
void FPGAViewPart::updateDisplay() {
|
||
|
// RAJA FIXME
|
||
|
}
|
||
|
|
||
|
KAboutData* FPGAViewPart::createAboutData() {
|
||
|
return new KAboutData( APP_NAME, I18N_NOOP( APP_PRETTYNAME ), APP_VERSION );
|
||
|
}
|
||
|
|
||
|
} //namespace RemoteLab
|
||
|
|
||
|
#include "part.moc"
|