@ -42,11 +42,17 @@
# include <unistd.h> //access()
# include <stdint.h>
# include <tqpainter.h>
# include "tracewidget.h"
# include "floatspinbox.h"
# include "layout.h"
# define SERVER_TIMEOUT_MS 10000
// RAJA UNCOMMENT ME
//#define SERVER_TIMEOUT_MS 10000
// RAJA DEBUG ONLY
# define SERVER_TIMEOUT_MS 100000
# define FPGA_COMM_TIMEOUT_MS 500
FPGALed : : FPGALed ( TQWidget * parent , const char * name )
: KLed ( parent , name ) , m_clickable ( true )
@ -117,6 +123,430 @@ void FPGAPushButton::leaveEvent(TQEvent *e) {
}
}
FPGA7Segment : : FPGA7Segment ( TQWidget * parent , const char * name )
: TQFrame ( parent , name )
{
init ( ) ;
}
FPGA7Segment : : ~ FPGA7Segment ( ) {
free ( m_prevSegments ) ;
free ( m_currentSegments ) ;
}
void FPGA7Segment : : init ( ) {
setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
val = 0 ;
smallPoint = TRUE ;
setSegmentStyle ( Flat ) ;
m_prevSegments = ( char * ) malloc ( sizeof ( char ) * 9 ) ;
m_currentSegments = ( char * ) malloc ( sizeof ( char ) * 9 ) ;
m_prevSegments [ 0 ] = 99 ;
m_currentSegments [ 0 ] = 99 ;
d = 0 ;
setSizePolicy ( TQSizePolicy ( TQSizePolicy : : Minimum , TQSizePolicy : : Minimum ) ) ;
}
void FPGA7Segment : : setLitSegments ( unsigned int segs ) {
// This produces an array of up to 10 chars, with each char being the number of a lit segment, and the list being terminated with the number 99
// The bit input in segs is active high
// The bit sequence, MSB to LSB, is dp a b c d e f g
// Segment letters are taken from ug130.pdf
// 0: a
// 1: f
// 2: d
// 3: g
// 4: e
// 5: c
// 6: b
// 7: dp
int i = 0 ;
if ( segs & 0x80 ) { m_currentSegments [ i ] = 7 ; i + + ; }
if ( segs & 0x40 ) { m_currentSegments [ i ] = 0 ; i + + ; }
if ( segs & 0x20 ) { m_currentSegments [ i ] = 6 ; i + + ; }
if ( segs & 0x10 ) { m_currentSegments [ i ] = 5 ; i + + ; }
if ( segs & 0x08 ) { m_currentSegments [ i ] = 2 ; i + + ; }
if ( segs & 0x04 ) { m_currentSegments [ i ] = 4 ; i + + ; }
if ( segs & 0x02 ) { m_currentSegments [ i ] = 1 ; i + + ; }
if ( segs & 0x01 ) { m_currentSegments [ i ] = 3 ; i + + ; }
m_currentSegments [ i ] = 99 ;
}
void FPGA7Segment : : drawContents ( TQPainter * p )
{
// Draw all segments
TQPoint pos ;
int digitSpace = smallPoint ? 2 : 1 ;
int xSegLen = width ( ) * 5 / ( 1 * ( 5 + digitSpace ) + digitSpace ) ;
int ySegLen = height ( ) * 5 / 12 ;
int segLen = ySegLen > xSegLen ? xSegLen : ySegLen ;
int xAdvance = segLen * ( 5 + 1 ) / 5 ;
int xOffset = ( width ( ) - xAdvance + segLen / 5 ) / 2 ;
int yOffset = ( height ( ) - segLen * 2 ) / 2 ;
pos = TQPoint ( xOffset , yOffset ) ;
drawDigit ( pos , * p , segLen , m_currentSegments ) ;
}
TQSize FPGA7Segment : : sizeHint ( ) const {
return TQSize ( 10 + 9 * ( 1 + ( smallPoint ? 0 : 1 ) ) , 23 ) ;
}
void FPGA7Segment : : setSegmentStyle ( SegmentStyle s ) {
fill = ( s = = Flat | | s = = Filled ) ;
shadow = ( s = = Outline | | s = = Filled ) ;
update ( ) ;
}
FPGA7Segment : : SegmentStyle FPGA7Segment : : segmentStyle ( ) const {
Q_ASSERT ( fill | | shadow ) ;
if ( ! fill & & shadow ) {
return Outline ;
}
if ( fill & & shadow ) {
return Filled ;
}
return Flat ;
}
static void addPoint ( TQPointArray & a , const TQPoint & p ) {
uint n = a . size ( ) ;
a . resize ( n + 1 ) ;
a . setPoint ( n , p ) ;
}
void FPGA7Segment : : drawDigit ( const TQPoint & pos , TQPainter & p , int segLen , const char * newSegs ) {
char updates [ 20 ] [ 2 ] ; // Can hold 2 times number of segments, only
// first 10 used if segment table is correct
int nErases ;
int nUpdates ;
const char * segs ;
int i , j ;
const char erase = 0 ;
const char draw = 1 ;
const char leaveAlone = 2 ;
segs = m_prevSegments ;
for ( nErases = 0 ; segs [ nErases ] ! = 99 ; nErases + + ) {
updates [ nErases ] [ 0 ] = erase ; // Get segments to erase to
updates [ nErases ] [ 1 ] = segs [ nErases ] ; // remove old char
}
nUpdates = nErases ;
segs = newSegs ;
for ( i = 0 ; segs [ i ] ! = 99 ; i + + ) {
for ( j = 0 ; j < nErases ; j + + ) {
if ( segs [ i ] = = updates [ j ] [ 1 ] ) { // Same segment ?
updates [ j ] [ 0 ] = leaveAlone ; // yes, already on screen
break ;
}
}
if ( j = = nErases ) { // If not already on screen
updates [ nUpdates ] [ 0 ] = draw ;
updates [ nUpdates ] [ 1 ] = segs [ i ] ;
nUpdates + + ;
}
}
for ( i = 0 ; i < nUpdates ; i + + ) {
if ( updates [ i ] [ 0 ] = = draw ) {
drawSegment ( pos , updates [ i ] [ 1 ] , p , segLen ) ;
}
if ( updates [ i ] [ 0 ] = = erase ) {
drawSegment ( pos , updates [ i ] [ 1 ] , p , segLen , TRUE ) ;
}
}
memcpy ( m_prevSegments , newSegs , sizeof ( char ) * 9 ) ;
}
void FPGA7Segment : : drawSegment ( const TQPoint & pos , char segmentNo , TQPainter & p , int segLen , bool erase ) {
TQPoint pt = pos ;
int width = segLen / 5 ;
const TQColorGroup & g = colorGroup ( ) ;
TQColor lightColor , darkColor , fgColor ;
if ( erase ) {
lightColor = backgroundColor ( ) ;
darkColor = lightColor ;
fgColor = lightColor ;
}
else {
lightColor = g . light ( ) ;
darkColor = g . dark ( ) ;
fgColor = g . foreground ( ) ;
}
# define LINETO(X,Y) addPoint( a, TQPoint(pt.x() + (X),pt.y() + (Y)))
# define LIGHT
# define DARK
if ( fill ) {
TQPointArray a ( 0 ) ;
//The following is an exact copy of the switch below.
//don't make any changes here
switch ( segmentNo ) {
case 0 :
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
LINETO ( segLen - width - 1 , width ) ;
LINETO ( width , width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 1 :
pt + = TQPoint ( 0 , 1 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , width ) ;
DARK ;
LINETO ( width , segLen - width / 2 - 2 ) ;
LINETO ( 0 , segLen - 2 ) ;
LIGHT ;
LINETO ( 0 , 0 ) ;
break ;
case 2 :
pt + = TQPoint ( segLen - 1 , 1 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( 0 , segLen - 2 ) ;
LINETO ( - width , segLen - width / 2 - 2 ) ;
LIGHT ;
LINETO ( - width , width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 3 :
pt + = TQPoint ( 0 , segLen ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , - width / 2 ) ;
LINETO ( segLen - width - 1 , - width / 2 ) ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
if ( width & 1 ) { // adjust for integer division error
LINETO ( segLen - width - 3 , width / 2 + 1 ) ;
LINETO ( width + 2 , width / 2 + 1 ) ;
} else {
LINETO ( segLen - width - 1 , width / 2 ) ;
LINETO ( width , width / 2 ) ;
}
LINETO ( 0 , 0 ) ;
break ;
case 4 :
pt + = TQPoint ( 0 , segLen + 1 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , width / 2 ) ;
DARK ;
LINETO ( width , segLen - width - 2 ) ;
LINETO ( 0 , segLen - 2 ) ;
LIGHT ;
LINETO ( 0 , 0 ) ;
break ;
case 5 :
pt + = TQPoint ( segLen - 1 , segLen + 1 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( 0 , segLen - 2 ) ;
LINETO ( - width , segLen - width - 2 ) ;
LIGHT ;
LINETO ( - width , width / 2 ) ;
LINETO ( 0 , 0 ) ;
break ;
case 6 :
pt + = TQPoint ( 0 , segLen * 2 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , - width ) ;
LINETO ( segLen - width - 1 , - width ) ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
LINETO ( 0 , 0 ) ;
break ;
case 7 :
if ( smallPoint ) // if smallpoint place'.' between other digits
pt + = TQPoint ( segLen + width / 2 , segLen * 2 ) ;
else
pt + = TQPoint ( segLen / 2 , segLen * 2 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 8 :
pt + = TQPoint ( segLen / 2 - width / 2 + 1 , segLen / 2 + width ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 9 :
pt + = TQPoint ( segLen / 2 - width / 2 + 1 , 3 * segLen / 2 + width ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
# if defined(QT_CHECK_RANGE)
default :
tqWarning ( " FPGA7Segment::drawSegment: (%s) Internal error. "
" Illegal segment id: %d \n " ,
name ( " unnamed " ) , segmentNo ) ;
# endif
}
// End exact copy
p . setPen ( fgColor ) ;
p . setBrush ( fgColor ) ;
p . drawPolygon ( a ) ;
p . setBrush ( NoBrush ) ;
pt = pos ;
}
# undef LINETO
# undef LIGHT
# undef DARK
# define LINETO(X,Y) p.lineTo(TQPoint(pt.x() + (X),pt.y() + (Y)))
# define LIGHT p.setPen(lightColor)
# define DARK p.setPen(darkColor)
if ( shadow ) {
switch ( segmentNo ) {
case 0 :
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
LINETO ( segLen - width - 1 , width ) ;
LINETO ( width , width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 1 :
pt + = TQPoint ( 0 , 1 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , width ) ;
DARK ;
LINETO ( width , segLen - width / 2 - 2 ) ;
LINETO ( 0 , segLen - 2 ) ;
LIGHT ;
LINETO ( 0 , 0 ) ;
break ;
case 2 :
pt + = TQPoint ( segLen - 1 , 1 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( 0 , segLen - 2 ) ;
LINETO ( - width , segLen - width / 2 - 2 ) ;
LIGHT ;
LINETO ( - width , width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 3 :
pt + = TQPoint ( 0 , segLen ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , - width / 2 ) ;
LINETO ( segLen - width - 1 , - width / 2 ) ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
if ( width & 1 ) { // adjust for integer division error
LINETO ( segLen - width - 3 , width / 2 + 1 ) ;
LINETO ( width + 2 , width / 2 + 1 ) ;
} else {
LINETO ( segLen - width - 1 , width / 2 ) ;
LINETO ( width , width / 2 ) ;
}
LINETO ( 0 , 0 ) ;
break ;
case 4 :
pt + = TQPoint ( 0 , segLen + 1 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , width / 2 ) ;
DARK ;
LINETO ( width , segLen - width - 2 ) ;
LINETO ( 0 , segLen - 2 ) ;
LIGHT ;
LINETO ( 0 , 0 ) ;
break ;
case 5 :
pt + = TQPoint ( segLen - 1 , segLen + 1 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( 0 , segLen - 2 ) ;
LINETO ( - width , segLen - width - 2 ) ;
LIGHT ;
LINETO ( - width , width / 2 ) ;
LINETO ( 0 , 0 ) ;
break ;
case 6 :
pt + = TQPoint ( 0 , segLen * 2 ) ;
p . moveTo ( pt ) ;
LIGHT ;
LINETO ( width , - width ) ;
LINETO ( segLen - width - 1 , - width ) ;
LINETO ( segLen - 1 , 0 ) ;
DARK ;
LINETO ( 0 , 0 ) ;
break ;
case 7 :
if ( smallPoint ) // if smallpoint place'.' between other digits
pt + = TQPoint ( segLen + width / 2 , segLen * 2 ) ;
else
pt + = TQPoint ( segLen / 2 , segLen * 2 ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 8 :
pt + = TQPoint ( segLen / 2 - width / 2 + 1 , segLen / 2 + width ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
case 9 :
pt + = TQPoint ( segLen / 2 - width / 2 + 1 , 3 * segLen / 2 + width ) ;
p . moveTo ( pt ) ;
DARK ;
LINETO ( width , 0 ) ;
LINETO ( width , - width ) ;
LIGHT ;
LINETO ( 0 , - width ) ;
LINETO ( 0 , 0 ) ;
break ;
# if defined(QT_CHECK_RANGE)
default :
tqWarning ( " FPGA7Segment::drawSegment: (%s) Internal error. "
" Illegal segment id: %d \n " ,
name ( " unnamed " ) , segmentNo ) ;
# endif
}
}
# undef LINETO
# undef LIGHT
# undef DARK
}
namespace RemoteLab {
typedef KParts : : GenericFactory < RemoteLab : : FPGAViewPart > Factory ;
@ -128,7 +558,8 @@ K_EXPORT_COMPONENT_FACTORY(libremotelab_fpgaviewer, RemoteLab::Factory)
FPGAViewPart : : FPGAViewPart ( TQWidget * parentWidget , const char * widgetName , TQObject * parent , const char * name , const TQStringList & )
: RemoteInstrumentPart ( parent , name ) , m_socket ( 0 ) , m_base ( 0 ) , connToServerConnecting ( false ) , connToServerState ( - 1 ) , connToServerTimeoutTimer ( NULL ) , m_interfaceMode ( BasicInterfaceMode ) ,
remoteInputModeEnabled ( false ) , m_4bitInputValue ( 0 ) , m_4bitOutputValue ( 0 ) , m_8bitInputValue ( 0 ) , m_8bitOutputValue ( 0 ) , m_16bitInputValue ( 0 ) , m_16bitOutputValue ( 0 )
m_commHandlerState ( 0 ) , m_connectionActiveAndValid ( false ) , m_tickerState ( 0 ) , m_remoteInputModeEnabled ( false ) , m_4bitInputValue ( 0 ) , m_4bitOutputValue ( 0 ) , m_8bitInputValue ( 0 ) , m_8bitOutputValue ( 0 ) ,
m_16bitInputValue ( 0 ) , m_16bitOutputValue ( 0 ) , m_7segDigit3OutputValue ( 0xffffffff ) , m_7segDigit2OutputValue ( 0xffffffff ) , m_7segDigit1OutputValue ( 0xffffffff ) , m_7segDigit0OutputValue ( 0xffffffff )
{
// Initialize mutex
m_connectionMutex = new TQMutex ( false ) ;
@ -229,6 +660,32 @@ FPGAViewPart::FPGAViewPart(TQWidget *parentWidget, const char *widgetName, TQObj
connect ( m_base - > group16BitInputValue , SIGNAL ( valueChanged ( int ) ) , this , SLOT ( process16BitInputChanges ( ) ) ) ;
m_base - > LEDOutputDisplayDigit0 - > setBackgroundColor ( TQt : : black ) ;
m_base - > LEDOutputDisplayDigit1 - > setBackgroundColor ( TQt : : black ) ;
m_base - > LEDOutputDisplayDigit2 - > setBackgroundColor ( TQt : : black ) ;
m_base - > LEDOutputDisplayDigit3 - > setBackgroundColor ( TQt : : black ) ;
m_base - > LEDOutputDisplayDigit0 - > setPaletteForegroundColor ( TQColor ( 0 , 255 , 64 ) ) ;
m_base - > LEDOutputDisplayDigit1 - > setPaletteForegroundColor ( TQColor ( 0 , 255 , 64 ) ) ;
m_base - > LEDOutputDisplayDigit2 - > setPaletteForegroundColor ( TQColor ( 0 , 255 , 64 ) ) ;
m_base - > LEDOutputDisplayDigit3 - > setPaletteForegroundColor ( TQColor ( 0 , 255 , 64 ) ) ;
// The LED display can work one of two ways
#if 0
// Separated segments
m_base - > LEDOutputDisplayDigit0 - > setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
m_base - > LEDOutputDisplayDigit1 - > setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
m_base - > LEDOutputDisplayDigit2 - > setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
m_base - > LEDOutputDisplayDigit3 - > setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
m_base - > frameLEDDisplay - > setFrameStyle ( TQFrame : : NoFrame ) ;
# else
// Combined segments
m_base - > frameLEDDisplay - > setBackgroundColor ( TQt : : black ) ;
m_base - > LEDOutputDisplayDigit0 - > setFrameStyle ( TQFrame : : NoFrame ) ;
m_base - > LEDOutputDisplayDigit1 - > setFrameStyle ( TQFrame : : NoFrame ) ;
m_base - > LEDOutputDisplayDigit2 - > setFrameStyle ( TQFrame : : NoFrame ) ;
m_base - > LEDOutputDisplayDigit3 - > setFrameStyle ( TQFrame : : NoFrame ) ;
m_base - > frameLEDDisplay - > setFrameStyle ( TQFrame : : Box | TQFrame : : Raised ) ;
# endif
processAllGraphicsUpdates ( ) ;
TQTimer : : singleShot ( 0 , this , TQT_SLOT ( postInit ( ) ) ) ;
@ -255,6 +712,7 @@ void FPGAViewPart::processAllGraphicsUpdates() {
process16BitOutputChanges ( ) ;
processLCDOutputChanges ( ) ;
process7SegmentLEDOutputChanges ( ) ;
processLockouts ( ) ;
}
@ -276,20 +734,51 @@ void FPGAViewPart::process4BitOutputChanges() {
}
void FPGAViewPart : : process8BitInputChanges ( ) {
// Read LED status into m_8bitInputValue
m_8bitInputValue = 0 ;
if ( m_base - > group8BitInputLED7 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x80 ;
if ( m_base - > group8BitInputLED6 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x40 ;
if ( m_base - > group8BitInputLED5 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x20 ;
if ( m_base - > group8BitInputLED4 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x10 ;
if ( m_base - > group8BitInputLED3 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x08 ;
if ( m_base - > group8BitInputLED2 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x04 ;
if ( m_base - > group8BitInputLED1 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x02 ;
if ( m_base - > group8BitInputLED0 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x01 ;
if ( m_remoteInputModeEnabled ) {
// Read LED status into m_8bitInputValue
m_8bitInputValue = 0 ;
if ( m_base - > group8BitInputLED7 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x80 ;
if ( m_base - > group8BitInputLED6 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x40 ;
if ( m_base - > group8BitInputLED5 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x20 ;
if ( m_base - > group8BitInputLED4 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x10 ;
if ( m_base - > group8BitInputLED3 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x08 ;
if ( m_base - > group8BitInputLED2 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x04 ;
if ( m_base - > group8BitInputLED1 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x02 ;
if ( m_base - > group8BitInputLED0 - > state ( ) = = KLed : : On ) m_8bitInputValue | = 0x01 ;
m_base - > group8BitInputLED7 - > setClickable ( true ) ;
m_base - > group8BitInputLED6 - > setClickable ( true ) ;
m_base - > group8BitInputLED5 - > setClickable ( true ) ;
m_base - > group8BitInputLED4 - > setClickable ( true ) ;
m_base - > group8BitInputLED3 - > setClickable ( true ) ;
m_base - > group8BitInputLED2 - > setClickable ( true ) ;
m_base - > group8BitInputLED1 - > setClickable ( true ) ;
m_base - > group8BitInputLED0 - > setClickable ( true ) ;
}
else {
// Write m_8bitInputValue to LEDs
m_base - > group8BitInputLED7 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED6 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED5 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED4 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED3 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED2 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED1 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED0 - > setState ( ( m_8bitInputValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitInputLED7 - > setClickable ( false ) ;
m_base - > group8BitInputLED6 - > setClickable ( false ) ;
m_base - > group8BitInputLED5 - > setClickable ( false ) ;
m_base - > group8BitInputLED4 - > setClickable ( false ) ;
m_base - > group8BitInputLED3 - > setClickable ( false ) ;
m_base - > group8BitInputLED2 - > setClickable ( false ) ;
m_base - > group8BitInputLED1 - > setClickable ( false ) ;
m_base - > group8BitInputLED0 - > setClickable ( false ) ;
}
m_base - > group8BitInputValueText - > setText ( TQString ( " 0x%1 " ) . arg ( m_8bitInputValue , 0 , 16 ) ) ;
if ( remoteInputModeEnabled ) {
if ( m_ remoteInputModeEnabled) {
m_base - > group8BitInput - > setTitle ( i18n ( " 8-Bit Input Values " ) + " [ " + i18n ( " Remote Input Mode " ) + " ] " ) ;
}
else {
@ -299,14 +788,14 @@ void FPGAViewPart::process8BitInputChanges() {
void FPGAViewPart : : process8BitOutputChanges ( ) {
// Write m_8bitOutputValue to LEDs
m_base - > group8BitOutputLED7 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED6 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED5 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED4 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED3 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED2 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED1 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED0 - > setState ( ( m_8bit In putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED7 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED6 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED5 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED4 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED3 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED2 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED1 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputLED0 - > setState ( ( m_8bit Out putValue & 0x80 ) ? KLed : : On : KLed : : Off ) ;
m_base - > group8BitOutputValueText - > setText ( TQString ( " 0x%1 " ) . arg ( m_8bitOutputValue , 0 , 16 ) ) ;
}
@ -330,6 +819,15 @@ void FPGAViewPart::processLCDOutputChanges() {
m_base - > LCDOutputLabel - > setText ( topLine + " \n " + bottomLine ) ;
}
void FPGAViewPart : : process7SegmentLEDOutputChanges ( ) {
// Write LED digits to 7 segment displays
// Note that the information stored in the data structures is bitwise inverted
m_base - > LEDOutputDisplayDigit0 - > setLitSegments ( ~ m_7segDigit0OutputValue ) ;
m_base - > LEDOutputDisplayDigit1 - > setLitSegments ( ~ m_7segDigit1OutputValue ) ;
m_base - > LEDOutputDisplayDigit2 - > setLitSegments ( ~ m_7segDigit2OutputValue ) ;
m_base - > LEDOutputDisplayDigit3 - > setLitSegments ( ~ m_7segDigit3OutputValue ) ;
}
void FPGAViewPart : : processLockouts ( ) {
TQWidget * mainWidget = widget ( ) ;
if ( mainWidget ) {
@ -477,6 +975,9 @@ printf("[RAJA DEBUG 400.0] Got '%s' from the server\n\r", response.ascii()); ffl
if ( response = = " OK " ) {
connToServerState = 3 ;
connToServerConnecting = false ;
connect ( m_socket , SIGNAL ( readyRead ( ) ) , m_socket , SLOT ( processPendingData ( ) ) ) ;
connect ( m_socket , SIGNAL ( newDataReceived ( ) ) , this , SLOT ( updateDisplay ( ) ) ) ;
m_updateTimer - > start ( FPGA_COMM_TIMEOUT_MS , FALSE ) ;
processLockouts ( ) ;
return ;
}
@ -543,9 +1044,141 @@ TQPtrList<KAction> FPGAViewPart::menuActionList() {
return m_menuActionList ;
}
# define UPDATEDISPLAY_TIMEOUT m_connectionActiveAndValid = false; \
m_tickerState = 0 ; \
m_commHandlerState = 0 ; \
while ( m_socket - > bytesAvailable ( ) > 0 ) { \
m_socket - > readBlock ( data , 64 ) ; \
} \
setStatusMessage ( i18n ( " Debug interface timeout, still waiting for data. Please verify that the FPGA is properly configured. " ) ) ; \
m_updateTimer - > start ( FPGA_COMM_TIMEOUT_MS , FALSE ) ; \
return ;
void FPGAViewPart : : updateDisplay ( ) {
// RAJA FIXME
// setStatusMessage(i18n("Debug interface timeout, still waiting for data. Please verify that the FPGA is properly configured.")); // or setStatusMessage(i18n("Running")+"... \|/-"
m_updateTimer - > stop ( ) ;
if ( m_socket ) {
char data [ 64 ] ;
switch ( m_commHandlerState ) {
case 0 :
// Send current input states to remote system
process4BitInputChanges ( ) ;
process8BitInputChanges ( ) ;
process16BitInputChanges ( ) ;
// 4-bit inputs
data [ 0 ] = ' I ' ;
data [ 1 ] = ' \r ' ;
data [ 2 ] = m_4bitInputValue ;
data [ 3 ] = ' \r ' ;
// 8-bit inputs
data [ 4 ] = ' B ' ;
data [ 5 ] = ' \r ' ;
data [ 6 ] = m_8bitInputValue ;
data [ 7 ] = ' \r ' ;
// 16-bit inputs
data [ 8 ] = ' C ' ;
data [ 9 ] = ' \r ' ;
data [ 10 ] = ( m_16bitInputValue & 0xff00 ) > > 8 ;
data [ 11 ] = m_16bitInputValue & 0xff ;
data [ 12 ] = ' \r ' ;
m_socket - > writeBlock ( data , 13 ) ;
// Send request for all output states
m_socket - > writeLine ( " L \r " ) ;
m_updateTimer - > start ( FPGA_COMM_TIMEOUT_MS , FALSE ) ;
m_commHandlerState = 1 ;
break ;
case 1 :
// Get all data
if ( m_socket - > bytesAvailable ( ) > = 41 ) {
// Process the received data packet
// LCD
m_socket - > readBlock ( data , 32 ) ;
char line [ 34 ] ;
memcpy ( line , data , 16 ) ;
line [ 16 ] = ' \n ' ;
memcpy ( line + 17 , data + 16 , 16 ) ;
line [ 33 ] = 0 ;
m_base - > LCDOutputLabel - > setText ( line ) ;
// Remote/Local input mode
m_socket - > readBlock ( data , 1 ) ;
if ( data [ 0 ] = = 0 ) {
// Local mode
m_remoteInputModeEnabled = false ;
}
else {
// Remote mode
m_remoteInputModeEnabled = true ;
}
// 4-bit outputs
m_socket - > readBlock ( data , 1 ) ;
m_4bitOutputValue = data [ 0 ] ;
// 8-bit outputs
m_socket - > readBlock ( data , 1 ) ;
m_8bitOutputValue = data [ 0 ] ;
// 16-bit outputs
m_socket - > readBlock ( data , 2 ) ;
m_16bitOutputValue = ( data [ 0 ] < < 8 ) | data [ 1 ] ;
// 7-segment LED display
m_socket - > readBlock ( data , 4 ) ;
m_7segDigit3OutputValue = data [ 0 ] ;
m_7segDigit2OutputValue = data [ 1 ] ;
m_7segDigit1OutputValue = data [ 2 ] ;
m_7segDigit0OutputValue = data [ 3 ] ;
// Write changes to GUI
process4BitOutputChanges ( ) ;
process8BitInputChanges ( ) ;
process8BitOutputChanges ( ) ;
process16BitOutputChanges ( ) ;
processLCDOutputChanges ( ) ;
process7SegmentLEDOutputChanges ( ) ;
m_connectionActiveAndValid = true ;
TQString tickerChar ;
switch ( m_tickerState ) {
case 0 :
tickerChar = " - " ;
break ;
case 1 :
tickerChar = " \\ " ;
break ;
case 2 :
tickerChar = " | " ;
break ;
case 3 :
tickerChar = " / " ;
break ;
}
setStatusMessage ( i18n ( " Running " ) + TQString ( " ... %1 " ) . arg ( tickerChar ) ) ;
m_tickerState + + ;
if ( m_tickerState > 3 ) {
m_tickerState = 0 ;
}
m_updateTimer - > start ( FPGA_COMM_TIMEOUT_MS , FALSE ) ;
m_commHandlerState = 0 ;
}
else {
if ( ! m_updateTimer - > isActive ( ) ) {
UPDATEDISPLAY_TIMEOUT
}
}
break ;
}
}
else {
m_commHandlerState = 0 ;
}
}
KAboutData * FPGAViewPart : : createAboutData ( ) {